rays 0.1.12 → 0.1.17

data/ext/rays/camera.cpp

@@ -0,0 +1,186 @@
+#include "rays/ruby/camera.h"
+
+
+#include "rays/ruby/image.h"
+#include "defs.h"
+
+
+RUCY_DEFINE_VALUE_FROM_TO(Rays::Camera)
+
+#define THIS  to<Rays::Camera*>(self)
+
+#define CHECK RUCY_CHECK_OBJECT(Rays::Camera, self)
+
+
+static
+RUCY_DEF_ALLOC(alloc, klass)
+{
+	return new_type<Rays::Camera>(klass);
+}
+RUCY_END
+
+static
+RUCY_DEF5(setup, device_name, min_width, min_height, resize, crop)
+{
+	RUCY_CHECK_OBJ(Rays::Camera, self);
+
+	*THIS = Rays::Camera(
+		device_name ? to<const char*>(device_name) : NULL,
+		to<int>(min_width), to<int>(min_height),
+		to<bool>(resize), to<bool>(crop));
+	return self;
+}
+RUCY_END
+
+static
+RUCY_DEF0(start)
+{
+	CHECK;
+	return value(THIS->start());
+}
+RUCY_END
+
+static
+RUCY_DEF0(stop)
+{
+	CHECK;
+	THIS->stop();
+}
+RUCY_END
+
+static
+RUCY_DEF0(is_active)
+{
+	CHECK;
+	return value(THIS->is_active());
+}
+RUCY_END
+
+static
+RUCY_DEF1(set_min_width, width)
+{
+	CHECK;
+	THIS->set_min_width(to<int>(width));
+	return value(THIS->min_width());
+}
+RUCY_END
+
+static
+RUCY_DEF0(min_width)
+{
+	CHECK;
+	return value(THIS->min_width());
+}
+RUCY_END
+
+static
+RUCY_DEF1(set_min_height, height)
+{
+	CHECK;
+	THIS->set_min_height(to<int>(height));
+	return value(THIS->min_height());
+}
+RUCY_END
+
+static
+RUCY_DEF0(min_height)
+{
+	CHECK;
+	return value(THIS->min_height());
+}
+RUCY_END
+
+static
+RUCY_DEF1(set_resize, resize)
+{
+	CHECK;
+	THIS->set_resize(to<bool>(resize));
+	return value(THIS->is_resize());
+}
+RUCY_END
+
+static
+RUCY_DEF0(is_resize)
+{
+	CHECK;
+	return value(THIS->is_resize());
+}
+RUCY_END
+
+static
+RUCY_DEF1(set_crop, crop)
+{
+	CHECK;
+	THIS->set_crop(to<bool>(crop));
+	return value(THIS->is_crop());
+}
+RUCY_END
+
+static
+RUCY_DEF0(is_crop)
+{
+	CHECK;
+	return value(THIS->is_crop());
+}
+RUCY_END
+
+static
+RUCY_DEF0(image)
+{
+	CHECK;
+	const Rays::Image* img = THIS->image();
+	return img ? value(*img) : nil();
+}
+RUCY_END
+
+static
+RUCY_DEF0(device_names)
+{
+	auto names = Rays::get_camera_device_names();
+
+	std::vector<Value> v;
+	for (auto it = names.begin(), end = names.end(); it != end; ++it)
+		v.emplace_back(value(it->c_str()));
+	return value(v.size(), &v[0]);
+}
+RUCY_END
+
+
+static Class cCamera;
+
+void
+Init_camera ()
+{
+	Module mRays = define_module("Rays");
+
+	cCamera = mRays.define_class("Camera");
+	cCamera.define_alloc_func(alloc);
+	cCamera.define_private_method("setup", setup);
+	cCamera.define_method("start", start);
+	cCamera.define_method("stop",  stop);
+	cCamera.define_method("active?", is_active);
+	cCamera.define_method("min_width=",  set_min_width);
+	cCamera.define_method("min_width",       min_width);
+	cCamera.define_method("min_height=", set_min_height);
+	cCamera.define_method("min_height",      min_height);
+	cCamera.define_method("resize=", set_resize);
+	cCamera.define_method("resize?",  is_resize);
+	cCamera.define_method("crop=",   set_crop);
+	cCamera.define_method("crop?",    is_crop);
+	cCamera.define_method("image", image);
+	cCamera.define_module_function("device_names", device_names);
+}
+
+
+namespace Rays
+{
+
+
+	Class
+	camera_class ()
+	{
+		return cCamera;
+	}
+
+
+}// Rays

data/ext/rays/color.cpp

@@ -1,14 +1,11 @@
 #include "rays/ruby/color.h"
 
 
-#include <rucy.h>
+#include <map>
 #include "defs.h"
 
 
-using namespace Rucy;
-
-
-RUCY_DEFINE_VALUE_FROM_TO(Rays::Color)
+RUCY_DEFINE_VALUE_OR_ARRAY_FROM_TO(Rays::Color)
 
 #define THIS  to<Rays::Color*>(self)
 
@@ -23,34 +20,13 @@ RUCY_DEF_ALLOC(alloc, klass)
 RUCY_END
 
 static
-RUCY_DEFN(setup)
+RUCY_DEFN(initialize)
 {
 	CHECK;
 	check_arg_count(__FILE__, __LINE__, "Color#initialize", argc, 0, 1, 2, 3, 4);
 
-	if (argc == 0) return self;
-
-	switch (argc)
-	{
-		case 1:
-			*THIS = Rays::Color(to<float>(argv[0]));
-			break;
-
-		case 2:
-			*THIS = Rays::Color(to<float>(argv[0]), to<float>(argv[1]));
-			break;
-
-		case 3:
-			*THIS = Rays::Color(
-				to<float>(argv[0]), to<float>(argv[1]), to<float>(argv[2]));
-			break;
-
-		case 4:
-			*THIS = Rays::Color(
-				to<float>(argv[0]), to<float>(argv[1]),
-				to<float>(argv[2]), to<float>(argv[3]));
-			break;
-	}
+	if (argc >= 1)
+		*THIS = to<Rays::Color>(argc, argv);
 
 	return self;
 }
@@ -138,6 +114,84 @@ RUCY_DEF0(get_alpha)
 RUCY_END
 
 
+typedef std::map<Rays::String, Rays::Color> ColorMap;
+
+static ColorMap&
+get_color_map ()
+{
+	static ColorMap map;
+	if (map.empty())
+	{
+		map["no"]          =
+		map["none"]        =
+		map["transp"]      =
+		map["transparent"] = Rays::gray(0, 0);
+
+		map["black"]      = Rays::rgb8(  0,   0,   0);
+		map["white"]      = Rays::rgb8(255, 241, 232);
+		map["gray"]       =
+		map["lightgray"]  = Rays::rgb8(194, 195, 199);
+		map["darkgray"]   = Rays::rgb8( 95,  87,  79);
+		map["brown"]      = Rays::rgb8(171,  82,  54);
+		map["red"]        = Rays::rgb8(255,   0,  77);
+		map["orange"]     = Rays::rgb8(255, 163,   0);
+		map["yellow"]     = Rays::rgb8(255, 236,  39);
+		map["green"]      = Rays::rgb8(  0, 228,  54);
+		map["darkgreen"]  = Rays::rgb8(  0, 135,  81);
+		map["blue"]       = Rays::rgb8( 41, 173, 255);
+		map["darkblue"]   = Rays::rgb8( 29,  43,  83);
+		map["indigo"]     = Rays::rgb8(131, 118, 156);
+		map["pink"]       = Rays::rgb8(255, 119, 168);
+		map["peach"]      = Rays::rgb8(255, 204, 170);
+		map["darkpurple"] = Rays::rgb8(126,  37,  83);
+	}
+	return map;
+}
+
+static const Rays::String
+to_color_name (const char* name)
+{
+	return Rays::String(name).downcase();
+}
+
+static const Rays::Color&
+find_color (const char* name)
+{
+	assert(name);
+
+	const ColorMap& map = get_color_map();
+	ColorMap::const_iterator it = map.find(to_color_name(name));
+	if (it == map.end())
+		argument_error(__FILE__, __LINE__, "color '%s' is not found.", name);
+
+	return it->second;
+}
+
+static
+RUCY_DEFN(hsv)
+{
+	check_arg_count(__FILE__, __LINE__, "Color.hsv", argc, 3, 4);
+
+	float h = to<float>(argv[0]);
+	float s = to<float>(argv[1]);
+	float v = to<float>(argv[2]);
+	if (argc >= 4)
+		return value(Rays::hsv(h, s, v, to<float>(argv[3])));
+	else
+		return value(Rays::hsv(h, s, v));
+}
+RUCY_END
+
+static
+RUCY_DEFN(set_palette_color)
+{
+	check_arg_count(__FILE__, __LINE__, "Color.set_palette_color", argc, 2, 3, 4, 5);
+
+	get_color_map()[to_color_name(argv[0].c_str())] = to<Rays::Color>(argc - 1, &argv[1]);
+}
+RUCY_END
+
+
 static Class cColor;
 
 void
@@ -147,16 +201,18 @@ Init_color ()
 
 	cColor = mRays.define_class("Color");
 	cColor.define_alloc_func(alloc);
-	cColor.define_private_method("setup", setup);
+	cColor.define_private_method("initialize",      initialize);
 	cColor.define_private_method("initialize_copy", initialize_copy);
-	cColor.define_method("red=", set_red);
-	cColor.define_method("red", get_red);
+	cColor.define_method("red=",   set_red);
+	cColor.define_method("red",    get_red);
 	cColor.define_method("green=", set_green);
-	cColor.define_method("green", get_green);
-	cColor.define_method("blue=", set_blue);
-	cColor.define_method("blue", get_blue);
+	cColor.define_method("green",  get_green);
+	cColor.define_method("blue=",  set_blue);
+	cColor.define_method("blue",   get_blue);
 	cColor.define_method("alpha=", set_alpha);
-	cColor.define_method("alpha", get_alpha);
+	cColor.define_method("alpha",  get_alpha);
+	cColor.define_module_function("hsv", hsv);
+	cColor.define_module_function("set_palette_color", set_palette_color);
 }
 
 
@@ -164,31 +220,155 @@ namespace Rucy
 {
 
 
+	static int
+	char2hex (char c)
+	{
+		     if ('0' <= c && c <= '9') return      c - '0';
+		else if ('a' <= c && c <= 'f') return 10 + c - 'a';
+		else if ('A' <= c && c <= 'F') return 10 + c - 'A';
+		else                           return -1;
+	}
+
+	static bool
+	parse_channel (float* channel, const char* str, size_t nchars, size_t index)
+	{
+		assert(channel && str && 1 <= nchars && nchars <= 2 && 0 <= index && index <= 3);
+
+		const char* p = str + index * nchars;
+
+		if (nchars == 1)
+		{
+			int c0 = char2hex(p[0]);
+			if (c0 < 0)
+				return false;
+
+			assert(c0 < 16);
+
+			*channel = c0 / 15.f;
+			return true;
+		}
+		else
+		{
+			int c0 = char2hex(p[0]);
+			int c1 = char2hex(p[1]);
+			if (c0 < 0 || c1 < 0)
+				return false;
+
+			assert(c0 < 16 && c1 < 16);
+
+			*channel = (c0 * 16 + c1) / 255.f;
+			return true;
+		}
+	}
+
+	static bool
+	parse_string (Rays::Color* color, const char* str)
+	{
+		assert(color && str);
+
+		if (*str != '#') return false;
+		++str;
+
+		size_t len = strlen(str);
+		switch (len)
+		{
+			case 3:
+			case 6:
+			{
+				size_t nchars = len / 3;
+
+				float r, g, b;
+				if (
+					!parse_channel(&r, str, nchars, 0) ||
+					!parse_channel(&g, str, nchars, 1) ||
+					!parse_channel(&b, str, nchars, 2))
+				{
+					return false;
+				}
+
+				color->reset(r, g, b);
+				break;
+			}
+
+			case 4:
+			case 8:
+			{
+				size_t nchars = len / 4;
+
+				float r, g, b, a;
+				if (
+					!parse_channel(&r, str, nchars, 0) ||
+					!parse_channel(&g, str, nchars, 1) ||
+					!parse_channel(&b, str, nchars, 2) ||
+					!parse_channel(&a, str, nchars, 3))
+				{
+					return false;
+				}
+
+				color->reset(r, g, b, a);
+				break;
+			}
+
+			default: return false;
+		}
+
+		return true;
+	}
+
+	static Rays::Color
+	str2color (const char* str)
+	{
+		if (!str)
+			argument_error(__FILE__, __LINE__);
+
+		Rays::String str_ = str;
+		str_ = str_.strip();
+
+		Rays::Color color;
+		if (parse_string(&color, str_.c_str()))
+			return color;
+		else
+			return find_color(str_.c_str());
+	}
+
 	template <> Rays::Color
-	value_to<Rays::Color> (Value value, bool convert)
+	value_to<Rays::Color> (int argc, const Value*argv, bool convert)
 	{
+		if (argc == 1 && argv->is_array())
+		{
+			argc = argv->size();
+			argv = argv->as_array();
+		}
+
+		assert(argc == 0 || (argc > 0 && argv));
+
 		if (convert)
 		{
-			if (value.is_i() || value.is_f())
-				return Rays::Color(value.as_f(true));
-			else if (value.is_array())
+			if (argc == 0)
+				return Rays::Color();
+			else if (argv->is_nil())
+				return str2color("none");
+			else if (argv->is_s() || argv->is_sym())
+				return str2color(argv[0].c_str());
+			else if (argv->is_num())
 			{
-				int size = value.size();
-				if (size <= 0 || 4 < size)
-					Rucy::argument_error(__FILE__, __LINE__);
-
-				Value* a = value.as_array();
-				switch (size)
+				switch (argc)
 				{
-					case 1: return Rays::Color(a[0].as_f(true));
-					case 2: return Rays::Color(a[0].as_f(true), a[1].as_f(true));
-					case 3: return Rays::Color(a[0].as_f(true), a[1].as_f(true), a[2].as_f(true));
-					case 4: return Rays::Color(a[0].as_f(true), a[1].as_f(true), a[2].as_f(true), a[3].as_f(true));
+					#define V(i) argv[i].as_f(true)
+					case 1: return Rays::Color(V(0));
+					case 2: return Rays::Color(V(0), V(1));
+					case 3: return Rays::Color(V(0), V(1), V(2));
+					case 4: return Rays::Color(V(0), V(1), V(2), V(3));
+					#undef V
+					default: argument_error(__FILE__, __LINE__, "invalid array size.");
 				}
 			}
 		}
 
-		return value_to<Rays::Color&>(value, convert);
+		if (argc != 1)
+			argument_error(__FILE__, __LINE__);
+
+		return value_to<Rays::Color&>(*argv, convert);
 	}