rucy 0.1.12 → 0.1.13

data/include/rucy/extension.h.erb

@@ -4,8 +4,6 @@
 #define __RUCY_EXTENSION_H__
 
 
-#include <typeinfo>
-#include <boost/dynamic_bitset.hpp>
 #include <xot/ref.h>
 #include <xot/string.h>
 #include <rucy/rucy.h>
@@ -23,9 +21,18 @@
 #define RUCY_DECLARE_VALUE_TO(native_class) \
 	namespace Rucy \
 	{ \
-		template <> native_class* value_to<native_class*> (Value value, bool); \
-		template <> native_class& value_to<native_class&> (Value value, bool convert); \
-		template <> native_class  value_to<native_class>  (Value value, bool convert); \
+		template <>       native_class* value_to<      native_class*> (Value value, bool); \
+		template <> const native_class* value_to<const native_class*> (Value value, bool); \
+		template <>       native_class& value_to<      native_class&> (Value value, bool convert); \
+		template <> const native_class& value_to<const native_class&> (Value value, bool convert); \
+	}
+
+#define RUCY_DECLARE_VALUE_OR_ARRAY_TO(native_class) \
+	RUCY_DECLARE_VALUE_TO(native_class) \
+	namespace Rucy \
+	{ \
+		template <> native_class value_to<native_class> (Value value, bool convert); \
+		template <> native_class value_to<native_class> (int argc, const Value* argv, bool convert); \
 	}
 
 #define RUCY_DECLARE_WRAPPER_VALUE_FROM(native_class) \
@@ -38,7 +45,8 @@
 #define RUCY_DECLARE_WRAPPER_VALUE_TO(native_class) \
 	namespace Rucy \
 	{ \
-		template <> native_class* value_to<native_class*> (Value value, bool convert); \
+		template <>       native_class* value_to<      native_class*> (Value value, bool convert); \
+		template <> const native_class* value_to<const native_class*> (Value value, bool convert); \
 	}
 
 #define RUCY_DEFINE_VALUE_FROM(native_class) \
@@ -64,6 +72,11 @@
 		{ \
 			return get_type_ptr<native_class>(value, get_ruby_class<native_class>()); \
 		} \
+		template <> const native_class* \
+		value_to<const native_class*> (Value value, bool convert) \
+		{ \
+			return (const native_class*) value_to<native_class*>(value, convert); \
+		} \
 		template <> native_class& \
 		value_to<native_class&> (Value value, bool convert) \
 		{ \
@@ -72,6 +85,25 @@
 				rucy_error(__FILE__, __LINE__, "failed to convert from/to %s.", #native_class); \
 			return *obj; \
 		} \
+		template <> const native_class& \
+		value_to<const native_class&> (Value value, bool convert) \
+		{ \
+			return (const native_class&) value_to<native_class&>(value, convert); \
+		} \
+	}
+
+#define RUCY_DEFINE_VALUE_OR_ARRAY_TO(native_class) \
+	RUCY_DEFINE_VALUE_TO(native_class) \
+	namespace Rucy \
+	{ \
+		template <> native_class \
+		value_to<native_class> (Value value, bool convert) \
+		{ \
+			if (value.is_array()) \
+				return value_to<native_class>(value.size(), value.as_array(), convert); \
+			else \
+				return value_to<native_class>(1, &value, convert); \
+		} \
 	}
 
 #define RUCY_DEFINE_WRAPPER_VALUE_FROM(native_class) \
@@ -86,10 +118,10 @@
 		value (native_class* obj, Value klass) \
 		{ \
 			if (!obj) return nil(); \
-			Value* pval = (Value*) obj->rucy_value(); \
-			if (!pval) return new_ref(klass, obj); \
-			if (pval->is_nil()) *pval = new_wrapper(klass, obj); \
-			return *pval; \
+			GlobalValue* wrapped = (GlobalValue*) obj->rucy_wrapper_value(); \
+			if (!wrapped) return new_ref(klass, obj); \
+			if (wrapped->is_nil()) *wrapped = new_wrapper(klass, obj); \
+			return *wrapped; \
 		} \
 	}
 
@@ -97,10 +129,15 @@
 	namespace Rucy \
 	{ \
 		template <> native_class* \
-		value_to<native_class*> (Value value, bool convert) \
+		value_to<native_class*> (Value value, bool) \
 		{ \
 			return get_type_ptr<native_class>(value, get_ruby_class<native_class>()); \
 		} \
+		template <> const native_class* \
+		value_to<const native_class*> (Value value, bool convert) \
+		{ \
+			return (const native_class*) value_to<native_class*>(value, convert); \
+		} \
 	}
 
 #define RUCY_DECLARE_VALUE_FROM_TO(native_class) \
@@ -115,6 +152,18 @@
 	RUCY_DECLARE_VALUE_FROM_TO(native_class) \
 	RUCY_DEFINE_VALUE_FROM_TO(native_class)
 
+#define RUCY_DECLARE_VALUE_OR_ARRAY_FROM_TO(native_class) \
+	RUCY_DECLARE_VALUE_FROM(native_class) \
+	RUCY_DECLARE_VALUE_OR_ARRAY_TO(native_class)
+
+#define RUCY_DEFINE_VALUE_OR_ARRAY_FROM_TO(native_class) \
+	RUCY_DEFINE_VALUE_FROM(native_class) \
+	RUCY_DEFINE_VALUE_OR_ARRAY_TO(native_class)
+
+#define RUCY_VALUE_OR_ARRAY_FROM_TO(native_class) \
+	RUCY_DECLARE_VALUE_OR_ARRAY_FROM_TO(native_class) \
+	RUCY_DEFINE_VALUE_OR_ARRAY_FROM_TO(native_class)
+
 #define RUCY_DECLARE_WRAPPER_VALUE_FROM_TO(native_class) \
 	RUCY_DECLARE_WRAPPER_VALUE_FROM(native_class) \
 	RUCY_DECLARE_WRAPPER_VALUE_TO(native_class)
@@ -128,25 +177,8 @@
 	RUCY_DEFINE_WRAPPER_VALUE_FROM_TO(native_class)
 
 
-#define RUCY_OVERRIDE_BEGIN(super_class) \
-	typedef super_class Super; \
-	enum { OVERRIDE_ID_FIRST = super_class::OVERRIDE_ID_LAST - 1,
-
-#define RUCY_OVERRIDE_END \
-	OVERRIDE_ID_LAST };
-
-#define RUCY_OVERRIDE_ID(name) \
-	OID_##name,
-
-#define RUCY_IS_OVERRIDABLE() \
-	this->is_overridable()
-
-#define RUCY_IS_OVERRIDDEN(name) \
-	this->is_overridden(name, OID_##name)
-
-
 #define RUCY_TRY \
-	RubyValue RUCY__rubyexception__ = nil(); \
+	Rucy::RubyValue RUCY__rubyexception__ = Rucy::nil(); \
 	int RUCY__rubyjumptag__ = 0; \
 	 \
 	goto RUCY__ruby_try_start__; \
@@ -207,35 +239,25 @@
 
 
 #define RUCY_DEF_ALLOC(name, klass) \
-	RubyValue name (Value klass) \
+	Rucy::RubyValue name (Rucy::Value klass) \
 	{ \
 		RUCY_TRY
 
 #define RUCY_DEFN(name) \
-	RubyValue name (int argc, const Value* argv, Value self) \
+	Rucy::RubyValue name (int argc, const Rucy::Value* argv, Rucy::Value self) \
 	{ \
 		RUCY_TRY
 
 %	NTIMES.each do |n|
 #define RUCY_DEF<%= n %>(name<%= params(n) {|i| ", v#{i}"} %>) \
-	RubyValue name (Value self<%= params(n) {|i| ", Value v#{i}"} %>) \
+	Rucy::RubyValue name (Rucy::Value self<%= params(n) {|i| ", Rucy::Value v#{i}"} %>) \
 	{ \
 		RUCY_TRY
 %	end
 
-#define RUCY_DEF_clear_override_flags(name, native_class) \
-	RUCY_DEF0(name) \
-	{ \
-		RUCY_CHECK_OBJ(native_class, self); \
-		ClassWrapper<native_class>* obj = \
-			dynamic_cast<ClassWrapper<native_class>*>(to<native_class*>(self)); \
-		if (obj) obj->clear_override_flags(); \
-	} \
-	RUCY_END
-
 #define RUCY_END \
 		RUCY_CATCH \
-		return nil(); \
+		return Rucy::nil(); \
 	}
 
 
@@ -251,12 +273,13 @@
 #define RUCY_CHECK_OBJECT(native_class, obj) \
 	do \
 	{ \
-		native_class* p = Rucy::get_type_ptr<native_class>(obj, get_ruby_class<native_class>()); \
+		native_class* p = \
+			Rucy::get_type_ptr<native_class>(obj, Rucy::get_ruby_class<native_class>()); \
 		if (!p || !*p) Rucy::invalid_object_error(__FILE__, __LINE__); \
 	} \
 	while(0)
 
-#define RUCY_WRAPPER_CALL(native_class, obj, fun) \
+#define RUCY_CALL_SUPER(obj, fun) \
 	((obj)->rucy_disable_override() ? (obj)->fun : (obj)->fun)
 
 
@@ -276,15 +299,15 @@ namespace Rucy
 	template <typename T> Class get_ruby_class ();
 
 
-	template <typename T>
-	class ClassWrapper : public T
+	template <typename RefCountableT>
+	class ClassWrapper : public RefCountableT
 	{
 
-		typedef ClassWrapper This;
+		typedef ClassWrapper  This;
 
-		public:
+		typedef RefCountableT RucyWrapped;
 
-			typedef T RucyWrapped;
+		public:
 
 			GlobalValue value;
 
@@ -293,47 +316,21 @@ namespace Rucy
 			{
 			}
 
-			virtual void retain (void* by_ruby_value = NULL) const
+			void retain (intptr_t by_ruby) const override
 			{
-				if (!by_ruby_value)
-				{
-					refc_set_aux(refc_aux() + 1);
-					if (refc_aux() == 1) value.gc(false);
-				}
-
+				if (!by_ruby) value.disable_gc();
 				RucyWrapped::retain();
 			}
 
-			virtual void release (void* by_ruby_value = NULL) const
+			void release (intptr_t by_ruby) const override
 			{
-				if (!by_ruby_value && refc_aux() > 0)
-				{
-					refc_set_aux(refc_aux() - 1);
-					if (refc_aux() == 0) value.gc(true);
-				}
-
+				if (!by_ruby) value.enable_gc();
 				RucyWrapped::release();
 			}
 
-			virtual void clear_override_flags ()
-			{
-				override_flags.reset();
-			}
-
 			virtual bool is_overridable () const
 			{
-				if (!overridable)
-				{
-					overridable = true;
-					return false;
-				}
-
-				return true;
-			}
-
-			virtual bool is_overridden (const Symbol& name, uint id) const
-			{
-				if (id <= OVERRIDE_ID_UNKNOWN)
+				if (value.is_nil())
 					return false;
 
 				if (!overridable)
@@ -342,111 +339,27 @@ namespace Rucy
 					return false;
 				}
 
-				bool checked = false, overridden = false;
-				get_override_flag(&checked, &overridden, id);
-				if (checked) return overridden;
-
-				overridden = check_overridden(name);
-				if (!set_override_flag(id, true, overridden))
-					return false;
-
-				return overridden;
+				return true;
 			}
 
-			virtual void* rucy_value () const
+			void* rucy_wrapper_value () const override
 			{
 				return (void*) &value;
 			}
 
-			virtual bool rucy_disable_override () const
+			bool rucy_disable_override () const override
 			{
 				overridable = false;
 				return true;
 			}
 
-		protected:
-
-			enum
-			{
-
-				OVERRIDE_ID_UNKNOWN = 0,
-
-				OVERRIDE_ID_LAST,
-
-				OVERRIDE_ID_MAX = 256
-
-			};
-
-			virtual ushort refc_aux () const
-			{
-				return RucyWrapped::refc_aux();
-			}
-
-			virtual void refc_set_aux (ushort aux) const
-			{
-				RucyWrapped::refc_set_aux(aux);
-			}
-
 		private:
 
-			mutable boost::dynamic_bitset<> override_flags;
-
 			mutable bool overridable;
 
-			bool check_overridden (const Symbol& name) const
-			{
-				RUCY_SYM(method);
-				RUCY_SYM(owner);
-				RUCY_SYM(instance_methods);
-				RUCY_SYM_Q(include);
-				RUCY_SYM(clear_override_flags);
-				return !value
-					.call(method, name.value())
-					.call(owner)
-					.call(instance_methods, false)
-					.call(include, clear_override_flags.value());
-			}
-
-			void get_override_flag (bool* checked, bool* overridden, uint id) const
-			{
-				assert(checked || overridden);
-
-				int checked_pos    = id2index(id);
-				int overridden_pos = checked_pos + 1;
-				bool valid = 0 <= checked_pos && overridden_pos < (int) override_flags.size();
-				if (checked)    *checked    = valid ? override_flags[checked_pos]    : false;
-				if (overridden) *overridden = valid ? override_flags[overridden_pos] : false;
-			}
-
-			bool set_override_flag (uint id, bool checked, bool overridden) const
-			{
-				assert(id < OVERRIDE_ID_MAX);
-
-				int checked_pos = id2index(id);
-				if (checked_pos < 0) return true;
-
-				int overridden_pos = checked_pos + 1;
-				if (overridden_pos >= (int) override_flags.size())
-					override_flags.resize(overridden_pos + 1);
-
-				override_flags[checked_pos]    = checked;
-				override_flags[overridden_pos] = overridden;
-				return true;
-			}
-
-			int id2index (uint id) const
-			{
-				return (id - 1) * 2;
-			}
-
 	};// ClassWrapper
 
 
-	template <typename T> inline void mark_type (void* p)
-	{
-		if (p) ((T*) p)->mark();
-	}
-
 	template <typename T> inline void delete_type (void* p)
 	{
 		delete (T*) p;
@@ -454,12 +367,12 @@ namespace Rucy
 
 	template <typename T> inline void release_ref (void* p)
 	{
-		if (p) ((T*) p)->release((void*) true);// 'true' means by-ruby-value.
+		if (p) ((T*) p)->release();
 	}
 
 	template <typename T> inline void release_wrapper (void* p)
 	{
-		if (p) ((T*) p)->Xot::template RefCountable<>::release();
+		if (p) ((T*) p)->release(true);
 	}
 
 
@@ -485,7 +398,7 @@ namespace Rucy
 		RUBY_DATA_FUNC mark = NULL,
 		RUBY_DATA_FUNC free = release_ref<T>)
 	{
-		if (ptr) ptr->retain((void*) true);// 'true' means by-ruby-value
+		if (ptr) ptr->retain();
 		return new_type(klass, ptr, mark, free);
 	}
 
@@ -502,7 +415,7 @@ namespace Rucy
 		RUBY_DATA_FUNC mark = NULL,
 		RUBY_DATA_FUNC free = release_wrapper<T>)
 	{
-		if (ptr) ptr->Xot::template RefCountable<>::retain();
+		if (ptr) ptr->retain(true);
 		return new_type(klass, ptr, mark, free);
 	}
 

data/include/rucy/value.h.erb

@@ -41,6 +41,8 @@ namespace Rucy
 
 			bool is_f () const;
 
+			bool is_num () const;
+
 			bool is_s () const;
 
 			bool is_sym () const;
@@ -120,9 +122,9 @@ namespace Rucy
 
 			Value unshift (Value obj);
 
-			      Value& operator [] (int i);
+			      Value& operator [] (size_t i);
 
-			const Value& operator [] (int i) const;
+			const Value& operator [] (size_t i) const;
 
 			// String
 
@@ -134,6 +136,8 @@ namespace Rucy
 
 			int size () const;
 
+			bool empty () const;
+
 		protected:
 
 			RubyValue val;
@@ -144,7 +148,9 @@ namespace Rucy
 	class GlobalValue : public Value
 	{
 
-		typedef Value Super;
+		typedef       Value Super;
+
+		typedef GlobalValue This;
 
 		public:
 
@@ -170,24 +176,24 @@ namespace Rucy
 
 			GlobalValue (const Value& v, bool gc = false);
 
-			GlobalValue (const GlobalValue& obj, bool gc = false);
+			GlobalValue (const This& obj, bool gc = false);
 
 			GlobalValue& operator = (const Value& v);
 
+			GlobalValue& operator = (const This& obj);
+
 			~GlobalValue ();
 
-			void gc (bool enable) const;
+			void  enable_gc () const;
 
-		private:
+			void disable_gc () const;
 
-			mutable short gc_disable_count;
+		private:
 
-			mutable bool gc_guarded;
+			mutable int gc_disable_count;
 
 			void init (bool gc);
 
-			void update_guard () const;
-
 	};// GlobalValue
 
 
@@ -224,21 +230,30 @@ namespace Rucy
 	Value value (const char* s, size_t len);
 
 	Value value (size_t size, const Value* array);
-
-	Value value (void* ptr);
-%	(1..10).each do |n|
+%	(1..16).each do |n|
 
 	Value array (<%= params(n, ', ') {|i| "Value v#{i}"} %>);
 %	end
 
 
-	template <typename T>        T value_to (Value obj, bool convert = true);
+	template <typename T> T
+	value_to (Value obj, bool convert = true);
 
-	template <typename T> inline T       to (Value obj, bool convert = true)
+	template <typename T> inline T
+	to       (Value obj, bool convert = true)
 	{
 		return value_to<T>(obj, convert);
 	}
 
+	template <typename T> T
+	value_to (int argc, const Value* argv, bool convert = true);
+
+	template <typename T> inline T
+	to       (int argc, const Value* argv, bool convert = true)
+	{
+		return value_to<T>(argc, argv, convert);
+	}
+
 	template <typename T> inline T Value::as (bool convert) const
 	{
 		return value_to<T>(*this, convert);

data/include/rucy.h

@@ -6,12 +6,15 @@
 
 #include <rucy/ruby.h>
 #include <rucy/rucy.h>
-#include <rucy/value.h>
 #include <rucy/exception.h>
+#include <rucy/debug.h>
+
+#include <rucy/value.h>
 #include <rucy/function.h>
 #include <rucy/module.h>
 #include <rucy/class.h>
 #include <rucy/symbol.h>
+
 #include <rucy/extension.h>
 
 

data/lib/rucy/module.rb

@@ -6,6 +6,8 @@ module Rucy
 
   module Module
 
+    module_function
+
     def name ()
       super.split('::')[-2]
     end
@@ -15,10 +17,10 @@ module Rucy
     end
 
     def root_dir (path = '')
-      File.expand_path "../../../#{path}", __FILE__
+      File.expand_path "../../#{path}", __dir__
     end
 
-    def include_dir ()
+    def inc_dir ()
       root_dir 'include'
     end
 
@@ -26,23 +28,6 @@ module Rucy
       root_dir 'lib'
     end
 
-    def task_dir ()
-      root_dir 'task'
-    end
-
-    def load_tasks (*names)
-      if names.empty?
-        Dir["#{task_dir}/**/*.rake"].each {|path| load path}
-      else
-        names.each do |name|
-          path = "#{task_dir}/#{name}.rake"
-          load path if File.exist? path
-        end
-      end
-    end
-
-    extend self
-
   end# Module
 
 

data/lib/rucy/rake.rb

@@ -0,0 +1,62 @@
+# -*- coding: utf-8 -*-
+
+
+require 'xot/rake'
+
+
+module Rucy
+
+
+  module Rake
+
+
+    def rdoc ()
+      env :RDOC, 'rdoc'# 'yardoc'
+    end
+
+    def rucy2rdoc ()
+      env :RUCY2RDOC, 'rucy2rdoc'
+    end
+
+    def generate_documents ()
+      rdocdir = ".doc/#{ext_dir}"
+      srcs    = FileList["#{ext_dir}/**/*.{#{src_exts.join ','}}"]
+      rdocs   = Hash[srcs.map{|path| [path, "#{rdocdir}/#{File.basename path}"]}]
+      out     = "#{doc_dir}/index.html"
+
+      alias_task :doc   => out
+      alias_task :clean => 'doc:clean'
+
+      namespace :doc do
+        desc "build documents"
+        file out => rdocs.values do
+          sh %( #{rdoc} #{rdocs.values.join ' '} )
+        end
+
+        rdocs.each do |(src, rdoc)|
+          file rdoc => [src, rdocdir] do
+            sh %( #{rucy2rdoc} #{src} > #{rdoc} )
+          end
+        end
+
+        directory rdocdir
+
+        task :clean do
+          sh %( rm -rf #{rdocdir} #{rdocs.values.join ' '} )
+        end
+      end
+    end
+
+
+  end# Rake
+
+
+end# Rucy
+
+
+include Rucy::Rake
+
+
+File.expand_path('../../bin', __dir__).tap do |path|
+  ENV['PATH'] += ":#{path}" unless ENV['PATH'].split(':').include?(path)
+end

data/rucy.gemspec

@@ -21,16 +21,14 @@ Gem::Specification.new do |s|
   s.description = 'This library helps you to develop Ruby Extension by C++.'
   s.version     = mod.version
 
-  s.authors  = %w[snori]
-  s.email    = 'snori@xord.org'
+  s.authors  = %w[xordog]
+  s.email    = 'xordog@gmail.com'
   s.homepage = "https://github.com/xord/rucy"
 
   s.platform              = Gem::Platform::RUBY
-  s.required_ruby_version = '>=1.9.0'
+  s.required_ruby_version = '~> 2'
 
-  s.add_runtime_dependency 'rake'
-  s.add_runtime_dependency 'xot'
-  s.add_development_dependency 'gemcutter'
+  s.add_runtime_dependency 'xot', '~> 0.1'
 
   s.files            = `git ls-files`.split $/
   s.executables      = s.files.grep(%r{^bin/}) {|f| File.basename f}