[usb-driver] / xpcu.c

#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include <strings.h>
#include <usb.h>
#include <errno.h>
#include <pthread.h>
#include "usb-driver.h"
#include "xpcu.h"

struct xpcu_s {
	struct usb_device *dev;
	usb_dev_handle *handle;
	int interface;
	int alternate;
	unsigned long card_type;
};

struct xpcu_event_s {
	struct xpcu_s *xpcu;
	int count;
	int interrupt_count;
	pthread_mutex_t interrupt;
};

static struct usb_bus *busses = NULL;
static pthread_mutex_t dummy_interrupt = PTHREAD_MUTEX_INITIALIZER;

int xpcu_deviceinfo(struct usb_get_device_data *ugdd) {
	struct xpcu_s *xpcu = (struct xpcu_s*)ugdd->dwUniqueID;
	int i,j,k,l;
	int len = 0;
	unsigned char *buf = NULL;
	WDU_CONFIGURATION **pConfigs, **pActiveConfig;
	WDU_INTERFACE **pActiveInterface;

	if (!xpcu)
		return -ENODEV;

	if (ugdd->dwBytes)
		buf = ugdd->pBuf;

	if (buf) {
		struct usb_device_info *udi = (struct usb_device_info*)(buf+len);

		udi->Descriptor.bLength = sizeof(WDU_DEVICE_DESCRIPTOR);
		udi->Descriptor.bDescriptorType = xpcu->dev->descriptor.bDescriptorType;
		udi->Descriptor.bcdUSB = xpcu->dev->descriptor.bcdUSB;
		udi->Descriptor.bDeviceClass = xpcu->dev->descriptor.bDeviceClass;
		udi->Descriptor.bDeviceSubClass = xpcu->dev->descriptor.bDeviceSubClass;
		udi->Descriptor.bDeviceProtocol = xpcu->dev->descriptor.bDeviceProtocol;
		udi->Descriptor.bMaxPacketSize0 = xpcu->dev->descriptor.bMaxPacketSize0;
		udi->Descriptor.idVendor = xpcu->dev->descriptor.idVendor;
		udi->Descriptor.idProduct = xpcu->dev->descriptor.idProduct;
		udi->Descriptor.bcdDevice = xpcu->dev->descriptor.bcdDevice;
		udi->Descriptor.iManufacturer = xpcu->dev->descriptor.iManufacturer;
		udi->Descriptor.iProduct = xpcu->dev->descriptor.iProduct;
		udi->Descriptor.iSerialNumber = xpcu->dev->descriptor.iSerialNumber;
		udi->Descriptor.bNumConfigurations = xpcu->dev->descriptor.bNumConfigurations;

		/* TODO: Fix Pipe0! */
		udi->Pipe0.dwNumber = 0x00;
		udi->Pipe0.dwMaximumPacketSize = xpcu->dev->descriptor.bMaxPacketSize0;
		udi->Pipe0.type = 0;
		udi->Pipe0.direction = WDU_DIR_IN_OUT;
		udi->Pipe0.dwInterval = 0;

		pConfigs = &(udi->pConfigs);
		pActiveConfig = &(udi->pActiveConfig);
		pActiveInterface = &(udi->pActiveInterface[0]);
	}

	len = sizeof(struct usb_device_info);

	for (i=0; i<xpcu->dev->descriptor.bNumConfigurations; i++)
	{
		struct usb_config_descriptor *conf_desc = &xpcu->dev->config[i];
		WDU_INTERFACE **pInterfaces;
		WDU_ALTERNATE_SETTING **pAlternateSettings[conf_desc->bNumInterfaces];
		WDU_ALTERNATE_SETTING **pActiveAltSetting[conf_desc->bNumInterfaces];

		if (buf) {
			WDU_CONFIGURATION *cfg = (WDU_CONFIGURATION*)(buf+len);

			*pConfigs = cfg;
			*pActiveConfig = cfg;

			cfg->Descriptor.bLength = conf_desc->bLength;
			cfg->Descriptor.bDescriptorType = conf_desc->bDescriptorType;
			cfg->Descriptor.wTotalLength = conf_desc->wTotalLength;
			cfg->Descriptor.bNumInterfaces = conf_desc->bNumInterfaces;
			cfg->Descriptor.bConfigurationValue = conf_desc->bConfigurationValue;
			cfg->Descriptor.iConfiguration = conf_desc->iConfiguration;
			cfg->Descriptor.bmAttributes = conf_desc->bmAttributes;
			cfg->Descriptor.MaxPower = conf_desc->MaxPower;

			cfg->dwNumInterfaces = conf_desc->bNumInterfaces;

			pInterfaces = &(cfg->pInterfaces);
		}
		len += sizeof(WDU_CONFIGURATION);

		if (buf) {
			*pInterfaces = (WDU_INTERFACE*)(buf+len);
			for (j=0; j<conf_desc->bNumInterfaces; j++) {
				WDU_INTERFACE *iface = (WDU_INTERFACE*)(buf+len);

				pActiveInterface[j] = iface;

				pAlternateSettings[j] = &(iface->pAlternateSettings);
				iface->dwNumAltSettings = xpcu->dev->config[i].interface[j].num_altsetting;
				pActiveAltSetting[j] = &(iface->pActiveAltSetting);

				len += sizeof(WDU_INTERFACE);
			}
		} else {
			len += sizeof(WDU_INTERFACE) * conf_desc->bNumInterfaces;
		}

		for (j=0; j<conf_desc->bNumInterfaces; j++)
		{
			struct usb_interface *interface = &xpcu->dev->config[i].interface[j];

			if (buf) {
				*pAlternateSettings[j] = (WDU_ALTERNATE_SETTING*)(buf+len);
				/* FIXME: */
				*pActiveAltSetting[j] = (WDU_ALTERNATE_SETTING*)(buf+len);
			}

			for(k=0; k<interface->num_altsetting; k++)
			{
				unsigned char bNumEndpoints = interface->altsetting[k].bNumEndpoints;
				WDU_ENDPOINT_DESCRIPTOR **pEndpointDescriptors;
				WDU_PIPE_INFO **pPipes;

				if (buf) {
					WDU_ALTERNATE_SETTING *altset = (WDU_ALTERNATE_SETTING*)(buf+len);

					altset->Descriptor.bLength = interface->altsetting[k].bLength;
					altset->Descriptor.bDescriptorType = interface->altsetting[k].bDescriptorType;
					altset->Descriptor.bInterfaceNumber = interface->altsetting[k].bInterfaceNumber;
					altset->Descriptor.bAlternateSetting = interface->altsetting[k].bAlternateSetting;
					altset->Descriptor.bNumEndpoints = interface->altsetting[k].bNumEndpoints;
					altset->Descriptor.bInterfaceClass = interface->altsetting[k].bInterfaceClass;
					altset->Descriptor.bInterfaceSubClass = interface->altsetting[k].bInterfaceSubClass;
					altset->Descriptor.bInterfaceProtocol = interface->altsetting[k].bInterfaceProtocol;
					altset->Descriptor.iInterface = interface->altsetting[k].iInterface;
					pEndpointDescriptors = &(altset->pEndpointDescriptors);
					pPipes = &(altset->pPipes);

				}
				len +=sizeof(WDU_ALTERNATE_SETTING);

				if (buf) {
					*pEndpointDescriptors = (WDU_ENDPOINT_DESCRIPTOR*)(buf+len);
					for (l = 0; l < bNumEndpoints; l++) {
						WDU_ENDPOINT_DESCRIPTOR *ed = (WDU_ENDPOINT_DESCRIPTOR*)(buf+len);

						ed->bLength = interface->altsetting[k].endpoint[l].bLength;
						ed->bDescriptorType = interface->altsetting[k].endpoint[l].bDescriptorType;
						ed->bEndpointAddress = interface->altsetting[k].endpoint[l].bEndpointAddress;
						ed->bmAttributes = interface->altsetting[k].endpoint[l].bmAttributes;
						ed->wMaxPacketSize = interface->altsetting[k].endpoint[l].wMaxPacketSize;
						ed->bInterval = interface->altsetting[k].endpoint[l].bInterval;

						len += sizeof(WDU_ENDPOINT_DESCRIPTOR);
					}
						
					*pPipes = (WDU_PIPE_INFO*)(buf+len);
					for (l = 0; l < bNumEndpoints; l++) {
						WDU_PIPE_INFO *pi = (WDU_PIPE_INFO*)(buf+len);

						pi->dwNumber = interface->altsetting[k].endpoint[l].bEndpointAddress;
						pi->dwMaximumPacketSize = WDU_GET_MAX_PACKET_SIZE(interface->altsetting[k].endpoint[l].wMaxPacketSize);
						pi->type = interface->altsetting[k].endpoint[l].bmAttributes & USB_ENDPOINT_TYPE_MASK;
						if (pi->type == PIPE_TYPE_CONTROL)
							pi->direction = WDU_DIR_IN_OUT;
						else
						{
							pi->direction = interface->altsetting[k].endpoint[l].bEndpointAddress & USB_ENDPOINT_DIR_MASK ?  WDU_DIR_IN : WDU_DIR_OUT;
						}

						pi->dwInterval = interface->altsetting[k].endpoint[l].bInterval;

						len += sizeof(WDU_PIPE_INFO);
					}
				} else {
					len +=(sizeof(WDU_ENDPOINT_DESCRIPTOR)+sizeof(WDU_PIPE_INFO))*bNumEndpoints;
				}
			}
		}
	}

	ugdd->dwBytes = len;

	return 0;
}

static int xpcu_claim(struct xpcu_s *xpcu, int claim) {
	int ret = 0;
	static int claimed = 0;

	if (xpcu->interface < 0)
		return -1;
	
	if (claim == XPCU_CLAIM) {
		if (claimed)
			return 0;

		ret = usb_claim_interface(xpcu->handle, xpcu->interface);
		if (!ret) {
			claimed = 1;
			ret = usb_set_altinterface(xpcu->handle, xpcu->alternate);
			if (ret)
				fprintf(stderr, "usb_set_altinterface: %d\n", ret);
		} else {
			fprintf(stderr, "usb_claim_interface: %d -> %d (%s)\n",
					xpcu->interface, ret, usb_strerror());
		}
	} else {
		if (!claimed)
			return 0;

		ret = usb_release_interface(xpcu->handle, xpcu->interface);
		if (!ret)
			claimed = 0;
	}

	return ret;
}

int xpcu_transfer(struct usb_transfer *ut) {
	struct xpcu_s *xpcu = (struct xpcu_s*)ut->dwUniqueID;
	int ret = 0;

	if (!xpcu)
		return -ENODEV;

	xpcu_claim(xpcu, XPCU_CLAIM);
	/* http://www.jungo.com/support/documentation/windriver/802/wdusb_man_mhtml/node55.html#SECTION001213000000000000000 */
	if (ut->dwPipeNum == 0) { /* control pipe */
		int requesttype, request, value, index, size;
		requesttype = ut->SetupPacket[0];
		request = ut->SetupPacket[1];
		value = ut->SetupPacket[2] | (ut->SetupPacket[3] << 8);
		index = ut->SetupPacket[4] | (ut->SetupPacket[5] << 8);
		size = ut->SetupPacket[6] | (ut->SetupPacket[7] << 8);
		DPRINTF("-> requesttype: %x, request: %x, value: %u, index: %u, size: %u\n", requesttype, request, value, index, size);
		ret = usb_control_msg(xpcu->handle, requesttype, request, value, index, ut->pBuffer, size, ut->dwTimeout);
	} else {
		if (ut->fRead) {
			ret = usb_bulk_read(xpcu->handle, ut->dwPipeNum, ut->pBuffer, ut->dwBufferSize, ut->dwTimeout);
		} else {
			ret = usb_bulk_write(xpcu->handle, ut->dwPipeNum, ut->pBuffer, ut->dwBufferSize, ut->dwTimeout);
		}
		xpcu_claim(xpcu, XPCU_RELEASE);
	}

	if (ret < 0) {
		fprintf(stderr, "usb_transfer: %d (%s)\n", ret, usb_strerror());
	} else {
		ut->dwBytesTransferred = ret;
		ret = 0;
	}

	return ret;
}

int xpcu_set_interface(struct usb_set_interface *usi) {
	struct xpcu_s *xpcu = (struct xpcu_s*)usi->dwUniqueID;

	if (!xpcu)
		return -ENODEV;

	if (xpcu->dev) {
		if (!xpcu->handle) {
			xpcu->handle = usb_open(xpcu->dev);
#ifndef NO_USB_RESET
			if (xpcu->handle) {
				usb_reset(xpcu->handle);
				xpcu->handle = usb_open(xpcu->dev);
			}
#endif
		}

		xpcu->interface = xpcu->dev->config[0].interface[usi->dwInterfaceNum].altsetting[usi->dwAlternateSetting].bInterfaceNumber;
		xpcu->alternate = usi->dwAlternateSetting;
	}

	return 0;
}

static void xpcu_init(void) {
	if (busses)
		return;

	usb_init();
	usb_find_busses();
	usb_find_devices();

	busses = usb_get_busses();

	pthread_mutex_init(&dummy_interrupt, NULL);
}


int xpcu_find(struct event *e) {
	struct xpcu_event_s *xpcu_event = NULL;
	struct xpcu_s *xpcu = NULL;
	char* devpos;
	struct usb_bus *bus;
	int busnum = -1, devnum = -1;
	int i;

	e->handle = (unsigned long)NULL;

	xpcu_init();

	xpcu_event = malloc(sizeof(struct xpcu_event_s));
	if (!xpcu_event)
		return -ENOMEM;

	bzero(xpcu_event, sizeof(struct xpcu_event_s));
	xpcu_event->xpcu = NULL;
	xpcu_event->count = 0;
	xpcu_event->interrupt_count = 0;
	pthread_mutex_init(&xpcu_event->interrupt, NULL);

	devpos = getenv("XILINX_USB_DEV");
	if (devpos != NULL) {
		int j;
		char *devstr = NULL, *remainder;

		DPRINTF("XILINX_USB_DEV=%s\n", devpos);

		for (j = 0; j < strlen(devpos) && devpos[j] != 0; j++) {
			if (devpos[j] == ':') {
				devpos[j] = 0;
				devstr = &(devpos[j+1]);
			}
		}

		if (devstr && strlen(devstr) > 0) {
			busnum = strtol(devpos, &remainder, 10);
			if (devpos == remainder) {
				busnum = -1;
			} else {
				devnum = strtol(devstr, &remainder, 10);
				if (devstr == remainder) {
					busnum = -1;
					devnum = -1;
				} else {
					fprintf(stderr,"Using XILINX platform cable USB at %03d:%03d\n",
							busnum, devnum);
				}
			}
		}
	}

	for (i = 0; i < e->dwNumMatchTables; i++) {

		DPRINTF("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);

		for (bus = busses; bus; bus = bus->next) {
			struct usb_device *dev;

			if ((devnum != -1) && (strtol(bus->dirname, NULL, 10) != busnum))
				continue;

			for (dev = bus->devices; dev; dev = dev->next) {
				struct usb_device_descriptor *desc = &(dev->descriptor);

				if((desc->idVendor == e->matchTables[i].VendorId) &&
						(desc->idProduct == e->matchTables[i].ProductId) &&
						(desc->bDeviceClass == e->matchTables[i].bDeviceClass) &&
						(desc->bDeviceSubClass == e->matchTables[i].bDeviceSubClass) &&
						((devnum == -1) || (strtol(dev->filename, NULL, 10) == devnum)) ) {
					int ac;
					for (ac = 0; ac < desc->bNumConfigurations; ac++) {
						struct usb_interface *interface = dev->config[ac].interface;
						int ai;

						for (ai = 0; ai < interface->num_altsetting; ai++) {

							DPRINTF("intclass: %x, intsubclass: %x, intproto: %x\n",
									interface->altsetting[i].bInterfaceClass,
									interface->altsetting[i].bInterfaceSubClass,
									interface->altsetting[i].bInterfaceProtocol);

							if ((interface->altsetting[ai].bInterfaceSubClass == e->matchTables[i].bInterfaceSubClass) &&
									(interface->altsetting[ai].bInterfaceProtocol == e->matchTables[i].bInterfaceProtocol)){
								int n = xpcu_event->count;

								/* TODO: check interfaceClass! */
								DPRINTF("found device with libusb\n");

								xpcu = realloc(xpcu, sizeof(struct xpcu_s) * (++xpcu_event->count));
								if (!xpcu) {
									free(xpcu_event);
									return -ENOMEM;
								}

								bzero(&(xpcu[n]), sizeof(struct xpcu_s));
								xpcu[n].interface = -1;
								xpcu[n].alternate = -1;
								xpcu[n].dev = dev;
								xpcu[n].card_type = e->dwCardType;

								xpcu_event->xpcu = xpcu;
							}
						}
					}
				}
			}
		}
	}

	e->handle = (unsigned long)xpcu_event;

	return 0;
}

int xpcu_found(struct event *e) {
	struct xpcu_event_s *xpcu_event = (struct xpcu_event_s*)e->handle;
	struct xpcu_s *xpcu = NULL;

	if (xpcu_event && xpcu_event->count && (xpcu_event->interrupt_count <= xpcu_event->count))
		xpcu = &(xpcu_event->xpcu[xpcu_event->interrupt_count-1]);

	if (xpcu && xpcu->dev) {
		struct usb_interface *interface = xpcu->dev->config->interface;

		e->dwCardType = xpcu->card_type;
		e->dwAction = 1;
		e->dwEventId = 1;
		e->u.Usb.dwUniqueID = (unsigned long)xpcu;
		e->matchTables[0].VendorId = xpcu->dev->descriptor.idVendor;
		e->matchTables[0].ProductId = xpcu->dev->descriptor.idProduct;
		e->matchTables[0].bDeviceClass = xpcu->dev->descriptor.bDeviceClass;
		e->matchTables[0].bDeviceSubClass = xpcu->dev->descriptor.bDeviceSubClass;
		e->matchTables[0].bInterfaceClass = interface->altsetting[0].bInterfaceClass;
		e->matchTables[0].bInterfaceSubClass = interface->altsetting[0].bInterfaceSubClass;
		e->matchTables[0].bInterfaceProtocol = interface->altsetting[0].bInterfaceProtocol;
	}

	return 0;
}

int xpcu_close(struct event *e) {
	struct xpcu_event_s *xpcu_event = (struct xpcu_event_s*)e->handle;

	if (!xpcu_event)
		return -ENODEV;

	if(xpcu_event) {
		struct  xpcu_s *xpcu;
		int i;

		for (i = 0; i < xpcu_event->count; i++) {
			xpcu = &(xpcu_event->xpcu[i]);
			if (xpcu->handle) {
				xpcu_claim(xpcu, XPCU_RELEASE);
				usb_close(xpcu->handle);
			}
		}

		if (xpcu_event->xpcu)
			free(xpcu_event->xpcu);

		busses = NULL;
		free(xpcu_event);
	}

	return 0;
}

int xpcu_int_state(struct interrupt *it, int enable) {
	struct xpcu_event_s *xpcu_event = (struct xpcu_event_s*)it->hInterrupt;
	pthread_mutex_t *interrupt = &dummy_interrupt;

	if (xpcu_event)
		interrupt = &xpcu_event->interrupt;
	
	if (enable == ENABLE_INTERRUPT) {
		it->fEnableOk = 1;
		it->fStopped = 0;
		it->dwCounter = 0;
		pthread_mutex_trylock(interrupt);
	} else {
		it->dwCounter = 0;
		it->fStopped = 1;
		if (pthread_mutex_trylock(interrupt) == EBUSY)
			pthread_mutex_unlock(interrupt);
	}

	return 0;
}

int xpcu_int_wait(struct interrupt *it) {
	struct xpcu_event_s *xpcu_event = (struct xpcu_event_s*)it->hInterrupt;

	if (xpcu_event) {
		if (it->dwCounter < xpcu_event->count) {
			it->dwCounter++;
		} else {
			pthread_mutex_lock(&xpcu_event->interrupt);
			pthread_mutex_unlock(&xpcu_event->interrupt);
		}
		xpcu_event->interrupt_count++;
	} else {
		pthread_mutex_lock(&dummy_interrupt);
		pthread_mutex_unlock(&dummy_interrupt);
	}

	return 0;
}
Commit	Line	Data
cbfa0ac6 MG	1	#include <stdio.h>
	2	#include <stdlib.h>
	3	#include <unistd.h>
f92c0fbc	4	#include <string.h>
cbfa0ac6 MG	5	#include <strings.h>
cbfa0ac6 MG	6	#include <usb.h>
f92c0fbc	7	#include <errno.h>
501f1c21	8	#include <pthread.h>
cbfa0ac6	9	#include "usb-driver.h"
6c235d59	10	#include "xpcu.h"
cbfa0ac6	11
19acdb82 MG	12	struct xpcu_s {
	13	struct usb_device *dev;
	14	usb_dev_handle *handle;
	15	int interface;
	16	int alternate;
	17	unsigned long card_type;
9bfaca62 MG	18	};
	19
	20	struct xpcu_event_s {
	21	struct xpcu_s *xpcu;
	22	int count;
	23	int interrupt_count;
19acdb82 MG	24	pthread_mutex_t interrupt;
	25	};
	26
f92c0fbc	27	static struct usb_bus *busses = NULL;
501f1c21	28	static pthread_mutex_t dummy_interrupt = PTHREAD_MUTEX_INITIALIZER;
f92c0fbc	29
19acdb82 MG	30	int xpcu_deviceinfo(struct usb_get_device_data *ugdd) {
19acdb82 MG	31	struct xpcu_s xpcu = (struct xpcu_s)ugdd->dwUniqueID;
cbfa0ac6 MG	32	int i,j,k,l;
cbfa0ac6 MG	33	int len = 0;
f92c0fbc	34	unsigned char *buf = NULL;
cbfa0ac6 MG	35	WDU_CONFIGURATION pConfigs, pActiveConfig;
	36	WDU_INTERFACE **pActiveInterface;
	37
8af4d910 MG	38	if (!xpcu)
8af4d910 MG	39	return -ENODEV;
f92c0fbc MG	40
	41	if (ugdd->dwBytes)
	42	buf = ugdd->pBuf;
	43
cbfa0ac6 MG	44	if (buf) {
	45	struct usb_device_info udi = (struct usb_device_info)(buf+len);
	46
	47	udi->Descriptor.bLength = sizeof(WDU_DEVICE_DESCRIPTOR);
	48	udi->Descriptor.bDescriptorType = xpcu->dev->descriptor.bDescriptorType;
	49	udi->Descriptor.bcdUSB = xpcu->dev->descriptor.bcdUSB;
	50	udi->Descriptor.bDeviceClass = xpcu->dev->descriptor.bDeviceClass;
	51	udi->Descriptor.bDeviceSubClass = xpcu->dev->descriptor.bDeviceSubClass;
	52	udi->Descriptor.bDeviceProtocol = xpcu->dev->descriptor.bDeviceProtocol;
	53	udi->Descriptor.bMaxPacketSize0 = xpcu->dev->descriptor.bMaxPacketSize0;
	54	udi->Descriptor.idVendor = xpcu->dev->descriptor.idVendor;
	55	udi->Descriptor.idProduct = xpcu->dev->descriptor.idProduct;
	56	udi->Descriptor.bcdDevice = xpcu->dev->descriptor.bcdDevice;
	57	udi->Descriptor.iManufacturer = xpcu->dev->descriptor.iManufacturer;
	58	udi->Descriptor.iProduct = xpcu->dev->descriptor.iProduct;
	59	udi->Descriptor.iSerialNumber = xpcu->dev->descriptor.iSerialNumber;
	60	udi->Descriptor.bNumConfigurations = xpcu->dev->descriptor.bNumConfigurations;
	61
	62	/* TODO: Fix Pipe0! */
	63	udi->Pipe0.dwNumber = 0x00;
	64	udi->Pipe0.dwMaximumPacketSize = xpcu->dev->descriptor.bMaxPacketSize0;
	65	udi->Pipe0.type = 0;
	66	udi->Pipe0.direction = WDU_DIR_IN_OUT;
	67	udi->Pipe0.dwInterval = 0;
	68
	69	pConfigs = &(udi->pConfigs);
	70	pActiveConfig = &(udi->pActiveConfig);
	71	pActiveInterface = &(udi->pActiveInterface[0]);
	72	}
	73
	74	len = sizeof(struct usb_device_info);
	75
	76	for (i=0; i<xpcu->dev->descriptor.bNumConfigurations; i++)
	77	{
	78	struct usb_config_descriptor *conf_desc = &xpcu->dev->config[i];
	79	WDU_INTERFACE **pInterfaces;
	80	WDU_ALTERNATE_SETTING **pAlternateSettings[conf_desc->bNumInterfaces];
	81	WDU_ALTERNATE_SETTING **pActiveAltSetting[conf_desc->bNumInterfaces];
	82
	83	if (buf) {
	84	WDU_CONFIGURATION cfg = (WDU_CONFIGURATION)(buf+len);
	85
	86	*pConfigs = cfg;
	87	*pActiveConfig = cfg;
	88
	89	cfg->Descriptor.bLength = conf_desc->bLength;
	90	cfg->Descriptor.bDescriptorType = conf_desc->bDescriptorType;
	91	cfg->Descriptor.wTotalLength = conf_desc->wTotalLength;
	92	cfg->Descriptor.bNumInterfaces = conf_desc->bNumInterfaces;
	93	cfg->Descriptor.bConfigurationValue = conf_desc->bConfigurationValue;
	94	cfg->Descriptor.iConfiguration = conf_desc->iConfiguration;
	95	cfg->Descriptor.bmAttributes = conf_desc->bmAttributes;
	96	cfg->Descriptor.MaxPower = conf_desc->MaxPower;
	97
	98	cfg->dwNumInterfaces = conf_desc->bNumInterfaces;
	99
	100	pInterfaces = &(cfg->pInterfaces);
	101	}
	102	len += sizeof(WDU_CONFIGURATION);
	103
	104	if (buf) {
	105	pInterfaces = (WDU_INTERFACE)(buf+len);
	106	for (j=0; j<conf_desc->bNumInterfaces; j++) {
	107	WDU_INTERFACE iface = (WDU_INTERFACE)(buf+len);
108
109	pActiveInterface[j] = iface;
110
111	pAlternateSettings[j] = &(iface->pAlternateSettings);
112	iface->dwNumAltSettings = xpcu->dev->config[i].interface[j].num_altsetting;
113	pActiveAltSetting[j] = &(iface->pActiveAltSetting);
114
115	len += sizeof(WDU_INTERFACE);
116	}
117	} else {
118	len += sizeof(WDU_INTERFACE) * conf_desc->bNumInterfaces;
119	}
120
121	for (j=0; j<conf_desc->bNumInterfaces; j++)
122	{
123	struct usb_interface *interface = &xpcu->dev->config[i].interface[j];
124
125	if (buf) {
126	pAlternateSettings[j] = (WDU_ALTERNATE_SETTING)(buf+len);
127	/* FIXME: */
128	pActiveAltSetting[j] = (WDU_ALTERNATE_SETTING)(buf+len);
129	}
130
131	for(k=0; k<interface->num_altsetting; k++)
132	{
133	unsigned char bNumEndpoints = interface->altsetting[k].bNumEndpoints;
134	WDU_ENDPOINT_DESCRIPTOR **pEndpointDescriptors;
135	WDU_PIPE_INFO **pPipes;
136
137	if (buf) {
138	WDU_ALTERNATE_SETTING altset = (WDU_ALTERNATE_SETTING)(buf+len);
139
140	altset->Descriptor.bLength = interface->altsetting[k].bLength;
141	altset->Descriptor.bDescriptorType = interface->altsetting[k].bDescriptorType;
142	altset->Descriptor.bInterfaceNumber = interface->altsetting[k].bInterfaceNumber;
143	altset->Descriptor.bAlternateSetting = interface->altsetting[k].bAlternateSetting;
144	altset->Descriptor.bNumEndpoints = interface->altsetting[k].bNumEndpoints;
145	altset->Descriptor.bInterfaceClass = interface->altsetting[k].bInterfaceClass;
146	altset->Descriptor.bInterfaceSubClass = interface->altsetting[k].bInterfaceSubClass;
147	altset->Descriptor.bInterfaceProtocol = interface->altsetting[k].bInterfaceProtocol;
148	altset->Descriptor.iInterface = interface->altsetting[k].iInterface;
149	pEndpointDescriptors = &(altset->pEndpointDescriptors);
150	pPipes = &(altset->pPipes);
151
152	}
153	len +=sizeof(WDU_ALTERNATE_SETTING);
154
155	if (buf) {
156	pEndpointDescriptors = (WDU_ENDPOINT_DESCRIPTOR)(buf+len);
157	for (l = 0; l < bNumEndpoints; l++) {
158	WDU_ENDPOINT_DESCRIPTOR ed = (WDU_ENDPOINT_DESCRIPTOR)(buf+len);
159
160	ed->bLength = interface->altsetting[k].endpoint[l].bLength;
161	ed->bDescriptorType = interface->altsetting[k].endpoint[l].bDescriptorType;
162	ed->bEndpointAddress = interface->altsetting[k].endpoint[l].bEndpointAddress;
163	ed->bmAttributes = interface->altsetting[k].endpoint[l].bmAttributes;
164	ed->wMaxPacketSize = interface->altsetting[k].endpoint[l].wMaxPacketSize;
165	ed->bInterval = interface->altsetting[k].endpoint[l].bInterval;
166
167	len += sizeof(WDU_ENDPOINT_DESCRIPTOR);
168	}
169
170	pPipes = (WDU_PIPE_INFO)(buf+len);
171	for (l = 0; l < bNumEndpoints; l++) {
172	WDU_PIPE_INFO pi = (WDU_PIPE_INFO)(buf+len);
173
174	pi->dwNumber = interface->altsetting[k].endpoint[l].bEndpointAddress;
175	pi->dwMaximumPacketSize = WDU_GET_MAX_PACKET_SIZE(interface->altsetting[k].endpoint[l].wMaxPacketSize);
176	pi->type = interface->altsetting[k].endpoint[l].bmAttributes & USB_ENDPOINT_TYPE_MASK;
177	if (pi->type == PIPE_TYPE_CONTROL)
178	pi->direction = WDU_DIR_IN_OUT;
179	else
180	{
181	pi->direction = interface->altsetting[k].endpoint[l].bEndpointAddress & USB_ENDPOINT_DIR_MASK ? WDU_DIR_IN : WDU_DIR_OUT;
182	}
183
184	pi->dwInterval = interface->altsetting[k].endpoint[l].bInterval;
185
186	len += sizeof(WDU_PIPE_INFO);
187	}
188	} else {
189	len +=(sizeof(WDU_ENDPOINT_DESCRIPTOR)+sizeof(WDU_PIPE_INFO))*bNumEndpoints;
190	}
191	}
192	}
193	}
194
8af4d910 MG	195	ugdd->dwBytes = len;
	196
	197	return 0;
cbfa0ac6 MG	198	}
cbfa0ac6 MG	199
6234190b	200	static int xpcu_claim(struct xpcu_s *xpcu, int claim) {
cbfa0ac6 MG	201	int ret = 0;
	202	static int claimed = 0;
	203
	204	if (xpcu->interface < 0)
	205	return -1;
	206
	207	if (claim == XPCU_CLAIM) {
	208	if (claimed)
	209	return 0;
	210
	211	ret = usb_claim_interface(xpcu->handle, xpcu->interface);
	212	if (!ret) {
	213	claimed = 1;
	214	ret = usb_set_altinterface(xpcu->handle, xpcu->alternate);
	215	if (ret)
	216	fprintf(stderr, "usb_set_altinterface: %d\n", ret);
	217	} else {
	218	fprintf(stderr, "usb_claim_interface: %d -> %d (%s)\n",
	219	xpcu->interface, ret, usb_strerror());
	220	}
	221	} else {
	222	if (!claimed)
	223	return 0;
	224
	225	ret = usb_release_interface(xpcu->handle, xpcu->interface);
	226	if (!ret)
	227	claimed = 0;
	228	}
	229
	230	return ret;
	231	}
	232
19acdb82 MG	233	int xpcu_transfer(struct usb_transfer *ut) {
19acdb82 MG	234	struct xpcu_s xpcu = (struct xpcu_s)ut->dwUniqueID;
6c235d59 MG	235	int ret = 0;
6c235d59 MG	236
8af4d910 MG	237	if (!xpcu)
8af4d910 MG	238	return -ENODEV;
f92c0fbc	239
6c235d59 MG	240	xpcu_claim(xpcu, XPCU_CLAIM);
	241	/* http://www.jungo.com/support/documentation/windriver/802/wdusb_man_mhtml/node55.html#SECTION001213000000000000000 */
	242	if (ut->dwPipeNum == 0) { /* control pipe */
	243	int requesttype, request, value, index, size;
	244	requesttype = ut->SetupPacket[0];
	245	request = ut->SetupPacket[1];
	246	value = ut->SetupPacket[2] \| (ut->SetupPacket[3] << 8);
	247	index = ut->SetupPacket[4] \| (ut->SetupPacket[5] << 8);
	248	size = ut->SetupPacket[6] \| (ut->SetupPacket[7] << 8);
501f1c21	249	DPRINTF("-> requesttype: %x, request: %x, value: %u, index: %u, size: %u\n", requesttype, request, value, index, size);
6c235d59 MG	250	ret = usb_control_msg(xpcu->handle, requesttype, request, value, index, ut->pBuffer, size, ut->dwTimeout);
	251	} else {
	252	if (ut->fRead) {
	253	ret = usb_bulk_read(xpcu->handle, ut->dwPipeNum, ut->pBuffer, ut->dwBufferSize, ut->dwTimeout);
	254	} else {
	255	ret = usb_bulk_write(xpcu->handle, ut->dwPipeNum, ut->pBuffer, ut->dwBufferSize, ut->dwTimeout);
	256	}
	257	xpcu_claim(xpcu, XPCU_RELEASE);
	258	}
	259
	260	if (ret < 0) {
	261	fprintf(stderr, "usb_transfer: %d (%s)\n", ret, usb_strerror());
	262	} else {
	263	ut->dwBytesTransferred = ret;
	264	ret = 0;
	265	}
	266
	267	return ret;
	268	}
	269
19acdb82 MG	270	int xpcu_set_interface(struct usb_set_interface *usi) {
	271	struct xpcu_s xpcu = (struct xpcu_s)usi->dwUniqueID;
	272
8af4d910 MG	273	if (!xpcu)
8af4d910 MG	274	return -ENODEV;
f92c0fbc	275
0c2db148 MG	276	if (xpcu->dev) {
	277	if (!xpcu->handle) {
	278	xpcu->handle = usb_open(xpcu->dev);
	279	#ifndef NO_USB_RESET
	280	if (xpcu->handle) {
	281	usb_reset(xpcu->handle);
	282	xpcu->handle = usb_open(xpcu->dev);
	283	}
	284	#endif
	285	}
	286
	287	xpcu->interface = xpcu->dev->config[0].interface[usi->dwInterfaceNum].altsetting[usi->dwAlternateSetting].bInterfaceNumber;
	288	xpcu->alternate = usi->dwAlternateSetting;
	289	}
8af4d910 MG	290
8af4d910 MG	291	return 0;
0c2db148 MG	292	}
0c2db148 MG	293
f92c0fbc MG	294	static void xpcu_init(void) {
	295	if (busses)
	296	return;
	297
	298	usb_init();
	299	usb_find_busses();
	300	usb_find_devices();
	301
	302	busses = usb_get_busses();
0a2341bb MG	303
0a2341bb MG	304	pthread_mutex_init(&dummy_interrupt, NULL);
f92c0fbc MG	305	}
	306
	307
19acdb82	308	int xpcu_find(struct event *e) {
9bfaca62	309	struct xpcu_event_s *xpcu_event = NULL;
19acdb82	310	struct xpcu_s *xpcu = NULL;
f92c0fbc MG	311	char* devpos;
	312	struct usb_bus *bus;
	313	int busnum = -1, devnum = -1;
	314	int i;
cbfa0ac6	315
9bfaca62 MG	316	e->handle = (unsigned long)NULL;
9bfaca62 MG	317
f92c0fbc MG	318	xpcu_init();
f92c0fbc MG	319
9bfaca62 MG	320	xpcu_event = malloc(sizeof(struct xpcu_event_s));
	321	if (!xpcu_event)
	322	return -ENOMEM;
	323
	324	bzero(xpcu_event, sizeof(struct xpcu_event_s));
	325	xpcu_event->xpcu = NULL;
	326	xpcu_event->count = 0;
	327	xpcu_event->interrupt_count = 0;
	328	pthread_mutex_init(&xpcu_event->interrupt, NULL);
	329
f92c0fbc MG	330	devpos = getenv("XILINX_USB_DEV");
	331	if (devpos != NULL) {
	332	int j;
	333	char devstr = NULL, remainder;
	334
	335	DPRINTF("XILINX_USB_DEV=%s\n", devpos);
	336
	337	for (j = 0; j < strlen(devpos) && devpos[j] != 0; j++) {
	338	if (devpos[j] == ':') {
	339	devpos[j] = 0;
	340	devstr = &(devpos[j+1]);
	341	}
	342	}
	343
	344	if (devstr && strlen(devstr) > 0) {
	345	busnum = strtol(devpos, &remainder, 10);
	346	if (devpos == remainder) {
	347	busnum = -1;
	348	} else {
	349	devnum = strtol(devstr, &remainder, 10);
	350	if (devstr == remainder) {
	351	busnum = -1;
	352	devnum = -1;
	353	} else {
	354	fprintf(stderr,"Using XILINX platform cable USB at %03d:%03d\n",
	355	busnum, devnum);
	356	}
	357	}
	358	}
	359	}
	360
	361	for (i = 0; i < e->dwNumMatchTables; i++) {
	362
	363	DPRINTF("match: dev: %04x:%04x, class: %x, subclass: %x, intclass: %x, intsubclass: %x, intproto: %x\n",
	364	e->matchTables[i].VendorId,
	365	e->matchTables[i].ProductId,
	366	e->matchTables[i].bDeviceClass,
	367	e->matchTables[i].bDeviceSubClass,
	368	e->matchTables[i].bInterfaceClass,
	369	e->matchTables[i].bInterfaceSubClass,
	370	e->matchTables[i].bInterfaceProtocol);
	371
	372	for (bus = busses; bus; bus = bus->next) {
	373	struct usb_device *dev;
	374
	375	if ((devnum != -1) && (strtol(bus->dirname, NULL, 10) != busnum))
	376	continue;
	377
	378	for (dev = bus->devices; dev; dev = dev->next) {
	379	struct usb_device_descriptor *desc = &(dev->descriptor);
	380
	381	if((desc->idVendor == e->matchTables[i].VendorId) &&
	382	(desc->idProduct == e->matchTables[i].ProductId) &&
	383	(desc->bDeviceClass == e->matchTables[i].bDeviceClass) &&
	384	(desc->bDeviceSubClass == e->matchTables[i].bDeviceSubClass) &&
	385	((devnum == -1) \|\| (strtol(dev->filename, NULL, 10) == devnum)) ) {
	386	int ac;
	387	for (ac = 0; ac < desc->bNumConfigurations; ac++) {
	388	struct usb_interface *interface = dev->config[ac].interface;
	389	int ai;
	390
	391	for (ai = 0; ai < interface->num_altsetting; ai++) {
	392
	393	DPRINTF("intclass: %x, intsubclass: %x, intproto: %x\n",
394	interface->altsetting[i].bInterfaceClass,
395	interface->altsetting[i].bInterfaceSubClass,
396	interface->altsetting[i].bInterfaceProtocol);
397
398	if ((interface->altsetting[ai].bInterfaceSubClass == e->matchTables[i].bInterfaceSubClass) &&
399	(interface->altsetting[ai].bInterfaceProtocol == e->matchTables[i].bInterfaceProtocol)){
9bfaca62 MG	400	int n = xpcu_event->count;
9bfaca62 MG	401
f92c0fbc MG	402	/* TODO: check interfaceClass! */
f92c0fbc MG	403	DPRINTF("found device with libusb\n");
501f1c21	404
9bfaca62 MG	405	xpcu = realloc(xpcu, sizeof(struct xpcu_s) * (++xpcu_event->count));
	406	if (!xpcu) {
	407	free(xpcu_event);
19acdb82	408	return -ENOMEM;
9bfaca62 MG	409	}
	410
	411	bzero(&(xpcu[n]), sizeof(struct xpcu_s));
	412	xpcu[n].interface = -1;
	413	xpcu[n].alternate = -1;
	414	xpcu[n].dev = dev;
	415	xpcu[n].card_type = e->dwCardType;
19acdb82	416
9bfaca62	417	xpcu_event->xpcu = xpcu;
f92c0fbc MG	418	}
	419	}
	420	}
	421	}
	422	}
	423	}
	424	}
cbfa0ac6	425
9bfaca62	426	e->handle = (unsigned long)xpcu_event;
cbfa0ac6	427
19acdb82	428	return 0;
cbfa0ac6	429	}
6234190b	430
19acdb82	431	int xpcu_found(struct event *e) {
9bfaca62 MG	432	struct xpcu_event_s xpcu_event = (struct xpcu_event_s)e->handle;
	433	struct xpcu_s *xpcu = NULL;
	434
	435	if (xpcu_event && xpcu_event->count && (xpcu_event->interrupt_count <= xpcu_event->count))
	436	xpcu = &(xpcu_event->xpcu[xpcu_event->interrupt_count-1]);
19acdb82 MG	437
19acdb82 MG	438	if (xpcu && xpcu->dev) {
f92c0fbc MG	439	struct usb_interface *interface = xpcu->dev->config->interface;
	440
	441	e->dwCardType = xpcu->card_type;
	442	e->dwAction = 1;
	443	e->dwEventId = 1;
9bfaca62	444	e->u.Usb.dwUniqueID = (unsigned long)xpcu;
f92c0fbc MG	445	e->matchTables[0].VendorId = xpcu->dev->descriptor.idVendor;
	446	e->matchTables[0].ProductId = xpcu->dev->descriptor.idProduct;
	447	e->matchTables[0].bDeviceClass = xpcu->dev->descriptor.bDeviceClass;
	448	e->matchTables[0].bDeviceSubClass = xpcu->dev->descriptor.bDeviceSubClass;
	449	e->matchTables[0].bInterfaceClass = interface->altsetting[0].bInterfaceClass;
	450	e->matchTables[0].bInterfaceSubClass = interface->altsetting[0].bInterfaceSubClass;
	451	e->matchTables[0].bInterfaceProtocol = interface->altsetting[0].bInterfaceProtocol;
6234190b	452	}
8af4d910 MG	453
8af4d910 MG	454	return 0;
f92c0fbc MG	455	}
f92c0fbc MG	456
19acdb82	457	int xpcu_close(struct event *e) {
9bfaca62	458	struct xpcu_event_s xpcu_event = (struct xpcu_event_s)e->handle;
19acdb82	459
9bfaca62	460	if (!xpcu_event)
8af4d910	461	return -ENODEV;
6234190b	462
9bfaca62 MG	463	if(xpcu_event) {
	464	struct xpcu_s *xpcu;
	465	int i;
	466
	467	for (i = 0; i < xpcu_event->count; i++) {
	468	xpcu = &(xpcu_event->xpcu[i]);
	469	if (xpcu->handle) {
	470	xpcu_claim(xpcu, XPCU_RELEASE);
	471	usb_close(xpcu->handle);
	472	}
f92c0fbc MG	473	}
f92c0fbc MG	474
9bfaca62 MG	475	if (xpcu_event->xpcu)
	476	free(xpcu_event->xpcu);
	477
f92c0fbc	478	busses = NULL;
9bfaca62	479	free(xpcu_event);
f92c0fbc	480	}
8af4d910 MG	481
8af4d910 MG	482	return 0;
6234190b	483	}
501f1c21	484
19acdb82	485	int xpcu_int_state(struct interrupt *it, int enable) {
9bfaca62	486	struct xpcu_event_s xpcu_event = (struct xpcu_event_s)it->hInterrupt;
19acdb82	487	pthread_mutex_t *interrupt = &dummy_interrupt;
501f1c21	488
9bfaca62 MG	489	if (xpcu_event)
9bfaca62 MG	490	interrupt = &xpcu_event->interrupt;
501f1c21 MG	491
	492	if (enable == ENABLE_INTERRUPT) {
	493	it->fEnableOk = 1;
	494	it->fStopped = 0;
9bfaca62	495	it->dwCounter = 0;
501f1c21 MG	496	pthread_mutex_trylock(interrupt);
	497	} else {
	498	it->dwCounter = 0;
	499	it->fStopped = 1;
	500	if (pthread_mutex_trylock(interrupt) == EBUSY)
	501	pthread_mutex_unlock(interrupt);
	502	}
8af4d910 MG	503
8af4d910 MG	504	return 0;
501f1c21 MG	505	}
501f1c21 MG	506
19acdb82	507	int xpcu_int_wait(struct interrupt *it) {
9bfaca62	508	struct xpcu_event_s xpcu_event = (struct xpcu_event_s)it->hInterrupt;
19acdb82	509
9bfaca62 MG	510	if (xpcu_event) {
	511	if (it->dwCounter < xpcu_event->count) {
	512	it->dwCounter++;
501f1c21	513	} else {
9bfaca62 MG	514	pthread_mutex_lock(&xpcu_event->interrupt);
9bfaca62 MG	515	pthread_mutex_unlock(&xpcu_event->interrupt);
501f1c21	516	}
9bfaca62	517	xpcu_event->interrupt_count++;
501f1c21 MG	518	} else {
	519	pthread_mutex_lock(&dummy_interrupt);
	520	pthread_mutex_unlock(&dummy_interrupt);
	521	}
8af4d910 MG	522
8af4d910 MG	523	return 0;
501f1c21	524	}