initial checkin; NARF plist library; Ben's project infrastructure

11 files changed, 1302 insertions, 0 deletions

diff --git a/CHANGELOG b/CHANGELOG
new file mode 100644
index 0000000..dd4f06d
--- /dev/null
+++ b/CHANGELOG
@@ -0,0 +1 @@
+= plist - All-purpose Property List manipulation library
diff --git a/MIT-LICENSE b/MIT-LICENSE
new file mode 100644
index 0000000..11093dc
--- /dev/null
+++ b/MIT-LICENSE
@@ -0,0 +1,20 @@
+Copyright (c) 2006, Ben Bleything <ben@bleything.net>
+
+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.
diff --git a/README b/README
new file mode 100644
index 0000000..ec47957
--- /dev/null
+++ b/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
+
+
diff --git a/Rakefile b/Rakefile
new file mode 100644
index 0000000..d01d611
--- /dev/null
+++ b/Rakefile
@@ -0,0 +1,129 @@
+##############################################################
+# Copyright 2006, Ben Bleything.                             #
+#                <ben@bleything.net>                         #
+#                                                            #
+# Based heavily on Geoffrey Grosenbach's Rakefile for gruff. #
+# Includes whitespace-fixing code 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    = "bleything"
+
+TEST_FILES    = Dir.glob('test/test_*.rb').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 and docs, remove .bak files"
+task :clean => [ :clobber_rdoc, :clobber_package ] do
+  puts cmd = "find . -type f -name *.bak -delete"
+  `#{cmd}`
+end
+
+desc "Strip trailing whitespace and fix newlines for all release files"
+task :fix_whitespace => [ :clean ] do
+  RELEASE_FILES.each do |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}", "docs").upload
+end
+
+# Genereate the RDoc documentation
+Rake::RDocTask.new { |rdoc|
+  rdoc.rdoc_dir = 'docs'
+  rdoc.title    = "PropertyList Generator -- plist"
+  rdoc.options << '-SNmREADME'
+  rdoc.template = "#{ENV['template']}.rb" if ENV['template']
+  rdoc.rdoc_files.include('README', 'MIT-LICENSE', 'CHANGELOG')
+  rdoc.rdoc_files.include('lib/plist.rb')
+}
+
+# Create compressed packages
+spec = Gem::Specification.new do |s|
+  s.name    = PKG_NAME
+  s.version = PKG_VERSION
+
+  s.summary     = "Serialize your data as a Property List (aka plist)."
+  s.description = <<-EOD
+The Property List (plist) Generator allows you to serialize your data to Property Lists.  This is especially useful when writing system-level code for Mac OS X, but has other applications as well.  The basic Ruby datatypes (numbers, strings, symbols, dates/times, arrays, and hashes) can be natively converted to plist types, and other types are Marshal'ed into the plist <data> type.
+EOD
+
+  s.author   = "Ben Bleything"
+  s.email    = "ben@bleything.net"
+  s.homepage = "http://projects.bleything.net/plist"
+
+  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
diff --git a/lib/plist.rb b/lib/plist.rb
new file mode 100644
index 0000000..c18ba9c
--- /dev/null
+++ b/lib/plist.rb
@@ -0,0 +1,389 @@
+# 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 Tempfiles
+#
+# 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( header = true )
+      if (header)
+        Plist::_xml(self.to_plist_fragment)
+      else
+        self.to_plist_fragment
+      end
+    end
+  end
+end
+
+class String
+  include Plist::Emit
+  def to_plist_fragment
+    "<string>#{self}</string>"
+  end
+end
+
+class Symbol
+  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 Time
+  include Plist::Emit
+  def to_plist_fragment
+    "<date>#{self.utc.strftime('%Y-%m-%dT%H:%M:%SZ')}</date>"
+  end
+end
+
+class Date
+  include Plist::Emit
+  def to_plist_fragment
+    "<date>#{self.strftime('%Y-%m-%dT%H:%M:%SZ')}</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
diff --git a/test/AlbumData.xml b/test/AlbumData.xml
new file mode 100644
index 0000000..7c680e8
--- /dev/null
+++ b/test/AlbumData.xml
@@ -0,0 +1,203 @@
+<?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>Application Version</key>
+	<string>5.0.4 (263)</string>
+	<key>Archive Path</key>
+	<string>/Users/username/Pictures/iPhoto Library</string>
+	<key>List of Albums</key>
+	<array>
+		<dict>
+			<key>AlbumId</key>
+			<integer>999000</integer>
+			<key>AlbumName</key>
+			<string>Library</string>
+			<key>KeyList</key>
+			<array>
+				<string>7</string>
+			</array>
+			<key>Master</key>
+			<true/>
+			<key>PhotoCount</key>
+			<integer>1</integer>
+			<key>PlayMusic</key>
+			<string>YES</string>
+			<key>RepeatSlideShow</key>
+			<string>YES</string>
+			<key>SecondsPerSlide</key>
+			<integer>3</integer>
+			<key>SlideShowUseTitles</key>
+			<false/>
+			<key>SongPath</key>
+			<string></string>
+			<key>TransitionDirection</key>
+			<integer>0</integer>
+			<key>TransitionName</key>
+			<string>Dissolve</string>
+			<key>TransitionSpeed</key>
+			<real>1</real>
+		</dict>
+		<dict>
+			<key>Album Type</key>
+			<string>Special Roll</string>
+			<key>AlbumId</key>
+			<integer>999001</integer>
+			<key>AlbumName</key>
+			<string>Last Roll</string>
+			<key>Filter Mode</key>
+			<string>All</string>
+			<key>Filters</key>
+			<array>
+				<dict>
+					<key>Count</key>
+					<integer>1</integer>
+					<key>Operation</key>
+					<string>In Last</string>
+					<key>Type</key>
+					<string>Roll</string>
+				</dict>
+			</array>
+			<key>KeyList</key>
+			<array>
+				<string>7</string>
+			</array>
+			<key>PhotoCount</key>
+			<integer>1</integer>
+			<key>PlayMusic</key>
+			<string>YES</string>
+			<key>RepeatSlideShow</key>
+			<string>YES</string>
+			<key>SecondsPerSlide</key>
+			<integer>3</integer>
+			<key>SlideShowUseTitles</key>
+			<false/>
+			<key>SongPath</key>
+			<string></string>
+			<key>TransitionDirection</key>
+			<integer>0</integer>
+			<key>TransitionName</key>
+			<string>Dissolve</string>
+			<key>TransitionSpeed</key>
+			<real>1</real>
+		</dict>
+		<dict>
+			<key>Album Type</key>
+			<string>Special Month</string>
+			<key>AlbumId</key>
+			<integer>999002</integer>
+			<key>AlbumName</key>
+			<string>Last 12 Months</string>
+			<key>Filter Mode</key>
+			<string>All</string>
+			<key>Filters</key>
+			<array/>
+			<key>KeyList</key>
+			<array>
+				<string>7</string>
+			</array>
+			<key>PhotoCount</key>
+			<integer>1</integer>
+			<key>PlayMusic</key>
+			<string>YES</string>
+			<key>RepeatSlideShow</key>
+			<string>YES</string>
+			<key>SecondsPerSlide</key>
+			<integer>3</integer>
+			<key>SlideShowUseTitles</key>
+			<false/>
+			<key>SongPath</key>
+			<string></string>
+			<key>TransitionDirection</key>
+			<integer>0</integer>
+			<key>TransitionName</key>
+			<string>Dissolve</string>
+			<key>TransitionSpeed</key>
+			<real>1</real>
+		</dict>
+		<dict>
+			<key>Album Type</key>
+			<string>Regular</string>
+			<key>AlbumId</key>
+			<integer>9</integer>
+			<key>AlbumName</key>
+			<string>An Album</string>
+			<key>KeyList</key>
+			<array>
+				<string>7</string>
+			</array>
+			<key>PhotoCount</key>
+			<integer>1</integer>
+			<key>PlayMusic</key>
+			<string>YES</string>
+			<key>RepeatSlideShow</key>
+			<string>YES</string>
+			<key>SecondsPerSlide</key>
+			<integer>3</integer>
+			<key>SlideShowUseTitles</key>
+			<false/>
+			<key>SongPath</key>
+			<string></string>
+			<key>TransitionDirection</key>
+			<integer>0</integer>
+			<key>TransitionName</key>
+			<string>Dissolve</string>
+			<key>TransitionSpeed</key>
+			<real>1</real>
+		</dict>
+	</array>
+	<key>List of Keywords</key>
+	<dict/>
+	<key>List of Rolls</key>
+	<array>
+		<dict>
+			<key>Album Type</key>
+			<string>Regular</string>
+			<key>AlbumId</key>
+			<integer>6</integer>
+			<key>AlbumName</key>
+			<string>Roll 1</string>
+			<key>KeyList</key>
+			<array>
+				<string>7</string>
+			</array>
+			<key>Parent</key>
+			<integer>999000</integer>
+			<key>PhotoCount</key>
+			<integer>1</integer>
+		</dict>
+	</array>
+	<key>Major Version</key>
+	<integer>2</integer>
+	<key>Master Image List</key>
+	<dict>
+		<key>7</key>
+		<dict>
+			<key>Aspect Ratio</key>
+			<real>1</real>
+			<key>Caption</key>
+			<string>fallow_keep.png.450x450.2005-12-04</string>
+			<key>Comment</key>
+			<string>a comment</string>
+			<key>DateAsTimerInterval</key>
+			<real>158341389</real>
+			<key>ImagePath</key>
+			<string>/Users/username/Pictures/iPhoto Library/2006/01/07/fallow_keep.png.450x450.2005-12-04.jpg</string>
+			<key>MediaType</key>
+			<string>Image</string>
+			<key>MetaModDateAsTimerInterval</key>
+			<real>158341439.728129</real>
+			<key>ModDateAsTimerInterval</key>
+			<real>158341389</real>
+			<key>Rating</key>
+			<integer>0</integer>
+			<key>Roll</key>
+			<integer>6</integer>
+			<key>ThumbPath</key>
+			<string>/Users/username/Pictures/iPhoto Library/2006/01/07/Thumbs/7.jpg</string>
+		</dict>
+	</dict>
+	<key>Minor Version</key>
+	<integer>0</integer>
+</dict>
+</plist>
diff --git a/test/Cookies.plist b/test/Cookies.plist
new file mode 100644
index 0000000..f4c68fd
--- /dev/null
+++ b/test/Cookies.plist
@@ -0,0 +1,104 @@
+<?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">
+<array>
+	<dict>
+		<key>Created</key>
+		<real>151936595.697543</real>
+		<key>Domain</key>
+		<string>.cleveland.com</string>
+		<key>Expires</key>
+		<date>2007-10-25T12:36:35Z</date>
+		<key>Name</key>
+		<string>CTC</string>
+		<key>Path</key>
+		<string>/</string>
+		<key>Value</key>
+		<string>:broadband:</string>
+	</dict>
+	<dict>
+		<key>Created</key>
+		<real>151778895.063041</real>
+		<key>Domain</key>
+		<string>.gamefaqs.com</string>
+		<key>Expires</key>
+		<date>2006-04-21T16:47:58Z</date>
+		<key>Name</key>
+		<string>ctk</string>
+		<key>Path</key>
+		<string>/</string>
+		<key>Value</key>
+		<string>NDM1YmJlYmU0NjZiOGYxZjc1NjgxODg0YmRkMA%3D%3D</string>
+	</dict>
+	<dict>
+		<key>Created</key>
+		<real>183530456</real>
+		<key>Domain</key>
+		<string>arstechnica.com</string>
+		<key>Expires</key>
+		<date>2006-10-26T13:56:36Z</date>
+		<key>Name</key>
+		<string>fontFace</string>
+		<key>Path</key>
+		<string>/</string>
+		<key>Value</key>
+		<string>1</string>
+	</dict>
+	<dict>
+		<key>Created</key>
+		<real>183004526</real>
+		<key>Domain</key>
+		<string>.sourceforge.net</string>
+		<key>Expires</key>
+		<date>2006-10-20T02:35:26Z</date>
+		<key>Name</key>
+		<string>FRQSTR</string>
+		<key>Path</key>
+		<string>/</string>
+		<key>Value</key>
+		<string>18829595x86799:1:1440x87033:1:1440x86799:1:1440x87248:1:1440|18829595|18829595|18829595|18829595</string>
+	</dict>
+	<dict>
+		<key>Created</key>
+		<real>151053128.640531</real>
+		<key>Domain</key>
+		<string>.tvguide.com</string>
+		<key>Expires</key>
+		<date>2025-10-10T07:12:17Z</date>
+		<key>Name</key>
+		<string>DMSEG</string>
+		<key>Path</key>
+		<string>/</string>
+		<key>Value</key>
+		<string>1BDF3D1CC07FC70F&amp;D04451&amp;434EC763&amp;4351FD51&amp;0&amp;</string>
+	</dict>
+	<dict>
+		<key>Created</key>
+		<real>151304125.760261</real>
+		<key>Domain</key>
+		<string>.code.blogspot.com</string>
+		<key>Expires</key>
+		<date>2038-01-18T00:00:00Z</date>
+		<key>Name</key>
+		<string>__utma</string>
+		<key>Path</key>
+		<string>/</string>
+		<key>Value</key>
+		<string>11680422.1172819419.1129611326.1129611326.1129611326.1</string>
+	</dict>
+	<dict>
+		<key>Created</key>
+		<real>599529600</real>
+		<key>Domain</key>
+		<string>.tvguide.com</string>
+		<key>Expires</key>
+		<date>2020-01-01T00:00:00Z</date>
+		<key>Name</key>
+		<string>gfm</string>
+		<key>Path</key>
+		<string>/</string>
+		<key>Value</key>
+		<string>0</string>
+	</dict>
+</array>
+</plist>
diff --git a/test/example_data.jpg b/test/example_data.jpg
new file mode 100644
index 0000000..f7a50f8
--- /dev/null
+++ b/test/example_data.jpg
diff --git a/test/example_data.plist b/test/example_data.plist
new file mode 100644
index 0000000..736f54e
--- /dev/null
+++ b/test/example_data.plist
@@ -0,0 +1,259 @@
+<?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>IMs</key>
+	<array>
+		<string>com.apple.syncservices:9583BE42-EC1A-4B3F-B248-7904BA60634B</string>
+		<string>com.apple.syncservices:2A222E96-4CC6-4320-BE0C-61D5F08C2E64</string>
+		<string>com.apple.syncservices:64DAA772-4558-49F8-9B87-C4A32D5E05C1</string>
+		<string>com.apple.syncservices:AF7C6884-B760-4E55-A4D5-B1B114C8A7DC</string>
+		<string>com.apple.syncservices:ECC7FAED-47D6-4DB9-8120-2F029C7D64C8</string>
+		<string>com.apple.syncservices:D704F079-F869-4613-9CFC-697C1976E8F4</string>
+	</array>
+	<key>URLs</key>
+	<array>
+		<string>com.apple.syncservices:5BA97109-F8E3-46A9-AF0B-5F8C093F49EA</string>
+	</array>
+	<key>com.apple.syncservices.RecordEntityName</key>
+	<string>com.apple.contacts.Contact</string>
+	<key>display as company</key>
+	<string>person</string>
+	<key>email addresses</key>
+	<array>
+		<string>com.apple.syncservices:B97DCC9C-5B00-4D38-AB06-4B7A5D6BC369</string>
+		<string>com.apple.syncservices:E508D679-43E1-49E2-B5D7-F14A8E48C067</string>
+		<string>com.apple.syncservices:C6478063-34A5-4CCB-BD41-1F131D56F7BD</string>
+		<string>com.apple.syncservices:2B3E352C-7831-4349-9A87-0FA4BD290515</string>
+	</array>
+	<key>first name</key>
+	<string>Mat</string>
+	<key>image</key>
+	<data>
+	/9j/4AAQSkZJRgABAQAAAQABAAD/7QAcUGhvdG9zaG9wIDMuMAA4QklNBAQAAAAAAAD/
+	4g9ASUNDX1BST0ZJTEUAAQEAAA8wYXBwbAIAAABtbnRyUkdCIFhZWiAH1gAFABUAFAAg
+	AAZhY3NwQVBQTAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA9tYAAQAAAADTLWFwcGxx
+	EHyAeZ4fvAacU+DW7cbVAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA5yWFla
+	AAABLAAAABRnWFlaAAABQAAAABRiWFlaAAABVAAAABR3dHB0AAABaAAAABRjaGFkAAAB
+	fAAAACxyVFJDAAABqAAAAA5nVFJDAAABuAAAAA5iVFJDAAAByAAAAA52Y2d0AAAB2AAA
+	BhJuZGluAAAH7AAABj5kZXNjAAAOLAAAAGRkc2NtAAAOkAAAAEhtbW9kAAAO2AAAAChj
+	cHJ0AAAPAAAAAC1YWVogAAAAAAAAZwIAADyoAAAJjlhZWiAAAAAAAABowAAAq7QAAB5o
+	WFlaIAAAAAAAACcUAAAXvwAAqy9YWVogAAAAAAAA81IAAQAAAAEWz3NmMzIAAAAAAAEM
+	QgAABd7///MmAAAHkgAA/ZH///ui///9owAAA9wAAMBsY3VydgAAAAAAAAABAc0AAGN1
+	cnYAAAAAAAAAAQHNAABjdXJ2AAAAAAAAAAEBzQAAdmNndAAAAAAAAAAAAAMBAAACAAAA
+	JwCJARYBsAJsA0kESAV0BsgIPAnXC5YNcA9oEX0ToxXSGAwaJRvMHW4fDSCbIi8jtSUy
+	JqooFil9KuEsOS2MLtwwLTF1Mr80CDVINmQ3cjh8OYs6nTuuPL890j7lP/hBCUIUQxtE
+	H0UdRhhHDkf9SOhJ30r0TBxNQE5iT4NQo1HEUudUDVUxVlZXhFizWeRbGlxSXY9e0mAU
+	YVtin2PhZSBmWmeWaMtp/WsybGJtkm7Gb/hxKnJhc5502HYYd1d4mHmyerx7wHzFfc9+
+	1n/egOmB94MHhBiFLIZCh1uIdomViraL2Yz+jiKPRZBokY+SrpPMlOWV/ZcVmCmZOJpG
+	m1ScX51onnCfdqB8oYGiiqORpJmlo6asp7yozancqumr9q0ArgWvBK/8sO+x2bK/s5q0
+	bLU7thK2/7f8uPu5+Lr0u+68573bvtS/0MDKwcnCzMPUxN/F88cLyCPJQMpFyyHL5cyq
+	zXHOOM79z8XQkdFe0izS/dPP1KbVf9Za1zjYF9j42dnamNtD2+TchN0i3cDeWt7z34zg
+	JuC/4Vjh8OKL4yfjxeRi5QHlouZN5wDnwOh76TPp5eqP6zPr0exj7PLtce3w7l/uzu8z
+	75Pv9PBK8KDw+/GN8iny2fOD9Cn0yfVp9gj2qfdM9/H4ovla+hr66vvN/MD9yf7Q//8A
+	AAAUAEYAkQD0AYQCNQMQBA0FPAaSCA8Jtgt1DUoPNBEtEy0VNhcUGJ0aIhujHRsekB/+
+	IWIixCQgJWwmuyf8KTcqcCumLNUuAy8vME0xXjJoM200cjV3Nnk3ejh6OXg6dDtwPGc9
+	Wz5NPzxAKEEUQf1C5EPRRM9F1kbcR+JI50nsSvBL9kz+TgNPB1ANURNSF1MdVCJVJ1Yv
+	VzNYOVk/WkZbTlxTXV9ebF95YIxhomK9Y+BlBWYuZ15ol2nQaw5sTG2NbqdvsXC1cbpy
+	xHPLdNN13nbsd/x5DXohezd8UH1rfop/q4DOgfODF4Q6hV2GhIejiMGJ2oryjAqNHo4t
+	jzuQSZFUkl2TZZRrlXGWdpd/mIWZi5qQm5Gcl52dnp6fnKCdoZiilaOMpICldKZjp1Go
+	PKkkqg2q9KvarL6tqK6Rr4Cwb7FgslOzSbRDtT+2PLc8uD25QLpFu0m8Tb1Qvk2/O8Ah
+	wQrB9sLiw83EusWrxprHich5yWjKVctDzC/NGs4DzurPz9DE0cPSvNOx1J/VhtZm10HY
+	F9jp2brahttT3CHc8N3F3prfdOBR4Svh+uLA44XkSeUO5dPml+db6B/o4+mm6mrrLuvz
+	7Lbteu4+7wPvx/CM8VDyFPLX8530YfUk9er2rfdx+DX4+vm9+oH7RfwK/M79kv5W/x7/
+	/wAAAAkAIABDAHAApwDoAVAB1gJ8Az4EHAUcBjUHXwiaCecLPAyVDekPExA2EVgSdBON
+	FKEVrxa6F7sYtRmoGpMbdxxWHTAeAh7QH5kgZCE6Ih8i/yPgJL0llyZvJ0UoGijpKbgq
+	hCtPLBcs3S2jLmgvLS/xMLQxdzI6MvYzrzRmNRo1yzZ8Ny432jiJOTk56jqdO1I8CjzF
+	PYQ+RD8IP8xAkUFVQhZC2UOZRFhFFkXQRopHQ0f0SKRJVEoBSqxLVUv5TJVNJ02tTjBO
+	tE85T75QRFDMUVZR41JyUwNTl1QtVMZVYVYAVqBXQlgDWO1Z81r7XANdCl4QXxpgKGE1
+	YkNjVGRqZYJmm2e4aNdp92sabEFtaW6Nb69wzXHrcwh0H3UwdkB3SXhQeVB6SntDfDV9
+	JX4Rfvp/44DPgciCx4PFhMCFuoauh5+IiYlyilqLPowfjQCN4I7Aj6GQg5FikkSTHpPt
+	lLWVgZZTlyeX/JjWmbaal5t6nGKdSZ4ynxygBqDvodeivqOjpJill6aSp4eoeKlkqkur
+	L6wTrPet3a7Gr7GwqLGgsqazr7S/tdu2+rgeuUS6aLuJvKu9yb7owATBIMI6w1TEb8WM
+	xqrHx8jpygjLLMxSzYHOxtAm0YvS/9SF1hTXstlr2zXdFt8M4SjjZOXI6G7rae7F8ur4
+	1P//AABuZGluAAAAAAAABjYAAJQXAABYjQAAUbUAAI5iAAAoWwAAFqgAAFANAABUOQAC
+	o9cAAkAAAAFKPQADAQAAAgAAABQALQBGAF8AdwCOAKUAvADTAOkA/wEWASwBQwFZAXAB
+	hgGdAbQBywHjAfsCEwIsAkcCYgKGAqoC0AL3Ax8DSgN1A6EDzwP/BDEEZASZBNEFCgVF
+	BYEFwQYCBkYGigbQBxkHYweuB/sISwimCQgJbwnVCjwKpQsQC3wL6gxZDMsNPw24DjQO
+	tA85D8EQTxDjEXwSChKIEwUThxQKFI8VFxWfFikWsxc9F8oYWBjjGW8Z/BqJGxUbohwu
+	HLkdRR3SHl4e7R99IBAgpSE+IdYiciMSI7MkVCT5JaAmRCbsJ5UoPyjnKY0qNyrfK4cs
+	MizZLZkuaS8/MBgw7jHGMqIzfDRWNS82CDbjN7w4ljluOkc7Hjv1PMw9pD58P1dAM0ER
+	QexCz0O0RJ9FjEZ5R2tIYkleSlxLW0xfTWdOcE99UIxRnVKsU75U0VXjVvhYCFkXWipb
+	QVxYXXRelV++YPNiLmN6ZM1mNmewaTVqkmvTbQ9uUm+WcOByLHOBdNJ2IHdyeL96CXtO
+	fJF9zH8CgDuBb4KjhBWF2oehiWOLLYz1jrSQdpIwk+yVnZdOmPiaopxKnfOf66JEpKen
+	FqmZrCGurbFCs8+2V7jhu2C9qr/JwfzESsa7yV/MRs+Y02vX2tzd39riV+T157bqg+1L
+	8AjykvT69yr5LfsI/L3+g///AAAAJwBHAGQAgACaALMAzADkAPwBEwErAUMBWwF0AYwB
+	pQG+AdgB8gIMAicCRQJkAooCsgLbAwUDMQNfA44DvgPxBCYEXASUBM4FDAVKBYsF0AYX
+	BmAGqgb4B0gHmgfuCEcIpgkKCXIJ3ApICrcLKQudDBQMjw0LDYwOEQ6ZDyYPthBJEOER
+	fBISEp4TLBO8FE8U4xV6FhMWrBdGF+UYhRklGcgabhsUG70caB0SHcEecB8hH9MghiE9
+	IfEipiNdJBEkxSV5Jikm2CeIKDYo4imKKjUq3iuHLDIs2S2ZLmkvPzAYMO4xxjKiM3w0
+	VjUvNgg24ze8OJY5bjpHOx479TzMPaQ+fD9XQDNBEUHsQs9DtESfRYxGeUdrSGJJXkpc
+	S1tMX01nTnBPfVCMUZ1SrFO/VNRV7FcKWCNZP1phW4hcrl3cXwpgQWF+YrxkBWVOZqFn
+	92lPaqxsD21qbslwIHF5ctB0KHV5dsl4GXloerV8An1Pfpp/6oE8go6D9IV1hveIc4nw
+	i3OM8o5tj+2Rb5LxlHmWApePmR+atpxRnfOffKD2onukCqWmp1GpEKrbrLSulLCBsmu0
+	WbY3uBe57bu7va2/vMHSw+nGBMghykHMZ86P0LfS4dUP1z/Zctum3dvgFuJV5I7m1ekU
+	617tqu/x8kT0lPbm+Tr7k/3w//8AAABVAIoAtwDhAQgBLgFUAXoBoAHGAe0CFQI+AmoC
+	ngLUAwwDRwOFA8UECQRQBJoE6gU+BZcF9wZcBscHOQexCDEIrAkhCZsKFwqZCyALqww6
+	DNANag4KDq8PWRAHELkRbxIqEugTsBSAFVoWOhcfGA0Y/BnsGtwbyxy3HaMejR96IGoh
+	YSJZI1skYCVvJoInpSjPKgArPSyHLf8vqzFXMwc0sTZUN/E5hjsVPJ4+JD9kQFtBUUJG
+	Qz9EOUU2Ri9HJ0giSR5KGEsPTAVM/U3zTuhP3lDUUclSu1OvVKdVoVaiV6NYpVmsWrtb
+	z1zlXgVfKGBVYYtixGQJZVBmomf3aU9qlWvTbRBuVW+ccOxyQ3OndQ52eXfveWl65nxo
+	feh/aYDxgnWEE4XQh4eJMIrbjICOGY+wkUaS1ZRolfiXipkdmrWcUZ3zn3yg9qJ5pAal
+	nac+qO2qoKxWrgmvubFlsv+0mbYct5+5GbqEu++9U761wBnBgcLvxFrFzMc+yLTKLMuo
+	zSbOpNAh0Z/TG9Sa1hTXlNkQ2oncAd1q3rvf+eE24m/jneTA5eDm/egT6STqJ+sm7CHt
+	E+4B7unv0PCp8X/yTfMZ8930m/VX9gT2svdW9+/4ifkZ+aL6K/qv+x37jPv6/Gj8tv0E
+	/VL9oP3v/jz+gf7G/wz/Uf+X/9z//wAAZGVzYwAAAAAAAAAKQ29sb3IgTENEAAAAAAAA
+	AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+	AAAAAAAAAAAAAAAAAAAAAAAAAAAAAG1sdWMAAAAAAAAAAgAAAAxlblVTAAAAEgAAAChq
+	YUpQAAAADgAAADoAQwBvAGwAbwByACAATABDAEQwqzDpMPwAIABMAEMARG1tb2QAAAAA
+	AAAGEAAAnF4AAAAAwEuKAAAAAAAAAAAAAAAAAAAAAAB0ZXh0AAAAAENvcHlyaWdodCBB
+	cHBsZSBDb21wdXRlciwgSW5jLiwgMjAwNQAAAAD/2wBDAAEBAQEBAQEBAQEBAQEBAQEB
+	AQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQH/2wBD
+	AQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEB
+	AQEBAQEBAQEBAQEBAQH/wAARCAAwADADAREAAhEBAxEB/8QAHwAAAQUBAQEBAQEAAAAA
+	AAAAAAECAwQFBgcICQoL/8QAtRAAAgEDAwIEAwUFBAQAAAF9AQIDAAQRBRIhMUEGE1Fh
+	ByJxFDKBkaEII0KxwRVS0fAkM2JyggkKFhcYGRolJicoKSo0NTY3ODk6Q0RFRkdISUpT
+	VFVWV1hZWmNkZWZnaGlqc3R1dnd4eXqDhIWGh4iJipKTlJWWl5iZmqKjpKWmp6ipqrKz
+	tLW2t7i5usLDxMXGx8jJytLT1NXW19jZ2uHi4+Tl5ufo6erx8vP09fb3+Pn6/8QAHwEA
+	AwEBAQEBAQEBAQAAAAAAAAECAwQFBgcICQoL/8QAtREAAgECBAQDBAcFBAQAAQJ3AAEC
+	AxEEBSExBhJBUQdhcRMiMoEIFEKRobHBCSMzUvAVYnLRChYkNOEl8RcYGRomJygpKjU2
+	Nzg5OkNERUZHSElKU1RVVldYWVpjZGVmZ2hpanN0dXZ3eHl6goOEhYaHiImKkpOUlZaX
+	mJmaoqOkpaanqKmqsrO0tba3uLm6wsPExcbHyMnK0tPU1dbX2Nna4uPk5ebn6Onq8vP0
+	9fb3+Pn6/9oADAMBAAIRAxEAPwDd+Bfxs/4J+ftC/EFPhp4M+LXjLQtVl8P6pr9trvxE
+	8L2/gfwldRaU9tHPYw6/rU6WZ1OcXJms7F3R7tLe5WItKio3+XePyHPcBh3icwwjwNNT
+	VOVarjcsqSVacJTUZ4bB47FV4RajJzqTgqaulKXPKKf9XVcGklKhWpYyV1y0cHDGynGH
+	M06inVwdOnJKTimoTlJ/yuKcl+c/7cf7TXw68GfEbWvg38B/HWtXuv8AgbxrbC88aeCN
+	O8KeNtJ8W+HU0e2uJrRxr+lR6Vosa63Pc6Zd3Ed3dfakshcWN7FHPiT6nhzheq8PLM8f
+	gMFjcur4R0qOIzXHV8DQp4uT9+pg/wCzpvE4yrQWigoToXlKUoylGy+SzDGqVaOFpYzE
+	4XE066nUw+Hw1PE1p0opcsayxEVRw8KjbV5WqWS5XGMtfCfCn/BSS1vtOvLddC0uw1zR
+	TJDqGha0ltZ6zfmFTvNlOHjsGuCzRiWAWjqpwkZLudmmZ+GWd4KeGcatOvgsYlKlmWFo
+	1MVhKdOcrpVoPmqqPLGVqlRqLSTUVq3WD4jybEQrc/to4jDc6q4OtVp0a8pRi1aml7sr
+	N/BHmaejfb6p/ZM/bi+E3x2+I+g/CT4qG0+HHijxfr9h4X8K6tpkU2peHZ9Z1G4e2tLb
+	Wr28Nt9iW6uHtrRLq2t3t47uRvPEUTKEMdwRnmXU54jDqOIwMaEcR7edOFOpHl1nCph4
+	1pzpxkmpU5pybjuklFvKnm+V4m0I1qlPFKrKnKjJ80XHRwdOr7OPPKLUlOL5UmlZ6tH7
+	LaX+wnruj+JtYQ6v4bg8O3TtdQX1tNfXGtz3S+X5Zvra4shbxoN9wD5NwTH8hwQ7AfNu
+	WJlGC5G5RUZKU3BRV/j5eXmqKWiSbjzScfeS6dVOFOMpPn91t7J3fVN3dna6Ts1vpre/
+	e2n7I4sZgB4khcAjk2YDdQTzjnkZ7E4x0rnlGu5cynCNONpu655L4ZN83urduTVo37M7
+	KSprVOTu2lb1vtqn5NN9rtn8DNrPotj4P1nxWuqaa+t6JqOmwWPg14rqPVb2O7ErHXpJ
+	5rZdNt9J06eOOGRZLiS8up3MUduqL5j/ANUzweIxWOw+AqOpTw+LjVjUxyXtKUVCLlPD
+	QVJuo8RUhtpGEYtTbetvhcTmdLC4CtjcN7KtKlOEIwjUgnGdRyUKklLXlXLJ6xXM9r2l
+	E89i8deMPFHiAW3h3SrS417WIUl1vVpsyM1pJCYUgUkGGzRYwpmntmSacARMTGSrfT4L
+	g7A08LGjVq4mWFwtSUcvwFFKEYVIzU6lepK6dRJuSjGvenT+OK5uVnx8M2zLMcXKOEo0
+	/rGIUZYvE1E23Brl5Fpy01aMbuHvTej926PQbb4J3MxhvNUvmj1mYK5mtWMaKwXaN7ke
+	Y7BAEBUDcFAICjJ6MVUxuBi8O6EVhZKShTneXLHmV780LJOUvhs2pN+r+mwnCWHqRjXr
+	YmbxVrylBta2fvJ3u5KNldtaaNaHkviCfW/CniVGlnurm4tLlvMuWZ7ad0tmVrW6EgkD
+	NJGMNDcRtBNDJGhEnTFYbB4PGYOrQjCnSTSVOKinBTn/ABIRjKCcYyfxU5xlGUZtcu58
+	bmlPFZZmEnz1Kjpyvzy5otqLtTm2pLmlFRVpQcWmrN6K39eMX/BXvxf8Ef8AglZ+yn+1
+	FqHgOL4ufFXUvGGofAXxBa61rz6LpOrL4Rk1qB/E/ibUNOFzqj39/wCH9DtTp5hs7hW8
+	RXkt9ewfZeJfxyjwDhc44yzbh54x5fhaWG/tKE6dGNap70aUY0acJKEHyTqxdSUqkZKl
+	FxjJzkj6ivxNUweUYTM/Ye3q1JLDyg5OEOZ8znUlJc1oz5GoxSfvS68rt7T+zl/wXL/Z
+	j+OHw68MeIfG2pad8Gfifq1x4ss9c+G9/qh8S2+jP4TsNV8QSXq66LDTGOj6l4Y0mbU7
+	S/1Ow0yFrpLrSYZLm6tt0nicR+FmfZVmOIw+CoVczwVOhQrU8fGn7BVqdarRoez9k51L
+	1aeIrQoyp0pVZWlSnKKjKx7eR8UYLNKOHUqtLCYqtUqwlh6lRONJ04TqylKo1FKm6UJS
+	VSajFtON20rfhV4X/wCCcHjT4tfs/wDww8a6P8UbLUNI8efAnxR43Fnp+iaPJ4Ul8Y+G
+	PGep6PoOgprf2LTtU0DQtV0YWtzLqLw3NvBfWN3Fb6YI7oRQ+pU44y7KOMs4y+OQ1aOO
+	yvNMPToVHjcwq5pWoY/AU8RWnPL62MrUMRjFiKOKouMVTkkqblVlOEpP162Twzjhz61V
+	zLB08HUhhoPERwuBhl0HCrXjVqxxOEwkcZGhhqaw1aUY0qkVTlU9yT5YHydo3wjl+F89
+	14WvtOtbbW9Iu59N1mWAiRftlndS2d7HDdsA00MNzDLHG/yq8W11ABGP3ThLM8Zn7l7P
+	D14ydSXPKvR9lOKcrqFVSSVOUacrOkk5qSkmvdODAZTgMuwlOpQnh60KkVy18PONWlW5
+	dFWozsnOnNrmpyaXNF3suaw7xP4j07QJ1t7q70/T4LcQ+bqWuXDW8csspVEstOtoA1zc
+	yAFczP5FvllSNpHJx97i+FZ4+lWviIU3To89ZVKMpQioON4QUZxnOULJTqOVOFlfmbbv
+	liM5pYGrBSowp0rpOvUrxpQlKW0Yppt1HfZLdXt1OT8deFrTxx4Ov5LYQPdQWc19Zzxx
+	NCztEjSeWzMiylZohgZ4BIODxX5/UwWJynFUW7VYTSlGVGnKPNFSST9nJRnzuMleMk9t
+	G/dZ0ZlgqGc5biv3XLUp05SpzcXdyim7Qn/LJpptq7X2bXPDfi34j1/TP2evhl8MLfxV
+	rE/gbQvFt74wg8JvdEaEnibxhoIfUPEUdqjYmupYLFNPtpbhi1ktvfRwwwi8mefsyPDQ
+	qZzjM1qRoyxeY4OVPmUf9po0cFXpUYUZxcVKFOfNCcXDmjWs3fmp2Xx/F2WYHCcIZA8P
+	SlTxFLGuFSpBv2WLji8PUryqVFdqdSlWpOFKVoyhCUoOLjytcj+yTqnw+t/irqs3xQaO
+	f4f2fwx+NWu6hYXBiaC+13Tvg/45tPCsSRT7Unu/7b1WBLAEgTTTBGVlYgerxVh8WsqU
+	sBHlzR4nLsHg6sedTprGZngvaXnC8o026NOdaNpNKkmveSv8rwl9SWbwWZu+XU8LjcTi
+	qWjVVUcHiXFO9veXNKMVdPmkldXaf9FXhq6+Kv7OHwn+HOh6Z8UtLT4X/DvS/iH4V8Ca
+	fd/DdbC31C113xbrFpoNtc6Trni5vEC3HijS9UvbtF1XWPEV/o93qqrZxGw0ibH8M0c+
+	p8U8UcYZ7Q/tGjj6OJorD5nUx2Wxq4rHZBks8dXjXw9PJvYRhg8XilTpRp0KHPDnVeX1
+	lRhH+ycn4Fq4TPeHvDTF4bLcRkuaYvCYPPMTk/1vGYTB0cZWwHOqWLxGYS9q/er4Wnia
+	UqsKlfCYudpYVKpU/I/4nfFr4uftMfFH4l/Hq50LwZ4bmvfG/h2y1X/hFdKudC07WdNk
+	g1HS7O+07w3DqF5punXGoWPhG4uNYu7c28F5qtzcah9iDXU71/ZnDuNoZRlNX+1MU6+O
+	x+WzxlWpGlRwtTDZxLC4apVo0XgcJh41HetD2FJw5oe97WtUk21+D5lh6NHi3NMi4aiq
+	WVZHn08rwzqTrYiWIynDYidOjGftMROnSqKioSq1F7jc7wpQikiG30m31jxJE2vW01yb
+	maOax+3QfadJuQkqy2sc0UmQZIZLVZoo5NsfmW4kiYyEof1ThPN8ZXqyoYyjar7D2uDW
+	LhWdGrGpKM3erFRhNuUef2dWcpvk5lFOLS9LPchwlSU5xi3F1IN8saVRRqQTUZU41Oad
+	KpZWVSHK9Ur7HrOv6bDY6XepLIsEk1tIomO1EeWZGjVVGVwhyQqDnaO5rzuLMtnVUq8a
+	MY4q/tJ+znHlduVWhyxai3dqC5VLl1u7yRFCvTw2DnSc7QjTlBOV76pr3npdt35rtp6u
+	z6/l58Tp9a/4QvwpaGeR9B0vxD4t0iYNGCn9tWc8Uds8tyAWkzpk3l2kbn92kdwq57fK
+	ZCqNPNszozjBYqWGwOJopP3/AKrNP2ySvqo4mKcmrpc8HZc7b/M+IamOxGUZPTvN4DDY
+	vMMPqvcjjI1rx55JJ3lhpR9l0SVXfp4bFDIsEs0eXtwjQzNA53xiRTGglCkOiybtg8wC
+	OYgx7mZsD6uVSEqkKcmo1eaNSCqR0lytSk4XVpONrvlbnTT5rJI+QVOpTXtHdws4ylBv
+	TnTSU+XVKTsldKMvhi73P6qv2xdTurPwB4OtLyJYdT8T+KdTj0fRVbVdUaxs9D0C/tNI
+	1mTVVEumpfQalr/hTS9TNzeTTjUpr+RMCS3lb/Obw+yDCxoVYYnF4qWa5fUorFOrSp08
+	Pio8S47D5xmOKxGJapPE4uWHwWM5cHSoqNHB1oVKibSZ/ojwdm+Gy/PKWaZPl1SPD+Oy
+	KtmWBqY7khm0MwyrJ8RleHwc8FG/1Wh/amb1I0sTOblXr4GNClzSpy5vN/2TfCPw7+It
+	h8ZdI8S3UWgeA57C58PQapY2UEUPh25gvdR8UaBrKwWqWyyW+jxahZ397ksLq0gvImlN
+	s0qJ+6Z3m2JyfGZbWoJ4qr/bEqsoyd1i6WDw9HLFSlJyly/WauBlZyvKM588OZxkfzRj
+	atd18pjRpujia2Ejj6sIyak3m2NzTPLVLvlqv6vjsJTi01LljBS5L3l8RRyWL6te2unQ
+	3OvXmk6rfWv/AAkp8rTLS5tbC4MVrc2keueRr0djdWqx3NjE+lRzCGQqY1Ytt/rrhDMl
+	mWTU6+YUcRUx1GSq1KtepShVpOVpRw3u83O8PTnTpSpRpqN+dxm4yczWTr1YupRdKhep
+	ONWN/bOTTs5+9K/K1d82qejVrtG14gkm8ZSz+H3EYn0nwnqfiCOJUQrPdWV1Y+S5BL7J
+	jbrKiBctGZpGVs7Su2fYnE1qH17DUIVauX0Y4qnQlyxhVp4erCWJTSfK60sO5Qi4yko+
+	9BtrU8LEwjOvi8FiJRhKpQjJOOqjK7cZL3ZON5qO6TjfS2h4/wDD6HQ7DQbGDW9A0jXN
+	I1K/vtZ1rw7rFtDqOn6gmo3P2mS3vIZ8jzVi2KssRjltJo0ktpI2jjcfjHGHDmPxbweL
+	wuJxGXZmlOvTxmXVpYfE4JVbeyjTlBRtCnCUI1ISjUhO8o1YyhI9nhfF4DBYb6pj8Hhs
+	dg685TxWExdNV6VR1JOUnUjJNqd7OE4OM4OzpSi46fKPxLk+GVz8RPiFqXwm8Jnwx4It
+	ZLbSdP0Z9TvdXsLi7NnaxaxADqM1xcPpkusrPNaQtcSvBAI9k42RtH25fDP8PluTYHiP
+	NVmOayqVsTVxcKNLD16dKnWqfVqsZ0IU4LEfVko1JqEY1JSacGnJS+RzWOQVs4z3EcO5
+	bLCZTTjSwlHDSrVMRRq1506axEGq8pzdB4r3qacpSgoxlGcXFOP2zq154J8LaP8As6XU
+	f7QyeJvHun+NPG8vj/Vl8SyeJdM0jw/p13d24/szStZWeLSptautO0C5tJdQuHm1ZodL
+	1fRoo10WO6X4Ovk2a458VU58NV6WArYbDf2RQpUZYavDHxnh3QxDrYXkq1HSofWXOWHt
+	GNOc8PilJV6lKX0OJzPA5PHhyrlvFeFxGOxSxWFzSNHHRxGEqYHnqqVKrhanMqEHKcVC
+	liV7Wc5RxOFs4Kov0E/YK+Nn7O3hj4W/G5fih4/+EXg+9u/F2qWVjpfinXdO0/xNdeGr
+	7wXaRS6h4bttLvb2LxB5eoXF9Z2mn29hdWtypFnblEgkt5/yLjjgzxA/tbJMflOV5zm8
+	aeVU5YrDxqY+GFli3j8VzyTqLDUsFivZeyqVa+InSrxnN1puTkuf08tzfI5YWrRq4vL8
+	NTjiZwp1qjpSxdDDwwlGVCFKbVatXw1OMZU6dCnCpQeHgqdKzp8q8RtvAfhX4lRt4in8
+	O3WiaNqHm33haH7Q0GsabpBkH2JL25SeS4OorbqlxcxrMsaO0sSq6IrH+xvDDhTN8/yS
+	hmedVq1CNOnKjhM1yyvSprEzwlWdNYrERcZKpT9pFxlzRiqqpuUo3nd8mOxOGw8aUKbl
+	OpWp0q9J1VyP2VSCl7NqCXs6sV+8UUrxT5ejRz2kfCRvBXjK68Ry+Ir3xDaXul3OixwX
+	RtUNja3DCQr/AKPAovDMyRI8kpV40QKI2ZpJG+yzPJs3y7E1I5hUji6FTD16Ea2Ei6c0
+	p0pRnKrSTnSbk4x0oezjBqTlTbk3Hy8NTpYidfEKdWWIlFU5RruMoxUJOdqcoRTld2T5
+	7vlfuvV3/Nv4g/EkeD9N1Pw9Yy7deS51HTbK3QgyWECXEsAvblhnbshANtGx8yaYq+0R
+	qzV5FKWFxeVYGtU5JYhUKUYxg1LkcLc9So+WylLlSVOSbTakvdSPkMyzOpgKlbC0m/a3
+	lFKS1g5ac132jtZJN20sj5h0LWI7CIxXEl/bZMjLe2u2dY5JCQ0zwloyzEFhuLscnIBO
+	APFzHAyxM/aQjhqr91OhWbpOcYq6hGpaSS0TtZbWfn5GXY2GGi4VZ4mi221WpWqRhKVl
+	zSptxk21dX5pWbuo3SS//9k=
+	</data>
+	<key>last name</key>
+	<string>Schaffer</string>
+	<key>phone numbers</key>
+	<array>
+		<string>com.apple.syncservices:64ED42EB-109B-43A9-BEFC-3463D944251A</string>
+		<string>com.apple.syncservices:FB7585EB-A3DE-46D5-920C-DF8028689BC5</string>
+		<string>com.apple.syncservices:020036FD-22B3-41C9-BC3D-CDA6083582C6</string>
+		<string>com.apple.syncservices:C6661518-90CA-45C7-A988-02F73B958951</string>
+	</array>
+	<key>primary URL</key>
+	<array>
+		<string>com.apple.syncservices:5BA97109-F8E3-46A9-AF0B-5F8C093F49EA</string>
+	</array>
+	<key>primary email address</key>
+	<array>
+		<string>com.apple.syncservices:B97DCC9C-5B00-4D38-AB06-4B7A5D6BC369</string>
+	</array>
+	<key>primary phone number</key>
+	<array>
+		<string>com.apple.syncservices:64ED42EB-109B-43A9-BEFC-3463D944251A</string>
+	</array>
+	<key>primary related name</key>
+	<array>
+		<string>com.apple.syncservices:CD0B7021-0228-4770-8FB0-3739479E9788</string>
+	</array>
+	<key>primary street address</key>
+	<array>
+		<string>com.apple.syncservices:377B9105-9D15-4F69-BCD6-B01E587F7760</string>
+	</array>
+	<key>related names</key>
+	<array>
+		<string>com.apple.syncservices:CD0B7021-0228-4770-8FB0-3739479E9788</string>
+	</array>
+	<key>street addresses</key>
+	<array>
+		<string>com.apple.syncservices:377B9105-9D15-4F69-BCD6-B01E587F7760</string>
+	</array>
+</dict>
+</plist>
diff --git a/test/test_basic_types.rb b/test/test_basic_types.rb
new file mode 100644
index 0000000..669d920
--- /dev/null
+++ b/test/test_basic_types.rb
@@ -0,0 +1,54 @@
+#!/usr/bin/env ruby
+
+######################################
+# Copyright 2006, Ben Bleything.     #
+#                <ben@bleything.net> #
+#                                    #
+# 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
+end
diff --git a/test/test_narf_plist.rb b/test/test_narf_plist.rb
new file mode 100644
index 0000000..e7ae9d8
--- /dev/null
+++ b/test/test_narf_plist.rb
@@ -0,0 +1,107 @@
+require 'test/unit'
+require 'pp'
+
+require 'plist'
+
+class TestPlist < Test::Unit::TestCase
+  def test_Plist_parse_xml
+    result = Plist::parse_xml("test/AlbumData.xml")
+
+    # dict
+    assert_kind_of( Hash, result )
+    assert_equal( ["List of Albums",
+                   "Minor Version",
+                   "Master Image List",
+                   "Major Version",
+                   "List of Keywords",
+                   "Archive Path",
+                   "List of Rolls",
+                   "Application Version"],
+                  result.keys )
+
+    # array
+    assert_kind_of( Array, result["List of Rolls"] )
+    assert_equal( [ {"PhotoCount"=>1,
+                     "KeyList"=>["7"],
+                     "Parent"=>999000,
+                     "Album Type"=>"Regular",
+                     "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"] )
+
+    # integer
+    assert_kind_of( Integer, result["Major Version"] )
+    assert_equal( 2, result["Major Version"] )
+
+    # true
+    assert_kind_of( TrueClass, result["List of Albums"][0]["Master"] )
+    assert( result["List of Albums"][0]["Master"] )
+
+    # false
+    assert_kind_of( FalseClass, result["List of Albums"][1]["SlideShowUseTitles"] )
+    assert( ! result["List of Albums"][1]["SlideShowUseTitles"] )
+
+  end
+
+  #def test_load_something_big
+  #  plist = Plist::parse_xml( "~/Pictures/iPhoto Library/AlbumData.xml" )
+  #end
+
+
+  # date fields are credited to 
+  def test_date_fields
+    result = Plist::parse_xml("test/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("test/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
+
+  # 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("test/example_data.plist");
+    assert_equal( File.open("test/example_data.jpg"){|f| f.read }, data['image'].read )
+    assert_equal( File.open("test/example_data.plist"){|f| f.read }, data.to_plist )
+
+    data['image'] = StringIO.new( File.open("test/example_data.jpg"){ |f| f.read } )
+    File.open('temp.plist', 'w'){|f| f.write data.to_plist }
+    assert_equal( File.open("test/example_data.plist"){|f| f.read }, data.to_plist )
+
+    File.delete('temp.plist') if File.exists?('hello.plist')
+
+  end
+
+end
+
+__END__