xref: /netbsd-src/sys/dev/usb/uftdi.c (revision 627f7eb200a4419d89b531d55fccd2ee3ffdcde0)
1 /*	$NetBSD: uftdi.c,v 1.74 2020/03/14 02:35:33 christos Exp $	*/
2 
3 /*
4  * Copyright (c) 2000 The NetBSD Foundation, Inc.
5  * All rights reserved.
6  *
7  * This code is derived from software contributed to The NetBSD Foundation
8  * by Lennart Augustsson (lennart@augustsson.net).
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29  * POSSIBILITY OF SUCH DAMAGE.
30  */
31 
32 #include <sys/cdefs.h>
33 __KERNEL_RCSID(0, "$NetBSD: uftdi.c,v 1.74 2020/03/14 02:35:33 christos Exp $");
34 
35 #ifdef _KERNEL_OPT
36 #include "opt_usb.h"
37 #endif
38 
39 #include <sys/param.h>
40 #include <sys/systm.h>
41 #include <sys/kernel.h>
42 #include <sys/device.h>
43 #include <sys/conf.h>
44 #include <sys/tty.h>
45 
46 #include <dev/usb/usb.h>
47 
48 #include <dev/usb/usbdi.h>
49 #include <dev/usb/usbdi_util.h>
50 #include <dev/usb/usbdevs.h>
51 
52 #include <dev/usb/ucomvar.h>
53 
54 #include <dev/usb/uftdireg.h>
55 
56 #ifdef UFTDI_DEBUG
57 #define DPRINTF(x)	if (uftdidebug) printf x
58 #define DPRINTFN(n,x)	if (uftdidebug>(n)) printf x
59 int uftdidebug = 0;
60 #else
61 #define DPRINTF(x)
62 #define DPRINTFN(n,x)
63 #endif
64 
65 #define UFTDI_CONFIG_NO		1
66 
67 /*
68  * These are the default number of bytes transferred per frame if the
69  * endpoint doesn't tell us.  The output buffer size is a hard limit
70  * for devices that use a 6-bit size encoding.
71  */
72 #define UFTDIIBUFSIZE 64
73 #define UFTDIOBUFSIZE 64
74 
75 /*
76  * Magic constants!  Where do these come from?  They're what Linux uses...
77  */
78 #define	UFTDI_MAX_IBUFSIZE	512
79 #define	UFTDI_MAX_OBUFSIZE	256
80 
81 struct uftdi_softc {
82 	device_t		sc_dev;		/* base device */
83 	struct usbd_device *	sc_udev;	/* device */
84 	struct usbd_interface *	sc_iface;	/* interface */
85 	int			sc_iface_no;
86 
87 	enum uftdi_type		sc_type;
88 	u_int			sc_flags;
89 #define FLAGS_BAUDCLK_12M	0x00000001
90 #define FLAGS_ROUNDOFF_232A	0x00000002
91 #define FLAGS_BAUDBITS_HINDEX	0x00000004
92 	u_int			sc_hdrlen;
93 	u_int			sc_chiptype;
94 
95 	u_char			sc_msr;
96 	u_char			sc_lsr;
97 
98 	device_t		sc_subdev;
99 
100 	bool			sc_dying;
101 
102 	u_int			last_lcr;
103 };
104 
105 static void	uftdi_get_status(void *, int, u_char *, u_char *);
106 static void	uftdi_set(void *, int, int, int);
107 static int	uftdi_param(void *, int, struct termios *);
108 static int	uftdi_open(void *, int);
109 static void	uftdi_read(void *, int, u_char **, uint32_t *);
110 static void	uftdi_write(void *, int, u_char *, u_char *, uint32_t *);
111 static void	uftdi_break(void *, int, int);
112 
113 static const struct ucom_methods uftdi_methods = {
114 	.ucom_get_status = uftdi_get_status,
115 	.ucom_set = uftdi_set,
116 	.ucom_param = uftdi_param,
117 	.ucom_open = uftdi_open,
118 	.ucom_read = uftdi_read,
119 	.ucom_write = uftdi_write,
120 };
121 
122 /*
123  * The devices default to UFTDI_TYPE_8U232AM.
124  * Remember to update uftdi_attach() if it should be UFTDI_TYPE_SIO instead
125  */
126 static const struct usb_devno uftdi_devs[] = {
127 	{ USB_VENDOR_BBELECTRONICS, USB_PRODUCT_BBELECTRONICS_USOTL4 },
128 	{ USB_VENDOR_FALCOM, USB_PRODUCT_FALCOM_TWIST },
129 	{ USB_VENDOR_FALCOM, USB_PRODUCT_FALCOM_SAMBA },
130 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_SERIAL_230X },
131 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_SERIAL_232H },
132 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_SERIAL_232RL },
133 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_SERIAL_2232C },
134 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_SERIAL_4232H },
135 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_SERIAL_8U100AX },
136 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_SERIAL_8U232AM },
137 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_MHAM_KW },
138 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_MHAM_YS },
139 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_MHAM_Y6 },
140 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_MHAM_Y8 },
141 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_MHAM_IC },
142 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_MHAM_DB9 },
143 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_MHAM_RS232 },
144 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_MHAM_Y9 },
145 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_COASTAL_TNCX },
146 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_CTI_485_MINI },
147 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_CTI_NANO_485 },
148 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_SEMC_DSS20 },
149 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_LCD_LK202_24_USB },
150 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_LCD_LK204_24_USB },
151 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_LCD_MX200_USB },
152 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_LCD_MX4_MX5_USB },
153 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_LCD_CFA_631 },
154 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_LCD_CFA_632 },
155 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_LCD_CFA_633 },
156 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_LCD_CFA_634 },
157 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_LCD_CFA_635 },
158 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_OPENRD_JTAGKEY },
159 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_BEAGLEBONE },
160 	{ USB_VENDOR_FTDI, USB_PRODUCT_FTDI_MAXSTREAM_PKG_U },
161 	{ USB_VENDOR_xxFTDI, USB_PRODUCT_xxFTDI_SHEEVAPLUG_JTAG },
162 	{ USB_VENDOR_INTREPIDCS, USB_PRODUCT_INTREPIDCS_VALUECAN },
163 	{ USB_VENDOR_INTREPIDCS, USB_PRODUCT_INTREPIDCS_NEOVI },
164 	{ USB_VENDOR_MELCO, USB_PRODUCT_MELCO_PCOPRS1 },
165 	{ USB_VENDOR_RATOC, USB_PRODUCT_RATOC_REXUSB60F },
166 	{ USB_VENDOR_RTSYS, USB_PRODUCT_RTSYS_CT57A },
167 	{ USB_VENDOR_RTSYS, USB_PRODUCT_RTSYS_RTS03 },
168 	{ USB_VENDOR_SEALEVEL, USB_PRODUCT_SEALEVEL_USBSERIAL },
169 	{ USB_VENDOR_SEALEVEL, USB_PRODUCT_SEALEVEL_SEAPORT4P1 },
170 	{ USB_VENDOR_SEALEVEL, USB_PRODUCT_SEALEVEL_SEAPORT4P2 },
171 	{ USB_VENDOR_SEALEVEL, USB_PRODUCT_SEALEVEL_SEAPORT4P3 },
172 	{ USB_VENDOR_SEALEVEL, USB_PRODUCT_SEALEVEL_SEAPORT4P4 },
173 	{ USB_VENDOR_SIIG2, USB_PRODUCT_SIIG2_US2308 },
174 	{ USB_VENDOR_MISC, USB_PRODUCT_MISC_TELLSTICK },
175 	{ USB_VENDOR_MISC, USB_PRODUCT_MISC_TELLSTICK_DUO },
176 };
177 #define uftdi_lookup(v, p) usb_lookup(uftdi_devs, v, p)
178 
179 static int	uftdi_match(device_t, cfdata_t, void *);
180 static void	uftdi_attach(device_t, device_t, void *);
181 static void	uftdi_childdet(device_t, device_t);
182 static int	uftdi_detach(device_t, int);
183 
184 CFATTACH_DECL2_NEW(uftdi, sizeof(struct uftdi_softc), uftdi_match,
185     uftdi_attach, uftdi_detach, NULL, NULL, uftdi_childdet);
186 
187 static int
188 uftdi_match(device_t parent, cfdata_t match, void *aux)
189 {
190 	struct usbif_attach_arg *uiaa = aux;
191 
192 	DPRINTFN(20,("uftdi: vendor=%#x, product=%#x\n",
193 		     uiaa->uiaa_vendor, uiaa->uiaa_product));
194 
195 	if (uiaa->uiaa_configno != UFTDI_CONFIG_NO)
196 		return UMATCH_NONE;
197 
198 	return uftdi_lookup(uiaa->uiaa_vendor, uiaa->uiaa_product) != NULL ?
199 		UMATCH_VENDOR_PRODUCT_CONF_IFACE : UMATCH_NONE;
200 }
201 
202 static void
203 uftdi_attach(device_t parent, device_t self, void *aux)
204 {
205 	struct uftdi_softc *sc = device_private(self);
206 	struct usbif_attach_arg *uiaa = aux;
207 	struct usbd_device *dev = uiaa->uiaa_device;
208 	struct usbd_interface *iface = uiaa->uiaa_iface;
209 	usb_device_descriptor_t *ddesc;
210 	usb_interface_descriptor_t *id;
211 	usb_endpoint_descriptor_t *ed;
212 	char *devinfop;
213 	int i;
214 	struct ucom_attach_args ucaa;
215 
216 	DPRINTFN(10,("\nuftdi_attach: sc=%p\n", sc));
217 
218 	aprint_naive("\n");
219 	aprint_normal("\n");
220 
221 	devinfop = usbd_devinfo_alloc(dev, 0);
222 	aprint_normal_dev(self, "%s\n", devinfop);
223 	usbd_devinfo_free(devinfop);
224 
225 	sc->sc_dev = self;
226 	sc->sc_udev = dev;
227 	sc->sc_dying = false;
228 	sc->sc_iface_no = uiaa->uiaa_ifaceno;
229 	sc->sc_type = UFTDI_TYPE_8U232AM; /* most devices are post-8U232AM */
230 	sc->sc_hdrlen = 0;
231 
232 	ddesc = usbd_get_device_descriptor(dev);
233 	sc->sc_chiptype = UGETW(ddesc->bcdDevice);
234 
235 	switch (sc->sc_chiptype) {
236 	case 0x0200:
237 		if (ddesc->iSerialNumber != 0)
238 			sc->sc_flags |= FLAGS_ROUNDOFF_232A;
239 		ucaa.ucaa_portno = 0;
240 		break;
241 	case 0x0400:
242 		ucaa.ucaa_portno = 0;
243 		break;
244 	case 0x0500:
245 		sc->sc_flags |= FLAGS_BAUDBITS_HINDEX;
246 		ucaa.ucaa_portno = FTDI_PIT_SIOA + sc->sc_iface_no;
247 		break;
248 	case 0x0600:
249 		ucaa.ucaa_portno = 0;
250 		break;
251 	case 0x0700:
252 	case 0x0800:
253 	case 0x0900:
254 		sc->sc_flags |= FLAGS_BAUDCLK_12M;
255 		sc->sc_flags |= FLAGS_BAUDBITS_HINDEX;
256 		ucaa.ucaa_portno = FTDI_PIT_SIOA + sc->sc_iface_no;
257 		break;
258 	case 0x1000:
259 		sc->sc_flags |= FLAGS_BAUDBITS_HINDEX;
260 		ucaa.ucaa_portno = FTDI_PIT_SIOA + sc->sc_iface_no;
261 		break;
262 	default:
263 		if (sc->sc_chiptype < 0x0200) {
264 			sc->sc_type = UFTDI_TYPE_SIO;
265 			sc->sc_hdrlen = 1;
266 		}
267 		ucaa.ucaa_portno = 0;
268 		break;
269 	}
270 
271 	id = usbd_get_interface_descriptor(iface);
272 
273 	sc->sc_iface = iface;
274 
275 	ucaa.ucaa_bulkin = ucaa.ucaa_bulkout = -1;
276 	ucaa.ucaa_ibufsize = ucaa.ucaa_obufsize = 0;
277 	for (i = 0; i < id->bNumEndpoints; i++) {
278 		int addr, dir, attr;
279 		ed = usbd_interface2endpoint_descriptor(iface, i);
280 		if (ed == NULL) {
281 			aprint_error_dev(self,
282 			    "could not read endpoint descriptor\n");
283 			goto bad;
284 		}
285 
286 		addr = ed->bEndpointAddress;
287 		dir = UE_GET_DIR(ed->bEndpointAddress);
288 		attr = ed->bmAttributes & UE_XFERTYPE;
289 		if (dir == UE_DIR_IN && attr == UE_BULK) {
290 			ucaa.ucaa_bulkin = addr;
291 			ucaa.ucaa_ibufsize = UGETW(ed->wMaxPacketSize);
292 			if (ucaa.ucaa_ibufsize >= UFTDI_MAX_IBUFSIZE)
293 				ucaa.ucaa_ibufsize = UFTDI_MAX_IBUFSIZE;
294 		} else if (dir == UE_DIR_OUT && attr == UE_BULK) {
295 			ucaa.ucaa_bulkout = addr;
296 			ucaa.ucaa_obufsize = UGETW(ed->wMaxPacketSize)
297 			    - sc->sc_hdrlen;
298 			if (ucaa.ucaa_obufsize >= UFTDI_MAX_OBUFSIZE)
299 				ucaa.ucaa_obufsize = UFTDI_MAX_OBUFSIZE;
300 			/* Limit length if we have a 6-bit header.  */
301 			if ((sc->sc_hdrlen > 0) &&
302 			    (ucaa.ucaa_obufsize > UFTDIOBUFSIZE))
303 				ucaa.ucaa_obufsize = UFTDIOBUFSIZE;
304 		} else {
305 			aprint_error_dev(self, "unexpected endpoint\n");
306 			goto bad;
307 		}
308 	}
309 	if (ucaa.ucaa_bulkin == -1) {
310 		aprint_error_dev(self, "Could not find data bulk in\n");
311 		goto bad;
312 	}
313 	if (ucaa.ucaa_bulkout == -1) {
314 		aprint_error_dev(self, "Could not find data bulk out\n");
315 		goto bad;
316 	}
317 
318 	/* ucaa_bulkin, ucaa_bulkout set above */
319 	if (ucaa.ucaa_ibufsize == 0)
320 		ucaa.ucaa_ibufsize = UFTDIIBUFSIZE;
321 	ucaa.ucaa_ibufsizepad = ucaa.ucaa_ibufsize;
322 	if (ucaa.ucaa_obufsize == 0)
323 		ucaa.ucaa_obufsize = UFTDIOBUFSIZE - sc->sc_hdrlen;
324 	ucaa.ucaa_opkthdrlen = sc->sc_hdrlen;
325 	ucaa.ucaa_device = dev;
326 	ucaa.ucaa_iface = iface;
327 	ucaa.ucaa_methods = &uftdi_methods;
328 	ucaa.ucaa_arg = sc;
329 	ucaa.ucaa_info = NULL;
330 
331 	DPRINTF(("uftdi: in=%#x out=%#x isize=%#x osize=%#x\n",
332 		ucaa.ucaa_bulkin, ucaa.ucaa_bulkout,
333 		ucaa.ucaa_ibufsize, ucaa.ucaa_obufsize));
334 	sc->sc_subdev = config_found_sm_loc(self, "ucombus", NULL,
335 	    &ucaa, ucomprint, ucomsubmatch);
336 
337 	usbd_add_drv_event(USB_EVENT_DRIVER_ATTACH, sc->sc_udev, sc->sc_dev);
338 
339 	if (!pmf_device_register(self, NULL, NULL))
340 		aprint_error_dev(self, "couldn't establish power handler\n");
341 
342 	return;
343 
344 bad:
345 	DPRINTF(("uftdi_attach: ATTACH ERROR\n"));
346 	sc->sc_dying = true;
347 	return;
348 }
349 
350 static void
351 uftdi_childdet(device_t self, device_t child)
352 {
353 	struct uftdi_softc *sc = device_private(self);
354 
355 	KASSERT(child == sc->sc_subdev);
356 	sc->sc_subdev = NULL;
357 }
358 
359 static int
360 uftdi_detach(device_t self, int flags)
361 {
362 	struct uftdi_softc *sc = device_private(self);
363 	int rv = 0;
364 
365 	DPRINTF(("uftdi_detach: sc=%p flags=%d\n", sc, flags));
366 
367 	sc->sc_dying = true;
368 
369 	if (sc->sc_subdev != NULL) {
370 		rv = config_detach(sc->sc_subdev, flags);
371 		sc->sc_subdev = NULL;
372 	}
373 
374 	usbd_add_drv_event(USB_EVENT_DRIVER_DETACH, sc->sc_udev, sc->sc_dev);
375 
376 	return rv;
377 }
378 
379 static int
380 uftdi_open(void *vsc, int portno)
381 {
382 	struct uftdi_softc *sc = vsc;
383 	usb_device_request_t req;
384 	usbd_status err;
385 	struct termios t;
386 
387 	DPRINTF(("uftdi_open: sc=%p\n", sc));
388 
389 	if (sc->sc_dying)
390 		return EIO;
391 
392 	/* Perform a full reset on the device */
393 	req.bmRequestType = UT_WRITE_VENDOR_DEVICE;
394 	req.bRequest = FTDI_SIO_RESET;
395 	USETW(req.wValue, FTDI_SIO_RESET_SIO);
396 	USETW(req.wIndex, portno);
397 	USETW(req.wLength, 0);
398 	err = usbd_do_request(sc->sc_udev, &req, NULL);
399 	if (err)
400 		return EIO;
401 
402 	/* Set 9600 baud, 2 stop bits, no parity, 8 bits */
403 	t.c_ospeed = 9600;
404 	t.c_cflag = CSTOPB | CS8;
405 	(void)uftdi_param(sc, portno, &t);
406 
407 	/* Turn on RTS/CTS flow control */
408 	req.bmRequestType = UT_WRITE_VENDOR_DEVICE;
409 	req.bRequest = FTDI_SIO_SET_FLOW_CTRL;
410 	USETW(req.wValue, 0);
411 	USETW2(req.wIndex, FTDI_SIO_RTS_CTS_HS, portno);
412 	USETW(req.wLength, 0);
413 	err = usbd_do_request(sc->sc_udev, &req, NULL);
414 	if (err)
415 		return EIO;
416 
417 	return 0;
418 }
419 
420 static void
421 uftdi_read(void *vsc, int portno, u_char **ptr, uint32_t *count)
422 {
423 	struct uftdi_softc *sc = vsc;
424 	u_char msr, lsr;
425 
426 	DPRINTFN(15,("uftdi_read: sc=%p, port=%d count=%d\n", sc, portno,
427 		     *count));
428 
429 	msr = FTDI_GET_MSR(*ptr);
430 	lsr = FTDI_GET_LSR(*ptr);
431 
432 #ifdef UFTDI_DEBUG
433 	if (*count != 2)
434 		DPRINTFN(10,("uftdi_read: sc=%p, port=%d count=%d data[0]="
435 			    "0x%02x\n", sc, portno, *count, (*ptr)[2]));
436 #endif
437 
438 	if (sc->sc_msr != msr ||
439 	    (sc->sc_lsr & FTDI_LSR_MASK) != (lsr & FTDI_LSR_MASK)) {
440 		DPRINTF(("uftdi_read: status change msr=0x%02x(0x%02x) "
441 			 "lsr=0x%02x(0x%02x)\n", msr, sc->sc_msr,
442 			 lsr, sc->sc_lsr));
443 		sc->sc_msr = msr;
444 		sc->sc_lsr = lsr;
445 		ucom_status_change(device_private(sc->sc_subdev));
446 	}
447 
448 	/* Adjust buffer pointer to skip status prefix */
449 	*ptr += 2;
450 }
451 
452 static void
453 uftdi_write(void *vsc, int portno, u_char *to, u_char *from, uint32_t *count)
454 {
455 	struct uftdi_softc *sc = vsc;
456 
457 	DPRINTFN(10,("uftdi_write: sc=%p, port=%d count=%u data[0]=0x%02x\n",
458 		     vsc, portno, *count, from[0]));
459 
460 	/* Make length tag and copy data */
461 	if (sc->sc_hdrlen > 0)
462 		*to = FTDI_OUT_TAG(*count, portno);
463 
464 	memcpy(to + sc->sc_hdrlen, from, *count);
465 	*count += sc->sc_hdrlen;
466 }
467 
468 static void
469 uftdi_set(void *vsc, int portno, int reg, int onoff)
470 {
471 	struct uftdi_softc *sc = vsc;
472 	usb_device_request_t req;
473 	int ctl;
474 
475 	DPRINTF(("uftdi_set: sc=%p, port=%d reg=%d onoff=%d\n", vsc, portno,
476 		 reg, onoff));
477 
478 	if (sc->sc_dying)
479 		return;
480 
481 	switch (reg) {
482 	case UCOM_SET_DTR:
483 		ctl = onoff ? FTDI_SIO_SET_DTR_HIGH : FTDI_SIO_SET_DTR_LOW;
484 		break;
485 	case UCOM_SET_RTS:
486 		ctl = onoff ? FTDI_SIO_SET_RTS_HIGH : FTDI_SIO_SET_RTS_LOW;
487 		break;
488 	case UCOM_SET_BREAK:
489 		uftdi_break(sc, portno, onoff);
490 		return;
491 	default:
492 		return;
493 	}
494 	req.bmRequestType = UT_WRITE_VENDOR_DEVICE;
495 	req.bRequest = FTDI_SIO_MODEM_CTRL;
496 	USETW(req.wValue, ctl);
497 	USETW(req.wIndex, portno);
498 	USETW(req.wLength, 0);
499 	DPRINTFN(2,("uftdi_set: reqtype=0x%02x req=0x%02x value=0x%04x "
500 		    "index=0x%04x len=%d\n", req.bmRequestType, req.bRequest,
501 		    UGETW(req.wValue), UGETW(req.wIndex), UGETW(req.wLength)));
502 	(void)usbd_do_request(sc->sc_udev, &req, NULL);
503 }
504 
505 /*
506  * Return true if the given speed is within operational tolerance of the target
507  * speed.  FTDI recommends that the hardware speed be within 3% of nominal.
508  */
509 static inline bool
510 uftdi_baud_within_tolerance(uint64_t speed, uint64_t target)
511 {
512 	return ((speed >= (target * 100) / 103) &&
513 	    (speed <= (target * 100) / 97));
514 }
515 
516 static int
517 uftdi_encode_baudrate(struct uftdi_softc *sc, int speed, int *rate, int *ratehi)
518 {
519 	static const uint8_t encoded_fraction[8] = {
520 	    0, 3, 2, 4, 1, 5, 6, 7
521 	};
522 	static const uint8_t roundoff_232a[16] = {
523 	    0,  1,  0,  1,  0, -1,  2,  1,
524 	    0, -1, -2, -3,  4,  3,  2,  1,
525 	};
526 	uint32_t clk, divisor, fastclk_flag, frac, hwspeed;
527 
528 	/*
529 	 * If this chip has the fast clock capability and the speed is within
530 	 * range, use the 12MHz clock, otherwise the standard clock is 3MHz.
531 	 */
532 	if ((sc->sc_flags & FLAGS_BAUDCLK_12M) && speed >= 1200) {
533 		clk = 12000000;
534 		fastclk_flag = (1 << 17);
535 	} else {
536 		clk = 3000000;
537 		fastclk_flag = 0;
538 	}
539 
540 	/*
541 	 * Make sure the requested speed is reachable with the available clock
542 	 * and a 14-bit divisor.
543 	 */
544 	if (speed < (clk >> 14) || speed > clk)
545 		return -1;
546 
547 	/*
548 	 * Calculate the divisor, initially yielding a fixed point number with a
549 	 * 4-bit (1/16ths) fraction, then round it to the nearest fraction the
550 	 * hardware can handle.  When the integral part of the divisor is
551 	 * greater than one, the fractional part is in 1/8ths of the base clock.
552 	 * The FT8U232AM chips can handle only 0.125, 0.250, and 0.5 fractions.
553 	 * Later chips can handle all 1/8th fractions.
554 	 *
555 	 * If the integral part of the divisor is 1, a special rule applies: the
556 	 * fractional part can only be .0 or .5 (this is a limitation of the
557 	 * hardware).  We handle this by truncating the fraction rather than
558 	 * rounding, because this only applies to the two fastest speeds the
559 	 * chip can achieve and rounding doesn't matter, either you've asked for
560 	 * that exact speed or you've asked for something the chip can't do.
561 	 *
562 	 * For the FT8U232AM chips, use a roundoff table to adjust the result
563 	 * to the nearest 1/8th fraction that is supported by the hardware,
564 	 * leaving a fixed-point number with a 3-bit fraction which exactly
565 	 * represents the math the hardware divider will do.  For later-series
566 	 * chips that support all 8 fractional divisors, just round 16ths to
567 	 * 8ths by adding 1 and dividing by 2.
568 	 */
569 	divisor = (clk << 4) / speed;
570 	if ((divisor & 0xf) == 1)
571 		divisor &= 0xfffffff8;
572 	else if (sc->sc_flags & FLAGS_ROUNDOFF_232A)
573 		divisor += roundoff_232a[divisor & 0x0f];
574 	else
575 		divisor += 1;  /* Rounds odd 16ths up to next 8th. */
576 	divisor >>= 1;
577 
578 	/*
579 	 * Ensure the resulting hardware speed will be within operational
580 	 * tolerance (within 3% of nominal).
581 	 */
582 	hwspeed = (clk << 3) / divisor;
583 	if (!uftdi_baud_within_tolerance(hwspeed, speed))
584 		return -1;
585 
586 	/*
587 	 * Re-pack the divisor into hardware format. The lower 14-bits hold the
588 	 * integral part, while the upper bits specify the fraction by indexing
589 	 * a table of fractions within the hardware which is laid out as:
590 	 *    {0.0, 0.5, 0.25, 0.125, 0.325, 0.625, 0.725, 0.875}
591 	 * The A-series chips only have the first four table entries; the
592 	 * roundoff table logic above ensures that the fractional part for those
593 	 * chips will be one of the first four values.
594 	 *
595 	 * When the divisor is 1 a special encoding applies:  1.0 is encoded as
596 	 * 0.0, and 1.5 is encoded as 1.0.  The rounding logic above has already
597 	 * ensured that the fraction is either .0 or .5 if the integral is 1.
598 	 */
599 	frac = divisor & 0x07;
600 	divisor >>= 3;
601 	if (divisor == 1) {
602 		if (frac == 0)
603 			divisor = 0;	/* 1.0 becomes 0.0 */
604 		else
605 			frac = 0;	/* 1.5 becomes 1.0 */
606 	}
607 	divisor |= (encoded_fraction[frac] << 14) | fastclk_flag;
608 
609 	*rate = (uint16_t)divisor;
610 	*ratehi = (uint16_t)(divisor >> 16);
611 
612 	/*
613 	 * If this chip requires the baud bits to be in the high byte of the
614 	 * index word, move the bits up to that location.
615 	 */
616 	if (sc->sc_flags & FLAGS_BAUDBITS_HINDEX)
617 		*ratehi <<= 8;
618 
619 	return 0;
620 }
621 
622 static int
623 uftdi_param(void *vsc, int portno, struct termios *t)
624 {
625 	struct uftdi_softc *sc = vsc;
626 	usb_device_request_t req;
627 	usbd_status err;
628 	int rate, ratehi, rerr, data, flow;
629 
630 	DPRINTF(("uftdi_param: sc=%p\n", sc));
631 
632 	if (sc->sc_dying)
633 		return EIO;
634 
635 	req.bmRequestType = UT_WRITE_VENDOR_DEVICE;
636 	req.bRequest = FTDI_SIO_SET_BITMODE;
637 	USETW(req.wValue, FTDI_BITMODE_RESET << 8 | 0x00);
638 	USETW(req.wIndex, portno);
639 	USETW(req.wLength, 0);
640 	err = usbd_do_request(sc->sc_udev, &req, NULL);
641 	if (err)
642 		return EIO;
643 
644 	switch (sc->sc_type) {
645 	case UFTDI_TYPE_SIO:
646 		switch (t->c_ospeed) {
647 		case 300: rate = ftdi_sio_b300; break;
648 		case 600: rate = ftdi_sio_b600; break;
649 		case 1200: rate = ftdi_sio_b1200; break;
650 		case 2400: rate = ftdi_sio_b2400; break;
651 		case 4800: rate = ftdi_sio_b4800; break;
652 		case 9600: rate = ftdi_sio_b9600; break;
653 		case 19200: rate = ftdi_sio_b19200; break;
654 		case 38400: rate = ftdi_sio_b38400; break;
655 		case 57600: rate = ftdi_sio_b57600; break;
656 		case 115200: rate = ftdi_sio_b115200; break;
657 		default:
658 			return EINVAL;
659 		}
660 		ratehi = 0;
661 		break;
662 	case UFTDI_TYPE_8U232AM:
663 		rerr = uftdi_encode_baudrate(sc, t->c_ospeed, &rate, &ratehi);
664 		if (rerr != 0)
665 			return EINVAL;
666 		break;
667 	default:
668 		return EINVAL;
669 	}
670 	req.bmRequestType = UT_WRITE_VENDOR_DEVICE;
671 	req.bRequest = FTDI_SIO_SET_BAUD_RATE;
672 	USETW(req.wValue, rate);
673 	USETW(req.wIndex, portno | ratehi);
674 	USETW(req.wLength, 0);
675 	DPRINTFN(2,("uftdi_param: reqtype=0x%02x req=0x%02x value=0x%04x "
676 		    "index=0x%04x len=%d\n", req.bmRequestType, req.bRequest,
677 		    UGETW(req.wValue), UGETW(req.wIndex), UGETW(req.wLength)));
678 	err = usbd_do_request(sc->sc_udev, &req, NULL);
679 	if (err)
680 		return EIO;
681 
682 	if (ISSET(t->c_cflag, CSTOPB))
683 		data = FTDI_SIO_SET_DATA_STOP_BITS_2;
684 	else
685 		data = FTDI_SIO_SET_DATA_STOP_BITS_1;
686 	if (ISSET(t->c_cflag, PARENB)) {
687 		if (ISSET(t->c_cflag, PARODD))
688 			data |= FTDI_SIO_SET_DATA_PARITY_ODD;
689 		else
690 			data |= FTDI_SIO_SET_DATA_PARITY_EVEN;
691 	} else
692 		data |= FTDI_SIO_SET_DATA_PARITY_NONE;
693 	switch (ISSET(t->c_cflag, CSIZE)) {
694 	case CS5:
695 		data |= FTDI_SIO_SET_DATA_BITS(5);
696 		break;
697 	case CS6:
698 		data |= FTDI_SIO_SET_DATA_BITS(6);
699 		break;
700 	case CS7:
701 		data |= FTDI_SIO_SET_DATA_BITS(7);
702 		break;
703 	case CS8:
704 		data |= FTDI_SIO_SET_DATA_BITS(8);
705 		break;
706 	}
707 	sc->last_lcr = data;
708 
709 	req.bmRequestType = UT_WRITE_VENDOR_DEVICE;
710 	req.bRequest = FTDI_SIO_SET_DATA;
711 	USETW(req.wValue, data);
712 	USETW(req.wIndex, portno);
713 	USETW(req.wLength, 0);
714 	DPRINTFN(2,("uftdi_param: reqtype=0x%02x req=0x%02x value=0x%04x "
715 		    "index=0x%04x len=%d\n", req.bmRequestType, req.bRequest,
716 		    UGETW(req.wValue), UGETW(req.wIndex), UGETW(req.wLength)));
717 	err = usbd_do_request(sc->sc_udev, &req, NULL);
718 	if (err)
719 		return EIO;
720 
721 	if (ISSET(t->c_cflag, CRTSCTS)) {
722 		flow = FTDI_SIO_RTS_CTS_HS;
723 		USETW(req.wValue, 0);
724 	} else if (ISSET(t->c_iflag, IXON) && ISSET(t->c_iflag, IXOFF)) {
725 		flow = FTDI_SIO_XON_XOFF_HS;
726 		USETW2(req.wValue, t->c_cc[VSTOP], t->c_cc[VSTART]);
727 	} else {
728 		flow = FTDI_SIO_DISABLE_FLOW_CTRL;
729 		USETW(req.wValue, 0);
730 	}
731 	req.bmRequestType = UT_WRITE_VENDOR_DEVICE;
732 	req.bRequest = FTDI_SIO_SET_FLOW_CTRL;
733 	USETW2(req.wIndex, flow, portno);
734 	USETW(req.wLength, 0);
735 	err = usbd_do_request(sc->sc_udev, &req, NULL);
736 	if (err)
737 		return EIO;
738 
739 	return 0;
740 }
741 
742 static void
743 uftdi_get_status(void *vsc, int portno, u_char *lsr, u_char *msr)
744 {
745 	struct uftdi_softc *sc = vsc;
746 
747 	DPRINTF(("uftdi_status: msr=0x%02x lsr=0x%02x\n",
748 		 sc->sc_msr, sc->sc_lsr));
749 
750 	if (sc->sc_dying)
751 		return;
752 
753 	*msr = sc->sc_msr;
754 	*lsr = sc->sc_lsr;
755 }
756 
757 static void
758 uftdi_break(void *vsc, int portno, int onoff)
759 {
760 	struct uftdi_softc *sc = vsc;
761 	usb_device_request_t req;
762 	int data;
763 
764 	DPRINTF(("uftdi_break: sc=%p, port=%d onoff=%d\n", vsc, portno,
765 		  onoff));
766 
767 	if (onoff) {
768 		data = sc->last_lcr | FTDI_SIO_SET_BREAK;
769 	} else {
770 		data = sc->last_lcr;
771 	}
772 
773 	req.bmRequestType = UT_WRITE_VENDOR_DEVICE;
774 	req.bRequest = FTDI_SIO_SET_DATA;
775 	USETW(req.wValue, data);
776 	USETW(req.wIndex, portno);
777 	USETW(req.wLength, 0);
778 	(void)usbd_do_request(sc->sc_udev, &req, NULL);
779 }
780