VM8086 Support, Starting on VESA Driver
[tpg/acess2.git] / Kernel / arch / x86 / proc.c
index 018b563..b2f7f8f 100644 (file)
 
 // === CONSTANTS ===
 #define        SWITCH_MAGIC    0xFFFACE55      // There is no code in this area
+// Base is 1193182
 #define TIMER_DIVISOR  11931   //~100Hz
 
 // === IMPORTS ===
 extern tGDT    gGDT[];
+extern void APStartup();       // 16-bit AP startup code
 extern Uint    GetEIP();       // start.asm
 extern Uint32  gaInitPageDir[1024];    // start.asm
 extern void    Kernel_Stack_Top;
@@ -38,21 +40,27 @@ extern void Isr7();
 
 // === PROTOTYPES ===
 void   ArchThreads_Init();
+#if USE_MP
+void   MP_StartAP(int CPU);
+void   MP_SendIPI(Uint8 APICID, int Vector, int DeliveryMode);
+#endif
+void   Proc_Start();
 tThread        *Proc_GetCurThread();
 void   Proc_ChangeStack();
  int   Proc_Clone(Uint *Err, Uint Flags);
+void   Proc_StartProcess(Uint16 SS, Uint Stack, Uint Flags, Uint16 CS, Uint IP);
 void   Proc_Scheduler();
 
 // === GLOBALS ===
-// --- Current State ---
-#if USE_MP
-tThread        *gCurrentThread[MAX_CPUS] = {NULL};
-#else
-tThread        *gCurrentThread = NULL;
-#endif
 // --- Multiprocessing ---
 #if USE_MP
+volatile int   giNumInitingCPUs = 0;
 tMPInfo        *gMPFloatPtr = NULL;
+tAPIC  *gpMP_LocalAPIC = NULL;
+Uint8  gaAPIC_to_CPU[256] = {0};
+tCPU   gaCPUs[MAX_CPUS];
+#else
+tThread        *gCurrentThread = NULL;
 #endif
 #if USE_PAE
 Uint32 *gPML4s[4] = NULL;
@@ -79,6 +87,9 @@ void ArchThreads_Init()
        #if USE_MP
        tMPTable        *mptable;
        
+       // Mark BSP as active
+       gaCPUs[0].State = 2;
+       
        // -- Initialise Multiprocessing
        // Find MP Floating Table
        // - EBDA/Last 1Kib (640KiB)
@@ -116,6 +127,8 @@ void ArchThreads_Init()
        // If the MP Table Exists, parse it
        if(gMPFloatPtr)
        {
+                int    i;
+               tMPTable_Ent    *ents;
                Log("gMPFloatPtr = %p", gMPFloatPtr);
                Log("*gMPFloatPtr = {");
                Log("\t.Sig = 0x%08x", gMPFloatPtr->Sig);
@@ -139,8 +152,107 @@ void ArchThreads_Init()
                Log("\t.Checksum = 0x%02x", mptable->Checksum);
                Log("\t.OEMID = '%8c'", mptable->OemID);
                Log("\t.ProductID = '%8c'", mptable->ProductID);
+               Log("\t.OEMTablePtr = %p'", mptable->OEMTablePtr);
+               Log("\t.OEMTableSize = 0x%04x", mptable->OEMTableSize);
+               Log("\t.EntryCount = 0x%04x", mptable->EntryCount);
+               Log("\t.LocalAPICMemMap = 0x%08x", mptable->LocalAPICMemMap);
+               Log("\t.ExtendedTableLen = 0x%04x", mptable->ExtendedTableLen);
+               Log("\t.ExtendedTableChecksum = 0x%02x", mptable->ExtendedTableChecksum);
                Log("}");
                
+               gpMP_LocalAPIC = (void*)MM_MapHWPage(mptable->LocalAPICMemMap, 1);
+               
+               ents = mptable->Entries;
+               giNumCPUs = 0;
+               
+               for( i = 0; i < mptable->EntryCount; i ++ )
+               {
+                        int    entSize = 0;
+                       switch( ents->Type )
+                       {
+                       case 0: // Processor
+                               entSize = 20;
+                               Log("%i: Processor", i);
+                               Log("\t.APICID = %i", ents->Proc.APICID);
+                               Log("\t.APICVer = 0x%02x", ents->Proc.APICVer);
+                               Log("\t.CPUFlags = 0x%02x", ents->Proc.CPUFlags);
+                               Log("\t.CPUSignature = 0x%08x", ents->Proc.CPUSignature);
+                               Log("\t.FeatureFlags = 0x%08x", ents->Proc.FeatureFlags);
+                               
+                               
+                               if( !(ents->Proc.CPUFlags & 1) ) {
+                                       Log("DISABLED");
+                                       break;
+                               }
+                               
+                               // Check if there is too many processors
+                               if(giNumCPUs >= MAX_CPUS) {
+                                       giNumCPUs ++;   // If `giNumCPUs` > MAX_CPUS later, it will be clipped
+                                       break;
+                               }
+                               
+                               // Initialise CPU Info
+                               gaAPIC_to_CPU[ents->Proc.APICID] = giNumCPUs;
+                               gaCPUs[giNumCPUs].APICID = ents->Proc.APICID;
+                               gaCPUs[giNumCPUs].State = 0;
+                               giNumCPUs ++;
+                               
+                               // Send IPI
+                               if( !(ents->Proc.CPUFlags & 2) )
+                               {
+                                       MP_StartAP( giNumCPUs-1 );
+                               }
+                               
+                               break;
+                       case 1: // Bus
+                               entSize = 8;
+                               Log("%i: Bus", i);
+                               Log("\t.ID = %i", ents->Bus.ID);
+                               Log("\t.TypeString = '%6c'", ents->Bus.TypeString);
+                               break;
+                       case 2: // I/O APIC
+                               entSize = 8;
+                               Log("%i: I/O APIC", i);
+                               Log("\t.ID = %i", ents->IOAPIC.ID);
+                               Log("\t.Version = 0x%02x", ents->IOAPIC.Version);
+                               Log("\t.Flags = 0x%02x", ents->IOAPIC.Flags);
+                               Log("\t.Addr = 0x%08x", ents->IOAPIC.Addr);
+                               break;
+                       case 3: // I/O Interrupt Assignment
+                               entSize = 8;
+                               Log("%i: I/O Interrupt Assignment", i);
+                               Log("\t.IntType = %i", ents->IOInt.IntType);
+                               Log("\t.Flags = 0x%04x", ents->IOInt.Flags);
+                               Log("\t.SourceBusID = 0x%02x", ents->IOInt.SourceBusID);
+                               Log("\t.SourceBusIRQ = 0x%02x", ents->IOInt.SourceBusIRQ);
+                               Log("\t.DestAPICID = 0x%02x", ents->IOInt.DestAPICID);
+                               Log("\t.DestAPICIRQ = 0x%02x", ents->IOInt.DestAPICIRQ);
+                               break;
+                       case 4: // Local Interrupt Assignment
+                               entSize = 8;
+                               Log("%i: Local Interrupt Assignment", i);
+                               Log("\t.IntType = %i", ents->LocalInt.IntType);
+                               Log("\t.Flags = 0x%04x", ents->LocalInt.Flags);
+                               Log("\t.SourceBusID = 0x%02x", ents->LocalInt.SourceBusID);
+                               Log("\t.SourceBusIRQ = 0x%02x", ents->LocalInt.SourceBusIRQ);
+                               Log("\t.DestLocalAPICID = 0x%02x", ents->LocalInt.DestLocalAPICID);
+                               Log("\t.DestLocalAPICIRQ = 0x%02x", ents->LocalInt.DestLocalAPICIRQ);
+                               break;
+                       default:
+                               Log("%i: Unknown (%i)", i, ents->Type);
+                               break;
+                       }
+                       ents = (void*)( (Uint)ents + entSize );
+               }
+               
+               if( giNumCPUs > MAX_CPUS ) {
+                       Warning("Too many CPUs detected (%i), only using %i of them", giNumCPUs, MAX_CPUS);
+                       giNumCPUs = MAX_CPUS;
+               }
+       
+               while( giNumInitingCPUs )
+                       MM_FinishVirtualInit();
+               
                Panic("Uh oh... MP Table Parsing is unimplemented\n");
        }
        else {
@@ -151,6 +263,7 @@ void ArchThreads_Init()
        #else
        giNumCPUs = 1;
        gTSSs = &gTSS0;
+       MM_FinishVirtualInit();
        #endif
        
        // Initialise Double Fault TSS
@@ -176,12 +289,6 @@ void ArchThreads_Init()
                gGDT[6+pos].BaseLow = ((Uint)(&gTSSs[pos])) & 0xFFFF;
                gGDT[6+pos].BaseMid = ((Uint)(&gTSSs[pos])) >> 16;
                gGDT[6+pos].BaseHi = ((Uint)(&gTSSs[pos])) >> 24;
-               /*
-               gGDT[6+pos].LimitLow = sizeof(tTSS);
-               gGDT[6+pos].LimitHi = 0;
-               gGDT[6+pos].Access = 0x89;      // Type
-               gGDT[6+pos].Flags = 0x4;
-               */
        #if USE_MP
        }
        for(pos=0;pos<giNumCPUs;pos++) {
@@ -192,7 +299,7 @@ void ArchThreads_Init()
        #endif
        
        #if USE_MP
-       gCurrentThread[0] = &gThreadZero;
+       gaCPUs[0].Current = &gThreadZero;
        #else
        gCurrentThread = &gThreadZero;
        #endif
@@ -217,6 +324,34 @@ void ArchThreads_Init()
        Proc_ChangeStack();
 }
 
+#if USE_MP
+void MP_StartAP(int CPU)
+{
+       Log("Starting AP %i (APIC %i)", CPU, gaCPUs[CPU].APICID);
+       // Set location of AP startup code and mark for a warm restart
+       *(Uint16*)(KERNEL_BASE|0x467) = (Uint)&APStartup - (KERNEL_BASE|0xFFFF0);
+       *(Uint16*)(KERNEL_BASE|0x469) = 0xFFFF;
+       outb(0x70, 0x0F);       outb(0x71, 0x0A);       // Warm Reset
+       MP_SendIPI(gaCPUs[CPU].APICID, 0, 5);
+       giNumInitingCPUs ++;
+}
+
+void MP_SendIPI(Uint8 APICID, int Vector, int DeliveryMode)
+{
+       Uint32  addr = (Uint)gpMP_LocalAPIC + 0x300;
+       Uint32  val;
+       
+       // Hi
+       val = (Uint)APICID << 24;
+       Log("*%p = 0x%08x", addr+0x10, val);
+       *(Uint32*)(addr+0x10) = val;
+       // Low (and send)
+       val = ((DeliveryMode & 7) << 8) | (Vector & 0xFF);
+       Log("*%p = 0x%08x", addr, val);
+       *(Uint32*)addr = val;
+}
+#endif
+
 /**
  * \fn void Proc_Start()
  * \brief Start process scheduler
@@ -234,7 +369,7 @@ void Proc_Start()
 tThread *Proc_GetCurThread()
 {
        #if USE_MP
-       return NULL;
+       return gaCPUs[ gaAPIC_to_CPU[gpMP_LocalAPIC->ID.Val&0xFF] ].Current;
        #else
        return gCurrentThread;
        #endif
@@ -468,13 +603,18 @@ void Proc_StartUser(Uint Entrypoint, Uint *Bases, int ArgC, char **ArgV, char **
        while(*Bases)
                *--stack = *Bases++;
        *--stack = 0;   // Return Address
-       delta = (Uint)stack;    // Reuse delta to save SP
        
-       *--stack = ss;          //Stack Segment
-       *--stack = delta;       //Stack Pointer
-       *--stack = 0x0202;      //EFLAGS (Resvd (0x2) and IF (0x20))
-       *--stack = cs;          //Code Segment
-       *--stack = Entrypoint;  //EIP
+       Proc_StartProcess(ss, (Uint)stack, 0x202, cs, Entrypoint);
+}
+
+void Proc_StartProcess(Uint16 SS, Uint Stack, Uint Flags, Uint16 CS, Uint IP)
+{
+       Uint    *stack = (void*)Stack;
+       *--stack = SS;          //Stack Segment
+       *--stack = Stack;       //Stack Pointer
+       *--stack = Flags;       //EFLAGS (Resvd (0x2) and IF (0x20))
+       *--stack = CS;          //Code Segment
+       *--stack = IP;  //EIP
        //PUSHAD
        *--stack = 0xAAAAAAAA;  // eax
        *--stack = 0xCCCCCCCC;  // ecx
@@ -485,10 +625,10 @@ void Proc_StartUser(Uint Entrypoint, Uint *Bases, int ArgC, char **ArgV, char **
        *--stack = 0x51515151;  // esi
        *--stack = 0xB4B4B4B4;  // ebp
        //Individual PUSHs
-       *--stack = ss;  // ds
-       *--stack = ss;  // es
-       *--stack = ss;  // fs
-       *--stack = ss;  // gs
+       *--stack = SS;  // ds
+       *--stack = SS;  // es
+       *--stack = SS;  // fs
+       *--stack = SS;  // gs
        
        __asm__ __volatile__ (
        "mov %%eax,%%esp;\n\t"  // Set stack pointer
@@ -567,9 +707,9 @@ void Proc_Scheduler(int CPU)
        
        // Get current thread
        #if USE_MP
-       thread = gCurrentThread[CPU];
+       thread = gaCPUs[CPU].Current;
        #else
-       curThread = gCurrentThread;
+       thread = gCurrentThread;
        #endif
        
        // Reduce remaining quantum and continue timeslice if non-zero
@@ -607,13 +747,13 @@ void Proc_Scheduler(int CPU)
        
        // Set current thread
        #if USE_MP
-       gCurrentThread[CPU] = thread;
+       gaCPUs[CPU].Current = thread;
        #else
        gCurrentThread = thread;
        #endif
        
        // Update Kernel Stack pointer
-       gTSSs[CPU].ESP0 = thread->KernelStack;
+       gTSSs[CPU].ESP0 = thread->KernelStack-4;
        
        // Set address space
        #if USE_PAE

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