# encoding: UTF-8
# XSD4R - XML Instance parser library.
# Copyright (C) 2000-2007  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/xmlparser/parser'

 module XSD
  module XMLParser

    def create_parser(host, opt)
      XSD::XMLParser::Parser.create_parser(host, opt)
    end
    module_function :create_parser

    # $1 is necessary.
    NSParseRegexp = Regexp.new('^xmlns:?(.*)$', nil)

    def filter_ns(ns, attrs)
      ns_updated = false
      if attrs.nil? or attrs.empty?
        return [ns, attrs]
      end
      newattrs = {}
      attrs.each do |key, value|
        if NSParseRegexp =~ key
          unless ns_updated
            ns = ns.clone_ns
            ns_updated = true
          end
          # tag == '' means 'default namespace'
          # value == '' means 'no default namespace'
          tag = $1 || ''
          ns.assign(value, tag)
        else
          newattrs[key] = value
        end
      end
      return [ns, newattrs]
    end
    module_function :filter_ns

  end
end


# Provide a means to CHOOSE a preferred XML Parser and loading-order, if multiple parser gems are available.
if ENV.has_key?('SOAP4R_PARSERS')
  parser_list = ENV['SOAP4R_PARSERS'].to_s.split(',')
else
  parser_list = [
    'oxparser',     ## Uses its own C-Ruby Extension
    'nokogiriparser',     ## Depends on LibXML2, LibXSLT, and ZLib
    'libxmlparser', ## Depends on LibXML2 ; Thread-Safe ; Somewhat Broken re: Namespaces
    # ----- Pure-Ruby Parsers Below ---- #
    'ogaparser',    ## Pure-Ruby
    'rexmlparser',  ## Pure-Ruby, this is the reference implementation.
  ]
end

# Try to load XML processor.
loaded = false
parser_list.each do |name|
  begin
    require "xsd/xmlparser/#{name}"
    # XXX: for a workaround of rubygems' require inconsistency
    # XXX: MUST BE REMOVED IN THE FUTURE
    raise LoadError unless XSD::XMLParser.constants.find { |c|
      c.to_s.downcase == name
    }
    loaded = true
    break
  rescue LoadError
  end
end
unless loaded
  raise RuntimeError.new("XML processor module not found.")
end