LuaからCへのLuaネストしたテーブル

Question

入れ子になったLuaテーブルをC jsonオブジェクトに変換するのに失敗しました。私はLuaTableToJsonを使用しています（ここでコードを参照してください）。 "index"は検索するパラメータインデックスで、PopOneArgはその型に応じて値を処理するルーチンです。

ネストしたテーブルを持っているとき、私はLuaTableToJsonを再帰的に呼び出すことにしましたが、インデックス= -1では動作しません。

質問：

のLuaからC.

にネストした表を渡すときに、誰かが代わりのLuaからCへの引数として渡されたネストした表を盗んに取り組んでサンプルを上の点喜ばことができる誰かがスタック構造を説明することができ

ありがとう

注：C-> Luaの場合は解決策があります。パッケージ・ソリューションのために

STATIC json_object *LuaTableToJson (lua_State* luaState, int index) { 
    int idx; 

    json_object *tableJ= json_object_new_object(); 
    const char *key; 
    char number[3]; 
    lua_pushnil(luaState); // 1st key 
    for (idx=1; lua_next(luaState, index) != 0; idx++) { 

     // uses 'key' (at index -2) and 'value' (at index -1) 
     if (lua_type(luaState,-2) == LUA_TSTRING) key= lua_tostring(luaState, -2); 
     else { 
      snprintf(number, sizeof(number),"%d", idx); 
      key=number; 
     } 
     json_object *argJ= PopOneArg(luaState, -1); 
     json_object_object_add(tableJ, key, argJ); 
     lua_pop(luaState, 1); // removes 'value'; keeps 'key' for next iteration 
    } 

    // Query is empty free empty json object 
    if (idx == 1) { 
     json_object_put(tableJ); 
     return NULL; 
    } 
    return tableJ; 
} 

STATIC json_object *PopOneArg (lua_State* luaState, int idx) { 
    json_object *value=NULL; 

    int luaType = lua_type(luaState, idx); 
    switch(luaType) { 
     case LUA_TNUMBER: { 
      lua_Number number= lua_tonumber(luaState, idx);; 
      int nombre = (int)number; // evil trick to determine wether n fits in an integer. (stolen from ltcl.c) 
      if (number == nombre) { 
       value= json_object_new_int((int)number); 
      } else { 
       value= json_object_new_double(number); 
      } 
      break; 
     } 
     case LUA_TBOOLEAN: 
      value= json_object_new_boolean(lua_toboolean(luaState, idx)); 
      break; 
     case LUA_TSTRING: 
      value= json_object_new_string(lua_tostring(luaState, idx)); 
      break; 
     case LUA_TTABLE: { 
      if (idx > 0) { 
       value= LuaTableToJson(luaState, idx); 
      } else { 
       value= json_object_new_string("UNSUPPORTED_Lua_Nested_Table"); 
      } 
      break;     
     }  
     case LUA_TNIL: 
      value=json_object_new_string("nil") ; 
      break; 

     default: 
      AFB_NOTICE ("PopOneArg: script returned Unknown/Unsupported idx=%d type:%d/%s", idx, luaType, lua_typename(luaState, luaType)); 
      value=NULL; 
    } 

    return value;  
} 

static json_object *LuaPopArgs (lua_State* luaState, int start) {  
    json_object *responseJ; 

    int stop = lua_gettop(luaState); 
    if(stop-start <0) return NULL; 

    // start at 2 because we are using a function array lib 
    if (start == stop) { 
     responseJ=PopOneArg (luaState, start); 
    } else { 
     // loop on remaining return arguments 
     responseJ= json_object_new_array(); 
     for (int idx=start; idx <= stop; idx++) { 
      json_object *argJ=PopOneArg (luaState, idx); 
      if (!argJ) goto OnErrorExit; 
      json_object_array_add(responseJ, argJ);  
     } 
    } 

    return responseJ; 

    OnErrorExit: 
    return NULL; 
} 

Answer 1

、ネストされたテーブルを解析するとき、あなたは負のインデックスでパースする必要があり、基本的に私のコードhere

をご確認ください。この場合、lua_nextは、トラッキングしているインデックスを基準にしてスタックを台無しにするので、減分する必要があります。

テーブルを解析するときあなたは

if (index < 0) index--; // change to -- as in your code 

を試すことができます。それはあなたのコードで動作するはずですが、私には別の問題がないことを約束することはできません。

私のコードはどのレベルの入れ子にも対応していますので、例としてそれをフォローして、答えとして最終コードを投稿することをおすすめします。