Kernel/armv7 - Renamed to reduce confusion
[tpg/acess2.git] / Kernel / arch / armv7 / proc.c
1 /*
2  * Acess2
3  * - By John Hodge (thePowersGang)
4  *
5  * arch/arm7/proc.
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
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                 Proc_Reschedule();
35 }
36
37 void Proc_Start(void)
38 {
39         tTID    tid;
40
41         tid = Proc_NewKThread( Proc_IdleThread, NULL );
42         gpIdleThread = Threads_GetThread(tid);
43 }
44
45 int GetCPUNum(void)
46 {
47         return 0;
48 }
49
50 tThread *Proc_GetCurThread(void)
51 {
52         return gpCurrentThread;
53 }
54
55 tTID Proc_Clone(Uint Flags)
56 {
57         return -1;
58 }
59
60 void Proc_StartUser(Uint Entrypoint, Uint *Bases, int ArgC, char **ArgV, char **EnvP, int DataSize)
61 {
62 }
63
64 tTID Proc_SpawnWorker( void (*Fnc)(void*), void *Ptr )
65 {
66         return -1;
67 }
68
69 tTID Proc_NewKThread( void (*Fnc)(void*), void *Ptr )
70 {
71         tThread *new;
72         Uint32  sp;
73
74         new = Threads_CloneTCB(NULL, 0);
75         if(!new)        return -1;
76
77         new->KernelStack = MM_NewKStack(0);
78         if(!new->KernelStack) {
79                 // TODO: Delete thread
80                 return -1;
81         }       
82
83         sp = new->KernelStack;
84         
85         *(Uint32*)(sp -= 4) = (Uint)new;
86         *(Uint32*)(sp -= 4) = (Uint)Fnc;
87         *(Uint32*)(sp -= 4) = 1;
88         *(Uint32*)(sp -= 4) = (Uint)Ptr;
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 void Proc_CallFaultHandler(tThread *Thread)
99 {
100
101 }
102
103 void Proc_Reschedule(void)
104 {
105         tThread *cur, *next;
106
107         cur = gpCurrentThread;
108
109         next = Threads_GetNextToRun(0, cur);
110         if(!next)       next = gpIdleThread;
111         if(!next || next == cur)        return;
112         
113         SwitchTask(
114                 next->SavedState.SP, &cur->SavedState.SP,
115                 next->SavedState.IP, &cur->SavedState.IP,
116                 next->MemState.Base
117                 );
118         
119 }
120
121 void Proc_DumpThreadCPUState(tThread *Thread)
122 {
123         
124 }
125

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