Type handling is mainly done using templates. Template Slic3r::ClassTraits is used to store info about exported types (perl class name). Currently only perl class name and refference name is used. Template values are initialized by REGISTER_CLASS macro. This macro is used in .cpp file of class ( it needs to be used exactly for each type). Ref<type> class is used to return value as perl reference. Operator overloading is used to make c++ and XSpp happy, only pointer value should be possible to return. Clone<type> class is used to return copy of value ( using new and copy constructor). Copy is created on assigment, this should be probably improved (memory leak on multiple assignments). It is overloaded to be able to return type, type* and type&. Typechecking in ExtrusionEntityCollection updated to check all passed types.
158 lines
3.7 KiB
C++
158 lines
3.7 KiB
C++
#include "Polyline.hpp"
|
|
#include "Polygon.hpp"
|
|
#ifdef SLIC3RXS
|
|
#include "perlglue.hpp"
|
|
#endif
|
|
|
|
namespace Slic3r {
|
|
|
|
Polyline::operator Polylines() const
|
|
{
|
|
Polylines polylines;
|
|
polylines.push_back(*this);
|
|
return polylines;
|
|
}
|
|
|
|
Point
|
|
Polyline::last_point() const
|
|
{
|
|
return this->points.back();
|
|
}
|
|
|
|
Point
|
|
Polyline::leftmost_point() const
|
|
{
|
|
Point p = this->points.front();
|
|
for (Points::const_iterator it = this->points.begin() + 1; it != this->points.end(); ++it) {
|
|
if (it->x < p.x) p = *it;
|
|
}
|
|
return p;
|
|
}
|
|
|
|
Lines
|
|
Polyline::lines() const
|
|
{
|
|
Lines lines;
|
|
lines.reserve(this->points.size() - 1);
|
|
for (Points::const_iterator it = this->points.begin(); it != this->points.end()-1; ++it) {
|
|
lines.push_back(Line(*it, *(it + 1)));
|
|
}
|
|
return lines;
|
|
}
|
|
|
|
// removes the given distance from the end of the polyline
|
|
void
|
|
Polyline::clip_end(double distance)
|
|
{
|
|
while (distance > 0) {
|
|
Point last_point = this->last_point();
|
|
this->points.pop_back();
|
|
if (this->points.empty()) break;
|
|
|
|
double last_segment_length = last_point.distance_to(this->last_point());
|
|
if (last_segment_length <= distance) {
|
|
distance -= last_segment_length;
|
|
continue;
|
|
}
|
|
|
|
Line segment(last_point, this->last_point());
|
|
this->points.push_back(segment.point_at(distance));
|
|
distance = 0;
|
|
}
|
|
}
|
|
|
|
// removes the given distance from the start of the polyline
|
|
void
|
|
Polyline::clip_start(double distance)
|
|
{
|
|
this->reverse();
|
|
this->clip_end(distance);
|
|
if (this->points.size() >= 2) this->reverse();
|
|
}
|
|
|
|
void
|
|
Polyline::extend_end(double distance)
|
|
{
|
|
// relocate last point by extending the last segment by the specified length
|
|
Line line(this->points[ this->points.size()-2 ], this->points.back());
|
|
this->points.pop_back();
|
|
this->points.push_back(line.point_at(line.length() + distance));
|
|
}
|
|
|
|
void
|
|
Polyline::extend_start(double distance)
|
|
{
|
|
// relocate first point by extending the first segment by the specified length
|
|
Line line(this->points[1], this->points.front());
|
|
this->points[0] = line.point_at(line.length() + distance);
|
|
}
|
|
|
|
/* this method returns a collection of points picked on the polygon contour
|
|
so that they are evenly spaced according to the input distance */
|
|
Points
|
|
Polyline::equally_spaced_points(double distance) const
|
|
{
|
|
Points pts;
|
|
pts.push_back(this->first_point());
|
|
double len = 0;
|
|
|
|
for (Points::const_iterator it = this->points.begin() + 1; it != this->points.end(); ++it) {
|
|
double segment_length = it->distance_to(*(it-1));
|
|
len += segment_length;
|
|
if (len < distance) continue;
|
|
|
|
if (len == distance) {
|
|
pts.push_back(*it);
|
|
len = 0;
|
|
continue;
|
|
}
|
|
|
|
double take = segment_length - (len - distance); // how much we take of this segment
|
|
Line segment(*(it-1), *it);
|
|
pts.push_back(segment.point_at(take));
|
|
it--;
|
|
len = -take;
|
|
}
|
|
|
|
return pts;
|
|
}
|
|
|
|
void
|
|
Polyline::simplify(double tolerance)
|
|
{
|
|
this->points = MultiPoint::_douglas_peucker(this->points, tolerance);
|
|
}
|
|
|
|
|
|
#ifdef SLIC3RXS
|
|
|
|
REGISTER_CLASS(Polyline, "Polyline");
|
|
|
|
SV*
|
|
Polyline::to_SV_ref()
|
|
{
|
|
SV* sv = newSV(0);
|
|
sv_setref_pv( sv, perl_class_name_ref(this), (void*)this );
|
|
return sv;
|
|
}
|
|
|
|
SV*
|
|
Polyline::to_SV_clone_ref() const
|
|
{
|
|
SV* sv = newSV(0);
|
|
sv_setref_pv( sv, perl_class_name(this), new Polyline(*this) );
|
|
return sv;
|
|
}
|
|
|
|
void
|
|
Polyline::from_SV_check(SV* poly_sv)
|
|
{
|
|
if (!sv_isa(poly_sv, perl_class_name(this)) && !sv_isa(poly_sv, perl_class_name_ref(this)))
|
|
CONFESS("Not a valid %s object",perl_class_name(this));
|
|
|
|
MultiPoint::from_SV_check(poly_sv);
|
|
}
|
|
#endif
|
|
|
|
}
|