Method: Fiddle::ValueUtil#wrap_arg

Defined in:
lib/fiddle/value.rb

#wrap_arg(arg, ty, funcs = [], &block) ⇒ Object 



55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
 
# File 'lib/fiddle/value.rb', line 55

def wrap_arg(arg, ty, funcs = [], &block)
  funcs ||= []
  case arg
  when nil
    return 0
  when Pointer
    return arg.to_i
  when IO
    case ty
    when TYPE_VOIDP
      return Pointer[arg].to_i
    else
      return arg.to_i
    end
  when Function
    if( block )
      arg.bind_at_call(&block)
      funcs.push(arg)
    elsif !arg.bound?
      raise(RuntimeError, "block must be given.")
    end
    return arg.to_i
  when String
    if( ty.is_a?(Array) )
      return arg.unpack('C*')
    else
      case SIZEOF_VOIDP
      when SIZEOF_LONG
        return [arg].pack("p").unpack1("l!")
      else
        if defined?(SIZEOF_LONG_LONG) and
          SIZEOF_VOIDP == SIZEOF_LONG_LONG
          return [arg].pack("p").unpack1("q")
        else
          raise(RuntimeError, "sizeof(void*)?")
        end
      end
    end
  when Float, Integer
    return arg
  when Array
    if( ty.is_a?(Array) ) # used only by struct
      case ty[0]
      when TYPE_VOIDP
        return arg.collect{|v| Integer(v)}
      when TYPE_CHAR
        if( arg.is_a?(String) )
          return val.unpack('C*')
        end
      end
    end
    return arg
  else
    if( arg.respond_to?(:to_ptr) )
      return arg.to_ptr.to_i
    else
      begin
        return Integer(arg)
      rescue
        raise(ArgumentError, "unknown argument type: #{arg.class}")
      end
    end
  end
end