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>