7 #define DONT_INCLUDE_SYSCALL_NAMES 1
8 #include "../../Usermode/Libraries/ld-acess.so_src/include_exp/acess/sys.h"
9 #include "../syscalls.h"
14 #define DEBUG(v...) Debug(v)
15 //#define DEBUG(v...) do{}while(0)//Debug(v)
16 #define PAGE_SIZE 4096
18 typedef struct sFILE FILE;
20 extern void exit(int) __attribute__ ((noreturn));
21 extern int printf(const char *, ...);
22 extern int fprintf(FILE *,const char *, ...);
23 extern int sprintf(char *,const char *, ...);
24 extern int vprintf(const char *, va_list);
25 extern int strncmp(const char *, const char *, size_t);
28 extern int giSyscall_ClientID; // Needed for execve
29 extern void _InitSyscalls(void);
30 extern void _CloseSyscalls(void);
32 extern void Warning(const char *Format, ...);
33 extern void Debug(const char *Format, ...);
34 extern int AllocateMemory(uintptr_t VirtAddr, size_t ByteCount);
37 #define NATIVE_FILE_MASK 0x40000000
41 char *gsExecutablePath = "./ld-acess";
45 int acess__SysChdir(const char *Path)
47 return _Syscall(SYS_CHDIR, ">s", Path);
50 int acess__SysOpen(const char *Path, int Flags)
52 if( strncmp(Path, "$$$$", 4) == 0 )
54 return native_open(Path, Flags) | NATIVE_FILE_MASK;
56 DEBUG("open(\"%s\", 0x%x)", Path, Flags);
57 return _Syscall(SYS_OPEN, ">s >i", Path, Flags);
60 void acess__SysClose(int FD)
62 if(FD & NATIVE_FILE_MASK) {
63 return native_close(FD & (NATIVE_FILE_MASK-1));
65 DEBUG("close(%i)", FD);
66 _Syscall(SYS_CLOSE, ">i", FD);
69 int acess__SysReopen(int FD, const char *Path, int Flags) {
70 DEBUG("reopen(0x%x, \"%s\", 0x%x)", FD, Path, Flags);
71 return _Syscall(SYS_REOPEN, ">i >s >i", FD, Path, Flags);
74 size_t acess__SysRead(int FD, void *Dest, size_t Bytes) {
75 if(FD & NATIVE_FILE_MASK)
76 return native_read(FD & (NATIVE_FILE_MASK-1), Dest, Bytes);
78 DEBUG("read(0x%x, 0x%x, *%p)", FD, Bytes, Dest);
79 return _Syscall(SYS_READ, ">i >i <d", FD, Bytes, Bytes, Dest);
82 size_t acess__SysWrite(int FD, const void *Src, size_t Bytes) {
83 if(FD & NATIVE_FILE_MASK)
84 return native_write(FD & (NATIVE_FILE_MASK-1), Src, Bytes);
86 DEBUG("write(0x%x, 0x%x, %p\"%.*s\")", FD, Bytes, Src, Bytes, (char*)Src);
87 return _Syscall(SYS_WRITE, ">i >i >d", FD, Bytes, Bytes, Src);
90 int acess__SysSeek(int FD, int64_t Ofs, int Dir)
92 if(FD & NATIVE_FILE_MASK) {
93 return native_seek(FD & (NATIVE_FILE_MASK-1), Ofs, Dir);
95 DEBUG("seek(0x%x, 0x%llx, %i)", FD, Ofs, Dir);
96 return _Syscall(SYS_SEEK, ">i >I >i", FD, Ofs, Dir);
99 uint64_t acess__SysTell(int FD)
101 if(FD & NATIVE_FILE_MASK)
102 return native_tell( FD & (NATIVE_FILE_MASK-1) );
103 DEBUG("tell(0x%x)", FD);
104 return _Syscall(SYS_TELL, ">i", FD);
107 int acess__SysIOCtl(int fd, int id, void *data) {
109 DEBUG("ioctl(%i, %i, %p)", fd, id, data);
110 // NOTE: The length here is hacky and could break
114 len = PAGE_SIZE - ((uintptr_t)data % PAGE_SIZE);
115 return _Syscall(SYS_IOCTL, ">i >i ?d", fd, id, len, data);
117 int acess__SysFInfo(int fd, t_sysFInfo *info, int maxacls) {
118 // DEBUG("offsetof(size, t_sysFInfo) = %i", offsetof(t_sysFInfo, size));
119 DEBUG("finfo(%i, %p, %i)", fd, info, maxacls);
120 return _Syscall(SYS_FINFO, ">i <d >i",
122 sizeof(t_sysFInfo)+maxacls*sizeof(t_sysACL), info,
127 int acess__SysReadDir(int fd, char *dest) {
128 DEBUG("SysReadDir(%i, %p)", fd, dest);
129 return _Syscall(SYS_READDIR, ">i <d", fd, 256, dest);
132 int acess__SysSelect(int nfds, fd_set *read, fd_set *write, fd_set *error, int64_t *timeout, uint32_t events)
134 DEBUG("_SysSelect(%i, %p, %p, %p, %p, 0x%x)", nfds, read, write, error, timeout, events);
135 return _Syscall(SYS_SELECT, ">i ?d ?d ?d >d >i", nfds,
136 read ? (nfds+7)/8 : 0, read,
137 write ? (nfds+7)/8 : 0, write,
138 error ? (nfds+7)/8 : 0, error,
139 sizeof(*timeout), timeout,
143 int acess__SysUnlink(const char *pathname)
149 int acess__SysOpenChild(int fd, char *name, int flags) {
150 DEBUG("_SysOpenChild(0x%x, '%s', 0x%x)", fd, name, flags);
151 return _Syscall(SYS_OPENCHILD, ">i >s >i", fd, name, flags);
154 int acess__SysGetACL(int fd, t_sysACL *dest) {
155 DEBUG("%s(0x%x, %p)", __func__, fd, dest);
156 return _Syscall(SYS_GETACL, ">i <d", fd, sizeof(t_sysACL), dest);
159 int acess__SysMount(const char *Device, const char *Directory, const char *Type, const char *Options) {
160 DEBUG("%s('%s', '%s', '%s', '%s')", __func__, Device, Directory, Type, Options);
161 return _Syscall(SYS_MOUNT, ">s >s >s >s", Device, Directory, Type, Options);
166 int acess__SysSetFaultHandler(int (*Handler)(int)) {
167 printf("TODO: Set fault handler (asked to set to %p)\n", Handler);
171 void acess__SysSetName(const char *Name)
176 int acess__SysGetName(char *NameDest)
182 int acess__SysSetPri(int Priority)
189 void *acess_SysLoadBin(const char *path, void **entry)
195 int acess__SysUnloadBin(void *base)
201 // --- Timekeeping ---
202 int64_t acess__SysTimestamp(void)
205 // return now()*1000;
209 // --- Memory Management ---
210 uint64_t acess__SysGetPhys(uintptr_t vaddr)
216 uint64_t acess__SysAllocate(uintptr_t vaddr)
218 if( AllocateMemory(vaddr, 0x1000) == -1 ) // Allocate a page
221 return vaddr; // Just ignore the need for paddrs :)
224 // --- Process Management ---
225 int acess__SysClone(int flags, void *stack)
228 Warning("Win32 does not support anything like fork(2), cannot emulate");
231 extern int fork(void);
232 if(flags & CLONE_VM) {
233 int ret, newID, kernel_tid=0;
234 Debug("USERSIDE fork()");
236 newID = _Syscall(SYS_AN_FORK, "<d", sizeof(int), &kernel_tid);
245 giSyscall_ClientID = newID;
250 // Return the acess TID instead
255 Warning("ERROR: Threads currently unsupported\n");
261 int acess__SysKill(int pid, int sig)
263 // TODO: Impliment SysKill
267 int acess__SysExecVE(char *path, char **argv, const char **envp)
271 DEBUG("acess_execve: (path='%s', argv=%p, envp=%p)", path, argv, envp);
273 // Get argument count
274 for( argc = 0; argv[argc]; argc ++ ) ;
275 DEBUG(" acess_execve: argc = %i", argc);
277 const char *new_argv[7+argc+1];
278 char client_id_str[11];
279 char socket_fd_str[11];
280 sprintf(client_id_str, "%i", giSyscall_ClientID);
281 sprintf(socket_fd_str, "%i", gSocket);
282 new_argv[0] = "ld-acess"; // TODO: Get path to ld-acess executable
283 new_argv[1] = "--key"; // Set client ID for Request.c
284 new_argv[2] = client_id_str;
285 new_argv[3] = "--socket"; // Socket
286 new_argv[4] = socket_fd_str;
287 new_argv[5] = "--binary"; // Set the binary path (instead of using argv[0])
289 for( i = 0; i < argc; i ++ ) new_argv[7+i] = argv[i];
290 new_argv[7+i] = NULL;
294 for( i = 0; i < argc; i ++ )
295 printf("\"%s\" ", new_argv[i]);
299 printf("envp = %p\n", envp);
300 for( i = 0; envp[i]; i ++ )
301 printf("%i: \"%s\"\n", i, envp[i]);
302 printf("envc = %i\n", i);
306 // Call actual execve
307 return native_execve("./ld-acess", new_argv, envp);
310 int acess__SysSpawn(const char *binary, const char **argv, const char **envp, int nfd, int fds[], struct s_sys_spawninfo *info)
313 while( argv[argc++] );
315 Debug("_SysSpawn('%s', %p (%i), %p, %i, %p, %p)",
316 binary, argv, argc, envp, nfd, fds, info);
320 newID = _Syscall(SYS_AN_SPAWN, "<d >d >d", sizeof(int), &kernel_tid,
321 nfd*sizeof(int), fds,
322 info ? sizeof(*info) : 0, info);
324 const char *new_argv[5+argc+1];
326 char client_id_str[11];
327 sprintf(client_id_str, "%i", newID);
328 new_argv[new_argc++] = gsExecutablePath; // TODO: Get path to ld-acess executable
329 new_argv[new_argc++] = "--key";
330 new_argv[new_argc++] = client_id_str;
331 new_argv[new_argc++] = "--binary";
332 new_argv[new_argc++] = binary;
333 for( i = 0; argv[i]; i ++)
334 new_argv[new_argc++] = argv[i];
335 new_argv[new_argc++] = NULL;
337 // TODO: Debug output?
339 native_spawn(gsExecutablePath, new_argv, envp);
344 //void acess_sleep(void)
346 // DEBUG("%s()", __func__);
347 // _Syscall(SYS_SLEEP, "");
350 int acess__SysWaitTID(int TID, int *ExitStatus)
352 DEBUG("%s(%i, %p)", __func__, TID, ExitStatus);
353 return _Syscall(SYS_WAITTID, ">i <d", TID, sizeof(int), &ExitStatus);
356 int acess_setuid(int ID) { return _Syscall(SYS_SETUID, ">i", ID); }
357 int acess_setgid(int ID) { return _Syscall(SYS_SETGID, ">i", ID); }
358 int acess_gettid(void) { return _Syscall(SYS_GETTID, ""); }
359 int acess_getpid(void) { return _Syscall(SYS_GETPID, ""); }
360 int acess_getuid(void) { return _Syscall(SYS_GETUID, ""); }
361 int acess_getgid(void) { return _Syscall(SYS_GETGID, ""); }
363 int acess__SysSendMessage(int DestTID, int Length, void *Data)
365 DEBUG("%s(%i, 0x%x, %p)", __func__, DestTID, Length, Data);
366 return _Syscall(SYS_SENDMSG, ">i >d", DestTID, Length, Data);
369 int acess__SysGetMessage(int *SourceTID, int BufLen, void *Data)
371 DEBUG("%s(%p, %p)", __func__, SourceTID, Data);
372 return _Syscall(SYS_GETMSG, "<d <d",
373 SourceTID ? sizeof(uint32_t) : 0, SourceTID,
378 int acess__SysWaitEvent(int Mask)
380 DEBUG("%s(%x)", __func__, Mask);
381 return _Syscall(SYS_WAITEVENT, ">i", Mask);
385 void acess__SysDebug(const char *Format, ...)
389 va_start(args, Format);
391 printf("[_SysDebug %i] ", giSyscall_ClientID);
392 vprintf(Format, args);
398 void acess__exit(int Status)
400 DEBUG("_exit(%i)", Status);
401 _Syscall(SYS_EXIT, ">i", Status);
405 uint32_t acess__SysSetMemFlags(uintptr_t vaddr, uint32_t flags, uint32_t mask)
407 // TODO: Impliment acess__SysSetMemFlags?
412 // === Symbol List ===
414 # define DEFSYM(name) {#name, &acess_##name}
416 const tSym caBuiltinSymbols[] = {
421 DEFSYM(_SysOpenChild),
447 DEFSYM(_SysSendMessage),
448 DEFSYM(_SysGetMessage),
450 DEFSYM(_SysAllocate),
451 DEFSYM(_SysSetMemFlags),
453 DEFSYM(_SysSetFaultHandler),
454 DEFSYM(_SysWaitEvent),
459 const int ciNumBuiltinSymbols = sizeof(caBuiltinSymbols)/sizeof(caBuiltinSymbols[0]);