Merge branch 'master' of git://git.ucc.asn.au/tpg/acess2
[tpg/acess2.git] / KernelLand / Modules / USB / Core / usb_devinit.c
1 /*
2  * Acess 2 USB Stack
3  * - By John Hodge (thePowersGang)
4  *
5  * usb_devinit.c
6  * - USB Device Initialisation
7  */
8 #define DEBUG   1
9 #include <acess.h>
10 #include <vfs.h>
11 #include <drv_pci.h>
12 #include "usb.h"
13 #include "usb_proto.h"
14 #include "usb_lowlevel.h"
15
16 #define DUMP_DESCRIPTORS        0
17
18 // === PROTOTYPES ===
19 void    USB_DeviceConnected(tUSBHub *Hub, int Port);
20 void    USB_DeviceDisconnected(tUSBHub *Hub, int Port);
21 void    *USB_GetDeviceDataPtr(tUSBInterface *Dev);
22 void    USB_SetDeviceDataPtr(tUSBInterface *Dev, void *Ptr);
23  int    USB_int_AllocateAddress(tUSBHost *Host);
24
25 // === CODE ===
26 void USB_DeviceConnected(tUSBHub *Hub, int Port)
27 {
28         tUSBDevice      tmpdev;
29         tUSBDevice      *dev = &tmpdev;
30         if( Port >= Hub->nPorts )       return ;
31         if( Hub->Devices[Port] )        return ;
32
33         ENTER("pHub iPort", Hub, Port);
34
35         // Device should be in 'Default' state
36         
37         // Create structure
38         dev->ParentHub = Hub;
39         dev->Host = Hub->Interface->Dev->Host;
40         dev->Address = 0;
41
42         // 1. Assign an address
43         dev->Address = USB_int_AllocateAddress(dev->Host);
44         if(dev->Address == 0) {
45                 Log_Error("USB", "No addresses avaliable on host %p", dev->Host);
46                 free(dev);
47                 LEAVE('-');
48                 return ;
49         }
50         USB_int_SendSetupSetAddress(dev->Host, dev->Address);
51         LOG("Assigned address %i", dev->Address);
52         
53         // 2. Get device information
54         {
55                 struct sDescriptor_Device       desc;
56                 LOG("Getting device descriptor");
57                 // Endpoint 0, Desc Type 1, Index 0
58                 USB_int_ReadDescriptor(dev, 0, 1, 0, sizeof(desc), &desc);
59
60                 #if DUMP_DESCRIPTORS            
61                 LOG("Device Descriptor = {");
62                 LOG(" .Length = %i", desc.Length);
63                 LOG(" .Type = %i", desc.Type);
64                 LOG(" .USBVersion = 0x%04x", desc.USBVersion);
65                 LOG(" .DeviceClass = 0x%02x", desc.DeviceClass);
66                 LOG(" .DeviceSubClass = 0x%02x", desc.DeviceSubClass);
67                 LOG(" .DeviceProtocol = 0x%02x", desc.DeviceProtocol);
68                 LOG(" .MaxPacketSize = 0x%02x", desc.MaxPacketSize);
69                 LOG(" .VendorID = 0x%04x", desc.VendorID);
70                 LOG(" .ProductID = 0x%04x", desc.ProductID);
71                 LOG(" .DeviceID = 0x%04x", desc.DeviceID);
72                 LOG(" .ManufacturerStr = Str %i", desc.ManufacturerStr);
73                 LOG(" .ProductStr = Str %i", desc.ProductStr);
74                 LOG(" .SerialNumberStr = Str %i", desc.SerialNumberStr);
75                 LOG(" .NumConfigurations = %i", desc.SerialNumberStr);
76                 LOG("}");
77         
78                 #if DEBUG       
79                 if( desc.ManufacturerStr )
80                 {
81                         char    *tmp = USB_int_GetDeviceString(dev, 0, desc.ManufacturerStr);
82                         if( tmp ) {
83                                 LOG("ManufacturerStr = '%s'", tmp);
84                                 free(tmp);
85                         }
86                 }
87                 if( desc.ProductStr )
88                 {
89                         char    *tmp = USB_int_GetDeviceString(dev, 0, desc.ProductStr);
90                         if( tmp ) {
91                                 LOG("ProductStr = '%s'", tmp);
92                                 free(tmp);
93                         }
94                 }
95                 if( desc.SerialNumberStr )
96                 {
97                         char    *tmp = USB_int_GetDeviceString(dev, 0, desc.SerialNumberStr);
98                         if( tmp ) {
99                                 LOG("SerialNumbertStr = '%s'", tmp);
100                                 free(tmp);
101                         }
102                 }
103                 #endif
104                 #endif
105         }
106
107         // TODO: Support alternate configurations
108         
109         // 3. Get configurations
110         for( int i = 0; i < 1; i ++ )
111         {
112                 struct sDescriptor_Configuration        desc;
113                 Uint8   *full_buf;
114                 size_t  ptr_ofs = 0;
115                 size_t  total_length;
116         
117                 USB_int_ReadDescriptor(dev, 0, 2, i, sizeof(desc), &desc);
118                 #if DUMP_DESCRIPTORS
119                 LOG("Configuration Descriptor %i = {", i);
120                 LOG(" .Length = %i", desc.Length);
121                 LOG(" .Type = %i", desc.Type);
122                 LOG(" .TotalLength = 0x%x", LittleEndian16(desc.TotalLength));
123                 LOG(" .NumInterfaces = %i", desc.NumInterfaces);
124                 LOG(" .ConfigurationValue = %i", desc.ConfigurationValue);
125                 LOG(" .ConfigurationStr = %i", desc.ConfigurationStr);
126                 LOG(" .AttributesBmp = 0b%b", desc.AttributesBmp);
127                 LOG(" .MaxPower = %i (*2mA)", desc.MaxPower);
128                 LOG("}");
129                 if( desc.ConfigurationStr ) {
130                         char    *tmp = USB_int_GetDeviceString(dev, 0, desc.ConfigurationStr);
131                         LOG("ConfigurationStr = '%s'", tmp);
132                         free(tmp);
133                 }
134                 #endif
135
136                 // TODO: Split here and allow some method of selection
137
138                 // Allocate device now that we have the configuration
139                 dev = malloc(sizeof(tUSBDevice) + desc.NumInterfaces * sizeof(void*));
140                 memcpy(dev, &tmpdev, sizeof(tUSBDevice));
141                 dev->nInterfaces = desc.NumInterfaces;
142         
143                 // Allocate a temp buffer for config info
144                 total_length = LittleEndian16(desc.TotalLength);
145                 full_buf = malloc( total_length );
146                 USB_int_ReadDescriptor(dev, 0, 2, i, total_length, full_buf);
147
148                 ptr_ofs += desc.Length;
149
150                 // TODO: Interfaces
151                 for( int j = 0; ptr_ofs < total_length && j < desc.NumInterfaces; j ++ )
152                 {
153                         struct sDescriptor_Interface *iface;
154                         tUSBInterface   *dev_if;
155                         size_t  iface_base_ofs;
156
157                         iface = (void*)(full_buf + ptr_ofs);
158                         if( iface->Length == 0 ) {
159                                 Log_Warning("USB", "Bad USB descriptor (length = 0)");
160                                 break ;
161                         }
162                         ptr_ofs += iface->Length;
163                         if( ptr_ofs > total_length ) {
164                                 // Sanity fail
165                                 break;
166                         }
167                         iface_base_ofs = ptr_ofs;
168                         // Check type
169                         if( iface->Type != 4 ) {
170                                 LOG("Not an interface (type = %i)", iface->Type);
171                                 j --;   // Counteract j++ in loop
172                                 continue ;
173                         }
174
175                         #if DUMP_DESCRIPTORS
176                         LOG("Interface %i/%i = {", i, j);
177                         LOG(" .InterfaceNum = %i", iface->InterfaceNum);
178                         LOG(" .NumEndpoints = %i", iface->NumEndpoints);
179                         LOG(" .InterfaceClass = 0x%x", iface->InterfaceClass);
180                         LOG(" .InterfaceSubClass = 0x%x", iface->InterfaceSubClass);
181                         LOG(" .InterfaceProcol = 0x%x", iface->InterfaceProtocol);
182                         # if DEBUG      
183                         if( iface->InterfaceStr ) {
184                                 char    *tmp = USB_int_GetDeviceString(dev, 0, iface->InterfaceStr);
185                                 LOG(" .InterfaceStr = %i '%s'", iface->InterfaceStr, tmp);
186                                 free(tmp);
187                         }
188                         # endif
189                         LOG("}");
190                         #endif
191
192                         dev_if = malloc(sizeof(tUSBInterface) + iface->NumEndpoints*sizeof(dev_if->Endpoints[0]));
193                         dev_if->Dev = dev;
194                         dev_if->Driver = NULL;
195                         dev_if->Data = NULL;
196                         dev_if->nEndpoints = iface->NumEndpoints;
197                         dev->Interfaces[j] = dev_if;
198
199                         // Copy interface data
200                         for( int k = 0; ptr_ofs < total_length && k < iface->NumEndpoints; k ++ )
201                         {
202                                 struct sDescriptor_Endpoint *endpt;
203                                 
204                                 endpt = (void*)(full_buf + ptr_ofs);
205                                 ptr_ofs += endpt->Length;
206                                 if( ptr_ofs > total_length ) {
207                                         // Sanity fail
208                                         break;
209                                 }
210
211                                 // Check type
212                                 if( endpt->Type != 5 ) {
213                                         // Oops?
214                                         LOG("Not endpoint, Type = %i", endpt->Type);
215                                         k --;
216                                         continue ;
217                                 }
218
219                                 LOG("Endpoint %i/%i/%i = {", i, j, k);
220                                 LOG(" .Address = 0x%2x", endpt->Address);
221                                 LOG(" .Attributes = 0b%8b", endpt->Attributes);
222                                 LOG(" .MaxPacketSize = %i", LittleEndian16(endpt->MaxPacketSize));
223                                 LOG(" .PollingInterval = %i", endpt->PollingInterval);
224                                 LOG("}");
225                                 
226                                 dev_if->Endpoints[k].Next = NULL;
227                                 dev_if->Endpoints[k].Interface = dev_if;
228                                 dev_if->Endpoints[k].EndpointIdx = k;
229                                 dev_if->Endpoints[k].EndpointNum = endpt->Address & 0x7F;
230                                 dev_if->Endpoints[k].PollingPeriod = endpt->PollingInterval;
231                                 dev_if->Endpoints[k].MaxPacketSize = LittleEndian16(endpt->MaxPacketSize);
232                                 dev_if->Endpoints[k].Type = endpt->Attributes | (endpt->Address & 0x80);
233                                 dev_if->Endpoints[k].PollingAtoms = 0;
234                                 dev_if->Endpoints[k].InputData = NULL;
235                         }
236                         
237                         // Initialise driver
238                         dev_if->Driver = USB_int_FindDriverByClass(
239                                  ((int)iface->InterfaceClass << 16)
240                                 |((int)iface->InterfaceSubClass << 8)
241                                 |((int)iface->InterfaceProtocol << 0)
242                                 );
243                         if(!dev_if->Driver) {
244                                 Log_Notice("USB", "No driver for Class %02x:%02x:%02x",
245                                         iface->InterfaceClass, iface->InterfaceSubClass, iface->InterfaceProtocol
246                                         );
247                         }
248                         else {
249                                 dev_if->Driver->Connected(
250                                         dev_if,
251                                         full_buf + iface_base_ofs, ptr_ofs - iface_base_ofs
252                                         );
253                         //      dev_if->Driver->Connected( dev_if );
254                         }
255                 }
256                 
257                 free(full_buf);
258         }
259
260         // Done.
261         LEAVE('-');
262 }
263
264 void USB_DeviceDisconnected(tUSBHub *Hub, int Port)
265 {
266         
267 }
268
269 void *USB_GetDeviceDataPtr(tUSBInterface *Dev) { return Dev->Data; }
270 void USB_SetDeviceDataPtr(tUSBInterface *Dev, void *Ptr) { Dev->Data = Ptr; }
271
272 int USB_int_AllocateAddress(tUSBHost *Host)
273 {
274          int    i;
275         for( i = 1; i < 128; i ++ )
276         {
277                 if(Host->AddressBitmap[i/8] & (1 << (i%8)))
278                         continue ;
279                 Host->AddressBitmap[i/8] |= 1 << (i%8);
280                 return i;
281         }
282         return 0;
283 }
284
285 void USB_int_DeallocateAddress(tUSBHost *Host, int Address)
286 {
287         Host->AddressBitmap[Address/8] &= ~(1 << (Address%8));
288 }
289

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