Esempio n. 1
0
//----------------------------------------------------------------//
void _jsonObjectToLua ( lua_State* L, json_t* json ) {

    assert ( json->type == JSON_OBJECT );

    lua_newtable ( L );

    void* iter = json_object_iter ( json );
    for ( ; iter; iter = json_object_iter_next ( json, iter )) {

        cc8* key = json_object_iter_key ( iter );
        json_t* value = json_object_iter_value ( iter );

        _jsonToLua ( L, value );
        lua_setfield ( L, -2, key );
    }
}
Esempio n. 2
0
//----------------------------------------------------------------//
void _jsonArrayToLua ( lua_State* L, json_t* json ) {

    assert ( json->type == JSON_ARRAY );

    lua_newtable ( L );

    size_t size = json_array_size ( json );
    for ( size_t i = 0; i < size; ++i ) {

        json_t* value = json_array_get ( json, i );

        if ( value ) {

            lua_pushnumber ( L, i + 1 );
            _jsonToLua ( L, value );
            lua_settable ( L, -3 );
        }
    }
}
Esempio n. 3
0
/**	@name	decode
	@text	Decode a JSON string into a hierarchy of Lua tables.
	
	@in		string input
	@out	table result
*/
int MOAIJsonParser::_decode ( lua_State* L ) {
	UNUSED ( L );

	MOAILuaState state ( L );
	if ( state.IsType ( 1, LUA_TSTRING )) {
		
		size_t bufflen;
		cc8* buffer = lua_tolstring ( L, -1, &bufflen );
		
		json_error_t error;
		json_t* json = json_loadb ( buffer, bufflen, JSON_DISABLE_EOF_CHECK, &error );
		if ( json ) {
			
			_jsonToLua ( L, json );
			json_decref ( json );
			return 1;
		}
	}
	return 0;
}
Esempio n. 4
0
/**	@lua	decode
	@text	Decode a JSON string into a hierarchy of Lua tables.

	@in		string input
	@out	table result
*/
int MOAIJsonParser::_decode ( lua_State* L ) {
    UNUSED ( L );

    MOAILuaState state ( L );
    if ( state.IsType ( 1, LUA_TSTRING )) {

        size_t bufflen;
        cc8* buffer = lua_tolstring ( L, -1, &bufflen );

        json_error_t error;
        json_t* json = json_loadb ( buffer, bufflen, JSON_DISABLE_EOF_CHECK, &error );

        if ( json ) {
            _jsonToLua ( L, json );
            json_decref ( json );
            return 1;
        }
        else {
            printf ( "%d %d %d %s %s\n", error.line, error.column, error.position, error.source, error.text );
        }
    }
    return 0;
}