File Manager

X7ROOT File Manager

Current Path: /opt/alt/ruby18/lib64/ruby/1.8/soap

opt / alt / ruby18 / lib64 / ruby / 1.8 / soap /

?? ..
?? attachment.rb(1.99 KB)
?? baseData.rb(16.73 KB)
?? element.rb(5.4 KB)
?? encodingstyle
?? generator.rb(6.66 KB)
?? header
?? httpconfigloader.rb(3.15 KB)
?? mapping
?? mapping.rb(381 B)
?? marshal.rb(1.5 KB)
?? mimemessage.rb(4.94 KB)
?? netHttpClient.rb(4.25 KB)
?? parser.rb(6.03 KB)
?? processor.rb(1.37 KB)
?? property.rb(6.92 KB)
?? rpc
?? soap.rb(3.75 KB)
?? streamHandler.rb(5.86 KB)
?? wsdlDriver.rb(15.75 KB)

Editing: mimemessage.rb

# SOAP4R - MIME Message implementation.
# Copyright (C) 2002  Jamie Herre.

# 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 'soap/attachment'

module SOAP

# Classes for MIME message handling.  Should be put somewhere else!
# Tried using the 'tmail' module but found that I needed something
# lighter in weight.

class MIMEMessage
  class MIMEMessageError < StandardError; end

MultipartContentType = 'multipart/\w+'

class Header
    attr_accessor :str, :key, :root

def initialize
      @attrs = {}
    end

def [](key)
      @attrs[key]
    end

def []=(key, value)
      @attrs[key] = value
    end

def to_s
      @key + ": " + @str
    end
  end

class Headers < Hash
    def self.parse(str)
      new.parse(str)
    end

def parse(str)
      header_cache = nil
      str.each do |line|
	case line
	when /^\A[^\: \t]+:\s*.+$/
	  parse_line(header_cache) if header_cache
	  header_cache = line.sub(/\r?\n\z/, '')
	when /^\A\s+(.*)$/
	  # a continuous line at the beginning line crashes here.
	  header_cache << line
	else
	  raise RuntimeError.new("unexpected header: #{line.inspect}")
	end
      end
      parse_line(header_cache) if header_cache
      self
    end

def parse_line(line)
      if /^\A([^\: \t]+):\s*(.+)\z/ =~ line
    	header = parse_rhs($2.strip)
	header.key = $1.strip
	self[header.key.downcase] = header
      else
	raise RuntimeError.new("unexpected header line: #{line.inspect}")
      end
    end

def parse_rhs(str)
      a = str.split(/;+\s+/)
      header = Header.new
      header.str = str
      header.root = a.shift
      a.each do |pair|
	if pair =~ /(\w+)\s*=\s*"?([^"]+)"?/
	  header[$1.downcase] = $2
	else
	  raise RuntimeError.new("unexpected header component: #{pair.inspect}")
	end
      end
      header
    end

def add(key, value)
      if key != nil and value != nil
	header = parse_rhs(value)
	header.key = key
	self[key.downcase] = header
      end
    end

def to_s
      self.values.collect { |hdr|
	hdr.to_s
      }.join("\r\n")
    end
  end

class Part
    attr_accessor :headers, :body

def initialize
      @headers = Headers.new
      @headers.add("Content-Transfer-Encoding", "8bit")
      @body = nil
      @contentid = nil
    end

def self.parse(str)
      new.parse(str)
    end

def parse(str)
      headers, body = str.split(/\r\n\r\n/s)
      if headers != nil and body != nil
	@headers = Headers.parse(headers)
	@body = body.sub(/\r\n\z/, '')
      else
	raise RuntimeError.new("unexpected part: #{str.inspect}")
      end
      self
    end

def contentid
      if @contentid == nil and @headers.key?('content-id')
	@contentid = @headers['content-id'].str
	@contentid = $1 if @contentid =~ /^<(.+)>$/
      end
      @contentid
    end

alias content body

def to_s
      @headers.to_s + "\r\n\r\n" + @body
    end
  end

def initialize
    @parts = []
    @headers = Headers.new
    @root = nil
  end

def self.parse(head, str)
    new.parse(head, str)
  end

attr_reader :parts, :headers

def close
    @headers.add(
      "Content-Type",
      "multipart/related; type=\"text/xml\"; boundary=\"#{boundary}\"; start=\"#{@parts[0].contentid}\""
    )
  end

def parse(head, str)
    @headers = Headers.parse(head + "\r\n" + "From: jfh\r\n")
    boundary = @headers['content-type']['boundary']
    if boundary != nil
      parts = str.split(/--#{Regexp.quote(boundary)}\s*(?:\r\n|--\r\n)/)
      part = parts.shift	# preamble must be ignored.
      @parts = parts.collect { |part| Part.parse(part) }
    else
      @parts = [Part.parse(str)]
    end
    if @parts.length < 1
      raise MIMEMessageError.new("This message contains no valid parts!")
    end
    self
  end

def root
    if @root == nil
      start = @headers['content-type']['start']
      @root = (start && @parts.find { |prt| prt.contentid == start }) ||
	@parts[0]
    end
    @root
  end

def boundary
    if @boundary == nil
      @boundary = "----=Part_" + __id__.to_s + rand.to_s
    end
    @boundary
  end

def add_part(content)
    part = Part.new
    part.headers.add("Content-Type",
      "text/xml; charset=" + XSD::Charset.xml_encoding_label)
    part.headers.add("Content-ID", Attachment.contentid(part))
    part.body = content
    @parts.unshift(part)
  end

def add_attachment(attach)
    part = Part.new
    part.headers.add("Content-Type", attach.contenttype)
    part.headers.add("Content-ID", attach.mime_contentid)
    part.body = attach.content
    @parts.unshift(part)
  end

def has_parts?
    (@parts.length > 0)
  end

def headers_str
    @headers.to_s
  end

def content_str
    str = ''
    @parts.each do |prt|
      str << "--" + boundary + "\r\n"
      str << prt.to_s + "\r\n"
    end
    str << '--' + boundary + "--\r\n"
    str
  end

def to_s
    str = headers_str + "\r\n\r\n" + content_str
  end
end

end

X7ROOT File Manager

Editing: mimemessage.rb

Upload File

Create Folder