10015
|
1 |
#ifndef _FPCRTL_H_
|
|
2 |
#define _FPCRTL_H_
|
|
3 |
|
|
4 |
#include <stdio.h>
|
|
5 |
#include <stdlib.h>
|
|
6 |
#include <string.h>
|
|
7 |
#include <unistd.h>
|
|
8 |
#include <math.h>
|
|
9 |
|
|
10 |
#include "SysUtils.h"
|
|
11 |
#include "system.h"
|
|
12 |
#include "misc.h"
|
|
13 |
#include "fileio.h"
|
|
14 |
#include "pmath.h"
|
|
15 |
|
|
16 |
#ifndef EMSCRIPTEN
|
|
17 |
#if __APPLE__
|
|
18 |
#define main SDL_main
|
|
19 |
#endif
|
|
20 |
#include "GL/glew.h"
|
|
21 |
#endif
|
|
22 |
|
|
23 |
#define fpcrtl_memcpy memcpy
|
|
24 |
|
|
25 |
#define luapas_lua_gettop lua_gettop
|
|
26 |
#define luapas_lua_close lua_close
|
|
27 |
#define luapas_lua_createtable lua_createtable
|
|
28 |
#define luapas_lua_error lua_error
|
|
29 |
#define luapas_lua_gc lua_gc
|
|
30 |
#define luapas_lua_getfield lua_getfield
|
|
31 |
#define luapas_lua_objlen lua_objlen
|
|
32 |
#define luapas_lua_call lua_call
|
|
33 |
#define luapas_lua_pcall lua_pcall
|
|
34 |
#define luapas_lua_pushboolean lua_pushboolean
|
|
35 |
#define luapas_lua_pushcclosure lua_pushcclosure
|
|
36 |
#define luapas_lua_pushinteger lua_pushinteger
|
|
37 |
#define luapas_lua_pushnil lua_pushnil
|
|
38 |
#define luapas_lua_pushnumber lua_pushnumber
|
|
39 |
#define luapas_lua_pushlstring lua_pushlstring
|
|
40 |
#define luapas_lua_pushstring lua_pushstring
|
|
41 |
#define luapas_lua_pushvalue lua_pushvalue
|
|
42 |
#define luapas_lua_rawgeti lua_rawgeti
|
|
43 |
#define luapas_lua_setfield lua_setfield
|
|
44 |
#define luapas_lua_settop lua_settop
|
|
45 |
#define luapas_lua_toboolean lua_toboolean
|
|
46 |
#define luapas_lua_tointeger lua_tointeger
|
|
47 |
#define luapas_lua_tolstring lua_tolstring
|
|
48 |
#define luapas_lua_tonumber lua_tonumber
|
|
49 |
#define luapas_lua_type lua_type
|
|
50 |
#define luapas_lua_typename lua_typename
|
|
51 |
#define luapas_luaL_argerror luaL_argerror
|
|
52 |
#define luapas_luaL_checkinteger luaL_checkinteger
|
|
53 |
#define luapas_luaL_checklstring luaL_checklstring
|
|
54 |
#define luapas_luaL_loadfile luaL_loadfile
|
|
55 |
#define luapas_luaL_loadstring luaL_loadstring
|
|
56 |
#define luapas_luaL_newstate luaL_newstate
|
|
57 |
#define luapas_luaL_optinteger luaL_optinteger
|
|
58 |
#define luapas_luaL_optlstring luaL_optlstring
|
|
59 |
#define luapas_luaL_prepbuffer luaL_prepbuffer
|
|
60 |
#define luapas_luaL_ref luaL_ref
|
|
61 |
#define luapas_luaL_unref luaL_unref
|
|
62 |
#define luapas_luaopen_base luaopen_base
|
|
63 |
#define luapas_luaopen_math luaopen_math
|
|
64 |
#define luapas_luaopen_string luaopen_string
|
|
65 |
#define luapas_luaopen_table luaopen_table
|
|
66 |
#define luapas_lua_load lua_load
|
|
67 |
|
|
68 |
#define sdlh_IMG_Load IMG_Load
|
|
69 |
#define sdlh_IMG_Load_RW IMG_Load_RW
|
|
70 |
|
|
71 |
#ifndef EMSCRIPTEN
|
|
72 |
#define sdlh_Mix_AllocateChannels Mix_AllocateChannels
|
|
73 |
#define sdlh_Mix_CloseAudio Mix_CloseAudio
|
|
74 |
#define sdlh_Mix_FadeInChannelTimed Mix_FadeInChannelTimed
|
|
75 |
#define sdlh_Mix_FadeInMusic Mix_FadeInMusic
|
|
76 |
#define sdlh_Mix_FadeOutChannel Mix_FadeOutChannel
|
|
77 |
#define sdlh_Mix_FreeChunk Mix_FreeChunk
|
|
78 |
#define sdlh_Mix_FreeMusic Mix_FreeMusic
|
|
79 |
#define sdlh_Mix_HaltChannel Mix_HaltChannel
|
|
80 |
#define sdlh_Mix_HaltMusic Mix_HaltMusic
|
|
81 |
#define sdlh_Mix_LoadMUS Mix_LoadMUS
|
|
82 |
#define sdlh_Mix_LoadMUS_RW Mix_LoadMUS_RW
|
|
83 |
#define sdlh_Mix_LoadWAV_RW Mix_LoadWAV_RW
|
|
84 |
#define sdlh_Mix_OpenAudio Mix_OpenAudio
|
|
85 |
#define sdlh_Mix_PauseMusic Mix_PauseMusic
|
|
86 |
#define sdlh_Mix_PlayChannelTimed Mix_PlayChannelTimed
|
|
87 |
#define sdlh_Mix_Playing Mix_Playing
|
|
88 |
#define sdlh_Mix_ResumeMusic Mix_ResumeMusic
|
|
89 |
#define sdlh_Mix_Volume Mix_Volume
|
|
90 |
#define sdlh_Mix_VolumeMusic Mix_VolumeMusic
|
|
91 |
#else
|
|
92 |
#define sdlh_Mix_AllocateChannels stub_Mix_AllocateChannels
|
|
93 |
#define sdlh_Mix_CloseAudio stub_Mix_CloseAudio
|
|
94 |
#define sdlh_Mix_FadeInChannelTimed stub_Mix_FadeInChannelTimed
|
|
95 |
#define sdlh_Mix_FadeInMusic stub_Mix_FadeInMusic
|
|
96 |
#define sdlh_Mix_FadeOutChannel stub_Mix_FadeOutChannel
|
|
97 |
#define sdlh_Mix_FreeChunk stub_Mix_FreeChunk
|
|
98 |
#define sdlh_Mix_FreeMusic stub_Mix_FreeMusic
|
|
99 |
#define sdlh_Mix_HaltChannel stub_Mix_HaltChannel
|
|
100 |
#define sdlh_Mix_HaltMusic stub_Mix_HaltMusic
|
|
101 |
#define sdlh_Mix_LoadMUS stub_Mix_LoadMUS
|
|
102 |
#define sdlh_Mix_LoadMUS_RW stub_Mix_LoadMUS_RW
|
|
103 |
#define sdlh_Mix_LoadWAV_RW stub_Mix_LoadWAV_RW
|
|
104 |
#define sdlh_Mix_OpenAudio stub_Mix_OpenAudio
|
|
105 |
#define sdlh_Mix_PauseMusic stub_Mix_PauseMusic
|
|
106 |
#define sdlh_Mix_PlayChannelTimed stub_Mix_PlayChannelTimed
|
|
107 |
#define sdlh_Mix_Playing stub_Mix_Playing
|
|
108 |
#define sdlh_Mix_ResumeMusic stub_Mix_ResumeMusic
|
|
109 |
#define sdlh_Mix_Volume stub_Mix_Volume
|
|
110 |
#define sdlh_Mix_VolumeMusic stub_Mix_VolumeMusic
|
|
111 |
#endif
|
|
112 |
|
|
113 |
#define sdlh_SDL_ConvertSurface SDL_ConvertSurface
|
|
114 |
#define sdlh_SDL_CreateRGBSurface SDL_CreateRGBSurface
|
|
115 |
#define sdlh_SDL_CreateThread SDL_CreateThread
|
|
116 |
#define sdlh_SDL_Delay SDL_Delay
|
|
117 |
#define sdlh_SDL_EnableKeyRepeat SDL_EnableKeyRepeat
|
|
118 |
#define sdlh_SDL_EnableUNICODE SDL_EnableUNICODE
|
|
119 |
#define sdlh_SDL_FillRect SDL_FillRect
|
|
120 |
#define sdlh_SDL_FreeSurface SDL_FreeSurface
|
|
121 |
#define sdlh_SDL_GetError SDL_GetError
|
|
122 |
#define sdlh_SDL_GetKeyName SDL_GetKeyName
|
|
123 |
#define sdlh_SDL_GetKeyState SDL_GetKeyState
|
|
124 |
#define sdlh_SDL_GetMouseState SDL_GetMouseState
|
|
125 |
#define sdlh_SDL_GetRGBA SDL_GetRGBA
|
|
126 |
#define sdlh_SDL_GetTicks SDL_GetTicks
|
|
127 |
#define sdlh_SDL_GL_SetAttribute SDL_GL_SetAttribute
|
|
128 |
#define sdlh_SDL_GL_SwapBuffers SDL_GL_SwapBuffers
|
|
129 |
#define sdlh_SDL_Init SDL_Init
|
|
130 |
#define sdlh_SDL_InitSubSystem SDL_InitSubSystem
|
|
131 |
#define sdlh_SDL_JoystickClose SDL_JoystickClose
|
|
132 |
#define sdlh_SDL_JoystickEventState SDL_JoystickEventState
|
|
133 |
#define sdlh_SDL_JoystickName SDL_JoystickName
|
|
134 |
#define sdlh_SDL_JoystickNumAxes SDL_JoystickNumAxes
|
|
135 |
#define sdlh_SDL_JoystickNumButtons SDL_JoystickNumButtons
|
|
136 |
#define sdlh_SDL_JoystickNumHats SDL_JoystickNumHats
|
|
137 |
#define sdlh_SDL_JoystickOpen SDL_JoystickOpen
|
|
138 |
#define sdlh_SDL_LockSurface SDL_LockSurface
|
|
139 |
#define sdlh_SDL_MapRGB SDL_MapRGB
|
|
140 |
#define sdlh_SDL_MapRGBA SDL_MapRGBA
|
|
141 |
#define sdlh_SDL_NumJoysticks SDL_NumJoysticks
|
|
142 |
#define sdlh_SDL_PeepEvents SDL_PeepEvents
|
|
143 |
#define sdlh_SDL_PumpEvents SDL_PumpEvents
|
|
144 |
#define sdlh_SDL_Quit SDL_Quit
|
|
145 |
#define sdlh_SDL_RWFromFile SDL_RWFromFile
|
|
146 |
#define sdlh_SDL_SetColorKey SDL_SetColorKey
|
|
147 |
#define sdlh_SDL_SetVideoMode SDL_SetVideoMode
|
|
148 |
#define sdlh_SDL_WaitThread SDL_WaitThread
|
|
149 |
#define sdlh_SDL_CreateMutex SDL_CreateMutex
|
|
150 |
#define sdlh_SDL_DestroyMutex SDL_DestroyMutex
|
|
151 |
#define sdlh_SDL_LockMutex SDL_mutexP
|
|
152 |
#define sdlh_SDL_UnlockMutex SDL_mutexV
|
|
153 |
#ifndef EMSCRIPTEN
|
|
154 |
#define sdlh_SDL_ShowCursor SDL_ShowCursor
|
|
155 |
#else
|
|
156 |
#define sdlh_SDL_ShowCursor SDL_ShowCursor_patch
|
|
157 |
#endif
|
|
158 |
#define sdlh_SDL_UnlockSurface SDL_UnlockSurface
|
|
159 |
#define sdlh_SDL_UpperBlit SDL_UpperBlit
|
|
160 |
#define sdlh_SDL_VideoDriverName SDL_VideoDriverName
|
|
161 |
#define sdlh_SDL_WarpMouse SDL_WarpMouse
|
|
162 |
#define sdlh_SDL_WM_SetCaption SDL_WM_SetCaption
|
|
163 |
#define sdlh_SDL_WM_SetIcon SDL_WM_SetIcon
|
|
164 |
#define sdlh_SDLNet_AddSocket SDLNet_AddSocket
|
|
165 |
#define sdlh_SDLNet_AllocSocketSet SDLNet_AllocSocketSet
|
|
166 |
#define sdlh_SDLNet_CheckSockets SDLNet_CheckSockets
|
|
167 |
#define sdlh_SDLNet_FreeSocketSet SDLNet_FreeSocketSet
|
|
168 |
#define sdlh_SDLNet_Init SDLNet_Init
|
|
169 |
#define sdlh_SDLNet_Quit SDLNet_Quit
|
|
170 |
#define sdlh_SDLNet_ResolveHost SDLNet_ResolveHost
|
|
171 |
#define sdlh_SDLNet_TCP_Close SDLNet_TCP_Close
|
|
172 |
#define sdlh_SDLNet_TCP_Open SDLNet_TCP_Open
|
|
173 |
#define sdlh_SDLNet_TCP_Recv SDLNet_TCP_Recv
|
|
174 |
#define sdlh_SDLNet_TCP_Send SDLNet_TCP_Send
|
|
175 |
#define sdlh_TTF_Init TTF_Init
|
|
176 |
#define sdlh_TTF_OpenFont TTF_OpenFont
|
|
177 |
#define sdlh_TTF_OpenFontRW TTF_OpenFontRW
|
|
178 |
#define sdlh_TTF_Quit TTF_Quit
|
|
179 |
#define sdlh_TTF_RenderUTF8_Blended TTF_RenderUTF8_Blended
|
|
180 |
#define sdlh_TTF_RenderUTF8_Solid TTF_RenderUTF8_Solid
|
|
181 |
#define sdlh_TTF_SetFontStyle TTF_SetFontStyle
|
|
182 |
#define sdlh_TTF_SizeUTF8 TTF_SizeUTF8
|
|
183 |
|
|
184 |
#define _strconcat fpcrtl_strconcat
|
|
185 |
#define _strappend fpcrtl_strappend
|
|
186 |
#define _strprepend fpcrtl_strprepend
|
|
187 |
#define _strcompare fpcrtl_strcompare
|
|
188 |
#define _strncompare fpcrtl_strncompare
|
|
189 |
#define _strcomparec fpcrtl_strcomparec
|
|
190 |
#define _chrconcat fpcrtl_chrconcat
|
|
191 |
#define _pchar fpcrtl_pchar
|
|
192 |
|
|
193 |
// hooks are implemented in javascript
|
|
194 |
void start_hook(void);
|
|
195 |
void mainloop_hook(void);
|
|
196 |
void clear_filelist_hook(void);
|
|
197 |
void add_file_hook(const char* ptr);
|
|
198 |
void idb_loader_hook();
|
|
199 |
void showcursor_hook();
|
|
200 |
void hidecursor_hook();
|
|
201 |
void drawworld_init_hook();
|
|
202 |
#endif
|