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>