ruby-json 1.1.1

data/lib/json/objects.rb

@@ -0,0 +1,201 @@
+#
+# JSON Objects
+#  Copyright (C) 2003,2005 Rafael R. Sevilla <dido@imperium.ph>
+#  This file is part of JSON for Ruby
+#
+#  JSON for Ruby is free software; you can redistribute it and/or
+#  modify it under the terms of the GNU Lesser General Public License
+#  as published by the Free Software Foundation; either version 2.1 of
+#  the License, or (at your option) any later version.
+#
+#  JSON for Ruby is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+#  Lesser General Public License for more details. 
+#
+#  You should have received a copy of the GNU Lesser General Public
+#  License along with JSON for Ruby; if not, write to the Free
+#  Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+#  02111-1307 USA.
+#
+# Author:: Rafael R. Sevilla (mailto:dido@imperium.ph)
+# Heavily modified by Adam Kramer (mailto:adam@the-kramers.net)
+# Copyright:: Copyright (c) 2003,2005 Rafael R. Sevilla
+# License:: GNU Lesser General Public License
+# $Id: objects.rb,v 1.1 2005/01/28 02:08:45 didosevilla Exp $
+#
+
+
+class Object
+  def to_json #all strings in json need to have double quotes around them, treat random objects as strings
+    String.to_json(to_s)
+  end
+end
+
+
+class NilClass
+  def to_json
+    "null"
+  end
+end
+class TrueClass
+  def to_json
+    "true"
+  end
+end
+
+class FalseClass
+  def to_json
+    "false"
+  end
+end
+
+class Numeric
+  def to_json
+    to_s
+  end
+end
+
+class String
+    # produce a string in double quotes with all the necessary quoting
+    # done
+    def to_json
+      return String.to_json(self)
+    end
+
+    def self.to_json(str)
+      return "\"\"" if (str.length == 0)
+      newstr = "\""
+      str.each_byte {
+	|b|
+	c = b.chr
+	case c
+	when /\\|\">/
+	  newstr << "\\" + c
+	when "\b"
+	  newstr << "\\b"
+	when "\t"
+	  newstr << "\\t"
+	when "\n"
+	  newstr << "\\n"
+	when "\f"
+	  newstr << "\\f"
+	when "\r"
+	  newstr << "\\r"
+	else
+	  if (c < ' ')
+	    t = "000" + sprintf("%0x", b)
+	    newstr << ("\\u" + t[0,t.length - 4])
+	  else
+	    newstr << c
+	  end
+	end
+      }
+      newstr += '"'
+      return(newstr)
+    end
+end
+
+class Array
+
+    # This method will return a string giving the contents of the JSON
+    # array in standard JSON format.
+    def to_json
+      retval = '['
+
+      first=true
+      self.each { |obj|
+	retval << ',' unless first
+	retval << obj.to_json
+	first=false
+      }
+      retval << "]"
+      return(retval)
+    end
+
+    # This method will parse a JSON array from the passed lexer
+    # object.  It takes a lexer object which is about to read a JSON
+    # array.  It raises a runtime error otherwise.  It returns the
+    # original JSON array. This method is not intended to be used
+    # directly.
+    # =====Parameters
+    # +lexer+:: Lexer object to use
+    def from_json(lexer)
+      raise "A JSON Array must begin with '['" if (lexer.nextclean != "[")
+      return if lexer.nextclean == ']'
+      lexer.back
+      loop {
+	self << lexer.nextvalue
+	case lexer.nextclean
+	when ','
+	  return if (lexer.nextclean == ']')
+	  lexer.back
+	when ']'
+	  return(self)
+	else
+	  raise "Expected a ',' or ']'"
+	end
+      }
+    end
+end
+
+
+
+
+class Hash
+
+    # This method will serialize the hash into regular JSON format.
+    def to_json
+      retval = "{"
+
+      first = true
+      self.each {|key, val|
+ 	retval << "," unless first
+	key = key.to_s #keys in json hashes need to be strings, nothing else.
+ 	retval << key.to_json + ":"
+ 	retval << val.to_json
+	first = false
+      }
+      retval << "}"
+      return(retval)
+    end
+
+    # This method will parse a JSON object from the passed lexer
+    # object.  It takes a lexer object which is about to read a JSON
+    # object.  It raises a runtime error otherwise.  It returns the
+    # original JSON object.  This method probably shouldn't be used
+    # directly.
+    # =====Parameters
+    def from_json(lexer)
+      lexer.unescape if (lexer.nextclean == '%')
+      lexer.back
+      raise "A JSON Object must begin with '{'" if (lexer.nextclean != "{")
+      loop {
+	c = lexer.nextclean
+	key = nil
+	case c
+	when '\0'
+	  raise "A JSON Object must end with '}'"
+	when '}'
+	  return;
+	else
+	  lexer.back
+	  key = lexer.nextvalue().to_s()
+	end
+	raise "Expected a ':' after a key" if (lexer.nextclean() != ':')
+	self[key] = lexer.nextvalue()
+	case lexer.nextclean()
+	when ','
+	  return if (lexer.nextclean() == '}')
+	  lexer.back
+	when '}'
+	  return(self)
+	else
+	  raise "Expected a ',' or '}'"
+	end
+      }
+      return(self)
+    end
+
+end
+

data/ruby-json.gemspec

@@ -0,0 +1,25 @@
+Gem::Specification.new do |s|
+  s.name = %q{ruby-json}
+  s.version = "1.1.1"
+  s.date = %q{2005-01-28}
+  s.summary = %q{ruby-json is a library for using the JavaScript Object Notation (JSON) under Ruby.}
+  s.require_paths = ["json"]
+  s.email = %q{dido@imperium.ph}
+  s.homepage = %q{http://sourceforge.net/projects/json}
+  s.description = %q{ruby-json is a library able to serialize and deserialize Ruby objects to and from their JSON representation.}
+  
+  s.require_path = 'lib'
+  s.autorequire = %q{json/lexer}
+  s.has_rdoc = true
+  s.files = ["doc", "lib/json", "test", 
+             "README", "ruby-json.gemspec", "install.rb", "COPYING", 
+             "doc/files", "doc/index.html", "doc/rdoc-style.css", 
+             "doc/fr_method_index.html", "doc/fr_class_index.html", 
+             "doc/fr_file_index.html", "doc/created.rid", "doc/classes", "doc/files/json", 
+             "doc/files/test", "doc/files/install_rb.html", "doc/files/install_rb.src", "doc/files/json/lexer_rb.html", "doc/files/json/objects_rb.html", "doc/files/test/lexertest_rb.html", "doc/files/test/objtest_rb.html", "doc/files/test/arraytest_rb.html", "doc/files/install_rb.src/M000001.html", "doc/classes/JSON", "doc/classes/Hash.html", "doc/classes/ObjectTest.html", "doc/classes/JSON.html", "doc/classes/String.html", "doc/classes/Array.src", "doc/classes/Numeric.src", "doc/classes/Hash.src", "doc/classes/NilClass.html", "doc/classes/LexerTest.src", "doc/classes/String.src", "doc/classes/Object.src", "doc/classes/Object.html", "doc/classes/FalseClass.src", "doc/classes/Array.html", "doc/classes/ObjectTest.src", "doc/classes/TrueClass.src", "doc/classes/TrueClass.html", "doc/classes/FalseClass.html", "doc/classes/LexerTest.html", "doc/classes/NilClass.src", "doc/classes/ArrayTest.html", "doc/classes/Numeric.html", "doc/classes/ArrayTest.src", "doc/classes/JSON/Lexer.src", "doc/classes/JSON/Lexer.html", "doc/classes/JSON/Lexer.src/M000022.html", "doc/classes/JSON/Lexer.src/M000023.html", "doc/classes/JSON/Lexer.src/M000024.html", "doc/classes/JSON/Lexer.src/M000025.html", "doc/classes/JSON/Lexer.src/M000026.html", "doc/classes/JSON/Lexer.src/M000027.html", "doc/classes/JSON/Lexer.src/M000028.html", "doc/classes/JSON/Lexer.src/M000029.html", "doc/classes/JSON/Lexer.src/M000030.html", "doc/classes/JSON/Lexer.src/M000031.html", "doc/classes/JSON/Lexer.src/M000032.html", "doc/classes/JSON/Lexer.src/M000033.html", "doc/classes/JSON/Lexer.src/M000034.html", "doc/classes/JSON/Lexer.src/M000035.html", "doc/classes/JSON/Lexer.src/M000036.html", "doc/classes/Array.src/M000011.html", "doc/classes/Array.src/M000012.html", "doc/classes/Numeric.src/M000016.html", "doc/classes/Hash.src/M000009.html", "doc/classes/Hash.src/M000010.html", "doc/classes/LexerTest.src/M000008.html", "doc/classes/LexerTest.src/M000002.html", "doc/classes/LexerTest.src/M000003.html", "doc/classes/LexerTest.src/M000004.html", "doc/classes/LexerTest.src/M000005.html", "doc/classes/LexerTest.src/M000006.html", "doc/classes/LexerTest.src/M000007.html", "doc/classes/String.src/M000019.html", "doc/classes/String.src/M000020.html", "doc/classes/Object.src/M000018.html", "doc/classes/FalseClass.src/M000013.html", "doc/classes/ObjectTest.src/M000015.html", "doc/classes/TrueClass.src/M000021.html", "doc/classes/NilClass.src/M000017.html", "doc/classes/ArrayTest.src/M000014.html", 
+             "lib/json/objects.rb", 
+             "lib/json/lexer.rb", 
+             "test/lexertest.rb", 
+             "test/objtest.rb", 
+             "test/arraytest.rb"]
+end

data/test/arraytest.rb

@@ -0,0 +1,45 @@
+#
+# Unit Tests for JSON Arrays
+#  Copyright (C) 2002 Rafael R. Sevilla <dido@imperium.ph>
+#  This file is part of JSON for Ruby
+#
+#  JSON for Ruby is free software; you can redistribute it and/or
+#  modify it under the terms of the GNU Lesser General Public License
+#  as published by the Free Software Foundation; either version 2.1 of
+#  the License, or (at your option) any later version.
+#
+#  JSON for Ruby is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+#  Lesser General Public License for more details. 
+#
+#  You should have received a copy of the GNU Lesser General Public
+#  License along with JSON for Ruby; if not, write to the Free
+#  Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+#  02111-1307 USA.
+#
+# Author:: Rafael R. Sevilla (mailto:dido@imperium.ph)
+# Copyright:: Copyright (c) 2003 Rafael R. Sevilla
+# License:: GNU Lesser General Public License
+# $Id: arraytest.rb,v 1.2 2005/01/28 02:59:02 didosevilla Exp $
+#
+
+require 'test/unit'
+require 'json/lexer'
+require 'json/objects'
+
+class ArrayTest < Test::Unit::TestCase
+  def test_array_to_json
+    array = Array.new
+    array[0] = 'bar'
+    array[1] = 1
+    array[2] = 2.7182818
+
+    str = array.to_json
+    sarray = JSON::Lexer.new(str).nextvalue
+    assert(sarray.class == Array, "array was not generated by deserialization")
+    assert(sarray[0] == 'bar', "error in serialization of a string to JSON")
+    assert(sarray[1] == 1, "error in serialization of a FixNum to JSON")
+    assert(sarray[2] == 2.7182818, "error in serialization of a float to JSON")
+  end
+end

data/test/lexertest.rb

@@ -0,0 +1,146 @@
+#
+# Unit tests for JSON Lexer
+#  Copyright (C) 2003 Rafael R. Sevilla <dido@imperium.ph>
+#  This file is part of JSON for Ruby
+#
+#  JSON for Ruby is free software; you can redistribute it and/or
+#  modify it under the terms of the GNU Lesser General Public License
+#  as published by the Free Software Foundation; either version 2.1 of
+#  the License, or (at your option) any later version.
+#
+#  JSON for Ruby is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+#  Lesser General Public License for more details. 
+#
+#  You should have received a copy of the GNU Lesser General Public
+#  License along with JSON for Ruby; if not, write to the Free
+#  Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+#  02111-1307 USA.
+#
+# Author:: Rafael R. Sevilla (mailto:dido@imperium.ph)
+# Copyright:: Copyright (c) 2003 Rafael R. Sevilla
+# License:: GNU Lesser General Public License
+# $Id: lexertest.rb,v 1.3 2005/01/28 03:03:51 didosevilla Exp $
+#
+
+require 'test/unit'
+#require 'test/unit/ui/console/testrunner'
+require 'json/lexer'
+require 'json/objects'
+
+class LexerTest < Test::Unit::TestCase
+  def test_nextchar_back
+    str = "some_string"
+    lex = JSON::Lexer.new(str)
+    c = lex.nextchar
+    assert(c == 's', "wrong character read")
+    lex.back
+    c = lex.nextchar
+    assert(c == 's', "backing up produces inconsistent results")
+  end
+
+  def test_ending
+    lex = JSON::Lexer.new("ab")
+    lex.nextchar
+    assert(lex.more?, "more? method produces wrong results (no more when there should be more)")
+    lex.nextchar
+    assert(!lex.more?, "more? method produces wrong results (more when there are no more)")
+  end
+
+  def test_nextmatch
+    lex = JSON::Lexer.new("abc")
+    c = ""
+    assert_nothing_raised {
+      c = lex.nextmatch('a')
+    }
+    assert(c == 'a', "nextmatch is wrong")
+    assert_raises(RuntimeError, "exception not raised for not found") {
+      c = lex.nextmatch('a')
+    }
+  end
+
+  def test_nextchars
+    lex = JSON::Lexer.new("some_string")
+    str = lex.nextchars(4)
+    assert(str == 'some', "nextchars doesn't work correctly")
+    assert_raises(RuntimeError, "exception not raised for substring bounds error") {
+      lex.nextchars(10)
+    }
+  end
+
+  def test_nextclean
+    str1 = "/\t// comment\nb"
+    lex = JSON::Lexer.new(str1)
+    assert(lex.nextclean == '/', "nextclean seems to have problems")
+    assert(lex.nextclean == 'b', "// comment processing has problems")
+    str2 = "/ /* comment */b"
+    lex = JSON::Lexer.new(str2)
+    assert(lex.nextclean == '/', "nextclean seems to have problems")
+    assert(lex.nextclean == 'b', "/* .. */ comment processing has problems")
+    # test unclosed comments
+    lex = JSON::Lexer.new("a/* unclosed comment")
+    assert(lex.nextclean == 'a', "nextclean seems to have problems")
+    assert_raises(RuntimeError, "unclosed comment doesn't raise exceptions") {
+      lex.nextclean
+    }
+  end
+
+  def test_nextstring
+    str1 = "str\""
+    lex = JSON::Lexer.new(str1)
+    assert(lex.nextstring('"') == "str", "string processing has problems")
+    str2 = '\b\t\n\f\r"'
+    lex = JSON::Lexer.new(str2)
+    assert(lex.nextstring('"') == "\b\t\n\f\r", "escape sequence processing has bugs")
+    # UTF8 conversion tests for escape sequences
+    str3 = '\u1234"'
+    lex = JSON::Lexer.new(str3)
+    assert(lex.nextstring('"') == "\341\210\224", "Unicode escape sequence processing has bugs")
+  end
+
+  def test_nextvalue
+    str = "false"
+    lex = JSON::Lexer.new(str)
+    assert(lex.nextvalue == false, "error parsing false");
+
+    str = "true"
+    lex = JSON::Lexer.new(str)
+    assert(lex.nextvalue == true, "error parsing true");
+
+    str = "31337"
+    lex = JSON::Lexer.new(str)
+    assert(lex.nextvalue == 31337, "error parsing integer");
+
+    str = "0.577289"
+    lex = JSON::Lexer.new(str)
+    assert(lex.nextvalue == 0.577289, "error parsing float")
+
+    str = "\"123\n\""
+    lex = JSON::Lexer.new(str)
+    assert(lex.nextvalue == "123\n", "error parsing string")
+
+    str = "null"
+    lex = JSON::Lexer.new(str)
+    assert(lex.nextvalue.nil?, "error parsing null")
+
+    str = "[ 1, \"abc\", 2.7182818 ]"
+    lex = JSON::Lexer.new(str)
+    array = lex.nextvalue
+    assert(array[0] == 1, "error parsing an array (0th elem)")
+    assert(array[1] == "abc", "error parsing an array (1st elem)")
+    assert(array[2] = 2.7182818, "error parsing an array (2nd elem)")
+
+    str = '{"foo":"bar", "xyz":1, "e":2.7182818}'
+    lex = JSON::Lexer.new(str)
+    obj = lex.nextvalue
+    assert(obj["foo"] == "bar", "error parsing an object ('foo' elem)")
+    assert(obj["xyz"] == 1, "error parsing an object ('xyz' elem)")
+    assert(obj["e"] == 2.7182818, "error parsing an object ('e' elem)")
+
+    str = "false"
+    lex = JSON::Lexer.new(str)
+    assert(lex.nextvalue == false, "error parsing false");
+  end
+end
+

data/test/objtest.rb

@@ -0,0 +1,45 @@
+#
+# Unit Tests for JSON Objects
+#  Copyright (C) 2002 Rafael R. Sevilla <dido@imperium.ph>
+#  This file is part of JSON for Ruby
+#
+#  JSON for Ruby is free software; you can redistribute it and/or
+#  modify it under the terms of the GNU Lesser General Public License
+#  as published by the Free Software Foundation; either version 2.1 of
+#  the License, or (at your option) any later version.
+#
+#  JSON for Ruby is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+#  Lesser General Public License for more details. 
+#
+#  You should have received a copy of the GNU Lesser General Public
+#  License along with JSON for Ruby; if not, write to the Free
+#  Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+#  02111-1307 USA.
+#
+# Author:: Rafael R. Sevilla (mailto:dido@imperium.ph)
+# Copyright:: Copyright (c) 2003 Rafael R. Sevilla
+# License:: GNU Lesser General Public License
+# $Id: objtest.rb,v 1.2 2005/01/28 02:59:30 didosevilla Exp $
+#
+
+require 'test/unit'
+require 'json/lexer'
+require 'json/objects'
+
+class ObjectTest < Test::Unit::TestCase
+  def test_to_json
+    obj = Hash.new
+    obj['foo'] = 'bar'
+    obj['xyz'] = 1
+    obj['euler'] = 0.577215665
+
+    str = obj.to_json
+    sobj = JSON::Lexer.new(str).nextvalue
+    assert(sobj.class == Hash, "Hash was not generated by deserialization")
+    assert(sobj['foo'] == 'bar', "error in serialization of a string to JSON")
+    assert(sobj['xyz'] == 1, "error in serialization of a FixNum to JSON")
+    assert(sobj['euler'] == 0.577215665, "error in serialization of a float to JSON")
+  end
+end