100 lines
2.1 KiB
C
100 lines
2.1 KiB
C
|
#define MY_DLL_EXPORTS 1
|
||
|
|
|
||
|
|
#include "util.h"
|
||
|
|
#include "irc.h"
|
||
|
|
#include "events.h"
|
||
|
|
#include "module.h"
|
||
|
|
#include "timers.h"
|
||
|
|
#include <stdio.h>
|
||
|
|
#include <stdlib.h>
|
||
|
|
#include <string.h>
|
||
|
|
|
||
|
|
#include "lua.h"
|
||
|
|
|
||
|
|
struct lua_interp lua;
|
||
|
|
struct irc_conn *instance;
|
||
|
|
|
||
|
|
MY_API void lua_eval(struct irc_conn *bot, char *user, char *host, char *chan, const char *text)
|
||
|
|
{
|
||
|
|
printf("lua eval called with %s\n", text);
|
||
|
|
if (strstr(text, "!lua") != NULL)
|
||
|
|
{
|
||
|
|
// skip the command
|
||
|
|
text = skip(text, ' ');
|
||
|
|
printf("lua: %s\n", text);
|
||
|
|
|
||
|
|
if (luaL_dostring(lua.L, text))
|
||
|
|
{
|
||
|
|
irc_privmsg(bot, chan, "Error: %s", lua_tostring(lua.L, -1));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
MY_API void lua_load_script(struct irc_conn *bot, char *user, char *host, char *chan, const char *text)
|
||
|
|
{
|
||
|
|
char *name;
|
||
|
|
char *script;
|
||
|
|
char *buf = (char *)malloc(sizeof(char *) * 500);
|
||
|
|
|
||
|
|
if (strstr(text, "!load") != NULL)
|
||
|
|
{
|
||
|
|
text = skip((char *)text, ' ');
|
||
|
|
sprintf(buf, "../scripts/%s", text);
|
||
|
|
|
||
|
|
strlcpy(lua.scripts[lua.count].fname, buf, 150);
|
||
|
|
|
||
|
|
if (luaL_loadfile(lua.L, buf))
|
||
|
|
{
|
||
|
|
irc_privmsg(bot, chan, "Error: %s", lua_tostring(lua.L, -1));
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
sprintf(buf, "Loaded %s", name);
|
||
|
|
irc_privmsg(bot, chan, buf);
|
||
|
|
}
|
||
|
|
|
||
|
|
free(buf);
|
||
|
|
}
|
||
|
|
|
||
|
|
void raw_wrapper(lua_State *L)
|
||
|
|
{
|
||
|
|
char *text = (char *)lua_tostring(L, 1);
|
||
|
|
|
||
|
|
irc_raw(instance, text);
|
||
|
|
}
|
||
|
|
|
||
|
|
void privmsg_wrapper(lua_State *L)
|
||
|
|
{
|
||
|
|
char *where = (char *)lua_tostring(L, 1);
|
||
|
|
char *text = (char *)lua_tostring(L, 2);
|
||
|
|
|
||
|
|
irc_privmsg(instance, where, text);
|
||
|
|
}
|
||
|
|
|
||
|
|
MY_API void mod_init()
|
||
|
|
{
|
||
|
|
instance = get_bot();
|
||
|
|
|
||
|
|
lua.scripts = calloc(512, sizeof(struct lua_script));
|
||
|
|
lua.count = 0;
|
||
|
|
|
||
|
|
lua.L = luaL_newstate();
|
||
|
|
luaL_openlibs(lua.L);
|
||
|
|
|
||
|
|
lua_register(lua.L, "privmsg", privmsg_wrapper);
|
||
|
|
lua_register(lua.L, "raw", raw_wrapper);
|
||
|
|
|
||
|
|
register_module("lua", "Aaron Blakely", "v0.1", "Lua module");
|
||
|
|
add_handler(PRIVMSG_CHAN, lua_eval);
|
||
|
|
printf("Lua module loaded\n");
|
||
|
|
}
|
||
|
|
|
||
|
|
MY_API void mod_unload()
|
||
|
|
{
|
||
|
|
lua_close(lua.L);
|
||
|
|
|
||
|
|
unregister_module("lua");
|
||
|
|
del_handler(PRIVMSG_CHAN, lua_eval);
|
||
|
|
printf("Lua module unloaded\n");
|
||
|
|
}
|