ffi-inliner 0.2.1

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
@@ -0,0 +1,3 @@
1
+ module Inliner
2
+ VERSION = '0.2.1'
3
+ end
@@ -0,0 +1,186 @@
1
+ require File.expand_path(File.join(File.dirname(__FILE__), "../spec_helper"))
2
+
3
+ describe Inliner do
4
+
5
+ before do
6
+ module Foo
7
+ extend Inliner
8
+ end
9
+ @cache_dir = File.join(SPEC_BASEPATH, 'ffi-inliner/cache')
10
+ Inliner.stub!(:directory).and_return(@cache_dir)
11
+ end
12
+
13
+ after do
14
+ FileUtils.rm_rf(@cache_dir)
15
+ end
16
+
17
+ it 'should extend the module with inline methods' do
18
+ module Foo
19
+ inline <<-code
20
+ long factorial(int max)
21
+ {
22
+ int i = max, result = 1;
23
+ while (i >= 2) { result *= i--; }
24
+ return result;
25
+ }
26
+ code
27
+ inline 'int simple_math() { return 1 + 1; }'
28
+ end
29
+
30
+ Foo.factorial(4).should == 24
31
+ Foo.simple_math.should == 2
32
+ end
33
+
34
+ it 'should correctly parse function signature' do
35
+ module Foo
36
+ inline <<-code
37
+ void* func_1(void* ptr, unsigned int i, unsigned long l, char *c)
38
+ {
39
+ return ptr;
40
+ }
41
+ code
42
+ end
43
+
44
+ ptr = FFI::MemoryPointer.new(:int)
45
+ Foo.func_1(ptr, 0xff, 0xffff, FFI::MemoryPointer.from_string('c')).should == ptr
46
+ end
47
+
48
+ it 'should load cached libraries' do
49
+
50
+ File.should_receive(:read).once.and_return("\'dummy\'")
51
+
52
+ module Foo
53
+ inline "void* cached_func() {}"
54
+ end
55
+
56
+ module Foo
57
+ inline "void* cached_func() {}"
58
+ end
59
+
60
+ end
61
+
62
+ it 'should recompile if the code is updated' do
63
+
64
+ module Foo
65
+ inline "int updated_func() { return 1 + 1; }"
66
+ end
67
+
68
+ Foo.updated_func.should == 2
69
+
70
+ module Foo
71
+ inline "int updated_func() { return 2 + 2; }"
72
+ end
73
+
74
+ Foo.updated_func.should == 4
75
+
76
+ end
77
+
78
+ it 'should be configured using the block form' do
79
+ module Foo
80
+ inline do |builder|
81
+ builder.c %q{
82
+ int func_1()
83
+ {
84
+ return 0;
85
+ };
86
+ }
87
+ builder.c %q{
88
+ int func_2()
89
+ {
90
+ return 1;
91
+ };
92
+ }
93
+ end
94
+ end
95
+ Foo.func_1.should == 0
96
+ Foo.func_2.should == 1
97
+ end
98
+
99
+ it 'should allow users to add type maps' do
100
+ class MyStruct < FFI::Struct
101
+ layout :dummy, :int
102
+ end
103
+ module Foo
104
+ inline do |builder|
105
+ builder.map 'my_struct_t *' => 'pointer'
106
+ builder.c_raw %q{
107
+ typedef struct {
108
+ int dummy;
109
+ } my_struct_t;
110
+ }
111
+ builder.c 'my_struct_t* use_my_struct(my_struct_t *my_struct) { return my_struct; }'
112
+ end
113
+ end
114
+ my_struct = MyStruct.new
115
+ Foo.use_my_struct(my_struct).should == my_struct.to_ptr
116
+ end
117
+ it 'should generate C struct from FFI::Struct' do
118
+ pending do
119
+ class MyStruct < FFI::Struct
120
+ layout :a, :int, \
121
+ :b, :char,
122
+ :c, :pointer
123
+ end
124
+ module Foo
125
+ extend Inliner
126
+ inline do |builder|
127
+ builder.struct MyStruct
128
+ builder.code.should == <<EOC
129
+ typedef struct
130
+ {
131
+ int a;
132
+ char b;
133
+ void* c;
134
+ } my_struct_t;
135
+
136
+ EOC
137
+ end
138
+ end
139
+ end
140
+ end
141
+ # it 'should use different compiler as specified in the configuration block' do
142
+ # tcc = mock('tcc', :exists? => true, :compile => nil)
143
+ # Inliner::Compilers::TCC.should_receive(:new).and_return(tcc)
144
+ # module Foo
145
+ # inline do |builder|
146
+ # builder.code = "int func_1() { return 0; }"
147
+ # builder.compiler = Inliner::Compilers::TCC
148
+ # end
149
+ # end
150
+ # end
151
+
152
+ # it 'should be configured using the hash form' do
153
+ # tcc = mock('tcc', :exists? => true, :compile => nil)
154
+ # Inliner::Compilers::TCC.should_receive(:new).and_return(tcc)
155
+ # module Foo
156
+ # inline "int func_1() { return 1; }", :compiler => Inliner::Compilers::TCC
157
+ # end
158
+ # end
159
+
160
+ it 'should raise errors' do
161
+ lambda {
162
+ module Foo
163
+ inline "int boom("
164
+ end
165
+ }.should raise_error(/Can\'t parse/)
166
+ lambda {
167
+ module Foo
168
+ inline "int boom() { printf \"Hello\" }"
169
+ end
170
+ }.should raise_error(/Compile error/)
171
+ end
172
+
173
+ end
174
+
175
+ describe Inliner::Compilers::Compiler do
176
+ before do
177
+ class DummyCC < Inliner::Compilers::Compiler
178
+ def cmd
179
+ "dummycc -shared"
180
+ end
181
+ end
182
+ end
183
+ it 'should return the progname' do
184
+ DummyCC.new.progname.should == 'dummycc'
185
+ end
186
+ end
data/spec/spec.opts ADDED
@@ -0,0 +1,4 @@
1
+ --color
2
+ --format
3
+ specdoc
4
+
@@ -0,0 +1,4 @@
1
+ $:.unshift(File.expand_path(File.join(File.dirname(__FILE__), '../lib')))
2
+ require 'ffi-inliner'
3
+
4
+ SPEC_BASEPATH = File.expand_path(File.dirname(__FILE__))
data/tasks/ann.rake ADDED
@@ -0,0 +1,80 @@
1
+
2
+ begin
3
+ require 'bones/smtp_tls'
4
+ rescue LoadError
5
+ require 'net/smtp'
6
+ end
7
+ require 'time'
8
+
9
+ namespace :ann do
10
+
11
+ # A prerequisites task that all other tasks depend upon
12
+ task :prereqs
13
+
14
+ file PROJ.ann.file do
15
+ ann = PROJ.ann
16
+ puts "Generating #{ann.file}"
17
+ File.open(ann.file,'w') do |fd|
18
+ fd.puts("#{PROJ.name} version #{PROJ.version}")
19
+ fd.puts(" by #{Array(PROJ.authors).first}") if PROJ.authors
20
+ fd.puts(" #{PROJ.url}") if PROJ.url.valid?
21
+ fd.puts(" (the \"#{PROJ.release_name}\" release)") if PROJ.release_name
22
+ fd.puts
23
+ fd.puts("== DESCRIPTION")
24
+ fd.puts
25
+ fd.puts(PROJ.description)
26
+ fd.puts
27
+ fd.puts(PROJ.changes.sub(%r/^.*$/, '== CHANGES'))
28
+ fd.puts
29
+ ann.paragraphs.each do |p|
30
+ fd.puts "== #{p.upcase}"
31
+ fd.puts
32
+ fd.puts paragraphs_of(PROJ.readme_file, p).join("\n\n")
33
+ fd.puts
34
+ end
35
+ fd.puts ann.text if ann.text
36
+ end
37
+ end
38
+
39
+ desc "Create an announcement file"
40
+ task :announcement => ['ann:prereqs', PROJ.ann.file]
41
+
42
+ desc "Send an email announcement"
43
+ task :email => ['ann:prereqs', PROJ.ann.file] do
44
+ ann = PROJ.ann
45
+ from = ann.email[:from] || Array(PROJ.authors).first || PROJ.email
46
+ to = Array(ann.email[:to])
47
+
48
+ ### build a mail header for RFC 822
49
+ rfc822msg = "From: #{from}\n"
50
+ rfc822msg << "To: #{to.join(',')}\n"
51
+ rfc822msg << "Subject: [ANN] #{PROJ.name} #{PROJ.version}"
52
+ rfc822msg << " (#{PROJ.release_name})" if PROJ.release_name
53
+ rfc822msg << "\n"
54
+ rfc822msg << "Date: #{Time.new.rfc822}\n"
55
+ rfc822msg << "Message-Id: "
56
+ rfc822msg << "<#{"%.8f" % Time.now.to_f}@#{ann.email[:domain]}>\n\n"
57
+ rfc822msg << File.read(ann.file)
58
+
59
+ params = [:server, :port, :domain, :acct, :passwd, :authtype].map do |key|
60
+ ann.email[key]
61
+ end
62
+
63
+ params[3] = PROJ.email if params[3].nil?
64
+
65
+ if params[4].nil?
66
+ STDOUT.write "Please enter your e-mail password (#{params[3]}): "
67
+ params[4] = STDIN.gets.chomp
68
+ end
69
+
70
+ ### send email
71
+ Net::SMTP.start(*params) {|smtp| smtp.sendmail(rfc822msg, from, to)}
72
+ end
73
+ end # namespace :ann
74
+
75
+ desc 'Alias to ann:announcement'
76
+ task :ann => 'ann:announcement'
77
+
78
+ CLOBBER << PROJ.ann.file
79
+
80
+ # EOF
data/tasks/bones.rake ADDED
@@ -0,0 +1,20 @@
1
+
2
+ if HAVE_BONES
3
+
4
+ namespace :bones do
5
+
6
+ desc 'Show the PROJ open struct'
7
+ task :debug do |t|
8
+ atr = if t.application.top_level_tasks.length == 2
9
+ t.application.top_level_tasks.pop
10
+ end
11
+
12
+ if atr then Bones::Debug.show_attr(PROJ, atr)
13
+ else Bones::Debug.show PROJ end
14
+ end
15
+
16
+ end # namespace :bones
17
+
18
+ end # HAVE_BONES
19
+
20
+ # EOF
data/tasks/gem.rake ADDED
@@ -0,0 +1,201 @@
1
+
2
+ require 'find'
3
+ require 'rake/packagetask'
4
+ require 'rubygems/user_interaction'
5
+ require 'rubygems/builder'
6
+
7
+ module Bones
8
+ class GemPackageTask < Rake::PackageTask
9
+ # Ruby GEM spec containing the metadata for this package. The
10
+ # name, version and package_files are automatically determined
11
+ # from the GEM spec and don't need to be explicitly provided.
12
+ #
13
+ attr_accessor :gem_spec
14
+
15
+ # Tasks from the Bones gem directory
16
+ attr_reader :bones_files
17
+
18
+ # Create a GEM Package task library. Automatically define the gem
19
+ # if a block is given. If no block is supplied, then +define+
20
+ # needs to be called to define the task.
21
+ #
22
+ def initialize(gem_spec)
23
+ init(gem_spec)
24
+ yield self if block_given?
25
+ define if block_given?
26
+ end
27
+
28
+ # Initialization tasks without the "yield self" or define
29
+ # operations.
30
+ #
31
+ def init(gem)
32
+ super(gem.name, gem.version)
33
+ @gem_spec = gem
34
+ @package_files += gem_spec.files if gem_spec.files
35
+ @bones_files = []
36
+
37
+ local_setup = File.join(Dir.pwd, %w[tasks setup.rb])
38
+ if !test(?e, local_setup)
39
+ Dir.glob(::Bones.path(%w[lib bones tasks *])).each {|fn| bones_files << fn}
40
+ end
41
+ end
42
+
43
+ # Create the Rake tasks and actions specified by this
44
+ # GemPackageTask. (+define+ is automatically called if a block is
45
+ # given to +new+).
46
+ #
47
+ def define
48
+ super
49
+ task :prereqs
50
+ task :package => ['gem:prereqs', "#{package_dir_path}/#{gem_file}"]
51
+ file "#{package_dir_path}/#{gem_file}" => [package_dir_path] + package_files + bones_files do
52
+ when_writing("Creating GEM") {
53
+ chdir(package_dir_path) do
54
+ Gem::Builder.new(gem_spec).build
55
+ verbose(true) {
56
+ mv gem_file, "../#{gem_file}"
57
+ }
58
+ end
59
+ }
60
+ end
61
+
62
+ file package_dir_path => bones_files do
63
+ mkdir_p package_dir rescue nil
64
+
65
+ gem_spec.files = (gem_spec.files +
66
+ bones_files.map {|fn| File.join('tasks', File.basename(fn))}).sort
67
+
68
+ bones_files.each do |fn|
69
+ base_fn = File.join('tasks', File.basename(fn))
70
+ f = File.join(package_dir_path, base_fn)
71
+ fdir = File.dirname(f)
72
+ mkdir_p(fdir) if !File.exist?(fdir)
73
+ if File.directory?(fn)
74
+ mkdir_p(f)
75
+ else
76
+ raise "file name conflict for '#{base_fn}' (conflicts with '#{fn}')" if test(?e, f)
77
+ safe_ln(fn, f)
78
+ end
79
+ end
80
+ end
81
+ end
82
+
83
+ def gem_file
84
+ if @gem_spec.platform == Gem::Platform::RUBY
85
+ "#{package_name}.gem"
86
+ else
87
+ "#{package_name}-#{@gem_spec.platform}.gem"
88
+ end
89
+ end
90
+ end # class GemPackageTask
91
+ end # module Bones
92
+
93
+ namespace :gem do
94
+
95
+ PROJ.gem._spec = Gem::Specification.new do |s|
96
+ s.name = PROJ.name
97
+ s.version = PROJ.version
98
+ s.summary = PROJ.summary
99
+ s.authors = Array(PROJ.authors)
100
+ s.email = PROJ.email
101
+ s.homepage = Array(PROJ.url).first
102
+ s.rubyforge_project = PROJ.rubyforge.name
103
+
104
+ s.description = PROJ.description
105
+
106
+ PROJ.gem.dependencies.each do |dep|
107
+ s.add_dependency(*dep)
108
+ end
109
+
110
+ PROJ.gem.development_dependencies.each do |dep|
111
+ s.add_development_dependency(*dep)
112
+ end
113
+
114
+ s.files = PROJ.gem.files
115
+ s.executables = PROJ.gem.executables.map {|fn| File.basename(fn)}
116
+ s.extensions = PROJ.gem.files.grep %r/extconf\.rb$/
117
+
118
+ s.bindir = 'bin'
119
+ dirs = Dir["{#{PROJ.libs.join(',')}}"]
120
+ s.require_paths = dirs unless dirs.empty?
121
+
122
+ incl = Regexp.new(PROJ.rdoc.include.join('|'))
123
+ excl = PROJ.rdoc.exclude.dup.concat %w[\.rb$ ^(\.\/|\/)?ext]
124
+ excl = Regexp.new(excl.join('|'))
125
+ rdoc_files = PROJ.gem.files.find_all do |fn|
126
+ case fn
127
+ when excl; false
128
+ when incl; true
129
+ else false end
130
+ end
131
+ s.rdoc_options = PROJ.rdoc.opts + ['--main', PROJ.rdoc.main]
132
+ s.extra_rdoc_files = rdoc_files
133
+ s.has_rdoc = true
134
+
135
+ if test ?f, PROJ.test.file
136
+ s.test_file = PROJ.test.file
137
+ else
138
+ s.test_files = PROJ.test.files.to_a
139
+ end
140
+
141
+ # Do any extra stuff the user wants
142
+ PROJ.gem.extras.each do |msg, val|
143
+ case val
144
+ when Proc
145
+ val.call(s.send(msg))
146
+ else
147
+ s.send "#{msg}=", val
148
+ end
149
+ end
150
+ end # Gem::Specification.new
151
+
152
+ Bones::GemPackageTask.new(PROJ.gem._spec) do |pkg|
153
+ pkg.need_tar = PROJ.gem.need_tar
154
+ pkg.need_zip = PROJ.gem.need_zip
155
+ end
156
+
157
+ desc 'Show information about the gem'
158
+ task :debug => 'gem:prereqs' do
159
+ puts PROJ.gem._spec.to_ruby
160
+ end
161
+
162
+ desc 'Write the gemspec '
163
+ task :spec => 'gem:prereqs' do
164
+ File.open("#{PROJ.name}.gemspec", 'w') do |f|
165
+ f.write PROJ.gem._spec.to_ruby
166
+ end
167
+ end
168
+
169
+ desc 'Install the gem'
170
+ task :install => [:clobber, 'gem:package'] do
171
+ sh "#{SUDO} #{GEM} install --local pkg/#{PROJ.gem._spec.full_name}"
172
+
173
+ # use this version of the command for rubygems > 1.0.0
174
+ #sh "#{SUDO} #{GEM} install --no-update-sources pkg/#{PROJ.gem._spec.full_name}"
175
+ end
176
+
177
+ desc 'Uninstall the gem'
178
+ task :uninstall do
179
+ installed_list = Gem.source_index.find_name(PROJ.name)
180
+ if installed_list and installed_list.collect { |s| s.version.to_s}.include?(PROJ.version) then
181
+ sh "#{SUDO} #{GEM} uninstall --version '#{PROJ.version}' --ignore-dependencies --executables #{PROJ.name}"
182
+ end
183
+ end
184
+
185
+ desc 'Reinstall the gem'
186
+ task :reinstall => [:uninstall, :install]
187
+
188
+ desc 'Cleanup the gem'
189
+ task :cleanup do
190
+ sh "#{SUDO} #{GEM} cleanup #{PROJ.gem._spec.name}"
191
+ end
192
+ end # namespace :gem
193
+
194
+
195
+ desc 'Alias to gem:package'
196
+ task :gem => 'gem:package'
197
+
198
+ task :clobber => 'gem:clobber_package'
199
+ remove_desc_for_task 'gem:clobber_package'
200
+
201
+ # EOF