
Enviado em 27/02/2009 - 21:20h
Módulo Lua 5.1.4.
/*===============================================================
**
** DESCRIÇÃO:
** Como criar um módulo(.dll ou .so) para LUA 5.1.4
**
** COMPILE:
** gcc -shared -o mod.so mod.c -llua -Wall
**
** FUNCTION:
** mod.help()
** mod.func1(int, char *)
**
** BY: gokernel - gokernel@hotmail.com
**=================================================================*/
// LUA 5.1.4
#include "lua.h"
#include "lualib.h"
#include "lauxlib.h"
// Prototype
const luaL_reg my_mod[];
//===========================
// USE IN SCRIPT: mod.help()
//===========================
int mod_help (lua_State* L) {
int c;
printf("LIST OF FUNCTIONS:\n");
for (c=0; my_mod[c].name; c++) {
printf(" mod.%s()\n", my_mod[c].name);
}
return 0;
}
//===============================
// USE IN SCRIPT: mod.func1(10, "?? Hello Wold ??")
//===============================
int mod_func1 (lua_State* L) {
// Verifica se PARAMETROS == 2: no "script.lua"
if ( lua_gettop(L) == 2 ) {
int i = (int)lua_tonumber(L, 1);
char *string = (char *)lua_tostring(L, 2);
int count;
for (count = 0; count < i; count++) {
printf("%d = %s\n", count, string);
}
}
return 0;
}
// Seu pequeno MODULO para LUA 5.1.4
const luaL_reg my_mod[] = {
{"help", mod_help },
{"func1", mod_func1 },
{NULL, NULL }
};
//==========================================
// IMPORTANTE:
// Salve este arquivo com o nome: "mod.c"
//==========================================
LUA_API int luaopen_mod (lua_State* L)
{
luaL_openlib(L, "mod", my_mod, 0); // Carrega o seu MODULO
printf("Gloria a DEUS: O seu modulo foi CARREGADO\n");
return 1;
}
IA Turbina o Desktop Linux enquanto distros renovam forças
Como extrair chaves TOTP 2FA a partir de QRCODE (Google Authenticator)
Linux em 2025: Segurança prática para o usuário
Desktop Linux em alta: novos apps, distros e privacidade marcam o sábado
Atualizando o Fedora 42 para 43
Como saber se o seu e-mail já teve a senha vazada?
Como descobrir se a sua senha já foi vazada na internet?
VOL já não é mais como antes? (6)
É normal não gostar de KDE? (12)
E aí? O Warsaw já está funcionando no Debian 13? [RESOLVIDO] (15)
Secure boot, artigo interessante, nada técnico. (4)
copiar library para diretorio /usr/share/..... su com Falha na a... (1)









