Kernel/armv7 - Task switching now supported
[tpg/acess2.git] / Kernel / arch / armv7 / proc.c
1 /*
2  * Acess2
3  * - By John Hodge (thePowersGang)
4  *
5  * arch/arm7/proc.c
6  * - ARM7 Process Switching
7  */
8 #include <acess.h>
9 #include <threads_int.h>
10 #include <hal_proc.h>
11
12 // === IMPORTS ===
13 extern tThread  gThreadZero;
14 extern void     SwitchTask(Uint32 NewSP, Uint32 *OldSP, Uint32 NewIP, Uint32 *OldIP, Uint32 MemPtr);
15 extern void     KernelThreadHeader(void);       // Actually takes args on stack
16 extern tVAddr   MM_NewKStack(int bGlobal);      // TODO: Move out into a header
17
18 // === PROTOTYPES ===
19 void    Proc_IdleThread(void *unused);
20 tTID    Proc_NewKThread(void (*Fnc)(void*), void *Ptr);
21
22 // === GLOBALS ===
23 tThread *gpCurrentThread = &gThreadZero;
24 tThread *gpIdleThread = NULL;
25
26 // === CODE ===
27 void ArchThreads_Init(void)
28 {
29 }
30
31 void Proc_IdleThread(void *unused)
32 {
33         for(;;) {
34                 __asm__ __volatile__ ("wfi");
35                 Proc_Reschedule();
36         }
37 }
38
39 void Proc_Start(void)
40 {
41         tTID    tid;
42
43         tid = Proc_NewKThread( Proc_IdleThread, NULL );
44         gpIdleThread = Threads_GetThread(tid);
45 }
46
47 int GetCPUNum(void)
48 {
49         return 0;
50 }
51
52 tThread *Proc_GetCurThread(void)
53 {
54         return gpCurrentThread;
55 }
56
57 tTID Proc_Clone(Uint Flags)
58 {
59         return -1;
60 }
61
62 void Proc_StartUser(Uint Entrypoint, Uint *Bases, int ArgC, char **ArgV, char **EnvP, int DataSize)
63 {
64 }
65
66 tTID Proc_SpawnWorker( void (*Fnc)(void*), void *Ptr )
67 {
68         return -1;
69 }
70
71 tTID Proc_NewKThread( void (*Fnc)(void*), void *Ptr )
72 {
73         tThread *new;
74         Uint32  sp;
75
76         new = Threads_CloneTCB(NULL, 0);
77         if(!new)        return -1;
78
79         new->KernelStack = MM_NewKStack(1);
80         if(!new->KernelStack) {
81                 // TODO: Delete thread
82                 Log_Error("Proc", "Unable to allocate kernel stack");
83                 return -1;
84         }       
85
86         sp = new->KernelStack;
87         
88         *(Uint32*)(sp -= 4) = (Uint)new;
89         *(Uint32*)(sp -= 4) = (Uint)Fnc;
90         *(Uint32*)(sp -= 4) = 1;
91         *(Uint32*)(sp -= 4) = (Uint)Ptr;
92
93         new->SavedState.SP = sp;
94         new->SavedState.IP = (Uint)KernelThreadHeader;
95
96         Threads_AddActive(new);
97
98         return new->TID;
99 }
100
101 void Proc_CallFaultHandler(tThread *Thread)
102 {
103
104 }
105
106 void Proc_Reschedule(void)
107 {
108         tThread *cur, *next;
109
110         cur = gpCurrentThread;
111
112         next = Threads_GetNextToRun(0, cur);
113         if(!next)       next = gpIdleThread;
114         if(!next || next == cur)        return;
115
116         Log("Switching to %p (%i) IP=%p SP=%p", next, next->TID, next->SavedState.IP, next->SavedState.SP);
117         
118         gpCurrentThread = next;
119         // TODO: Change kernel stack?
120
121         SwitchTask(
122                 next->SavedState.SP, &cur->SavedState.SP,
123                 next->SavedState.IP, &cur->SavedState.IP,
124                 next->MemState.Base
125                 );
126         
127 }
128
129 void Proc_DumpThreadCPUState(tThread *Thread)
130 {
131         
132 }
133

UCC git Repository :: git.ucc.asn.au