eJson tests initial import

json_test/test_json_parser.e

@@ -0,0 +1,160 @@
+indexing
+	description: "Objects that ..."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+class
+	EXAMPLE_JSON_PARSER
+
+feature -- Access
+
+	test_json_string is
+			--
+			local
+				parse_json:JSON_PARSER
+				json_value:JSON_VALUE
+			do
+				create parse_json.make_parser("%"key %N This is a test %"")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+			end
+
+	test_json_objects_with_string is
+			--
+			local
+				parse_json:JSON_PARSER
+				json_value:JSON_VALUE
+			do
+				create parse_json.make_parser("{}")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+				create parse_json.make_parser("{%"key%":%"value%"}")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+
+				create parse_json.make_parser("{%"key%"   :%"value%"}")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+
+				create parse_json.make_parser("{%"key%"   :     %"value%"}")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+
+				create parse_json.make_parser("{%"key%"   :     %"value%"    }")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+
+				create parse_json.make_parser("{   %N%"key%"   :     %"value%"    }")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+
+				create parse_json.make_parser("{   %N%"key%"   ;     %"value%"    }")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+			end
+
+	test_json_array is
+			--
+			local
+				parse_json:JSON_PARSER
+				json_value:JSON_VALUE
+			do
+				create parse_json.make_parser ("[]")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+
+				create parse_json.make_parser ("[%"value%"]")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+				create parse_json.make_parser ("[%"value%",%"value2%"]")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+				--create parse_json.make_parser ("[%"value%";%"value2%"]")
+				--json_value:=parse_json.parse
+				--print (json_value.to_json)
+
+
+				create parse_json.make_parser ("[null]")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+				create parse_json.make_parser ("[false]")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+				create parse_json.make_parser ("[true]")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+			end
+
+	test_json_number is
+			--
+			local
+				parse_json:JSON_PARSER
+				json_value:JSON_VALUE
+			do
+				create parse_json.make_parser ("1234.5")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+
+			    create parse_json.make_parser ("1234.e5")
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+			end
+
+	test_json_glossary_from_file is
+			--
+			local
+				file_reader:JSON_FILE_READER
+	        	parse_json:JSON_PARSER
+				json_value:JSON_VALUE
+
+	        do
+
+	        	create file_reader
+	            create parse_json.make_parser (file_reader.read_json_from ("./json_glossary_example.txt"))
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+
+				print ("%N JSON MENU %N")
+	            create parse_json.make_parser (file_reader.read_json_from ("./json_menu_example.txt"))
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+				print ("%N JSON WIDGET %N")
+				create parse_json.make_parser (file_reader.read_json_from ("./json_widget_example.txt"))
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+
+				print ("%N JSON WEBXML %N")
+				create parse_json.make_parser (file_reader.read_json_from ("./json_webxml_example.txt"))
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+				print ("%N JSON MENU2 %N")
+				create parse_json.make_parser (file_reader.read_json_from ("./json_menu2_example.txt"))
+				json_value:=parse_json.parse
+				print (json_value.to_json)
+
+
+
+
+	        end
+
+
+end