?HAMA

Navigation

Breadcrumbs

/ / proc / thread-self / root / opt / alt / ruby18 / lib64 / ruby / 1.8 / soap

Create

Create File | Create Folder | Upload Files | Run Command

Edit File Size: 5.40 KB

/proc/thread-self/root/opt/alt/ruby18/lib64/ruby/1.8/soap/element.rb

Text Base64

# SOAP4R - SOAP elements library
# Copyright (C) 2000, 2001, 2003-2005  NAKAMURA, Hiroshi <nahi@ruby-lang.org>.

# This program is copyrighted free software by NAKAMURA, Hiroshi.  You can
# redistribute it and/or modify it under the same terms of Ruby's license;
# either the dual license version in 2003, or any later version.

require 'xsd/qname'
require 'soap/baseData'

module SOAP

###
## SOAP elements
#
module SOAPEnvelopeElement; end

class SOAPFault < SOAPStruct
  include SOAPEnvelopeElement
  include SOAPCompoundtype

public

def faultcode
    self['faultcode']
  end

def faultstring
    self['faultstring']
  end

def faultactor
    self['faultactor']
  end

def detail
    self['detail']
  end

def faultcode=(rhs)
    self['faultcode'] = rhs
  end

def faultstring=(rhs)
    self['faultstring'] = rhs
  end

def faultactor=(rhs)
    self['faultactor'] = rhs
  end

def detail=(rhs)
    self['detail'] = rhs
  end

def initialize(faultcode = nil, faultstring = nil, faultactor = nil, detail = nil)
    super(EleFaultName)
    @elename = EleFaultName
    @encodingstyle = EncodingNamespace

if faultcode
      self.faultcode = faultcode
      self.faultstring = faultstring
      self.faultactor = faultactor
      self.detail = detail
      self.faultcode.elename = EleFaultCodeName if self.faultcode
      self.faultstring.elename = EleFaultStringName if self.faultstring
      self.faultactor.elename = EleFaultActorName if self.faultactor
      self.detail.elename = EleFaultDetailName if self.detail
    end
    faultcode.parent = self if faultcode
    faultstring.parent = self if faultstring
    faultactor.parent = self if faultactor
    detail.parent = self if detail
  end

def encode(generator, ns, attrs = {})
    SOAPGenerator.assign_ns(attrs, ns, EnvelopeNamespace)
    SOAPGenerator.assign_ns(attrs, ns, EncodingNamespace)
    attrs[ns.name(AttrEncodingStyleName)] = EncodingNamespace
    name = ns.name(@elename)
    generator.encode_tag(name, attrs)
    yield(self.faultcode)
    yield(self.faultstring)
    yield(self.faultactor)
    yield(self.detail) if self.detail
    generator.encode_tag_end(name, true)
  end
end

class SOAPBody < SOAPStruct
  include SOAPEnvelopeElement

def initialize(data = nil, is_fault = false)
    super(nil)
    @elename = EleBodyName
    @encodingstyle = nil
    if data
      if data.respond_to?(:elename)
        add(data.elename.name, data)
      else
        data.to_a.each do |datum|
          add(datum.elename.name, datum)
        end
      end
    end
    @is_fault = is_fault
  end

def encode(generator, ns, attrs = {})
    name = ns.name(@elename)
    generator.encode_tag(name, attrs)
    if @is_fault
      yield(@data)
    else
      @data.each do |data|
	yield(data)
      end
    end
    generator.encode_tag_end(name, true)
  end

def root_node
    @data.each do |node|
      if node.root == 1
	return node
      end
    end
    # No specified root...
    @data.each do |node|
      if node.root != 0
	return node
      end
    end

raise Parser::FormatDecodeError.new('no root element')
  end
end

class SOAPHeaderItem < XSD::NSDBase
  include SOAPEnvelopeElement
  include SOAPCompoundtype

public

attr_accessor :element
  attr_accessor :mustunderstand
  attr_accessor :encodingstyle

def initialize(element, mustunderstand = true, encodingstyle = nil)
    super()
    @type = nil
    @element = element
    @mustunderstand = mustunderstand
    @encodingstyle = encodingstyle
    element.parent = self if element
  end

def encode(generator, ns, attrs = {})
    attrs.each do |key, value|
      @element.extraattr[key] = value
    end
    @element.extraattr[ns.name(AttrMustUnderstandName)] =
      (@mustunderstand ? '1' : '0')
    if @encodingstyle
      @element.extraattr[ns.name(AttrEncodingStyleName)] = @encodingstyle
    end
    @element.encodingstyle = @encodingstyle if !@element.encodingstyle
    yield(@element)
  end
end

class SOAPHeader < SOAPStruct
  include SOAPEnvelopeElement

def initialize
    super(nil)
    @elename = EleHeaderName
    @encodingstyle = nil
  end

def encode(generator, ns, attrs = {})
    name = ns.name(@elename)
    generator.encode_tag(name, attrs)
    @data.each do |data|
      yield(data)
    end
    generator.encode_tag_end(name, true)
  end

def add(name, value)
    mu = (value.extraattr[AttrMustUnderstandName] == '1')
    encstyle = value.extraattr[AttrEncodingStyleName]
    item = SOAPHeaderItem.new(value, mu, encstyle)
    super(name, item)
  end

def length
    @data.length
  end
  alias size length
end

class SOAPEnvelope < XSD::NSDBase
  include SOAPEnvelopeElement
  include SOAPCompoundtype

attr_reader :header
  attr_reader :body
  attr_reader :external_content

def initialize(header = nil, body = nil)
    super()
    @type = nil
    @elename = EleEnvelopeName
    @encodingstyle = nil
    @header = header
    @body = body
    @external_content = {}
    header.parent = self if header
    body.parent = self if body
  end

def header=(header)
    header.parent = self
    @header = header
  end

def body=(body)
    body.parent = self
    @body = body
  end

def encode(generator, ns, attrs = {})
    SOAPGenerator.assign_ns(attrs, ns, elename.namespace, SOAPNamespaceTag)
    name = ns.name(@elename)
    generator.encode_tag(name, attrs)

yield(@header) if @header and @header.length > 0
    yield(@body)

generator.encode_tag_end(name, true)
  end

def to_ary
    [header, body]
  end
end

end

Exit & Reset Text mode: syntax highlighting auto-detects file type.

Directory Contents

Dirs: 4 × Files: 15

Sort:

Enable drag-to-move

Name	Size	Perms	Modified	Actions
encodingstyle DIR	-	drwxr-xr-x	2024-03-03 22:48:14	Edit Download recursive recursive
header DIR	-	drwxr-xr-x	2024-03-03 22:48:14	Edit Download recursive recursive
mapping DIR	-	drwxr-xr-x	2024-03-03 22:48:14	Edit Download recursive recursive
rpc DIR	-	drwxr-xr-x	2024-03-03 22:48:14	Edit Download recursive recursive
attachment.rb	1.99 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
baseData.rb	16.73 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
element.rb	5.40 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
generator.rb	6.66 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
httpconfigloader.rb	3.15 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
mapping.rb	381 B	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
marshal.rb	1.50 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
mimemessage.rb	4.94 KB	lrw-r--r--	2009-05-26 12:22:37	Edit Download recursive recursive
netHttpClient.rb	4.25 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
parser.rb	6.03 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
processor.rb	1.37 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
property.rb	6.92 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
soap.rb	3.75 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
streamHandler.rb	5.86 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
wsdlDriver.rb	15.75 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive