soybean 1.0.0

Sign up to get free protection for your applications and to get access to all the features.
Files changed (175) hide show
  1. data/.document +5 -0
  2. data/.rspec +1 -0
  3. data/Gemfile +15 -0
  4. data/Gemfile.lock +38 -0
  5. data/LICENSE.txt +20 -0
  6. data/README.rdoc +19 -0
  7. data/Rakefile +44 -0
  8. data/VERSION +1 -0
  9. data/bin/soybean +22 -0
  10. data/bin/xsd2ruby +90 -0
  11. data/lib/soybean.rb +11 -0
  12. data/lib/soybean/actions/generate_classes.rb +33 -0
  13. data/soybean.gemspec +236 -0
  14. data/spec/soybean_spec.rb +5 -0
  15. data/spec/spec_helper.rb +12 -0
  16. data/vendor/soap4r/soap/attachment.rb +109 -0
  17. data/vendor/soap4r/soap/attrproxy.rb +35 -0
  18. data/vendor/soap4r/soap/base_data.rb +1095 -0
  19. data/vendor/soap4r/soap/element.rb +278 -0
  20. data/vendor/soap4r/soap/encodingstyle/asp_dot_net_handler.rb +208 -0
  21. data/vendor/soap4r/soap/encodingstyle/handler.rb +121 -0
  22. data/vendor/soap4r/soap/encodingstyle/literal_handler.rb +196 -0
  23. data/vendor/soap4r/soap/encodingstyle/soap_handler.rb +560 -0
  24. data/vendor/soap4r/soap/filter.rb +14 -0
  25. data/vendor/soap4r/soap/filter/filterchain.rb +52 -0
  26. data/vendor/soap4r/soap/filter/handler.rb +32 -0
  27. data/vendor/soap4r/soap/filter/streamhandler.rb +30 -0
  28. data/vendor/soap4r/soap/generator.rb +299 -0
  29. data/vendor/soap4r/soap/header/handler.rb +62 -0
  30. data/vendor/soap4r/soap/header/handlerset.rb +71 -0
  31. data/vendor/soap4r/soap/header/mappinghandler.rb +48 -0
  32. data/vendor/soap4r/soap/header/simplehandler.rb +45 -0
  33. data/vendor/soap4r/soap/httpconfigloader.rb +140 -0
  34. data/vendor/soap4r/soap/mapping.rb +13 -0
  35. data/vendor/soap4r/soap/mapping/encodedregistry.rb +539 -0
  36. data/vendor/soap4r/soap/mapping/factory.rb +389 -0
  37. data/vendor/soap4r/soap/mapping/literalregistry.rb +392 -0
  38. data/vendor/soap4r/soap/mapping/mapping.rb +577 -0
  39. data/vendor/soap4r/soap/mapping/registry.rb +296 -0
  40. data/vendor/soap4r/soap/mapping/rubytype_factory.rb +446 -0
  41. data/vendor/soap4r/soap/mapping/schemadefinition.rb +171 -0
  42. data/vendor/soap4r/soap/mapping/type_map.rb +107 -0
  43. data/vendor/soap4r/soap/mapping/wsdlencodedregistry.rb +212 -0
  44. data/vendor/soap4r/soap/mapping/wsdlliteralregistry.rb +249 -0
  45. data/vendor/soap4r/soap/marshal.rb +60 -0
  46. data/vendor/soap4r/soap/mimemessage.rb +243 -0
  47. data/vendor/soap4r/soap/nestedexception.rb +43 -0
  48. data/vendor/soap4r/soap/net_http_client.rb +242 -0
  49. data/vendor/soap4r/soap/ns.rb +39 -0
  50. data/vendor/soap4r/soap/parser.rb +253 -0
  51. data/vendor/soap4r/soap/processor.rb +67 -0
  52. data/vendor/soap4r/soap/property.rb +340 -0
  53. data/vendor/soap4r/soap/proxy.rb +15 -0
  54. data/vendor/soap4r/soap/rpc/cgistub.rb +248 -0
  55. data/vendor/soap4r/soap/rpc/driver.rb +222 -0
  56. data/vendor/soap4r/soap/rpc/element.rb +375 -0
  57. data/vendor/soap4r/soap/rpc/httpserver.rb +143 -0
  58. data/vendor/soap4r/soap/rpc/method_def.rb +69 -0
  59. data/vendor/soap4r/soap/rpc/proxy.rb +573 -0
  60. data/vendor/soap4r/soap/rpc/router.rb +663 -0
  61. data/vendor/soap4r/soap/rpc/rpc.rb +26 -0
  62. data/vendor/soap4r/soap/rpc/soaplet.rb +201 -0
  63. data/vendor/soap4r/soap/rpc/standalone_server.rb +44 -0
  64. data/vendor/soap4r/soap/soap.rb +154 -0
  65. data/vendor/soap4r/soap/stream_handler.rb +302 -0
  66. data/vendor/soap4r/soap/version.rb +9 -0
  67. data/vendor/soap4r/soap/wsdl_driver.rb +165 -0
  68. data/vendor/soap4r/wsdl/binding.rb +66 -0
  69. data/vendor/soap4r/wsdl/data.rb +65 -0
  70. data/vendor/soap4r/wsdl/definitions.rb +237 -0
  71. data/vendor/soap4r/wsdl/documentation.rb +33 -0
  72. data/vendor/soap4r/wsdl/import.rb +81 -0
  73. data/vendor/soap4r/wsdl/importer.rb +39 -0
  74. data/vendor/soap4r/wsdl/info.rb +51 -0
  75. data/vendor/soap4r/wsdl/message.rb +55 -0
  76. data/vendor/soap4r/wsdl/operation.rb +152 -0
  77. data/vendor/soap4r/wsdl/operation_binding.rb +241 -0
  78. data/vendor/soap4r/wsdl/param.rb +94 -0
  79. data/vendor/soap4r/wsdl/parser.rb +165 -0
  80. data/vendor/soap4r/wsdl/part.rb +53 -0
  81. data/vendor/soap4r/wsdl/port.rb +67 -0
  82. data/vendor/soap4r/wsdl/port_type.rb +76 -0
  83. data/vendor/soap4r/wsdl/service.rb +62 -0
  84. data/vendor/soap4r/wsdl/soap/address.rb +41 -0
  85. data/vendor/soap4r/wsdl/soap/binding.rb +50 -0
  86. data/vendor/soap4r/wsdl/soap/body.rb +59 -0
  87. data/vendor/soap4r/wsdl/soap/cgi_stub_creator.rb +93 -0
  88. data/vendor/soap4r/wsdl/soap/class_def_creator.rb +437 -0
  89. data/vendor/soap4r/wsdl/soap/class_def_creator_support.rb +241 -0
  90. data/vendor/soap4r/wsdl/soap/class_name_creator.rb +55 -0
  91. data/vendor/soap4r/wsdl/soap/client_skelton_creator.rb +107 -0
  92. data/vendor/soap4r/wsdl/soap/complex_type.rb +174 -0
  93. data/vendor/soap4r/wsdl/soap/data.rb +43 -0
  94. data/vendor/soap4r/wsdl/soap/definitions.rb +201 -0
  95. data/vendor/soap4r/wsdl/soap/driver_creator.rb +121 -0
  96. data/vendor/soap4r/wsdl/soap/element.rb +34 -0
  97. data/vendor/soap4r/wsdl/soap/encoded_mapping_registry_creator.rb +74 -0
  98. data/vendor/soap4r/wsdl/soap/fault.rb +57 -0
  99. data/vendor/soap4r/wsdl/soap/header.rb +87 -0
  100. data/vendor/soap4r/wsdl/soap/headerfault.rb +57 -0
  101. data/vendor/soap4r/wsdl/soap/literal_mapping_registry_creator.rb +116 -0
  102. data/vendor/soap4r/wsdl/soap/mapping_registry_creator.rb +59 -0
  103. data/vendor/soap4r/wsdl/soap/mapping_registry_creator_support.rb +377 -0
  104. data/vendor/soap4r/wsdl/soap/method_def_creator.rb +200 -0
  105. data/vendor/soap4r/wsdl/soap/operation.rb +113 -0
  106. data/vendor/soap4r/wsdl/soap/servant_skelton_creator.rb +92 -0
  107. data/vendor/soap4r/wsdl/soap/servlet_stub_creator.rb +105 -0
  108. data/vendor/soap4r/wsdl/soap/standalone_server_stub_creator.rb +101 -0
  109. data/vendor/soap4r/wsdl/soap/wsdl2ruby.rb +226 -0
  110. data/vendor/soap4r/wsdl/types.rb +45 -0
  111. data/vendor/soap4r/wsdl/wsdl.rb +25 -0
  112. data/vendor/soap4r/wsdl/xml_schema/all.rb +25 -0
  113. data/vendor/soap4r/wsdl/xml_schema/annotation.rb +35 -0
  114. data/vendor/soap4r/wsdl/xml_schema/any.rb +62 -0
  115. data/vendor/soap4r/wsdl/xml_schema/any_attribute.rb +49 -0
  116. data/vendor/soap4r/wsdl/xml_schema/attribute.rb +105 -0
  117. data/vendor/soap4r/wsdl/xml_schema/attribute_group.rb +69 -0
  118. data/vendor/soap4r/wsdl/xml_schema/choice.rb +59 -0
  119. data/vendor/soap4r/wsdl/xml_schema/complex_content.rb +98 -0
  120. data/vendor/soap4r/wsdl/xml_schema/complex_extension.rb +120 -0
  121. data/vendor/soap4r/wsdl/xml_schema/complex_restriction.rb +105 -0
  122. data/vendor/soap4r/wsdl/xml_schema/complex_type.rb +194 -0
  123. data/vendor/soap4r/wsdl/xml_schema/content.rb +96 -0
  124. data/vendor/soap4r/wsdl/xml_schema/data.rb +117 -0
  125. data/vendor/soap4r/wsdl/xml_schema/element.rb +154 -0
  126. data/vendor/soap4r/wsdl/xml_schema/enumeration.rb +37 -0
  127. data/vendor/soap4r/wsdl/xml_schema/fractiondigits.rb +38 -0
  128. data/vendor/soap4r/wsdl/xml_schema/group.rb +101 -0
  129. data/vendor/soap4r/wsdl/xml_schema/import.rb +54 -0
  130. data/vendor/soap4r/wsdl/xml_schema/import_handler.rb +46 -0
  131. data/vendor/soap4r/wsdl/xml_schema/importer.rb +103 -0
  132. data/vendor/soap4r/wsdl/xml_schema/include.rb +49 -0
  133. data/vendor/soap4r/wsdl/xml_schema/length.rb +38 -0
  134. data/vendor/soap4r/wsdl/xml_schema/list.rb +49 -0
  135. data/vendor/soap4r/wsdl/xml_schema/maxexclusive.rb +38 -0
  136. data/vendor/soap4r/wsdl/xml_schema/maxinclusive.rb +38 -0
  137. data/vendor/soap4r/wsdl/xml_schema/maxlength.rb +38 -0
  138. data/vendor/soap4r/wsdl/xml_schema/minexclusive.rb +38 -0
  139. data/vendor/soap4r/wsdl/xml_schema/mininclusive.rb +38 -0
  140. data/vendor/soap4r/wsdl/xml_schema/minlength.rb +38 -0
  141. data/vendor/soap4r/wsdl/xml_schema/parser.rb +168 -0
  142. data/vendor/soap4r/wsdl/xml_schema/pattern.rb +37 -0
  143. data/vendor/soap4r/wsdl/xml_schema/ref.rb +34 -0
  144. data/vendor/soap4r/wsdl/xml_schema/schema.rb +179 -0
  145. data/vendor/soap4r/wsdl/xml_schema/sequence.rb +55 -0
  146. data/vendor/soap4r/wsdl/xml_schema/simple_content.rb +70 -0
  147. data/vendor/soap4r/wsdl/xml_schema/simple_extension.rb +63 -0
  148. data/vendor/soap4r/wsdl/xml_schema/simple_restriction.rb +133 -0
  149. data/vendor/soap4r/wsdl/xml_schema/simple_type.rb +88 -0
  150. data/vendor/soap4r/wsdl/xml_schema/totaldigits.rb +38 -0
  151. data/vendor/soap4r/wsdl/xml_schema/union.rb +36 -0
  152. data/vendor/soap4r/wsdl/xml_schema/unique.rb +35 -0
  153. data/vendor/soap4r/wsdl/xml_schema/whitespace.rb +38 -0
  154. data/vendor/soap4r/wsdl/xml_schema/xsd2ruby.rb +176 -0
  155. data/vendor/soap4r/xsd/charset.rb +190 -0
  156. data/vendor/soap4r/xsd/codegen.rb +13 -0
  157. data/vendor/soap4r/xsd/codegen/classdef.rb +209 -0
  158. data/vendor/soap4r/xsd/codegen/commentdef.rb +35 -0
  159. data/vendor/soap4r/xsd/codegen/gensupport.rb +277 -0
  160. data/vendor/soap4r/xsd/codegen/methoddef.rb +71 -0
  161. data/vendor/soap4r/xsd/codegen/moduledef.rb +209 -0
  162. data/vendor/soap4r/xsd/datatypes.rb +1466 -0
  163. data/vendor/soap4r/xsd/datatypes1999.rb +21 -0
  164. data/vendor/soap4r/xsd/iconvcharset.rb +34 -0
  165. data/vendor/soap4r/xsd/mapping.rb +69 -0
  166. data/vendor/soap4r/xsd/namedelements.rb +133 -0
  167. data/vendor/soap4r/xsd/ns.rb +183 -0
  168. data/vendor/soap4r/xsd/qname.rb +80 -0
  169. data/vendor/soap4r/xsd/xmlparser.rb +77 -0
  170. data/vendor/soap4r/xsd/xmlparser/libxmlparser.rb +116 -0
  171. data/vendor/soap4r/xsd/xmlparser/parser.rb +101 -0
  172. data/vendor/soap4r/xsd/xmlparser/rexmlparser.rb +59 -0
  173. data/vendor/soap4r/xsd/xmlparser/xmlparser.rb +51 -0
  174. data/vendor/soap4r/xsd/xmlparser/xmlscanner.rb +150 -0
  175. metadata +316 -0
@@ -0,0 +1,389 @@
1
+ # encoding: ASCII-8BIT
2
+ # SOAP4R - Mapping factory.
3
+ # Copyright (C) 2000-2007 NAKAMURA, Hiroshi <nahi@ruby-lang.org>.
4
+
5
+ # This program is copyrighted free software by NAKAMURA, Hiroshi. You can
6
+ # redistribute it and/or modify it under the same terms of Ruby's license;
7
+ # either the dual license version in 2003, or any later version.
8
+
9
+
10
+ module SOAP
11
+ module Mapping
12
+
13
+
14
+ class Factory
15
+ include TraverseSupport
16
+
17
+ def initialize
18
+ # nothing to do
19
+ end
20
+
21
+ def obj2soap(soap_class, obj, info, map)
22
+ raise NotImplementError.new
23
+ # return soap_obj
24
+ end
25
+
26
+ def soap2obj(obj_class, node, info, map)
27
+ raise NotImplementError.new
28
+ # return convert_succeeded_or_not, obj
29
+ end
30
+
31
+ def setiv2obj(obj, node, map)
32
+ return if node.nil?
33
+ if obj.is_a?(Array)
34
+ setiv2ary(obj, node, map)
35
+ else
36
+ setiv2struct(obj, node, map)
37
+ end
38
+ end
39
+
40
+ def setiv2soap(node, obj, map)
41
+ if obj.class.class_variables.include?('@@schema_element')
42
+ setdefinediv2soap(node, obj, map)
43
+ else
44
+ # should we sort instance_variables? how?
45
+ obj.instance_variables.each do |var|
46
+ name = var.to_s.sub(/^@/, '')
47
+ elename = Mapping.name2elename(name)
48
+ node.add(elename,
49
+ Mapping._obj2soap(obj.instance_variable_get(var), map))
50
+ end
51
+ end
52
+ end
53
+
54
+ private
55
+
56
+ def setdefinediv2soap(ele, obj, map)
57
+ definition = Mapping.schema_definition_classdef(obj.class)
58
+ definition.elements.each do |eledef|
59
+ child = Mapping.get_attribute(obj, eledef.varname)
60
+ # extract method
61
+ if child.nil?
62
+ value = SOAPNil.new
63
+ elsif child.is_a?(XSD::NSDBase)
64
+ value = child
65
+ else
66
+ klass = Mapping.class_from_name(eledef.type)
67
+ if klass && klass.include?(::SOAP::SOAPBasetype)
68
+ value = klass.new(child)
69
+ else
70
+ # should check klass matches an actual object?
71
+ value = Mapping._obj2soap(child, map)
72
+ end
73
+ end
74
+ ele.add(eledef.elename.name, value)
75
+ end
76
+ end
77
+
78
+ def setiv2ary(obj, node, map)
79
+ node.each do |name, value|
80
+ Array.instance_method(:<<).bind(obj).call(Mapping._soap2obj(value, map))
81
+ end
82
+ end
83
+
84
+ def setiv2struct(obj, node, map)
85
+ vars = {}
86
+ node.each do |name, value|
87
+ vars[Mapping.elename2name(name)] = Mapping._soap2obj(value, map)
88
+ end
89
+ Mapping.set_attributes(obj, vars)
90
+ end
91
+
92
+ def anonymous_class?(obj)
93
+ name = obj.class.name
94
+ name.nil? or name.empty? # 1.8 returns ""
95
+ end
96
+ end
97
+
98
+ class StringFactory_ < Factory
99
+ def initialize(allow_original_mapping = false)
100
+ super()
101
+ @allow_original_mapping = allow_original_mapping
102
+ end
103
+
104
+ def obj2soap(soap_class, obj, info, map)
105
+ if !@allow_original_mapping and !obj.instance_variables.empty?
106
+ return nil
107
+ end
108
+ begin
109
+ encoded = XSD::Charset.encoding_conv(obj, Mapping.external_ces,
110
+ XSD::Charset.encoding)
111
+ soap_obj = soap_class.new(encoded)
112
+ rescue XSD::ValueSpaceError
113
+ return nil
114
+ end
115
+ mark_marshalled_obj(obj, soap_obj)
116
+ soap_obj
117
+ end
118
+
119
+ def soap2obj(obj_class, node, info, map)
120
+ obj = Mapping.create_empty_object(obj_class)
121
+ decoded = XSD::Charset.encoding_conv(node.data, XSD::Charset.encoding,
122
+ Mapping.external_ces)
123
+ obj.replace(decoded)
124
+ mark_unmarshalled_obj(node, obj)
125
+ return true, obj
126
+ end
127
+ end
128
+
129
+ class FixnumFactory_ < Factory
130
+ def obj2soap(soap_class, obj, info, map)
131
+ soap_obj = nil
132
+ begin
133
+ soap_obj = soap_class.new(obj)
134
+ rescue XSD::ValueSpaceError
135
+ return nil
136
+ end
137
+ soap_obj
138
+ end
139
+
140
+ def soap2obj(obj_class, node, info, map)
141
+ obj = node.data
142
+ return true, obj
143
+ end
144
+ end
145
+
146
+ class BasetypeFactory_ < Factory
147
+ def initialize(allow_original_mapping = false)
148
+ super()
149
+ @allow_original_mapping = allow_original_mapping
150
+ end
151
+
152
+ def obj2soap(soap_class, obj, info, map)
153
+ if !@allow_original_mapping and !obj.instance_variables.empty?
154
+ return nil
155
+ end
156
+ soap_obj = nil
157
+ begin
158
+ soap_obj = soap_class.new(obj)
159
+ rescue XSD::ValueSpaceError
160
+ return nil
161
+ end
162
+ if @allow_original_mapping
163
+ # Basetype except String should not be multiref-ed in SOAP/1.1.
164
+ mark_marshalled_obj(obj, soap_obj)
165
+ end
166
+ soap_obj
167
+ end
168
+
169
+ def soap2obj(obj_class, node, info, map)
170
+ obj = node.data
171
+ mark_unmarshalled_obj(node, obj)
172
+ return true, obj
173
+ end
174
+ end
175
+
176
+ class DateTimeFactory_ < Factory
177
+ def initialize(allow_original_mapping = false)
178
+ super()
179
+ @allow_original_mapping = allow_original_mapping
180
+ end
181
+
182
+ def obj2soap(soap_class, obj, info, map)
183
+ if !@allow_original_mapping and
184
+ Time === obj and !obj.instance_variables.empty?
185
+ return nil
186
+ end
187
+ soap_obj = nil
188
+ begin
189
+ soap_obj = soap_class.new(obj)
190
+ rescue XSD::ValueSpaceError
191
+ return nil
192
+ end
193
+ mark_marshalled_obj(obj, soap_obj)
194
+ soap_obj
195
+ end
196
+
197
+ def soap2obj(obj_class, node, info, map)
198
+ if node.respond_to?(:to_obj)
199
+ obj = node.to_obj(obj_class)
200
+ return false if obj.nil?
201
+ mark_unmarshalled_obj(node, obj)
202
+ return true, obj
203
+ else
204
+ return false
205
+ end
206
+ end
207
+ end
208
+
209
+ class Base64Factory_ < Factory
210
+ def obj2soap(soap_class, obj, info, map)
211
+ return nil unless obj.instance_variables.empty?
212
+ soap_obj = soap_class.new(obj)
213
+ mark_marshalled_obj(obj, soap_obj) if soap_obj
214
+ soap_obj
215
+ end
216
+
217
+ def soap2obj(obj_class, node, info, map)
218
+ obj = node.string
219
+ mark_unmarshalled_obj(node, obj)
220
+ return true, obj
221
+ end
222
+ end
223
+
224
+ class URIFactory_ < Factory
225
+ def obj2soap(soap_class, obj, info, map)
226
+ soap_obj = soap_class.new(obj)
227
+ mark_marshalled_obj(obj, soap_obj) if soap_obj
228
+ soap_obj
229
+ end
230
+
231
+ def soap2obj(obj_class, node, info, map)
232
+ obj = node.data
233
+ mark_unmarshalled_obj(node, obj)
234
+ return true, obj
235
+ end
236
+ end
237
+
238
+ class ArrayFactory_ < Factory
239
+ def initialize(allow_original_mapping = false)
240
+ super()
241
+ @allow_original_mapping = allow_original_mapping
242
+ end
243
+
244
+ # [[1], [2]] is converted to Array of Array, not 2-D Array.
245
+ # To create M-D Array, you must call Mapping.ary2md.
246
+ def obj2soap(soap_class, obj, info, map)
247
+ if !@allow_original_mapping and !obj.instance_variables.empty?
248
+ return nil
249
+ end
250
+ arytype = Mapping.obj2element(obj)
251
+ if arytype.name
252
+ arytype.namespace ||= RubyTypeNamespace
253
+ else
254
+ arytype = XSD::AnyTypeName
255
+ end
256
+ soap_obj = SOAPArray.new(ValueArrayName, 1, arytype)
257
+ mark_marshalled_obj(obj, soap_obj)
258
+ obj.each do |item|
259
+ soap_obj.add(Mapping._obj2soap(item, map))
260
+ end
261
+ soap_obj
262
+ end
263
+
264
+ def soap2obj(obj_class, node, info, map)
265
+ obj = Mapping.create_empty_object(obj_class)
266
+ mark_unmarshalled_obj(node, obj)
267
+ node.soap2array(obj) do |elem|
268
+ elem ? Mapping._soap2obj(elem, map) : nil
269
+ end
270
+ return true, obj
271
+ end
272
+ end
273
+
274
+ class TypedArrayFactory_ < Factory
275
+ def initialize(allow_original_mapping = false)
276
+ super()
277
+ @allow_original_mapping = allow_original_mapping
278
+ end
279
+
280
+ def obj2soap(soap_class, obj, info, map)
281
+ if !@allow_original_mapping and !obj.instance_variables.empty?
282
+ return nil
283
+ end
284
+ arytype = info[:type] || info[0]
285
+ soap_obj = SOAPArray.new(ValueArrayName, 1, arytype)
286
+ mark_marshalled_obj(obj, soap_obj)
287
+ obj.each do |var|
288
+ soap_obj.add(Mapping._obj2soap(var, map))
289
+ end
290
+ soap_obj
291
+ end
292
+
293
+ def soap2obj(obj_class, node, info, map)
294
+ if node.rank > 1
295
+ return false
296
+ end
297
+ arytype = info[:type] || info[0]
298
+ unless node.arytype == arytype
299
+ return false
300
+ end
301
+ obj = Mapping.create_empty_object(obj_class)
302
+ mark_unmarshalled_obj(node, obj)
303
+ node.soap2array(obj) do |elem|
304
+ elem ? Mapping._soap2obj(elem, map) : nil
305
+ end
306
+ return true, obj
307
+ end
308
+ end
309
+
310
+ class TypedStructFactory_ < Factory
311
+ def obj2soap(soap_class, obj, info, map)
312
+ type = info[:type] || info[0]
313
+ soap_obj = soap_class.new(type)
314
+ mark_marshalled_obj(obj, soap_obj)
315
+ if obj.class <= SOAP::Marshallable
316
+ setiv2soap(soap_obj, obj, map)
317
+ else
318
+ # allow to serialize an instance of unmarked class
319
+ setiv2soap(soap_obj, obj, map)
320
+ end
321
+ soap_obj
322
+ end
323
+
324
+ def soap2obj(obj_class, node, info, map)
325
+ type = info[:type] || info[0]
326
+ unless node.type == type
327
+ return false
328
+ end
329
+ obj = Mapping.create_empty_object(obj_class)
330
+ mark_unmarshalled_obj(node, obj)
331
+ setiv2obj(obj, node, map)
332
+ return true, obj
333
+ end
334
+ end
335
+
336
+ MapQName = XSD::QName.new(ApacheSOAPTypeNamespace, 'Map')
337
+ class HashFactory_ < Factory
338
+ def initialize(allow_original_mapping = false)
339
+ super()
340
+ @allow_original_mapping = allow_original_mapping
341
+ end
342
+
343
+ def obj2soap(soap_class, obj, info, map)
344
+ if !@allow_original_mapping and !obj.instance_variables.empty?
345
+ return nil
346
+ end
347
+ if !obj.default.nil? or
348
+ (obj.respond_to?(:default_proc) and obj.default_proc)
349
+ return nil
350
+ end
351
+ soap_obj = SOAPStruct.new(MapQName)
352
+ mark_marshalled_obj(obj, soap_obj)
353
+ obj.each do |key, value|
354
+ elem = SOAPStruct.new
355
+ elem.add("key", Mapping._obj2soap(key, map))
356
+ elem.add("value", Mapping._obj2soap(value, map))
357
+ # ApacheAxis allows only 'item' here.
358
+ soap_obj.add("item", elem)
359
+ end
360
+ soap_obj
361
+ end
362
+
363
+ def soap2obj(obj_class, node, info, map)
364
+ unless node.type == MapQName
365
+ return false
366
+ end
367
+ if node.class == SOAPStruct and node.key?('default')
368
+ return false
369
+ end
370
+ obj = Mapping.create_empty_object(obj_class)
371
+ mark_unmarshalled_obj(node, obj)
372
+ if node.class == SOAPStruct
373
+ node.each do |key, value|
374
+ obj[Mapping._soap2obj(value['key'], map)] =
375
+ Mapping._soap2obj(value['value'], map)
376
+ end
377
+ else
378
+ node.each do |value|
379
+ obj[Mapping._soap2obj(value['key'], map)] =
380
+ Mapping._soap2obj(value['value'], map)
381
+ end
382
+ end
383
+ return true, obj
384
+ end
385
+ end
386
+
387
+
388
+ end
389
+ end
@@ -0,0 +1,392 @@
1
+ # encoding: ASCII-8BIT
2
+ # SOAP4R - literal mapping registry.
3
+ # Copyright (C) 2000-2007 NAKAMURA, Hiroshi <nahi@ruby-lang.org>.
4
+
5
+ # This program is copyrighted free software by NAKAMURA, Hiroshi. You can
6
+ # redistribute it and/or modify it under the same terms of Ruby's license;
7
+ # either the dual license version in 2003, or any later version.
8
+
9
+
10
+ require 'soap/base_data'
11
+ require 'soap/mapping/mapping'
12
+ require 'soap/mapping/type_map'
13
+ require 'xsd/codegen/gensupport'
14
+ require 'xsd/namedelements'
15
+
16
+
17
+ module SOAP
18
+ module Mapping
19
+
20
+
21
+ class LiteralRegistry
22
+ include RegistrySupport
23
+
24
+ attr_accessor :excn_handler_obj2soap
25
+ attr_accessor :excn_handler_soap2obj
26
+
27
+ def initialize
28
+ super()
29
+ @excn_handler_obj2soap = nil
30
+ @excn_handler_soap2obj = nil
31
+ end
32
+
33
+ def obj2soap(obj, qname, obj_class = nil)
34
+ soap_obj = nil
35
+ if obj.is_a?(SOAPElement)
36
+ soap_obj = obj
37
+ else
38
+ soap_obj = any2soap(obj, qname, obj_class)
39
+ end
40
+ return soap_obj if soap_obj
41
+ if @excn_handler_obj2soap
42
+ soap_obj = @excn_handler_obj2soap.call(obj) { |yield_obj|
43
+ Mapping.obj2soap(yield_obj, nil, nil, MAPPING_OPT)
44
+ }
45
+ return soap_obj if soap_obj
46
+ end
47
+ raise MappingError.new("cannot map #{obj.class.name} as #{qname}")
48
+ end
49
+
50
+ # node should be a SOAPElement
51
+ def soap2obj(node, obj_class = nil)
52
+ cause = nil
53
+ begin
54
+ return any2obj(node, obj_class)
55
+ rescue MappingError
56
+ cause = $!
57
+ end
58
+ if @excn_handler_soap2obj
59
+ begin
60
+ return @excn_handler_soap2obj.call(node) { |yield_node|
61
+ Mapping.soap2obj(yield_node, nil, nil, MAPPING_OPT)
62
+ }
63
+ rescue Exception
64
+ end
65
+ end
66
+ raise MappingError.new("cannot map #{node.elename.name}/#{node.type.name} to Ruby object", cause)
67
+ end
68
+
69
+ private
70
+
71
+ MAPPING_OPT = { :no_reference => true }
72
+
73
+ def definedobj2soap(obj, definition)
74
+ obj2soap(obj, definition.elename, definition.mapped_class)
75
+ end
76
+
77
+ def any2soap(obj, qname, obj_class)
78
+ ele = nil
79
+ if obj.is_a?(SOAP::Mapping::Object)
80
+ return mappingobj2soap(obj, qname)
81
+ end
82
+ class_definition = schema_definition_from_class(obj.class)
83
+ if class_definition.nil? and obj_class
84
+ class_definition = schema_definition_from_class(obj_class)
85
+ end
86
+ elename_definition = schema_definition_from_elename(qname)
87
+ if !class_definition and !elename_definition
88
+ # no definition found
89
+ return anyobj2soap(obj, qname)
90
+ end
91
+ if !class_definition or !elename_definition
92
+ # use found one
93
+ return stubobj2soap(obj, qname, class_definition || elename_definition)
94
+ end
95
+ # found both:
96
+ if class_definition.class_for == elename_definition.class_for
97
+ # if two definitions are for the same class, give qname a priority.
98
+ return stubobj2soap(obj, qname, elename_definition)
99
+ end
100
+ # it should be a derived class
101
+ return stubobj2soap(obj, qname, class_definition)
102
+ end
103
+
104
+ def anyobj2soap(obj, qname)
105
+ ele = nil
106
+ case obj
107
+ when Hash
108
+ ele = SOAPElement.from_obj(obj, nil)
109
+ ele.elename = qname
110
+ when Array
111
+ # treat as a list of simpletype
112
+ ele = SOAPElement.new(qname, obj.join(" "))
113
+ when XSD::QName
114
+ ele = SOAPElement.new(qname)
115
+ ele.text = obj
116
+ else
117
+ # expected to be a basetype or an anyType.
118
+ # SOAPStruct, etc. is used instead of SOAPElement.
119
+ begin
120
+ ele = Mapping.obj2soap(obj, nil, nil, MAPPING_OPT)
121
+ ele.elename = qname
122
+ rescue MappingError
123
+ ele = SOAPElement.new(qname, obj.to_s)
124
+ end
125
+ end
126
+ add_attributes2soap(obj, ele)
127
+ ele
128
+ end
129
+
130
+ def stubobj2soap(obj, qname, definition)
131
+ if obj.nil?
132
+ ele = SOAPNil.new
133
+ ele.elename = qname
134
+ elsif obj.is_a?(::String)
135
+ ele = SOAPElement.new(qname, obj)
136
+ else
137
+ ele = SOAPElement.new(qname)
138
+ end
139
+ ele.qualified = definition.qualified
140
+ if definition.type
141
+ ele.type = definition.type
142
+ if definition.basetype or Mapping.root_type_hint
143
+ Mapping.reset_root_type_hint
144
+ ele.force_typed = true
145
+ end
146
+ end
147
+ if qname.nil? and definition.elename
148
+ ele.elename = definition.elename
149
+ end
150
+ return ele if obj.nil?
151
+ stubobj2soap_elements(obj, ele, definition.elements)
152
+ add_definedattributes2soap(obj, ele, definition)
153
+ ele
154
+ end
155
+
156
+ def stubobj2soap_elements(obj, ele, definition, is_choice = false)
157
+ added = false
158
+ case definition
159
+ when SchemaSequenceDefinition, SchemaEmptyDefinition
160
+ definition.each do |eledef|
161
+ ele_added = stubobj2soap_elements(obj, ele, eledef, is_choice)
162
+ added = true if ele_added
163
+ end
164
+ when SchemaChoiceDefinition
165
+ definition.each do |eledef|
166
+ added = stubobj2soap_elements(obj, ele, eledef, true)
167
+ break if added
168
+ end
169
+ else
170
+ added = true
171
+ if definition.as_any?
172
+ any = Mapping.get_attributes_for_any(obj)
173
+ SOAPElement.from_objs(any).each do |child|
174
+ ele.add(child)
175
+ end
176
+ elsif obj.respond_to?(:each) and definition.as_array?
177
+ obj.each do |item|
178
+ ele.add(definedobj2soap(item, definition))
179
+ end
180
+ else
181
+ child = Mapping.get_attribute(obj, definition.varname)
182
+ if child.nil? and (is_choice or definition.minoccurs == 0)
183
+ added = false
184
+ else
185
+ if child.respond_to?(:each) and definition.as_array?
186
+ if child.empty?
187
+ added = false
188
+ else
189
+ child.each do |item|
190
+ ele.add(definedobj2soap(item, definition))
191
+ end
192
+ end
193
+ else
194
+ ele.add(definedobj2soap(child, definition))
195
+ end
196
+ end
197
+ end
198
+ end
199
+ added
200
+ end
201
+
202
+ def mappingobj2soap(obj, qname)
203
+ ele = SOAPElement.new(qname)
204
+ obj.__xmlele.each do |key, value|
205
+ if value.is_a?(::Array)
206
+ value.each do |item|
207
+ ele.add(obj2soap(item, key))
208
+ end
209
+ else
210
+ ele.add(obj2soap(value, key))
211
+ end
212
+ end
213
+ obj.__xmlattr.each do |key, value|
214
+ ele.extraattr[key] = value
215
+ end
216
+ ele
217
+ end
218
+
219
+ def any2obj(node, obj_class = nil)
220
+ is_compound = node.is_a?(::SOAP::SOAPCompoundtype)
221
+ # trust xsi:type first
222
+ if is_compound and node.type
223
+ definition = schema_definition_from_type(node.type)
224
+ end
225
+ # element name next
226
+ definition ||= schema_definition_from_elename(node.elename)
227
+ # class defined in parent type last
228
+ if obj_class
229
+ definition ||= schema_definition_from_class(obj_class)
230
+ end
231
+ if definition
232
+ obj_class = definition.class_for
233
+ end
234
+ if is_compound
235
+ if definition
236
+ return elesoap2stubobj(node, obj_class, definition)
237
+ elsif node.is_a?(::SOAP::SOAPNameAccessible)
238
+ return elesoap2plainobj(node)
239
+ end
240
+ end
241
+ obj = Mapping.soap2obj(node, nil, obj_class, MAPPING_OPT)
242
+ add_attributes2obj(node, obj)
243
+ obj
244
+ end
245
+
246
+ def elesoap2stubobj(node, obj_class, definition)
247
+ obj = nil
248
+ if obj_class == ::String
249
+ obj = node.text
250
+ elsif obj_class < ::String and node.respond_to?(:text)
251
+ obj = obj_class.new(node.text)
252
+ else
253
+ obj = Mapping.create_empty_object(obj_class)
254
+ add_elesoap2stubobj(node, obj, definition)
255
+ end
256
+ add_attributes2stubobj(node, obj, definition)
257
+ obj
258
+ end
259
+
260
+ def elesoap2plainobj(node)
261
+ obj = nil
262
+ if !node.have_member
263
+ obj = base2obj(node, ::SOAP::SOAPString)
264
+ else
265
+ obj = anytype2obj(node)
266
+ add_elesoap2plainobj(node, obj)
267
+ end
268
+ add_attributes2obj(node, obj)
269
+ obj
270
+ end
271
+
272
+ def anytype2obj(node)
273
+ if node.is_a?(::SOAP::SOAPBasetype)
274
+ return node.data
275
+ end
276
+ ::SOAP::Mapping::Object.new
277
+ end
278
+
279
+ def add_elesoap2stubobj(node, obj, definition)
280
+ vars = {}
281
+ node.each do |name, value|
282
+ item = definition.elements.find_element(value.elename)
283
+ if item
284
+ child = elesoapchild2obj(value, item)
285
+ else
286
+ # unknown element is treated as anyType.
287
+ child = any2obj(value)
288
+ end
289
+ if item and item.as_array?
290
+ (vars[name] ||= []) << child
291
+ elsif vars.key?(name)
292
+ vars[name] = [vars[name], child].flatten
293
+ else
294
+ vars[name] = child
295
+ end
296
+ end
297
+ if obj.is_a?(::Array) and is_stubobj_elements_for_array(vars)
298
+ Array.instance_method(:replace).bind(obj).call(vars.values[0])
299
+ else
300
+ Mapping.set_attributes(obj, vars)
301
+ end
302
+ end
303
+
304
+ def elesoapchild2obj(value, eledef)
305
+ if eledef.mapped_class
306
+ if eledef.mapped_class.include?(::SOAP::SOAPBasetype)
307
+ base2obj(value, eledef.mapped_class)
308
+ else
309
+ any2obj(value, eledef.mapped_class)
310
+ end
311
+ else
312
+ child_definition = schema_definition_from_elename(eledef.elename)
313
+ if child_definition
314
+ any2obj(value, child_definition.class_for)
315
+ else
316
+ # untyped element is treated as anyType.
317
+ any2obj(value)
318
+ end
319
+ end
320
+ end
321
+
322
+ def add_attributes2stubobj(node, obj, definition)
323
+ return if obj.nil? or node.extraattr.empty?
324
+ if attributes = definition.attributes
325
+ define_xmlattr(obj)
326
+ attributes.each do |qname, class_name|
327
+ child = node.extraattr[qname]
328
+ next if child.nil?
329
+ if class_name
330
+ klass = Mapping.class_from_name(class_name)
331
+ if klass.include?(::SOAP::SOAPBasetype)
332
+ child = klass.to_data(child)
333
+ end
334
+ end
335
+ obj.__xmlattr[qname] = child
336
+ define_xmlattr_accessor(obj, qname)
337
+ end
338
+ end
339
+ end
340
+
341
+ def add_elesoap2plainobj(node, obj)
342
+ node.each do |name, value|
343
+ obj.__add_xmlele_value(value.elename, any2obj(value))
344
+ end
345
+ end
346
+
347
+ def add_attributes2obj(node, obj)
348
+ return if obj.nil? or node.extraattr.empty?
349
+ define_xmlattr(obj)
350
+ node.extraattr.each do |qname, value|
351
+ obj.__xmlattr[qname] = value
352
+ define_xmlattr_accessor(obj, qname)
353
+ end
354
+ end
355
+
356
+ # Mapping.define_attr_accessor calls define_method with proc and it exhausts
357
+ # much memory for each singleton Object. just instance_eval instead of it.
358
+ def define_xmlattr_accessor(obj, qname)
359
+ # untaint depends GenSupport.safemethodname
360
+ name = Mapping.safemethodname('xmlattr_' + qname.name).untaint
361
+ unless obj.respond_to?(name)
362
+ # untaint depends QName#dump
363
+ qnamedump = qname.dump.untaint
364
+ obj.instance_eval <<-EOS
365
+ def #{name}
366
+ @__xmlattr[#{qnamedump}]
367
+ end
368
+
369
+ def #{name}=(value)
370
+ @__xmlattr[#{qnamedump}] = value
371
+ end
372
+ EOS
373
+ end
374
+ end
375
+
376
+ # Mapping.define_attr_accessor calls define_method with proc and it exhausts
377
+ # much memory for each singleton Object. just instance_eval instead of it.
378
+ def define_xmlattr(obj)
379
+ obj.instance_variable_set('@__xmlattr', {})
380
+ unless obj.respond_to?(:__xmlattr)
381
+ obj.instance_eval <<-EOS
382
+ def __xmlattr
383
+ @__xmlattr
384
+ end
385
+ EOS
386
+ end
387
+ end
388
+ end
389
+
390
+
391
+ end
392
+ end