Function lua_cjson_decode

engine/script/src/luacjson/lua_cjson.c:1633–1676

Note: The major difference between this function and the internal cjson json_encode function is that we don't use the config object created by cjson. Instead we initialize and create a default config here to avoid passing the config as a user data object. Note: We also have a boolean which decides upon the error handling

// a user data object.
// Note: We also have a boolean which decides upon the error handling
int lua_cjson_decode(lua_State *l, const char* json_string, size_t json_len,
                     int options_index, int protected_mode, char* errbuf,
                     size_t errbuf_len)
{
    json_config_t cfg;
    json_parse_t json;
    json_token_t token;

    json_initialize_config(l, options_index, &cfg, 0, protected_mode, errbuf, errbuf_len);
    json.cfg = &cfg;
    json.data = json_string;
    json.data_end = json_string + json_len;
    json.current_depth = 0;
    json.ptr = json.data;

    /* Detect Unicode other than UTF-8 (see RFC 4627, Sec 3)
     *
     * CJSON can support any simple data type, hence only the first
     * character is guaranteed to be ASCII (at worst: '"'). This is
     * still enough to detect whether the wrong encoding is in use. */
    if (json_len >= 2 && (!json.data[0] || !json.data[1]))
    {
        return DefoldError(&cfg, "JSON parser does not support UTF-16 or UTF-32");
    }

    /* Ensure the temporary buffer can hold the entire string.
     * This means we no longer need to do length checks since the decoded
     * string must be smaller than the entire json string */
    json.tmp = strbuf_new(json_len);

    json_next_token(&json, &token);
    if(!json_process_value(l, &json, &token))
        return 0;

    /* Ensure there is no more input left */
    json_next_token(&json, &token);

    if (token.type != T_END)
        return json_throw_parse_error(l, &json, "the end", &token);

    strbuf_free(json.tmp);

    return 1;
}

#if 0 // Defold: unused
/* ===== INITIALISATION ===== */