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
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
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
|
require File.expand_path(File.join(File.dirname(__FILE__), "spec_helper"))
module TestEnum0
extend FFI::Library
end
module TestEnum1
extend FFI::Library
ffi_lib TestLibrary::PATH
enum [:c1, :c2, :c3, :c4]
enum [:c5, 42, :c6, :c7, :c8]
enum [:c9, 42, :c10, :c11, 4242, :c12]
enum [:c13, 42, :c14, 4242, :c15, 424242, :c16, 42424242]
attach_function :test_untagged_enum, [:int], :int
end
module TestEnum3
extend FFI::Library
ffi_lib TestLibrary::PATH
enum :enum_type1, [:c1, :c2, :c3, :c4]
enum :enum_type2, [:c5, 42, :c6, :c7, :c8]
enum :enum_type3, [:c9, 42, :c10, :c11, 4242, :c12]
enum :enum_type4, [:c13, 42, :c14, 4242, :c15, 424242, :c16, 42424242]
attach_function :test_tagged_typedef_enum1, [:enum_type1], :enum_type1
attach_function :test_tagged_typedef_enum2, [:enum_type2], :enum_type2
attach_function :test_tagged_typedef_enum3, [:enum_type3], :enum_type3
attach_function :test_tagged_typedef_enum4, [:enum_type4], :enum_type4
end
describe "A library with no enum defined" do
it "returns nil when asked for an enum" do
TestEnum0.enum_type(:foo).should == nil
end
end
describe "An untagged enum" do
it "constants can be used as function parameters and return value" do
TestEnum1.test_untagged_enum(:c1).should == 0
TestEnum1.test_untagged_enum(:c2).should == 1
TestEnum1.test_untagged_enum(:c3).should == 2
TestEnum1.test_untagged_enum(:c4).should == 3
TestEnum1.test_untagged_enum(:c5).should == 42
TestEnum1.test_untagged_enum(:c6).should == 43
TestEnum1.test_untagged_enum(:c7).should == 44
TestEnum1.test_untagged_enum(:c8).should == 45
TestEnum1.test_untagged_enum(:c9).should == 42
TestEnum1.test_untagged_enum(:c10).should == 43
TestEnum1.test_untagged_enum(:c11).should == 4242
TestEnum1.test_untagged_enum(:c12).should == 4243
TestEnum1.test_untagged_enum(:c13).should == 42
TestEnum1.test_untagged_enum(:c14).should == 4242
TestEnum1.test_untagged_enum(:c15).should == 424242
TestEnum1.test_untagged_enum(:c16).should == 42424242
end
end
describe "A tagged typedef enum" do
it "is accessible through its tag" do
TestEnum3.enum_type(:enum_type1).should_not == nil
TestEnum3.enum_type(:enum_type2).should_not == nil
TestEnum3.enum_type(:enum_type3).should_not == nil
TestEnum3.enum_type(:enum_type4).should_not == nil
end
it "contains enum constants" do
TestEnum3.enum_type(:enum_type1).symbols.length.should == 4
TestEnum3.enum_type(:enum_type2).symbols.length.should == 4
TestEnum3.enum_type(:enum_type3).symbols.length.should == 4
TestEnum3.enum_type(:enum_type4).symbols.length.should == 4
end
it "constants can be used as function parameters and return value" do
TestEnum3.test_tagged_typedef_enum1(:c1).should == :c1
TestEnum3.test_tagged_typedef_enum1(:c2).should == :c2
TestEnum3.test_tagged_typedef_enum1(:c3).should == :c3
TestEnum3.test_tagged_typedef_enum1(:c4).should == :c4
TestEnum3.test_tagged_typedef_enum2(:c5).should == :c5
TestEnum3.test_tagged_typedef_enum2(:c6).should == :c6
TestEnum3.test_tagged_typedef_enum2(:c7).should == :c7
TestEnum3.test_tagged_typedef_enum2(:c8).should == :c8
TestEnum3.test_tagged_typedef_enum3(:c9).should == :c9
TestEnum3.test_tagged_typedef_enum3(:c10).should == :c10
TestEnum3.test_tagged_typedef_enum3(:c11).should == :c11
TestEnum3.test_tagged_typedef_enum3(:c12).should == :c12
TestEnum3.test_tagged_typedef_enum4(:c13).should == :c13
TestEnum3.test_tagged_typedef_enum4(:c14).should == :c14
TestEnum3.test_tagged_typedef_enum4(:c15).should == :c15
TestEnum3.test_tagged_typedef_enum4(:c16).should == :c16
end
end
describe "All enums" do
it "have autonumbered constants when defined with names only" do
TestEnum1.enum_value(:c1).should == 0
TestEnum1.enum_value(:c2).should == 1
TestEnum1.enum_value(:c3).should == 2
TestEnum1.enum_value(:c4).should == 3
TestEnum3.enum_value(:c1).should == 0
TestEnum3.enum_value(:c2).should == 1
TestEnum3.enum_value(:c3).should == 2
TestEnum3.enum_value(:c4).should == 3
end
it "can have an explicit first constant and autonumbered subsequent constants" do
TestEnum1.enum_value(:c5).should == 42
TestEnum1.enum_value(:c6).should == 43
TestEnum1.enum_value(:c7).should == 44
TestEnum1.enum_value(:c8).should == 45
TestEnum3.enum_value(:c5).should == 42
TestEnum3.enum_value(:c6).should == 43
TestEnum3.enum_value(:c7).should == 44
TestEnum3.enum_value(:c8).should == 45
end
it "can have a mix of explicit and autonumbered constants" do
TestEnum1.enum_value(:c9).should == 42
TestEnum1.enum_value(:c10).should == 43
TestEnum1.enum_value(:c11).should == 4242
TestEnum1.enum_value(:c12).should == 4243
TestEnum3.enum_value(:c9).should == 42
TestEnum3.enum_value(:c10).should == 43
TestEnum3.enum_value(:c11).should == 4242
TestEnum3.enum_value(:c12).should == 4243
end
it "can have all its constants explicitely valued" do
TestEnum1.enum_value(:c13).should == 42
TestEnum1.enum_value(:c14).should == 4242
TestEnum1.enum_value(:c15).should == 424242
TestEnum1.enum_value(:c16).should == 42424242
TestEnum3.enum_value(:c13).should == 42
TestEnum3.enum_value(:c14).should == 4242
TestEnum3.enum_value(:c15).should == 424242
TestEnum3.enum_value(:c16).should == 42424242
end
it "return the constant corresponding to a specific value" do
enum = TestEnum3.enum_type(:enum_type1)
enum[0].should == :c1
enum[1].should == :c2
enum[2].should == :c3
enum[3].should == :c4
enum = TestEnum3.enum_type(:enum_type2)
enum[42].should == :c5
enum[43].should == :c6
enum[44].should == :c7
enum[45].should == :c8
enum = TestEnum3.enum_type(:enum_type3)
enum[42].should == :c9
enum[43].should == :c10
enum[4242].should == :c11
enum[4243].should == :c12
enum = TestEnum3.enum_type(:enum_type4)
enum[42].should == :c13
enum[4242].should == :c14
enum[424242].should == :c15
enum[42424242].should == :c16
end
end
|
