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
18 extern int Threads_Spawn(int nFD, int FDs[], const void *info);
21 typedef int (*tSyscallHandler)(Uint *Errno, const char *Format, void *Args, int *Sizes);
24 #define SYSCALL6(_name, _fmtstr, _t0, _t1, _t2, _t3, _t4, _t5, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
25 _t0 a0;_t1 a1;_t2 a2;_t3 a3;_t4 a4;_t5 a5;\
26 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
27 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
28 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
29 a2 = *(_t2*)Args;Args+=sizeof(_t2);\
30 a3 = *(_t3*)Args;Args+=sizeof(_t3);\
31 a4 = *(_t4*)Args;Args+=sizeof(_t4);\
32 a5 = *(_t5*)Args;Args+=sizeof(_t5);\
33 LOG("SYSCALL6 '%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);\
36 #define SYSCALL5(_name, _fmtstr, _t0, _t1, _t2, _t3, _t4, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
37 _t0 a0;_t1 a1;_t2 a2;_t3 a3;_t4 a4;\
38 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
39 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
40 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
41 a2 = *(_t2*)Args;Args+=sizeof(_t2);\
42 a3 = *(_t3*)Args;Args+=sizeof(_t3);\
43 a4 = *(_t4*)Args;Args+=sizeof(_t4);\
44 LOG("SYSCALL5 '%s' %p %p %p %p %p", Fmt, (intptr_t)a0,(intptr_t)a1,(intptr_t)a2,(intptr_t)a3,(intptr_t)a4);\
47 #define SYSCALL4(_name, _fmtstr, _t0, _t1, _t2, _t3, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
48 _t0 a0;_t1 a1;_t2 a2;_t3 a3;\
49 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
50 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
51 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
52 a2 = *(_t2*)Args;Args+=sizeof(_t2);\
53 a3 = *(_t3*)Args;Args+=sizeof(_t3);\
54 LOG("SYSCALL4 '%s' %p %p %p %p", Fmt, (intptr_t)a0,(intptr_t)a1,(intptr_t)a2,(intptr_t)a3);\
58 #define SYSCALL3(_name, _fmtstr, _t0, _t1, _t2, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
59 _t0 a0;_t1 a1;_t2 a2;\
60 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
61 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
62 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
63 a2 = *(_t2*)Args;Args+=sizeof(_t2);\
64 LOG("SYSCALL3 '%s' %p %p %p", Fmt, (intptr_t)a0,(intptr_t)a1,(intptr_t)a2);\
68 #define SYSCALL2(_name, _fmtstr, _t0, _t1, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
70 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
71 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
72 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
73 LOG("SYSCALL2 '%s' %p %p", Fmt, (intptr_t)a0,(intptr_t)a1);\
77 #define SYSCALL1(_name, _fmtstr, _t0, _call) int _name(Uint*Errno,const char*Fmt, void*Args,int*Sizes){\
79 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
80 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
81 LOG("SYSCALL1 '%s' %p", Fmt,(intptr_t)a0);\
85 #define SYSCALL0(_name, _call) int _name(Uint*Errno,const char*Fmt, void*Args,int*Sizes){\
86 if(strcmp(Fmt,"")!=0)return 0;\
92 int Syscall_Null(Uint *Errno, const char *Format, void *Args, int *Sizes)
97 SYSCALL1(Syscall_Exit, "i", int,
102 SYSCALL2(Syscall_Open, "si", const char *, int,
103 int rv = VFS_Open(a0, a1|VFS_OPENFLAG_USER);
104 if(rv == -1) *Errno = errno;
107 SYSCALL1(Syscall_Close, "i", int,
111 SYSCALL3(Syscall_Read, "iid", int, int, void *,
112 if( Sizes[2] < a1 ) {
113 Log_Warning("Syscalls", "Read - %i < %i", Sizes[2], a1);
116 size_t rv = VFS_Read(a0, a1, a2);
117 if(rv == -1) *Errno = errno;
120 SYSCALL3(Syscall_Write, "iid", int, int, const void *,
121 if( Sizes[2] < a1 ) {
122 Log_Warning("Syscalls", "Write - %i < %i", Sizes[2], a1);
126 size_t rv = VFS_Write(a0, a1, a2);
127 if(rv == -1) *Errno = errno;
130 SYSCALL3(Syscall_Seek, "iIi", int, int64_t, int,
131 return VFS_Seek(a0, a1, a2);
133 SYSCALL1(Syscall_Tell, "i", int,
136 SYSCALL3(Syscall_IOCtl, "iid", int, int, void *,
137 return VFS_IOCtl(a0, a1, a2);
139 SYSCALL3(Syscall_FInfo, "idi", int, void *, int,
140 if( Sizes[1] < sizeof(tFInfo)+a2*sizeof(tVFS_ACL)) {
141 //LOG("offsetof(size) = %i", offsetof(tFInfo, size));
142 LOG("Bad size %i < %i", Sizes[1], sizeof(tFInfo)+a2*sizeof(tVFS_ACL));
146 return VFS_FInfo(a0, a1, a2);
148 SYSCALL2(Syscall_ReadDir, "id", int, char *,
151 return VFS_ReadDir(a0, a1);
153 SYSCALL6(Syscall_select, "iddddi", int, fd_set *, fd_set *, fd_set *, tTime *, unsigned int,
154 return VFS_Select(a0, a1, a2, a3, a4, a5, 0);
156 SYSCALL3(Syscall_OpenChild, "isi", int, const char *, int,
157 return VFS_OpenChild(a0, a1, a2|VFS_OPENFLAG_USER);
159 SYSCALL2(Syscall_GetACL, "id", int, void *,
160 if(Sizes[1] < sizeof(tVFS_ACL))
162 return VFS_GetACL(a0, (void*)a1);
164 SYSCALL4(Syscall_Mount, "ssss", const char *, const char *, const char *, const char *,
165 return VFS_Mount(a0, a1, a2, a3);
167 SYSCALL1(Syscall_Chdir, "s", const char *,
168 return VFS_ChDir(a0);
170 SYSCALL0(Syscall_Sleep,
174 SYSCALL2(Syscall_WaitTID, "id", int, int *,
175 if(Sizes[1] < sizeof(int))
177 return Threads_WaitTID(a0, a1);
179 SYSCALL1(Syscall_SetUID, "i", int,
180 if(Sizes[0] < sizeof(int)) {
181 *Errno = -EINVAL; // TODO: Better message
184 return Threads_SetUID(a0);
186 SYSCALL1(Syscall_SetGID, "i", int,
187 if(Sizes[0] < sizeof(int)) {
188 *Errno = -EINVAL; // TODO: Better message
191 return Threads_SetGID(a0);
194 SYSCALL0(Syscall_GetTID, return Threads_GetTID());
195 SYSCALL0(Syscall_GetPID, return Threads_GetPID());
196 SYSCALL0(Syscall_GetUID, return Threads_GetUID());
197 SYSCALL0(Syscall_GetGID, return Threads_GetGID());
199 SYSCALL1(Syscall_AN_Fork, "d", int *,
200 if(Sizes[0] < sizeof(int))
202 *a0 = Threads_Fork();
206 SYSCALL3(Syscall_AN_Spawn, "ddd", int *, int *, void *,
207 if(Sizes[0] < sizeof(int))
209 *a0 = Threads_Spawn(Sizes[1] / sizeof(int), a1, a2);
213 SYSCALL2(Syscall_SendMessage, "id", int, void *,
214 return Proc_SendMessage(a0, Sizes[1], a1);
217 SYSCALL2(Syscall_GetMessage, "dd", uint32_t *, void *,
218 if( a0 && Sizes[0] < sizeof(*a0) ) {
219 Log_Notice("Syscalls", "Syscall_GetMessage - Arg 1 Undersize (%i < %i)",
220 Sizes[0], sizeof(*a0));
226 rv = Proc_GetMessage(&tmp, Sizes[1], a1);
230 rv = Proc_GetMessage(NULL, Sizes[1], a1);
234 SYSCALL1(Syscall_WaitEvent, "i", int,
235 return Threads_WaitEvents(a0);
238 const tSyscallHandler caSyscalls[] = {
274 const int ciNumSyscalls = sizeof(caSyscalls)/sizeof(caSyscalls[0]);
276 * \brief Recieve a syscall structure from the server code
278 tRequestHeader *SyscallRecieve(tRequestHeader *Request, int *ReturnLength)
280 char formatString[Request->NParams+1];
281 char *inData = (char*)&Request->Params[Request->NParams];
287 void *returnData[Request->NParams];
288 int argSizes[Request->NParams];
291 // Clear errno (Acess verson) at the start of the request
295 if( Request->CallID >= ciNumSyscalls ) {
296 Log_Notice("Syscalls", "Unknown syscall number %i", Request->CallID);
300 if( !caSyscalls[Request->CallID] ) {
301 Log_Notice("Syscalls", "Unimplemented syscall %i", Request->CallID);
305 // Init return count/size
307 retDataLen = sizeof(Uint64) + sizeof(Uint32);
309 // Get size of argument list
310 for( i = 0; i < Request->NParams; i ++ )
312 argSizes[i] = Request->Params[i].Length;
313 switch(Request->Params[i].Type)
316 formatString[i] = '-';
319 formatString[i] = 'i';
320 argListLen += sizeof(Uint32);
323 formatString[i] = 'I';
324 argListLen += sizeof(Uint64);
327 formatString[i] = 'd';
328 argListLen += sizeof(void*);
329 // Prepare the return values
330 if( Request->Params[i].Flags & ARG_FLAG_RETURN )
332 retDataLen += Request->Params[i].Length;
336 case ARG_TYPE_STRING:
337 formatString[i] = 's';
338 argListLen += sizeof(char*);
341 Log_Error("Syscalls", "Unknown param type %i", Request->Params[i].Type);
342 return NULL; // ERROR!
345 formatString[i] = '\0';
347 LOG("Request %i(%s) '%s'", Request->CallID, casSYSCALL_NAMES[Request->CallID], formatString);
350 char argListData[argListLen];
352 // Build argument list
353 for( i = 0; i < Request->NParams; i ++ )
355 returnData[i] = NULL;
356 switch(Request->Params[i].Type)
361 //LOG("%i INT32: 0x%x", i, *(Uint32*)inData);
362 *(Uint32*)&argListData[argListLen] = *(Uint32*)inData;
363 argListLen += sizeof(Uint32);
364 inData += sizeof(Uint32);
367 //LOG("%i INT64: 0x%llx", i, *(Uint64*)inData);
368 *(Uint64*)&argListData[argListLen] = *(Uint64*)inData;
369 argListLen += sizeof(Uint64);
370 inData += sizeof(Uint64);
372 case ARG_TYPE_STRING:
373 //LOG("%i STR: '%s'", i, (char*)inData);
374 *(char**)&argListData[argListLen] = (char*)inData;
375 argListLen += sizeof(void*);
376 inData += Request->Params[i].Length;
379 // Data gets special handling, because only it can be returned to the user
380 // (ARG_TYPE_DATA is a pointer)
382 // Check for non-resident data
383 if( Request->Params[i].Length == 0 )
385 returnData[i] = NULL;
386 *(void**)&argListData[argListLen] = NULL;
387 argListLen += sizeof(void*);
389 else if( Request->Params[i].Flags & ARG_FLAG_ZEROED )
391 // Allocate and zero the buffer
392 returnData[i] = calloc(1, Request->Params[i].Length);
393 //LOG("%i ZDAT: %i %p", i,
394 // Request->Params[i].Length, returnData[i]);
395 *(void**)&argListData[argListLen] = returnData[i];
396 argListLen += sizeof(void*);
400 returnData[i] = (void*)inData;
401 //LOG("%i DATA: %i %p", i,
402 // Request->Params[i].Length, returnData[i]);
403 *(void**)&argListData[argListLen] = (void*)inData;
404 argListLen += sizeof(void*);
405 inData += Request->Params[i].Length;
411 // --- Perform request
412 retVal = caSyscalls[Request->CallID](&ret_errno, formatString, argListData, argSizes);
417 if( ret_errno == 0 && errno != 0 ) {
419 LOG("errno = %i", errno);
422 // Allocate the return
423 size_t msglen = sizeof(tRequestHeader) + retValueCount * sizeof(tRequestValue) + retDataLen;
424 ret = malloc(msglen);
425 ret->ClientID = Request->ClientID;
426 ret->CallID = Request->CallID;
427 ret->NParams = retValueCount;
428 ret->MessageLength = msglen;
429 inData = (char*)&ret->Params[ ret->NParams ];
431 // Static Uint64 return value
432 ret->Params[0].Type = ARG_TYPE_INT64;
433 ret->Params[0].Flags = 0;
434 ret->Params[0].Length = sizeof(Uint64);
435 *(Uint64*)inData = retVal;
436 inData += sizeof(Uint64);
438 // Static Uint32 errno value
439 ret->Params[1].Type = ARG_TYPE_INT32;
440 ret->Params[1].Flags = 0;
441 ret->Params[1].Length = sizeof(Uint32);
442 *(Uint32*)inData = ret_errno;
443 inData += sizeof(Uint32);
445 LOG("Ret: %llx, errno=%i", retVal, ret_errno);
447 //Log_Debug("Syscalls", "Return 0x%llx", retVal);
450 for( i = 0; i < Request->NParams; i ++ )
452 if( Request->Params[i].Type != ARG_TYPE_DATA ) continue;
453 if( !(Request->Params[i].Flags & ARG_FLAG_RETURN) ) continue;
455 ret->Params[retValueCount].Type = Request->Params[i].Type;
456 ret->Params[retValueCount].Flags = 0;
457 ret->Params[retValueCount].Length = Request->Params[i].Length;
459 LOG("Ret %i: Type %i, Len %i",
460 i, Request->Params[i].Type, Request->Params[i].Length);
462 memcpy(inData, returnData[i], Request->Params[i].Length);
463 inData += Request->Params[i].Length;
465 if( Request->Params[i].Flags & ARG_FLAG_ZEROED )
466 free( returnData[i] ); // Free temp buffer from above
470 *ReturnLength = ret->MessageLength;