rubex 0.1 → 0.1.1

data/lib/rubex/data_type/c_array.rb

@@ -0,0 +1,33 @@
+module Rubex
+  module DataType
+    class CArray
+      include Helpers
+      # Dimension of the array
+      attr_reader :dimension
+      # Type of elements stored in array
+      attr_reader :type # FIXME: Make this base_type to make it more explicit.
+
+      def initialize(dimension, type)
+        @dimension = dimension
+        @type = type
+      end
+
+      def carray?
+        true
+      end
+
+      def <=>(other)
+        @type <=>
+          if self.class == other.class
+            other.type
+          else
+            other
+          end
+      end
+
+      def base_type
+        @type
+      end
+    end
+  end
+end

data/lib/rubex/data_type/c_function.rb

@@ -0,0 +1,23 @@
+module Rubex
+  module DataType
+    class CFunction
+      include Helpers
+      attr_reader :name, :type, :c_name
+      attr_accessor :scope, :arg_list
+
+      # FIXME: all attributes should be initialized upon class creation to maintain
+      # sanity and consistency.
+      def initialize(name, c_name, arg_list, type, scope)
+        @name = name
+        @c_name = c_name
+        @arg_list = arg_list
+        @type = type
+        @scope = scope
+      end
+
+      def c_function?
+        true
+      end
+    end
+  end
+end

data/lib/rubex/data_type/c_ptr.rb

@@ -0,0 +1,71 @@
+module Rubex
+  module DataType
+    class CPtr
+      include Helpers
+      # The data type that this pointer is pointing to.
+      attr_reader :type
+
+      def initialize(type)
+        @type = type
+      end
+
+      def p_formatter
+        '%s' if char_ptr?
+      end
+
+      def cptr?
+        true
+      end
+
+      def to_s
+        base_type = @type.base_type
+        if base_type.c_function?
+          ptr = ptr_level
+
+          str = "#{base_type.type} (#{ptr} #{base_type.c_name})"
+          str << '(' + base_type.arg_list.map { |e| e.type.to_s }.join(',') + ')'
+        else
+          t = @type
+          str = '*'
+          if t.cptr?
+            str << '*'
+            t = t.type
+          end
+          str.prepend t.to_s
+          str
+        end
+      end
+
+      def base_type
+        return @type unless @type.is_a?(self.class)
+        @type.base_type
+      end
+
+      def ptr_level
+        temp = @type
+        ptr = '*'
+        while temp.cptr?
+          ptr << '*'
+          temp = @type.type
+        end
+
+        ptr
+      end
+
+      # from a Ruby function get a pointer to some value.
+      def from_ruby_object(arg)
+        return "StringValueCStr(#{arg})" if @type.char?
+        arg
+      end
+
+      def to_ruby_object(arg)
+        return "rb_str_new2(#{arg})" if @type.char?
+        arg
+      end
+
+      def <=>(_other)
+        -1
+      end
+    end
+  end
+end

data/lib/rubex/data_type/c_str.rb

@@ -0,0 +1,23 @@
+module Rubex
+  module DataType
+    class CStr
+      include Helpers
+
+      def cstr?
+        true
+      end
+
+      def p_formatter
+        '%s'
+      end
+
+      def from_ruby_object(arg)
+        "StringValueCStr(#{arg})"
+      end
+
+      def to_ruby_object(arg)
+        "rb_str_new_cstr(#{arg})"
+      end
+    end
+  end
+end

data/lib/rubex/data_type/c_struct_or_union.rb

@@ -0,0 +1,23 @@
+module Rubex
+  module DataType
+    class CStructOrUnion
+      include Helpers
+      attr_reader :kind, :name, :c_name, :scope
+
+      def initialize(kind, name, c_name, scope)
+        @kind = kind
+        @name = name
+        @c_name = c_name
+        @scope = scope
+      end
+
+      def struct_or_union?
+        true
+      end
+
+      def to_s
+        @c_name.to_s
+      end
+    end
+  end
+end

data/lib/rubex/data_type/char.rb

@@ -0,0 +1,30 @@
+module Rubex
+  module DataType
+    class Char
+      include Helpers
+      def to_s
+        'char'
+      end
+
+      def to_ruby_object(arg, _literal = false)
+        "#{Rubex::C_FUNC_CHAR2RUBYSTR}(#{arg})"
+      end
+
+      def from_ruby_object(arg)
+        "(char)NUM2INT(#{arg})"
+      end
+
+      def p_formatter
+        '%c'
+      end
+
+      def char?
+        true
+      end
+
+      def <=>(other)
+        other.char? ? 0 : 1
+      end
+    end
+  end
+end

data/lib/rubex/data_type/f_32.rb

@@ -0,0 +1,38 @@
+module Rubex
+  module DataType
+    class F32
+      include FloatHelpers
+      def to_s
+        'float'
+      end
+
+      def to_ruby_object(arg)
+        "rb_float_new((double)(#{arg}))"
+      end
+
+      def from_ruby_object(arg)
+        "(float)NUM2DBL(#{arg})"
+      end
+
+      def float32?
+        true
+      end
+
+      def p_formatter
+        '%f'
+      end
+
+      def <=>(other)
+        if other.char? || other.int8? || other.int16? || other.int32? ||
+           other.int64?     || other.int? || other.uint8? || other.uint16? ||
+           other.uint32?    || other.uint64?
+          1
+        elsif other.float32?
+          0
+        else # other is float64
+          -1
+        end
+      end
+    end
+  end
+end

data/lib/rubex/data_type/f_64.rb

@@ -0,0 +1,38 @@
+module Rubex
+  module DataType
+    class F64
+      include FloatHelpers
+      def to_s
+        'double'
+      end
+
+      def to_ruby_object(arg)
+        "rb_float_new(#{arg})"
+      end
+
+      def from_ruby_object(arg)
+        "NUM2DBL(#{arg})"
+      end
+
+      def float64?
+        true
+      end
+
+      def p_formatter
+        '%f'
+      end
+
+      def <=>(other)
+        if other.char? || other.int8? || other.int16? || other.int32? ||
+           other.int64?     || other.int?    || other.uint8? || other.uint16? ||
+           other.uint32?    || other.uint64? || other.float32?
+          1
+        elsif other.float64?
+          0
+        else
+          -1
+        end
+      end
+    end
+  end
+end

data/lib/rubex/data_type/int.rb

@@ -0,0 +1,32 @@
+module Rubex
+  module DataType
+    class Int
+      include IntHelpers
+      def to_s
+        'int'
+      end
+
+      def from_ruby_object(arg)
+        "NUM2INT(#{arg})"
+      end
+
+      def int?
+        true
+      end
+
+      def p_formatter
+        '%d'
+      end
+
+      def <=>(other)
+        if other.char? || other.int8? || other.int16?
+          1
+        elsif other.int? || other.int32?
+          0
+        else # other is int64 or greater
+          -1
+        end
+      end
+    end
+  end
+end

data/lib/rubex/data_type/int/c_boolean.rb

@@ -0,0 +1,13 @@
+module Rubex
+  module DataType
+    class CBoolean < Int
+      def cbool?
+        true
+      end
+
+      def to_ruby_object(arg)
+        Rubex::C_MACRO_INT2BOOL + '(' + arg + ')'
+      end
+    end
+  end
+end

data/lib/rubex/data_type/int_16.rb

@@ -0,0 +1,32 @@
+module Rubex
+  module DataType
+    class Int16
+      include IntHelpers
+      def to_s
+        'int16_t'
+      end
+
+      def from_ruby_object(arg)
+        "(int16_t)NUM2INT(#{arg})"
+      end
+
+      def int16?
+        true
+      end
+
+      def p_formatter
+        '%d'
+      end
+
+      def <=>(other)
+        if other.char? || other.int8?
+          1
+        elsif other.int16?
+          0
+        else
+          -1
+        end
+      end
+    end
+  end
+end

data/lib/rubex/data_type/int_32.rb

@@ -0,0 +1,32 @@
+module Rubex
+  module DataType
+    class Int32
+      include IntHelpers
+      def to_s
+        'int32_t'
+      end
+
+      def from_ruby_object(arg)
+        "(int32_t)NUM2INT(#{arg})"
+      end
+
+      def int32?
+        true
+      end
+
+      def p_formatter
+        '%d'
+      end
+
+      def <=>(other)
+        if other.char? || other.int8? || other.int16?
+          1
+        elsif other.int32? || other.int?
+          0
+        else
+          -1
+        end
+      end
+    end
+  end
+end

data/lib/rubex/data_type/int_64.rb

@@ -0,0 +1,36 @@
+module Rubex
+  module DataType
+    class Int64
+      include IntHelpers
+      def to_s
+        'int64_t'
+      end
+
+      def to_ruby_object(arg)
+        "LONG2NUM(#{arg})"
+      end
+
+      def from_ruby_object(arg)
+        "(int64_t)NUM2LONG(#{arg})"
+      end
+
+      def p_formatter
+        '%ld'
+      end
+
+      def int64?
+        true
+      end
+
+      def <=>(other)
+        if other.char? || other.int8? || other.int16? || other.int32? || other.int?
+          1
+        elsif other.int64?
+          0
+        else
+          -1
+        end
+      end
+    end
+  end
+end

data/lib/rubex/data_type/int_8.rb

@@ -0,0 +1,33 @@
+module Rubex
+  module DataType
+    class Int8
+      include IntHelpers
+
+      def to_s
+        'int8_t'
+      end
+
+      def from_ruby_object(arg)
+        "(int8_t)NUM2INT(#{arg})"
+      end
+
+      def int8?
+        true
+      end
+
+      def p_formatter
+        '%d'
+      end
+
+      def <=>(other)
+        if other.char?
+          1
+        elsif other.int8?
+          0
+        else
+          -1
+        end
+      end
+    end
+  end
+end