1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
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
|
#! /usr/bin/env ruby
# -*- coding: UTF-8 -*-
#
require 'ffi'
#
module Efl
#
VERSION = '0.0.10'
#
module Native
#
extend FFI::Library
#
def self.attach_fcts fcts
fcts.each do |func|
begin
attach_function(*func)
rescue Object => e
puts "Could not attach #{func} #{e.message}"
end
end
end
#
class << self
# keep
alias :ffi_lib_orig :ffi_lib
def ffi_lib *names
@all_ffi_libs||=[]
@all_ffi_libs += ffi_lib_orig(names)
@all_ffi_libs.uniq!
end
def find_variable name
@all_ffi_libs.each do |lib|
address = lib.find_variable name
return address if not address.nil?
end
return nil
end
end
#
class VersionStruct < FFI::Struct
layout :major, :int,
:minor, :int,
:micro, :int,
:revision, :int
def full
[:major,:minor,:micro,:revision].collect { |e| self[e].to_s }.join '.'
end
end
end
#
module MethResolver
def self.resolve mod, meth, prefix
meth_s = meth.to_s
if meth_s =~/^(.*)=$/
meth_s = $1+'_set'
args_s = '*args[0]'
elsif meth_s =~/^(.*)\?$/
meth_s = $1+'_get'
args_s = '*args'
else
args_s = '*args'
end
sym = (
if Efl::Native.respond_to? prefix+meth_s
prefix+meth_s
elsif Efl::Native.respond_to? meth_s
meth_s
elsif Efl::Native.respond_to? prefix+meth_s+'_get'
prefix+meth_s+'_get'
elsif Efl::Native.respond_to? meth_s+'_get'
meth_s+'_get'
else
raise NameError.new "#{mod.name}.#{meth_s} (#{meth})"
end
)
mod.module_eval "def self.#{meth} *args, █ r=Efl::Native.#{sym}(#{args_s}); yield r if block_given?; r; end"
sym
end
end
end
#
# EOF
|
