3 * - Acess kernel emulation on another OS using SDL and UDP
10 #include "../syscalls.h"
13 extern int Threads_Fork(void); // AcessNative only function
16 typedef int (*tSyscallHandler)(Uint *Errno, const char *Format, void *Args, int *Sizes);
19 #define SYSCALL6(_name, _fmtstr, _t0, _t1, _t2, _t3, _t4, _t5, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
20 _t0 a0;_t1 a1;_t2 a2;_t3 a3;_t4 a4;_t5 a5;\
21 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
22 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
23 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
24 a2 = *(_t2*)Args;Args+=sizeof(_t2);\
25 a3 = *(_t3*)Args;Args+=sizeof(_t3);\
26 a4 = *(_t4*)Args;Args+=sizeof(_t4);\
27 a5 = *(_t5*)Args;Args+=sizeof(_t5);\
28 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);\
31 #define SYSCALL5(_name, _fmtstr, _t0, _t1, _t2, _t3, _t4, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
32 _t0 a0;_t1 a1;_t2 a2;_t3 a3;_t4 a4;\
33 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
34 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
35 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
36 a2 = *(_t2*)Args;Args+=sizeof(_t2);\
37 a3 = *(_t3*)Args;Args+=sizeof(_t3);\
38 a4 = *(_t4*)Args;Args+=sizeof(_t4);\
39 LOG("SYSCALL5 '%s' %p %p %p %p %p", Fmt, (intptr_t)a0,(intptr_t)a1,(intptr_t)a2,(intptr_t)a3,(intptr_t)a4);\
42 #define SYSCALL4(_name, _fmtstr, _t0, _t1, _t2, _t3, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
43 _t0 a0;_t1 a1;_t2 a2;_t3 a3;\
44 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
45 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
46 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
47 a2 = *(_t2*)Args;Args+=sizeof(_t2);\
48 a3 = *(_t3*)Args;Args+=sizeof(_t3);\
49 LOG("SYSCALL4 '%s' %p %p %p %p", Fmt, (intptr_t)a0,(intptr_t)a1,(intptr_t)a2,(intptr_t)a3);\
53 #define SYSCALL3(_name, _fmtstr, _t0, _t1, _t2, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
54 _t0 a0;_t1 a1;_t2 a2;\
55 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
56 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
57 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
58 a2 = *(_t2*)Args;Args+=sizeof(_t2);\
59 LOG("SYSCALL3 '%s' %p %p %p", Fmt, (intptr_t)a0,(intptr_t)a1,(intptr_t)a2);\
63 #define SYSCALL2(_name, _fmtstr, _t0, _t1, _call) int _name(Uint*Errno,const char*Fmt,void*Args,int*Sizes){\
65 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
66 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
67 a1 = *(_t1*)Args;Args+=sizeof(_t1);\
68 LOG("SYSCALL2 '%s' %p %p", Fmt, (intptr_t)a0,(intptr_t)a1);\
72 #define SYSCALL1(_name, _fmtstr, _t0, _call) int _name(Uint*Errno,const char*Fmt, void*Args,int*Sizes){\
74 if(strcmp(Fmt,_fmtstr)!=0)return 0;\
75 a0 = *(_t0*)Args;Args+=sizeof(_t0);\
76 LOG("SYSCALL1 '%s' %p", Fmt,(intptr_t)a0);\
80 #define SYSCALL0(_name, _call) int _name(Uint*Errno,const char*Fmt, void*Args,int*Sizes){\
81 if(strcmp(Fmt,"")!=0)return 0;\
87 int Syscall_Null(Uint*Errno, const char *Format, void *Args, int *Sizes)
92 SYSCALL1(Syscall_Exit, "i", int,
97 SYSCALL2(Syscall_Open, "si", const char *, int,
98 return VFS_Open(a0, a1|VFS_OPENFLAG_USER);
100 SYSCALL1(Syscall_Close, "i", int,
104 SYSCALL3(Syscall_Read, "iid", int, int, void *,
105 if( Sizes[2] < a1 ) {
106 Log_Warning("Syscalls", "Read - %i < %i", Sizes[2], a1);
109 return VFS_Read(a0, a1, a2);
111 SYSCALL3(Syscall_Write, "iid", int, int, const void *,
114 return VFS_Write(a0, a1, a2);
116 SYSCALL3(Syscall_Seek, "iIi", int, int64_t, int,
117 return VFS_Seek(a0, a1, a2);
119 SYSCALL1(Syscall_Tell, "i", int,
122 SYSCALL3(Syscall_IOCtl, "iid", int, int, void *,
123 return VFS_IOCtl(a0, a1, a2);
125 SYSCALL3(Syscall_FInfo, "idi", int, void *, int,
126 if( Sizes[1] < sizeof(tFInfo)+a2*sizeof(tVFS_ACL)) {
127 LOG("offsetof(size) = %i", offsetof(tFInfo, size));
128 LOG("Bad size %i < %i", Sizes[1], sizeof(tFInfo)+a2*sizeof(tVFS_ACL));
132 return VFS_FInfo(a0, a1, a2);
134 SYSCALL2(Syscall_ReadDir, "id", int, char *,
137 return VFS_ReadDir(a0, a1);
139 SYSCALL6(Syscall_select, "iddddi", int, fd_set *, fd_set *, fd_set *, time_t *, unsigned int,
140 return VFS_Select(a0, a1, a2, a3, a4, a5, 0);
142 SYSCALL3(Syscall_OpenChild, "isi", int, const char *, int,
143 return VFS_OpenChild(a0, a1, a2|VFS_OPENFLAG_USER);
145 SYSCALL2(Syscall_GetACL, "id", int, void *,
146 if(Sizes[1] < sizeof(tVFS_ACL))
148 return VFS_GetACL(a0, (void*)a1);
150 SYSCALL4(Syscall_Mount, "ssss", const char *, const char *, const char *, const char *,
151 return VFS_Mount(a0, a1, a2, a3);
153 SYSCALL1(Syscall_Chdir, "s", const char *,
154 return VFS_ChDir(a0);
156 SYSCALL0(Syscall_Sleep,
160 SYSCALL2(Syscall_WaitTID, "id", int, int *,
161 if(Sizes[1] < sizeof(int))
163 return Threads_WaitTID(a0, a1);
165 SYSCALL1(Syscall_SetUID, "i", int,
166 if(Sizes[0] < sizeof(int)) {
167 *Errno = -EINVAL; // TODO: Better message
170 return Threads_SetUID(a0);
172 SYSCALL1(Syscall_SetGID, "i", int,
173 if(Sizes[0] < sizeof(int)) {
174 *Errno = -EINVAL; // TODO: Better message
177 return Threads_SetGID(a0);
180 SYSCALL1(Syscall_Fork, "d", int *,
181 if(Sizes[0] < sizeof(int))
183 *a0 = Threads_Fork();
187 const tSyscallHandler caSyscalls[] = {
216 const int ciNumSyscalls = sizeof(caSyscalls)/sizeof(caSyscalls[0]);
218 * \brief Recieve a syscall structure from the server code
220 tRequestHeader *SyscallRecieve(tRequestHeader *Request, int *ReturnLength)
222 char formatString[Request->NParams+1];
223 char *inData = (char*)&Request->Params[Request->NParams];
227 int retValueCount = 1;
228 int retDataLen = sizeof(Uint64);
229 void *returnData[Request->NParams];
230 int argSizes[Request->NParams];
234 if( Request->CallID >= ciNumSyscalls ) {
235 Log_Notice("Syscalls", "Unknown syscall number %i", Request->CallID);
239 if( !caSyscalls[Request->CallID] ) {
240 Log_Notice("Syscalls", "Unimplemented syscall %i", Request->CallID);
244 // Get size of argument list
245 for( i = 0; i < Request->NParams; i ++ )
247 argSizes[i] = Request->Params[i].Length;
248 switch(Request->Params[i].Type)
251 formatString[i] = '-';
254 formatString[i] = 'i';
255 argListLen += sizeof(Uint32);
258 formatString[i] = 'I';
259 argListLen += sizeof(Uint64);
262 formatString[i] = 'd';
263 argListLen += sizeof(void*);
265 case ARG_TYPE_STRING:
266 formatString[i] = 's';
267 argListLen += sizeof(char*);
270 return NULL; // ERROR!
273 formatString[i] = '\0';
275 LOG("Request %i(%s) '%s'", Request->CallID, casSYSCALL_NAMES[Request->CallID], formatString);
278 char argListData[argListLen];
280 // Build argument list
281 for( i = 0; i < Request->NParams; i ++ )
283 returnData[i] = NULL;
284 switch(Request->Params[i].Type)
289 LOG("%i INT32: 0x%x", i, *(Uint32*)inData);
290 *(Uint32*)&argListData[argListLen] = *(Uint32*)inData;
291 argListLen += sizeof(Uint32);
292 inData += sizeof(Uint32);
295 LOG("%i INT64: 0x%llx", i, *(Uint64*)inData);
296 *(Uint64*)&argListData[argListLen] = *(Uint64*)inData;
297 argListLen += sizeof(Uint64);
298 inData += sizeof(Uint64);
300 case ARG_TYPE_STRING:
301 LOG("%i STR: '%s'", i, (char*)inData);
302 *(char**)&argListData[argListLen] = (char*)inData;
303 argListLen += sizeof(void*);
304 inData += Request->Params[i].Length;
307 // Data gets special handling, because only it can be returned to the user
308 // (ARG_TYPE_DATA is a pointer)
310 // Prepare the return values
311 if( Request->Params[i].Flags & ARG_FLAG_RETURN )
313 retDataLen += Request->Params[i].Length;
317 // Check for non-resident data
318 if( Request->Params[i].Flags & ARG_FLAG_ZEROED )
320 // Allocate and zero the buffer
321 returnData[i] = calloc(1, Request->Params[i].Length);
322 LOG("%i ZDAT: %i %p", i,
323 Request->Params[i].Length, returnData[i]);
324 *(void**)&argListData[argListLen] = returnData[i];
325 argListLen += sizeof(void*);
329 returnData[i] = (void*)inData;
330 LOG("%i DATA: %i %p", i,
331 Request->Params[i].Length, returnData[i]);
332 *(void**)&argListData[argListLen] = (void*)inData;
333 argListLen += sizeof(void*);
334 inData += Request->Params[i].Length;
340 retVal = caSyscalls[Request->CallID](&ret_errno, formatString, argListData, argSizes);
343 // Allocate the return
344 ret = malloc(sizeof(tRequestHeader) + retValueCount * sizeof(tRequestValue)
346 ret->ClientID = Request->ClientID;
347 ret->CallID = Request->CallID;
348 ret->NParams = retValueCount;
349 inData = (char*)&ret->Params[ ret->NParams ];
351 // Static Uint64 return value
352 ret->Params[0].Type = ARG_TYPE_INT64;
353 ret->Params[0].Flags = 0;
354 ret->Params[0].Length = sizeof(Uint64);
355 *(Uint64*)inData = retVal;
356 inData += sizeof(Uint64);
358 Log_Debug("Syscalls", "Return 0x%llx", retVal);
361 for( i = 0; i < Request->NParams; i ++ )
363 if( Request->Params[i].Type != ARG_TYPE_DATA ) continue;
364 if( !(Request->Params[i].Flags & ARG_FLAG_RETURN) ) continue;
366 ret->Params[retValueCount].Type = Request->Params[i].Type;
367 ret->Params[retValueCount].Flags = 0;
368 ret->Params[retValueCount].Length = Request->Params[i].Length;
370 LOG("Syscalls", "Ret %i: Type %i, Len %i",
371 i, Request->Params[i].Type, Request->Params[i].Length);
373 memcpy(inData, returnData[i], Request->Params[i].Length);
374 inData += Request->Params[i].Length;
376 if( Request->Params[i].Flags & ARG_FLAG_ZEROED )
377 free( returnData[i] ); // Free temp buffer from above
381 *ReturnLength = sizeof(tRequestHeader)
382 + retValueCount * sizeof(tRequestValue)