Kernel/armv7 - Added IRQ stack, changed IRQs to be disabled until after handling
[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         Threads_SetPriority(gpIdleThread, -1);
34         Threads_SetName("Idle Thread");
35         for(;;) {
36                 __asm__ __volatile__ ("wfi");
37                 Proc_Reschedule();
38         }
39 }
40
41 void Proc_Start(void)
42 {
43         tTID    tid;
44
45         tid = Proc_NewKThread( Proc_IdleThread, NULL );
46         gpIdleThread = Threads_GetThread(tid);
47 }
48
49 int GetCPUNum(void)
50 {
51         return 0;
52 }
53
54 tThread *Proc_GetCurThread(void)
55 {
56         return gpCurrentThread;
57 }
58
59 tTID Proc_Clone(Uint Flags)
60 {
61         return -1;
62 }
63
64 void Proc_StartUser(Uint Entrypoint, Uint *Bases, int ArgC, char **ArgV, char **EnvP, int DataSize)
65 {
66 }
67
68 tTID Proc_SpawnWorker( void (*Fnc)(void*), void *Ptr )
69 {
70         tThread *new;
71         Uint32  sp;
72
73         new = Threads_CloneTCB(NULL, 0);
74         if(!new)        return -1;
75
76         new->KernelStack = MM_NewKStack(1);
77         if(!new->KernelStack) {
78                 // TODO: Delete thread
79                 Log_Error("Proc", "Unable to allocate kernel stack");
80                 return -1;
81         }       
82
83         sp = new->KernelStack;
84         
85         *(Uint32*)(sp -= 4) = (Uint)Ptr;
86         *(Uint32*)(sp -= 4) = 1;
87         *(Uint32*)(sp -= 4) = (Uint)Fnc;
88         *(Uint32*)(sp -= 4) = (Uint)new;
89
90         new->SavedState.SP = sp;
91         new->SavedState.IP = (Uint)KernelThreadHeader;
92
93         Threads_AddActive(new);
94
95         return new->TID;
96 }
97
98 tTID Proc_NewKThread( void (*Fnc)(void*), void *Ptr )
99 {
100         tThread *new;
101         Uint32  sp;
102
103         new = Threads_CloneTCB(NULL, 0);
104         if(!new)        return -1;
105
106         // TODO: Non-shared stack
107         new->KernelStack = MM_NewKStack(1);
108         if(!new->KernelStack) {
109                 // TODO: Delete thread
110                 Log_Error("Proc", "Unable to allocate kernel stack");
111                 return -1;
112         }       
113
114         sp = new->KernelStack;
115         
116         *(Uint32*)(sp -= 4) = (Uint)Ptr;
117         *(Uint32*)(sp -= 4) = 1;
118         *(Uint32*)(sp -= 4) = (Uint)Fnc;
119         *(Uint32*)(sp -= 4) = (Uint)new;
120
121         new->SavedState.SP = sp;
122         new->SavedState.IP = (Uint)KernelThreadHeader;
123
124         Threads_AddActive(new);
125
126         return new->TID;
127 }
128
129 void Proc_CallFaultHandler(tThread *Thread)
130 {
131
132 }
133
134 void Proc_Reschedule(void)
135 {
136         tThread *cur, *next;
137
138         cur = gpCurrentThread;
139
140         next = Threads_GetNextToRun(0, cur);
141         if(!next)       next = gpIdleThread;
142         if(!next || next == cur)        return;
143
144         Log("Switching to %p (%i %s) IP=%p SP=%p", next, next->TID, next->ThreadName, next->SavedState.IP, next->SavedState.SP);
145         Log("Requested by %p", __builtin_return_address(0));
146         
147         gpCurrentThread = next;
148         // TODO: Change kernel stack?
149
150         SwitchTask(
151                 next->SavedState.SP, &cur->SavedState.SP,
152                 next->SavedState.IP, &cur->SavedState.IP,
153                 next->MemState.Base
154                 );
155         
156 }
157
158 void Proc_DumpThreadCPUState(tThread *Thread)
159 {
160         
161 }
162

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