2 * Copyright (c) 2009, 2010 Petri Lehtinen <petri@digip.org>
3 * Copyright (c) 2010 Graeme Smecher <graeme.smecher@mail.mcgill.ca>
5 * Jansson is free software; you can redistribute it and/or modify
6 * it under the terms of the MIT license. See LICENSE for details.
20 * Simple, valid json_pack cases
24 value = json_pack(NULL, "b", 1);
25 if(!json_is_true(value))
26 fail("json_pack boolean failed");
27 if(value->refcount != (ssize_t)-1)
28 fail("json_pack boolean refcount failed");
32 value = json_pack(NULL, "b", 0);
33 if(!json_is_false(value))
34 fail("json_pack boolean failed");
35 if(value->refcount != (ssize_t)-1)
36 fail("json_pack boolean refcount failed");
40 value = json_pack(NULL, "n");
41 if(!json_is_null(value))
42 fail("json_pack null failed");
43 if(value->refcount != (ssize_t)-1)
44 fail("json_pack null refcount failed");
48 value = json_pack(NULL, "i", 1);
49 if(!json_is_integer(value) || json_integer_value(value) != 1)
50 fail("json_pack integer failed");
51 if(value->refcount != (ssize_t)1)
52 fail("json_pack integer refcount failed");
57 value = json_pack(NULL, "f", 1.0);
58 if(!json_is_real(value) || json_real_value(value) != 1.0)
59 fail("json_pack real failed");
60 if(value->refcount != (ssize_t)1)
61 fail("json_pack real refcount failed");
65 value = json_pack(NULL, "s", "test");
66 if(!json_is_string(value) || strcmp("test", json_string_value(value)))
67 fail("json_pack string failed");
68 if(value->refcount != (ssize_t)1)
69 fail("json_pack string refcount failed");
73 value = json_pack(NULL, "{}", 1.0);
74 if(!json_is_object(value) || json_object_size(value) != 0)
75 fail("json_pack empty object failed");
76 if(value->refcount != (ssize_t)1)
77 fail("json_pack empty object refcount failed");
81 value = json_pack(NULL, "[]", 1.0);
82 if(!json_is_array(value) || json_array_size(value) != 0)
83 fail("json_pack empty list failed");
84 if(value->refcount != (ssize_t)1)
85 fail("json_pack empty list failed");
88 /* non-incref'd object */
89 value = json_pack(NULL, "o", json_integer(1));
90 if(!json_is_integer(value) || json_integer_value(value) != 1)
91 fail("json_pack object failed");
92 if(value->refcount != (ssize_t)1)
93 fail("json_pack integer refcount failed");
97 value = json_pack(NULL, "O", json_integer(1));
98 if(!json_is_integer(value) || json_integer_value(value) != 1)
99 fail("json_pack object failed");
100 if(value->refcount != (ssize_t)2)
101 fail("json_pack integer refcount failed");
106 value = json_pack(NULL, "{s:[]}", "foo");
107 if(!json_is_object(value) || json_object_size(value) != 1)
108 fail("json_pack object failed");
109 if(!json_is_array(json_object_get(value, "foo")))
110 fail("json_pack object failed");
111 if(json_object_get(value, "foo")->refcount != (ssize_t)1)
112 fail("json_pack object refcount failed");
116 value = json_pack(NULL, "[i,i,i]", 0, 1, 2);
117 if(!json_is_array(value) || json_array_size(value) != 3)
118 fail("json_pack object failed");
121 if(!json_is_integer(json_array_get(value, i)) ||
122 json_integer_value(json_array_get(value, i)) != i)
124 fail("json_pack integer array failed");
132 /* mismatched open/close array/object */
133 if(json_pack(NULL, "[}"))
134 fail("json_pack failed to catch mismatched '}'");
136 if(json_pack(NULL, "{]"))
137 fail("json_pack failed to catch mismatched ']'");
139 /* missing close array */
140 if(json_pack(NULL, "["))
141 fail("json_pack failed to catch missing ']'");
143 /* missing close object */
144 if(json_pack(NULL, "{"))
145 fail("json_pack failed to catch missing '}'");
148 if(json_pack(NULL, "s", NULL))
149 fail("json_pack failed to catch null string");
154 /* vim: ts=4:expandtab:sw=4