#include "lua.h"
#include "table.h"
#include "crypto.h"
#include "io.h"
#include "math.h"
#include "net.h"
#include "thread.h"
#include "test.h"
#include "config.h"
#include <signal.h>
#include <stdlib.h>

void sigHandle(int s){
  //signal(s, SIG_IGN);

  //signal(s, sigHandle);
  exit(s);
}

static int lua_exit(lua_State* L){

  lib_thread_clean();
  //sigHandle(0);
  return 0;
}

#define open_common(name)\
  int luaopen_lullaby_##name (lua_State* L){\
    luaL_register(L, #name, name##_function_list);\
    int tidx = lua_gettop(L);\
    i_config_metatable(L, name##_config);\
    lua_settop(L, tidx);\
    return 1;\
  }

open_common(array);
open_common(crypto);
open_common(io);
open_common(math);
open_common(net);
open_common(thread);
open_common(test);

#define push(T, name)\
  lua_pushstring(L, #name);\
  luaopen_lullaby_##name(L);\
  lua_settable(L, T);
  

int luaopen_lullaby(lua_State* L) { 
    /*lua_newuserdata(L, 1);
    int ud = lua_gettop(L);
    lua_newtable(L);
    int meta = lua_gettop(L);
    luaI_tsetcf(L, meta, "__gc", lua_exit);
    lua_pushvalue(L, meta);
    lua_setmetatable(L, ud);*/
    //create <lib>.array functions
    lua_newtable(L);
    int top = lua_gettop(L);
    //lua_newtable(L);

    push(top, array);
    push(top, crypto);
    push(top, io);
    push(top, math);
    push(top, net);
    push(top, thread);
    push(top, test);
    luaI_tsets(L, top, "version", GIT_COMMIT)

    //lreg("array", array_function_list);
    //lreg("crypto", crypto_function_list);
    //lreg("io", io_function_list);
    //lreg("math", math_function_list);
    //lreg("config", config_function_list);
    //lreg("net", net_function_list);
    //lreg("thread", thread_function_list);
    lua_settop(L, top); 
    return 1;
}