0 / 0 / 0
Регистрация: 01.10.2015
Сообщений: 13
1

Lua передача таблицы в программу на C++

03.10.2015, 16:17. Показов 5444. Ответов 26
Метки нет (Все метки)

Пытаюсь передать таблицу из скрипта на Lua в программу на С++. Если таблица - одномерный массив, то все нормально.
Код на Lua:

Lua
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
function main()
  IsRun = true
  while IsRun do    
 
    Table = {}
    for i=1, 2, 1 do
        --Table[i] = {["one"]=i*10+1,["two"]=i*10+2,["three"]=i*10+3, ["four"]=i*10+4}
    end 
    Table={11,22,33,111,222,333}
    r=wind.Test(Table)      --функция С++
    
    sleep(3000)
    
   if r then
        IsRun = false
    end
  end
end
Код на С++
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
wchar_t  str[100];
 
    if(lua_istable(L,1))            // если в стеке указатель на массив
    {       
        lua_pushnil(L); //Добавляем в стек первый ключ равный нулю, ссылка на таблицу на втором месте по индексу -2
        //lua_next(L, 1);   //ссылка на таблицу в стеке на месте -3
                        //ключ в стеке на месте -2
                        //ссылка на строку в таблице t на месте -1. Или что ????
        //lua_pushnil(L);   //Добавляем в стек ключ равный нулю для второй ссылки
 
 
 
        swprintf(BUF,sizeof(BUF),L"");  // очищаем BUF
        while (lua_next(L, 1) != 0) //берет ключ из стека и помещает туда пару "значение-ключ" из таблицы (следующую после данного ключа). 
               {                    //Если не имеется больше элементов, то функция возвращает 0 (и не помещает в стек ничего)
                                    // в паре "ключ" находится по индексу -2, "значение" находится по индексу -1
                
        //          MessageBox(0,L" zzzz",L"Сообщение",MB_OK);
                    
                      // формирование строки
                      swprintf(str,sizeof(str),L"-1=%d  -2=%d  -3%s\n",lua_tointeger(L, -1), lua_tointeger(L, -2),lua_tointeger(L, -3));//,lua_tointeger(L, -4),lua_tointeger(L, -5));
            
                      // добавить строку в BUF
                      wcscat(BUF,str);  
                     
                                  
                  lua_pop(L, 1);        // освобождает стек для следующей итерации
                                        //снимает со стека 1 элемент, это "значение", ключ становится на первой позиции по индексу -1                                     
               }                        // конец while (lua_next(L, 1) != 0)   
    }
Выводит:
-1=11 -2=1 -3[null]
-1=22 -2=2 -3[nul]
-1=33 -2=3 -3[nul]
-1=111 -2=4 -3[nul]
-1=222 -2=5 -3=[nul]
-1=333 -2=6 -3=[nul]

Все как надо, вопросов нет. Теперь пытаюсь передать такую таблицу:

Lua
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
function main()
  IsRun = true
  while IsRun do    
 
    Table = {}
    for i=1, 2, 1 do
        Table[i] = {["one"]=i*10+1,["two"]=i*10+2,["three"]=i*10+3, ["four"]=i*10+4}
    end 
    --Table={11,22,33,111,222,333}
    r=wind.Test(Table)      --функция С++
    
    sleep(3000)
    
   if r then
        IsRun = false
    end
  end
end
Код функции на С++

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
wchar_t  str[100];
 
    if(lua_istable(L,1))            // если в стеке указатель на массив
    {       
        lua_pushnil(L); //Добавляем в стек первый ключ равный нулю, ссылка на таблицу на втором месте по индексу -2
        lua_next(L, 1); //ссылка на таблицу в стеке на месте -3
                        //ключ в стеке на месте -2
                        //ссылка на строку в таблице t на месте -1. Или что ????
        lua_pushnil(L); //Добавляем в стек ключ равный нулю для второй ссылки
 
 
 
        swprintf(BUF,sizeof(BUF),L"");  // очищаем BUF
        while (lua_next(L, 1) != 0) //берет ключ из стека и помещает туда пару "значение-ключ" из таблицы (следующую после данного ключа). 
               {                    //Если не имеется больше элементов, то функция возвращает 0 (и не помещает в стек ничего)
                                    // в паре "ключ" находится по индексу -2, "значение" находится по индексу -1   
                    
                      // формирование строки
                      swprintf(str,sizeof(str),L"-1=%d  -2=%d  -3=%d  -4=%d  -5=%d\n",lua_tointeger(L, -1), lua_tointeger(L, -2),lua_tointeger(L, -3),lua_tointeger(L, -4),lua_tointeger(L, -5));
            
                      // добавить строку в BUF
                      wcscat(BUF,str);                       
                                  
                  lua_pop(L, 1);        // освобождает стек для следующей итерации
                                        //снимает со стека 1 элемент, это "значение", ключ становится на первой позиции по индексу -1                                     
               }                        // конец while (lua_next(L, 1) != 0)   
    }
Выводит:

-1=0 -2=1 -3=0 -4=1 -5=0
-1=0 -2=2 -3=0 -4=1 -5=0

Помогите разобраться, как достать данные из таблицы, или в какую сторону копать.
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
03.10.2015, 16:17
Ответы с готовыми решениями:

Как вывести на печать данные из таблицы из lua-файла?
Создал "t.lua". файл содержит: require("data"); print(tostring(arr)) data.lua содержит:...

Lua наследование, lua ооп
Подскажите пожалуйста, как наследовать класс? Не получается выдаёт ошибку local car = {} --...

Посоветуйте программу для написания, просмотра и отладки lua скриптов
Посоветуйте пожалуйста программу для написания, просмотра и отладки lua скриптов. Мне конечно...

Передача таблицы на клиент
Доброго времени суток. Дело вот в чем имеется клиент который формирует и отсылает SQL запросы на...

26
0 / 0 / 0
Регистрация: 01.10.2015
Сообщений: 13
08.10.2015, 09:54  [ТС] 21
В строке 20 удаляется ключ
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

90 / 87 / 11
Регистрация: 20.11.2008
Сообщений: 724
08.10.2015, 10:47 22
Цитата Сообщение от Karim2 Посмотреть сообщение
В строке 20 удаляется ключ
вы неправы

посмотрел внимательнее, у вас ошибка в C-коде
зачем здесь точка с запятой? while(lua_next(L, -2) !=0); Вы бы хоть раз свой код прошли в отладчике
1
0 / 0 / 0
Регистрация: 01.10.2015
Сообщений: 13
08.10.2015, 11:21  [ТС] 23
Вот это ляп, сорри, не досмотрел. Спасибо за подсказку.

Добавлено через 24 минуты
В отладчике код пройти не получится, это *.dll
0
90 / 87 / 11
Регистрация: 20.11.2008
Сообщений: 724
09.10.2015, 14:15 24
Цитата Сообщение от Karim2 Посмотреть сообщение
В отладчике код пройти не получится, это *.dll
Достаточно настроить вызывающую программу, и всё получится
Ещё можно добавить в решение проект для отладки
0
0 / 0 / 0
Регистрация: 01.10.2015
Сообщений: 13
09.10.2015, 15:04  [ТС] 25
Вызывающая программа - торговый терминал QUIK. Так что я его никак не настрою.
0
Эксперт С++
8378 / 6114 / 613
Регистрация: 10.12.2010
Сообщений: 28,531
Записей в блоге: 30
09.10.2015, 17:27 26
Цитата Сообщение от Karim2 Посмотреть сообщение
Вызывающая программа - торговый терминал QUIK. Так что я его никак не настрою.
Фигеть проблема, а перекинуть код из ддл временно в простой консольный проект и там оттестить код?
0
0 / 0 / 0
Регистрация: 01.10.2015
Сообщений: 13
09.10.2015, 18:25  [ТС] 27
Вариант. Спасибо за подсказку.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
09.10.2015, 18:25

Передача таблицы БД клиенту
Ребят, возник вопрос. Как правильно передать клиенту таблицу (мускул)? В интернетах много...

Передача SQLite таблицы по TCP
Подскажите как сделать хотя бы в теории, от примера не откажусь.

Передача заполненной таблицы в представление
Добрый день. Хочу сформировать и заполнить в контроллере таблицу, посредством класса Htmltable, а...

Передача значений таблицы в отчет
Нужно чтобы в отчете в столбце "звание руководителя" вывести соответствующее звание из таблицы...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
27
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.