Annotation of libelwix/src/json.c, revision 1.1.2.10
1.1.2.1 misho 1: /*************************************************************************
2: * (C) 2017 AITNET ltd - Sofia/Bulgaria - <misho@aitnet.org>
3: * by Michael Pounov <misho@elwix.org>
4: *
5: * $Author: misho $
1.1.2.10! misho 6: * $Id: json.c,v 1.1.2.9 2017/11/29 00:49:47 misho Exp $
1.1.2.1 misho 7: *
8: **************************************************************************
9: The ELWIX and AITNET software is distributed under the following
10: terms:
11:
12: All of the documentation and software included in the ELWIX and AITNET
13: Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>
14:
15: Copyright 2004 - 2017
16: by Michael Pounov <misho@elwix.org>. All rights reserved.
17:
18: Redistribution and use in source and binary forms, with or without
19: modification, are permitted provided that the following conditions
20: are met:
21: 1. Redistributions of source code must retain the above copyright
22: notice, this list of conditions and the following disclaimer.
23: 2. Redistributions in binary form must reproduce the above copyright
24: notice, this list of conditions and the following disclaimer in the
25: documentation and/or other materials provided with the distribution.
26: 3. All advertising materials mentioning features or use of this software
27: must display the following acknowledgement:
28: This product includes software developed by Michael Pounov <misho@elwix.org>
29: ELWIX - Embedded LightWeight unIX and its contributors.
30: 4. Neither the name of AITNET nor the names of its contributors
31: may be used to endorse or promote products derived from this software
32: without specific prior written permission.
33:
34: THIS SOFTWARE IS PROVIDED BY AITNET AND CONTRIBUTORS ``AS IS'' AND
35: ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
36: IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
37: ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
38: FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
39: DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
40: OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
41: HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
42: LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
43: OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
44: SUCH DAMAGE.
45: */
46: #include "global.h"
47:
48:
1.1.2.2 misho 49: /* JSON error strings */
50: const char *jerrstr[] = {
51: "No error",
52: "Not enough tokens were provided",
53: "Invalid character",
54: "JSON string isn't full",
55: "Invalid parameter",
56: NULL
57: };
58:
59:
60: /*
61: * json_init() - Initialize JSON handler
62: *
63: * @json = JSON handler, if there is NULL then dynamically will be allocated
64: * @jstrict = JSON strict mode, when we select strict mode every unquoted value is error
65: * return: =NULL error or !=NULL ready for use JSON handler and should be free with json_free()
66: */
67: json_t *
68: json_init(json_t * __restrict json, int jstrict)
69: {
70: json_t *j = json;
71:
72: if (!j) {
73: j = e_malloc(sizeof(json_t));
74: if (!j) {
75: LOGERR;
76: return NULL;
77: }
78: }
79:
80: memset(j, 0, sizeof(json_t));
81: j->h_parent = -1;
82: j->h_strict = jstrict;
83:
84: /* handler is dynamically allocated! */
85: if (!json)
86: j->h_alloc = j;
87:
88: return j;
89: }
90:
91: /*
92: * json_free() - Free JSON handler
93: *
94: * @json = JSON handler
95: * return: none
96: */
97: void
98: json_free(json_t * __restrict json)
99: {
100: if (json) {
101: if (json->h_alloc)
102: e_free(json);
103: else
104: memset(json, 0, sizeof(json_t));
105: }
106: }
107:
1.1.2.3 misho 108: static jtok_t *
109: json_gettoken(json_t * __restrict json, jtok_t * __restrict jtoks, u_int toksnum)
110: {
111: jtok_t *tok;
112:
113: assert(json || !(!jtoks && toksnum));
114:
115: if (json->h_next >= toksnum) {
116: elwix_SetErr(J_ERR_NOMEM, "%s", jerrstr[J_ERR_NOMEM]);
117: return NULL;
118: } else
1.1.2.6 misho 119: tok = &jtoks[json->h_next];
120: tok->tok_idx = json->h_next++;
1.1.2.3 misho 121: tok->tok_start = tok->tok_end = tok->tok_parent = -1;
122: tok->tok_size = 0;
123:
124: return tok;
125: }
126:
127: inline void
128: json_filltoken(jtok_t * __restrict tok, jtype_t type, long start, long end, long parent)
129: {
130: assert(tok);
131:
132: tok->tok_type = type;
133: tok->tok_start = start;
134: tok->tok_end = end;
135: tok->tok_parent = parent;
136: tok->tok_size = 0;
137: }
138:
139: static int
140: json_parse_string(json_t * __restrict json, const char *jstr, size_t jlen, jtok_t * __restrict jtoks, u_int toksnum)
141: {
142: jtok_t *tok;
143: u_long pos;
144: char ch;
145: register int i;
146:
147: assert(json || jstr || !(!jtoks && toksnum));
148:
149: for (pos = json->h_pos++; json->h_pos < jlen && jstr[json->h_pos]; json->h_pos++) {
150: ch = jstr[json->h_pos];
151:
152: if (ch == '\"') {
153: if (!jtoks)
154: return 0;
155: if (!(tok = json_gettoken(json, jtoks, toksnum))) {
156: json->h_pos = pos;
157: return -1;
158: } else
159: json_filltoken(tok, J_STRING, pos + 1, json->h_pos, json->h_parent);
160: return 0;
161: }
162:
163: if (ch == '\\' && json->h_pos + 1 < jlen) {
164: switch (jstr[++json->h_pos]) {
165: case '\"':
166: case '/':
167: case '\\':
168: case 'b':
169: case 'f':
170: case 'r':
171: case 'n':
172: case 't':
173: /* Allowed escaped symbols */
174: break;
175: case 'u':
176: /* Allows escaped symbol \uXXXX */
177: json->h_pos++;
178: for (i = 0; i < 4 && json->h_pos < jlen && jstr[json->h_pos]; i++, json->h_pos++) {
179: /* If it isn't a hex character we have an error */
180: if (!((jstr[json->h_pos] >= 48 && jstr[json->h_pos] <= 57) || /* 0-9 */
181: (jstr[json->h_pos] >= 65 && jstr[json->h_pos] <= 70) || /* A-F */
182: (jstr[json->h_pos] >= 97 && jstr[json->h_pos] <= 102))) { /* a-f */
183: json->h_pos = pos;
184: elwix_SetErr(J_ERR_INVAL, "%s", jerrstr[J_ERR_INVAL]);
185: return -1;
186: }
187: }
188: json->h_pos--;
189: break;
190: default:
191: /* Unexpected symbol */
192: json->h_pos = pos;
193: elwix_SetErr(J_ERR_INVAL, "%s", jerrstr[J_ERR_INVAL]);
194: return -1;
195: }
196: }
197: }
198:
199: json->h_pos = pos;
200: elwix_SetErr(J_ERR_PART, "%s", jerrstr[J_ERR_PART]);
201: return -1;
202: }
203:
204: static int
205: json_parse_value(json_t * __restrict json, const char *jstr, size_t jlen, jtok_t * __restrict jtoks, u_int toksnum)
206: {
207: jtok_t *tok;
208: u_long pos;
209:
210: assert(json || jstr || !(!jtoks && toksnum));
211:
212: for (pos = json->h_pos; json->h_pos < jlen && jstr[json->h_pos]; json->h_pos++) {
213: switch (jstr[json->h_pos]) {
214: case ':':
215: if (json->h_strict)
216: goto found;
217: break;
218: case '\t':
219: case '\r':
220: case '\n':
221: case ' ':
222: case ',':
223: case ']':
224: case '}':
225: goto found;
226: }
227: if (jstr[json->h_pos] < 32 || jstr[json->h_pos] > 127) {
228: json->h_pos = pos;
229: elwix_SetErr(J_ERR_INVAL, "%s", jerrstr[J_ERR_INVAL]);
230: return -1;
231: }
232: }
233:
234: if (json->h_strict) {
235: json->h_pos = pos;
236: elwix_SetErr(J_ERR_PART, "%s", jerrstr[J_ERR_PART]);
237: return -1;
238: }
239: found:
240: if (jtoks) {
241: if (!(tok = json_gettoken(json, jtoks, toksnum))) {
242: json->h_pos = pos;
243: return -1;
244: } else
245: json_filltoken(tok, J_VALUE, pos, json->h_pos, json->h_parent);
246: }
247:
248: json->h_pos--;
249: return 0;
250: }
251:
1.1.2.2 misho 252: /*
253: * json_parse() - Parse JSON string
254: *
255: * @json = JSON handler
256: * @jstr = JSON string
257: * @jlen = JSON string length
258: * @jtoks = Token array
259: * @toksnum = Token array size, return number of allocated tokens in array
260: * return: -1 error or number of found tokens
261: */
262: u_int
263: json_parse(json_t * __restrict json, const char *jstr, size_t jlen, jtok_t * __restrict jtoks, u_int toksnum)
264: {
265: register int i;
266: register u_int cx;
267: jtype_t type;
268: jtok_t *tok;
269: char ch;
270:
271: if (!json || !jstr || (!jtoks && toksnum)) {
272: elwix_SetErr(J_ERR_PARAM, "%s", jerrstr[J_ERR_PARAM]);
273: return (u_int) -1;
274: }
275:
276: for (cx = json->h_next; json->h_pos < jlen && jstr[json->h_pos]; json->h_pos++) {
277: switch ((ch = jstr[json->h_pos])) {
278: case '{':
279: case '[':
1.1.2.6 misho 280: cx++; /* start new object/array token */
1.1.2.2 misho 281: if (!jtoks)
282: break;
283:
284: tok = json_gettoken(json, jtoks, toksnum);
1.1.2.3 misho 285: if (!tok)
1.1.2.2 misho 286: return (u_int) -1;
287: if (json->h_parent != -1) {
288: jtoks[json->h_parent].tok_size++;
289: tok->tok_parent = json->h_parent;
290: }
291: tok->tok_type = (ch == '{' ? J_OBJECT : J_ARRAY);
292: tok->tok_start = json->h_pos;
293: json->h_parent = json->h_next - 1;
294: break;
295: case '}':
296: case ']':
297: if (!jtoks)
298: break;
299:
300: if (json->h_next < 1) {
301: elwix_SetErr(J_ERR_INVAL, "%s", jerrstr[J_ERR_INVAL]);
302: return (u_int) -1;
303: }
304:
305: type = (ch == '}' ? J_OBJECT : J_ARRAY);
306: tok = &jtoks[json->h_next - 1];
307: while (42) {
308: if (tok->tok_start != -1 && tok->tok_end == -1) {
309: if (tok->tok_type != type) {
310: elwix_SetErr(J_ERR_INVAL, "%s", jerrstr[J_ERR_INVAL]);
311: return (u_int) -1;
312: }
313: tok->tok_end = json->h_pos + 1;
314: json->h_parent = tok->tok_parent;
315: break;
316: }
317: if (tok->tok_parent == -1) {
318: if (tok->tok_type != type || json->h_parent == -1) {
319: elwix_SetErr(J_ERR_INVAL, "%s", jerrstr[J_ERR_INVAL]);
320: return (u_int) -1;
321: }
322: break;
323: }
324: tok = &jtoks[tok->tok_parent];
325: }
326: break;
327: case '\"':
1.1.2.8 misho 328: if (json_parse_string(json, jstr, jlen, jtoks, toksnum) == -1)
1.1.2.2 misho 329: return (u_int) -1;
1.1.2.6 misho 330: cx++; /* start new string token */
1.1.2.2 misho 331: if (jtoks && json->h_parent != -1)
332: jtoks[json->h_parent].tok_size++;
333: break;
334: case '\t':
335: case '\r':
336: case '\n':
337: case ' ':
338: /* whitespace, skip */
339: break;
340: case ':':
341: json->h_parent = json->h_next - 1;
342: break;
343: case ',':
344: if (jtoks && json->h_parent != -1 &&
345: jtoks[json->h_parent].tok_type != J_OBJECT &&
346: jtoks[json->h_parent].tok_type != J_ARRAY)
347: json->h_parent = jtoks[json->h_parent].tok_parent;
348: break;
349: case '-':
350: case '0':
351: case '1':
352: case '2':
353: case '3':
354: case '4':
355: case '5':
356: case '6':
357: case '7':
358: case '8':
359: case '9':
360: case 't':
361: case 'f':
362: case 'n':
1.1.2.3 misho 363: if (json->h_strict) {
364: if (jtoks && json->h_parent != -1) {
365: /* they must not be keys of the object */
366: if (jtoks[json->h_parent].tok_type == J_OBJECT ||
367: (jtoks[json->h_parent].tok_type == J_STRING &&
368: jtoks[json->h_parent].tok_size)) {
369: elwix_SetErr(J_ERR_INVAL, "%s", jerrstr[J_ERR_INVAL]);
370: return (u_int) -1;
371: }
372: }
1.1.2.2 misho 373:
1.1.2.3 misho 374: if (json_parse_value(json, jstr, jlen, jtoks, toksnum) == -1)
1.1.2.2 misho 375: return (u_int) -1;
1.1.2.6 misho 376: cx++; /* start new value token */
1.1.2.3 misho 377: if (jtoks && json->h_parent != -1)
378: jtoks[json->h_parent].tok_size++;
379: break;
1.1.2.2 misho 380: }
381: default:
382: if (json->h_strict) {
383: elwix_SetErr(J_ERR_INVAL, "%s", jerrstr[J_ERR_INVAL]);
384: return (u_int) -1;
385: }
386:
387: if (json_parse_value(json, jstr, jlen, jtoks, toksnum) == -1)
388: return (u_int) -1;
1.1.2.6 misho 389: cx++; /* start new value token */
1.1.2.2 misho 390: if (jtoks && json->h_parent != -1)
391: jtoks[json->h_parent].tok_size++;
392: break;
393: }
394: }
395:
396: if (jtoks) {
397: for (i = json->h_next - 1; i >= 0; i--) {
398: /* unmatched opened object or array */
399: if (jtoks[i].tok_start != -1 && jtoks[i].tok_end == -1) {
400: elwix_SetErr(J_ERR_PART, "%s", jerrstr[J_ERR_PART]);
401: return (u_int) -1;
402: }
403: }
1.1.2.6 misho 404: } else
405: cx++; /* increment needed tokens number for termination empty token */
1.1.2.2 misho 406:
407: return cx;
1.1.2.4 misho 408: }
409:
410: /*
411: * json_token2val() - Return token to AIT variable
412: *
413: * @jstr = JSON string
414: * @tok = Token for convert
415: * @return =NULL error or !=NULL allocated variable, after use should be ait_freeVar()
416: */
417: ait_val_t *
418: json_token2val(const char *jstr, jtok_t * __restrict tok)
419: {
420: ait_val_t *v = NULL;
421:
422: if (!jstr || !tok)
423: return NULL;
424:
425: v = ait_allocVar();
426: if (!v)
427: return NULL;
428:
1.1.2.7 misho 429: AIT_SET_STRSIZ(v, json_toklen(tok));
430: strncpy(AIT_GET_STR(v), json_tokstr(jstr, tok), AIT_LEN(v) - 1);
1.1.2.4 misho 431:
432: return v;
433: }
434:
435: /*
436: * json_token2str() - Return token to string
437: *
438: * @jstr = JSON string
439: * @tok = Token for convert
440: * @return =NULL error or !=NULL allocated str, after use should be e_free()
441: */
442: char *
443: json_token2str(const char *jstr, jtok_t * __restrict tok)
444: {
445: char *str = NULL;
446: size_t len;
447:
448: if (!jstr || !tok)
449: return NULL;
450:
1.1.2.7 misho 451: len = json_toklen(tok);
1.1.2.4 misho 452: str = e_malloc(len + 1);
453: if (!str)
454: return NULL;
455: else {
1.1.2.7 misho 456: strncpy(str, json_tokstr(jstr, tok), len);
1.1.2.4 misho 457: str[len] = 0;
458: }
459:
460: return str;
461: }
462:
463: /*
464: * json_token2num() - Return token to numeric
465: *
466: * @jstr = JSON string
467: * @tok = Token for convert
468: * @return number
469: */
470: long
471: json_token2num(const char *jstr, jtok_t * __restrict tok)
472: {
473: long ret = 0;
474: char *str;
475:
476: str = json_token2str(jstr, tok);
477: if (!str)
478: return 0;
479:
480: ret = strtol(str, NULL, 0);
481: e_free(str);
482: return ret;
483: }
484:
485: /*
486: * json_findbykey() - Find data by key
487: *
488: * @jstr = JSON string
489: * @key = Search key
490: * @toks = Parsed tokens
491: * @toksnum = Number of parsed tokens
492: * return: =NULL error or !=NULL data token found
493: */
494: jtok_t *
495: json_findbykey(const char *jstr, const char *key, jtok_t * __restrict toks, int toksnum)
496: {
497: jtok_t *tok = NULL;
498: register int i;
499: int klen;
500:
501: if (!jstr || !key || !toks)
502: return NULL;
503: else
504: klen = strlen(key);
505:
506: for (i = 1; i < toksnum; i++) {
507: if (toks[i].tok_type == J_STRING &&
508: klen == toks[i].tok_end - toks[i].tok_start &&
509: !strncmp(jstr + toks[i].tok_start, key, klen)) {
510: tok = toks + i + 1;
511: break;
512: }
513: }
514:
515: return tok;
516: }
517:
518: /*
1.1.2.6 misho 519: * json_token2array() - Convert token to string array
1.1.2.4 misho 520: *
521: * @jstr = JSON string
522: * @tok = Token for convert
1.1.2.6 misho 523: * return: =NULL error or !=NULL allocated array with string variables,
1.1.2.4 misho 524: * after use should be ait_freeVars()
525: */
526: array_t *
527: json_token2array(const char *jstr, jtok_t * __restrict tok)
528: {
529: array_t *arr = NULL;
530: register int i;
531: int siz;
532: ait_val_t *v;
533: jtok_t *t;
534:
535: if (!jstr || !tok)
536: return NULL;
537:
538: siz = tok->tok_size;
1.1.2.5 misho 539: if (!siz && json_toktype(tok) != J_ARRAY && json_toktype(tok) != J_OBJECT)
1.1.2.4 misho 540: siz++;
541:
542: arr = ait_allocVars(siz);
543: if (!arr)
544: return NULL;
545:
546: if (tok->tok_type == J_STRING || tok->tok_type == J_VALUE) {
547: v = ait_getVars(&arr, 0);
1.1.2.6 misho 548: AIT_SET_STRSIZ(v, json_toklen(tok) + 1);
1.1.2.5 misho 549: json_tokstrcpy(AIT_GET_STR(v), jstr, tok);
1.1.2.4 misho 550: } else if (tok->tok_type == J_ARRAY) {
551: for (i = 0; i < tok->tok_size; i++) {
552: t = &tok[i + 1];
553: v = ait_getVars(&arr, i);
1.1.2.6 misho 554: AIT_SET_STRSIZ(v, json_toklen(t) + 1);
555: json_tokstrcpy(AIT_GET_STR(v), jstr, t);
556: }
557: } else if (tok->tok_type == J_OBJECT) {
558: for (i = 0; tok->tok_idx <= tok[i + 1].tok_parent; i++) {
559: t = &tok[i + 1];
560: v = ait_getVars(&arr, i);
561: AIT_SET_STRSIZ(v, json_toklen(t) + 1);
1.1.2.5 misho 562: json_tokstrcpy(AIT_GET_STR(v), jstr, t);
1.1.2.4 misho 563: }
564: } else {
1.1.2.6 misho 565: elwix_SetErr(J_ERR_PARAM, "%s", jerrstr[J_ERR_PARAM]);
566: return NULL;
1.1.2.4 misho 567: }
568:
569: return arr;
1.1.2.9 misho 570: }
571:
572:
1.1.2.10! misho 573:
1.1.2.9 misho 574: /*
575: * json_add_begin_object() - Adds begin of object {
576: *
577: * @jstr = JSON string
578: * @jlen = JSON string length
579: * @wspace = whitespace include
580: * return: -1 error or !=-1 actual JSON string length
581: */
582: int
583: json_add_begin_object(char * __restrict jstr, int jlen, int wspace)
584: {
585: int len;
1.1.2.10! misho 586: size_t eos;
1.1.2.9 misho 587:
588: if (!jstr)
589: return -1;
1.1.2.10! misho 590: else
! 591: eos = strlen(jstr);
! 592:
1.1.2.9 misho 593:
594: if (wspace)
595: len = strlcat(jstr, "{ ", jlen);
596: else
597: len = strlcat(jstr, "{", jlen);
598:
599: if (len >= jlen) {
600: elwix_SetErr(J_ERR_NOMEM, "%s", jerrstr[J_ERR_NOMEM]);
1.1.2.10! misho 601: jstr[eos] = 0;
1.1.2.9 misho 602: return -1;
603: }
604:
605: return len;
606: }
607:
608: /*
609: * json_add_end_object() - Adds end of object }
610: *
611: * @jstr = JSON string
612: * @jlen = JSON string length
613: * @wspace = whitespace include
614: * return: -1 error or !=-1 actual JSON string length
615: */
616: int
617: json_add_end_object(char * __restrict jstr, int jlen, int wspace)
618: {
619: int len;
1.1.2.10! misho 620: size_t eos;
1.1.2.9 misho 621:
622: if (!jstr)
623: return -1;
1.1.2.10! misho 624: else
! 625: eos = strlen(jstr);
1.1.2.9 misho 626:
627: if (wspace)
628: len = strlcat(jstr, " }", jlen);
629: else
630: len = strlcat(jstr, "}", jlen);
631:
632: if (len >= jlen) {
633: elwix_SetErr(J_ERR_NOMEM, "%s", jerrstr[J_ERR_NOMEM]);
1.1.2.10! misho 634: jstr[eos] = 0;
1.1.2.9 misho 635: return -1;
636: }
637:
638: return len;
639: }
640:
641: /*
642: * json_add_begin_array() - Adds begin of array [
643: *
644: * @jstr = JSON string
645: * @jlen = JSON string length
646: * @wspace = whitespace include
647: * return: -1 error or !=-1 actual JSON string length
648: */
649: int
650: json_add_begin_array(char * __restrict jstr, int jlen, int wspace)
651: {
652: int len;
1.1.2.10! misho 653: size_t eos;
1.1.2.9 misho 654:
655: if (!jstr)
656: return -1;
1.1.2.10! misho 657: else
! 658: eos = strlen(jstr);
1.1.2.9 misho 659:
660: if (wspace)
661: len = strlcat(jstr, "[ ", jlen);
662: else
663: len = strlcat(jstr, "[", jlen);
664:
665: if (len >= jlen) {
666: elwix_SetErr(J_ERR_NOMEM, "%s", jerrstr[J_ERR_NOMEM]);
1.1.2.10! misho 667: jstr[eos] = 0;
1.1.2.9 misho 668: return -1;
669: }
670:
671: return len;
672: }
673:
674: /*
675: * json_add_end_array() - Adds end of array ]
676: *
677: * @jstr = JSON string
678: * @jlen = JSON string length
679: * @wspace = whitespace include
680: * return: -1 error or !=-1 actual JSON string length
681: */
682: int
683: json_add_end_array(char * __restrict jstr, int jlen, int wspace)
684: {
685: int len;
1.1.2.10! misho 686: size_t eos;
1.1.2.9 misho 687:
688: if (!jstr)
689: return -1;
1.1.2.10! misho 690: else
! 691: eos = strlen(jstr);
1.1.2.9 misho 692:
693: if (wspace)
694: len = strlcat(jstr, " ]", jlen);
695: else
696: len = strlcat(jstr, "]", jlen);
697:
698: if (len >= jlen) {
699: elwix_SetErr(J_ERR_NOMEM, "%s", jerrstr[J_ERR_NOMEM]);
1.1.2.10! misho 700: jstr[eos] = 0;
1.1.2.9 misho 701: return -1;
702: }
703:
704: return len;
705: }
706:
707: /*
708: * json_add_char() - Adds character
709: *
710: * @jstr = JSON string
711: * @jlen = JSON string length
712: * @ch = Character
713: * return: -1 error or !=-1 actual JSON string length
714: */
715: int
716: json_add_char(char * __restrict jstr, int jlen, u_char ch)
717: {
718: int len;
719:
720: if (!jstr)
721: return -1;
722:
1.1.2.10! misho 723: len = strlen(jstr) + 1;
1.1.2.9 misho 724: if (len >= jlen) {
725: elwix_SetErr(J_ERR_NOMEM, "%s", jerrstr[J_ERR_NOMEM]);
726: return -1;
727: } else {
728: jstr[len++] = (char) ch;
729: jstr[len] = 0;
730: }
731:
732: return len;
733: }
734:
735: /*
736: * json_add_colon() - Adds key/value pair delimiter colon :
737: *
738: * @jstr = JSON string
739: * @jlen = JSON string length
740: * @wspace = whitespace include
741: * return: -1 error or !=-1 actual JSON string length
742: */
743: int
744: json_add_colon(char * __restrict jstr, int jlen, int wspace)
745: {
746: int len;
1.1.2.10! misho 747: size_t eos;
1.1.2.9 misho 748:
749: if (!jstr)
750: return -1;
1.1.2.10! misho 751: else
! 752: eos = strlen(jstr);
1.1.2.9 misho 753:
754: if (wspace)
755: len = strlcat(jstr, ": ", jlen);
756: else
757: len = strlcat(jstr, ":", jlen);
758:
759: if (len >= jlen) {
760: elwix_SetErr(J_ERR_NOMEM, "%s", jerrstr[J_ERR_NOMEM]);
1.1.2.10! misho 761: jstr[eos] = 0;
1.1.2.9 misho 762: return -1;
763: }
764:
765: return len;
766: }
767:
768: /*
769: * json_add_comma() - Adds value delimiter comma ,
770: *
771: * @jstr = JSON string
772: * @jlen = JSON string length
773: * @wspace = whitespace include
774: * return: -1 error or !=-1 actual JSON string length
775: */
776: int
777: json_add_comma(char * __restrict jstr, int jlen, int wspace)
778: {
779: int len;
1.1.2.10! misho 780: size_t eos;
1.1.2.9 misho 781:
782: if (!jstr)
783: return -1;
1.1.2.10! misho 784: else
! 785: eos = strlen(jstr);
1.1.2.9 misho 786:
787: if (wspace)
788: len = strlcat(jstr, ", ", jlen);
789: else
790: len = strlcat(jstr, ",", jlen);
791:
792: if (len >= jlen) {
793: elwix_SetErr(J_ERR_NOMEM, "%s", jerrstr[J_ERR_NOMEM]);
1.1.2.10! misho 794: jstr[eos] = 0;
1.1.2.9 misho 795: return -1;
796: }
797:
798: return len;
799: }
800:
801: /*
802: * json_add_string() - Adds string
803: *
804: * @jstr = JSON string
805: * @jlen = JSON string length
806: * @unquot = Unquoted string
807: * @str = String, it can't be NULL
808: * return: -1 error or !=-1 actual JSON string length
809: */
810: int
811: json_add_string(char * __restrict jstr, int jlen, int unquot, const char *str)
812: {
813: int len;
1.1.2.10! misho 814: size_t eos;
1.1.2.9 misho 815:
816: if (!jstr || !str)
817: return -1;
1.1.2.10! misho 818: else
! 819: eos = strlen(jstr);
1.1.2.9 misho 820:
1.1.2.10! misho 821: if (!unquot) {
1.1.2.9 misho 822: len = strlcat(jstr, "\"", jlen);
1.1.2.10! misho 823: if (len >= jlen) {
! 824: elwix_SetErr(J_ERR_NOMEM, "%s", jerrstr[J_ERR_NOMEM]);
! 825: jstr[eos] = 0;
! 826: return -1;
! 827: }
! 828: }
1.1.2.9 misho 829: len = strlcat(jstr, str, jlen);
830: if (len >= jlen) {
831: elwix_SetErr(J_ERR_NOMEM, "%s", jerrstr[J_ERR_NOMEM]);
1.1.2.10! misho 832: jstr[eos] = 0;
1.1.2.9 misho 833: return -1;
834: }
1.1.2.10! misho 835: if (!unquot) {
! 836: len = strlcat(jstr, "\"", jlen);
! 837: if (len >= jlen) {
! 838: elwix_SetErr(J_ERR_NOMEM, "%s", jerrstr[J_ERR_NOMEM]);
! 839: jstr[eos] = 0;
! 840: return -1;
! 841: }
! 842: }
1.1.2.9 misho 843:
844: return len;
845: }
846:
847: /*
848: * json_add_value() - Adds value
849: *
850: * @jstr = JSON string
851: * @jlen = JSON string length
852: * @unquot = Unquoted number
853: * @num = Number
854: * return: -1 error or !=-1 actual JSON string length
855: */
856: int
857: json_add_value(char * __restrict jstr, int jlen, int unquot, long num)
858: {
859: int len;
860: char wrk[STRSIZ] = { [0 ... STRSIZ - 1] = 0 };
1.1.2.10! misho 861: size_t eos;
1.1.2.9 misho 862:
863: if (!jstr)
864: return -1;
1.1.2.10! misho 865: else
! 866: eos = strlen(jstr);
1.1.2.9 misho 867:
1.1.2.10! misho 868: if (!unquot) {
1.1.2.9 misho 869: len = strlcat(jstr, "\"", jlen);
1.1.2.10! misho 870: if (len >= jlen) {
! 871: elwix_SetErr(J_ERR_NOMEM, "%s", jerrstr[J_ERR_NOMEM]);
! 872: jstr[eos] = 0;
! 873: return -1;
! 874: }
! 875: }
1.1.2.9 misho 876: snprintf(wrk, sizeof wrk, "%ld", num);
877: len = strlcat(jstr, wrk, jlen);
878: if (len >= jlen) {
879: elwix_SetErr(J_ERR_NOMEM, "%s", jerrstr[J_ERR_NOMEM]);
1.1.2.10! misho 880: jstr[eos] = 0;
1.1.2.9 misho 881: return -1;
882: }
1.1.2.10! misho 883: if (!unquot) {
! 884: len = strlcat(jstr, "\"", jlen);
! 885: if (len >= jlen) {
! 886: elwix_SetErr(J_ERR_NOMEM, "%s", jerrstr[J_ERR_NOMEM]);
! 887: jstr[eos] = 0;
! 888: return -1;
! 889: }
! 890: }
1.1.2.9 misho 891:
892: return len;
893: }
894:
895: /*
896: * json_add_pair() - Adds key/value pair
897: *
898: * @jstr = JSON string
899: * @jlen = JSON string length
900: * @wspace = whitespace include
901: * @key = Key string
902: * @val = Value string
903: * return: -1 error or !=-1 actual JSON string length
904: */
905: int
906: json_add_pair(char * __restrict jstr, int jlen, int wspace, const char *key, const char *val)
907: {
908: int len = -1;
1.1.2.10! misho 909: size_t eos;
1.1.2.9 misho 910:
911: if (!jstr || !key || !val)
912: return -1;
1.1.2.10! misho 913: else
! 914: eos = strlen(jstr);
1.1.2.9 misho 915:
1.1.2.10! misho 916: if (json_add_string(jstr, jlen, 0, key) == -1) {
! 917: jstr[eos] = 0;
1.1.2.9 misho 918: return -1;
1.1.2.10! misho 919: }
! 920: if (json_add_colon(jstr, jlen, wspace) == -1) {
! 921: jstr[eos] = 0;
1.1.2.9 misho 922: return -1;
1.1.2.10! misho 923: }
! 924: if ((len = json_add_string(jstr, jlen, 0, key)) == -1) {
! 925: jstr[eos] = 0;
1.1.2.9 misho 926: return -1;
1.1.2.10! misho 927: }
1.1.2.9 misho 928:
929: return len;
930: }
931:
932: /*
933: * json_add_array() - Adds array
934: *
935: * @jstr = JSON string
936: * @jlen = JSON string length
937: * @wspace = whitespace include
938: * @arr = Array with variables
939: * return: -1 error or !=-1 actual JSON string length
940: */
941: int
942: json_add_array(char * __restrict jstr, int jlen, int wspace, array_t * __restrict arr)
943: {
944: int len = -1;
945: register int i;
946: ait_val_t *v;
1.1.2.10! misho 947: size_t eos;
1.1.2.9 misho 948:
949: if (!jstr || !arr)
950: return -1;
1.1.2.10! misho 951: else
! 952: eos = strlen(jstr);
1.1.2.9 misho 953:
1.1.2.10! misho 954: if (json_add_begin_array(jstr, jlen, wspace) == -1) {
! 955: jstr[eos] = 0;
1.1.2.9 misho 956: return -1;
1.1.2.10! misho 957: }
1.1.2.9 misho 958: for (i = 0; i < array_Size(arr); i++) {
959: v = array(arr, i, ait_val_t*);
960: if (v) {
961: if (AIT_TYPE(v) == string) {
1.1.2.10! misho 962: if (json_add_string(jstr, jlen, 0, AIT_GET_STR(v)) == -1) {
! 963: jstr[eos] = 0;
1.1.2.9 misho 964: return -1;
1.1.2.10! misho 965: }
1.1.2.9 misho 966: } else {
1.1.2.10! misho 967: if (json_add_value(jstr, jlen, 0, AIT_GET_LIKE(v, long)) == -1) {
! 968: jstr[eos] = 0;
1.1.2.9 misho 969: return -1;
1.1.2.10! misho 970: }
1.1.2.9 misho 971: }
1.1.2.10! misho 972: if (i < array_Size(arr) - 1 && json_add_comma(jstr, jlen, wspace) == -1) {
! 973: jstr[eos] = 0;
1.1.2.9 misho 974: return -1;
1.1.2.10! misho 975: }
1.1.2.9 misho 976: }
977: }
1.1.2.10! misho 978: if ((len = json_add_end_array(jstr, jlen, wspace)) == -1) {
! 979: jstr[eos] = 0;
1.1.2.9 misho 980: return -1;
1.1.2.10! misho 981: }
1.1.2.9 misho 982:
983: return len;
1.1.2.2 misho 984: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>