100 lines
2.1 KiB
C
100 lines
2.1 KiB
C
|
// Module for U8glib
|
||
|
|
|
||
|
|
//#include "lua.h"
|
||
|
|
#include "lualib.h"
|
||
|
|
#include "lauxlib.h"
|
||
|
|
#include "platform.h"
|
||
|
|
#include "auxmods.h"
|
||
|
|
#include "lrotable.h"
|
||
|
|
|
||
|
|
#include "c_string.h"
|
||
|
|
#include "c_stdlib.h"
|
||
|
|
|
||
|
|
#include "c_types.h"
|
||
|
|
#include "mem.h"
|
||
|
|
#include "espconn.h"
|
||
|
|
|
||
|
|
typedef struct lu8g_userdata
|
||
|
|
{
|
||
|
|
int some_data;
|
||
|
|
} lu8g_userdata_t;
|
||
|
|
|
||
|
|
|
||
|
|
static int lu8g_new( lua_State *L )
|
||
|
|
{
|
||
|
|
lu8g_userdata_t *userdata = (lu8g_userdata_t *) lua_newuserdata( L, sizeof( lu8g_userdata_t ) );
|
||
|
|
|
||
|
|
userdata->some_data = 100;
|
||
|
|
|
||
|
|
// set its metatable
|
||
|
|
luaL_getmetatable(L, "u8g.display");
|
||
|
|
lua_setmetatable(L, -2);
|
||
|
|
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Lua: u8g.setup( self, id )
|
||
|
|
static int lu8g_setup( lua_State *L )
|
||
|
|
{
|
||
|
|
unsigned id = luaL_checkinteger( L, 2 );
|
||
|
|
|
||
|
|
//MOD_CHECK_ID( u8g, id );
|
||
|
|
|
||
|
|
if (id == 0)
|
||
|
|
return luaL_error( L, "ID 0 not supported!" );
|
||
|
|
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
// Module function map
|
||
|
|
#define MIN_OPT_LEVEL 2
|
||
|
|
#include "lrodefs.h"
|
||
|
|
|
||
|
|
static const LUA_REG_TYPE u8g_display_map[] =
|
||
|
|
{
|
||
|
|
{ LSTRKEY( "setup" ), LFUNCVAL( lu8g_setup ) },
|
||
|
|
#if LUA_OPTIMIZE_MEMORY > 0
|
||
|
|
{ LSTRKEY( "__index" ), LROVAL ( u8g_display_map ) },
|
||
|
|
#endif
|
||
|
|
{ LNILKEY, LNILVAL }
|
||
|
|
};
|
||
|
|
|
||
|
|
const LUA_REG_TYPE u8g_map[] =
|
||
|
|
{
|
||
|
|
{ LSTRKEY( "new" ), LFUNCVAL ( lu8g_new ) },
|
||
|
|
#if LUA_OPTIMIZE_MEMORY > 0
|
||
|
|
{ LSTRKEY( "__metatable" ), LROVAL( u8g_map ) },
|
||
|
|
#endif
|
||
|
|
{ LNILKEY, LNILVAL }
|
||
|
|
};
|
||
|
|
|
||
|
|
LUALIB_API int ICACHE_FLASH_ATTR luaopen_u8g( lua_State *L )
|
||
|
|
{
|
||
|
|
#if LUA_OPTIMIZE_MEMORY > 0
|
||
|
|
luaL_rometatable(L, "u8g.display", (void *)u8g_display_map); // create metatable
|
||
|
|
return 0;
|
||
|
|
#else // #if LUA_OPTIMIZE_MEMORY > 0
|
||
|
|
int n;
|
||
|
|
luaL_register( L, AUXLIB_U8G, u8g_map );
|
||
|
|
|
||
|
|
// Set it as its own metatable
|
||
|
|
lua_pushvalue( L, -1 );
|
||
|
|
lua_setmetatable( L, -2 );
|
||
|
|
|
||
|
|
// Module constants
|
||
|
|
// MOD_REG_NUMBER( L, "TCP", TCP );
|
||
|
|
|
||
|
|
// create metatable
|
||
|
|
luaL_newmetatable(L, "u8g.display");
|
||
|
|
// metatable.__index = metatable
|
||
|
|
lua_pushliteral(L, "__index");
|
||
|
|
lua_pushvalue(L,-2);
|
||
|
|
lua_rawset(L,-3);
|
||
|
|
// Setup the methods inside metatable
|
||
|
|
luaL_register( L, NULL, u8g_display_map );
|
||
|
|
|
||
|
|
return 1;
|
||
|
|
#endif // #if LUA_OPTIMIZE_MEMORY > 0
|
||
|
|
}
|