#ifndef MISC_LUA_UTIL_H

#define MISC_LUA_UTIL_H

#include <lua.h>

#ifndef enum_value_t

#define enum_value_t int

#endif

// Array of string2eunm_t's must be ended with pair { NULL, fallback_value }

typedef struct {

	const char   *string;

	enum_value_t  value;

} string2enum_t;

// If not found, fallback_value is returned

enum_value_t  string2enum (const char *string, const string2enum_t *set);

// If not found, NULL is returned

const char   *enum2string (enum_value_t value, const string2enum_t *set);

// returns result of string2enum on specified stack index, can handle plain numbers (no s2e called in this case)

enum_value_t luaL_checkenum (lua_State *L, int index, const string2enum_t *set);

// pushes onto a stack result of enum2string on a given value, if not recognized, pushes value as number

void         luaL_pushenum (lua_State *L, enum_value_t value, const string2enum_t *set);

// as luaL_checknum, but additionally handles tables as a multiple flags set.

// table can contain both array and hash key-value pairs

// hash entries are ORed with string2enum(key) if value resolves to lua true value

// array entries are always ORed with string2enum(value)

// eg { flag1, flag2, 16, flag3 = true, flag4 = { }, flag5 = nil } will set all flags except flag5 (and 16 too will be ORed)

enum_value_t luaL_checkenum_multi (lua_State *L, int index, const string2enum_t *set);

// pushes to stack table with all matched values from a set in a hash format

// eg { flag1 = true, flag2 = true, flag6 = true, 16 } - that's it, if some bits will not match, they will be passed as a first array element.

void         luaL_pushenum_multi (lua_State *L, enum_value_t value, const string2enum_t *set);

void *luaL_malloc (lua_State *L, size_t size);

void *luaL_realloc (lua_State *L, void *ptr, size_t osize, size_t nsize);

void  luaL_free (lua_State *L, void *ptr);

#endif