Module: WSDL::SOAP::MappingRegistryCreatorSupport

Includes:
ClassDefCreatorSupport, XSD::CodeGen
Included in:
EncodedMappingRegistryCreator, LiteralMappingRegistryCreator
Defined in:
lib/wsdl/soap/mappingRegistryCreatorSupport.rb

Overview

requires @defined_const = {}, @dump_with_inner, @modulepath

Constant Summary collapse

DEFAULT_ITEM_NAME =
XSD::QName.new(nil, 'item')

Constants included from XSD::CodeGen

XSD::CodeGen::CONSTANTS, XSD::CodeGen::KEYWORDS

Instance Method Summary collapse

Methods included from ClassDefCreatorSupport

#assign_const, #basetype_mapped_class, #create_type_name, #dq, #dqname, #dump_method_signature, #mapped_class_basename, #mapped_class_name, #ndq, #nsym, #sym

Methods included from XSD::CodeGen::GenSupport

capitalize, constant?, #format, keyword?, safeconstname, safeconstname?, safemethodname, safemethodname?, safevarname, safevarname?, uncapitalize

Instance Method Details

#create_array_element_definition(typedef, mpath) ⇒ Object

used when “soapenc:arrayType” definition



324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 324

def create_array_element_definition(typedef, mpath)
  child_type = typedef.child_type
  child_element = typedef.find_aryelement
  if child_type == XSD::AnyTypeName
    type = nil
  elsif child_element
    if klass = element_basetype(child_element)
      type = klass.name
    else
      typename = child_element.type || child_element.name
      type = mapped_class_name(typename, mpath)
    end
  elsif child_type
    type = mapped_class_name(child_type, mpath)
  else
    type = nil
  end
  occurrence = [0, nil]
  if child_element and child_element.name
    if child_element.map_as_array?
      type << '[]' if type
      occurrence = [child_element.minoccurs, child_element.maxoccurs]
    end
    child_element_name = child_element.name
  else
    child_element_name = DEFAULT_ITEM_NAME
  end
  [child_element_name.name, child_element_name, type, occurrence]
end

#define_attribute(attributes) ⇒ Object



200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 200

def define_attribute(attributes)
  schema_attribute = []
  attributes.each do |attribute|
    name = name_attribute(attribute)
    if klass = attribute_basetype(attribute)
      type = klass.name
    else
      warn("unresolved attribute type #{attribute.type} for #{name}")
      type = nil
    end
    schema_attribute << [name, type]
  end
  "{\n    " +
    schema_attribute.collect { |name, type|
      assign_const(name.namespace, 'Ns')
      dqname(name) + ' => ' + ndq(type)
    }.join(",\n    ") +
  "\n  }"
end

#define_dump_class(var, mpath, qname, typedef, as_element, opt) ⇒ Object



354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 354

def define_dump_class(var, mpath, qname, typedef, as_element, opt)
  var[:class] = mapped_class_name(qname, mpath)
  if as_element
    var[:schema_name] = as_element
    schema_ns = as_element.namespace
  elsif typedef.name.nil?
    var[:schema_name] = qname
    schema_ns = qname.namespace
  else
    var[:schema_type] = qname
    schema_ns = qname.namespace
  end
  var[:is_anonymous] = opt[:is_anonymous] if opt.key?(:is_anonymous)
  # true, false, or nil
  if opt.key?(:qualified)
    var[:schema_qualified] = opt[:qualified].to_s
  end
end

#dump_array_typemap(mpath, qname, typedef, as_element, opt) ⇒ Object



44
45
46
47
48
49
50
51
52
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 44

def dump_array_typemap(mpath, qname, typedef, as_element, opt)
  if typedef.find_soapenc_arytype
    if opt[:encoded]
      dump_encoded_array_typemap(mpath, qname, typedef, as_element, opt)
    end
  else
    dump_literal_array_typemap(mpath, qname, typedef, as_element, opt)
  end
end

#dump_complex_typemap(mpath, qname, typedef, as_element, opt) ⇒ Object



54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 54

def dump_complex_typemap(mpath, qname, typedef, as_element, opt)
  var = {}
  define_dump_class(var, mpath, qname, typedef, as_element, opt)
  schema_ns = (var[:schema_name] || var[:schema_type]).namespace
  if var[:schema_type] and typedef.base
    var[:schema_basetype] = typedef.base
  end
  parentmodule = var[:class]
  parsed_element =
    parse_elements(typedef.elements, qname.namespace, parentmodule, opt)
  if typedef.choice?
    parsed_element.unshift(:choice)
  end
  var[:schema_element] = dump_schema_element_definition(parsed_element, 2)
  unless typedef.attributes.empty?
    var[:schema_attribute] = define_attribute(typedef.attributes)
  end
  assign_const(schema_ns, 'Ns')
  dump_entry(@varname, var)
end

#dump_complextypedef(mpath, qname, typedef, as_element = nil, opt = {}) ⇒ Object



27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 27

def dump_complextypedef(mpath, qname, typedef, as_element = nil, opt = {})
  case typedef.compoundtype
  when :TYPE_STRUCT, :TYPE_EMPTY
    dump_complex_typemap(mpath, qname, typedef, as_element, opt)
  when :TYPE_ARRAY
    dump_array_typemap(mpath, qname, typedef, as_element, opt)
  when :TYPE_SIMPLE
    dump_simple_typemap(mpath, qname, typedef, as_element, opt)
  when :TYPE_MAP
    # mapped as a general Hash
    nil
  else
    raise RuntimeError.new(
      "unknown kind of complexContent: #{typedef.compoundtype}")
  end
end

#dump_encoded_array_typemap(mpath, qname, typedef, as_element, opt) ⇒ Object



310
311
312
313
314
315
316
317
318
319
320
321
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 310

def dump_encoded_array_typemap(mpath, qname, typedef, as_element, opt)
  arytype = typedef.find_arytype || XSD::AnyTypeName
  type = XSD::QName.new(arytype.namespace, arytype.name.sub(/\[(?:,)*\]$/, ''))
  return <<__EOD__
#{@varname}.set(
#{mapped_class_name(qname, mpath)},
::SOAP::SOAPArray,
::SOAP::Mapping::EncodedRegistry::TypedArrayFactory,
{ :type => #{dqname(type)} }
)
__EOD__
end

#dump_entry(regname, var) ⇒ Object



220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 220

def dump_entry(regname, var)
  "#{regname}.register(\n  " +
    [
      dump_entry_item(var, :class),
      dump_entry_item(var, :soap_class),
      dump_entry_item(var, :schema_name, :qname),
      dump_entry_item(var, :schema_type, :qname),
      dump_entry_item(var, :is_anonymous),
      dump_entry_item(var, :schema_basetype, :qname),
      dump_entry_item(var, :schema_qualified),
      dump_entry_item(var, :schema_element),
      dump_entry_item(var, :schema_attribute)
    ].compact.join(",\n  ") +
  "\n)\n"
end

#dump_entry_item(var, key, dump_type = :none) ⇒ Object



236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 236

def dump_entry_item(var, key, dump_type = :none)
  if var.key?(key)
    case dump_type
    when :none
      ":#{key} => #{var[key]}"
    when :string
      if @defined_const.key?(var[key])
        ":#{key} => #{@defined_const[var[key]]}"
      else
        ":#{key} => #{ndq(var[key])}"
      end
    when :qname
      qname = var[key]
      if @defined_const.key?(qname.namespace)
        ns = @defined_const[qname.namespace]
      else
        ns = ndq(qname.namespace)
      end
      ":#{key} => XSD::QName.new(#{ns}, #{ndq(qname.name)})"
    else
      raise "Unknown dump type: #{dump_type}"
    end
  end
end

#dump_literal_array_typemap(mpath, qname, typedef, as_element, opt) ⇒ Object



296
297
298
299
300
301
302
303
304
305
306
307
308
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 296

def dump_literal_array_typemap(mpath, qname, typedef, as_element, opt)
  var = {}
  define_dump_class(var, mpath, qname, typedef, as_element, opt)
  schema_ns = (var[:schema_name] || var[:schema_type]).namespace
  parsed_element =
    parse_elements(typedef.elements, qname.namespace, var[:class], opt)
  if parsed_element.empty?
    parsed_element = [create_array_element_definition(typedef, mpath)]
  end
  var[:schema_element] = dump_schema_element_definition(parsed_element, 2)
  assign_const(schema_ns, 'Ns')
  dump_entry(@varname, var)
end

#dump_occurrence(occurrence) ⇒ Object



123
124
125
126
127
128
129
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 123

def dump_occurrence(occurrence)
  if occurrence and occurrence != [1, 1] # default
    minoccurs, maxoccurs = occurrence
    maxoccurs ||= 'nil'
    "[#{minoccurs}, #{maxoccurs}]"
  end
end

#dump_schema_element(schema_element, indent = 0) ⇒ Object



106
107
108
109
110
111
112
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 106

def dump_schema_element(schema_element, indent = 0)
  sp = ' ' * indent
  delimiter = ",\n" + sp
  sp + schema_element.collect { |definition|
    dump_schema_element_definition(definition, indent)
  }.join(delimiter)
end

#dump_schema_element_definition(definition, indent = 0) ⇒ Object



86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 86

def dump_schema_element_definition(definition, indent = 0)
  return '[]' if definition.empty?
  sp = ' ' * indent
  if definition[0] == :choice
    definition.shift
    "[ :choice,\n" +
      dump_schema_element(definition, indent + 2) + "\n" + sp + "]"
  elsif definition[0].is_a?(::Array)
    "[\n" +
      dump_schema_element(definition, indent + 2) + "\n" + sp + "]"
  else
    varname, name, type, occurrence = definition
    '[' + [
      varname.dump,
      dump_type(name, type),
      dump_occurrence(occurrence)
    ].compact.join(', ') + ']'
  end
end

#dump_simple_typemap(mpath, qname, typedef, as_element, opt) ⇒ Object



75
76
77
78
79
80
81
82
83
84
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 75

def dump_simple_typemap(mpath, qname, typedef, as_element, opt)
  var = {}
  define_dump_class(var, mpath, qname, typedef, as_element, opt)
  schema_ns = (var[:schema_name] || var[:schema_type]).namespace
  unless typedef.attributes.empty?
    var[:schema_attribute] = define_attribute(typedef.attributes)
  end
  assign_const(schema_ns, 'Ns')
  dump_entry(@varname, var)
end

#dump_simpletypedef(mpath, qname, simpletype, as_element = nil, opt = {}) ⇒ Object



261
262
263
264
265
266
267
268
269
270
271
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 261

def dump_simpletypedef(mpath, qname, simpletype, as_element = nil, opt = {})
  if simpletype.restriction
    dump_simpletypedef_restriction(mpath, qname, simpletype, as_element, opt)
  elsif simpletype.list
    dump_simpletypedef_list(mpath, qname, simpletype, as_element, opt)
  elsif simpletype.union
    dump_simpletypedef_union(mpath, qname, simpletype, as_element, opt)
  else
    raise RuntimeError.new("unknown kind of simpletype: #{simpletype}")
  end
end

#dump_simpletypedef_list(mpath, qname, typedef, as_element, opt) ⇒ Object



286
287
288
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 286

def dump_simpletypedef_list(mpath, qname, typedef, as_element, opt)
  nil
end

#dump_simpletypedef_restriction(mpath, qname, typedef, as_element, opt) ⇒ Object



273
274
275
276
277
278
279
280
281
282
283
284
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 273

def dump_simpletypedef_restriction(mpath, qname, typedef, as_element, opt)
  restriction = typedef.restriction
  unless restriction.enumeration?
    # not supported.  minlength?
    return nil
  end
  var = {}
  define_dump_class(var, mpath, qname, typedef, as_element, opt)
  schema_ns = (var[:schema_name] || var[:schema_type]).namespace
  assign_const(schema_ns, 'Ns')
  dump_entry(@varname, var)
end

#dump_simpletypedef_union(mpath, qname, typedef, as_element, opt) ⇒ Object



290
291
292
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 290

def dump_simpletypedef_union(mpath, qname, typedef, as_element, opt)
  nil
end

#dump_type(name, type) ⇒ Object



114
115
116
117
118
119
120
121
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 114

def dump_type(name, type)
  if name
    assign_const(name.namespace, 'Ns')
    '[' + ndq(type) + ', ' + dqname(name) + ']'
  else
    ndq(type)
  end
end

#dump_with_innerObject



21
22
23
24
25
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 21

def dump_with_inner
  @dump_with_inner = []
  @dump_with_inner.unshift(yield)
  @dump_with_inner.join("\n")
end

#parse_elements(elements, base_namespace, mpath, opt) ⇒ Object



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
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
# File 'lib/wsdl/soap/mappingRegistryCreatorSupport.rb', line 131

def parse_elements(elements, base_namespace, mpath, opt)
  schema_element = []
  any = false
  elements.each do |element|
    case element
    when XMLSchema::Any
      # only 1 <any/> is allowed for now.
      raise RuntimeError.new("duplicated 'any'") if any
      any = true
      varname = 'any' # not used
      eleqname = XSD::AnyTypeName
      type = nil
      occurrence = nil
      schema_element << [varname, eleqname, type, occurrence]
    when XMLSchema::Element
      next if element.ref == SchemaName
      typebase = @modulepath
      if element.anonymous_type?
        child_opt = {
          :qualified => (element.elementform == 'qualified'),
          :is_anonymous => true
        }
        @dump_with_inner << dump_complextypedef(mpath, element.name, element.local_complextype, nil, child_opt)
        typebase = mpath
      end
      type = create_type_name(typebase, element)
      name = name_element(element).name
      varname = safevarname(name)
      if element.map_as_array?
        if type
          type += '[]'
        else
          type = '[]'
        end
      end
      # nil means @@schema_ns + varname
      eleqname = element.name || element.ref
      if eleqname && varname == name && eleqname.namespace == base_namespace
        eleqname = nil
      end
      occurrence = [element.minoccurs, element.maxoccurs]
      schema_element << [varname, eleqname, type, occurrence]
    when WSDL::XMLSchema::Sequence
      child_schema_element =
        parse_elements(element.elements, base_namespace, mpath, opt)
      schema_element << child_schema_element
    when WSDL::XMLSchema::Choice
      child_schema_element =
        parse_elements(element.elements, base_namespace, mpath, opt)
      if !element.map_as_array?
        # choice + maxOccurs="unbounded" is treated just as 'all' now.
        child_schema_element.unshift(:choice)
      end
      schema_element << child_schema_element
    when WSDL::XMLSchema::Group
      if element.content.nil?
        warn("no group definition found: #{element}")
        next
      end
      child_schema_element =
        parse_elements(element.content.elements, base_namespace, mpath, opt)
      schema_element.concat(child_schema_element)
    else
      raise RuntimeError.new("unknown type: #{element}")
    end
  end
  schema_element
end