ox 1.5.4 → 1.5.5

data/test/perf_pod.rb

@@ -1,88 +0,0 @@
-#!/usr/bin/env ruby -wW1
-
-$: << '.'
-$: << '..'
-$: << '../lib'
-$: << '../ext'
-
-if __FILE__ == $0
-  if (i = ARGV.index('-I'))
-    x,path = ARGV.slice!(i, 2)
-    $: << path
-  end
-end
-
-require 'optparse'
-require 'ox'
-require 'pod/cfg'
-require 'pod/xml'
-
-$verbose = 0
-$use_opt_format = false
-
-do_load = false
-do_dump = false
-
-opts = OptionParser.new
-opts.on("-v", "increase verbosity")                         { $verbose += 1 }
-opts.on("-o", "optimized format")                           { $use_opt_format = true }
-opts.on("-h", "--help", "Show this display")                { puts opts; Process.exit!(0) }
-files = opts.parse(ARGV)
-
-
-$ox_load_time = 0
-$opt_load_time = 0
-$no_load_time = 0
-$ox_dump_time = 0
-$no_dump_time = 0
-
-files = Dir.glob('data/**/*.xml')
-xml_data = files.map { |f| File.read(f) }
-
-objs = []
-start = Time.now
-xml_data.each do |xml|
-  objs << Ox.load(xml, :mode => :object, :trace => 0)
-end
-$ox_load_time = Time.now - start
-puts "Loading #{files.size} files with Ox took #{$ox_load_time} seconds."
-
-start = Time.now
-objs.each do |o|
-  xml = Ox.dump(o, :opt_format => $use_opt_format, :indent => 0)
-end
-$ox_dump_time = Time.now - start
-puts "Dumping #{files.size} files with Ox took #{$ox_dump_time} seconds."
-
-
-opt_data = objs.map { |o| Ox.dump(o, :opt_format => $use_opt_format, :indent => 0) }
-mode = $use_opt_format ? :optimized : :object
-objs = []
-start = Time.now
-opt_data.each do |xml|
-  objs << Ox.load(xml, :mode => mode, :trace => 0)
-end
-$opt_load_time = Time.now - start
-puts "Loading #{files.size} files with Optimized Ox took #{$opt_load_time} seconds.\n\n"
-
-
-objs = []
-start = Time.now
-xml_data.each do |xml|
-  objs << ::Pod::Xml.to_obj(xml)
-end
-$no_load_time = Time.now - start
-puts "Loading Pod::Xml #{files.size} files took #{$no_load_time} seconds."
-
-start = Time.now
-objs.each do |o|
-  xml = ::Pod::Xml.to_xml(o)
-end
-$no_dump_time = Time.now - start
-puts "Dumping #{files.size} files with Pod::Xml took #{$no_dump_time} seconds.\n\n"
-
-puts ">>> Ox is %0.1f faster than Pod::Xml loading." % [$no_load_time/$ox_load_time]
-puts ">>> Optimized Ox is %0.1f faster than Pod::Xml loading." % [$no_load_time/$opt_load_time]
-puts ">>> Ox is %0.1f faster than Pod::Xml dumping.\n\n" % [$no_dump_time/$ox_dump_time]
-
-puts ">>> Ox is %0.1f faster than Pod::Xml dumping and loading." % [($no_dump_time + $no_load_time)/($ox_dump_time + $opt_load_time)]

data/test/perf_sax.rb

@@ -1,233 +0,0 @@
-#!/usr/bin/env ruby -wW1
-
-$: << '.'
-$: << '..'
-$: << '../lib'
-$: << '../ext'
-
-if __FILE__ == $0
-  while (i = ARGV.index('-I'))
-    x,path = ARGV.slice!(i, 2)
-    $: << path
-  end
-end
-
-require 'optparse'
-require 'ox'
-require 'files'
-begin
-  require 'nokogiri'
-rescue Exception => e
-end
-begin
-  require 'libxml'
-rescue Exception => e
-end
-
-$verbose = 0
-$ox_only = false
-$all_cbs = false
-$filename = nil # nil indicates new file names perf.xml will be created and used
-$filesize = 1000 # KBytes
-$iter = 100
-
-opts = OptionParser.new
-opts.on("-v", "increase verbosity")                            { $verbose += 1 }
-opts.on("-x", "ox only")                                       { $ox_only = true }
-opts.on("-a", "all callbacks")                                 { $all_cbs = true }
-opts.on("-f", "--file [String]", String, "filename")           { |f| $filename = f }
-opts.on("-i", "--iterations [Int]", Integer, "iterations")     { |i| $iter = i }
-opts.on("-s", "--size [Int]", Integer, "file size in KBytes")  { |s| $filesize = s }
-opts.on("-h", "--help", "Show this display")                   { puts opts; Process.exit!(0) }
-rest = opts.parse(ARGV)
-
-$xml_str = nil
-$ox_time = 0
-$no_time = 0
-$lx_time = 0
-
-# size is in Kbytes
-def create_file(filename, size)
-  head = %{<?xml version="1.0"?>
-<?ox version="1.0" mode="object" circular="no" xsd_date="no"?>
-<!DOCTYPE table PUBLIC "-//ox//DTD TABLE 1.0//EN" "http://www.ohler.com/DTDs/TestTable-1.0.dtd">
-<table>
-}
-  tail = %{</table>
-}
-  row = %{  <!-- row %08d element -->
-  <row id="%08d">
-    <cell id="A" type="Fixnum">1234</cell>
-    <cell id="B" type="String">A string.</cell>
-    <cell id="C" type="String">This is a longer string that stretches over a larger number of characters.</cell>
-    <cell id="D" type="Float">-12.345</cell>
-    <cell id="E" type="Date">2011-09-18 23:07:26 +0900</cell>
-    <cell id="F" type="Image"><![CDATA[xx00xx00xx00xx00xx00xx00xx00xx00xx00xx00xx00xx00xx00xx00xx00xx00xx00xx00xx00]]></cell>
-  </row>
-}
-  cnt = (size * 1000 - head.size - tail.size) / row.size
-  File.open(filename, "w") do |f|
-    f.write(head)
-    cnt.times do |i|
-      f.write(row % [i,i])
-    end
-    f.write(tail)
-  end
-end
-
-class OxSax < ::Ox::Sax
-  def error(message, line, column); puts message; end
-end
-
-class OxAllSax < OxSax
-  def start_element(name); end
-  def attr(name, value); end
-  def end_element(name); end
-  def text(value); end
-  def instruct(target); end
-  def doctype(value); end
-  def comment(value); end
-  def cdata(value); end
-end
-
-unless defined?(::Nokogiri).nil?
-  class NoSax < Nokogiri::XML::SAX::Document
-    def error(message); puts message; end
-    def warning(message); puts message; end
-  end
-  class NoAllSax < NoSax
-    def start_element(name, attrs = []); end
-    def characters(text); end
-    def cdata_block(string); end
-    def comment(string); end
-    def end_document(); end
-    def end_element(name); end
-    def start_document(); end
-    def xmldecl(version, encoding, standalone); end
-  end
-end
-
-unless defined?(::LibXML).nil?
-  class LxSax
-    include LibXML::XML::SaxParser::Callbacks
-  end
-  class LxAllSax < LxSax
-    def on_start_element(element, attributes); end
-    def on_cdata_block(cdata); end
-    def on_characters(chars); end
-    def on_comment(msg); end
-    def on_end_document(); end
-    def on_end_element(element); end
-    def on_end_element_ns(name, prefix, uri); end
-    def on_error(msg); end
-    def on_external_subset(name, external_id, system_id); end
-    def on_has_external_subset(); end
-    def on_has_internal_subset(); end
-    def on_internal_subset(name, external_id, system_id); end
-    def on_is_standalone(); end
-    def on_processing_instruction(target, data); end
-    def on_reference(name); end
-    def on_start_document(); end
-    def on_start_element_ns(name, attributes, prefix, uri, namespaces); end
-  end
-end
-
-def perf_stringio()
-  start = Time.now
-  handler = $all_cbs ? OxAllSax.new() : OxSax.new()
-  $iter.times do
-    input = StringIO.new($xml_str)
-    Ox.sax_parse(handler, input)
-    input.close
-  end
-  $ox_time = Time.now - start
-  puts "StringIO SAX parsing #{$iter} times with Ox took #{$ox_time} seconds."
-
-  return if $ox_only
-
-  unless defined?(::Nokogiri).nil?
-    handler = Nokogiri::XML::SAX::Parser.new($all_cbs ? NoAllSax.new() : NoSax.new())
-    start = Time.now
-    $iter.times do
-      input = StringIO.new($xml_str)
-      handler.parse(input)
-      input.close
-    end
-    $no_time = Time.now - start
-    puts "StringIO SAX parsing #{$iter} times with Nokogiri took #{$no_time} seconds."
-  end
-
-  unless defined?(::LibXML).nil?
-    start = Time.now
-    $iter.times do
-      input = StringIO.new($xml_str)
-      parser = LibXML::XML::SaxParser.io(input)
-      parser.callbacks = $all_cbs ? LxAllSax.new() : LxSax.new()
-      parser.parse
-      input.close
-    end
-    $lx_time = Time.now - start
-    puts "StringIO SAX parsing #{$iter} times with LibXML took #{$lx_time} seconds."
-  end
-
-  puts "\n"
-  puts ">>> Ox is %0.1f faster than Nokogiri SAX parsing using StringIO." % [$no_time/$ox_time] unless defined?(::Nokogiri).nil?
-  puts ">>> Ox is %0.1f faster than LibXML SAX parsing using StringIO." % [$lx_time/$ox_time] unless defined?(::LibXML).nil?
-  puts "\n"
-end
-
-def perf_fileio()
-  puts "\n"
-  puts "A #{$filesize} KByte XML file was parsed #{$iter} times for this test."
-  puts "\n"
-  start = Time.now
-  handler = $all_cbs ? OxAllSax.new() : OxSax.new()
-  $iter.times do
-    input = IO.open(IO.sysopen($filename))
-    Ox.sax_parse(handler, input)
-    input.close
-  end
-  $ox_time = Time.now - start
-  puts "File IO SAX parsing #{$iter} times with Ox took #{$ox_time} seconds."
-
-  return if $ox_only
-
-  unless defined?(::Nokogiri).nil?
-    handler = Nokogiri::XML::SAX::Parser.new($all_cbs ? NoAllSax.new() : NoSax.new())
-    start = Time.now
-    $iter.times do
-      input = IO.open(IO.sysopen($filename))
-      handler.parse(input)
-      input.close
-    end
-    $no_time = Time.now - start
-    puts "File IO SAX parsing #{$iter} times with Nokogiri took #{$no_time} seconds."
-  end
-
-  unless defined?(::LibXML).nil?
-    start = Time.now
-    $iter.times do
-      input = IO.open(IO.sysopen($filename))
-      parser = LibXML::XML::SaxParser.io(input)
-      parser.callbacks = $all_cbs ? LxAllSax.new() : LxSax.new()
-      parser.parse
-      input.close
-    end
-    $lx_time = Time.now - start
-    puts "File IO SAX parsing #{$iter} times with LibXML took #{$lx_time} seconds."
-  end
-
-  puts "\n"
-  puts ">>> Ox is %0.1f faster than Nokogiri SAX parsing using file IO." % [$no_time/$ox_time] unless defined?(::Nokogiri).nil?
-  puts ">>> Ox is %0.1f faster than LibXML SAX parsing using file IO." % [$lx_time/$ox_time] unless defined?(::LibXML).nil?
-  puts "\n"
-end
-
-if $filename.nil?
-  create_file('perf.xml', $filesize)
-  $filename = 'perf.xml'
-end
-$xml_str = File.read($filename)
-
-# perf_stringio()
-perf_fileio()

data/test/perf_write.rb

@@ -1,80 +0,0 @@
-#!/usr/bin/env ruby -wW1
-
-$: << '.'
-
-if __FILE__ == $0
-  if (i = ARGV.index('-I'))
-    x,path = ARGV.slice!(i, 2)
-    $: << path
-  end
-end
-
-require 'optparse'
-require 'pp'
-require 'nokogiri'
-require 'ox'
-
-ox_only = false
-it = 1000
-
-opts = OptionParser.new
-opts.on("-x", "ox only")                                      { ox_only = true }
-opts.on("-i", "--iterations [Int]", Integer, "iterations")    { |i| it = i }
-opts.on("-h", "--help", "Show this display")                  { puts opts }
-files = opts.parse(ARGV)
-
-obj = nil
-
-puts "to String and writing #{files}\n\n"
-
-data = files.map do |f|
-  ox_obj = Ox.parse_file(f)
-  xml = File.read(f)
-  no_obj = Nokogiri::XML::Document.parse(xml, nil, nil, Nokogiri::XML::ParseOptions::DEFAULT_XML | Nokogiri::XML::ParseOptions::NOBLANKS)
-  [f, ox_obj, no_obj]
-end
-
-start = Time.now
-data.each do |d|
-  (1..it).each do
-    xml = d[1].to_s
-  end
-end
-ox_time = Time.now - start
-puts "to String #{it} times with ox took #{ox_time} seconds."
-
-#puts obj.to_s
-
-=begin
-start = Time.now
-data.each do |d|
-  (1..it).each do
-    xml = d[1].to_s
-  end
-end
-ox_time = Time.now - start
-puts "to file #{it} times with ox took #{ox_time} seconds.\n\n"
-=end
-if !ox_only
-
-  start = Time.now
-  data.each do |d|
-    (1..it).each do
-      xml = d[2].to_s
-    end
-  end
-  no_time = Time.now - start
-  puts "to String #{it} times with nokogiri took #{no_time} seconds."
-=begin
-  start = Time.now
-  data.each do |d|
-    xml = d[1]
-    (1..it).each do
-      xml = d[2].to_s
-    end
-  end
-  no_time = Time.now - start
-  puts "to file #{it} times with nokogiri took #{no_time} seconds.\n\n"
-=end
-  puts "Ox is %0.1f faster than Nokogiri" % [no_time/ox_time]
-end

data/test/sample.rb

@@ -1,55 +0,0 @@
-#!/usr/bin/env ruby -wW2
-
-if $0 == __FILE__
-  $: << '.'
-  $: << '..'
-  $: << '../lib'
-  $: << '../ext'
-end
-
-require 'pp'
-require 'sample/doc'
-
-
-def sample_doc(size=3)
-  colors = [ :black, :gray, :white, :red, :blue, :yellow, :green, :purple, :orange ]
-
-  d = ::Sample::Doc.new('Sample')
-
-  # add some history
-  (0..size * 10).each do |i|
-    d.add_change("Changed at t+#{i}.")
-  end
-
-  # add some layers
-  (1..size).each do |i|
-    layer = ::Sample::Layer.new("Layer-#{i}")
-    (1..size).each do |j|
-      g = ::Sample::Group.new
-      (1..size).each do |k|
-        g2 = ::Sample::Group.new
-        r = ::Sample::Rect.new(j * 40 + 10.0, i * 10.0,
-                                 10.123456 / k, 10.0 / k, colors[(i + j + k) % colors.size])
-        r.add_prop(:part_of, layer.name)
-        g2 << r
-        g2 << ::Sample::Text.new("#{k} in #{j}", r.left, r.top, r.width, r.height)
-        g << g2
-      end
-      g2 = ::Sample::Group.new
-      (1..size).each do |k|
-        o = ::Sample::Oval.new(j * 40 + 12.0, i * 10.0 + 2.0,
-                                 6.0 / k, 6.0 / k, colors[(i + j + k) % colors.size])
-        o.add_prop(:inside, true)
-        g << o
-      end
-      g << g2
-      layer << g
-    end
-    d.layers[layer.name] = layer
-  end
-
-  # some properties
-  d.add_prop(:purpose, 'an example')
-
-  d
-end