X-Git-Url: https://git.ucc.asn.au/?a=blobdiff_plain;f=Kernel%2Farch%2Farmv7%2Fproc.c;h=b5a867cfca71a3a8536fe38bebb247798fe5648b;hb=1baac59e0cea8985a60093e7415a1796bad138ae;hp=7dfbb456e55774c1012cb4abf8e05206e100178b;hpb=f9c581641afeb556188e84428febd4011e61edc2;p=tpg%2Facess2.git

diff --git a/Kernel/arch/armv7/proc.c b/Kernel/arch/armv7/proc.c
index 7dfbb456..b5a867cf 100644
--- a/Kernel/arch/armv7/proc.c
+++ b/Kernel/arch/armv7/proc.c
@@ -13,11 +13,15 @@
 extern tThread	gThreadZero;
 extern void	SwitchTask(Uint32 NewSP, Uint32 *OldSP, Uint32 NewIP, Uint32 *OldIP, Uint32 MemPtr);
 extern void	KernelThreadHeader(void);	// Actually takes args on stack
+extern void	Proc_int_DropToUser(Uint32 IP, Uint32 SP) NORETURN __attribute__((long_call));
+extern Uint32	Proc_int_SwapUserSP(Uint32 NewSP);
+extern Uint32	Proc_CloneInt(Uint32 *SP, Uint32 *MemPtr);
 extern tVAddr	MM_NewKStack(int bGlobal);	// TODO: Move out into a header
+extern tVAddr	MM_NewUserStack(void);
+extern char	kernel_table0[];
 
 // === PROTOTYPES ===
 void	Proc_IdleThread(void *unused);
-tTID	Proc_NewKThread(void (*Fnc)(void*), void *Ptr);
 
 // === GLOBALS ===
 tThread	*gpCurrentThread = &gThreadZero;
@@ -26,13 +30,15 @@ tThread *gpIdleThread = NULL;
 // === CODE ===
 void ArchThreads_Init(void)
 {
+	gThreadZero.MemState.Base = (tPAddr)&kernel_table0 - KERNEL_BASE;
 }
 
 void Proc_IdleThread(void *unused)
 {
+	Threads_SetPriority(gpIdleThread, -1);
 	for(;;) {
-		__asm__ __volatile__ ("wfi");
 		Proc_Reschedule();
+		__asm__ __volatile__ ("wfi");
 	}
 }
 
@@ -42,6 +48,7 @@ void Proc_Start(void)
 
 	tid = Proc_NewKThread( Proc_IdleThread, NULL );
 	gpIdleThread = Threads_GetThread(tid);
+	gpIdleThread->ThreadName = (char*)"Idle Thread";
 }
 
 int GetCPUNum(void)
@@ -54,18 +61,99 @@ tThread *Proc_GetCurThread(void)
 	return gpCurrentThread;
 }
 
-tTID Proc_Clone(Uint Flags)
+void Proc_StartUser(Uint Entrypoint, Uint Base, int ArgC, char **ArgV, int DataSize)
 {
-	return -1;
+	Uint32	*usr_sp;
+	 int	i;
+	char	**envp;
+	tVAddr	delta;
+
+//	Log_Debug("Proc", "Proc_StartUser: (Entrypoint=%p, Base=%p, ArgC=%i, ArgV=%p, DataSize=0x%x)",
+//		Entrypoint, Base, ArgC, ArgV, DataSize);
+
+	// Write data to the user's stack
+	usr_sp = (void*)MM_NewUserStack();
+	usr_sp -= (DataSize+3)/4;
+	memcpy(usr_sp, ArgV, DataSize);
+	free(ArgV);
+
+	// Adjust user's copy of the arguments
+	delta = (tVAddr)usr_sp -  (tVAddr)ArgV;
+	ArgV = (void*)usr_sp;
+	for(i = 0; ArgV[i]; i ++)	ArgV[i] += delta;
+	envp = &ArgV[i+1];
+	for(i = 0; envp[i]; i ++)	envp[i] += delta;
+	
+	*--usr_sp = (Uint32)envp;
+	*--usr_sp = (Uint32)ArgV;
+	*--usr_sp = (Uint32)ArgC;
+	*--usr_sp = Base;
+	
+	// Drop to user code
+	Log_Debug("Proc", "Proc_int_DropToUser(%p, %p)", Entrypoint, usr_sp);
+	Proc_int_DropToUser(Entrypoint, (Uint32)usr_sp);
 }
 
-void Proc_StartUser(Uint Entrypoint, Uint *Bases, int ArgC, char **ArgV, char **EnvP, int DataSize)
+void Proc_ClearThread(tThread *Thread)
 {
+	Log_Warning("Proc", "TODO: Nuke address space etc");
+}
+
+tTID Proc_Clone(Uint Flags)
+{
+	tThread	*new;
+	Uint32	pc, sp, mem;
+
+	new = Threads_CloneTCB(Flags);
+	if(!new)	return -1;
+
+	// Actual clone magic
+	pc = Proc_CloneInt(&sp, &mem);
+	if(pc == 0) {
+		Log("Proc_Clone: In child");
+		return 0;
+	}
+	
+	new->SavedState.IP = pc;
+	new->SavedState.SP = sp;
+	new->SavedState.UserSP = Proc_int_SwapUserSP(0);
+	new->SavedState.UserIP = Proc_GetCurThread()->SavedState.UserIP;
+	new->MemState.Base = mem;
+
+	Threads_AddActive(new);
+
+	return new->TID;
 }
 
 tTID Proc_SpawnWorker( void (*Fnc)(void*), void *Ptr )
 {
-	return -1;
+	tThread	*new;
+	Uint32	sp;
+
+	new = Threads_CloneThreadZero();
+	if(!new)	return -1;
+	if(new->ThreadName)	free(new->ThreadName);
+	new->ThreadName = NULL;
+
+	new->KernelStack = MM_NewKStack(1);
+	if(!new->KernelStack) {
+		// TODO: Delete thread
+		Log_Error("Proc", "Unable to allocate kernel stack");
+		return -1;
+	}	
+
+	sp = new->KernelStack;
+	
+	*(Uint32*)(sp -= 4) = (Uint)Ptr;
+	*(Uint32*)(sp -= 4) = (Uint)Fnc;
+	*(Uint32*)(sp -= 4) = (Uint)new;
+
+	new->SavedState.SP = sp;
+	new->SavedState.IP = (Uint)KernelThreadHeader;
+
+	Threads_AddActive(new);
+
+	return new->TID;
 }
 
 tTID Proc_NewKThread( void (*Fnc)(void*), void *Ptr )
@@ -73,9 +161,12 @@ tTID Proc_NewKThread( void (*Fnc)(void*), void *Ptr )
 	tThread	*new;
 	Uint32	sp;
 
-	new = Threads_CloneTCB(NULL, 0);
+	new = Threads_CloneTCB(0);
 	if(!new)	return -1;
+	free(new->ThreadName);
+	new->ThreadName = NULL;
 
+	// TODO: Non-shared stack
 	new->KernelStack = MM_NewKStack(1);
 	if(!new->KernelStack) {
 		// TODO: Delete thread
@@ -85,10 +176,9 @@ tTID Proc_NewKThread( void (*Fnc)(void*), void *Ptr )
 
 	sp = new->KernelStack;
 	
-	*(Uint32*)(sp -= 4) = (Uint)new;
-	*(Uint32*)(sp -= 4) = (Uint)Fnc;
-	*(Uint32*)(sp -= 4) = 1;
 	*(Uint32*)(sp -= 4) = (Uint)Ptr;
+	*(Uint32*)(sp -= 4) = (Uint)Fnc;
+	*(Uint32*)(sp -= 4) = (Uint)new;
 
 	new->SavedState.SP = sp;
 	new->SavedState.IP = (Uint)KernelThreadHeader;
@@ -113,10 +203,16 @@ void Proc_Reschedule(void)
 	if(!next)	next = gpIdleThread;
 	if(!next || next == cur)	return;
 
-	Log("Switching to %p (%i) IP=%p SP=%p", next, next->TID, next->SavedState.IP, next->SavedState.SP);
+	Log("Switching to %p (%i %s) IP=%p SP=%p TTBR0=%p UsrSP=%p",
+		next, next->TID, next->ThreadName,
+		next->SavedState.IP, next->SavedState.SP, next->MemState.Base,
+		next->SavedState.UserSP
+		);
+	Log("Requested by %p", __builtin_return_address(0));
 	
 	gpCurrentThread = next;
-	// TODO: Change kernel stack?
+
+	cur->SavedState.UserSP = Proc_int_SwapUserSP( next->SavedState.UserSP );
 
 	SwitchTask(
 		next->SavedState.SP, &cur->SavedState.SP,