begin separating XPCU functions into own file
[usb-driver] / usb-driver.c
1 /* libusb/ppdev connector for XILINX impact
2 *
3 * Copyright (c) 2007 Michael Gernoth <michael@gernoth.net>
4 *
5 * Permission is hereby granted, free of charge, to any person obtaining a copy
6 * of this software and associated documentation files (the "Software"), to
7 * deal in the Software without restriction, including without limitation the
8 * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
9 * sell copies of the Software, and to permit persons to whom the Software is
10 * furnished to do so, subject to the following conditions:
11 *
12 * The above copyright notice and this permission notice shall be included in
13 * all copies or substantial portions of the Software.
14 *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
21 * IN THE SOFTWARE.
22 */
23
24 #define _GNU_SOURCE 1
25
26 #include <dlfcn.h>
27 #include <stdarg.h>
28 #include <stdlib.h>
29 #include <string.h>
30 #include <unistd.h>
31 #include <fcntl.h>
32 #include <sys/types.h>
33 #include <sys/stat.h>
34 #include <sys/time.h>
35 #include <stdio.h>
36 #include <usb.h>
37 #include <signal.h>
38 #include <pthread.h>
39 #include <errno.h>
40 #include <inttypes.h>
41 #include <sys/ioctl.h>
42 #include <sys/utsname.h>
43 #include <bits/wordsize.h>
44 #include "usb-driver.h"
45 #include "config.h"
46 #include "xpcu.h"
47
48 static int (*ioctl_func) (int, int, void *) = NULL;
49 static int windrvrfd = -1;
50 static unsigned long ppbase = 0;
51 static unsigned long ecpbase = 0;
52 static struct parport_config *pport = NULL;
53 static struct xpcu_s *xpcu = NULL;
54 static FILE *modulesfp = NULL;
55 static FILE *baseaddrfp = NULL;
56 static int baseaddrnum = 0;
57 static int modules_read = 0;
58 static unsigned long card_type;
59 static int ints_enabled = 0;
60 static pthread_mutex_t int_wait = PTHREAD_MUTEX_INITIALIZER;
61
62 #define NO_WINDRVR 1
63
64 void hexdump(unsigned char *buf, int len) {
65 int i;
66
67 for(i=0; i<len; i++) {
68 fprintf(stderr,"%02x ", buf[i]);
69 if ((i % 16) == 15)
70 fprintf(stderr,"\n");
71 }
72 fprintf(stderr,"\n");
73 }
74
75
76 static int do_wdioctl(int fd, unsigned int request, unsigned char *wdioctl) {
77 struct header_struct* wdheader = (struct header_struct*)wdioctl;
78 struct version_struct *version;
79 int ret = 0;
80
81 if (wdheader->magic != MAGIC) {
82 fprintf(stderr,"!!!ERROR: magic header does not match!!!\n");
83 return (*ioctl_func) (fd, request, wdioctl);
84 }
85
86 switch(request & ~(0xc0000000)) {
87 case VERSION:
88 version = (struct version_struct*)(wdheader->data);
89 strcpy(version->version, "libusb-driver.so version: " USB_DRIVER_VERSION);
90 version->versionul = 802;
91 DPRINTF("VERSION\n");
92 break;
93
94 case LICENSE:
95 DPRINTF("LICENSE\n");
96 break;
97
98 case CARD_REGISTER_OLD:
99 case CARD_REGISTER:
100 DPRINTF("CARD_REGISTER\n");
101 {
102 struct card_register* cr = (struct card_register*)(wdheader->data);
103
104 DPRINTF("Items: %lu, Addr: 0x%lx, bytes: %lu, bar: %lu\n",
105 cr->Card.dwItems,
106 (unsigned long)cr->Card.Item[0].I.IO.dwAddr,
107 cr->Card.Item[0].I.IO.dwBytes,
108 cr->Card.Item[0].I.IO.dwBar);
109
110 DPRINTF("Items: %lu, Addr: 0x%lx, bytes: %lu, bar: %lu\n",
111 cr->Card.dwItems,
112 (unsigned long)cr->Card.Item[1].I.IO.dwAddr,
113 cr->Card.Item[1].I.IO.dwBytes,
114 cr->Card.Item[1].I.IO.dwBar);
115 #ifndef NO_WINDRVR
116 ret = (*ioctl_func) (fd, request, wdioctl);
117 #else
118
119 pport = config_get((unsigned long)cr->Card.Item[0].I.IO.dwAddr / 0x10);
120 if (!pport)
121 break;
122
123 ret = pport->open((unsigned long)cr->Card.Item[0].I.IO.dwAddr / 0x10);
124
125 ppbase = (unsigned long)cr->Card.Item[0].I.IO.dwAddr;
126
127 if (cr->Card.dwItems > 1 && cr->Card.Item[1].I.IO.dwAddr)
128 ecpbase = (unsigned long)cr->Card.Item[1].I.IO.dwAddr;
129
130 if (ret >= 0) {
131 cr->hCard = ret;
132 } else {
133 cr->hCard = 0;
134 }
135 #endif
136 DPRINTF("hCard: %lu\n", cr->hCard);
137 }
138 break;
139
140 case USB_TRANSFER:
141 DPRINTF("in USB_TRANSFER");
142 {
143 struct usb_transfer *ut = (struct usb_transfer*)(wdheader->data);
144
145 #ifdef DEBUG
146 DPRINTF(" unique: %lu, pipe: %lu, read: %lu, options: %lx, size: %lu, timeout: %lx\n",
147 ut->dwUniqueID, ut->dwPipeNum, ut->fRead,
148 ut->dwOptions, ut->dwBufferSize, ut->dwTimeout);
149 if (ut->dwPipeNum == 0) {
150 DPRINTF("setup packet: ");
151 hexdump(ut->SetupPacket, 8);
152 }
153
154 if (!ut->fRead && ut->dwBufferSize)
155 {
156 hexdump(ut->pBuffer, ut->dwBufferSize);
157 }
158 #endif
159
160 #ifndef NO_WINDRVR
161 ret = (*ioctl_func) (fd, request, wdioctl);
162 #else
163 xpcu_claim(xpcu, XPCU_CLAIM);
164 /* http://www.jungo.com/support/documentation/windriver/802/wdusb_man_mhtml/node55.html#SECTION001213000000000000000 */
165 if (ut->dwPipeNum == 0) { /* control pipe */
166 int requesttype, request, value, index, size;
167 requesttype = ut->SetupPacket[0];
168 request = ut->SetupPacket[1];
169 value = ut->SetupPacket[2] | (ut->SetupPacket[3] << 8);
170 index = ut->SetupPacket[4] | (ut->SetupPacket[5] << 8);
171 size = ut->SetupPacket[6] | (ut->SetupPacket[7] << 8);
172 DPRINTF("requesttype: %x, request: %x, value: %u, index: %u, size: %u\n", requesttype, request, value, index, size);
173 ret = usb_control_msg(xpcu->handle, requesttype, request, value, index, ut->pBuffer, size, ut->dwTimeout);
174 } else {
175 if (ut->fRead) {
176 ret = usb_bulk_read(xpcu->handle, ut->dwPipeNum, ut->pBuffer, ut->dwBufferSize, ut->dwTimeout);
177 } else {
178 ret = usb_bulk_write(xpcu->handle, ut->dwPipeNum, ut->pBuffer, ut->dwBufferSize, ut->dwTimeout);
179 }
180 xpcu_claim(xpcu, XPCU_RELEASE);
181 }
182
183 if (ret < 0) {
184 fprintf(stderr, "usb_transfer: %d (%s)\n", ret, usb_strerror());
185 } else {
186 ut->dwBytesTransferred = ret;
187 ret = 0;
188 }
189 #endif
190
191 #ifdef DEBUG
192 DPRINTF("Transferred: %lu (%s)\n",ut->dwBytesTransferred, (ut->fRead?"read":"write"));
193 if (ut->fRead && ut->dwBytesTransferred)
194 {
195 DPRINTF("Read: ");
196 hexdump(ut->pBuffer, ut->dwBytesTransferred);
197 }
198 #endif
199 }
200 break;
201
202 case INT_ENABLE_OLD:
203 case INT_ENABLE:
204 DPRINTF("INT_ENABLE\n");
205 {
206 struct interrupt *it = (struct interrupt*)(wdheader->data);
207
208 DPRINTF("Handle: %lu, Options: %lx, ncmds: %lu, enableok: %lu, count: %lu, lost: %lu, stopped: %lu\n",
209 it->hInterrupt, it->dwOptions,
210 it->dwCmds, it->fEnableOk, it->dwCounter,
211 it->dwLost, it->fStopped);
212
213 it->fEnableOk = 1;
214 it->fStopped = 0;
215 ints_enabled = 1;
216 pthread_mutex_trylock(&int_wait);
217 }
218
219 break;
220
221 case INT_DISABLE:
222 DPRINTF("INT_DISABLE\n");
223 {
224 struct interrupt *it = (struct interrupt*)(wdheader->data);
225
226 DPRINTF("Handle: %lu, Options: %lx, ncmds: %lu, enableok: %lu, count: %lu, lost: %lu, stopped: %lu\n",
227 it->hInterrupt, it->dwOptions,
228 it->dwCmds, it->fEnableOk, it->dwCounter,
229 it->dwLost, it->fStopped);
230 #ifndef NO_WINDRVR
231 ret = (*ioctl_func) (fd, request, wdioctl);
232 #else
233 it->dwCounter = 0;
234 it->fStopped = 1;
235 ints_enabled = 0;
236 if (pthread_mutex_trylock(&int_wait) == EBUSY)
237 pthread_mutex_unlock(&int_wait);
238 #endif
239 DPRINTF("Handle: %lu, Options: %lx, ncmds: %lu, enableok: %lu, count: %lu, lost: %lu, stopped: %lu\n",
240 it->hInterrupt, it->dwOptions,
241 it->dwCmds, it->fEnableOk, it->dwCounter,
242 it->dwLost, it->fStopped);
243 }
244 break;
245
246 case USB_SET_INTERFACE:
247 DPRINTF("USB_SET_INTERFACE\n");
248 {
249 struct usb_set_interface *usi = (struct usb_set_interface*)(wdheader->data);
250
251 DPRINTF("unique: %lu, interfacenum: %lu, alternatesetting: %lu, options: %lx\n",
252 usi->dwUniqueID, usi->dwInterfaceNum,
253 usi->dwAlternateSetting, usi->dwOptions);
254 #ifndef NO_WINDRVR
255 ret = (*ioctl_func) (fd, request, wdioctl);
256 #else
257 if (xpcu->dev) {
258 if (!xpcu->handle) {
259 xpcu->handle = usb_open(xpcu->dev);
260 #ifndef NO_USB_RESET
261 if (xpcu->handle) {
262 usb_reset(xpcu->handle);
263 xpcu->handle = usb_open(xpcu->dev);
264 }
265 #endif
266 }
267
268 xpcu->interface = xpcu->dev->config[0].interface[usi->dwInterfaceNum].altsetting[usi->dwAlternateSetting].bInterfaceNumber;
269 xpcu->alternate = usi->dwAlternateSetting;
270 }
271 #endif
272 DPRINTF("unique: %lu, interfacenum: %lu, alternatesetting: %lu, options: %lx\n",
273 usi->dwUniqueID, usi->dwInterfaceNum,
274 usi->dwAlternateSetting, usi->dwOptions);
275 }
276 break;
277
278 case USB_GET_DEVICE_DATA_OLD:
279 case USB_GET_DEVICE_DATA:
280 DPRINTF("USB_GET_DEVICE_DATA\n");
281 {
282 struct usb_get_device_data *ugdd = (struct usb_get_device_data*)(wdheader->data);
283 int pSize;
284
285 DPRINTF("unique: %lu, bytes: %lu, options: %lx\n",
286 ugdd->dwUniqueID, ugdd->dwBytes,
287 ugdd->dwOptions);
288
289 pSize = ugdd->dwBytes;
290 if (!ugdd->dwBytes) {
291 if (xpcu->dev) {
292 ugdd->dwBytes = xpcu_deviceinfo(xpcu, NULL);
293 }
294 } else {
295 xpcu_deviceinfo(xpcu, (unsigned char*)ugdd->pBuf);
296 }
297 }
298 break;
299
300 case EVENT_REGISTER_OLD:
301 case EVENT_REGISTER:
302 DPRINTF("EVENT_REGISTER\n");
303 {
304 struct event *e = (struct event*)(wdheader->data);
305 struct usb_bus *bus;
306 char* devpos;
307 int busnum = -1, devnum = -1;
308 int i;
309
310 DPRINTF("handle: %lu, action: %lu, status: %lu, eventid: %lu, cardtype: %lu, kplug: %lu, options: %lu, dev: %lx:%lx, unique: %lu, ver: %lu, nummatch: %lu\n",
311 e->handle, e->dwAction,
312 e->dwStatus, e->dwEventId, e->dwCardType,
313 e->hKernelPlugIn, e->dwOptions,
314 e->u.Usb.deviceId.dwVendorId,
315 e->u.Usb.deviceId.dwProductId,
316 e->u.Usb.dwUniqueID, e->dwEventVer,
317 e->dwNumMatchTables);
318
319 devpos = getenv("XILINX_USB_DEV");
320 if (devpos != NULL) {
321 int j;
322 char *devstr = NULL, *remainder;
323
324 DPRINTF("XILINX_USB_DEV=%s\n", devpos);
325
326 for (j = 0; j < strlen(devpos) && devpos[j] != 0; j++) {
327 if (devpos[j] == ':') {
328 devpos[j] = 0;
329 devstr = &(devpos[j+1]);
330 }
331 }
332
333 if (devstr && strlen(devstr) > 0) {
334 busnum = strtol(devpos, &remainder, 10);
335 if (devpos == remainder) {
336 busnum = -1;
337 } else {
338 devnum = strtol(devstr, &remainder, 10);
339 if (devstr == remainder) {
340 busnum = -1;
341 devnum = -1;
342 } else {
343 fprintf(stderr,"Using XILINX platform cable USB at %03d:%03d\n",
344 busnum, devnum);
345 }
346 }
347 }
348 }
349
350 for (i = 0; i < e->dwNumMatchTables; i++) {
351
352 DPRINTF("match: dev: %04x:%04x, class: %x, subclass: %x, intclass: %x, intsubclass: %x, intproto: %x\n",
353 e->matchTables[i].VendorId,
354 e->matchTables[i].ProductId,
355 e->matchTables[i].bDeviceClass,
356 e->matchTables[i].bDeviceSubClass,
357 e->matchTables[i].bInterfaceClass,
358 e->matchTables[i].bInterfaceSubClass,
359 e->matchTables[i].bInterfaceProtocol);
360
361 for (bus = xpcu->busses; bus; bus = bus->next) {
362 struct usb_device *dev;
363
364 if ((devnum != -1) && (strtol(bus->dirname, NULL, 10) != busnum))
365 continue;
366
367 for (dev = bus->devices; dev; dev = dev->next) {
368 struct usb_device_descriptor *desc = &(dev->descriptor);
369
370 if((desc->idVendor == e->matchTables[i].VendorId) &&
371 (desc->idProduct == e->matchTables[i].ProductId) &&
372 (desc->bDeviceClass == e->matchTables[i].bDeviceClass) &&
373 (desc->bDeviceSubClass == e->matchTables[i].bDeviceSubClass) &&
374 ((devnum == -1) || (strtol(dev->filename, NULL, 10) == devnum)) ) {
375 int ac;
376 for (ac = 0; ac < desc->bNumConfigurations; ac++) {
377 struct usb_interface *interface = dev->config[ac].interface;
378 int ai;
379
380 for (ai = 0; ai < interface->num_altsetting; ai++) {
381
382 DPRINTF("intclass: %x, intsubclass: %x, intproto: %x\n",
383 interface->altsetting[i].bInterfaceClass,
384 interface->altsetting[i].bInterfaceSubClass,
385 interface->altsetting[i].bInterfaceProtocol);
386
387 if ((interface->altsetting[ai].bInterfaceSubClass == e->matchTables[i].bInterfaceSubClass) &&
388 (interface->altsetting[ai].bInterfaceProtocol == e->matchTables[i].bInterfaceProtocol)){
389 /* TODO: check interfaceClass! */
390 DPRINTF("found device with libusb\n");
391 xpcu->dev = dev;
392 card_type = e->dwCardType;
393 }
394 }
395 }
396 }
397 }
398 }
399 }
400
401 #ifndef NO_WINDRVR
402 ret = (*ioctl_func) (fd, request, wdioctl);
403 #else
404 e->handle++;
405 #endif
406
407 #ifdef DEBUG
408 DPRINTF("handle: %lu, action: %lu, status: %lu, eventid: %lu, cardtype: %lu, kplug: %lu, options: %lu, dev: %lx:%lx, unique: %lu, ver: %lu, nummatch: %lu\n",
409 e->handle, e->dwAction,
410 e->dwStatus, e->dwEventId, e->dwCardType,
411 e->hKernelPlugIn, e->dwOptions,
412 e->u.Usb.deviceId.dwVendorId,
413 e->u.Usb.deviceId.dwProductId,
414 e->u.Usb.dwUniqueID, e->dwEventVer,
415 e->dwNumMatchTables);
416
417 for (i = 0; i < e->dwNumMatchTables; i++)
418 DPRINTF("match: dev: %04x:%04x, class: %x, subclass: %x, intclass: %x, intsubclass: %x, intproto: %x\n",
419 e->matchTables[i].VendorId,
420 e->matchTables[i].ProductId,
421 e->matchTables[i].bDeviceClass,
422 e->matchTables[i].bDeviceSubClass,
423 e->matchTables[i].bInterfaceClass,
424 e->matchTables[i].bInterfaceSubClass,
425 e->matchTables[i].bInterfaceProtocol);
426 #endif
427 }
428 break;
429
430 case TRANSFER_OLD:
431 case TRANSFER:
432 DPRINTF("TRANSFER\n");
433 {
434 WD_TRANSFER *tr = (WD_TRANSFER*)(wdheader->data);
435
436 #ifndef NO_WINDRVR
437 ret = (*ioctl_func) (fd, request, wdioctl);
438 #else
439 ret = pport->transfer(tr, fd, request, ppbase, ecpbase, 1);
440 #endif
441 }
442 break;
443
444 case MULTI_TRANSFER_OLD:
445 case MULTI_TRANSFER:
446 DPRINTF("MULTI_TRANSFER\n");
447 {
448 WD_TRANSFER *tr = (WD_TRANSFER*)(wdheader->data);
449 unsigned long num = wdheader->size/sizeof(WD_TRANSFER);
450 #ifndef NO_WINDRVR
451 ret = (*ioctl_func) (fd, request, wdioctl);
452 #else
453 ret = pport->transfer(tr, fd, request, ppbase, ecpbase, num);
454 #endif
455 }
456 break;
457
458 case EVENT_UNREGISTER:
459 DPRINTF("EVENT_UNREGISTER\n");
460 #ifndef NO_WINDRVR
461 ret = (*ioctl_func) (fd, request, wdioctl);
462 #endif
463 break;
464
465 case INT_WAIT:
466 DPRINTF("INT_WAIT\n");
467 {
468 struct interrupt *it = (struct interrupt*)(wdheader->data);
469
470 DPRINTF("Handle: %lu, Options: %lx, ncmds: %lu, enableok: %lu, count: %lu, lost: %lu, stopped: %lu\n",
471 it->hInterrupt, it->dwOptions,
472 it->dwCmds, it->fEnableOk, it->dwCounter,
473 it->dwLost, it->fStopped);
474
475 #ifndef NO_WINDRVR
476 ret = (*ioctl_func) (fd, request, wdioctl);
477 #else
478 if (xpcu->dev) {
479 if (it->dwCounter == 0) {
480 it->dwCounter = 1;
481 } else {
482 pthread_mutex_lock(&int_wait);
483 pthread_mutex_unlock(&int_wait);
484 }
485 } else {
486 pthread_mutex_lock(&int_wait);
487 pthread_mutex_unlock(&int_wait);
488 }
489 #endif
490
491 DPRINTF("INT_WAIT_RETURN: Handle: %lu, Options: %lx, ncmds: %lu, enableok: %lu, count: %lu, lost: %lu, stopped: %lu\n",
492 it->hInterrupt, it->dwOptions, it->dwCmds,
493 it->fEnableOk, it->dwCounter, it->dwLost,
494 it->fStopped);
495 }
496 break;
497
498 case CARD_UNREGISTER:
499 DPRINTF("CARD_UNREGISTER\n");
500 {
501 struct card_register* cr = (struct card_register*)(wdheader->data);
502
503 DPRINTF("Addr: 0x%lx, bytes: %lu, bar: %lu\n",
504 (unsigned long)cr->Card.Item[0].I.IO.dwAddr,
505 cr->Card.Item[0].I.IO.dwBytes,
506 cr->Card.Item[0].I.IO.dwBar);
507
508 DPRINTF("hCard: %lu\n", cr->hCard);
509
510 #ifndef NO_WINDRVR
511 ret = (*ioctl_func) (fd, request, wdioctl);
512 #else
513 if (pport)
514 pport->close(cr->hCard);
515
516 pport = NULL;
517 #endif
518 }
519 break;
520
521 case EVENT_PULL:
522 DPRINTF("EVENT_PULL\n");
523 {
524 struct event *e = (struct event*)(wdheader->data);
525 #ifdef DEBUG
526 int i;
527
528 DPRINTF("handle: %lu, action: %lu, status: %lu, eventid: %lu, cardtype: %lx, kplug: %lu, options: %lu, dev: %lx:%lx, unique: %lu, ver: %lu, nummatch: %lu\n",
529 e->handle, e->dwAction, e->dwStatus,
530 e->dwEventId, e->dwCardType, e->hKernelPlugIn,
531 e->dwOptions, e->u.Usb.deviceId.dwVendorId,
532 e->u.Usb.deviceId.dwProductId,
533 e->u.Usb.dwUniqueID, e->dwEventVer,
534 e->dwNumMatchTables);
535
536 for (i = 0; i < e->dwNumMatchTables; i++)
537 DPRINTF("match: dev: %04x:%04x, class: %x, subclass: %x, intclass: %x, intsubclass: %x, intproto: %x\n",
538 e->matchTables[i].VendorId,
539 e->matchTables[i].ProductId,
540 e->matchTables[i].bDeviceClass,
541 e->matchTables[i].bDeviceSubClass,
542 e->matchTables[i].bInterfaceClass,
543 e->matchTables[i].bInterfaceSubClass,
544 e->matchTables[i].bInterfaceProtocol);
545 #endif
546
547 #ifndef NO_WINDRVR
548 ret = (*ioctl_func) (fd, request, wdioctl);
549 #else
550 if (xpcu->dev) {
551 struct usb_interface *interface = xpcu->dev->config->interface;
552
553 e->dwCardType = card_type;
554 e->dwAction = 1;
555 e->dwEventId = 109;
556 e->u.Usb.dwUniqueID = 110;
557 e->matchTables[0].VendorId = xpcu->dev->descriptor.idVendor;
558 e->matchTables[0].ProductId = xpcu->dev->descriptor.idProduct;
559 e->matchTables[0].bDeviceClass = xpcu->dev->descriptor.bDeviceClass;
560 e->matchTables[0].bDeviceSubClass = xpcu->dev->descriptor.bDeviceSubClass;
561 e->matchTables[0].bInterfaceClass = interface->altsetting[0].bInterfaceClass;
562 e->matchTables[0].bInterfaceSubClass = interface->altsetting[0].bInterfaceSubClass;
563 e->matchTables[0].bInterfaceProtocol = interface->altsetting[0].bInterfaceProtocol;
564 }
565 #endif
566
567 #ifdef DEBUG
568 DPRINTF("handle: %lu, action: %lu, status: %lu, eventid: %lu, cardtype: %lx, kplug: %lu, options: %lu, dev: %lx:%lx, unique: %lu, ver: %lu, nummatch: %lu\n",
569 e->handle, e->dwAction, e->dwStatus,
570 e->dwEventId, e->dwCardType, e->hKernelPlugIn,
571 e->dwOptions, e->u.Usb.deviceId.dwVendorId,
572 e->u.Usb.deviceId.dwProductId,
573 e->u.Usb.dwUniqueID, e->dwEventVer,
574 e->dwNumMatchTables);
575
576 for (i = 0; i < e->dwNumMatchTables; i++)
577 DPRINTF("match: dev: %04x:%04x, class: %x, subclass: %x, intclass: %x, intsubclass: %x, intproto: %x\n",
578 e->matchTables[i].VendorId,
579 e->matchTables[i].ProductId,
580 e->matchTables[i].bDeviceClass,
581 e->matchTables[i].bDeviceSubClass,
582 e->matchTables[i].bInterfaceClass,
583 e->matchTables[i].bInterfaceSubClass,
584 e->matchTables[i].bInterfaceProtocol);
585 #endif
586
587 }
588 break;
589
590 default:
591 fprintf(stderr,"!!!Unsupported IOCTL: %x!!!\n", request);
592 #ifndef NO_WINDRVR
593 ret = (*ioctl_func) (fd, request, wdioctl);
594 #endif
595 break;
596 }
597
598 return ret;
599 }
600
601 int ioctl(int fd, unsigned long int request, ...) {
602 va_list args;
603 void *argp;
604 int ret;
605
606 if (!ioctl_func)
607 ioctl_func = (int (*) (int, int, void *)) dlsym (RTLD_NEXT, "ioctl");
608
609 va_start (args, request);
610 argp = va_arg (args, void *);
611 va_end (args);
612
613 if (fd == windrvrfd)
614 ret = do_wdioctl(fd, request, argp);
615 else
616 ret = (*ioctl_func) (fd, request, argp);
617
618 return ret;
619 }
620
621 int open (const char *pathname, int flags, ...) {
622 static int (*func) (const char *, int, mode_t) = NULL;
623 mode_t mode = 0;
624 va_list args;
625 int fd;
626
627 if (!func)
628 func = (int (*) (const char *, int, mode_t)) dlsym (RTLD_NEXT, "open");
629
630 if (flags & O_CREAT) {
631 va_start(args, flags);
632 mode = va_arg(args, mode_t);
633 va_end(args);
634 }
635
636 if (!strcmp (pathname, "/dev/windrvr6")) {
637 DPRINTF("opening windrvr6\n");
638 #ifdef NO_WINDRVR
639 windrvrfd = fd = (*func) ("/dev/null", flags, mode);
640 #else
641 windrvrfd = fd = (*func) (pathname, flags, mode);
642 #endif
643 if (!xpcu)
644 xpcu = xpcu_open();
645
646 return fd;
647 }
648
649 return (*func) (pathname, flags, mode);
650 }
651
652 int close(int fd) {
653 static int (*func) (int) = NULL;
654
655 if (!func)
656 func = (int (*) (int)) dlsym(RTLD_NEXT, "close");
657
658 if (fd == windrvrfd && windrvrfd >= 0) {
659 DPRINTF("close windrvrfd\n");
660
661 if (xpcu->handle) {
662 xpcu_claim(xpcu, XPCU_RELEASE);
663 usb_close(xpcu->handle);
664 }
665
666 xpcu->handle = NULL;
667 xpcu->interface = -1;
668 xpcu = NULL;
669 windrvrfd = -1;
670 }
671
672 return (*func) (fd);
673 }
674
675 FILE *fopen(const char *path, const char *mode) {
676 FILE *ret;
677 static FILE* (*func) (const char*, const char*) = NULL;
678 char buf[256];
679 int i;
680
681 if (!func)
682 func = (FILE* (*) (const char*, const char*)) dlsym(RTLD_NEXT, "fopen");
683
684 for (i = 0; i < 4; i++) {
685 snprintf(buf, sizeof(buf), "/proc/sys/dev/parport/parport%d/base-addr", i);
686 if (!strcmp(path, buf)) {
687 DPRINTF("open base-addr of parport%d\n", i);
688 if (config_is_real_pport(i)) {
689 ret = (*func) (path, mode);
690 } else {
691 ret = (*func) ("/dev/null", mode);
692 }
693
694 if (ret) {
695 baseaddrfp = ret;
696 baseaddrnum = i;
697 }
698
699 return ret;
700 }
701 }
702
703 ret = (*func) (path, mode);
704
705 if (!strcmp(path, "/proc/modules")) {
706 DPRINTF("opening /proc/modules\n");
707 #ifdef NO_WINDRVR
708 modulesfp = ret;
709 modules_read = 0;
710 #endif
711 }
712
713 return ret;
714 }
715
716 char *fgets(char *s, int size, FILE *stream) {
717 static char* (*func) (char*, int, FILE*) = NULL;
718 const char modules[][256] = {"windrvr6 1 0 - Live 0xdeadbeef\n", "parport_pc 1 0 - Live 0xdeadbeef\n"};
719 char buf[256];
720 char *ret = NULL;
721
722
723 if (!func)
724 func = (char* (*) (char*, int, FILE*)) dlsym(RTLD_NEXT, "fgets");
725
726 if (modulesfp == stream) {
727 if (modules_read < sizeof(modules) / sizeof(modules[0])) {
728 strcpy(s, modules[modules_read]);
729 ret = s;
730 modules_read++;
731 }
732 } else if (baseaddrfp == stream) {
733 snprintf(s, sizeof(buf), "%d\t%d\n",
734 (baseaddrnum) * 0x10,
735 ((baseaddrnum) * 0x10) + 0x400);
736 ret = s;
737 } else {
738 ret = (*func)(s,size,stream);
739 }
740
741 return ret;
742 }
743
744 int fclose(FILE *fp) {
745 static int (*func) (FILE*) = NULL;
746
747 if (!func)
748 func = (int (*) (FILE*)) dlsym(RTLD_NEXT, "fclose");
749
750 if (fp == modulesfp) {
751 modulesfp = NULL;
752 }
753
754 if (fp == baseaddrfp) {
755 baseaddrfp = NULL;
756 }
757
758 return (*func)(fp);
759 }
760
761 int access(const char *pathname, int mode) {
762 static int (*func) (const char*, int);
763
764 if (!func)
765 func = (int (*) (const char*, int)) dlsym(RTLD_NEXT, "access");
766
767 if (pathname && !strcmp(pathname, "/dev/windrvr6")) {
768 return 0;
769 } else {
770 return (*func)(pathname, mode);
771 }
772 }
773
774 #if __WORDSIZE == 32
775 int uname (struct utsname *__name) {
776 static int (*func) (struct utsname*);
777 int ret;
778
779 if (!func)
780 func = (int (*) (struct utsname*)) dlsym(RTLD_NEXT, "uname");
781
782 ret = (*func)(__name);
783
784 if (ret == 0 && (!strcmp(__name->machine, "x86_64"))) {
785 strcpy(__name->machine, "i686");
786 }
787
788 return ret;
789 }
790 #endif
Impressum, Datenschutz