lunatik_conf.h

/*
* Copyright (c) 2023-2024 ring-0 Ltda.
*
* Permission is hereby granted, free of charge, to any person obtaining
* a copy of this software and associated documentation files (the
* "Software"), to deal in the Software without restriction, including
* without limitation the rights to use, copy, modify, merge, publish,
* distribute, sublicense, and/or sell copies of the Software, and to
* permit persons to whom the Software is furnished to do so, subject to
* the following conditions:
*
* The above copyright notice and this permission notice shall be
* included in all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
* IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
* CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
* TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
*/

#ifndef lunatik_conf_h
#define lunatik_conf_h

#undef LUA_INTEGER
#undef LUA_INTEGER_FRMLEN
#undef LUA_UNSIGNED
#undef LUA_MAXUNSIGNED
#undef LUA_MAXINTEGER
#undef LUA_MININTEGER

#ifdef __LP64__
#define LUA_INTEGER		long long
#define LUA_INTEGER_FRMLEN	"ll"
#define LUA_UNSIGNED	        unsigned long long
#define LUA_MAXUNSIGNED		ULLONG_MAX
#define LUA_MAXINTEGER		LLONG_MAX
#define LUA_MININTEGER		LLONG_MIN
#else
#define LUA_INTEGER		long
#define LUA_INTEGER_FRMLEN	"l"
#define LUA_UNSIGNED	        unsigned long
#define LUA_MAXUNSIGNED		ULONG_MAX
#define LUA_MAXINTEGER		LONG_MAX
#define LUA_MININTEGER		LONG_MIN
#endif /* __LP64__ */

#define LUAI_UACNUMBER		LUA_INTEGER
#define LUA_NUMBER		LUA_INTEGER
#define LUA_NUMBER_FMT		LUA_INTEGER_FMT

#define l_randomizePivot()	(~0)

#include <linux/random.h>
#define luai_makeseed(L)		get_random_u32()

#define lua_writestring(s,l)		printk("%s",(s))
#define lua_writeline()			printk("\n")
#define lua_writestringerror(...)	pr_err(__VA_ARGS__)

/* see https://www.gnu.org/software/libc/manual/html_node/Atomic-Types.html */
#define l_signalT	int

/* frame size shouldn't be larger than 1024 bytes; thus, LUAL_BUFFERSIZE
 * must be adjusted for the stack of functions that use luaL_Buffer */
#undef LUAL_BUFFERSIZE
#define LUAL_BUFFERSIZE		(256) /* {laux,load,lstr,ltab,lutf8}lib.c */

#ifdef lauxlib_c
#define panic	lua_panic
#endif

#include <linux/module.h>
#ifdef MODULE /* see https://lwn.net/Articles/813350/ */
void *lunatik_lookup(const char *symbol);
#define lsys_loadlib(l)		__symbol_get((l))
#define lsys_unloadlib(l)	symbol_put_addr((l))
#else
#include <linux/kallsyms.h>
#define lunatik_lookup(s)	((void *)kallsyms_lookup_name((l)))
#define lsys_loadlib(l)		lunatik_lookup(l)
#define lsys_unloadlib(l)
#endif

#define lsys_sym(L,l,s)		((lua_CFunction)(l))

typedef struct lua_State lua_State;

const char *lua_pushfstring(lua_State *L, const char *fmt, ...);

static inline void *lsys_load(lua_State *L, const char *symbol, int seeglb)
{
	void *lib;
	(void)(seeglb); /* not used */
	if ((lib = lsys_loadlib(symbol)) == NULL)
		lua_pushfstring(L, "%s not found in kernel symbol table", symbol);
	return lib;
}

int lunatik_loadfile(lua_State *L, const char *filename, const char *mode);
#define luaL_loadfilex(L,f,m)	lunatik_loadfile((L),(f),(m))

#undef LUA_ROOT
#define LUA_ROOT	"/lib/modules/lua/"

#undef LUA_PATH_DEFAULT
#define LUA_PATH_DEFAULT  LUA_ROOT"?.lua;" LUA_ROOT"?/init.lua"

#if defined(lcode_c) || defined(ldebug_c) || defined(llex_c) || defined(lparser_c) || defined(lstate_c)
#ifdef current /* defined by asm/current.h */
#undef current /* conflicts with Lua namespace */
#endif
#endif

#endif