3 * - By John Hodge (thePowersGang)
6 * - ARM7 Process Switching
9 #include <threads_int.h>
13 extern tThread gThreadZero;
14 extern tProcess gProcessZero;
15 extern void SwitchTask(Uint32 NewSP, Uint32 *OldSP, Uint32 NewIP, Uint32 *OldIP, Uint32 MemPtr);
16 extern void KernelThreadHeader(void); // Actually takes args on stack
17 extern void Proc_int_DropToUser(Uint32 IP, Uint32 SP) NORETURN __attribute__((long_call));
18 extern Uint32 Proc_int_SwapUserSP(Uint32 NewSP);
19 extern Uint32 Proc_CloneInt(Uint32 *SP, Uint32 *MemPtr, bool ClearUser);
20 extern tVAddr MM_NewKStack(int bGlobal); // TODO: Move out into a header
21 extern tVAddr MM_NewUserStack(void);
22 extern char kernel_table0[];
25 void Proc_IdleThread(void *unused);
28 tThread *gpCurrentThread = &gThreadZero;
29 tThread *gpIdleThread = NULL;
32 void ArchThreads_Init(void)
34 gProcessZero.MemState.Base = (tPAddr)&kernel_table0 - KERNEL_BASE;
37 void Proc_IdleThread(void *unused)
39 Threads_SetPriority(gpIdleThread, -1);
42 __asm__ __volatile__ ("wfi");
50 tid = Proc_NewKThread( Proc_IdleThread, NULL );
51 gpIdleThread = Threads_GetThread(tid);
52 gpIdleThread->ThreadName = (char*)"Idle Thread";
60 tThread *Proc_GetCurThread(void)
62 return gpCurrentThread;
65 void Proc_StartUser(Uint Entrypoint, Uint Base, int ArgC, const char **ArgV, int DataSize)
71 // Log_Debug("Proc", "Proc_StartUser: (Entrypoint=%p, Base=%p, ArgC=%i, ArgV=%p, DataSize=0x%x)",
72 // Entrypoint, Base, ArgC, ArgV, DataSize);
74 // Write data to the user's stack
75 Uint32 *usr_sp = (void*)MM_NewUserStack();
77 Log_KernelPanic("Proc", "Creation of user stack failed");
79 usr_sp -= (DataSize+3)/4;
80 memcpy(usr_sp, ArgV, DataSize);
83 // Adjust user's copy of the arguments
84 delta = (tVAddr)usr_sp - (tVAddr)ArgV;
86 for(i = 0; ArgV[i]; i ++) ArgV[i] += delta;
88 for(i = 0; envp[i]; i ++) envp[i] += delta;
90 *--usr_sp = (Uint32)envp;
91 *--usr_sp = (Uint32)ArgV;
92 *--usr_sp = (Uint32)ArgC;
96 Log_Debug("Proc", "Proc_int_DropToUser(%p, %p)", Entrypoint, usr_sp);
97 Proc_int_DropToUser(Entrypoint, (Uint32)usr_sp);
100 void Proc_ClearProcess(tProcess *Process)
102 Log_Warning("Proc", "TODO: Nuke address space etc");
105 void Proc_ClearThread(tThread *Thread)
109 tTID Proc_Clone(Uint Flags)
114 new = Threads_CloneTCB(Flags);
117 // Actual clone magic
118 pc = Proc_CloneInt(&sp, &mem, (Flags & CLONE_NOUSER ? 1 : 0));
120 Log("Proc_Clone: In child");
124 new->SavedState.IP = pc;
125 new->SavedState.SP = sp;
126 new->SavedState.UserSP = Proc_int_SwapUserSP(0);
127 new->SavedState.UserIP = Proc_GetCurThread()->SavedState.UserIP;
128 new->Process->MemState.Base = mem;
130 Threads_AddActive(new);
135 tThread *Proc_SpawnWorker( void (*Fnc)(void*), void *Ptr )
140 new = Threads_CloneThreadZero();
141 if(!new) return NULL;
142 if(new->ThreadName) free(new->ThreadName);
143 new->ThreadName = NULL;
145 new->KernelStack = MM_NewKStack(1);
146 if(!new->KernelStack) {
147 // TODO: Delete thread
148 Log_Error("Proc", "Unable to allocate kernel stack");
152 sp = new->KernelStack;
154 *(Uint32*)(sp -= 4) = (Uint)Ptr;
155 *(Uint32*)(sp -= 4) = (Uint)Fnc;
156 *(Uint32*)(sp -= 4) = (Uint)new;
158 new->SavedState.SP = sp;
159 new->SavedState.IP = (Uint)KernelThreadHeader;
161 Threads_AddActive(new);
166 tTID Proc_NewKThread( void (*Fnc)(void*), void *Ptr )
171 new = Threads_CloneTCB(0);
173 free(new->ThreadName);
174 new->ThreadName = NULL;
176 // TODO: Non-shared stack
177 new->KernelStack = MM_NewKStack(1);
178 if(!new->KernelStack) {
179 // TODO: Delete thread
180 Log_Error("Proc", "Unable to allocate kernel stack");
184 sp = new->KernelStack;
186 *(Uint32*)(sp -= 4) = (Uint)Ptr;
187 *(Uint32*)(sp -= 4) = (Uint)Fnc;
188 *(Uint32*)(sp -= 4) = (Uint)new;
190 new->SavedState.SP = sp;
191 new->SavedState.IP = (Uint)KernelThreadHeader;
193 Threads_AddActive(new);
198 void Proc_CallFaultHandler(tThread *Thread)
203 void Proc_Reschedule(void)
207 cur = gpCurrentThread;
209 next = Threads_GetNextToRun(0, cur);
210 if(!next) next = gpIdleThread;
211 if(!next || next == cur) return;
213 // Log("Switching to %p (%i %s) IP=%p SP=%p TTBR0=%p UsrSP=%p",
214 // next, next->TID, next->ThreadName,
215 // next->SavedState.IP, next->SavedState.SP, next->Process->MemState.Base,
216 // next->SavedState.UserSP
218 // Log("Requested by %p", __builtin_return_address(0));
220 gpCurrentThread = next;
222 cur->SavedState.UserSP = Proc_int_SwapUserSP( next->SavedState.UserSP );
225 next->SavedState.SP, &cur->SavedState.SP,
226 next->SavedState.IP, &cur->SavedState.IP,
227 next->Process->MemState.Base
232 void Proc_DumpThreadCPUState(tThread *Thread)