Ho Hum
[usb-driver] / usb-driver.c
1 #if defined(__GNUC__) && !defined(__STRICT_ANSI__)
2
3 #define _GNU_SOURCE 1
4
5 #if defined(RTLD_NEXT)
6 #define REAL_LIBC RTLD_NEXT
7 #else
8 #define REAL_LIBC ((void *) -1L)
9 #endif
10
11 #include <dlfcn.h>
12 #include <stdarg.h>
13 #include <stdlib.h>
14 #include <string.h>
15 #include <unistd.h>
16 #include <fcntl.h>
17 #include <sys/types.h>
18 #include <sys/stat.h>
19 #include <sys/time.h>
20 #include <stdio.h>
21 #include <usb.h>
22 #include <signal.h>
23 #include "xilinx.h"
24
25 static int (*ioctl_func) (int, int, void *) = NULL;
26 static int windrvrfd = 0;
27 static struct usb_bus *busses = NULL;
28 static struct usb_device *usbdevice;
29 static usb_dev_handle *usb_devhandle = NULL;
30 static unsigned long card_type;
31 static int ints_enabled = 0;
32
33 #define NO_WINDRVR 1
34
35 void hexdump(unsigned char *buf, int len);
36 void diff(unsigned char *buf1, unsigned char *buf2, int len);
37
38 //unique: 94, bytes: 276, options: 0
39 //Vendor: 3fd
40 //12 01 00 02 00 00 00 40 fd 03 08 00 00 00 01 02 12 01 00 02 00 00 00 40 fd 03 08 00 00 00 01 02
41 //00 01 00 00 00 00 00 00 40 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 40 00 00 00 00 00 00 00
42 //03 00 00 00 00 00 00 00 38 45 21 08 38 45 21 08 03 00 00 00 00 00 00 00 38 45 21 08 38 45 21 08
43 //4c 45 21 08 00 00 00 00 00 00 00 00 00 00 00 00 4c 45 21 08 00 00 00 00 00 00 00 00 00 00 00 00
44 //00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
45 //00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
46 //00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
47 //00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
48 //00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
49 //00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
50 //00 00 00 00 00 00 00 00 09 02 20 00 01 02 00 80 00 00 00 00 00 00 00 00 09 02 20 00 01 02 00 80
51 //8c 00 00 00 01 00 00 00 4c 45 21 08 58 45 21 08 8c 00 00 00 01 00 00 00 4c 45 21 08 58 45 21 08
52 //01 00 00 00 58 45 21 08 09 04 00 00 02 ff 00 00 01 00 00 00 58 45 21 08 09 04 00 00 02 ff 00 00
53 //00 00 00 00 6c 45 21 08 7c 45 21 08 07 05 02 02 00 00 00 00 6c 45 21 08 7c 45 21 08 07 05 02 02
54 //00 02 00 00 07 05 86 02 00 02 00 00 02 00 00 00 00 02 00 00 07 05 86 02 00 02 00 00 02 00 00 00
55 //00 02 00 00 02 00 00 00 02 00 00 00 00 00 00 00 00 02 00 00 02 00 00 00 02 00 00 00 00 00 00 00
56 //86 00 00 00 00 02 00 00 02 00 00 00 01 00 00 00 86 00 00 00 00 02 00 00 02 00 00 00 01 00 00 00
57 //00 00 00 00 00 00 00 00
58 int usb_deviceinfo(unsigned char *buf) {
59 int i,j,k,l;
60 int len = 0;
61 WDU_CONFIGURATION **pConfigs, **pActiveConfig;
62 WDU_INTERFACE **pActiveInterface;
63
64 if (buf) {
65 struct usb_device_info *udi = (struct usb_device_info*)(buf+len);
66
67 udi->Descriptor.bLength = sizeof(WDU_DEVICE_DESCRIPTOR);
68 udi->Descriptor.bDescriptorType = usbdevice->descriptor.bDescriptorType;
69 udi->Descriptor.bcdUSB = usbdevice->descriptor.bcdUSB;
70 udi->Descriptor.bDeviceClass = usbdevice->descriptor.bDeviceClass;
71 udi->Descriptor.bDeviceSubClass = usbdevice->descriptor.bDeviceSubClass;
72 udi->Descriptor.bDeviceProtocol = usbdevice->descriptor.bDeviceProtocol;
73 udi->Descriptor.bMaxPacketSize0 = usbdevice->descriptor.bMaxPacketSize0;
74 udi->Descriptor.idVendor = usbdevice->descriptor.idVendor;
75 udi->Descriptor.idProduct = usbdevice->descriptor.idProduct;
76 udi->Descriptor.bcdDevice = usbdevice->descriptor.bcdDevice;
77 udi->Descriptor.iManufacturer = usbdevice->descriptor.iManufacturer;
78 udi->Descriptor.iProduct = usbdevice->descriptor.iProduct;
79 udi->Descriptor.iSerialNumber = usbdevice->descriptor.iSerialNumber;
80 udi->Descriptor.bNumConfigurations = usbdevice->descriptor.bNumConfigurations;
81
82 /* TODO: Fix Pipe0! */
83 udi->Pipe0.dwNumber = 0x00;
84 udi->Pipe0.dwMaximumPacketSize = usbdevice->descriptor.bMaxPacketSize0;
85 udi->Pipe0.type = 0;
86 udi->Pipe0.direction = 3;
87 udi->Pipe0.dwInterval = 0;
88
89 pConfigs = &(udi->pConfigs);
90 pActiveConfig = &(udi->pActiveConfig);
91 pActiveInterface = &(udi->pActiveInterface[0]);
92 }
93
94 len = sizeof(struct usb_device_info);
95
96 for (i=0; i<usbdevice->descriptor.bNumConfigurations; i++)
97 {
98 struct usb_config_descriptor *conf_desc = &usbdevice->config[i];
99 WDU_INTERFACE **pInterfaces;
100 WDU_ALTERNATE_SETTING **pAlternateSettings[conf_desc->bNumInterfaces];
101 WDU_ALTERNATE_SETTING **pActiveAltSetting[conf_desc->bNumInterfaces];
102
103 if (buf) {
104 WDU_CONFIGURATION *cfg = (WDU_CONFIGURATION*)(buf+len);
105
106 *pConfigs = cfg;
107 *pActiveConfig = cfg;
108
109 cfg->Descriptor.bLength = conf_desc->bLength;
110 cfg->Descriptor.bDescriptorType = conf_desc->bDescriptorType;
111 cfg->Descriptor.wTotalLength = conf_desc->wTotalLength;
112 cfg->Descriptor.bNumInterfaces = conf_desc->bNumInterfaces;
113 cfg->Descriptor.bConfigurationValue = conf_desc->bConfigurationValue;
114 cfg->Descriptor.iConfiguration = conf_desc->iConfiguration;
115 cfg->Descriptor.bmAttributes = conf_desc->bmAttributes;
116 cfg->Descriptor.MaxPower = conf_desc->MaxPower;
117
118 cfg->dwNumInterfaces = conf_desc->bNumInterfaces;
119
120 pInterfaces = &(cfg->pInterfaces);
121 }
122 len += sizeof(WDU_CONFIGURATION);
123
124 if (buf) {
125 *pInterfaces = (WDU_INTERFACE*)(buf+len);
126 for (j=0; j<conf_desc->bNumInterfaces; j++) {
127 WDU_INTERFACE *iface = (WDU_INTERFACE*)(buf+len);
128
129 pActiveInterface[j] = iface;
130
131 pAlternateSettings[j] = &(iface->pAlternateSettings);
132 iface->dwNumAltSettings = usbdevice->config[i].interface[j].num_altsetting;
133 pActiveAltSetting[j] = &(iface->pActiveAltSetting);
134
135 len += sizeof(WDU_INTERFACE);
136 }
137 } else {
138 len += sizeof(WDU_INTERFACE) * conf_desc->bNumInterfaces;
139 }
140
141 for (j=0; j<conf_desc->bNumInterfaces; j++)
142 {
143 struct usb_interface *interface = &usbdevice->config[i].interface[j];
144
145 if (buf) {
146 *pAlternateSettings[j] = (WDU_ALTERNATE_SETTING*)(buf+len);
147 /* FIXME: */
148 *pActiveAltSetting[j] = (WDU_ALTERNATE_SETTING*)(buf+len);
149 }
150
151 for(k=0; k<interface->num_altsetting; k++)
152 {
153 unsigned char bNumEndpoints = interface->altsetting[k].bNumEndpoints;
154 WDU_ENDPOINT_DESCRIPTOR **pEndpointDescriptors;
155 WDU_PIPE_INFO **pPipes;
156
157 if (buf) {
158 WDU_ALTERNATE_SETTING *altset = (WDU_ALTERNATE_SETTING*)(buf+len);
159
160 altset->Descriptor.bLength = interface->altsetting[k].bLength;
161 altset->Descriptor.bDescriptorType = interface->altsetting[k].bDescriptorType;
162 altset->Descriptor.bInterfaceNumber = interface->altsetting[k].bInterfaceNumber;
163 altset->Descriptor.bAlternateSetting = interface->altsetting[k].bAlternateSetting;
164 altset->Descriptor.bNumEndpoints = interface->altsetting[k].bNumEndpoints;
165 altset->Descriptor.bInterfaceClass = interface->altsetting[k].bInterfaceClass;
166 altset->Descriptor.bInterfaceSubClass = interface->altsetting[k].bInterfaceSubClass;
167 altset->Descriptor.bInterfaceProtocol = interface->altsetting[k].bInterfaceProtocol;
168 altset->Descriptor.iInterface = interface->altsetting[k].iInterface;
169 pEndpointDescriptors = &(altset->pEndpointDescriptors);
170 pPipes = &(altset->pPipes);
171
172 }
173 len +=sizeof(WDU_ALTERNATE_SETTING);
174
175 if (buf) {
176 *pEndpointDescriptors = (WDU_ENDPOINT_DESCRIPTOR*)(buf+len);
177 for (l = 0; l < bNumEndpoints; l++) {
178 WDU_ENDPOINT_DESCRIPTOR *ed = (WDU_ENDPOINT_DESCRIPTOR*)(buf+len);
179
180 ed->bLength = interface->altsetting[k].endpoint[l].bLength;
181 ed->bDescriptorType = interface->altsetting[k].endpoint[l].bDescriptorType;
182 ed->bEndpointAddress = interface->altsetting[k].endpoint[l].bEndpointAddress;
183 ed->bmAttributes = interface->altsetting[k].endpoint[l].bmAttributes;
184 ed->wMaxPacketSize = interface->altsetting[k].endpoint[l].wMaxPacketSize;
185 ed->bInterval = interface->altsetting[k].endpoint[l].bInterval;
186
187 len += sizeof(WDU_ENDPOINT_DESCRIPTOR);
188 }
189
190 *pPipes = (WDU_PIPE_INFO*)(buf+len);
191 for (l = 0; l < bNumEndpoints; l++) {
192 WDU_PIPE_INFO *pi = (WDU_PIPE_INFO*)(buf+len);
193
194 pi->dwNumber = interface->altsetting[k].endpoint[l].bEndpointAddress;
195 pi->dwMaximumPacketSize = WDU_GET_MAX_PACKET_SIZE(interface->altsetting[k].endpoint[l].wMaxPacketSize);
196 pi->type = interface->altsetting[k].endpoint[l].bmAttributes & USB_ENDPOINT_TYPE_MASK;
197 if (pi->type == PIPE_TYPE_CONTROL)
198 pi->direction = WDU_DIR_IN_OUT;
199 else
200 {
201 pi->direction = interface->altsetting[k].endpoint[l].bEndpointAddress & USB_ENDPOINT_DIR_MASK ? WDU_DIR_IN : WDU_DIR_OUT;
202 }
203
204 pi->dwInterval = interface->altsetting[k].endpoint[l].bInterval;
205
206 len += sizeof(WDU_PIPE_INFO);
207 }
208 } else {
209 len +=(sizeof(WDU_ENDPOINT_DESCRIPTOR)+sizeof(WDU_PIPE_INFO))*bNumEndpoints;
210 }
211 }
212 }
213 }
214
215 return len;
216 }
217
218 int do_wdioctl(int fd, unsigned int request, unsigned char *wdioctl) {
219 struct header_struct* wdheader = (struct header_struct*)wdioctl;
220 struct version_struct *version;
221 int ret = 0;
222
223 if (wdheader->magic != MAGIC) {
224 fprintf(stderr,"!!!ERROR: magic header does not match!!!\n");
225 return (*ioctl_func) (fd, request, wdioctl);
226 }
227
228 switch(request) {
229 case VERSION:
230 version = (struct version_struct*)(wdheader->data);
231 strcpy(version->version, "WinDriver no more");
232 version->versionul = 999;
233 fprintf(stderr,"faking VERSION\n");
234 break;
235
236 case LICENSE:
237 fprintf(stderr,"faking LICENSE\n");
238 break;
239
240 case CARD_REGISTER:
241 {
242 //struct card_register* cr = (struct card_register*)(wdheader->data);
243 /* Todo: LPT-Port already in use */
244 }
245 fprintf(stderr,"faking CARD_REGISTER\n");
246 break;
247
248 case USB_TRANSFER:
249 fprintf(stderr,"in USB_TRANSFER");
250 {
251 struct usb_transfer *ut = (struct usb_transfer*)(wdheader->data);
252 int requesttype, request, value, index, size;
253
254 fprintf(stderr," unique: %lu, pipe: %lu, read: %lu, options: %lx, size: %lu, timeout: %lx\n", ut->dwUniqueID, ut->dwPipeNum, ut->fRead, ut->dwOptions, ut->dwBufferSize, ut->dwTimeout);
255 fprintf(stderr,"setup packet: ");
256 hexdump(ut->SetupPacket, 8);
257 fprintf(stderr,"\n");
258 if (!ut->fRead && ut->dwBufferSize)
259 {
260 hexdump(ut->pBuffer, ut->dwBufferSize);
261 fprintf(stderr,"\n");
262 }
263
264 #ifndef NO_WINDRVR
265 ret = (*ioctl_func) (fd, request, wdioctl);
266 #else
267 /* http://www.jungo.com/support/documentation/windriver/802/wdusb_man_mhtml/node55.html#SECTION001213000000000000000 */
268 requesttype = ut->SetupPacket[0];
269 request = ut->SetupPacket[1];
270 value = ut->SetupPacket[2] | (ut->SetupPacket[3] << 8);
271 index = ut->SetupPacket[4] | (ut->SetupPacket[5] << 8);
272 size = ut->SetupPacket[6] | (ut->SetupPacket[7] << 8);
273 fprintf(stderr, "requesttype: %x, request: %x, value: %u, index: %u, size: %u\n", requesttype, request, value, index, size);
274 ret = usb_control_msg(usb_devhandle, requesttype, request, value, index, ut->pBuffer, size, ut->dwTimeout);
275 if (ret < 0) {
276 fprintf(stderr, "usb_control_msg: %d\n", ret);
277 } else {
278 ut->dwBytesTransferred = ret;
279 ret = 0;
280 }
281
282 #endif
283
284 fprintf(stderr,"Transferred: %lu (%s)\n",ut->dwBytesTransferred, (ut->fRead?"read":"write"));
285 if (ut->fRead && ut->dwBytesTransferred)
286 {
287 fprintf(stderr,"Read: ");
288 hexdump(ut->pBuffer, ut->dwBytesTransferred);
289 fprintf(stderr,"\n");
290 }
291 }
292 break;
293
294 case INT_ENABLE:
295 fprintf(stderr,"INT_ENABLE\n");
296 {
297 struct interrupt *it = (struct interrupt*)(wdheader->data);
298
299 fprintf(stderr,"Handle: %lu, Options: %lx, ncmds: %lu, enableok: %lu, count: %lu, lost: %lu, stopped: %lu\n", it->hInterrupt, it->dwOptions, it->dwCmds, it->fEnableOk, it->dwCounter, it->dwLost, it->fStopped);
300
301 it->fEnableOk = 1;
302 ints_enabled = 1;
303 //ret = (*ioctl_func) (fd, request, wdioctl);
304 }
305
306 break;
307
308 case INT_DISABLE:
309 fprintf(stderr,"INT_DISABLE\n");
310 {
311 struct interrupt *it = (struct interrupt*)(wdheader->data);
312
313 fprintf(stderr,"Handle: %lu, Options: %lx, ncmds: %lu, enableok: %lu, count: %lu, lost: %lu, stopped: %lu\n", it->hInterrupt, it->dwOptions, it->dwCmds, it->fEnableOk, it->dwCounter, it->dwLost, it->fStopped);
314 #ifndef NO_WINDRVR
315 ret = (*ioctl_func) (fd, request, wdioctl);
316 #else
317 it->dwCounter = 0;
318 it->fStopped = 1;
319 ints_enabled = 0;
320 #endif
321 fprintf(stderr,"Handle: %lu, Options: %lx, ncmds: %lu, enableok: %lu, count: %lu, lost: %lu, stopped: %lu\n", it->hInterrupt, it->dwOptions, it->dwCmds, it->fEnableOk, it->dwCounter, it->dwLost, it->fStopped);
322 }
323 break;
324
325 case USB_SET_INTERFACE:
326 fprintf(stderr,"USB_SET_INTERFACE\n");
327 {
328 struct usb_set_interface *usi = (struct usb_set_interface*)(wdheader->data);
329
330 fprintf(stderr,"unique: %lu, interfacenum: %lu, alternatesetting: %lu, options: %lx\n", usi->dwUniqueID, usi->dwInterfaceNum, usi->dwAlternateSetting, usi->dwOptions);
331 #ifndef NO_WINDRVR
332 ret = (*ioctl_func) (fd, request, wdioctl);
333 #else
334 if (usbdevice) {
335 if (!usb_devhandle)
336 usb_devhandle = usb_open(usbdevice);
337
338 /* FIXME: Select right interface! */
339 ret = usb_claim_interface(usb_devhandle, usbdevice->config[0].interface[usi->dwInterfaceNum].altsetting[usi->dwAlternateSetting].bInterfaceNumber);
340 if (!ret) {
341 //ret = usb_set_configuration(usb_devhandle, usbdevice->config[0].bConfigurationValue);
342 if(!ret) {
343 ret = usb_set_altinterface(usb_devhandle, usi->dwAlternateSetting);
344 if (ret)
345 fprintf(stderr, "usb_set_altinterface: %d\n", ret);
346 } else {
347 fprintf(stderr, "usb_set_configuration: %d (%s)\n", ret, usb_strerror());
348 }
349 } else {
350 fprintf(stderr, "usb_claim_interface: %d -> %d (%s)\n", usbdevice->config[0].interface[usi->dwInterfaceNum].altsetting[usi->dwAlternateSetting].bInterfaceNumber, ret, usb_strerror());
351 }
352 }
353 #endif
354 fprintf(stderr,"unique: %lu, interfacenum: %lu, alternatesetting: %lu, options: %lx\n", usi->dwUniqueID, usi->dwInterfaceNum, usi->dwAlternateSetting, usi->dwOptions);
355 }
356 break;
357
358 case USB_GET_DEVICE_DATA:
359 fprintf(stderr,"faking USB_GET_DEVICE_DATA\n");
360 {
361 struct usb_get_device_data *ugdd = (struct usb_get_device_data*)(wdheader->data);
362 int pSize;
363
364 fprintf(stderr, "unique: %lu, bytes: %lu, options: %lx\n", ugdd->dwUniqueID, ugdd->dwBytes, ugdd->dwOptions);
365 pSize = ugdd->dwBytes;
366 //ret = (*ioctl_func) (fd, request, wdioctl);
367 if (!ugdd->dwBytes) {
368 if (usbdevice) {
369 ugdd->dwBytes = usb_deviceinfo(NULL);
370 }
371 } else {
372 usb_deviceinfo((unsigned char*)ugdd->pBuf);
373 }
374
375 if (pSize) {
376 struct usb_device_info *udi = (struct usb_device_info*)ugdd->pBuf;
377
378 fprintf(stderr, "Vendor: %x\n", udi->Descriptor.idVendor);
379 }
380 }
381 break;
382
383 case EVENT_REGISTER:
384 fprintf(stderr,"EVENT_REGISTER\n");
385 {
386 struct event *e = (struct event*)(wdheader->data);
387 struct usb_bus *bus;
388 int i;
389
390 fprintf(stderr,"handle: %lu, action: %lu, status: %lu, eventid: %lu, cardtype: %lu, kplug: %lu, options: %lu, dev: %lx:%lx, unique: %lu, ver: %lu, nummatch: %lu\n", e->handle, e->dwAction, e->dwStatus, e->dwEventId, e->dwCardType, e->hKernelPlugIn, e->dwOptions, e->u.Usb.deviceId.dwVendorId, e->u.Usb.deviceId.dwProductId, e->u.Usb.dwUniqueID, e->dwEventVer, e->dwNumMatchTables);
391 for (i = 0; i < e->dwNumMatchTables; i++) {
392 fprintf(stderr,"match: dev: %04x:%04x, class: %x, subclass: %x, intclass: %x, intsubclass: %x, intproto: %x\n", e->matchTables[i].VendorId, e->matchTables[i].ProductId, e->matchTables[i].bDeviceClass, e->matchTables[i].bDeviceSubClass, e->matchTables[i].bInterfaceClass, e->matchTables[i].bInterfaceSubClass, e->matchTables[i].bInterfaceProtocol);
393
394 for (bus = busses; bus; bus = bus->next) {
395 struct usb_device *dev;
396
397 for (dev = bus->devices; dev; dev = dev->next) {
398 struct usb_device_descriptor *desc = &(dev->descriptor);
399
400 if((desc->idVendor == e->matchTables[i].VendorId) &&
401 (desc->idProduct == e->matchTables[i].ProductId) &&
402 (desc->bDeviceClass == e->matchTables[i].bDeviceClass) &&
403 (desc->bDeviceSubClass == e->matchTables[i].bDeviceSubClass)) {
404 int ac;
405 for (ac = 0; ac < desc->bNumConfigurations; ac++) {
406 struct usb_interface *interface = dev->config[ac].interface;
407 int ai;
408
409 for (ai = 0; ai < interface->num_altsetting; ai++) {
410 fprintf(stderr, "intclass: %x, intsubclass: %x, intproto: %x\n", interface->altsetting[i].bInterfaceClass, interface->altsetting[i].bInterfaceSubClass, interface->altsetting[i].bInterfaceProtocol);
411 if ((interface->altsetting[ai].bInterfaceSubClass == e->matchTables[i].bInterfaceSubClass) &&
412 (interface->altsetting[ai].bInterfaceProtocol == e->matchTables[i].bInterfaceProtocol)){
413 /* TODO: check interfaceClass! */
414 fprintf(stderr,"!!!FOUND DEVICE WITH LIBUSB!!!\n");
415 usbdevice = dev;
416 card_type = e->dwCardType;
417 }
418 }
419 }
420 }
421 }
422 }
423 }
424
425 #ifndef NO_WINDRVR
426 ret = (*ioctl_func) (fd, request, wdioctl);
427 #else
428 //handle: 0, action: 16371, status: 0, eventid: 0, cardtype: 4294967294, kplug: 0, options: 0, dev: 0:0, unique: 0, ver: 1, nummatch: 2
429 //handle: 1, action: 16371, status: 0, eventid: 0, cardtype: 4294967294, kplug: 0, options: 0, dev: 0:0, unique: 0, ver: 1, nummatch: 2
430 e->handle++;
431 #endif
432
433 fprintf(stderr,"handle: %lu, action: %lu, status: %lu, eventid: %lu, cardtype: %lu, kplug: %lu, options: %lu, dev: %lx:%lx, unique: %lu, ver: %lu, nummatch: %lu\n", e->handle, e->dwAction, e->dwStatus, e->dwEventId, e->dwCardType, e->hKernelPlugIn, e->dwOptions, e->u.Usb.deviceId.dwVendorId, e->u.Usb.deviceId.dwProductId, e->u.Usb.dwUniqueID, e->dwEventVer, e->dwNumMatchTables);
434 for (i = 0; i < e->dwNumMatchTables; i++)
435 fprintf(stderr,"match: dev: %04x:%04x, class: %x, subclass: %x, intclass: %x, intsubclass: %x, intproto: %x\n", e->matchTables[i].VendorId, e->matchTables[i].ProductId, e->matchTables[i].bDeviceClass, e->matchTables[i].bDeviceSubClass, e->matchTables[i].bInterfaceClass, e->matchTables[i].bInterfaceSubClass, e->matchTables[i].bInterfaceProtocol);
436 }
437 break;
438
439 case TRANSFER:
440 fprintf(stderr,"TRANSFER\n");
441 #ifndef NO_WINDRVR
442 ret = (*ioctl_func) (fd, request, wdioctl);
443 #endif
444 break;
445
446 case EVENT_UNREGISTER:
447 fprintf(stderr,"EVENT_UNREGISTER\n");
448 #ifndef NO_WINDRVR
449 ret = (*ioctl_func) (fd, request, wdioctl);
450 #endif
451 break;
452
453 case INT_WAIT:
454 fprintf(stderr,"INT_WAIT\n");
455 {
456 struct interrupt *it = (struct interrupt*)(wdheader->data);
457
458 fprintf(stderr,"Handle: %lu, Options: %lx, ncmds: %lu, enableok: %lu, count: %lu, lost: %lu, stopped: %lu\n", it->hInterrupt, it->dwOptions, it->dwCmds, it->fEnableOk, it->dwCounter, it->dwLost, it->fStopped);
459
460 #ifndef NO_WINDRVR
461 ret = (*ioctl_func) (fd, request, wdioctl);
462 #else
463 if (usbdevice) {
464 if (it->dwCounter == 0) {
465 it->dwCounter = 1;
466 } else {
467 //FIXME: signal durch FUTEX, overload futex!
468 while(ints_enabled) {sleep(1);}
469 }
470 } else {
471 while(ints_enabled) {sleep(1);}
472 }
473 #endif
474
475 fprintf(stderr,"INT_WAIT_RETURN: Handle: %lu, Options: %lx, ncmds: %lu, enableok: %lu, count: %lu, lost: %lu, stopped: %lu\n", it->hInterrupt, it->dwOptions, it->dwCmds, it->fEnableOk, it->dwCounter, it->dwLost, it->fStopped);
476 }
477 break;
478
479 case CARD_UNREGISTER:
480 fprintf(stderr,"CARD_UNREGISTER\n");
481 #ifndef NO_WINDRVR
482 ret = (*ioctl_func) (fd, request, wdioctl);
483 #endif
484 break;
485
486 case EVENT_PULL:
487 fprintf(stderr,"EVENT_PULL\n");
488 {
489 struct event *e = (struct event*)(wdheader->data);
490 int i;
491
492 fprintf(stderr,"handle: %lu, action: %lu, status: %lu, eventid: %lu, cardtype: %lx, kplug: %lu, options: %lu, dev: %lx:%lx, unique: %lu, ver: %lu, nummatch: %lu\n", e->handle, e->dwAction, e->dwStatus, e->dwEventId, e->dwCardType, e->hKernelPlugIn, e->dwOptions, e->u.Usb.deviceId.dwVendorId, e->u.Usb.deviceId.dwProductId, e->u.Usb.dwUniqueID, e->dwEventVer, e->dwNumMatchTables);
493 for (i = 0; i < e->dwNumMatchTables; i++)
494 fprintf(stderr,"match: dev: %04x:%04x, class: %x, subclass: %x, intclass: %x, intsubclass: %x, intproto: %x\n", e->matchTables[i].VendorId, e->matchTables[i].ProductId, e->matchTables[i].bDeviceClass, e->matchTables[i].bDeviceSubClass, e->matchTables[i].bInterfaceClass, e->matchTables[i].bInterfaceSubClass, e->matchTables[i].bInterfaceProtocol);
495
496 #ifndef NO_WINDRVR
497 ret = (*ioctl_func) (fd, request, wdioctl);
498 #else
499 //EVENT_PULL
500 //handle: 1, action: 0, status: 0, eventid: 0, cardtype: 0, kplug: 0, options: 0, dev: 0:0, unique: 0, ver: 1, nummatch: 1
501 //match: dev: 0:0, class: 0, subclass: 0, intclass: 0, intsubclass: 0, intproto: 0
502 //handle: 1, action: 1, status: 0, eventid: 109, cardtype: 4294967294, kplug: 0, options: 0, dev: 0:0, unique: 90, ver: 1, nummatch: 1
503 //match: dev: 3fd:8, class: 0, subclass: 0, intclass: ff, intsubclass: 0, intproto: 0
504 if (usbdevice) {
505 struct usb_interface *interface = usbdevice->config->interface;
506
507 e->dwCardType = card_type;
508 e->dwAction = 1;
509 e->dwEventId = 109;
510 e->u.Usb.dwUniqueID = 110;
511 e->matchTables[0].VendorId = usbdevice->descriptor.idVendor;
512 e->matchTables[0].ProductId = usbdevice->descriptor.idProduct;
513 e->matchTables[0].bDeviceClass = usbdevice->descriptor.bDeviceClass;
514 e->matchTables[0].bDeviceSubClass = usbdevice->descriptor.bDeviceSubClass;
515 e->matchTables[0].bInterfaceClass = interface->altsetting[0].bInterfaceClass;
516 e->matchTables[0].bInterfaceSubClass = interface->altsetting[0].bInterfaceSubClass;
517 e->matchTables[0].bInterfaceProtocol = interface->altsetting[0].bInterfaceProtocol;
518 }
519 #endif
520
521 fprintf(stderr,"handle: %lu, action: %lu, status: %lu, eventid: %lu, cardtype: %lx, kplug: %lu, options: %lu, dev: %lx:%lx, unique: %lu, ver: %lu, nummatch: %lu\n", e->handle, e->dwAction, e->dwStatus, e->dwEventId, e->dwCardType, e->hKernelPlugIn, e->dwOptions, e->u.Usb.deviceId.dwVendorId, e->u.Usb.deviceId.dwProductId, e->u.Usb.dwUniqueID, e->dwEventVer, e->dwNumMatchTables);
522 for (i = 0; i < e->dwNumMatchTables; i++)
523 fprintf(stderr,"match: dev: %04x:%04x, class: %x, subclass: %x, intclass: %x, intsubclass: %x, intproto: %x\n", e->matchTables[i].VendorId, e->matchTables[i].ProductId, e->matchTables[i].bDeviceClass, e->matchTables[i].bDeviceSubClass, e->matchTables[i].bInterfaceClass, e->matchTables[i].bInterfaceSubClass, e->matchTables[i].bInterfaceProtocol);
524
525 }
526 break;
527
528 default:
529 fprintf(stderr,"!!!Unsupported IOCTL: %x!!!\n", request);
530 #ifndef NO_WINDRVR
531 ret = (*ioctl_func) (fd, request, wdioctl);
532 #endif
533 break;
534 }
535
536 return ret;
537 }
538
539
540 typedef int (*open_funcptr_t) (const char *, int, mode_t);
541
542 int open (const char *pathname, int flags, ...)
543 {
544 static open_funcptr_t func = NULL;
545 mode_t mode = 0;
546 va_list args;
547 int fd;
548
549 if (!func)
550 func = (open_funcptr_t) dlsym (REAL_LIBC, "open");
551
552 if (flags & O_CREAT) {
553 va_start(args, flags);
554 mode = va_arg(args, mode_t);
555 va_end(args);
556 }
557
558 if (!strcmp (pathname, "/dev/windrvr6")) {
559 fprintf(stderr,"opening windrvr6\n");
560 #ifdef NO_WINDRVR
561 windrvrfd = fd = (*func) ("/dev/null", flags, mode);
562 #else
563 windrvrfd = fd = (*func) (pathname, flags, mode);
564 #endif
565 if (!busses) {
566 usb_init();
567 usb_find_busses();
568 usb_find_devices();
569
570 busses = usb_get_busses();
571 }
572 } else {
573 fd = (*func) (pathname, flags, mode);
574 }
575
576 return fd;
577 }
578
579 void diff(unsigned char *buf1, unsigned char *buf2, int len) {
580 int i;
581
582 for(i=0; i<len; i++) {
583 if (buf1[i] != buf2[i]) {
584 fprintf(stderr,"Diff at %d: %02x(%c)->%02x(%c)\n", i, buf1[i], ((buf1[i] >= 31 && buf1[i] <= 126)?buf1[i]:'.'), buf2[i], ((buf2[i] >= 31 && buf2[i] <= 126)?buf2[i]:'.'));
585 }
586 }
587 }
588
589 void hexdump(unsigned char *buf, int len) {
590 int i;
591
592 for(i=0; i<len; i++) {
593 fprintf(stderr,"%02x ", buf[i]);
594 if ((i % 16) == 15)
595 fprintf(stderr,"\n");
596 }
597 }
598
599 int ioctl(int fd, int request, ...)
600 {
601 va_list args;
602 void *argp;
603 int ret;
604
605 if (!ioctl_func)
606 ioctl_func = (int (*) (int, int, void *)) dlsym (REAL_LIBC, "ioctl");
607
608 va_start (args, request);
609 argp = va_arg (args, void *);
610 va_end (args);
611
612 if (fd == windrvrfd)
613 ret = do_wdioctl(fd, request, argp);
614 else
615 ret = (*ioctl_func) (fd, request, argp);
616
617 return ret;
618 }
619
620 int futex(int *uaddr, int op, int val, const struct timespec *timeout, int *uaddr2, int val3) {
621 static int (*func) (int*, int, int, const struct timespec*, int*, int) = NULL;
622 int ret;
623
624 if (!func)
625 func = (int (*) (int*, int, int, const struct timespec*, int*, int)) dlsym(REAL_LIBC, "futex");
626
627 fprintf(stderr,"FUTEX: %x\n", (unsigned int)uaddr);
628 ret = (*func) (uaddr, op, val, timeout, uaddr2, val3);
629
630 return ret;
631 }
632
633
634 #if 0
635 void *mmap(void *start, size_t length, int prot, int flags, int fd, off_t offset)
636 {
637 static void* (*func) (void *, size_t, int, int, int, off_t) = NULL;
638 void *ret;
639
640 if (!func)
641 func = (void* (*) (void *, size_t, int, int, int, off_t)) dlsym (REAL_LIBC, "mmap");
642
643 ret = (*func) (start, length, prot, flags, fd, offset);
644 fprintf(stderr,"MMAP: %x, %d, %d, %d, %d, %d -> %x\n", (unsigned int)start, length, prot, flags, fd, offset, (unsigned int)ret);
645 mmapped = ret;
646 mmapplen = length;
647
648 return ret;
649 }
650
651 void *mmap64(void *start, size_t length, int prot, int flags, int fd, off64_t offset)
652 {
653 static void* (*func) (void *, size_t, int, int, int, off64_t) = NULL;
654 void *ret;
655
656 if (!func)
657 func = (void* (*) (void *, size_t, int, int, int, off64_t)) dlsym (REAL_LIBC, "mmap64");
658
659 ret = (*func) (start, length, prot, flags, fd, offset);
660 fprintf(stderr,"MMAP64: %x, %d, %d, %d, %d, %lld -> %x\n", (unsigned int)start, length, prot, flags, fd, offset, (unsigned int)ret);
661 mmapped = ret;
662 mmapplen = length;
663
664 return ret;
665 }
666
667 void *mmap2(void *start, size_t length, int prot, int flags, int fd, off_t pgoffset)
668 {
669 static void* (*func) (void *, size_t, int, int, int, off_t) = NULL;
670 void *ret;
671
672 if (!func)
673 func = (void* (*) (void *, size_t, int, int, int, off_t)) dlsym (REAL_LIBC, "mmap2");
674
675 ret = (*func) (start, length, prot, flags, fd, pgoffset);
676 fprintf(stderr,"MMAP2: %x, %d, %d, %d, %d, %d -> %x\n", (unsigned int)start, length, prot, flags, fd, pgoffset, (unsigned int)ret);
677 mmapped = ret;
678 mmapplen = length;
679
680 return ret;
681 }
682
683 void *malloc(size_t size)
684 {
685 static void* (*func) (size_t) = NULL;
686 void *ret;
687
688 if (!func)
689 func = (void* (*) (size_t)) dlsym(REAL_LIBC, "malloc");
690
691 ret = (*func) (size);
692
693 //fprintf(stderr,"MALLOC: %d -> %x\n", size, (unsigned int) ret);
694
695 return ret;
696 }
697 #endif
698
699
700 #endif
Impressum, Datenschutz