RS232_LIB int luaopen_luars232(lua_State *L)
{
int i;
create_metatables(L, MODULE_NAMESPACE, port_methods);
luaL_register(L, MODULE_NAMESPACE, port_functions);
for (i = 0; luars232_ulong_consts[i].name != NULL; i++) {
lua_pushstring(L, luars232_ulong_consts[i].name);
lua_pushnumber(L, luars232_ulong_consts[i].value);
lua_settable(L, -3);
}
lua_pushstring(L, MODULE_VERSION);
lua_setfield(L, -2, "_VERSION");
lua_pushstring(L, MODULE_BUILD);
lua_setfield(L, -2, "_BUILD");
lua_pushstring(L, MODULE_TIMESTAMP);
lua_setfield(L, -2, "_TIMESTAMP");
lua_pushstring(L, MODULE_COPYRIGHT);
lua_setfield(L, -2, "_COPYRIGHT");
DBG("[*] luaopen_luars232(Version: '%s' Build: '%s' TimeStamp: '%s')\n",
MODULE_VERSION, MODULE_BUILD, MODULE_TIMESTAMP);
return 0;
}
/*
** Creates the metatables for the objects and registers the
** driver open method.
*/
LUASQL_API int luaopen_luasql_firebird (lua_State *L) {
struct luaL_reg driver[] = {
{"firebird", create_environment},
{NULL, NULL},
};
create_metatables (L);
luaL_openlib (L, LUASQL_TABLENAME, driver, 0);
luasql_set_info (L);
return 1;
}
/*
** Creates the metatables for the objects and registers the
** driver open method.
*/
LUASQL_API int luaopen_luasql_odbc (lua_State *L) {
struct luaL_Reg driver[] = {
{"odbc", create_environment},
{NULL, NULL},
};
create_metatables (L);
lua_newtable (L);
luaL_setfuncs (L, driver, 0);
luasql_set_info (L);
return 1;
}
/*
** Creates the metatables for the objects and registers the
** driver open method.
*/
LUACRYPTO_API int luaopen_crypto(lua_State *L)
{
struct luaL_reg core[] = {
{NULL, NULL},
};
OpenSSL_add_all_digests();
create_metatables (L);
luaL_openlib (L, LUACRYPTO_CORENAME, core, 0);
luacrypto_set_info (L);
return 1;
}
/*
** Creates the metatables for the objects and registers the
** driver open method.
*/
LUASQL_API int luaopen_luasql_mysql (lua_State *L) {
struct luaL_reg driver[] = {
{"mysql", create_environment},
{NULL, NULL},
};
create_metatables (L);
luaL_openlib (L, LUASQL_TABLENAME, driver, 0);
luasql_set_info (L);
lua_pushliteral (L, "_MYSQLVERSION");
lua_pushliteral (L, MYSQL_SERVER_VERSION);
lua_settable (L, -3);
return 1;
}
/*
** Creates the metatables for the objects and registers the
** driver open method.
*/
LUACRYPTO_API int luaopen_crypto(lua_State *L)
{
#if CRYPTO_OPENSSL
if (OPENSSL_VERSION_NUMBER < 0x000907000L)
return luaL_error(L, "OpenSSL version is too old; requires 0.9.7 or higher");
OpenSSL_add_all_digests();
#elif CRYPTO_GCRYPT
gcry_check_version("1.2.2");
gcry_control (GCRYCTL_DISABLE_SECMEM, 0);
gcry_control (GCRYCTL_INITIALIZATION_FINISHED, 0);
#endif
struct luaL_reg core[] = {
{NULL, NULL},
};
create_metatables (L);
luaL_openlib (L, LUACRYPTO_CORENAME, core, 0);
luacrypto_set_info (L);
return 1;
}