[libserialport.git] / windows.c

/*
 * This file is part of the libserialport project.
 *
 * Copyright (C) 2013-2014 Martin Ling <martin-libserialport@earth.li>
 * Copyright (C) 2014 Aurelien Jacobs <aurel@gnuage.org>
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU Lesser General Public License as
 * published by the Free Software Foundation, either version 3 of the
 * License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */

#include <config.h>
#include "libserialport.h"
#include "libserialport_internal.h"

/* USB path is a string of at most 8 decimal numbers < 128 separated by dots. */
#define MAX_USB_PATH ((8 * 3) + (7 * 1) + 1)

static void enumerate_hub(struct sp_port *port, const char *hub_name,
                          const char *parent_path, DEVINST dev_inst);

static char *wc_to_utf8(PWCHAR wc_buffer, ULONG size)
{
	WCHAR wc_str[(size / sizeof(WCHAR)) + 1];
	char *utf8_str;

	/* Zero-terminate the wide char string. */
	memcpy(wc_str, wc_buffer, size);
	wc_str[sizeof(wc_str) - 1] = 0;

	/* Compute the size of the UTF-8 converted string. */
	if (!(size = WideCharToMultiByte(CP_ACP, WC_NO_BEST_FIT_CHARS, wc_str, -1,
	                                 NULL, 0, NULL, NULL)))
		return NULL;

	/* Allocate UTF-8 output buffer. */
	if (!(utf8_str = malloc(size)))
		return NULL;

	/* Actually converted to UTF-8. */
	if (!WideCharToMultiByte(CP_ACP, WC_NO_BEST_FIT_CHARS, wc_str, -1,
	                         utf8_str, size, NULL, NULL)) {
		free(utf8_str);
		return NULL;
	}

	return utf8_str;
}

static char *get_root_hub_name(HANDLE host_controller)
{
	USB_ROOT_HUB_NAME root_hub_name;
	PUSB_ROOT_HUB_NAME root_hub_name_wc;
	char *root_hub_name_utf8;
	ULONG size = 0;

	/* Compute the size of the root hub name string. */
	if (!DeviceIoControl(host_controller, IOCTL_USB_GET_ROOT_HUB_NAME, 0, 0,
	                     &root_hub_name, sizeof(root_hub_name), &size, NULL))
		return NULL;

	/* Allocate wide char root hub name string. */
	size = root_hub_name.ActualLength;
	if (!(root_hub_name_wc = malloc(size)))
		return NULL;

	/* Actually get the root hub name string. */
	if (!DeviceIoControl(host_controller, IOCTL_USB_GET_ROOT_HUB_NAME,
	                     NULL, 0, root_hub_name_wc, size, &size, NULL)) {
		free(root_hub_name_wc);
		return NULL;
	}

	/* Convert the root hub name string to UTF-8. */
	root_hub_name_utf8 = wc_to_utf8(root_hub_name_wc->RootHubName, size);
	free(root_hub_name_wc);
	return root_hub_name_utf8;
}

static char *get_external_hub_name(HANDLE hub, ULONG connection_index)
{
	USB_NODE_CONNECTION_NAME ext_hub_name;
	PUSB_NODE_CONNECTION_NAME ext_hub_name_wc;
	char *ext_hub_name_utf8;
	ULONG size;

	/* Compute the size of the external hub name string. */
	ext_hub_name.ConnectionIndex = connection_index;
	if (!DeviceIoControl(hub, IOCTL_USB_GET_NODE_CONNECTION_NAME,
	                     &ext_hub_name, sizeof(ext_hub_name),
	                     &ext_hub_name, sizeof(ext_hub_name), &size, NULL))
		return NULL;

	/* Allocate wide char external hub name string. */
	size = ext_hub_name.ActualLength;
	if (size <= sizeof(ext_hub_name)
	    || !(ext_hub_name_wc = malloc(size)))
		return NULL;

	/* Get the name of the external hub attached to the specified port. */
	ext_hub_name_wc->ConnectionIndex = connection_index;
	if (!DeviceIoControl(hub, IOCTL_USB_GET_NODE_CONNECTION_NAME,
	                     ext_hub_name_wc, size,
	                     ext_hub_name_wc, size, &size, NULL)) {
		free(ext_hub_name_wc);
		return NULL;
	}

	/* Convert the external hub name string to UTF-8. */
	ext_hub_name_utf8 = wc_to_utf8(ext_hub_name_wc->NodeName, size);
	free(ext_hub_name_wc);
	return ext_hub_name_utf8;
}

static char *get_string_descriptor(HANDLE hub_device, ULONG connection_index,
                                   UCHAR descriptor_index)
{
	char desc_req_buf[sizeof(USB_DESCRIPTOR_REQUEST) +
	                  MAXIMUM_USB_STRING_LENGTH] = { 0 };
	PUSB_DESCRIPTOR_REQUEST desc_req = (void *)desc_req_buf;
	PUSB_STRING_DESCRIPTOR desc = (void *)(desc_req + 1);
	ULONG size = sizeof(desc_req_buf);

	desc_req->ConnectionIndex = connection_index;
	desc_req->SetupPacket.wValue = (USB_STRING_DESCRIPTOR_TYPE << 8)
	                               | descriptor_index;
	desc_req->SetupPacket.wIndex = 0;
	desc_req->SetupPacket.wLength = size - sizeof(*desc_req);

	if (!DeviceIoControl(hub_device,
	                     IOCTL_USB_GET_DESCRIPTOR_FROM_NODE_CONNECTION,
	                     desc_req, size, desc_req, size, &size, NULL)
	    || size < 2
	    || desc->bDescriptorType != USB_STRING_DESCRIPTOR_TYPE
	    || desc->bLength != size - sizeof(*desc_req)
	    || desc->bLength % 2)
		return NULL;

	return wc_to_utf8(desc->bString, desc->bLength);
}

static void enumerate_hub_ports(struct sp_port *port, HANDLE hub_device,
                                ULONG nb_ports, const char *parent_path, DEVINST dev_inst)
{
	char path[MAX_USB_PATH];
	ULONG index = 0;

	for (index = 1; index <= nb_ports; index++) {
		PUSB_NODE_CONNECTION_INFORMATION_EX connection_info_ex;
		ULONG size = sizeof(*connection_info_ex) + (30 * sizeof(USB_PIPE_INFO));

		if (!(connection_info_ex = malloc(size)))
			break;

		connection_info_ex->ConnectionIndex = index;
		if (!DeviceIoControl(hub_device,
		                     IOCTL_USB_GET_NODE_CONNECTION_INFORMATION_EX,
		                     connection_info_ex, size,
		                     connection_info_ex, size, &size, NULL)) {
			/*
			 * Try to get CONNECTION_INFORMATION if
			 * CONNECTION_INFORMATION_EX did not work.
			 */
			PUSB_NODE_CONNECTION_INFORMATION connection_info;

			size = sizeof(*connection_info) + (30 * sizeof(USB_PIPE_INFO));
			if (!(connection_info = malloc(size))) {
				free(connection_info_ex);
				continue;
			}
			connection_info->ConnectionIndex = index;
			if (!DeviceIoControl(hub_device,
			                     IOCTL_USB_GET_NODE_CONNECTION_INFORMATION,
			                     connection_info, size,
			                     connection_info, size, &size, NULL)) {
				free(connection_info);
				free(connection_info_ex);
				continue;
			}

			connection_info_ex->ConnectionIndex = connection_info->ConnectionIndex;
			connection_info_ex->DeviceDescriptor = connection_info->DeviceDescriptor;
			connection_info_ex->DeviceIsHub = connection_info->DeviceIsHub;
			connection_info_ex->DeviceAddress = connection_info->DeviceAddress;
			free(connection_info);
		}

		if (connection_info_ex->DeviceIsHub) {
			/* Recursively enumerate external hub. */
			PCHAR ext_hub_name;
			if ((ext_hub_name = get_external_hub_name(hub_device, index))) {
				snprintf(path, sizeof(path), "%s%ld.",
				         parent_path, connection_info_ex->ConnectionIndex);
				enumerate_hub(port, ext_hub_name, path, dev_inst);
			}
			free(connection_info_ex);
		} else {
			snprintf(path, sizeof(path), "%s%ld",
			         parent_path, connection_info_ex->ConnectionIndex);

			/* Check if this device is the one we search for. */
			if (strcmp(path, port->usb_path)) {
				free(connection_info_ex);
				continue;
			}

			/* Finally grab detailed information regarding the device. */
			port->usb_address = connection_info_ex->DeviceAddress + 1;
			port->usb_vid = connection_info_ex->DeviceDescriptor.idVendor;
			port->usb_pid = connection_info_ex->DeviceDescriptor.idProduct;

			if (connection_info_ex->DeviceDescriptor.iManufacturer)
				port->usb_manufacturer = get_string_descriptor(hub_device,index,
				           connection_info_ex->DeviceDescriptor.iManufacturer);
			if (connection_info_ex->DeviceDescriptor.iProduct)
				port->usb_product = get_string_descriptor(hub_device, index,
				           connection_info_ex->DeviceDescriptor.iProduct);
			if (connection_info_ex->DeviceDescriptor.iSerialNumber) {
				port->usb_serial = get_string_descriptor(hub_device, index,
				           connection_info_ex->DeviceDescriptor.iSerialNumber);
				if (port->usb_serial == NULL) {
					//composite device, get the parent's serial number
					char device_id[MAX_DEVICE_ID_LEN];
					if (CM_Get_Parent(&dev_inst, dev_inst, 0) == CR_SUCCESS) {
						if (CM_Get_Device_IDA(dev_inst, device_id, sizeof(device_id), 0) == CR_SUCCESS)
							port->usb_serial = strdup(strrchr(device_id, '\\')+1);
					}
				}
			}

			free(connection_info_ex);
			break;
		}
	}
}

static void enumerate_hub(struct sp_port *port, const char *hub_name,
                          const char *parent_path, DEVINST dev_inst)
{
	USB_NODE_INFORMATION hub_info;
	HANDLE hub_device;
	ULONG size = sizeof(hub_info);
	char *device_name;

	/* Open the hub with its full name. */
	if (!(device_name = malloc(strlen("\\\\.\\") + strlen(hub_name) + 1)))
		return;
	strcpy(device_name, "\\\\.\\");
	strcat(device_name, hub_name);
	hub_device = CreateFile(device_name, GENERIC_WRITE, FILE_SHARE_WRITE,
	                        NULL, OPEN_EXISTING, 0, NULL);
	free(device_name);
	if (hub_device == INVALID_HANDLE_VALUE)
		return;

	/* Get the number of ports of the hub. */
	if (DeviceIoControl(hub_device, IOCTL_USB_GET_NODE_INFORMATION,
	                    &hub_info, size, &hub_info, size, &size, NULL))
		/* Enumerate the ports of the hub. */
		enumerate_hub_ports(port, hub_device,
		   hub_info.u.HubInformation.HubDescriptor.bNumberOfPorts, parent_path, dev_inst);

	CloseHandle(hub_device);
}

static void enumerate_host_controller(struct sp_port *port,
                                      HANDLE host_controller_device,
                                      DEVINST dev_inst)
{
	char *root_hub_name;

	if ((root_hub_name = get_root_hub_name(host_controller_device))) {
		enumerate_hub(port, root_hub_name, "", dev_inst);
		free(root_hub_name);
	}
}

static void get_usb_details(struct sp_port *port, DEVINST dev_inst_match)
{
	HDEVINFO device_info;
	SP_DEVINFO_DATA device_info_data;
	ULONG i, size = 0;

	device_info = SetupDiGetClassDevs(&GUID_CLASS_USB_HOST_CONTROLLER, NULL, NULL,
	                                  DIGCF_PRESENT | DIGCF_DEVICEINTERFACE);
	device_info_data.cbSize = sizeof(device_info_data);

	for (i = 0; SetupDiEnumDeviceInfo(device_info, i, &device_info_data); i++) {
		SP_DEVICE_INTERFACE_DATA device_interface_data;
		PSP_DEVICE_INTERFACE_DETAIL_DATA device_detail_data;
		DEVINST dev_inst = dev_inst_match;
		HANDLE host_controller_device;

		device_interface_data.cbSize = sizeof(device_interface_data);
		if (!SetupDiEnumDeviceInterfaces(device_info, 0,
		                                 &GUID_CLASS_USB_HOST_CONTROLLER,
		                                 i, &device_interface_data))
			continue;

		if (!SetupDiGetDeviceInterfaceDetail(device_info,&device_interface_data,
		                                     NULL, 0, &size, NULL)
		    && GetLastError() != ERROR_INSUFFICIENT_BUFFER)
			continue;

		if (!(device_detail_data = malloc(size)))
			continue;
		device_detail_data->cbSize = sizeof(*device_detail_data);
		if (!SetupDiGetDeviceInterfaceDetail(device_info,&device_interface_data,
		                                     device_detail_data, size, &size,
		                                     NULL)) {
			free(device_detail_data);
			continue;
		}

		while (CM_Get_Parent(&dev_inst, dev_inst, 0) == CR_SUCCESS
		       && dev_inst != device_info_data.DevInst) { }
		if (dev_inst != device_info_data.DevInst) {
			free(device_detail_data);
			continue;
		}

		port->usb_bus = i + 1;

		host_controller_device = CreateFile(device_detail_data->DevicePath,
		                                    GENERIC_WRITE, FILE_SHARE_WRITE,
		                                    NULL, OPEN_EXISTING, 0, NULL);
		if (host_controller_device != INVALID_HANDLE_VALUE) {
			enumerate_host_controller(port, host_controller_device, dev_inst_match);
			CloseHandle(host_controller_device);
		}
		free(device_detail_data);
	}

	SetupDiDestroyDeviceInfoList(device_info);
	return;
}

SP_PRIV enum sp_return get_port_details(struct sp_port *port)
{
	/*
	 * Description limited to 127 char, anything longer
	 * would not be user friendly anyway.
	 */
	char description[128];
	SP_DEVINFO_DATA device_info_data = { .cbSize = sizeof(device_info_data) };
	HDEVINFO device_info;
	int i;

	device_info = SetupDiGetClassDevs(NULL, 0, 0,
	                                  DIGCF_PRESENT | DIGCF_ALLCLASSES);
	if (device_info == INVALID_HANDLE_VALUE)
		RETURN_FAIL("SetupDiGetClassDevs() failed");

	for (i = 0; SetupDiEnumDeviceInfo(device_info, i, &device_info_data); i++) {
		HKEY device_key;
		DEVINST dev_inst;
		char value[8], class[16];
		DWORD size, type;
		CONFIGRET cr;

		/* Check if this is the device we are looking for. */
		device_key = SetupDiOpenDevRegKey(device_info, &device_info_data,
		                                  DICS_FLAG_GLOBAL, 0,
		                                  DIREG_DEV, KEY_QUERY_VALUE);
		if (device_key == INVALID_HANDLE_VALUE)
			continue;
		size = sizeof(value);
		if (RegQueryValueExA(device_key, "PortName", NULL, &type, (LPBYTE)value,
		                     &size) != ERROR_SUCCESS || type != REG_SZ) {
			RegCloseKey(device_key);
			continue;
		}
		RegCloseKey(device_key);
		value[sizeof(value)-1] = 0;
		if (strcmp(value, port->name))
			continue;

		/* Check port transport type. */
		dev_inst = device_info_data.DevInst;
		size = sizeof(class);
		cr = CR_FAILURE;
		while (CM_Get_Parent(&dev_inst, dev_inst, 0) == CR_SUCCESS &&
		       (cr = CM_Get_DevNode_Registry_PropertyA(dev_inst,
		                 CM_DRP_CLASS, 0, class, &size, 0)) != CR_SUCCESS) { }
		if (cr == CR_SUCCESS) {
			if (!strcmp(class, "USB"))
				port->transport = SP_TRANSPORT_USB;
		}

		/* Get port description (friendly name). */
		dev_inst = device_info_data.DevInst;
		size = sizeof(description);
		while ((cr = CM_Get_DevNode_Registry_PropertyA(dev_inst,
		          CM_DRP_FRIENDLYNAME, 0, description, &size, 0)) != CR_SUCCESS
		       && CM_Get_Parent(&dev_inst, dev_inst, 0) == CR_SUCCESS) { }
		if (cr == CR_SUCCESS)
			port->description = strdup(description);

		/* Get more informations for USB connected ports. */
		if (port->transport == SP_TRANSPORT_USB) {
			char usb_path[MAX_USB_PATH] = "", tmp[MAX_USB_PATH];
			char device_id[MAX_DEVICE_ID_LEN];

			/* Recurse over parents to build the USB device path. */
			dev_inst = device_info_data.DevInst;
			do {
				/* Verify that this layer of the tree is USB related. */
				if (CM_Get_Device_IDA(dev_inst, device_id,
				                      sizeof(device_id), 0) != CR_SUCCESS
				    || strncmp(device_id, "USB\\", 4))
					continue;

				/* Discard one layer for composite devices. */
				char compat_ids[512], *p = compat_ids;
				size = sizeof(compat_ids);
				if (CM_Get_DevNode_Registry_PropertyA(dev_inst,
				                                      CM_DRP_COMPATIBLEIDS, 0,
				                                      &compat_ids,
				                                      &size, 0) == CR_SUCCESS) {
					while (*p) {
						if (!strncmp(p, "USB\\COMPOSITE", 13))
							break;
						p += strlen(p) + 1;
					}
					if (*p)
						continue;
				}

				/* Stop the recursion when reaching the USB root. */
				if (!strncmp(device_id, "USB\\ROOT", 8))
					break;

				/* Prepend the address of current USB layer to the USB path. */
				DWORD address;
				size = sizeof(address);
				if (CM_Get_DevNode_Registry_PropertyA(dev_inst, CM_DRP_ADDRESS,
				                        0, &address, &size, 0) == CR_SUCCESS) {
					strcpy(tmp, usb_path);
					snprintf(usb_path, sizeof(usb_path), "%d%s%s",
					         (int)address, *tmp ? "." : "", tmp);
				}
			} while (CM_Get_Parent(&dev_inst, dev_inst, 0) == CR_SUCCESS);

			port->usb_path = strdup(usb_path);

			/* Wake up the USB device to be able to read string descriptor. */
			char *escaped_port_name;
			HANDLE handle;
			if (!(escaped_port_name = malloc(strlen(port->name) + 5)))
				RETURN_ERROR(SP_ERR_MEM, "Escaped port name malloc failed");
			sprintf(escaped_port_name, "\\\\.\\%s", port->name);
			handle = CreateFile(escaped_port_name, GENERIC_READ, 0, 0,
			                    OPEN_EXISTING,
			                    FILE_ATTRIBUTE_NORMAL|FILE_FLAG_OVERLAPPED, 0);
			free(escaped_port_name);
			CloseHandle(handle);

			/* Retrieve USB device details from the device descriptor. */
			get_usb_details(port, device_info_data.DevInst);
		}
		break;
	}

	SetupDiDestroyDeviceInfoList(device_info);

	RETURN_OK();
}

SP_PRIV enum sp_return list_ports(struct sp_port ***list)
{
	HKEY key;
	TCHAR *value, *data;
	DWORD max_value_len, max_data_size, max_data_len;
	DWORD value_len, data_size, data_len;
	DWORD type, index = 0;
	char *name;
	int name_len;
	int ret = SP_OK;

	DEBUG("Opening registry key");
	if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, _T("HARDWARE\\DEVICEMAP\\SERIALCOMM"),
			0, KEY_QUERY_VALUE, &key) != ERROR_SUCCESS) {
		SET_FAIL(ret, "RegOpenKeyEx() failed");
		goto out_done;
	}
	DEBUG("Querying registry key value and data sizes");
	if (RegQueryInfoKey(key, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
				&max_value_len, &max_data_size, NULL, NULL) != ERROR_SUCCESS) {
		SET_FAIL(ret, "RegQueryInfoKey() failed");
		goto out_close;
	}
	max_data_len = max_data_size / sizeof(TCHAR);
	if (!(value = malloc((max_value_len + 1) * sizeof(TCHAR)))) {
		SET_ERROR(ret, SP_ERR_MEM, "Registry value malloc failed");
		goto out_close;
	}
	if (!(data = malloc((max_data_len + 1) * sizeof(TCHAR)))) {
		SET_ERROR(ret, SP_ERR_MEM, "Registry data malloc failed");
		goto out_free_value;
	}
	DEBUG("Iterating over values");
	while (
		value_len = max_value_len + 1,
		data_size = max_data_size,
		RegEnumValue(key, index, value, &value_len,
			NULL, &type, (LPBYTE)data, &data_size) == ERROR_SUCCESS)
	{
		if (type == REG_SZ) {
			data_len = data_size / sizeof(TCHAR);
			data[data_len] = '\0';
#ifdef UNICODE
			name_len = WideCharToMultiByte(CP_ACP, 0, data, -1, NULL, 0, NULL, NULL);
#else
			name_len = data_len + 1;
#endif
			if (!(name = malloc(name_len))) {
				SET_ERROR(ret, SP_ERR_MEM, "Registry port name malloc failed");
				goto out;
			}
#ifdef UNICODE
			WideCharToMultiByte(CP_ACP, 0, data, -1, name, name_len, NULL, NULL);
#else
			strcpy(name, data);
#endif
			DEBUG_FMT("Found port %s", name);
			if (!(*list = list_append(*list, name))) {
				SET_ERROR(ret, SP_ERR_MEM, "List append failed");
				free(name);
				goto out;
			}
			free(name);
		}
		index++;
	}
out:
	free(data);
out_free_value:
	free(value);
out_close:
	RegCloseKey(key);
out_done:

	return ret;
}
Commit	Line	Data
e33dcf90 ML	1	/*
	2	* This file is part of the libserialport project.
	3	*
48a4076f	4	* Copyright (C) 2013-2014 Martin Ling <martin-libserialport@earth.li>
e33dcf90 ML	5	* Copyright (C) 2014 Aurelien Jacobs <aurel@gnuage.org>
	6	*
	7	* This program is free software: you can redistribute it and/or modify
	8	* it under the terms of the GNU Lesser General Public License as
	9	* published by the Free Software Foundation, either version 3 of the
	10	* License, or (at your option) any later version.
	11	*
	12	* This program is distributed in the hope that it will be useful,
	13	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	14	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	15	* GNU General Public License for more details.
	16	*
	17	* You should have received a copy of the GNU Lesser General Public License
	18	* along with this program. If not, see <http://www.gnu.org/licenses/>.
	19	*/
	20
1a584c45	21	#include <config.h>
e33dcf90 ML	22	#include "libserialport.h"
	23	#include "libserialport_internal.h"
	24
dc422c04 UH	25	/* USB path is a string of at most 8 decimal numbers < 128 separated by dots. */
dc422c04 UH	26	#define MAX_USB_PATH ((8 * 3) + (7 * 1) + 1)
e33dcf90	27
eb50b1ac	28	static void enumerate_hub(struct sp_port port, const char hub_name,
02c8a142	29	const char *parent_path, DEVINST dev_inst);
e33dcf90 ML	30
	31	static char *wc_to_utf8(PWCHAR wc_buffer, ULONG size)
	32	{
dc422c04	33	WCHAR wc_str[(size / sizeof(WCHAR)) + 1];
e33dcf90 ML	34	char *utf8_str;
e33dcf90 ML	35
dc422c04	36	/* Zero-terminate the wide char string. */
e33dcf90	37	memcpy(wc_str, wc_buffer, size);
dc422c04	38	wc_str[sizeof(wc_str) - 1] = 0;
e33dcf90	39
dc422c04	40	/* Compute the size of the UTF-8 converted string. */
e33dcf90 ML	41	if (!(size = WideCharToMultiByte(CP_ACP, WC_NO_BEST_FIT_CHARS, wc_str, -1,
	42	NULL, 0, NULL, NULL)))
	43	return NULL;
	44
dc422c04	45	/* Allocate UTF-8 output buffer. */
e33dcf90 ML	46	if (!(utf8_str = malloc(size)))
	47	return NULL;
	48
dc422c04	49	/* Actually converted to UTF-8. */
e33dcf90 ML	50	if (!WideCharToMultiByte(CP_ACP, WC_NO_BEST_FIT_CHARS, wc_str, -1,
	51	utf8_str, size, NULL, NULL)) {
	52	free(utf8_str);
	53	return NULL;
	54	}
	55
	56	return utf8_str;
	57	}
	58
	59	static char *get_root_hub_name(HANDLE host_controller)
	60	{
dc422c04	61	USB_ROOT_HUB_NAME root_hub_name;
e33dcf90 ML	62	PUSB_ROOT_HUB_NAME root_hub_name_wc;
	63	char *root_hub_name_utf8;
	64	ULONG size = 0;
	65
dc422c04	66	/* Compute the size of the root hub name string. */
e33dcf90 ML	67	if (!DeviceIoControl(host_controller, IOCTL_USB_GET_ROOT_HUB_NAME, 0, 0,
	68	&root_hub_name, sizeof(root_hub_name), &size, NULL))
	69	return NULL;
	70
dc422c04	71	/* Allocate wide char root hub name string. */
e33dcf90 ML	72	size = root_hub_name.ActualLength;
	73	if (!(root_hub_name_wc = malloc(size)))
	74	return NULL;
	75
dc422c04	76	/* Actually get the root hub name string. */
e33dcf90 ML	77	if (!DeviceIoControl(host_controller, IOCTL_USB_GET_ROOT_HUB_NAME,
	78	NULL, 0, root_hub_name_wc, size, &size, NULL)) {
	79	free(root_hub_name_wc);
	80	return NULL;
	81	}
	82
dc422c04	83	/* Convert the root hub name string to UTF-8. */
e33dcf90 ML	84	root_hub_name_utf8 = wc_to_utf8(root_hub_name_wc->RootHubName, size);
	85	free(root_hub_name_wc);
	86	return root_hub_name_utf8;
	87	}
	88
	89	static char *get_external_hub_name(HANDLE hub, ULONG connection_index)
	90	{
dc422c04	91	USB_NODE_CONNECTION_NAME ext_hub_name;
e33dcf90 ML	92	PUSB_NODE_CONNECTION_NAME ext_hub_name_wc;
	93	char *ext_hub_name_utf8;
	94	ULONG size;
	95
dc422c04	96	/* Compute the size of the external hub name string. */
e33dcf90 ML	97	ext_hub_name.ConnectionIndex = connection_index;
	98	if (!DeviceIoControl(hub, IOCTL_USB_GET_NODE_CONNECTION_NAME,
	99	&ext_hub_name, sizeof(ext_hub_name),
	100	&ext_hub_name, sizeof(ext_hub_name), &size, NULL))
	101	return NULL;
	102
dc422c04	103	/* Allocate wide char external hub name string. */
e33dcf90 ML	104	size = ext_hub_name.ActualLength;
	105	if (size <= sizeof(ext_hub_name)
	106	\|\| !(ext_hub_name_wc = malloc(size)))
	107	return NULL;
	108
dc422c04	109	/* Get the name of the external hub attached to the specified port. */
e33dcf90 ML	110	ext_hub_name_wc->ConnectionIndex = connection_index;
	111	if (!DeviceIoControl(hub, IOCTL_USB_GET_NODE_CONNECTION_NAME,
	112	ext_hub_name_wc, size,
	113	ext_hub_name_wc, size, &size, NULL)) {
	114	free(ext_hub_name_wc);
	115	return NULL;
	116	}
	117
dc422c04	118	/* Convert the external hub name string to UTF-8. */
e33dcf90 ML	119	ext_hub_name_utf8 = wc_to_utf8(ext_hub_name_wc->NodeName, size);
	120	free(ext_hub_name_wc);
	121	return ext_hub_name_utf8;
	122	}
	123
	124	static char *get_string_descriptor(HANDLE hub_device, ULONG connection_index,
	125	UCHAR descriptor_index)
	126	{
	127	char desc_req_buf[sizeof(USB_DESCRIPTOR_REQUEST) +
	128	MAXIMUM_USB_STRING_LENGTH] = { 0 };
dc422c04 UH	129	PUSB_DESCRIPTOR_REQUEST desc_req = (void *)desc_req_buf;
dc422c04 UH	130	PUSB_STRING_DESCRIPTOR desc = (void *)(desc_req + 1);
e33dcf90 ML	131	ULONG size = sizeof(desc_req_buf);
e33dcf90 ML	132
dc422c04 UH	133	desc_req->ConnectionIndex = connection_index;
	134	desc_req->SetupPacket.wValue = (USB_STRING_DESCRIPTOR_TYPE << 8)
	135	\| descriptor_index;
	136	desc_req->SetupPacket.wIndex = 0;
e33dcf90 ML	137	desc_req->SetupPacket.wLength = size - sizeof(*desc_req);
	138
	139	if (!DeviceIoControl(hub_device,
	140	IOCTL_USB_GET_DESCRIPTOR_FROM_NODE_CONNECTION,
	141	desc_req, size, desc_req, size, &size, NULL)
	142	\|\| size < 2
	143	\|\| desc->bDescriptorType != USB_STRING_DESCRIPTOR_TYPE
	144	\|\| desc->bLength != size - sizeof(*desc_req)
	145	\|\| desc->bLength % 2)
	146	return NULL;
	147
	148	return wc_to_utf8(desc->bString, desc->bLength);
	149	}
	150
	151	static void enumerate_hub_ports(struct sp_port *port, HANDLE hub_device,
02c8a142	152	ULONG nb_ports, const char *parent_path, DEVINST dev_inst)
e33dcf90 ML	153	{
	154	char path[MAX_USB_PATH];
	155	ULONG index = 0;
	156
	157	for (index = 1; index <= nb_ports; index++) {
	158	PUSB_NODE_CONNECTION_INFORMATION_EX connection_info_ex;
dc422c04	159	ULONG size = sizeof(connection_info_ex) + (30 sizeof(USB_PIPE_INFO));
e33dcf90 ML	160
	161	if (!(connection_info_ex = malloc(size)))
	162	break;
	163
	164	connection_info_ex->ConnectionIndex = index;
	165	if (!DeviceIoControl(hub_device,
	166	IOCTL_USB_GET_NODE_CONNECTION_INFORMATION_EX,
	167	connection_info_ex, size,
	168	connection_info_ex, size, &size, NULL)) {
dc422c04 UH	169	/*
	170	* Try to get CONNECTION_INFORMATION if
	171	* CONNECTION_INFORMATION_EX did not work.
	172	*/
e33dcf90 ML	173	PUSB_NODE_CONNECTION_INFORMATION connection_info;
e33dcf90 ML	174
dc422c04	175	size = sizeof(connection_info) + (30 sizeof(USB_PIPE_INFO));
e33dcf90 ML	176	if (!(connection_info = malloc(size))) {
	177	free(connection_info_ex);
	178	continue;
	179	}
	180	connection_info->ConnectionIndex = index;
	181	if (!DeviceIoControl(hub_device,
	182	IOCTL_USB_GET_NODE_CONNECTION_INFORMATION,
	183	connection_info, size,
	184	connection_info, size, &size, NULL)) {
	185	free(connection_info);
	186	free(connection_info_ex);
	187	continue;
	188	}
	189
	190	connection_info_ex->ConnectionIndex = connection_info->ConnectionIndex;
	191	connection_info_ex->DeviceDescriptor = connection_info->DeviceDescriptor;
	192	connection_info_ex->DeviceIsHub = connection_info->DeviceIsHub;
	193	connection_info_ex->DeviceAddress = connection_info->DeviceAddress;
	194	free(connection_info);
	195	}
	196
	197	if (connection_info_ex->DeviceIsHub) {
dc422c04	198	/* Recursively enumerate external hub. */
e33dcf90 ML	199	PCHAR ext_hub_name;
	200	if ((ext_hub_name = get_external_hub_name(hub_device, index))) {
	201	snprintf(path, sizeof(path), "%s%ld.",
	202	parent_path, connection_info_ex->ConnectionIndex);
02c8a142	203	enumerate_hub(port, ext_hub_name, path, dev_inst);
e33dcf90 ML	204	}
	205	free(connection_info_ex);
	206	} else {
	207	snprintf(path, sizeof(path), "%s%ld",
	208	parent_path, connection_info_ex->ConnectionIndex);
	209
dc422c04	210	/* Check if this device is the one we search for. */
e33dcf90 ML	211	if (strcmp(path, port->usb_path)) {
	212	free(connection_info_ex);
	213	continue;
	214	}
	215
dc422c04	216	/* Finally grab detailed information regarding the device. */
e33dcf90 ML	217	port->usb_address = connection_info_ex->DeviceAddress + 1;
	218	port->usb_vid = connection_info_ex->DeviceDescriptor.idVendor;
	219	port->usb_pid = connection_info_ex->DeviceDescriptor.idProduct;
	220
	221	if (connection_info_ex->DeviceDescriptor.iManufacturer)
	222	port->usb_manufacturer = get_string_descriptor(hub_device,index,
	223	connection_info_ex->DeviceDescriptor.iManufacturer);
	224	if (connection_info_ex->DeviceDescriptor.iProduct)
	225	port->usb_product = get_string_descriptor(hub_device, index,
	226	connection_info_ex->DeviceDescriptor.iProduct);
02c8a142	227	if (connection_info_ex->DeviceDescriptor.iSerialNumber) {
e33dcf90 ML	228	port->usb_serial = get_string_descriptor(hub_device, index,
e33dcf90 ML	229	connection_info_ex->DeviceDescriptor.iSerialNumber);
02c8a142 MF	230	if (port->usb_serial == NULL) {
	231	//composite device, get the parent's serial number
	232	char device_id[MAX_DEVICE_ID_LEN];
	233	if (CM_Get_Parent(&dev_inst, dev_inst, 0) == CR_SUCCESS) {
	234	if (CM_Get_Device_IDA(dev_inst, device_id, sizeof(device_id), 0) == CR_SUCCESS)
	235	port->usb_serial = strdup(strrchr(device_id, '\\')+1);
	236	}
	237	}
	238	}
e33dcf90 ML	239
	240	free(connection_info_ex);
	241	break;
	242	}
	243	}
	244	}
	245
eb50b1ac	246	static void enumerate_hub(struct sp_port port, const char hub_name,
02c8a142	247	const char *parent_path, DEVINST dev_inst)
e33dcf90 ML	248	{
	249	USB_NODE_INFORMATION hub_info;
	250	HANDLE hub_device;
	251	ULONG size = sizeof(hub_info);
	252	char *device_name;
	253
dc422c04	254	/* Open the hub with its full name. */
e33dcf90 ML	255	if (!(device_name = malloc(strlen("\\\\.\\") + strlen(hub_name) + 1)))
	256	return;
	257	strcpy(device_name, "\\\\.\\");
	258	strcat(device_name, hub_name);
	259	hub_device = CreateFile(device_name, GENERIC_WRITE, FILE_SHARE_WRITE,
	260	NULL, OPEN_EXISTING, 0, NULL);
	261	free(device_name);
	262	if (hub_device == INVALID_HANDLE_VALUE)
	263	return;
	264
dc422c04	265	/* Get the number of ports of the hub. */
e33dcf90 ML	266	if (DeviceIoControl(hub_device, IOCTL_USB_GET_NODE_INFORMATION,
e33dcf90 ML	267	&hub_info, size, &hub_info, size, &size, NULL))
dc422c04	268	/* Enumerate the ports of the hub. */
e33dcf90	269	enumerate_hub_ports(port, hub_device,
02c8a142	270	hub_info.u.HubInformation.HubDescriptor.bNumberOfPorts, parent_path, dev_inst);
e33dcf90 ML	271
	272	CloseHandle(hub_device);
	273	}
	274
	275	static void enumerate_host_controller(struct sp_port *port,
02c8a142 MF	276	HANDLE host_controller_device,
02c8a142 MF	277	DEVINST dev_inst)
e33dcf90 ML	278	{
	279	char *root_hub_name;
	280
	281	if ((root_hub_name = get_root_hub_name(host_controller_device))) {
02c8a142	282	enumerate_hub(port, root_hub_name, "", dev_inst);
e33dcf90 ML	283	free(root_hub_name);
	284	}
	285	}
	286
	287	static void get_usb_details(struct sp_port *port, DEVINST dev_inst_match)
	288	{
	289	HDEVINFO device_info;
	290	SP_DEVINFO_DATA device_info_data;
	291	ULONG i, size = 0;
	292
dc422c04	293	device_info = SetupDiGetClassDevs(&GUID_CLASS_USB_HOST_CONTROLLER, NULL, NULL,
e33dcf90 ML	294	DIGCF_PRESENT \| DIGCF_DEVICEINTERFACE);
	295	device_info_data.cbSize = sizeof(device_info_data);
	296
dc422c04	297	for (i = 0; SetupDiEnumDeviceInfo(device_info, i, &device_info_data); i++) {
e33dcf90 ML	298	SP_DEVICE_INTERFACE_DATA device_interface_data;
	299	PSP_DEVICE_INTERFACE_DETAIL_DATA device_detail_data;
	300	DEVINST dev_inst = dev_inst_match;
	301	HANDLE host_controller_device;
	302
	303	device_interface_data.cbSize = sizeof(device_interface_data);
	304	if (!SetupDiEnumDeviceInterfaces(device_info, 0,
	305	&GUID_CLASS_USB_HOST_CONTROLLER,
	306	i, &device_interface_data))
	307	continue;
	308
	309	if (!SetupDiGetDeviceInterfaceDetail(device_info,&device_interface_data,
	310	NULL, 0, &size, NULL)
	311	&& GetLastError() != ERROR_INSUFFICIENT_BUFFER)
	312	continue;
	313
	314	if (!(device_detail_data = malloc(size)))
	315	continue;
	316	device_detail_data->cbSize = sizeof(*device_detail_data);
	317	if (!SetupDiGetDeviceInterfaceDetail(device_info,&device_interface_data,
	318	device_detail_data, size, &size,
	319	NULL)) {
	320	free(device_detail_data);
	321	continue;
	322	}
	323
	324	while (CM_Get_Parent(&dev_inst, dev_inst, 0) == CR_SUCCESS
	325	&& dev_inst != device_info_data.DevInst) { }
	326	if (dev_inst != device_info_data.DevInst) {
	327	free(device_detail_data);
	328	continue;
	329	}
	330
	331	port->usb_bus = i + 1;
	332
	333	host_controller_device = CreateFile(device_detail_data->DevicePath,
	334	GENERIC_WRITE, FILE_SHARE_WRITE,
	335	NULL, OPEN_EXISTING, 0, NULL);
	336	if (host_controller_device != INVALID_HANDLE_VALUE) {
02c8a142	337	enumerate_host_controller(port, host_controller_device, dev_inst_match);
e33dcf90 ML	338	CloseHandle(host_controller_device);
	339	}
	340	free(device_detail_data);
	341	}
	342
	343	SetupDiDestroyDeviceInfoList(device_info);
	344	return;
	345	}
	346
970f279a	347	SP_PRIV enum sp_return get_port_details(struct sp_port *port)
e33dcf90	348	{
dc422c04 UH	349	/*
	350	* Description limited to 127 char, anything longer
	351	* would not be user friendly anyway.
	352	*/
e33dcf90 ML	353	char description[128];
	354	SP_DEVINFO_DATA device_info_data = { .cbSize = sizeof(device_info_data) };
	355	HDEVINFO device_info;
	356	int i;
	357
	358	device_info = SetupDiGetClassDevs(NULL, 0, 0,
	359	DIGCF_PRESENT \| DIGCF_ALLCLASSES);
	360	if (device_info == INVALID_HANDLE_VALUE)
	361	RETURN_FAIL("SetupDiGetClassDevs() failed");
	362
dc422c04	363	for (i = 0; SetupDiEnumDeviceInfo(device_info, i, &device_info_data); i++) {
e33dcf90 ML	364	HKEY device_key;
	365	DEVINST dev_inst;
	366	char value[8], class[16];
	367	DWORD size, type;
	368	CONFIGRET cr;
	369
dc422c04	370	/* Check if this is the device we are looking for. */
b328a48b AJ	371	device_key = SetupDiOpenDevRegKey(device_info, &device_info_data,
	372	DICS_FLAG_GLOBAL, 0,
	373	DIREG_DEV, KEY_QUERY_VALUE);
	374	if (device_key == INVALID_HANDLE_VALUE)
e33dcf90 ML	375	continue;
	376	size = sizeof(value);
	377	if (RegQueryValueExA(device_key, "PortName", NULL, &type, (LPBYTE)value,
7aeb6736 AJ	378	&size) != ERROR_SUCCESS \|\| type != REG_SZ) {
7aeb6736 AJ	379	RegCloseKey(device_key);
e33dcf90	380	continue;
7aeb6736	381	}
e33dcf90 ML	382	RegCloseKey(device_key);
	383	value[sizeof(value)-1] = 0;
	384	if (strcmp(value, port->name))
	385	continue;
	386
dc422c04	387	/* Check port transport type. */
e33dcf90 ML	388	dev_inst = device_info_data.DevInst;
	389	size = sizeof(class);
	390	cr = CR_FAILURE;
	391	while (CM_Get_Parent(&dev_inst, dev_inst, 0) == CR_SUCCESS &&
	392	(cr = CM_Get_DevNode_Registry_PropertyA(dev_inst,
	393	CM_DRP_CLASS, 0, class, &size, 0)) != CR_SUCCESS) { }
	394	if (cr == CR_SUCCESS) {
	395	if (!strcmp(class, "USB"))
	396	port->transport = SP_TRANSPORT_USB;
	397	}
	398
dc422c04	399	/* Get port description (friendly name). */
e33dcf90 ML	400	dev_inst = device_info_data.DevInst;
	401	size = sizeof(description);
	402	while ((cr = CM_Get_DevNode_Registry_PropertyA(dev_inst,
	403	CM_DRP_FRIENDLYNAME, 0, description, &size, 0)) != CR_SUCCESS
	404	&& CM_Get_Parent(&dev_inst, dev_inst, 0) == CR_SUCCESS) { }
	405	if (cr == CR_SUCCESS)
	406	port->description = strdup(description);
	407
dc422c04	408	/* Get more informations for USB connected ports. */
e33dcf90 ML	409	if (port->transport == SP_TRANSPORT_USB) {
	410	char usb_path[MAX_USB_PATH] = "", tmp[MAX_USB_PATH];
	411	char device_id[MAX_DEVICE_ID_LEN];
	412
dc422c04	413	/* Recurse over parents to build the USB device path. */
e33dcf90 ML	414	dev_inst = device_info_data.DevInst;
e33dcf90 ML	415	do {
dc422c04	416	/* Verify that this layer of the tree is USB related. */
e33dcf90 ML	417	if (CM_Get_Device_IDA(dev_inst, device_id,
	418	sizeof(device_id), 0) != CR_SUCCESS
	419	\|\| strncmp(device_id, "USB\\", 4))
	420	continue;
	421
dc422c04	422	/* Discard one layer for composite devices. */
e33dcf90 ML	423	char compat_ids[512], *p = compat_ids;
	424	size = sizeof(compat_ids);
	425	if (CM_Get_DevNode_Registry_PropertyA(dev_inst,
	426	CM_DRP_COMPATIBLEIDS, 0,
	427	&compat_ids,
	428	&size, 0) == CR_SUCCESS) {
	429	while (*p) {
	430	if (!strncmp(p, "USB\\COMPOSITE", 13))
	431	break;
	432	p += strlen(p) + 1;
	433	}
	434	if (*p)
	435	continue;
	436	}
	437
dc422c04	438	/* Stop the recursion when reaching the USB root. */
e33dcf90 ML	439	if (!strncmp(device_id, "USB\\ROOT", 8))
	440	break;
	441
dc422c04	442	/* Prepend the address of current USB layer to the USB path. */
e33dcf90 ML	443	DWORD address;
	444	size = sizeof(address);
	445	if (CM_Get_DevNode_Registry_PropertyA(dev_inst, CM_DRP_ADDRESS,
	446	0, &address, &size, 0) == CR_SUCCESS) {
	447	strcpy(tmp, usb_path);
	448	snprintf(usb_path, sizeof(usb_path), "%d%s%s",
	449	(int)address, *tmp ? "." : "", tmp);
	450	}
	451	} while (CM_Get_Parent(&dev_inst, dev_inst, 0) == CR_SUCCESS);
	452
	453	port->usb_path = strdup(usb_path);
	454
dc422c04	455	/* Wake up the USB device to be able to read string descriptor. */
e33dcf90 ML	456	char *escaped_port_name;
	457	HANDLE handle;
	458	if (!(escaped_port_name = malloc(strlen(port->name) + 5)))
	459	RETURN_ERROR(SP_ERR_MEM, "Escaped port name malloc failed");
	460	sprintf(escaped_port_name, "\\\\.\\%s", port->name);
	461	handle = CreateFile(escaped_port_name, GENERIC_READ, 0, 0,
	462	OPEN_EXISTING,
	463	FILE_ATTRIBUTE_NORMAL\|FILE_FLAG_OVERLAPPED, 0);
	464	free(escaped_port_name);
	465	CloseHandle(handle);
	466
dc422c04	467	/* Retrieve USB device details from the device descriptor. */
e33dcf90 ML	468	get_usb_details(port, device_info_data.DevInst);
	469	}
	470	break;
	471	}
	472
7aeb6736 AJ	473	SetupDiDestroyDeviceInfoList(device_info);
7aeb6736 AJ	474
e33dcf90 ML	475	RETURN_OK();
	476	}
	477
970f279a	478	SP_PRIV enum sp_return list_ports(struct sp_port ***list)
48a4076f AJ	479	{
	480	HKEY key;
	481	TCHAR value, data;
	482	DWORD max_value_len, max_data_size, max_data_len;
	483	DWORD value_len, data_size, data_len;
	484	DWORD type, index = 0;
	485	char *name;
	486	int name_len;
	487	int ret = SP_OK;
	488
	489	DEBUG("Opening registry key");
	490	if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, _T("HARDWARE\\DEVICEMAP\\SERIALCOMM"),
	491	0, KEY_QUERY_VALUE, &key) != ERROR_SUCCESS) {
	492	SET_FAIL(ret, "RegOpenKeyEx() failed");
	493	goto out_done;
	494	}
	495	DEBUG("Querying registry key value and data sizes");
	496	if (RegQueryInfoKey(key, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
	497	&max_value_len, &max_data_size, NULL, NULL) != ERROR_SUCCESS) {
	498	SET_FAIL(ret, "RegQueryInfoKey() failed");
	499	goto out_close;
	500	}
	501	max_data_len = max_data_size / sizeof(TCHAR);
	502	if (!(value = malloc((max_value_len + 1) * sizeof(TCHAR)))) {
dc422c04	503	SET_ERROR(ret, SP_ERR_MEM, "Registry value malloc failed");
48a4076f AJ	504	goto out_close;
	505	}
	506	if (!(data = malloc((max_data_len + 1) * sizeof(TCHAR)))) {
dc422c04	507	SET_ERROR(ret, SP_ERR_MEM, "Registry data malloc failed");
48a4076f AJ	508	goto out_free_value;
	509	}
	510	DEBUG("Iterating over values");
	511	while (
	512	value_len = max_value_len + 1,
	513	data_size = max_data_size,
	514	RegEnumValue(key, index, value, &value_len,
	515	NULL, &type, (LPBYTE)data, &data_size) == ERROR_SUCCESS)
	516	{
7aeb6736	517	if (type == REG_SZ) {
6c444ade AJ	518	data_len = data_size / sizeof(TCHAR);
6c444ade AJ	519	data[data_len] = '\0';
48a4076f	520	#ifdef UNICODE
6c444ade	521	name_len = WideCharToMultiByte(CP_ACP, 0, data, -1, NULL, 0, NULL, NULL);
48a4076f	522	#else
6c444ade	523	name_len = data_len + 1;
48a4076f	524	#endif
6c444ade	525	if (!(name = malloc(name_len))) {
dc422c04	526	SET_ERROR(ret, SP_ERR_MEM, "Registry port name malloc failed");
6c444ade AJ	527	goto out;
6c444ade AJ	528	}
48a4076f	529	#ifdef UNICODE
6c444ade	530	WideCharToMultiByte(CP_ACP, 0, data, -1, name, name_len, NULL, NULL);
48a4076f	531	#else
6c444ade	532	strcpy(name, data);
48a4076f	533	#endif
d38c7d2c	534	DEBUG_FMT("Found port %s", name);
48a4076f	535	if (!(list = list_append(list, name))) {
dc422c04	536	SET_ERROR(ret, SP_ERR_MEM, "List append failed");
7aeb6736	537	free(name);
48a4076f AJ	538	goto out;
48a4076f AJ	539	}
7aeb6736	540	free(name);
48a4076f AJ	541	}
	542	index++;
	543	}
	544	out:
	545	free(data);
	546	out_free_value:
	547	free(value);
	548	out_close:
	549	RegCloseKey(key);
	550	out_done:
	551
	552	return ret;
	553	}