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