Annotation of libelwix/example/test_json.c, revision 1.6
1.2 misho 1: #include <stdio.h>
2: #include <string.h>
3: #include <unistd.h>
4: #include <fcntl.h>
5: #include <errno.h>
6: #include <sys/types.h>
7: #include <elwix.h>
8:
9:
10: int
11: run_simple(json_t *json)
12: {
1.6 ! misho 13: static const char *teststr = "[ \"test123\", {\"user\": \"johndoe\", { \"meow\", \"\", \"\aaa\"}, \"admin\": false, \"uid\": 1000, \"objects\" : { \"a\":\"1\", \"b\" : \"2\" ,\"c\" : \"3\", , \"oho\"},\n"
! 14: "\"groups\": [\"users\", \"\", \"wheel\", \"audio\", \"video\"], \"testend\":{\"x\" : \"8\", \"y\":\"7\", \"z\" : \"9\"}} ]";
1.2 misho 15: // static const char *teststr = "{}\n[]\n\"sdfsdf\"";
16: int i, ret;
1.6 ! misho 17: jtok_t *tok, toks[38];
1.2 misho 18: ait_val_t *v;
19: char *str;
20: array_t *arr;
21:
22: json_init(json, 0);
23: ret = json_parse(json, teststr, strlen(teststr), NULL, 0);
24: if (ret == -1) {
25: printf("Error:: #%d - %s\n", elwix_GetErrno(), elwix_GetError());
26: return 1;
27: } else
28: printf("We are need from %d tokens\n", ret);
29: json_init(json, 1);
30: ret = json_parse(json, teststr, strlen(teststr), NULL, 0);
31: if (ret == -1) {
32: printf("Error:: #%d - %s\n", elwix_GetErrno(), elwix_GetError());
33: return 1;
34: } else
35: printf("(strict) We are need from %d tokens\n", ret);
36: json_init(json, 0);
37: ret = json_parse(json, teststr, strlen(teststr), toks, sizeof toks/sizeof *toks);
38: if (ret == -1) {
39: printf("Error:: #%d - %s\n", elwix_GetErrno(), elwix_GetError());
40: return 1;
41: } else
42: printf("We parsed %d tokens next=%lu\n", ret, json->h_next);
43: memset(toks, 0, sizeof toks);
44: json_init(json, 1);
45: ret = json_parse(json, teststr, strlen(teststr), toks, sizeof toks/sizeof *toks);
46: if (ret == -1) {
47: printf("Error:: #%d - %s\n", elwix_GetErrno(), elwix_GetError());
48: return 1;
49: } else
50: printf("(strict) We parsed %d tokens next=%lu\n", ret, json->h_next);
51:
1.3 misho 52: if (!(tok = json_findbykey(teststr, "boza s kosmi", J_UNDEF, toks, ret)))
1.2 misho 53: printf("Key=\"boza s kosmi\" not found!\n");
1.3 misho 54: tok = json_findbykey(teststr, "user", J_UNDEF, toks, ret);
1.2 misho 55: if (tok) {
56: v = json_token2val(teststr, tok);
57: printf("Key=\"user\" data parent=%ld idx=%ld size=%ld type=%d %s\n", tok->tok_parent, tok->tok_idx, tok->tok_size, tok->tok_type, AIT_GET_STR(v));
58: ait_freeVar(&v);
59: }
1.3 misho 60: tok = json_findbykey(teststr, "admin", J_VALUE, toks, ret);
1.2 misho 61: if (tok) {
62: str = json_token2str(teststr, tok);
63: printf("Key=\"admin\" data parent=%ld idx=%ld size=%ld type=%d %s\n", tok->tok_parent, tok->tok_idx, tok->tok_size, tok->tok_type, str);
64: e_free(str);
65: }
1.3 misho 66: tok = json_findbykey(teststr, "uid", J_UNDEF, toks, ret);
1.2 misho 67: if (tok) {
68: printf("Key=\"uid\" data parent=%ld idx=%ld size=%ld type=%d %ld\n", tok->tok_parent, tok->tok_idx, tok->tok_size, tok->tok_type,
69: json_token2num(teststr, tok));
1.6 ! misho 70: arr = json_token2vars(teststr, tok);
! 71: for (i = 0; i < array_Size(arr); i++)
! 72: printf("avars[%d]=%s\n", i, AIT_GET_STR(array(arr, i, ait_val_t*)));
! 73: ait_freeVars(&arr);
! 74:
1.2 misho 75: arr = json_token2array(teststr, tok);
76: for (i = 0; i < array_Size(arr); i++)
1.6 ! misho 77: printf("arr[%d]=%s\n", i, array(arr, i, char*));
! 78: json_freearray(&arr);
1.2 misho 79: }
80:
1.3 misho 81: tok = json_findbykey(teststr, "groups", J_UNDEF, toks, ret);
1.2 misho 82: if (tok) {
83: str = json_token2str(teststr, tok);
1.6 ! misho 84: arr = json_token2vars(teststr, tok);
1.2 misho 85: printf("Key=\"groups\" data parent=%ld idx=%ld size=%ld type=%d %s\n", tok->tok_parent, tok->tok_idx, tok->tok_size, tok->tok_type, str);
86: e_free(str);
87: for (i = 0; i < array_Size(arr); i++)
1.6 ! misho 88: printf("avars[%d]=%s\n", i, AIT_GET_STR(array(arr, i, ait_val_t*)));
1.2 misho 89: ait_freeVars(&arr);
1.6 ! misho 90:
! 91: arr = json_token2array(teststr, tok);
! 92: for (i = 0; i < array_Size(arr); i++)
! 93: printf("arr[%d]=%s\n", i, array(arr, i, char*));
! 94: json_freearray(&arr);
1.2 misho 95: }
96:
1.3 misho 97: tok = json_findbykey(teststr, "objects", J_UNDEF, toks, ret);
1.2 misho 98: if (tok) {
99: str = json_token2str(teststr, tok);
1.6 ! misho 100: arr = json_token2vars(teststr, tok);
1.2 misho 101: printf("Key=\"objects\" data parent=%ld idx=%ld size=%ld type=%d %s\n", tok->tok_parent, tok->tok_idx, tok->tok_size, tok->tok_type, str);
102: e_free(str);
103: for (i = 0; i < array_Size(arr); i++)
1.6 ! misho 104: printf("avars[%d]=%s\n", i, AIT_GET_STR(array(arr, i, ait_val_t*)));
1.2 misho 105: ait_freeVars(&arr);
1.6 ! misho 106:
! 107: arr = json_token2array(teststr, tok);
! 108: for (i = 0; i < array_Size(arr); i++)
! 109: printf("arr[%d]=%s\n", i, array(arr, i, char*));
! 110: json_freearray(&arr);
1.2 misho 111: }
112:
1.3 misho 113: tok = json_findbykey(teststr, "testend", J_UNDEF, toks, ret);
1.2 misho 114: if (tok) {
115: str = json_token2str(teststr, tok);
1.6 ! misho 116: arr = json_token2vars(teststr, tok);
1.2 misho 117: printf("Key=\"testend\" data parent=%ld idx=%ld size=%ld type=%d %s\n", tok->tok_parent, tok->tok_idx, tok->tok_size, tok->tok_type, str);
118: e_free(str);
119: for (i = 0; i < array_Size(arr); i++)
1.6 ! misho 120: printf("avars[%d]=%s\n", i, AIT_GET_STR(array(arr, i, ait_val_t*)));
1.2 misho 121: ait_freeVars(&arr);
1.6 ! misho 122:
! 123: arr = json_token2array(teststr, tok);
! 124: for (i = 0; i < array_Size(arr); i++)
! 125: printf("arr[%d]=%s\n", i, array(arr, i, char*));
! 126: json_freearray(&arr);
1.2 misho 127: }
128:
129: return 0;
130: }
131:
132: static int
133: dump(const char *jstr, jtok_t *toks, int toksnum, int indent)
134: {
135: register int i, j, k;
136:
137: if (!toksnum)
138: return 0;
139:
140: if (toks->tok_type == J_VALUE) {
141: printf("%.*s", (int) json_toklen(toks), json_tokstr(jstr, toks));
142: return 1;
143: } else if (toks->tok_type == J_STRING) {
144: printf("%.*s", (int) json_toklen(toks), json_tokstr(jstr, toks));
145: return 1;
146: } else if (toks->tok_type == J_OBJECT) {
147: printf("\n");
148: for (j = i = 0; i < json_toksize(toks); i++) {
149: for (k = 0; k < indent; k++)
150: printf(" ");
151: j += dump(jstr, toks + j + 1, toksnum - j, indent + 1);
152: printf(": ");
153: j += dump(jstr, toks + j + 1, toksnum - j, indent + 1);
154: printf("\n");
155: }
156: return j + 1;
157: } else if (toks->tok_type == J_ARRAY) {
158: printf("\n");
159: for (j = i = 0; i < json_toksize(toks); i++) {
160: for (k = 0; k < indent - 1; k++)
161: printf(" ");
162: printf(" - ");
163: j += dump(jstr, toks + j + 1, toksnum - j, indent + 1);
164: printf("\n");
165: }
166: return j + 1;
167: }
168:
169: return 0;
170: }
171:
172: int
173: run_dump(json_t *json, char **args)
174: {
175: int rlen, toksnum, wait4eof = 0;
176: char buf[BUFSIZ];
177: ait_val_t v;
178: jtok_t *toks, *t;
179: FILE *f;
180:
181: json_init(json, 0);
182: f = fopen(args[1], "r");
183: if (!f) {
184: printf("fopen(%s) #%d - %s\n", *args, errno, strerror(errno));
185: return 1;
186: }
187:
188: toks = e_malloc(sizeof(jtok_t));
189: if (!toks) {
190: fclose(f);
191: return 1;
192: } else
193: toksnum = 1;
194: AIT_SET_STRSIZ(&v, 1);
195: while (42) {
196: memset(buf, 0, sizeof buf);
197: rlen = fread(buf, 1, sizeof buf, f);
198: switch (rlen) {
199: case -1:
200: printf("Error:: fread() #%d - %s\n", errno, strerror(errno));
201: AIT_FREE_VAL(&v);
202: e_free(toks);
203: fclose(f);
204: return 2;
205: case 0:
206: if (wait4eof)
207: return 0;
208: printf("Error:: Unexpected termination!\n");
209: AIT_FREE_VAL(&v);
210: e_free(toks);
211: fclose(f);
212: return 3;
213: default:
214: AIT_SET_STRCAT(&v, buf);
215: break;
216: }
217: again:
218: rlen = json_parse(json, AIT_GET_STR(&v), AIT_LEN(&v), toks, toksnum);
219: if (rlen == (u_int) -1) {
220: if (elwix_GetErrno() == J_ERR_NOMEM) {
221: toksnum *= 2;
222: t = e_realloc(toks, sizeof(jtok_t) * toksnum);
223: if (t) {
224: toks = t;
225: goto again;
226: }
227: }
228: } else {
229: dump(AIT_GET_STR(&v), toks, json->h_next, 0);
230: wait4eof = 1;
231: }
232: }
233: AIT_FREE_VAL(&v);
234: e_free(toks);
235: fclose(f);
236:
237: return 0;
238: }
239:
240: int
241: run_make()
242: {
243: char str[BUFSIZ];
244: ait_val_t *v;
245: array_t *arr;
246:
247: arr = ait_allocVars(4);
248: v = ait_getVars(&arr, 0);
249: AIT_SET_I16(v, 4444);
250: v = ait_getVars(&arr, 1);
251: AIT_SET_STR(v, "sezam");
252: v = ait_getVars(&arr, 2);
253: AIT_SET_U8(v, 0x1c);
254: v = ait_getVars(&arr, 3);
255: AIT_SET_STR(v, "0x45af");
256:
257: json_add_begin_object(str, sizeof str, 42);
258: json_add_pair(str, sizeof str, 42, "boza", "s kosmi");
259: json_add_comma(str, sizeof str, 42);
260: json_add_string(str, sizeof str, 0, "number");
261: json_add_colon(str, sizeof str, 42);
262: json_add_value(str, sizeof str, 0, 1234567890);
263: json_add_comma(str, sizeof str, 42);
264: json_add_string(str, sizeof str, 0, "obj__");
265: json_add_colon(str, sizeof str, 42);
266: json_add_begin_object(str, sizeof str, 42);
267: json_add_pair(str, sizeof str, 42, "subkey", "val0");
268: json_add_end_object(str, sizeof str, 42);
269: json_add_comma(str, sizeof str, 42);
270: json_add_string(str, sizeof str, 0, "arr4e");
271: json_add_colon(str, sizeof str, 42);
272: json_add_array(str, sizeof str, 42, arr);
273: json_add_end_object(str, sizeof str, 42);
274: ait_freeVars(&arr);
275:
276: printf("%s\n", str);
277: return 0;
278: }
279:
280: int
1.4 misho 281: run_stdin(json_t *json)
282: {
283: char szJSON[BUFSIZ] = { [0 ... BUFSIZ - 1] = 0 };
284: jtok_t *tok, toks[1024];
1.5 misho 285: int ret, scope;
1.4 misho 286: char *str;
287:
288: printf("Input JSON> ");
289: fgets(szJSON, sizeof szJSON, stdin);
290: printf("Readed JSON> %s", szJSON);
291:
292: json_init(json, 0);
293: ret = json_parse(json, szJSON, strlen(szJSON), toks, sizeof toks/sizeof *toks);
294: if (ret == -1) {
295: printf("Error:: #%d - %s\n", elwix_GetErrno(), elwix_GetError());
296: return 1;
297: } else
298: printf("We parsed %d tokens next=%lu\n", ret, json->h_next);
299:
300: printf("dump=%d\n", json_dump(stdout, szJSON, toks, json->h_next, 0));
301:
302: tok = json_findbykey(szJSON, "aaa", J_STRING, toks, ret);
303: if (tok) {
304: str = json_token2str(szJSON, tok);
305: if (str) {
306: printf("str=%s\n", str);
307: json_freestr(str);
308: }
309: }
1.5 misho 310:
311: printf("Default scope=%ld, scope for \"zzz\"=%ld\n",
312: json_objscope(NULL, szJSON, toks, ret),
313: (scope = json_objscope("zzz", szJSON, toks, ret)));
314:
315: tok = json_findbykeyatscope(0, szJSON, "t1", J_UNDEF, toks, ret);
316: if (tok) {
317: str = json_token2str(szJSON, tok);
318: if (str) {
319: printf("default scope t1=%s\n", str);
320: json_freestr(str);
321: }
322: }
323: tok = json_findbykeyatscope(scope, szJSON, "t1", J_UNDEF, toks, ret);
324: if (tok) {
325: str = json_token2str(szJSON, tok);
326: if (str) {
327: printf("scope=%ld object zzz t1=%s\n", scope, str);
328: json_freestr(str);
329: }
330: }
331:
332: scope = json_objscope("z", szJSON, toks, ret);
333: tok = json_findbykeyatscope(scope, szJSON, "t1", J_UNDEF, toks, ret);
334: if (tok) {
335: str = json_token2str(szJSON, tok);
336: if (str) {
337: printf("scope=%ld object z t1=%s\n", scope, str);
338: json_freestr(str);
339: }
340: }
341:
1.4 misho 342: return 0;
343: }
344:
345: int
1.2 misho 346: main(int argc, char **argv)
347: {
348: json_t json;
349:
350: if (argc < 2)
1.4 misho 351: return run_stdin(&json);
352: else if (argc < 3)
1.2 misho 353: return run_simple(&json);
1.4 misho 354: else if (argc < 4)
1.2 misho 355: return run_make();
356: else
357: return run_dump(&json, argv);
358:
359: return 0;
360: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>