2 * AcessOS Microkernel Version
15 #define CHECK_NUM_NULLOK(v,size) \
16 if((v)&&!Syscall_Valid((size),(v))){LOG("CHECK_NUM_NULLOK: %p(%x) FAIL",v,size);ret=-1;err=-EINVAL;break;}
17 #define CHECK_STR_NULLOK(v) \
18 if((v)&&!Syscall_ValidString((v))){LOG("CHECK_STR_NULLOK: %p FAIL",v);ret=-1;err=-EINVAL;break;}
19 #define CHECK_NUM_NONULL(v,size) \
20 if(!(v)||!Syscall_Valid((size),(v))){LOG("CHECK_NUM_NONULL: %p(%x) FAIL",v,size);ret=-1;err=-EINVAL;break;}
21 #define CHECK_STR_NONULL(v) \
22 if(!(v)||!Syscall_ValidString((v))){LOG("CHECK_STR_NONULL: %p FAIL",v);ret=-1;err=-EINVAL;break;}
23 #define CHECK_STR_ARRAY(arr) do {\
25 char **tmp = (char**)arr; \
26 CHECK_NUM_NONULL( tmp, sizeof(char**) ); \
27 for(i=0;tmp[i];i++) { \
28 CHECK_STR_NONULL( tmp[i] ); \
29 CHECK_NUM_NONULL( &tmp[i+1], sizeof(char*) ); \
35 extern Uint Binary_Load(const char *file, Uint *entryPoint);
38 void SyscallHandler(tSyscallRegs *Regs);
39 int Syscall_ValidString(const char *Addr);
40 int Syscall_Valid(int Size, const void *Addr);
41 int Syscall_MM_SetFlags(const void *Addr, Uint Flags, Uint Mask);
44 // TODO: Do sanity checking on arguments, ATM the user can really fuck with the kernel
45 void SyscallHandler(tSyscallRegs *Regs)
49 int callNum = Regs->Num;
52 if(callNum != SYS_READ && callNum != SYS_WRITE) {
54 ENTER("iThread iNum", Threads_GetTID(), callNum);
55 if(callNum < NUM_SYSCALLS)
56 LOG("Syscall %s", cSYSCALL_NAMES[callNum]);
57 LOG("Arg1: 0x%x, Arg2: 0x%x, Arg3: 0x%x, Arg4: 0x%x", Regs->Arg1, Regs->Arg2, Regs->Arg3, Regs->Arg4);
64 // -- Exit the current thread
65 case SYS_EXIT: Threads_Exit(0, Regs->Arg1); break;
67 // -- Put the current thread to sleep
68 case SYS_SLEEP: Threads_Sleep(); break;
70 // -- Yield current timeslice
71 case SYS_YIELD: Threads_Yield(); break;
73 // -- Set Error Handler
74 case SYS_SETFAULTHANDLER:
75 Threads_SetFaultHandler(Regs->Arg1);
78 // -- Clone the current thread
80 // Call clone system call
81 ret = Proc_Clone(Regs->Arg1);
90 // -- Wait fr an event
93 ret = Threads_WaitEvents(Regs->Arg1);
96 // -- Wait for a thread
98 // Sanity Check (Status can be NULL)
99 CHECK_NUM_NULLOK( (int*)Regs->Arg2, sizeof(int) );
101 ret = Threads_WaitTID(Regs->Arg1, (int*)Regs->Arg2);
104 // -- Get the physical address of a page
106 ret = MM_GetPhysAddr( (void*)Regs->Arg1 );
110 case SYS_MAP: MM_Map(Regs->Arg1, Regs->Arg2); break;
112 // -- Allocate an address
113 case SYS_ALLOCATE: ret = MM_Allocate(Regs->Arg1); break;
115 // -- Unmap an address
116 case SYS_UNMAP: MM_Deallocate(Regs->Arg1); break;
118 // -- Change the protection on an address
120 ret = Syscall_MM_SetFlags((void*)Regs->Arg1, Regs->Arg2, Regs->Arg3);
123 // -- Get Thread/Process IDs
124 case SYS_GETTID: ret = Threads_GetTID(); break;
125 case SYS_GETPID: ret = Threads_GetPID(); break;
127 // -- Get User/Group IDs
128 case SYS_GETUID: ret = Threads_GetUID(); break;
129 case SYS_GETGID: ret = Threads_GetGID(); break;
131 // -- Set User/Group IDs
132 case SYS_SETUID: ret = Threads_SetUID(Regs->Arg1); break;
133 case SYS_SETGID: ret = Threads_SetGID(Regs->Arg1); break;
137 CHECK_NUM_NONULL( (void*)Regs->Arg3, Regs->Arg2 );
138 // Destination, Size, *Data
139 ret = Proc_SendMessage(Regs->Arg1, Regs->Arg2, (void*)Regs->Arg3);
141 // -- Check for messages
143 CHECK_NUM_NULLOK( (Uint*)Regs->Arg1, sizeof(Uint) );
144 if( Regs->Arg3 != -1 )
145 CHECK_NUM_NULLOK((void*)Regs->Arg3, Regs->Arg2);
147 ret = Proc_GetMessage((Uint*)Regs->Arg1, Regs->Arg2, (void*)Regs->Arg3);
150 // -- Get the current timestamp
155 // -- Set the thread's name
157 CHECK_STR_NONULL( (char*) Regs->Arg1);
158 Threads_SetName( (char*)Regs->Arg1 );
164 // -- Create a new process
166 CHECK_STR_NONULL((const char*)Regs->Arg1);
167 CHECK_STR_ARRAY((const char**)Regs->Arg2);
168 CHECK_STR_ARRAY((const char**)Regs->Arg3);
169 CHECK_NUM_NULLOK((void*)Regs->Arg5, Regs->Arg4*sizeof(int));
171 (const char*)Regs->Arg1, (const char**)Regs->Arg2, (const char**)Regs->Arg3,
172 Regs->Arg4, (int*)Regs->Arg5
175 // -- Replace the current process with another
177 CHECK_STR_NONULL((char*)Regs->Arg1);
178 CHECK_STR_ARRAY( (char**)Regs->Arg2 );
180 CHECK_STR_ARRAY( (char**)Regs->Arg3 );
181 LEAVE('s', "Assuming 0");
182 // Path, **Argv, **Envp, DataSize (=0 to tell it to create a copy)
184 (const char*)Regs->Arg1, (const char**)Regs->Arg2, (const char**)Regs->Arg3,
188 // -- Load a binary into the current process
190 CHECK_STR_NONULL( (char*)Regs->Arg1 );
191 CHECK_NUM_NONULL( (Uint*)Regs->Arg2, sizeof(Uint) );
193 ret = Binary_Load((char*)Regs->Arg1, (Uint*)Regs->Arg2);
197 // Virtual Filesystem
200 CHECK_STR_NONULL( (char*)Regs->Arg1 );
201 LOG("VFS_Open(\"%s\", 0x%x)", (char*)Regs->Arg1, Regs->Arg2 | VFS_OPENFLAG_USER);
202 ret = VFS_Open((char*)Regs->Arg1, Regs->Arg2 | VFS_OPENFLAG_USER);
206 LOG("VFS_Close(%i)", Regs->Arg1);
207 VFS_Close( Regs->Arg1 );
212 ret = VFS_Seek( Regs->Arg1, Regs->Arg2, Regs->Arg3 );
214 ret = VFS_Seek( Regs->Arg1, Regs->Arg2|(((Uint64)Regs->Arg3)<<32), Regs->Arg4 );
219 ret = VFS_Tell( Regs->Arg1 );
223 CHECK_NUM_NONULL( (void*)Regs->Arg2, Regs->Arg3 );
224 ret = VFS_Write( Regs->Arg1, Regs->Arg3, (void*)Regs->Arg2 );
228 CHECK_NUM_NONULL( (void*)Regs->Arg2, Regs->Arg3 );
229 ret = VFS_Read( Regs->Arg1, Regs->Arg3, (void*)Regs->Arg2 );
233 CHECK_NUM_NONULL( (void*)Regs->Arg2, sizeof(tFInfo) + Regs->Arg3*sizeof(tVFS_ACL) );
235 ret = VFS_FInfo( Regs->Arg1, (void*)Regs->Arg2, Regs->Arg3 );
240 CHECK_NUM_NONULL( (void*)Regs->Arg2, sizeof(tVFS_ACL) );
241 ret = VFS_GetACL( Regs->Arg1, (void*)Regs->Arg2 );
246 // TODO: What if the filename is longer?
247 // Maybe force it to be a 256 byte buffer
248 CHECK_NUM_NONULL( (void*)Regs->Arg2, 256 );
249 ret = VFS_ReadDir( Regs->Arg1, (void*)Regs->Arg2 );
252 // Open a file that is a entry in an open directory
254 CHECK_STR_NONULL( (char*)Regs->Arg2 );
255 ret = VFS_OpenChild( Regs->Arg1, (char*)Regs->Arg2, Regs->Arg3 | VFS_OPENFLAG_USER);
260 CHECK_STR_NONULL( (const char*)Regs->Arg1 );
261 ret = VFS_ChDir( (const char*)Regs->Arg1 );
266 // All sanity checking should be done by the driver
267 if( Regs->Arg3 && !MM_IsUser(Regs->Arg3) ) {
268 err = -EINVAL; ret = -1; break;
270 ret = VFS_IOCtl( Regs->Arg1, Regs->Arg2, (void*)Regs->Arg3 );
273 // Mount a filesystem
275 // Only root can mount filesystems
276 if(Threads_GetUID() != 0) {
284 if( !Syscall_ValidString((char*)Regs->Arg2) ) {
290 ret = VFS_Unmount((char*)Regs->Arg2);
294 // Sanity check the paths
295 if(!Syscall_ValidString((char*)Regs->Arg1)
296 || !Syscall_ValidString((char*)Regs->Arg2)
297 || (Regs->Arg3 && !Syscall_ValidString((char*)Regs->Arg3))
298 || !Syscall_ValidString((char*)Regs->Arg4) ) {
304 (char*)Regs->Arg1, // Device
305 (char*)Regs->Arg2, // Mount point
306 (char*)Regs->Arg3, // Filesystem
307 (char*)Regs->Arg4 // Options
312 // Wait on a set of handles
315 if( (Regs->Arg2 && !Syscall_Valid(sizeof(fd_set), (void*)Regs->Arg2))
316 || (Regs->Arg3 && !Syscall_Valid(sizeof(fd_set), (void*)Regs->Arg3))
317 || (Regs->Arg4 && !Syscall_Valid(sizeof(fd_set), (void*)Regs->Arg4))
318 || (Regs->Arg5 && !Syscall_Valid(sizeof(tTime), (void*)Regs->Arg5)) )
326 Regs->Arg1, // Max handle
327 (fd_set *)Regs->Arg2, // Read
328 (fd_set *)Regs->Arg3, // Write
329 (fd_set *)Regs->Arg4, // Errors
330 (tTime *)Regs->Arg5, // Timeout
331 (Uint32)Regs->Arg6, // Extra wakeup events
339 CHECK_STR_NONULL( (char*)Regs->Arg1 );
340 LogF("Log: %08lli [%i] ", now(), Threads_GetTID());
341 LogF((const char*)Regs->Arg1,
342 Regs->Arg2, Regs->Arg3, Regs->Arg4, Regs->Arg5, Regs->Arg6);
347 // -- Default (Return Error)
349 Log_Warning("Syscalls", "Unknown System Call %i", Regs->Num);
350 if(Regs->Num < NUM_SYSCALLS)
351 Log_Warning("Syscall", " named '%s'", cSYSCALL_NAMES[Regs->Num]);
357 if(err == 0) err = errno;
360 LOG("ID: %i, Return errno = %i", Regs->Num, err);
364 Regs->Return = ret&0xFFFFFFFF;
365 Regs->RetHi = ret >> 32;
372 if( callNum != SYS_READ && callNum != SYS_WRITE ) {
374 LOG("err = %i", err);
375 if( callNum == SYS_EXECVE )
376 LOG("Actual %i", ret);
386 * \fn int Syscall_ValidString(const char *Addr)
387 * \brief Checks if a memory address contains a valid string
389 int Syscall_ValidString(const char *Addr)
391 // Check if the memory is user memory
392 if(!MM_IsUser( (tVAddr) Addr)) return 0;
394 return CheckString( Addr );
398 * \fn int Syscall_Valid(int Size, const void *Addr)
399 * \brief Checks if a memory address is valid
401 int Syscall_Valid(int Size, const void *Addr)
403 if(!MM_IsUser( (tVAddr)Addr )) {
404 Log_Debug("Syscalls", "Syscall_Valid - %p not user", Addr);
408 return CheckMem( Addr, Size );
411 int Syscall_MM_SetFlags(const void *Addr, Uint Flags, Uint Mask)
413 tPAddr paddr = MM_GetPhysAddr(Addr);
414 Flags &= MM_PFLAG_RO|MM_PFLAG_EXEC;
415 Mask &= MM_PFLAG_RO|MM_PFLAG_EXEC;
417 //Log_Debug("Syscalls", "SYS_SETFLAGS: %p %x %x", Addr, Flags, Mask);
420 if( (Mask & MM_PFLAG_RO) && !(Flags & MM_PFLAG_RO) ) {
422 // HACK - Assume that RO mmap'd files are immutable
423 if( MM_GetPageNode(paddr, &node) == 0 && node ) {
424 Flags |= MM_PFLAG_COW;
425 Mask |= MM_PFLAG_COW;
428 MM_SetFlags((tVAddr)Addr, Flags, Mask);