package.cpath = "c:\\SBERBANK\\QUIK_RSA\\testdll\\Release\\testdll.dll"
-- Подключает библиотеку DLL
require("QluaCConnector");
 
-- Флаг для поддержания работы функции main
IsRun = true;
 
function main()
   -- Запускает функцию отправки сообщений в C#
   QluaCConnector.StartSendHi();
   -- Обеспечивает работу скрипта и библиотеки до остановки скрипта пользователем
   while IsRun do
      sleep(1000);
   end;   
end;
 
function OnStop()
   -- Останавливает функцию отправки сообщений в C#
   QluaCConnector.StopSendHi();
   -- Останавливает цикл в функции main
   IsRun = false;
end;

 
#include "stdafx.h"
#include < Windows.h>;
#define LUA_LIB
#define LUA_BUILD_AS_DLL
 
extern "C" {
#include "../contrib/lauxlib.h"
#include "../contrib/lua.h"
}
 
//=== Получает указатель на выделенную именованную память =====================================================//
// Имя для выделенной памяти
TCHAR Name[] = TEXT("MyMemory");
// Создаст, или подключится к уже созданной памяти с таким именем
HANDLE hFileMapMyMemory = CreateFileMapping(INVALID_HANDLE_VALUE, NULL, PAGE_READWRITE, 0, 256, Name);
 
 
// Флаг необходимости отправлять сообщение
bool Run = true;
 
//=== Реализация функций, вызываемых из LUA ====================================================================//
static int forLua_StartSendHi(lua_State *L) // Отправляет сообщения для C#
{
    // Если указатель на память получен
    if (hFileMapMyMemory)
    {
        // Получает доступ (представление) непосредственно к чтению/записи байт
        PBYTE pb = (PBYTE)(MapViewOfFile(hFileMapMyMemory, FILE_MAP_READ | FILE_MAP_WRITE, 0, 0, 256));
 
        // Если доступ получен
        if (pb != NULL)
        {
            // Очищает память при первом обращении
            for (int i = 0; i < 256; i++)pb[i] = '\0';
 
            // Бесконечный цикл пока Run == true
            while (Run)
            {
                // Если запись пустая (либо первая отправка, либо C# очистил память, подтвердив получение)
                if (pb[0] == 0)
                {
                    // Записывает текст сообщения в память
                    char *Str = "hello from DLL C/C++";
                    memcpy(pb, Str, strlen(Str));
                }
                // Пауза в 1 секунду
                Sleep(1000);
            }
 
            // Закрывает представление
            UnmapViewOfFile(pb);
            // Закрывает указатель на память
            CloseHandle(hFileMapMyMemory);
        }
    }
    return(0);
}
 
static int forLua_StopSendHi(lua_State *L) // Прекращает отправку сообщений для C#
{
    Run = false; // Выключает флаг
 
    return(0);
}
 
//=== Регистрация реализованных в dll функций, чтобы они стали "видимы" для Lua ================================//
static struct luaL_reg ls_lib[] = {
    { "StartSendHi", forLua_StartSendHi }, // из скрипта Lua эту функцию можно будет вызывать так: QluaCSharpConnector.StartSendHi(); здесь можно указать любое другое название
    { "StopSendHi", forLua_StopSendHi }, // соответственно
    { NULL, NULL }
};
 
//=== Регистрация названия библиотеки, видимого в скрипте Lua ==================================================//
extern "C" LUALIB_API int luaopen_QluaCConnector(lua_State *L) {
    luaL_openlib(L, "QluaCConnector", ls_lib, 0);
    return 0;
}

 #ifndef MAINWINDOW_H
#define MAINWINDOW_H
 
#include
// добавляем QTimer и QTime
#include
#include
 
namespace Ui {
class MainWindow;
}
 
class MainWindow : public QMainWindow
{
    Q_OBJECT
 
public:
    explicit MainWindow(QWidget *parent = 0);
    ~MainWindow();
 
private:
    Ui::MainWindow *ui;
     QTimer *tmr; //Адресная переменная таймера
private slots:
    void GetMessageFromDLL(); //Слот для принятия сообщений
};
 
#endif // MAINWINDOW_H

#include "mainwindow.h"
#include "ui_mainwindow.h"
//добавляем для winapi
#include "windows.h"
//имя MMF, задаваемое в dll
#define FILEMAP_NAME "MyMemory"
 
 
MainWindow::MainWindow(QWidget *parent) :
    QMainWindow(parent),
    ui(new Ui::MainWindow)
{
    ui->setupUi(this);
 
    tmr = new QTimer(this); // Создаем объект класса QTimer и передаем адрес переменной
    tmr->setInterval(1000); // Задаем интервал таймера
    connect(tmr, SIGNAL(timeout()), this, SLOT(GetMessageFromDLL())); // Подключаем сигнал таймера к нашему слоту
    tmr->start(); // Запускаем таймер
}
 
MainWindow::~MainWindow()
{
    delete ui;
    delete tmr;
}
 
void MainWindow::GetMessageFromDLL()
{
    HANDLE hFileMap = OpenFileMappingA(FILE_MAP_READ | FILE_MAP_WRITE, FALSE, FILEMAP_NAME);
    if(hFileMap){
        //если такой mmf существует, тогда считываем начало памяти
        PBYTE pbMapView = (PBYTE)MapViewOfFile(hFileMap, FILE_MAP_READ | FILE_MAP_WRITE, 0, 0, 256);
        if(pbMapView == NULL)
            ui->textBrowser->append( "невозможно открыть MMF. код ошибки "+ GetLastError());
        else {
        //преобразуем память в строку
        QString myString((char*)pbMapView);
       if (myString == "hello from DLL C/C++"){
            //выводим строку в textbrowser
            ui->textBrowser->append(myString);
            //очищаем память
            memset(pbMapView,'\0',256);
        }
        //закрываем
        UnmapViewOfFile(pbMapView);
        }
        CloseHandle(hFileMap);
    }
}