plist 2.1.0 → 2.1.1

data/MIT-LICENSE

@@ -0,0 +1,21 @@
+Copyright (c) 2006, Ben Bleything <ben@bleything.net>
+and Patrick May <patrick@hexane.org>
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be included
+in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY
+KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE
+WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README

@@ -0,0 +1,36 @@
+= All-purpose Property List manipulation library
+
+Plist is a library to manipulate Property List files, also known as plists.  It can parse plist files into native Ruby data structures as well as generating new plist files from your Ruby objects.
+
+== Usage
+
+See USAGE[link:files/docs/USAGE.html].
+
+== Links
+
+[<b>Project Page</b>]          http://plist.rubyforge.org
+[<b>Subversion repository</b>] svn://rubyforge.org//var/svn/plist
+[<b>RDoc (on RubyForge)</b>]   http://plist.rubyforge.org
+
+== Credits
+
+plist is maintained by Ben Bleything <mailto:ben@bleything.net> and Patrick May <mailto:patrick@hexane.org>.  Patrick wrote most of the code; Ben is a recent addition to the project, having merged in his plist generation library.
+
+Other folks who have helped along the way:
+
+[<b>Martin Dittus</b>] who pointed out that +Time+ wasn't enough for plist <tt>Dates</tt>, especially those in <tt>~/Library/Cookies/Cookies.plist</tt>
+[<b>Chuck Remes</b>] who pushed Patrick towards implementing <tt>#to_plist</tt>
+[<b>Mat Schaffer</b>] who supplied code and test cases for <tt><data></tt> elements
+[<b>Michael Granger</b>] for encouragement and help
+
+== License and Copyright
+
+plist is released under the MIT License.
+
+Portions of the code (notably the Rakefile) contain code pulled and/or adapted from other projects.  These files contain a comment at the top describing what was used.
+
+=== MIT License
+
+:include: MIT-LICENSE
+
+

data/Rakefile

@@ -0,0 +1,142 @@
+##############################################################
+# Copyright 2006, Ben Bleything <ben@bleything.net> and      #
+#                 Patrick May <patrick@hexane.org>           #
+#                                                            #
+# Based heavily on Geoffrey Grosenbach's Rakefile for gruff. #
+# Includes whitespace-fixing task based on code from Typo.   #
+#                                                            #
+# Distributed under the MIT license.                         #
+##############################################################
+
+require 'fileutils'
+require 'rubygems'
+require 'rake'
+require 'rake/testtask'
+require 'rake/rdoctask'
+require 'rake/packagetask'
+require 'rake/gempackagetask'
+require 'rake/contrib/rubyforgepublisher'
+
+$:.unshift(File.dirname(__FILE__) + "/lib")
+require 'plist'
+
+PKG_NAME      = 'plist'
+PKG_VERSION   = Plist::VERSION
+PKG_FILE_NAME = "#{PKG_NAME}-#{PKG_VERSION}"
+
+RELEASE_NAME  = "REL #{PKG_VERSION}"
+
+RUBYFORGE_PROJECT = "plist"
+RUBYFORGE_USER    = ENV['RUBYFORGE_USER']
+
+TEST_FILES    = Dir.glob('test/**/*').delete_if {|item| item.include?( "\.svn" ) }
+RELEASE_FILES = [ "Rakefile", "README", "MIT-LICENSE" ] + TEST_FILES + Dir.glob( "lib/*" ).delete_if { |item| item.include?( "\.svn" ) }
+
+task :default => [ :test ]
+# Run the unit tests
+Rake::TestTask.new { |t|
+  t.libs << "test"
+  t.pattern = 'test/test_*.rb'
+  t.verbose = true
+}
+
+desc "Clean pkg, coverage, and rdoc; remove .bak files"
+task :clean => [ :clobber_rdoc, :clobber_package, :clobber_coverage ] do
+  puts cmd = "find . -type f -name *.bak -delete"
+  `#{cmd}`
+end
+
+task :clobber_coverage do
+  puts cmd = "rm -rf coverage"
+  `#{cmd}`
+end
+
+desc "Generate coverage analysis with rcov (requires rcov to be installed)"
+task :rcov => [ :clobber_coverage ] do
+  puts cmd = "rcov -Ilib --xrefs -T test/*.rb"
+  puts `#{cmd}`
+end
+
+desc "Strip trailing whitespace and fix newlines for all release files"
+task :fix_whitespace => [ :clean ] do
+  RELEASE_FILES.each do |filename|
+    next if File.directory? filename
+
+    File.open(filename) do |file|
+      newfile = ''
+      needs_love = false
+
+      file.readlines.each_with_index do |line, lineno|
+        if line =~ /[ \t]+$/
+          needs_love = true
+          puts "#{filename}: trailing whitespace on line #{lineno}"
+          line.gsub!(/[ \t]*$/, '')
+        end
+
+        if line.chomp == line
+          needs_love = true
+          puts "#{filename}: no newline on line #{lineno}"
+          line << "\n"
+        end
+
+        newfile << line
+      end
+
+      if needs_love
+        tempname = "#{filename}.new"
+
+        File.open(tempname, 'w').write(newfile)
+        File.chmod(File.stat(filename).mode, tempname)
+
+        FileUtils.ln filename, "#{filename}.bak"
+        FileUtils.ln tempname, filename, :force => true
+        File.unlink(tempname)
+      end
+    end
+  end
+end
+
+desc "Copy documentation to rubyforge"
+task :update_rdoc => [ :rdoc ] do
+  Rake::SshDirPublisher.new("#{RUBYFORGE_USER}@rubyforge.org", "/var/www/gforge-projects/#{RUBYFORGE_PROJECT}/sekr1t", "rdoc").upload
+end
+
+# Genereate the RDoc documentation
+Rake::RDocTask.new { |rdoc|
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title    = "All-purpose Property List manipulation library"
+  rdoc.options << '-SNmREADME'
+  rdoc.template = "docs/jamis-template.rb"
+  rdoc.rdoc_files.include('README', 'MIT-LICENSE', 'CHANGELOG')
+  rdoc.rdoc_files.include Dir.glob('docs/**').delete_if {|f| f.include? 'jamis' }
+  rdoc.rdoc_files.include('lib/**')
+}
+
+# Create compressed packages
+spec = Gem::Specification.new do |s|
+  s.name    = PKG_NAME
+  s.version = PKG_VERSION
+
+  s.summary     = "All-purpose Property List manipulation library."
+  s.description = <<-EOD
+Plist is a library to manipulate Property List files, also known as plists.  It can parse plist files into native Ruby data structures as well as generating new plist files from your Ruby objects.
+EOD
+
+  s.authors  = "Ben Bleything and Patrick May"
+  s.homepage = "http://plist.rubyforge.org"
+
+  s.rubyforge_project = RUBYFORGE_PROJECT
+
+  s.has_rdoc = true
+
+  s.files      = RELEASE_FILES
+  s.test_files = TEST_FILES
+
+  s.autorequire = 'plist'
+end
+
+Rake::GemPackageTask.new(spec) do |p|
+  p.gem_spec = spec
+  p.need_tar = true
+  p.need_zip = true
+end

data/lib/plist.rb

@@ -0,0 +1,19 @@
+#--
+##############################################################
+# Copyright 2006, Ben Bleything <ben@bleything.net> and      #
+# Patrick May <patrick@hexane.org>                           #
+#                                                            #
+# Distributed under the MIT license.                         #
+##############################################################
+#++
+# = Plist
+#
+# This is the main file for plist.  Everything interesting happens in Plist and Plist::Emit.
+
+require 'cgi'
+require 'plist/generator'
+require 'plist/parser'
+
+module Plist
+  VERSION = '2.1.1'
+end

data/test/assets/test_empty_key.plist

@@ -0,0 +1,13 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+  <dict>
+    <key>key</key>
+    <dict>
+      <key></key>
+      <string>1</string>
+      <key>subkey</key>
+      <string>2</string>
+    </dict>
+  </dict>
+</plist>

data/test/test_generator_basic_types.rb

@@ -0,0 +1,86 @@
+##############################################################
+# Copyright 2006, Ben Bleything <ben@bleything.net> and      #
+#                 Patrick May <patrick@hexane.org>           #
+#                                                            #
+# Distributed under the MIT license.                         #
+##############################################################
+
+require 'test/unit'
+require 'plist'
+
+class TestBasicTypes < Test::Unit::TestCase
+  def wrap(tag, content)
+    return "<array>\n\t<#{tag}>#{content}</#{tag}>\n</array>"
+  end
+
+  def test_strings
+    expected = wrap('string', 'testdata')
+
+    assert_equal expected, ['testdata'].to_plist(false)
+    assert_equal expected, [:testdata].to_plist(false)
+  end
+
+  def test_integers
+    [42, 2376239847623987623, -8192].each do |i|
+      assert_equal wrap('integer', i), [i].to_plist(false)
+    end
+  end
+
+  def test_floats
+    [3.14159, -38.3897, 2398476293847.9823749872349980].each do |i|
+      assert_equal wrap('real', i), [i].to_plist(false)
+    end
+  end
+
+  def test_booleans
+    assert_equal "<array>\n\t<true/>\n</array>",  [true].to_plist(false)
+    assert_equal "<array>\n\t<false/>\n</array>", [false].to_plist(false)
+  end
+
+  def test_time
+    test_time = Time.now
+    assert_equal wrap('date', test_time.utc.strftime('%Y-%m-%dT%H:%M:%SZ')), [test_time].to_plist(false)
+  end
+
+  def test_dates
+    test_date = Date.today
+    test_datetime = DateTime.now
+
+    assert_equal wrap('date', test_date.strftime('%Y-%m-%dT%H:%M:%SZ')), [test_date].to_plist(false)
+    assert_equal wrap('date', test_datetime.strftime('%Y-%m-%dT%H:%M:%SZ')), [test_datetime].to_plist(false)
+  end
+
+  # generater tests from patrick's plist.rb code
+  def test_to_plist
+    assert_equal( Plist::_xml("<string>Hello, World</string>"),     "Hello, World".to_plist )
+    assert_equal( Plist::_xml("<real>151936595.697543</real>"),     151936595.697543.to_plist )
+    assert_equal( Plist::_xml("<date>2006-04-21T16:47:58Z</date>"), DateTime.parse("2006-04-21T16:47:58Z").to_plist )
+    assert_equal( Plist::_xml("<integer>999000</integer>"),         999000.to_plist )
+    assert_equal( Plist::_xml("<false/>"),                          false.to_plist )
+    assert_equal( Plist::_xml("<true/>"),                           true.to_plist )
+
+    assert_equal( Plist::_xml("<array>\n\t<true/>\n\t<false/>\n</array>"),
+                  [ true, false ].to_plist )
+
+    assert_equal( Plist::_xml("<dict>\n\t<key>False</key>\n\t<false/>\n\t<key>True</key>\n\t<true/>\n</dict>"),
+                  { 'True' => true, 'False' => false }.to_plist )
+
+    source = File.open("test/assets/AlbumData.xml") { |f| f.read }
+
+    result = Plist::parse_xml(source)
+
+    assert_equal( result, Plist::parse_xml(result.to_plist) )
+
+    File.delete('hello.plist') if File.exists?('hello.plist')
+    "Hello, World".save_plist('hello.plist')
+    assert_equal( Plist::_xml("<string>Hello, World</string>"),
+                  File.open('hello.plist') {|f| f.read }        )
+    File.delete('hello.plist') if File.exists?('hello.plist')
+  end
+
+  def test_escape_string_values
+    assert_equal( Plist::_xml("<string>&lt;plist&gt;</string>"),    "<plist>".to_plist )
+    assert_equal( Plist::_xml("<string>Fish &amp; Chips</string>"), "Fish & Chips".to_plist )
+  end
+
+end

data/{test_plist.rb → test/test_parser.rb}

@@ -1,3 +1,10 @@
+##############################################################
+# Copyright 2006, Ben Bleything <ben@bleything.net> and      #
+#                 Patrick May <patrick@hexane.org>           #
+#                                                            #
+# Distributed under the MIT license.                         #
+##############################################################
+
 require 'test/unit'
 require 'pp'
 
@@ -5,7 +12,7 @@ require 'plist'
 
 class TestPlist < Test::Unit::TestCase
   def test_Plist_parse_xml
-    result = Plist::parse_xml("AlbumData.xml")
+    result = Plist::parse_xml("test/assets/AlbumData.xml")
 
     # dict
     assert_kind_of( Hash, result )
@@ -28,7 +35,7 @@ class TestPlist < Test::Unit::TestCase
                      "AlbumName"=>"Roll 1",
                      "AlbumId"=>6}],
                   result["List of Rolls"] )
-    
+
     # string
     assert_kind_of( String, result["Application Version"] )
     assert_equal( "5.0.4 (263)", result["Application Version"] )
@@ -47,59 +54,49 @@ class TestPlist < Test::Unit::TestCase
 
   end
 
+  # uncomment this test to work on speed optimization
   #def test_load_something_big
   #  plist = Plist::parse_xml( "~/Pictures/iPhoto Library/AlbumData.xml" )
   #end
 
 
-  # date fields are credited to 
+  # date fields are credited to
   def test_date_fields
-    result = Plist::parse_xml("Cookies.plist")
+    result = Plist::parse_xml("test/assets/Cookies.plist")
     assert_kind_of( DateTime, result.first['Expires'] )
     assert_equal( "2007-10-25T12:36:35Z", result.first['Expires'].to_s )
   end
 
-  def test_to_plist
-    assert_equal( Plist::_xml("<string>Hello, World</string>"),     "Hello, World".to_plist )
-    assert_equal( Plist::_xml("<real>151936595.697543</real>"),     151936595.697543.to_plist )
-    assert_equal( Plist::_xml("<date>2006-04-21T16:47:58Z</date>"), DateTime.parse("2006-04-21T16:47:58Z").to_plist )
-    assert_equal( Plist::_xml("<integer>999000</integer>"),         999000.to_plist )
-    assert_equal( Plist::_xml("<false/>"),                          false.to_plist )
-    assert_equal( Plist::_xml("<true/>"),                           true.to_plist )
-
-    assert_equal( Plist::_xml("<array>\n\t<true/>\n\t<false/>\n</array>"),
-                  [ true, false ].to_plist )
-
-    assert_equal( Plist::_xml("<dict>\n\t<key>False</key>\n\t<false/>\n\t<key>True</key>\n\t<true/>\n</dict>"),
-                  { 'True' => true, 'False' => false }.to_plist )
-
-    source = File.open("AlbumData.xml") { |f| f.read }
-
-    result = Plist::parse_xml(source)
-  
-    assert_equal( result, Plist::parse_xml(result.to_plist) )
-
-    File.delete('hello.plist') if File.exists?('hello.plist')
-    "Hello, World".save_plist('hello.plist')
-    assert_equal( Plist::_xml("<string>Hello, World</string>"),
-                  File.open('hello.plist') {|f| f.read }        )
-  end
-
   # this functionality is credited to Mat Schaffer,
   # who discovered the plist with the data tag
   # supplied the test data, and provided the parsing code.
   def test_data
-    data = Plist::parse_xml("example_data.plist");
-    assert_equal( File.open("example_data.jpg"){|f| f.read }, data['image'].read )
-    assert_equal( File.open("example_data.plist"){|f| f.read }, data.to_plist )
+    data = Plist::parse_xml("test/assets/example_data.plist");
+    assert_equal( File.open("test/assets/example_data.jpg"){|f| f.read }, data['image'].read )
+    assert_equal( File.open("test/assets/example_data.plist"){|f| f.read }, data.to_plist )
 
-    data['image'] = StringIO.new( File.open("example_data.jpg"){ |f| f.read } )
+    data['image'] = StringIO.new( File.open("test/assets/example_data.jpg"){ |f| f.read } )
     File.open('temp.plist', 'w'){|f| f.write data.to_plist }
-    assert_equal( File.open("example_data.plist"){|f| f.read }, data.to_plist )
+    assert_equal( File.open("test/assets/example_data.plist"){|f| f.read }, data.to_plist )
 
+    File.delete('temp.plist') if File.exists?('temp.plist')
 
   end
 
+  # bug fix for empty <key>
+  # reported by Matthias Peick <matthias@peick.de>
+  # reported and fixed by Frederik Seiffert <ego@frederikseiffert.de>
+  def test_empty_dict_key
+    data = Plist::parse_xml("test/assets/test_empty_key.plist");
+    assert_equal("2", data['key']['subkey'])
+  end
+
+  # bug fix for decoding entities
+  #  reported by Matthias Peick <matthias@peick.de>
+  def test_decode_entities
+    data = Plist::parse_xml(Plist::_xml('<string>Fish &amp; Chips</string>'))
+    assert_equal('Fish & Chips', data)
+  end
 end
 
 __END__

metadata

@@ -3,15 +3,17 @@ rubygems_version: 0.8.11.3
 specification_version: 1
 name: plist
 version: !ruby/object:Gem::Version 
-  version: 2.1.0
-date: 2006-07-29 00:00:00 -04:00
-summary: plist parses Mac OS X plist files into ruby data types.
+  version: 2.1.1
+date: 2006-09-10 00:00:00 -04:00
+summary: All-purpose Property List manipulation library.
 require_paths: 
-  - "."
-email: plist@hexane.org
-homepage: http://www.narf-lib.org
-rubyforge_project: narf
-description: ''
+  - lib
+email: 
+homepage: http://plist.rubyforge.org
+rubyforge_project: plist
+description: "Plist is a library to manipulate Property List files, also known as plists.  It
+  can parse plist files into native Ruby data structures as well as generating new
+  plist files from your Ruby objects."
 autorequire: plist
 default_executable: 
 bindir: bin
@@ -27,16 +29,30 @@ platform: ruby
 signing_key: 
 cert_chain: 
 authors: 
-  - Patrick May
+  - Ben Bleything and Patrick May
 files: 
-  - plist.rb
-  - test_plist.rb
-  - AlbumData.xml
-  - Cookies.plist
-  - example_data.jpg
-  - example_data.plist
+  - Rakefile
+  - README
+  - MIT-LICENSE
+  - test/assets
+  - test/test_generator_basic_types.rb
+  - test/test_parser.rb
+  - test/assets/AlbumData.xml
+  - test/assets/Cookies.plist
+  - test/assets/example_data.jpg
+  - test/assets/example_data.plist
+  - test/assets/test_empty_key.plist
+  - lib/plist
+  - lib/plist.rb
 test_files: 
-  - test_plist.rb
+  - test/assets
+  - test/test_generator_basic_types.rb
+  - test/test_parser.rb
+  - test/assets/AlbumData.xml
+  - test/assets/Cookies.plist
+  - test/assets/example_data.jpg
+  - test/assets/example_data.plist
+  - test/assets/test_empty_key.plist
 rdoc_options: []
 extra_rdoc_files: []
 executables: []

data/plist.rb

@@ -1,375 +0,0 @@
-#require 'rexml/document'
-#require 'rexml/streamlistener'
-
-# Plist parses Mac OS X xml property list files into ruby data structures.
-#
-# === Load a plist file
-# This is the main point of the library:
-#
-#   r = Plist::parse_xml( filename_or_xml )
-#
-# === Save a plist
-# You can turn the variables back into a plist string:
-#
-#   r.to_plist
-#
-# There is a convenience method for saving a variable to a file:
-#
-#   r.save_plist(filename)
-#
-# Only these ruby types can be converted into a plist:
-#
-#   String
-#   Float
-#   DateTime
-#   Integer
-#   FalseClass
-#   TrueClass
-#   Array
-#   Hash
-#
-# Notes:
-# 
-# + Array and Hash are recursive -- the elements of an Array and the values of a Hash
-# must convert to a plist.
-# + The keys of the Hash must be strings.
-# + The contents of data elements are returned as a Tempfile.
-# + Data elements can be set with to an open IO or a StringIO
-#
-# If you have suggestions for mapping other Ruby types to the plist types, send a note to:
-# 
-#   mailto:plist@hexane.org
-#
-# I'll take a look and probably add it, I'm just reticent to create too many
-# "convenience" methods without at least agreeing with someone :-)
-#
-# === Credits
-# plist.rb has been implemented by Patrick May.  A few other folks have been helpful in developing plist.rb:
-#
-#   + Martin Dittus, who pointed out that Time wasn't enough for plist Dates,
-#     especially those in "~/Library/Cookies/Cookies.plist"
-#
-#   + Chuck Remes, who pushed me towards implementing #to_plist
-#
-#   + Mat Schaffer, who supplied code and test cases for <data> elements
-#
-class Plist
-  
-  TEMPLATE = <<-XML
-<?xml version="1.0" encoding="UTF-8"?>
-<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
-<plist version="1.0">
-%plist%
-</plist>
-XML
-  def Plist::_xml( xml )
-    TEMPLATE.sub( /%plist%/, xml )
-  end
-
-# Note that I don't use these two elements much:
-#
-#  + Date elements are returned as DateTime objects.
-#  + Data elements are implemented as a subcase of strings:
-#      http://blade.nagaokaut.ac.jp/cgi-bin/scat.rb/ruby/ruby-talk/31933
-#
-# Plist::parse_xml will blow up if it encounters a data element.
-# If you encounter such an error, or if you have a Date element which
-# can't be parsed into a Time object, please send your plist file to
-# plist@hexane.org so that I can implement the proper support.
-  def Plist::parse_xml( filename_or_xml )
-    listener = Listener.new
-    #parser = REXML::Parsers::StreamParser.new(File.new(filename), listener)
-    parser = StreamParser.new(filename_or_xml, listener)
-    parser.parse
-    listener.result
-  end
-
-  class Listener
-    #include REXML::StreamListener
-    
-    attr_accessor :result, :open
-
-    def initialize
-      @result = nil
-      @open   = Array.new
-    end
-
-    
-    def tag_start(name, attributes)
-      @open.push PTag::mappings[name].new
-    end
-   
-    def text( contents )
-      @open.last.text = contents if @open.last
-    end
-
-    def tag_end(name)
-      last = @open.pop
-      if @open.empty?
-        @result = last.to_ruby
-      else
-        @open.last.children.push last
-      end
-    end
-  end
-
-  class StreamParser
-    def initialize( filename_or_xml, listener )
-      @filename_or_xml = filename_or_xml
-      @listener = listener
-    end
-    
-    TEXT       = /([^<]+)/
-    XMLDECL_PATTERN = /<\?xml\s+(.*?)\?>*/um
-    DOCTYPE_PATTERN = /\s*<!DOCTYPE\s+(.*?)(\[|>)/um
-      
-
-    def parse
-      plist_tags = PTag::mappings.keys.join('|')
-      start_tag  = /<(#{plist_tags})([^>]*)>/i
-      end_tag    = /<\/(#{plist_tags})[^>]*>/i
-    
-      require 'strscan'
-      @scanner = StringScanner.new( if (File.exists? @filename_or_xml)
-                                      File.open(@filename_or_xml, "r") {|f| f.read}
-                                    else
-                                      @filename_or_xml
-                                    end )
-      until @scanner.eos?
-        if @scanner.scan(XMLDECL_PATTERN)
-        elsif @scanner.scan(DOCTYPE_PATTERN)
-        elsif @scanner.scan(start_tag)
-          @listener.tag_start(@scanner[1], nil)
-          if (@scanner[2] =~ /\/$/)
-            @listener.tag_end(@scanner[1])
-          end
-        elsif @scanner.scan(TEXT)
-          @listener.text(@scanner[1]) 
-        elsif @scanner.scan(end_tag)
-          @listener.tag_end(@scanner[1])
-        else
-          raise "Unimplemented element"
-        end
-      end
-    end
-  end
-
-  class PTag
-    @@mappings = { }
-    def PTag::mappings
-      @@mappings
-    end
-
-    def PTag::inherited( sub_class )
-      key = sub_class.to_s.downcase
-      key.gsub!(/^plist::/, '' )
-      key.gsub!(/^p/, '')  unless key == "plist"
-
-      @@mappings[key] = sub_class
-    end
-
-    attr_accessor :text, :children
-    def initialize
-      @children = Array.new
-    end
-
-    def to_ruby
-      raise "Unimplemented: " + self.class.to_s + "#to_ruby on #{self.inspect}"
-    end
-  end
-
-  class PList < PTag
-    def to_ruby
-      children.first.to_ruby
-    end
-  end
-
-  class PDict < PTag
-    def to_ruby
-      dict = Hash.new
-      key = nil
-      
-      children.each do |c|
-        if key.nil?
-          key = c.to_ruby
-        else
-          dict[key] = c.to_ruby
-          key = nil
-        end
-      end
-
-      dict
-    end
-  end
-  
-  class PKey < PTag
-    def to_ruby
-      text
-    end
-  end
- 
-  class PString < PTag
-    def to_ruby
-      text || ''
-    end
-  end
-
-  class PArray < PTag
-    def to_ruby
-      children.collect do |c|
-        c.to_ruby
-      end
-    end
-  end
-
-  class PInteger < PTag
-    def to_ruby
-      text.to_i
-    end
-  end
-
-  class PTrue < PTag
-    def to_ruby
-      true
-    end
-  end
-
-  class PFalse < PTag
-    def to_ruby
-      false
-    end
-  end
-
-  class PReal < PTag
-    def to_ruby
-      text.to_f
-    end
-  end
-
-  require 'date'
-  class PDate < PTag
-    def to_ruby
-      DateTime.parse(text)
-    end
-  end
-
-  require 'base64'
-  require 'tempfile'
-  class PData < PTag
-    def to_ruby
-      tf = Tempfile.new("plist.tmp")
-      tf.write Base64.decode64(text.gsub(/\s+/,''))
-      tf.close
-      # is this a good idea?
-      tf.open
-      tf
-    end
-  end
-
-  module Emit
-    def save_plist(filename)
-      File.open(filename, 'wb') do |f|
-        f.write(self.to_plist)
-      end
-    end
-
-    # Only the expected classes can be emitted as a plist:
-    #   String, Float, DateTime, Integer, TrueClass, FalseClass, Array, Hash
-    #
-    # Write me if you think another class can be coerced safely into one of the
-    # expected plist classes (plist@hexane.org)
-    def to_plist
-      Plist::_xml(self.to_plist_fragment)
-    end
-  end
-end
-
-class String
-  include Plist::Emit
-  def to_plist_fragment
-    "<string>#{self}</string>"
-  end
-end
-
-class Float
-  include Plist::Emit
-  def to_plist_fragment
-    "<real>#{self}</real>"
-  end
-end
-
-class DateTime
-  include Plist::Emit
-  def to_plist_fragment
-    "<date>#{self}</date>"
-  end
-end
-
-class Integer
-  include Plist::Emit
-  def to_plist_fragment
-    "<integer>#{self}</integer>"
-  end
-end
-
-class FalseClass
-  include Plist::Emit
-  def to_plist_fragment
-    "<false/>"
-  end
-end
-
-class TrueClass
-  include Plist::Emit
-  def to_plist_fragment
-    "<true/>"
-  end
-end
-
-class Array
-  include Plist::Emit
-  def to_plist_fragment
-    fragment = "<array>\n"
-    self.each do |e|
-      element_plist = e.to_plist_fragment
-      element_plist.each do |l|
-        fragment += "\t#{l.chomp}\n"
-      end
-    end
-    fragment += "</array>"
-    fragment
-  end
-end
-
-class Hash
-  include Plist::Emit
-  def to_plist_fragment
-    fragment = "<dict>\n"
-    self.keys.sort.each do |k|
-      fragment += "\t<key>#{k}</key>\n"
-      element_plist = self[k].to_plist_fragment
-      element_plist.each do |l|
-        fragment += "\t#{l.chomp}\n"
-      end
-    end
-    fragment += "</dict>"
-    fragment
-  end
-end
-
-require 'stringio'
-[ IO, StringIO ].each do |io_class|
-  io_class.module_eval do
-    include Plist::Emit
-    def to_plist_fragment
-      self.rewind
-      data = self.read
-      
-      output = "<data>\n"
-      Base64::encode64(data).gsub(/\s+/, '').scan(/.{1,68}/o) { output << $& << "\n" }
-      output << "</data>"
-      
-      output
-    end
-  end
-end