lua/common.h - main - antim/LuaPlayer-by-YuliaTeam

lua/common.h
144 строки7 KB
antim0118
Заменил заголовки файлов
25 фев 2026, 22:25
25 фев 2026, 22:25842b6c8
/*-----------------------------------------------------------------------------------------------------------------------#
#------------- This file is part of: ------------------------------------------------------------------------------------#
#---█████----------------------------███████████--████------------------------------------------█████-█████-███████████--#
#--░░███----------------------------░░███░░░░░███░░███-----------------------------------------░░███-░░███-░█░░░███░░░█--#
#---░███--------█████-████--██████---░███----░███-░███---██████---█████-████--██████--████████--░░███-███--░---░███--░---#
#---░███-------░░███-░███--░░░░░███--░██████████--░███--░░░░░███-░░███-░███--███░░███░░███░░███--░░█████-------░███------#
#---░███--------░███-░███---███████--░███░░░░░░---░███---███████--░███-░███-░███████--░███-░░░----░░███--------░███------#
#---░███------█-░███-░███--███░░███--░███---------░███--███░░███--░███-░███-░███░░░---░███---------░███--------░███------#
#---███████████-░░████████░░████████-█████--------█████░░████████-░░███████-░░██████--█████--------█████-------█████-----#
#--░░░░░░░░░░░---░░░░░░░░--░░░░░░░░-░░░░░--------░░░░░--░░░░░░░░---░░░░░███--░░░░░░--░░░░░--------░░░░░-------░░░░░------#
#------------------------------------------------------------------███-░███----------------------------------------------#
#-----------------------------------------------------------------░░██████-----------------------------------------------#
#------------------------------------------------------------------░░░░░░------------------------------------------------#
#------------------------------------------------------------------------------------ Made by Kodilo --------------------#
#- Special Thanks to: ---------------------------------------------------------------------------------------------------#
#------------------------------------------------------------------------------------------------------------------------#
#- BenHur for intraFont -------------------------------------------------------------------------------------------------#
#- Geecko for gLib2D ----------------------------------------------------------------------------------------------------#
#- Arshia001 for PSPAALIB -----------------------------------------------------------------------------------------------#
#- jonny & Raphael for PMP Mod ------------------------------------------------------------------------------------------#
#- InsertWittyName & MK2k for PGE source code ---------------------------------------------------------------------------#
#- Rinnegatamante & Nanni for example of awesome Lua Player -------------------------------------------------------------#
#-----------------------------------------------------------------------------------------------------------------------*/

#include <pspkernel.h>
#include <pspdebug.h>
#include <psprtc.h>
#include <pspdisplay.h>
#include <pspctrl.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <math.h>
#include <stdbool.h>
#include <ctype.h>
#include <unistd.h>
#include <locale.h>
#include <wchar.h>
#include <kubridge.h>
#include <pspintrman.h>
#include <pspthreadman.h>
#include <psploadexec_kernel.h>
#include <pspopenpsid.h>

#include "src/lua.h"
#include "src/lualib.h"
#include "src/lauxlib.h"
//#include <lua.h>
//#include <lualib.h>
//#include <lauxlib.h>

#include <psppower.h>
#include <psptypes.h>
#include <malloc.h>
#include <psputils.h>
#include <png.h>
#include <pspgu.h>
#include <zlib.h>
#include <pspusb.h>
#include <pspusbstor.h>
#include <pspsdk.h>

#include "../libs/g2d/glib2d.h"
#include "../libs/intra/intraFont.h"
#include <pge/pgeMp3.h>
#include "../libs/aalib/pspaalib.h"
#include "../libs/pmp/pmp.h"

/* Define */
#define CRC32_POLYNOMIAL 0xEDB88320
#define maxLen 512
#define maxLine 20
#define INVERSE_480 (1.0f / 480.0f)
#define INVERSE_272 (1.0f / 272.0f)

#define setInterval(value, minVal, maxVal) \
    ((value < minVal) ? minVal : (value > maxVal) ? maxVal : value)

#define Const(name, val) \
    lua_pushstring(L, name); \
    lua_pushnumber(L, val); \
    lua_settable(L, -3) ;

#define UserdataStubs(HANDLE, DATATYPE) \
        DATATYPE *to##HANDLE (lua_State *L, int index) \
{ \
        DATATYPE* handle  = (DATATYPE*)lua_touserdata(L, index); \
        if (handle == NULL) luaL_typerror(L, index, #HANDLE); \
        return handle; \
} \
        DATATYPE* push##HANDLE(lua_State *L) \
{ \
        DATATYPE * newvalue = (DATATYPE*)lua_newuserdata(L, sizeof(DATATYPE)); \
        luaL_getmetatable(L, #HANDLE); \
        lua_setmetatable(L, -2); \
        return newvalue; \
}

#define SetGlobalInt(var) \
    lua_pushinteger(L, var); \
    lua_setglobal(L, #var); \

#define UserdataConvert(luaData, cData, luaType) \
    cData *get##luaData(lua_State* L, int index) { \
        cData* temp = (cData*)lua_touserdata(L, index); \
            if (temp == NULL) luaL_typerror(L, index, luaType); \
        return temp; \
    }\
    cData *push##luaData(lua_State* L) { \
        cData *pushVal = (cData*)lua_newuserdata(L, sizeof(cData)); \
        luaL_getmetatable(L, #luaData); \
        lua_pushvalue(L, -1); \
        lua_setmetatable(L, -3);\
        lua_pushstring(L, "__index"); \
        lua_pushstring(L, #luaData); \
        lua_gettable(L, LUA_GLOBALSINDEX); \
        lua_settable(L, -3); \
        lua_pop(L, 1); \
        return pushVal; \
    }\
    cData *is##luaData(lua_State* L, int index) { \
        cData *data; \
        if (lua_type(L, index) != LUA_TUSERDATA) return false; \
        data = (cData*)luaL_checkudata(L, index, #luaData);\
        if (data == NULL) return false;\
        return false; \
    }

#define UserdataRegister(NAME, METHODS, METAMETHODS) \
    luaL_newmetatable(L, NAME);  /* create new metatable for file handles */ \
    lua_pushliteral(L, "__index"); \
    lua_pushvalue(L, -2);  /* push metatable */ \
    lua_rawset(L, -3);  /* metatable.__index = metatable */ \
    \
    luaL_register(L, 0, METAMETHODS); \
    luaL_register(L, NAME, METHODS); \
    \
    lua_pushstring(L, NAME); \
    lua_gettable(L, LUA_GLOBALSINDEX); \
    luaL_getmetatable(L, NAME); \
    lua_setmetatable(L, -2); \


//EOF