Modules/EHCI - Debug output, nowhere near usable yet
[tpg/acess2.git] / KernelLand / Modules / USB / EHCI / ehci.c
index d2e048b..645e142 100644 (file)
@@ -12,6 +12,7 @@
 #include <usb_host.h>
 #include "ehci.h"
 #include <drv_pci.h>
+#include <limits.h>
 
 // === CONSTANTS ===
 #define EHCI_MAX_CONTROLLERS   4
@@ -23,9 +24,9 @@
 void   EHCI_InterruptHandler(int IRQ, void *Ptr);
 // -- API ---
 void   *EHCI_InitInterrupt(void *Ptr, int Endpoint, int bInput, int Period, tUSBHostCb Cb, void *CbData, void *Buf, size_t Length);
-void   *EHCI_InitIsoch  (void *Ptr, int Endpoint);
-void   *EHCI_InitControl(void *Ptr, int Endpoint);
-void   *EHCI_InitBulk   (void *Ptr, int Endpoint);
+void   *EHCI_InitIsoch  (void *Ptr, int Endpoint, size_t MaxPacketSize);
+void   *EHCI_InitControl(void *Ptr, int Endpoint, size_t MaxPacketSize);
+void   *EHCI_InitBulk   (void *Ptr, int Endpoint, size_t MaxPacketSize);
 void   EHCI_RemEndpoint(void *Ptr, void *Handle);
 void   *EHCI_SendControl(void *Ptr, void *Dest, tUSBHostCb Cb, void *CbData,
        int isOutbound,
@@ -34,6 +35,13 @@ void *EHCI_SendControl(void *Ptr, void *Dest, tUSBHostCb Cb, void *CbData,
        void *InData, size_t InLength
        );
 void   *EHCI_SendBulk(void *Ptr, void *Dest, tUSBHostCb Cb, void *CbData, int Dir, void *Data, size_t Length);
+void   EHCI_FreeOp(void *Ptr, void *Handle);
+// --- Internals ---
+tEHCI_qTD      *EHCI_int_AllocateTD(tEHCI_Controller *Cont, int PID, void *Data, size_t Length, tUSBHostCb Cb, void *CbData);
+void   EHCI_int_DeallocateTD(tEHCI_Controller *Cont, tEHCI_qTD *TD);
+void   EHCI_int_AppendTD(tEHCI_QH *QH, tEHCI_qTD *TD);
+tEHCI_QH       *EHCI_int_AllocateQH(tEHCI_Controller *Cont, int Endpoint, size_t MaxPacketSize);
+void   EHCI_int_DeallocateQH(tEHCI_Controller *Cont, tEHCI_QH *QH);
 
 // === GLOBALS ===
 MODULE_DEFINE(0, VERSION, USB_EHCI, EHCI_Initialise, NULL, "USB_Core", NULL);
@@ -46,7 +54,7 @@ tUSBHostDef   gEHCI_HostDef = {
        .SendIsoch   = NULL,
        .SendControl = EHCI_SendControl,
        .SendBulk    = EHCI_SendBulk,
-       .FreeOp      = NULL
+       .FreeOp      = EHCI_FreeOp
        };
 
 // === CODE ===
@@ -63,10 +71,16 @@ int EHCI_Initialise(char **Arguments)
                        // TODO: The same
                }
 
-               if( EHCI_InitController(addr, irq) ) {
+               Log_Log("ECHI", "Controller at PCI %i 0x%x IRQ 0x%x",
+                       id, addr, irq);
+
+               if( EHCI_InitController(addr, irq) )
+               {
                        // TODO: Detect other forms of failure than "out of slots"
                        break ;
                }
+
+               // TODO: Register with the USB stack
        }
        return 0;
 }
@@ -91,6 +105,7 @@ int EHCI_InitController(tPAddr BaseAddress, Uint8 InterruptNum)
        }
 
        if(!cont) {
+               Log_Notice("EHCI", "Too many controllers (EHCI_MAX_CONTROLLERS=%i)", EHCI_MAX_CONTROLLERS);
                return 1;
        }
 
@@ -101,6 +116,7 @@ int EHCI_InitController(tPAddr BaseAddress, Uint8 InterruptNum)
        // - Allocate periodic queue
        cont->PeriodicQueue = (void*)MM_AllocDMA(1, 32, NULL);
        // TODO: Error check
+       //  > Populate queue
 
        // -- Bind IRQ --
        IRQ_AddHandler(InterruptNum, EHCI_InterruptHandler, cont);
@@ -129,6 +145,14 @@ void EHCI_InterruptHandler(int IRQ, void *Ptr)
        // Clear interrupts
        cont->OpRegs->USBSts = sts;     
 
+       if( sts & 0xFFFF0FC0 ) {
+               LOG("Oops, reserved bits set (%08x), funny hardware?", sts);
+               sts &= ~0xFFFF0FFC0;
+       }
+
+       // Unmask read-only bits
+       sts &= ~(0xF000);
+
        if( sts & USBINTR_IOC ) {
                // IOC
                sts &= ~USBINTR_IOC;
@@ -136,48 +160,212 @@ void EHCI_InterruptHandler(int IRQ, void *Ptr)
 
        if( sts & USBINTR_PortChange ) {
                // Port change, determine what port and poke helper thread
+               LOG("Port status change");
                sts &= ~USBINTR_PortChange;
        }
        
        if( sts & USBINTR_FrameRollover ) {
                // Frame rollover, used to aid timing (trigger per-second operations)
+               LOG("Frame rollover");
                sts &= ~USBINTR_FrameRollover;
        }
 
        if( sts ) {
                // Unhandled interupt bits
                // TODO: Warn
+               LOG("WARN - Bitmask %x unhandled", sts);
        }
+
+
 }
 
 // --------------------------------------------------------------------
 // USB API
 // --------------------------------------------------------------------
-void *EHCI_InitInterrupt(void *Ptr, int Endpoint, int bInput, int Period,
+void *EHCI_InitInterrupt(void *Ptr, int Endpoint, int bOutbound, int Period,
        tUSBHostCb Cb, void *CbData, void *Buf, size_t Length)
 {
+       tEHCI_Controller        *Cont = Ptr;
+        int    pow2period, period_pow;
        
+       if( Endpoint >= 256*16 )
+               return NULL;
+       if( Period <= 0 )
+               return NULL;
+       if( Period > 256 )
+               Period = 256;
+
+       // Round the period to the closest power of two
+       pow2period = 1;
+       period_pow = 0;
+       // - Find the first power above the period
+       while( pow2period < Period )
+       {
+               pow2period *= 2;
+               period_pow ++;
+       }
+       // - Check which is closest
+       if( Period - pow2period / 2 > pow2period - Period )
+               Period = pow2period;
+       else {
+               Period = pow2period/2;
+               period_pow --;
+       }
+       
+       // Allocate a QH
+       tEHCI_QH *qh = EHCI_int_AllocateQH(Cont, Endpoint, Length);
+       qh->Impl.IntPeriodPow = period_pow;
+
+       // Choose an interrupt slot to use      
+       int minslot = 0, minslot_load = INT_MAX;
+       for( int slot = 0; slot < Period; slot ++ )
+       {
+                int    load = 0;
+               for( int i = 0; i < PERIODIC_SIZE; i += Period )
+                       load += Cont->InterruptLoad[i+slot];
+               if( load == 0 ) break;
+               if( load < minslot_load ) {
+                       minslot = slot;
+                       minslot_load = load;
+               }
+       }
+       // Increase loading on the selected slot
+       for( int i = 0; i < PERIODIC_SIZE; i += Period )
+               Cont->InterruptLoad[i+minslot] += Length;
+       qh->Impl.IntOfs = minslot;
+
+       // Allocate TD for the data
+       tEHCI_qTD *td = EHCI_int_AllocateTD(Cont, (bOutbound ? PID_OUT : PID_IN), Buf, Length, Cb, CbData);
+       EHCI_int_AppendTD(qh, td);
+
+       // Insert into the periodic list
+
+       return qh;
 }
 
-void *EHCI_InitIsoch(void *Ptr, int Endpoint)
+void *EHCI_InitIsoch(void *Ptr, int Endpoint, size_t MaxPacketSize)
 {
-       return NULL;
+       return (void*)(tVAddr)(Endpoint + 1);
 }
-void *EHCI_InitControl(void *Ptr, int Endpoint)
+void *EHCI_InitControl(void *Ptr, int Endpoint, size_t MaxPacketSize)
 {
-       return NULL;
+       tEHCI_Controller *Cont = Ptr;
+       
+       // Allocate a QH
+       tEHCI_QH *qh = EHCI_int_AllocateQH(Cont, Endpoint, MaxPacketSize);
+
+       // Append to async list 
+       if( Cont->LastAsyncHead ) {
+               Cont->LastAsyncHead->HLink = MM_GetPhysAddr(qh)|2;
+               Cont->LastAsyncHead->Impl.Next = qh;
+       }
+       else
+               Cont->OpRegs->AsyncListAddr = MM_GetPhysAddr(qh)|2;
+       Cont->LastAsyncHead = qh;
+
+       return qh;
 }
-void *EHCI_InitBulk(void *Ptr, int Endpoint)
+void *EHCI_InitBulk(void *Ptr, int Endpoint, size_t MaxPacketSize)
 {
-       return NULL;
+       return EHCI_InitControl(Ptr, Endpoint, MaxPacketSize);
 }
-void   EHCI_RemEndpoint(void *Ptr, void *Handle);
-void   *EHCI_SendControl(void *Ptr, void *Dest, tUSBHostCb Cb, void *CbData,
+void EHCI_RemEndpoint(void *Ptr, void *Handle)
+{
+       if( Handle == NULL )
+               return ;
+       else if( (tVAddr)Handle <= 256*16 )
+               return ;        // Isoch
+       else {
+               // Remove QH from list
+               // - If it's a polling endpoint, need to remove from all periodic lists
+               
+               // Deallocate QH
+               EHCI_int_DeallocateQH(Ptr, Handle);
+       }
+}
+
+void *EHCI_SendControl(void *Ptr, void *Dest, tUSBHostCb Cb, void *CbData,
        int isOutbound,
        const void *SetupData, size_t SetupLength,
        const void *OutData, size_t OutLength,
        void *InData, size_t InLength
-       );
-void   *EHCI_SendBulk(void *Ptr, void *Dest, tUSBHostCb Cb, void *CbData, int Dir, void *Data, size_t Length);
+       )
+{
+       tEHCI_Controller *Cont = Ptr;
+       tEHCI_qTD       *td_setup, *td_data, *td_status;
 
+       // Sanity checks
+       if( (tVAddr)Dest <= 256*16 )
+               return NULL;
+
+       // Check size of SETUP and status
+       
+       // Allocate TDs
+       td_setup = EHCI_int_AllocateTD(Cont, PID_SETUP, (void*)SetupData, SetupLength, NULL, NULL);
+       if( isOutbound )
+       {
+               td_data = EHCI_int_AllocateTD(Cont, PID_OUT, (void*)OutData, OutLength, NULL, NULL);
+               td_status = EHCI_int_AllocateTD(Cont, PID_IN, InData, InLength, Cb, CbData);
+       }
+       else
+       {
+               td_data = EHCI_int_AllocateTD(Cont, PID_IN, InData, InLength, NULL, NULL);
+               td_status = EHCI_int_AllocateTD(Cont, PID_OUT, (void*)OutData, OutLength, Cb, CbData);
+       }
+
+       // Append TDs
+       EHCI_int_AppendTD(Dest, td_setup);
+       EHCI_int_AppendTD(Dest, td_data);
+       EHCI_int_AppendTD(Dest, td_status);
+
+       return td_status;
+}
+
+void *EHCI_SendBulk(void *Ptr, void *Dest, tUSBHostCb Cb, void *CbData, int Dir, void *Data, size_t Length)
+{
+       tEHCI_Controller        *Cont = Ptr;
+       
+       // Sanity check the pointer
+       // - Can't be NULL or an isoch
+       if( (tVAddr)Dest <= 256*16 )
+               return NULL;
+       
+       // Allocate single TD
+       tEHCI_qTD       *td = EHCI_int_AllocateTD(Cont, (Dir ? PID_OUT : PID_IN), Data, Length, Cb, CbData);
+       EHCI_int_AppendTD(Dest, td);    
+
+       return td;
+}
+
+void EHCI_FreeOp(void *Ptr, void *Handle)
+{
+       tEHCI_Controller        *Cont = Ptr;
+
+       EHCI_int_DeallocateTD(Cont, Handle);
+}
+
+// --------------------------------------------------------------------
+// Internals
+// --------------------------------------------------------------------
+tEHCI_qTD *EHCI_int_AllocateTD(tEHCI_Controller *Cont, int PID, void *Data, size_t Length, tUSBHostCb Cb, void *CbData)
+{
+       return NULL;
+}
+
+void EHCI_int_DeallocateTD(tEHCI_Controller *Cont, tEHCI_qTD *TD)
+{
+}
+
+void EHCI_int_AppendTD(tEHCI_QH *QH, tEHCI_qTD *TD)
+{
+}
+
+tEHCI_QH *EHCI_int_AllocateQH(tEHCI_Controller *Cont, int Endpoint, size_t MaxPacketSize)
+{
+       return NULL;
+}
+
+void EHCI_int_DeallocateQH(tEHCI_Controller *Cont, tEHCI_QH *QH)
+{
+}
 

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