rays 0.1.12 → 0.1.13

data/ext/rays/point.cpp

@@ -1,16 +1,10 @@
 #include "rays/ruby/point.h"
 
 
-#include <rucy.h>
 #include "defs.h"
 
 
-using namespace Rucy;
-
-using Rays::coord;
-
-
-RUCY_DEFINE_VALUE_FROM_TO(Rays::Point)
+RUCY_DEFINE_VALUE_OR_ARRAY_FROM_TO(Rays::Point)
 
 #define THIS  to<Rays::Point*>(self)
 
@@ -30,21 +24,8 @@ RUCY_DEFN(initialize)
 	CHECK;
 	check_arg_count(__FILE__, __LINE__, "Point#initialize", argc, 0, 1, 2, 3);
 
-	switch (argc)
-	{
-		case 1:
-			*THIS = Rays::Point(to<coord>(argv[0]));
-			break;
-
-		case 2:
-			*THIS = Rays::Point(to<coord>(argv[0]), to<coord>(argv[1]));
-			break;
-
-		case 3:
-			*THIS = Rays::Point(
-				to<coord>(argv[0]), to<coord>(argv[1]), to<coord>(argv[2]));
-			break;
-	}
+	if (argc >= 1)
+		*THIS = to<Rays::Point>(argc, argv);
 
 	return self;
 }
@@ -100,6 +81,24 @@ RUCY_DEFN(move_by)
 }
 RUCY_END
 
+static
+RUCY_DEF1(rotate, degree)
+{
+	CHECK;
+	Rays::Point p = *THIS;
+	p.rotate(to<float>(degree));
+	return value(p);
+}
+RUCY_END
+
+static
+RUCY_DEF1(rotate_self, degree)
+{
+	CHECK;
+	THIS->rotate(to<float>(degree));
+}
+RUCY_END
+
 static
 RUCY_DEF0(length)
 {
@@ -129,7 +128,8 @@ static
 RUCY_DEF1(set_x, x)
 {
 	CHECK;
-	return value(THIS->x = to<coord>(x));
+	THIS->x = to<coord>(x);
+	return x;
 }
 RUCY_END
 
@@ -145,7 +145,8 @@ static
 RUCY_DEF1(set_y, y)
 {
 	CHECK;
-	return value(THIS->y = to<coord>(y));
+	THIS->y = to<coord>(y);
+	return y;
 }
 RUCY_END
 
@@ -161,7 +162,8 @@ static
 RUCY_DEF1(set_z, z)
 {
 	CHECK;
-	return value(THIS->z = to<coord>(z));
+	THIS->z = to<coord>(z);
+	return z;
 }
 RUCY_END
 
@@ -174,51 +176,59 @@ RUCY_DEF0(get_z)
 RUCY_END
 
 static
-RUCY_DEF1(add, point)
+RUCY_DEF0(negate)
 {
 	CHECK;
-
-	Rays::Point p = *THIS;
-	p += to<Rays::Point&>(point);
-	return value(p);
+	return value(-*THIS);
 }
 RUCY_END
 
 static
-RUCY_DEF1(sub, point)
+RUCY_DEFN(add)
 {
 	CHECK;
-
-	Rays::Point p = *THIS;
-	p -= to<Rays::Point&>(point);
-	return value(p);
+	if (argc == 1 && argv->is_num())
+		return value(*THIS + to<coord>(*argv));
+	else
+		return value(*THIS + to<Rays::Point>(argc, argv));
 }
 RUCY_END
 
 static
-RUCY_DEF1(mult, point)
+RUCY_DEFN(sub)
 {
 	CHECK;
-
-	Rays::Point p = *THIS;
-	p *= to<Rays::Point&>(point);
-	return value(p);
+	if (argc == 1 && argv->is_num())
+		return value(*THIS - to<coord>(*argv));
+	else
+		return value(*THIS - to<Rays::Point>(argc, argv));
 }
 RUCY_END
 
 static
-RUCY_DEF1(div, point)
+RUCY_DEFN(mult)
 {
 	CHECK;
+	if (argc == 1 && argv->is_num())
+		return value(*THIS * to<coord>(*argv));
+	else
+		return value(*THIS * to<Rays::Point>(argc, argv));
+}
+RUCY_END
 
-	Rays::Point p = *THIS;
-	p /= to<Rays::Point&>(point);
-	return value(p);
+static
+RUCY_DEFN(div)
+{
+	CHECK;
+	if (argc == 1 && argv->is_num())
+		return value(*THIS / to<coord>(*argv));
+	else
+		return value(*THIS / to<Rays::Point>(argc, argv));
 }
 RUCY_END
 
 static
-RUCY_DEF1(array_get, index)
+RUCY_DEF2(set_at, index, value)
 {
 	CHECK;
 
@@ -226,12 +236,13 @@ RUCY_DEF1(array_get, index)
 	if (i < 0 || 2 < i)
 		index_error(__FILE__, __LINE__);
 
-	return value((*THIS)[i]);
+	(*THIS)[i] = to<coord>(value);
+	return value;
 }
 RUCY_END
 
 static
-RUCY_DEF2(array_set, index, value)
+RUCY_DEF1(get_at, index)
 {
 	CHECK;
 
@@ -239,8 +250,7 @@ RUCY_DEF2(array_set, index, value)
 	if (i < 0 || 2 < i)
 		index_error(__FILE__, __LINE__);
 
-	(*THIS)[i] = to<coord>(value);
-	return value;
+	return value((*THIS)[i]);
 }
 RUCY_END
 
@@ -262,25 +272,28 @@ Init_point ()
 
 	cPoint = mRays.define_class("Point");
 	cPoint.define_alloc_func(alloc);
-	cPoint.define_private_method("initialize", initialize);
+	cPoint.define_private_method("initialize",      initialize);
 	cPoint.define_private_method("initialize_copy", initialize_copy);
 	cPoint.define_method("move_to!", move_to);
 	cPoint.define_method("move_by!", move_by);
+	cPoint.define_method("rotate",  rotate);
+	cPoint.define_method("rotate!", rotate_self);
 	cPoint.define_method("length", length);
 	cPoint.define_method("normalize", normalize);
 	cPoint.define_method("normal",    normal);
 	cPoint.define_method("x=", set_x);
-	cPoint.define_method("x", get_x);
+	cPoint.define_method("x",  get_x);
 	cPoint.define_method("y=", set_y);
-	cPoint.define_method("y", get_y);
+	cPoint.define_method("y",  get_y);
 	cPoint.define_method("z=", set_z);
-	cPoint.define_method("z", get_z);
-	cPoint.define_method("op_add", add);
-	cPoint.define_method("op_sub", sub);
-	cPoint.define_method("op_mult", mult);
-	cPoint.define_method("op_div", div);
-	cPoint.define_method("[]",  array_get);
-	cPoint.define_method("[]=", array_set);
+	cPoint.define_method("z",  get_z);
+	cPoint.define_method("-@", negate);
+	cPoint.define_method("+", add);
+	cPoint.define_method("-", sub);
+	cPoint.define_method("*", mult);
+	cPoint.define_method("/", div);
+	cPoint.define_method("[]=", set_at);
+	cPoint.define_method("[]",  get_at);
 	cPoint.define_method("inspect", inspect);
 }
 
@@ -290,43 +303,38 @@ namespace Rucy
 
 
 	template <> Rays::Point
-	value_to<Rays::Point> (Value value, bool convert)
+	value_to<Rays::Point> (int argc, const Value* argv, bool convert)
 	{
-		if (convert)
+		if (argc == 1 && argv->is_array())
 		{
-			size_t argc = 0;
-			Value* argv = NULL;
-			if (value.is_array())
-			{
-				argc = value.size();
-				argv = value.as_array();
-			}
-			else
-			{
-				argc = 1;
-				argv = &value;
-			}
+			argc = argv->size();
+			argv = argv->as_array();
+		}
 
-			if (argc < 1)
-				Rucy::argument_error(__FILE__, __LINE__);
+		assert(argc == 0 || (argc > 0 && argv));
 
-			if (argv[0].is_kind_of(Rays::point_class()))
-				value = argv[0];
-			else if (argv[0].is_i() || argv[0].is_f())
+		if (convert)
+		{
+			if (argc == 0)
+				return Rays::Point();
+			else if (argv->is_num())
 			{
 				switch (argc)
 				{
-					#define V(i) argv[i].as_f(true)
+					#define V(i) to<coord>(argv[i])
 					case 1: return Rays::Point(V(0));
 					case 2: return Rays::Point(V(0), V(1));
 					case 3: return Rays::Point(V(0), V(1), V(2));
 					#undef V
-					default: Rucy::argument_error(__FILE__, __LINE__);
+					default: argument_error(__FILE__, __LINE__);
 				}
 			}
 		}
 
-		return value_to<Rays::Point&>(value, convert);
+		if (argc != 1)
+			argument_error(__FILE__, __LINE__);
+
+		return value_to<Rays::Point&>(*argv, convert);
 	}
 
 

data/ext/rays/polygon.cpp

@@ -0,0 +1,301 @@
+#include "rays/ruby/polygon.h"
+
+
+#include <vector>
+#include <functional>
+#include "rays/ruby/bounds.h"
+#include "rays/ruby/polyline.h"
+#include "defs.h"
+
+
+RUCY_DEFINE_VALUE_OR_ARRAY_FROM_TO(Rays::Polygon)
+
+#define THIS  to<Rays::Polygon*>(self)
+
+#define CHECK RUCY_CHECK_OBJECT(Rays::Polygon, self)
+
+
+static
+RUCY_DEF_ALLOC(alloc, klass)
+{
+	return new_type<Rays::Polygon>(klass);
+}
+RUCY_END
+
+static
+RUCY_DEF2(setup, args, loop)
+{
+	CHECK;
+
+	if (loop)
+		*THIS = to<Rays::Polygon>(args.size(), args.as_array());
+	else
+	{
+		std::vector<Rays::Point> points;
+		get_line_args(&points, args.size(), args.as_array());
+		*THIS = Rays::Polygon(&points[0], points.size(), loop);
+	}
+}
+RUCY_END
+
+static
+RUCY_DEF1(expand, width)
+{
+	CHECK;
+
+	Rays::Polygon polygon;
+	THIS->expand(&polygon, to<coord>(width));
+	return value(polygon);
+}
+RUCY_END
+
+static
+RUCY_DEF0(bounds)
+{
+	CHECK;
+	return value(THIS->bounds());
+}
+RUCY_END
+
+static
+RUCY_DEF0(size)
+{
+	CHECK;
+	return value(THIS->size());
+}
+RUCY_END
+
+static
+RUCY_DEF0(empty)
+{
+	CHECK;
+	return value(THIS->empty());
+}
+RUCY_END
+
+static
+RUCY_DEF1(at, index)
+{
+	CHECK;
+
+	int size = (int) THIS->size();
+	int i    = to<int>(index);
+	if (i < 0) i += size;
+
+	if (i < 0 || size <= i)
+		index_error(__FILE__, __LINE__);
+
+	return value((*THIS)[i]);
+}
+RUCY_END
+
+static
+RUCY_DEF0(each)
+{
+	CHECK;
+
+	Value ret;
+	for (const auto& line : *THIS)
+		ret = rb_yield(value(line));
+	return ret;
+}
+RUCY_END
+
+static void
+each_polygon (const Value& value, std::function<void(const Rays::Polygon&)> fun)
+{
+	int size           = value.size();
+	const Value* array = value.as_array();
+
+	for (int i = 0; i < size; ++i)
+		fun(to<Rays::Polygon&>(array[i]));
+}
+
+static
+RUCY_DEF1(op_sub, obj)
+{
+	CHECK;
+
+	if (obj.is_array())
+	{
+		Rays::Polygon result = *THIS;
+		each_polygon(obj, [&](const Rays::Polygon& polygon)
+		{
+			result = result - polygon;
+		});
+		return value(result);
+	}
+	else
+		return value(*THIS - to<Rays::Polygon&>(obj));
+}
+RUCY_END
+
+static
+RUCY_DEF1(op_and, obj)
+{
+	CHECK;
+
+	if (obj.is_array())
+	{
+		Rays::Polygon result = *THIS;
+		each_polygon(obj, [&](const Rays::Polygon& polygon)
+		{
+			result = result & polygon;
+		});
+		return value(result);
+	}
+	else
+		return value(*THIS & to<Rays::Polygon&>(obj));
+}
+RUCY_END
+
+static
+RUCY_DEF1(op_or, obj)
+{
+	CHECK;
+
+	if (obj.is_array())
+	{
+		Rays::Polygon result = *THIS;
+		each_polygon(obj, [&](const Rays::Polygon& polygon)
+		{
+			result = result | polygon;
+		});
+		return value(result);
+	}
+	else
+		return value(*THIS | to<Rays::Polygon&>(obj));
+}
+RUCY_END
+
+static
+RUCY_DEF1(op_xor, obj)
+{
+	CHECK;
+
+	if (obj.is_array())
+	{
+		Rays::Polygon result = *THIS;
+		each_polygon(obj, [&](const Rays::Polygon& polygon)
+		{
+			result = result ^ polygon;
+		});
+		return value(result);
+	}
+	else
+		return value(*THIS ^ to<Rays::Polygon&>(obj));
+}
+RUCY_END
+
+static
+RUCY_DEF7(create_rect,
+	args, round, lefttop, righttop, leftbottom, rightbottom, nsegment)
+{
+	coord x, y, w, h, lt, rt, lb, rb;
+	uint nseg;
+	get_rect_args(
+		&x, &y, &w, &h, &lt, &rt, &lb, &rb, &nseg,
+		args.size(), args.as_array(),
+		round, lefttop, righttop, leftbottom, rightbottom, nsegment);
+
+	return value(Rays::create_rect(x, y, w, h, lt, rt, lb, rb, nseg));
+}
+RUCY_END
+
+static
+RUCY_DEF7(create_ellipse,
+	args, center, radius, hole, angle_from, angle_to, nsegment)
+{
+	coord x, y, w, h;
+	Rays::Point hole_size;
+	float from, to_;
+	uint nseg;
+	get_ellipse_args(
+		&x, &y, &w, &h, &hole_size, &from, &to_, &nseg,
+		args.size(), args.as_array(),
+		center, radius, hole, angle_from, angle_to, nsegment);
+
+	return value(Rays::create_ellipse(x, y, w, h, hole_size, from, to_, nseg));
+}
+RUCY_END
+
+
+static Class cPolygon;
+
+void
+Init_polygon ()
+{
+	Module mRays = define_module("Rays");
+
+	cPolygon = mRays.define_class("Polygon");
+	cPolygon.define_alloc_func(alloc);
+	cPolygon.define_private_method("setup", setup);
+	cPolygon.define_method("expand", expand);
+	cPolygon.define_method("bounds", bounds);
+	cPolygon.define_method("size", size);
+	cPolygon.define_method("empty?", empty);
+	cPolygon.define_method("[]", at);
+	cPolygon.define_method("each", each);
+	cPolygon.define_method("+", op_or);
+	cPolygon.define_method("-", op_sub);
+	cPolygon.define_method("&", op_and);
+	cPolygon.define_method("|", op_or);
+	cPolygon.define_method("^", op_xor);
+	cPolygon.define_singleton_method("create_rect",    create_rect);
+	cPolygon.define_singleton_method("create_ellipse", create_ellipse);
+}
+
+
+namespace Rucy
+{
+
+
+	template <> Rays::Polygon
+	value_to<Rays::Polygon> (int argc, const Value* argv, bool convert)
+	{
+		assert(argc == 0 || (argc > 0 && argv));
+
+		if (convert)
+		{
+			if (argc <= 0)
+				return Rays::Polygon();
+			else if (argv->is_kind_of(Rays::polygon_line_class()))
+			{
+				std::vector<Rays::Polygon::Line> lines;
+				lines.reserve(argc);
+				for (int i = 0; i < argc; ++i)
+					lines.emplace_back(to<Rays::Polygon::Line&>(argv[i]));
+				return Rays::Polygon(&lines[0], lines.size());
+			}
+			else if (argv->is_kind_of(Rays::polyline_class()))
+				return Rays::Polygon(to<Rays::Polyline&>(*argv));
+			else if (argv->is_num() || argv->is_array())
+			{
+				std::vector<Rays::Point> points;
+				get_line_args(&points, argc, argv);
+				return Rays::Polygon(&points[0], points.size());
+			}
+		}
+
+		if (argc != 1)
+			argument_error(__FILE__, __LINE__);
+
+		return value_to<Rays::Polygon&>(*argv, convert);
+	}
+
+
+}// Rucy
+
+
+namespace Rays
+{
+
+
+	Class
+	polygon_class ()
+	{
+		return cPolygon;
+	}
+
+
+}// Rays