3 * - Acess kernel emulation on another OS using SDL and UDP
12 # define DONT_INCLUDE_SYSCALL_NAMES
14 #include "../syscalls.h"
17 extern int Threads_Fork(void); // AcessNative only function
20 typedef int (*tSyscallHandler)(Uint *Errno, const char *Format, void *Args, int *Sizes);
23 #define SYSCALL6(_name, _fmtstr, _t0, _t1, _t2, _t3, _t4, _t5, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
24 _t0 a0;_t1 a1;_t2 a2;_t3 a3;_t4 a4;_t5 a5;\
25 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
26 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
27 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
28 a2 = *(_t2*)Args;Args+=sizeof(_t2);\
29 a3 = *(_t3*)Args;Args+=sizeof(_t3);\
30 a4 = *(_t4*)Args;Args+=sizeof(_t4);\
31 a5 = *(_t5*)Args;Args+=sizeof(_t5);\
32 LOG("SYSCALL5 '%s' %p %p %p %p %p %p", Fmt, (intptr_t)a0,(intptr_t)a1,(intptr_t)a2,(intptr_t)a3,(intptr_t)a4,(intptr_t)a5);\
35 #define SYSCALL5(_name, _fmtstr, _t0, _t1, _t2, _t3, _t4, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
36 _t0 a0;_t1 a1;_t2 a2;_t3 a3;_t4 a4;\
37 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
38 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
39 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
40 a2 = *(_t2*)Args;Args+=sizeof(_t2);\
41 a3 = *(_t3*)Args;Args+=sizeof(_t3);\
42 a4 = *(_t4*)Args;Args+=sizeof(_t4);\
43 LOG("SYSCALL5 '%s' %p %p %p %p %p", Fmt, (intptr_t)a0,(intptr_t)a1,(intptr_t)a2,(intptr_t)a3,(intptr_t)a4);\
46 #define SYSCALL4(_name, _fmtstr, _t0, _t1, _t2, _t3, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
47 _t0 a0;_t1 a1;_t2 a2;_t3 a3;\
48 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
49 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
50 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
51 a2 = *(_t2*)Args;Args+=sizeof(_t2);\
52 a3 = *(_t3*)Args;Args+=sizeof(_t3);\
53 LOG("SYSCALL4 '%s' %p %p %p %p", Fmt, (intptr_t)a0,(intptr_t)a1,(intptr_t)a2,(intptr_t)a3);\
57 #define SYSCALL3(_name, _fmtstr, _t0, _t1, _t2, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
58 _t0 a0;_t1 a1;_t2 a2;\
59 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
60 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
61 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
62 a2 = *(_t2*)Args;Args+=sizeof(_t2);\
63 LOG("SYSCALL3 '%s' %p %p %p", Fmt, (intptr_t)a0,(intptr_t)a1,(intptr_t)a2);\
67 #define SYSCALL2(_name, _fmtstr, _t0, _t1, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
69 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
70 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
71 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
72 LOG("SYSCALL2 '%s' %p %p", Fmt, (intptr_t)a0,(intptr_t)a1);\
76 #define SYSCALL1(_name, _fmtstr, _t0, _call) int _name(Uint*Errno,const char*Fmt, void*Args,int*Sizes){\
78 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
79 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
80 LOG("SYSCALL1 '%s' %p", Fmt,(intptr_t)a0);\
84 #define SYSCALL0(_name, _call) int _name(Uint*Errno,const char*Fmt, void*Args,int*Sizes){\
85 if(strcmp(Fmt,"")!=0)return 0;\
91 int Syscall_Null(Uint*Errno, const char *Format, void *Args, int *Sizes)
96 SYSCALL1(Syscall_Exit, "i", int,
101 SYSCALL2(Syscall_Open, "si", const char *, int,
102 return VFS_Open(a0, a1|VFS_OPENFLAG_USER);
104 SYSCALL1(Syscall_Close, "i", int,
108 SYSCALL3(Syscall_Read, "iid", int, int, void *,
109 if( Sizes[2] < a1 ) {
110 Log_Warning("Syscalls", "Read - %i < %i", Sizes[2], a1);
113 return VFS_Read(a0, a1, a2);
115 SYSCALL3(Syscall_Write, "iid", int, int, const void *,
118 return VFS_Write(a0, a1, a2);
120 SYSCALL3(Syscall_Seek, "iIi", int, int64_t, int,
121 return VFS_Seek(a0, a1, a2);
123 SYSCALL1(Syscall_Tell, "i", int,
126 SYSCALL3(Syscall_IOCtl, "iid", int, int, void *,
127 return VFS_IOCtl(a0, a1, a2);
129 SYSCALL3(Syscall_FInfo, "idi", int, void *, int,
130 if( Sizes[1] < sizeof(tFInfo)+a2*sizeof(tVFS_ACL)) {
131 LOG("offsetof(size) = %i", offsetof(tFInfo, size));
132 LOG("Bad size %i < %i", Sizes[1], sizeof(tFInfo)+a2*sizeof(tVFS_ACL));
136 return VFS_FInfo(a0, a1, a2);
138 SYSCALL2(Syscall_ReadDir, "id", int, char *,
141 return VFS_ReadDir(a0, a1);
143 SYSCALL6(Syscall_select, "iddddi", int, fd_set *, fd_set *, fd_set *, tTime *, unsigned int,
144 return VFS_Select(a0, a1, a2, a3, a4, a5, 0);
146 SYSCALL3(Syscall_OpenChild, "isi", int, const char *, int,
147 return VFS_OpenChild(a0, a1, a2|VFS_OPENFLAG_USER);
149 SYSCALL2(Syscall_GetACL, "id", int, void *,
150 if(Sizes[1] < sizeof(tVFS_ACL))
152 return VFS_GetACL(a0, (void*)a1);
154 SYSCALL4(Syscall_Mount, "ssss", const char *, const char *, const char *, const char *,
155 return VFS_Mount(a0, a1, a2, a3);
157 SYSCALL1(Syscall_Chdir, "s", const char *,
158 return VFS_ChDir(a0);
160 SYSCALL0(Syscall_Sleep,
164 SYSCALL2(Syscall_WaitTID, "id", int, int *,
165 if(Sizes[1] < sizeof(int))
167 return Threads_WaitTID(a0, a1);
169 SYSCALL1(Syscall_SetUID, "i", int,
170 if(Sizes[0] < sizeof(int)) {
171 *Errno = -EINVAL; // TODO: Better message
174 return Threads_SetUID(a0);
176 SYSCALL1(Syscall_SetGID, "i", int,
177 if(Sizes[0] < sizeof(int)) {
178 *Errno = -EINVAL; // TODO: Better message
181 return Threads_SetGID(a0);
184 SYSCALL0(Syscall_GetTID, return Threads_GetTID());
185 SYSCALL0(Syscall_GetPID, return Threads_GetPID());
186 SYSCALL0(Syscall_GetUID, return Threads_GetUID());
187 SYSCALL0(Syscall_GetGID, return Threads_GetGID());
189 SYSCALL1(Syscall_AN_Fork, "d", int *,
190 if(Sizes[0] < sizeof(int))
192 *a0 = Threads_Fork();
196 SYSCALL2(Syscall_SendMessage, "id", int, void *,
197 return Proc_SendMessage(a0, Sizes[1], a1);
200 SYSCALL2(Syscall_GetMessage, "dd", uint32_t *, void *,
201 if( a0 && Sizes[0] < sizeof(*a0) ) {
202 Log_Notice("Syscalls", "Syscall_GetMessage - Arg 1 Undersize (%i < %i)",
203 Sizes[0], sizeof(*a0));
209 rv = Proc_GetMessage(&tmp, Sizes[1], a1);
213 rv = Proc_GetMessage(NULL, Sizes[1], a1);
217 SYSCALL1(Syscall_WaitEvent, "i", int,
218 return Threads_WaitEvents(a0);
221 const tSyscallHandler caSyscalls[] = {
256 const int ciNumSyscalls = sizeof(caSyscalls)/sizeof(caSyscalls[0]);
258 * \brief Recieve a syscall structure from the server code
260 tRequestHeader *SyscallRecieve(tRequestHeader *Request, int *ReturnLength)
262 char formatString[Request->NParams+1];
263 char *inData = (char*)&Request->Params[Request->NParams];
267 int retValueCount = 1;
268 int retDataLen = sizeof(Uint64);
269 void *returnData[Request->NParams];
270 int argSizes[Request->NParams];
274 if( Request->CallID >= ciNumSyscalls ) {
275 Log_Notice("Syscalls", "Unknown syscall number %i", Request->CallID);
279 if( !caSyscalls[Request->CallID] ) {
280 Log_Notice("Syscalls", "Unimplemented syscall %i", Request->CallID);
284 // Get size of argument list
285 for( i = 0; i < Request->NParams; i ++ )
287 argSizes[i] = Request->Params[i].Length;
288 switch(Request->Params[i].Type)
291 formatString[i] = '-';
294 formatString[i] = 'i';
295 argListLen += sizeof(Uint32);
298 formatString[i] = 'I';
299 argListLen += sizeof(Uint64);
302 formatString[i] = 'd';
303 argListLen += sizeof(void*);
305 case ARG_TYPE_STRING:
306 formatString[i] = 's';
307 argListLen += sizeof(char*);
310 return NULL; // ERROR!
313 formatString[i] = '\0';
315 LOG("Request %i(%s) '%s'", Request->CallID, casSYSCALL_NAMES[Request->CallID], formatString);
318 char argListData[argListLen];
320 // Build argument list
321 for( i = 0; i < Request->NParams; i ++ )
323 returnData[i] = NULL;
324 switch(Request->Params[i].Type)
329 //LOG("%i INT32: 0x%x", i, *(Uint32*)inData);
330 *(Uint32*)&argListData[argListLen] = *(Uint32*)inData;
331 argListLen += sizeof(Uint32);
332 inData += sizeof(Uint32);
335 //LOG("%i INT64: 0x%llx", i, *(Uint64*)inData);
336 *(Uint64*)&argListData[argListLen] = *(Uint64*)inData;
337 argListLen += sizeof(Uint64);
338 inData += sizeof(Uint64);
340 case ARG_TYPE_STRING:
341 //LOG("%i STR: '%s'", i, (char*)inData);
342 *(char**)&argListData[argListLen] = (char*)inData;
343 argListLen += sizeof(void*);
344 inData += Request->Params[i].Length;
347 // Data gets special handling, because only it can be returned to the user
348 // (ARG_TYPE_DATA is a pointer)
350 // Prepare the return values
351 if( Request->Params[i].Flags & ARG_FLAG_RETURN )
353 retDataLen += Request->Params[i].Length;
357 // Check for non-resident data
358 if( Request->Params[i].Length == 0 )
360 returnData[i] = NULL;
361 *(void**)&argListData[argListLen] = NULL;
362 argListLen += sizeof(void*);
364 else if( Request->Params[i].Flags & ARG_FLAG_ZEROED )
366 // Allocate and zero the buffer
367 returnData[i] = calloc(1, Request->Params[i].Length);
368 //LOG("%i ZDAT: %i %p", i,
369 // Request->Params[i].Length, returnData[i]);
370 *(void**)&argListData[argListLen] = returnData[i];
371 argListLen += sizeof(void*);
375 returnData[i] = (void*)inData;
376 //LOG("%i DATA: %i %p", i,
377 // Request->Params[i].Length, returnData[i]);
378 *(void**)&argListData[argListLen] = (void*)inData;
379 argListLen += sizeof(void*);
380 inData += Request->Params[i].Length;
386 retVal = caSyscalls[Request->CallID](&ret_errno, formatString, argListData, argSizes);
389 // Allocate the return
390 size_t msglen = sizeof(tRequestHeader) + retValueCount * sizeof(tRequestValue) + retDataLen;
391 ret = malloc(msglen);
392 ret->ClientID = Request->ClientID;
393 ret->CallID = Request->CallID;
394 ret->NParams = retValueCount;
395 ret->MessageLength = msglen;
396 inData = (char*)&ret->Params[ ret->NParams ];
398 // Static Uint64 return value
399 ret->Params[0].Type = ARG_TYPE_INT64;
400 ret->Params[0].Flags = 0;
401 ret->Params[0].Length = sizeof(Uint64);
402 *(Uint64*)inData = retVal;
403 inData += sizeof(Uint64);
405 //Log_Debug("Syscalls", "Return 0x%llx", retVal);
408 for( i = 0; i < Request->NParams; i ++ )
410 if( Request->Params[i].Type != ARG_TYPE_DATA ) continue;
411 if( !(Request->Params[i].Flags & ARG_FLAG_RETURN) ) continue;
413 ret->Params[retValueCount].Type = Request->Params[i].Type;
414 ret->Params[retValueCount].Flags = 0;
415 ret->Params[retValueCount].Length = Request->Params[i].Length;
417 LOG("Ret %i: Type %i, Len %i",
418 i, Request->Params[i].Type, Request->Params[i].Length);
420 memcpy(inData, returnData[i], Request->Params[i].Length);
421 inData += Request->Params[i].Length;
423 if( Request->Params[i].Flags & ARG_FLAG_ZEROED )
424 free( returnData[i] ); // Free temp buffer from above
428 *ReturnLength = sizeof(tRequestHeader)
429 + retValueCount * sizeof(tRequestValue)