xref: /linux/drivers/usb/serial/ark3116.c (revision 27258e448eb301cf89e351df87aa8cb916653bf2)
1 /*
2  * Copyright (C) 2006
3  *   Simon Schulz (ark3116_driver <at> auctionant.de)
4  *
5  * ark3116
6  * - implements a driver for the arkmicro ark3116 chipset (vendor=0x6547,
7  *   productid=0x0232) (used in a datacable called KQ-U8A)
8  *
9  * - based on code by krisfx -> thanks !!
10  *   (see http://www.linuxquestions.org/questions/showthread.php?p=2184457#post2184457)
11  *
12  *  - based on logs created by usbsnoopy
13  *
14  * This program is free software; you can redistribute it and/or modify it
15  * under the terms of the GNU General Public License as published by the
16  * Free Software Foundation; either version 2 of the License, or (at your
17  * option) any later version.
18  */
19 
20 #include <linux/kernel.h>
21 #include <linux/init.h>
22 #include <linux/tty.h>
23 #include <linux/module.h>
24 #include <linux/usb.h>
25 #include <linux/usb/serial.h>
26 #include <linux/serial.h>
27 #include <linux/uaccess.h>
28 
29 
30 static int debug;
31 
32 static struct usb_device_id id_table [] = {
33 	{ USB_DEVICE(0x6547, 0x0232) },
34 	{ },
35 };
36 MODULE_DEVICE_TABLE(usb, id_table);
37 
38 static inline void ARK3116_SND(struct usb_serial *serial, int seq,
39 			       __u8 request, __u8 requesttype,
40 			       __u16 value, __u16 index)
41 {
42 	int result;
43 	result = usb_control_msg(serial->dev,
44 				 usb_sndctrlpipe(serial->dev, 0),
45 				 request, requesttype, value, index,
46 				 NULL, 0x00, 1000);
47 	dbg("%03d > ok", seq);
48 }
49 
50 static inline void ARK3116_RCV(struct usb_serial *serial, int seq,
51 			       __u8 request, __u8 requesttype,
52 			       __u16 value, __u16 index, __u8 expected,
53 			       char *buf)
54 {
55 	int result;
56 	result = usb_control_msg(serial->dev,
57 				 usb_rcvctrlpipe(serial->dev, 0),
58 				 request, requesttype, value, index,
59 				 buf, 0x0000001, 1000);
60 	if (result)
61 		dbg("%03d < %d bytes [0x%02X]", seq, result,
62 		    ((unsigned char *)buf)[0]);
63 	else
64 		dbg("%03d < 0 bytes", seq);
65 }
66 
67 static inline void ARK3116_RCV_QUIET(struct usb_serial *serial,
68 				     __u8 request, __u8 requesttype,
69 				     __u16 value, __u16 index, char *buf)
70 {
71 	usb_control_msg(serial->dev,
72 			usb_rcvctrlpipe(serial->dev, 0),
73 			request, requesttype, value, index,
74 			buf, 0x0000001, 1000);
75 }
76 
77 static int ark3116_attach(struct usb_serial *serial)
78 {
79 	char *buf;
80 
81 	buf = kmalloc(1, GFP_KERNEL);
82 	if (!buf) {
83 		dbg("error kmalloc -> out of mem?");
84 		return -ENOMEM;
85 	}
86 
87 	/* 3 */
88 	ARK3116_SND(serial, 3, 0xFE, 0x40, 0x0008, 0x0002);
89 	ARK3116_SND(serial, 4, 0xFE, 0x40, 0x0008, 0x0001);
90 	ARK3116_SND(serial, 5, 0xFE, 0x40, 0x0000, 0x0008);
91 	ARK3116_SND(serial, 6, 0xFE, 0x40, 0x0000, 0x000B);
92 
93 	/* <-- seq7 */
94 	ARK3116_RCV(serial,  7, 0xFE, 0xC0, 0x0000, 0x0003, 0x00, buf);
95 	ARK3116_SND(serial,  8, 0xFE, 0x40, 0x0080, 0x0003);
96 	ARK3116_SND(serial,  9, 0xFE, 0x40, 0x001A, 0x0000);
97 	ARK3116_SND(serial, 10, 0xFE, 0x40, 0x0000, 0x0001);
98 	ARK3116_SND(serial, 11, 0xFE, 0x40, 0x0000, 0x0003);
99 
100 	/* <-- seq12 */
101 	ARK3116_RCV(serial, 12, 0xFE, 0xC0, 0x0000, 0x0004, 0x00, buf);
102 	ARK3116_SND(serial, 13, 0xFE, 0x40, 0x0000, 0x0004);
103 
104 	/* 14 */
105 	ARK3116_RCV(serial, 14, 0xFE, 0xC0, 0x0000, 0x0004, 0x00, buf);
106 	ARK3116_SND(serial, 15, 0xFE, 0x40, 0x0000, 0x0004);
107 
108 	/* 16 */
109 	ARK3116_RCV(serial, 16, 0xFE, 0xC0, 0x0000, 0x0004, 0x00, buf);
110 	/* --> seq17 */
111 	ARK3116_SND(serial, 17, 0xFE, 0x40, 0x0001, 0x0004);
112 
113 	/* <-- seq18 */
114 	ARK3116_RCV(serial, 18, 0xFE, 0xC0, 0x0000, 0x0004, 0x01, buf);
115 
116 	/* --> seq19 */
117 	ARK3116_SND(serial, 19, 0xFE, 0x40, 0x0003, 0x0004);
118 
119 	/* <-- seq20 */
120 	/* seems like serial port status info (RTS, CTS, ...) */
121 	/* returns modem control line status?! */
122 	ARK3116_RCV(serial, 20, 0xFE, 0xC0, 0x0000, 0x0006, 0xFF, buf);
123 
124 	/* set 9600 baud & do some init?! */
125 	ARK3116_SND(serial, 147, 0xFE, 0x40, 0x0083, 0x0003);
126 	ARK3116_SND(serial, 148, 0xFE, 0x40, 0x0038, 0x0000);
127 	ARK3116_SND(serial, 149, 0xFE, 0x40, 0x0001, 0x0001);
128 	ARK3116_SND(serial, 150, 0xFE, 0x40, 0x0003, 0x0003);
129 	ARK3116_RCV(serial, 151, 0xFE, 0xC0, 0x0000, 0x0004, 0x03, buf);
130 	ARK3116_SND(serial, 152, 0xFE, 0x40, 0x0000, 0x0003);
131 	ARK3116_RCV(serial, 153, 0xFE, 0xC0, 0x0000, 0x0003, 0x00, buf);
132 	ARK3116_SND(serial, 154, 0xFE, 0x40, 0x0003, 0x0003);
133 
134 	kfree(buf);
135 	return 0;
136 }
137 
138 static void ark3116_init_termios(struct tty_struct *tty)
139 {
140 	struct ktermios *termios = tty->termios;
141 	*termios = tty_std_termios;
142 	termios->c_cflag = B9600 | CS8
143 				      | CREAD | HUPCL | CLOCAL;
144 	termios->c_ispeed = 9600;
145 	termios->c_ospeed = 9600;
146 }
147 
148 static void ark3116_set_termios(struct tty_struct *tty,
149 				struct usb_serial_port *port,
150 				struct ktermios *old_termios)
151 {
152 	struct usb_serial *serial = port->serial;
153 	struct ktermios *termios = tty->termios;
154 	unsigned int cflag = termios->c_cflag;
155 	int baud;
156 	int ark3116_baud;
157 	char *buf;
158 	char config;
159 
160 	config = 0;
161 
162 	dbg("%s - port %d", __func__, port->number);
163 
164 
165 	cflag = termios->c_cflag;
166 	termios->c_cflag &= ~(CMSPAR|CRTSCTS);
167 
168 	buf = kmalloc(1, GFP_KERNEL);
169 	if (!buf) {
170 		dbg("error kmalloc");
171 		*termios = *old_termios;
172 		return;
173 	}
174 
175 	/* set data bit count (8/7/6/5) */
176 	if (cflag & CSIZE) {
177 		switch (cflag & CSIZE) {
178 		case CS5:
179 			config |= 0x00;
180 			dbg("setting CS5");
181 			break;
182 		case CS6:
183 			config |= 0x01;
184 			dbg("setting CS6");
185 			break;
186 		case CS7:
187 			config |= 0x02;
188 			dbg("setting CS7");
189 			break;
190 		default:
191 			dbg("CSIZE was set but not CS5-CS8, using CS8!");
192 			/* fall through */
193 		case CS8:
194 			config |= 0x03;
195 			dbg("setting CS8");
196 			break;
197 		}
198 	}
199 
200 	/* set parity (NONE/EVEN/ODD) */
201 	if (cflag & PARENB) {
202 		if (cflag & PARODD) {
203 			config |= 0x08;
204 			dbg("setting parity to ODD");
205 		} else {
206 			config |= 0x18;
207 			dbg("setting parity to EVEN");
208 		}
209 	} else {
210 		dbg("setting parity to NONE");
211 	}
212 
213 	/* set stop bit (1/2) */
214 	if (cflag & CSTOPB) {
215 		config |= 0x04;
216 		dbg("setting 2 stop bits");
217 	} else {
218 		dbg("setting 1 stop bit");
219 	}
220 
221 	/* set baudrate */
222 	baud = tty_get_baud_rate(tty);
223 
224 	switch (baud) {
225 	case 75:
226 	case 150:
227 	case 300:
228 	case 600:
229 	case 1200:
230 	case 1800:
231 	case 2400:
232 	case 4800:
233 	case 9600:
234 	case 19200:
235 	case 38400:
236 	case 57600:
237 	case 115200:
238 	case 230400:
239 	case 460800:
240 		/* Report the resulting rate back to the caller */
241 		tty_encode_baud_rate(tty, baud, baud);
242 		break;
243 	/* set 9600 as default (if given baudrate is invalid for example) */
244 	default:
245 		tty_encode_baud_rate(tty, 9600, 9600);
246 	case 0:
247 		baud = 9600;
248 	}
249 
250 	/*
251 	 * found by try'n'error, be careful, maybe there are other options
252 	 * for multiplicator etc! (3.5 for example)
253 	 */
254 	if (baud == 460800)
255 		/* strange, for 460800 the formula is wrong
256 		 * if using round() then 9600baud is wrong) */
257 		ark3116_baud = 7;
258 	else
259 		ark3116_baud = 3000000 / baud;
260 
261 	/* ? */
262 	ARK3116_RCV(serial, 0, 0xFE, 0xC0, 0x0000, 0x0003, 0x03, buf);
263 
264 	/* offset = buf[0]; */
265 	/* offset = 0x03; */
266 	/* dbg("using 0x%04X as target for 0x0003:", 0x0080 + offset); */
267 
268 	/* set baudrate */
269 	dbg("setting baudrate to %d (->reg=%d)", baud, ark3116_baud);
270 	ARK3116_SND(serial, 147, 0xFE, 0x40, 0x0083, 0x0003);
271 	ARK3116_SND(serial, 148, 0xFE, 0x40,
272 			    (ark3116_baud & 0x00FF), 0x0000);
273 	ARK3116_SND(serial, 149, 0xFE, 0x40,
274 			    (ark3116_baud & 0xFF00) >> 8, 0x0001);
275 	ARK3116_SND(serial, 150, 0xFE, 0x40, 0x0003, 0x0003);
276 
277 	/* ? */
278 	ARK3116_RCV(serial, 151, 0xFE, 0xC0, 0x0000, 0x0004, 0x03, buf);
279 	ARK3116_SND(serial, 152, 0xFE, 0x40, 0x0000, 0x0003);
280 
281 	/* set data bit count, stop bit count & parity: */
282 	dbg("updating bit count, stop bit or parity (cfg=0x%02X)", config);
283 	ARK3116_RCV(serial, 153, 0xFE, 0xC0, 0x0000, 0x0003, 0x00, buf);
284 	ARK3116_SND(serial, 154, 0xFE, 0x40, config, 0x0003);
285 
286 	if (cflag & CRTSCTS)
287 		dbg("CRTSCTS not supported by chipset?!");
288 
289 	/* TEST ARK3116_SND(154, 0xFE, 0x40, 0xFFFF, 0x0006); */
290 
291 	kfree(buf);
292 
293 	return;
294 }
295 
296 static int ark3116_open(struct tty_struct *tty, struct usb_serial_port *port)
297 {
298 	struct ktermios tmp_termios;
299 	struct usb_serial *serial = port->serial;
300 	char *buf;
301 	int result = 0;
302 
303 	dbg("%s - port %d", __func__, port->number);
304 
305 	buf = kmalloc(1, GFP_KERNEL);
306 	if (!buf) {
307 		dbg("error kmalloc -> out of mem?");
308 		return -ENOMEM;
309 	}
310 
311 	result = usb_serial_generic_open(tty, port);
312 	if (result)
313 		goto err_out;
314 
315 	/* open */
316 	ARK3116_RCV(serial, 111, 0xFE, 0xC0, 0x0000, 0x0003, 0x02, buf);
317 
318 	ARK3116_SND(serial, 112, 0xFE, 0x40, 0x0082, 0x0003);
319 	ARK3116_SND(serial, 113, 0xFE, 0x40, 0x001A, 0x0000);
320 	ARK3116_SND(serial, 114, 0xFE, 0x40, 0x0000, 0x0001);
321 	ARK3116_SND(serial, 115, 0xFE, 0x40, 0x0002, 0x0003);
322 
323 	ARK3116_RCV(serial, 116, 0xFE, 0xC0, 0x0000, 0x0004, 0x03, buf);
324 	ARK3116_SND(serial, 117, 0xFE, 0x40, 0x0002, 0x0004);
325 
326 	ARK3116_RCV(serial, 118, 0xFE, 0xC0, 0x0000, 0x0004, 0x02, buf);
327 	ARK3116_SND(serial, 119, 0xFE, 0x40, 0x0000, 0x0004);
328 
329 	ARK3116_RCV(serial, 120, 0xFE, 0xC0, 0x0000, 0x0004, 0x00, buf);
330 
331 	ARK3116_SND(serial, 121, 0xFE, 0x40, 0x0001, 0x0004);
332 
333 	ARK3116_RCV(serial, 122, 0xFE, 0xC0, 0x0000, 0x0004, 0x01, buf);
334 
335 	ARK3116_SND(serial, 123, 0xFE, 0x40, 0x0003, 0x0004);
336 
337 	/* returns different values (control lines?!) */
338 	ARK3116_RCV(serial, 124, 0xFE, 0xC0, 0x0000, 0x0006, 0xFF, buf);
339 
340 	/* initialise termios */
341 	if (tty)
342 		ark3116_set_termios(tty, port, &tmp_termios);
343 
344 err_out:
345 	kfree(buf);
346 
347 	return result;
348 }
349 
350 static int ark3116_ioctl(struct tty_struct *tty, struct file *file,
351 			 unsigned int cmd, unsigned long arg)
352 {
353 	struct usb_serial_port *port = tty->driver_data;
354 	struct serial_struct serstruct;
355 	void __user *user_arg = (void __user *)arg;
356 
357 	switch (cmd) {
358 	case TIOCGSERIAL:
359 		/* XXX: Some of these values are probably wrong. */
360 		memset(&serstruct, 0, sizeof(serstruct));
361 		serstruct.type = PORT_16654;
362 		serstruct.line = port->serial->minor;
363 		serstruct.port = port->number;
364 		serstruct.custom_divisor = 0;
365 		serstruct.baud_base = 460800;
366 
367 		if (copy_to_user(user_arg, &serstruct, sizeof(serstruct)))
368 			return -EFAULT;
369 
370 		return 0;
371 	case TIOCSSERIAL:
372 		if (copy_from_user(&serstruct, user_arg, sizeof(serstruct)))
373 			return -EFAULT;
374 		return 0;
375 	default:
376 		dbg("%s cmd 0x%04x not supported", __func__, cmd);
377 		break;
378 	}
379 
380 	return -ENOIOCTLCMD;
381 }
382 
383 static int ark3116_tiocmget(struct tty_struct *tty, struct file *file)
384 {
385 	struct usb_serial_port *port = tty->driver_data;
386 	struct usb_serial *serial = port->serial;
387 	char *buf;
388 	char temp;
389 
390 	/* seems like serial port status info (RTS, CTS, ...) is stored
391 	 * in reg(?) 0x0006
392 	 * pcb connection point 11 = GND -> sets bit4 of response
393 	 * pcb connection point  7 = GND -> sets bit6 of response
394 	 */
395 
396 	buf = kmalloc(1, GFP_KERNEL);
397 	if (!buf) {
398 		dbg("error kmalloc");
399 		return -ENOMEM;
400 	}
401 
402 	/* read register */
403 	ARK3116_RCV_QUIET(serial, 0xFE, 0xC0, 0x0000, 0x0006, buf);
404 	temp = buf[0];
405 	kfree(buf);
406 
407 	/* i do not really know if bit4=CTS and bit6=DSR... just a
408 	 * quick guess!
409 	 */
410 	return (temp & (1<<4) ? TIOCM_CTS : 0)
411 	       | (temp & (1<<6) ? TIOCM_DSR : 0);
412 }
413 
414 static struct usb_driver ark3116_driver = {
415 	.name =		"ark3116",
416 	.probe =	usb_serial_probe,
417 	.disconnect =	usb_serial_disconnect,
418 	.id_table =	id_table,
419 	.no_dynamic_id =	1,
420 };
421 
422 static struct usb_serial_driver ark3116_device = {
423 	.driver = {
424 		.owner =	THIS_MODULE,
425 		.name =		"ark3116",
426 	},
427 	.id_table =		id_table,
428 	.usb_driver =		&ark3116_driver,
429 	.num_ports =		1,
430 	.attach =		ark3116_attach,
431 	.set_termios =		ark3116_set_termios,
432 	.init_termios =		ark3116_init_termios,
433 	.ioctl =		ark3116_ioctl,
434 	.tiocmget =		ark3116_tiocmget,
435 	.open =			ark3116_open,
436 };
437 
438 static int __init ark3116_init(void)
439 {
440 	int retval;
441 
442 	retval = usb_serial_register(&ark3116_device);
443 	if (retval)
444 		return retval;
445 	retval = usb_register(&ark3116_driver);
446 	if (retval)
447 		usb_serial_deregister(&ark3116_device);
448 	return retval;
449 }
450 
451 static void __exit ark3116_exit(void)
452 {
453 	usb_deregister(&ark3116_driver);
454 	usb_serial_deregister(&ark3116_device);
455 }
456 
457 module_init(ark3116_init);
458 module_exit(ark3116_exit);
459 MODULE_LICENSE("GPL");
460 
461 module_param(debug, bool, S_IRUGO | S_IWUSR);
462 MODULE_PARM_DESC(debug, "Debug enabled or not");
463 
464