C API-table操作

獲取table字段值

想要獲取table字段的值仪媒,首先需要確定table在棧中的位置,知道了table的索引之后谢鹊,在通過lua提供的函數(shù)來獲取字段值

   int lua_getfield (lua_State *L, int idx, const char *k)

示例:
test_table.lua

    background = {r=0.30, g=0.10,b=0}

main.cc

#include <stdio.h>
#include <string.h>
#include <stdlib.h>

#ifdef __cplusplus
extern "C" {
#include "lua.h"
#include "lauxlib.h"
}

#endif // __cplusplus
#define MAX_COLOR 255
void error(lua_State *L, const char* fmt, ...) {
    va_list argp;
    va_start(argp, fmt);
    vfprintf(stderr, fmt, argp);
    va_end(argp);
    lua_close(L);
    exit(EXIT_FAILURE);
}


int getfield(lua_State* L, int index, const char* key) {
    int result;
    lua_getfield(L, index, key);//table 中的key會(huì)入棧 table 索引此時(shí)會(huì)變成 -2
    if (!lua_isnumber(L, -1)) {
        error(L, "invalid bakcground color");
    }

    result = (int)(lua_tonumber(L, -1) * MAX_COLOR);
    lua_pop(L, 1); //從棧彈出一個(gè)元素算吩,即剛剛放入的 table的key對(duì)應(yīng)的值
    return result;
}

void load(lua_State* L, const char* fname) {
    if (luaL_loadfile(L, fname) || lua_pcall(L, 0, 0, 0)) {
        //luaL_loadfile\lua_pcall 發(fā)生錯(cuò)誤,兩個(gè)函數(shù)都會(huì)把錯(cuò)誤消息壓入棧佃扼,并返回一個(gè)非零的錯(cuò)誤代碼偎巢,可以通過lua_tostring獲得錯(cuò)誤信息
        error(L, "error cannot run config  file:%s\n", lua_tostring(L, -1));
    }

    lua_getglobal(L, "background"); //將lua腳本中的全局變量 background 入棧
    
    int red = getfield(L, -1, "r");
    int green = getfield(L,-1, "g");
    int blue = getfield(L,-1, "b");

    printf("red =%d , green=%d, blue=%d\n", red, green, blue);
}

int main() {
    lua_State* L = luaL_newstate();
    int weight = 0;
    int height = 0;
    load(L, "./load_table.lua");
    lua_close(L);
    system("pause");
}

設(shè)置table的key的值

設(shè)置table的key的值需要用到lua_setfield函數(shù), 同樣的使用這個(gè)函數(shù)時(shí),也需要知道 table 的索引

LUA_API void lua_setfield (lua_State *L, int idx, const char *k);

但是這里用到了另外兩個(gè)函數(shù)

 void lua_newtable(lua_State *L); //實(shí)際上是個(gè)宏兼耀, 創(chuàng)建一個(gè)新的table, 并將其壓入棧
 void lua_setglobal (lua_State *L, const char *name) //給棧頂變量設(shè)置名字,并把棧頂元素彈出

示例代碼:
main.cc

#include <stdio.h>
#include <string.h>
#include <stdlib.h>

#ifdef __cplusplus
extern "C" {
#include "lua.h"
#include "lauxlib.h"
}

#endif // __cplusplus
#define MAX_COLOR 255

static void stack_dump(lua_State *L) {
    int i;
    int top = lua_gettop(L);//
    printf("stack len:%d  ", top);
    for (i = 1; i <= top; i++) {
        int t = lua_type(L, i);
        switch (t) {
        case LUA_TSTRING: {
            printf("'%s'", lua_tostring(L, i));
            break;
        }
        case LUA_TBOOLEAN: {
            printf(lua_toboolean(L, i) ? "true" : "false");
            break;
        }
        case LUA_TNUMBER: {
            printf("%g", lua_tonumber(L, i));
            break;
        }
        default:
            printf("%s", lua_typename(L, t));
            break;
        }
        printf("  ");
    }
    printf("\n");
}

void error(lua_State *L, const char* fmt, ...) {
    va_list argp;
    va_start(argp, fmt);
    vfprintf(stderr, fmt, argp);
    va_end(argp);
    lua_close(L);
    exit(EXIT_FAILURE);
}

struct ColorTable {
    const char *name;
    unsigned char red, green, blue;
};

int getfield(lua_State* L, int index, const char* key) {
    int result;
    lua_getfield(L, index, key);//table 中的key會(huì)入棧 table 索引此時(shí)會(huì)變成 -2
    if (!lua_isnumber(L, -1)) {
        error(L, "invalid bakcground color");
    }

    result = (int)(lua_tonumber(L, -1) * MAX_COLOR);
    lua_pop(L, 1); //從棧彈出一個(gè)元素压昼,即剛剛放入的 table的key對(duì)應(yīng)的值
    return result;
}

void setfield(lua_State *L, const char *key, int value) {
    lua_pushnumber(L, (double)value / MAX_COLOR);
    lua_setfield(L, -2, key);
}

void setcolor(lua_State* L, struct ColorTable* ct) {
    lua_newtable(L); //創(chuàng)建一個(gè)新的table, 并將其壓入棧
    stack_dump(L);
    setfield(L, "r", ct->red);
    setfield(L, "g", ct->green);
    setfield(L, "b", ct->blue);

    int red = getfield(L, -1, "r");
    int green = getfield(L, -1, "g");
    int blue = getfield(L, -1, "b");

    printf("red =%d , green=%d, blue=%d\n", red, green, blue);

    lua_setglobal(L, ct->name); //給棧頂變量設(shè)置名字,并把棧頂元素彈出
    stack_dump(L);
}

int main() {
    lua_State* L = luaL_newstate();
    ColorTable colortable[] = {
        {"WHITE", MAX_COLOR, MAX_COLOR, MAX_COLOR},
        {"RED", MAX_COLOR, 0, 0},
        {"GREEN", 0, MAX_COLOR, 0},
    };
    
    for (int i = 0; i < 3; i++) {
        setcolor(L, &colortable[i]);
    }

    lua_close(L);
    system("pause");
}
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末,一起剝皮案震驚了整個(gè)濱河市瘤运,隨后出現(xiàn)的幾起案子窍霞,更是在濱河造成了極大的恐慌,老刑警劉巖拯坟,帶你破解...
    沈念sama閱讀 212,383評(píng)論 6 493
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件但金,死亡現(xiàn)場(chǎng)離奇詭異,居然都是意外死亡郁季,警方通過查閱死者的電腦和手機(jī)冷溃,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 90,522評(píng)論 3 385
  • 文/潘曉璐 我一進(jìn)店門钱磅,熙熙樓的掌柜王于貴愁眉苦臉地迎上來,“玉大人似枕,你說我怎么就攤上這事盖淡。” “怎么了菠净?”我有些...
    開封第一講書人閱讀 157,852評(píng)論 0 348
  • 文/不壞的土叔 我叫張陵禁舷,是天一觀的道長(zhǎng)。 經(jīng)常有香客問我毅往,道長(zhǎng)牵咙,這世上最難降的妖魔是什么? 我笑而不...
    開封第一講書人閱讀 56,621評(píng)論 1 284
  • 正文 為了忘掉前任攀唯,我火速辦了婚禮洁桌,結(jié)果婚禮上,老公的妹妹穿的比我還像新娘侯嘀。我一直安慰自己另凌,他們只是感情好,可當(dāng)我...
    茶點(diǎn)故事閱讀 65,741評(píng)論 6 386
  • 文/花漫 我一把揭開白布戒幔。 她就那樣靜靜地躺著吠谢,像睡著了一般。 火紅的嫁衣襯著肌膚如雪诗茎。 梳的紋絲不亂的頭發(fā)上工坊,一...
    開封第一講書人閱讀 49,929評(píng)論 1 290
  • 那天,我揣著相機(jī)與錄音敢订,去河邊找鬼王污。 笑死,一個(gè)胖子當(dāng)著我的面吹牛楚午,可吹牛的內(nèi)容都是我干的昭齐。 我是一名探鬼主播,決...
    沈念sama閱讀 39,076評(píng)論 3 410
  • 文/蒼蘭香墨 我猛地睜開眼矾柜,長(zhǎng)吁一口氣:“原來是場(chǎng)噩夢(mèng)啊……” “哼阱驾!你這毒婦竟也來了?” 一聲冷哼從身側(cè)響起怪蔑,我...
    開封第一講書人閱讀 37,803評(píng)論 0 268
  • 序言:老撾萬榮一對(duì)情侶失蹤啊易,失蹤者是張志新(化名)和其女友劉穎,沒想到半個(gè)月后饮睬,有當(dāng)?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體租谈,經(jīng)...
    沈念sama閱讀 44,265評(píng)論 1 303
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 36,582評(píng)論 2 327
  • 正文 我和宋清朗相戀三年,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了割去。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片窟却。...
    茶點(diǎn)故事閱讀 38,716評(píng)論 1 341
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡,死狀恐怖呻逆,靈堂內(nèi)的尸體忽然破棺而出夸赫,到底是詐尸還是另有隱情,我是刑警寧澤咖城,帶...
    沈念sama閱讀 34,395評(píng)論 4 333
  • 正文 年R本政府宣布茬腿,位于F島的核電站,受9級(jí)特大地震影響宜雀,放射性物質(zhì)發(fā)生泄漏切平。R本人自食惡果不足惜,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 40,039評(píng)論 3 316
  • 文/蒙蒙 一辐董、第九天 我趴在偏房一處隱蔽的房頂上張望悴品。 院中可真熱鬧,春花似錦简烘、人聲如沸苔严。這莊子的主人今日做“春日...
    開封第一講書人閱讀 30,798評(píng)論 0 21
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽(yáng)届氢。三九已至,卻和暖如春覆旭,著一層夾襖步出監(jiān)牢的瞬間退子,已是汗流浹背。 一陣腳步聲響...
    開封第一講書人閱讀 32,027評(píng)論 1 266
  • 我被黑心中介騙來泰國(guó)打工姐扮, 沒想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留絮供,地道東北人衣吠。 一個(gè)月前我還...
    沈念sama閱讀 46,488評(píng)論 2 361
  • 正文 我出身青樓茶敏,卻偏偏與公主長(zhǎng)得像,于是被迫代替她去往敵國(guó)和親缚俏。 傳聞我的和親對(duì)象是個(gè)殘疾皇子惊搏,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 43,612評(píng)論 2 350

推薦閱讀更多精彩內(nèi)容