ssu100.c 13.6 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
/*
 * usb-serial driver for Quatech SSU-100
 *
 * based on ftdi_sio.c and the original serqt_usb.c from Quatech
 *
 */

#include <linux/errno.h>
#include <linux/init.h>
#include <linux/slab.h>
#include <linux/tty.h>
#include <linux/tty_driver.h>
#include <linux/tty_flip.h>
#include <linux/module.h>
#include <linux/serial.h>
#include <linux/usb.h>
#include <linux/usb/serial.h>
18
#include <linux/serial_reg.h>
19 20 21 22 23 24 25 26 27 28 29 30 31 32
#include <linux/uaccess.h>

#define QT_OPEN_CLOSE_CHANNEL       0xca
#define QT_SET_GET_DEVICE           0xc2
#define QT_SET_GET_REGISTER         0xc0
#define QT_GET_SET_PREBUF_TRIG_LVL  0xcc
#define QT_SET_ATF                  0xcd
#define QT_GET_SET_UART             0xc1
#define QT_TRANSFER_IN              0xc0
#define QT_HW_FLOW_CONTROL_MASK     0xc5
#define QT_SW_FLOW_CONTROL_MASK     0xc6

#define  SERIAL_MSR_MASK            0xf0

33
#define  SERIAL_CRTSCTS ((UART_MCR_RTS << 8) | UART_MSR_CTS)
34

35
#define  SERIAL_EVEN_PARITY         (UART_LCR_PARITY | UART_LCR_EPAR)
36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60

#define  MAX_BAUD_RATE              460800

#define ATC_DISABLED                0x00
#define DUPMODE_BITS        0xc0
#define RR_BITS             0x03
#define LOOPMODE_BITS       0x41
#define RS232_MODE          0x00
#define RTSCTS_TO_CONNECTOR 0x40
#define CLKS_X4             0x02
#define FULLPWRBIT          0x00000080
#define NEXT_BOARD_POWER_BIT        0x00000004

#define DRIVER_DESC "Quatech SSU-100 USB to Serial Driver"

#define	USB_VENDOR_ID_QUATECH	0x061d	/* Quatech VID */
#define QUATECH_SSU100	0xC020	/* SSU100 */

static const struct usb_device_id id_table[] = {
	{USB_DEVICE(USB_VENDOR_ID_QUATECH, QUATECH_SSU100)},
	{}			/* Terminating entry */
};
MODULE_DEVICE_TABLE(usb, id_table);

struct ssu100_port_private {
61
	spinlock_t status_lock;
62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102
	u8 shadowLSR;
	u8 shadowMSR;
};

static inline int ssu100_control_msg(struct usb_device *dev,
				     u8 request, u16 data, u16 index)
{
	return usb_control_msg(dev, usb_sndctrlpipe(dev, 0),
			       request, 0x40, data, index,
			       NULL, 0, 300);
}

static inline int ssu100_setdevice(struct usb_device *dev, u8 *data)
{
	u16 x = ((u16)(data[1] << 8) | (u16)(data[0]));

	return ssu100_control_msg(dev, QT_SET_GET_DEVICE, x, 0);
}


static inline int ssu100_getdevice(struct usb_device *dev, u8 *data)
{
	return usb_control_msg(dev, usb_rcvctrlpipe(dev, 0),
			       QT_SET_GET_DEVICE, 0xc0, 0, 0,
			       data, 3, 300);
}

static inline int ssu100_getregister(struct usb_device *dev,
				     unsigned short uart,
				     unsigned short reg,
				     u8 *data)
{
	return usb_control_msg(dev, usb_rcvctrlpipe(dev, 0),
			       QT_SET_GET_REGISTER, 0xc0, reg,
			       uart, data, sizeof(*data), 300);

}


static inline int ssu100_setregister(struct usb_device *dev,
				     unsigned short uart,
103
				     unsigned short reg,
104 105
				     u16 data)
{
106
	u16 value = (data << 8) | reg;
107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124

	return usb_control_msg(dev, usb_sndctrlpipe(dev, 0),
			       QT_SET_GET_REGISTER, 0x40, value, uart,
			       NULL, 0, 300);

}

#define set_mctrl(dev, set)		update_mctrl((dev), (set), 0)
#define clear_mctrl(dev, clear)	update_mctrl((dev), 0, (clear))

/* these do not deal with device that have more than 1 port */
static inline int update_mctrl(struct usb_device *dev, unsigned int set,
			       unsigned int clear)
{
	unsigned urb_value;
	int result;

	if (((set | clear) & (TIOCM_DTR | TIOCM_RTS)) == 0) {
125
		dev_dbg(&dev->dev, "%s - DTR|RTS not being set|cleared\n", __func__);
126 127 128 129 130 131
		return 0;	/* no change */
	}

	clear &= ~set;	/* 'set' takes precedence over 'clear' */
	urb_value = 0;
	if (set & TIOCM_DTR)
132
		urb_value |= UART_MCR_DTR;
133
	if (set & TIOCM_RTS)
134
		urb_value |= UART_MCR_RTS;
135

136
	result = ssu100_setregister(dev, 0, UART_MCR, urb_value);
137
	if (result < 0)
138
		dev_dbg(&dev->dev, "%s Error from MODEM_CTRL urb\n", __func__);
139 140 141 142 143 144 145 146 147 148 149 150 151 152 153

	return result;
}

static int ssu100_initdevice(struct usb_device *dev)
{
	u8 *data;
	int result = 0;

	data = kzalloc(3, GFP_KERNEL);
	if (!data)
		return -ENOMEM;

	result = ssu100_getdevice(dev, data);
	if (result < 0) {
154
		dev_dbg(&dev->dev, "%s - get_device failed %i\n", __func__, result);
155 156 157 158 159 160 161
		goto out;
	}

	data[1] &= ~FULLPWRBIT;

	result = ssu100_setdevice(dev, data);
	if (result < 0) {
162
		dev_dbg(&dev->dev, "%s - setdevice failed %i\n", __func__, result);
163 164 165 166 167
		goto out;
	}

	result = ssu100_control_msg(dev, QT_GET_SET_PREBUF_TRIG_LVL, 128, 0);
	if (result < 0) {
168
		dev_dbg(&dev->dev, "%s - set prebuffer level failed %i\n", __func__, result);
169 170 171 172 173
		goto out;
	}

	result = ssu100_control_msg(dev, QT_SET_ATF, ATC_DISABLED, 0);
	if (result < 0) {
174
		dev_dbg(&dev->dev, "%s - set ATFprebuffer level failed %i\n", __func__, result);
175 176 177 178 179
		goto out;
	}

	result = ssu100_getdevice(dev, data);
	if (result < 0) {
180
		dev_dbg(&dev->dev, "%s - get_device failed %i\n", __func__, result);
181 182 183 184 185 186 187 188 189 190
		goto out;
	}

	data[0] &= ~(RR_BITS | DUPMODE_BITS);
	data[0] |= CLKS_X4;
	data[1] &= ~(LOOPMODE_BITS);
	data[1] |= RS232_MODE;

	result = ssu100_setdevice(dev, data);
	if (result < 0) {
191
		dev_dbg(&dev->dev, "%s - setdevice failed %i\n", __func__, result);
192 193 194 195 196 197 198 199 200 201 202 203 204 205
		goto out;
	}

out:	kfree(data);
	return result;

}


static void ssu100_set_termios(struct tty_struct *tty,
			       struct usb_serial_port *port,
			       struct ktermios *old_termios)
{
	struct usb_device *dev = port->serial->dev;
206
	struct ktermios *termios = &tty->termios;
207 208 209 210 211 212 213
	u16 baud, divisor, remainder;
	unsigned int cflag = termios->c_cflag;
	u16 urb_value = 0; /* will hold the new flags */
	int result;

	if (cflag & PARENB) {
		if (cflag & PARODD)
214
			urb_value |= UART_LCR_PARITY;
215 216 217 218 219 220
		else
			urb_value |= SERIAL_EVEN_PARITY;
	}

	switch (cflag & CSIZE) {
	case CS5:
221
		urb_value |= UART_LCR_WLEN5;
222 223
		break;
	case CS6:
224
		urb_value |= UART_LCR_WLEN6;
225 226
		break;
	case CS7:
227
		urb_value |= UART_LCR_WLEN7;
228 229 230
		break;
	default:
	case CS8:
231
		urb_value |= UART_LCR_WLEN8;
232 233 234 235 236 237 238
		break;
	}

	baud = tty_get_baud_rate(tty);
	if (!baud)
		baud = 9600;

239
	dev_dbg(&port->dev, "%s - got baud = %d\n", __func__, baud);
240 241 242 243 244 245 246 247 248 249 250


	divisor = MAX_BAUD_RATE / baud;
	remainder = MAX_BAUD_RATE % baud;
	if (((remainder * 2) >= baud) && (baud != 110))
		divisor++;

	urb_value = urb_value << 8;

	result = ssu100_control_msg(dev, QT_GET_SET_UART, divisor, urb_value);
	if (result < 0)
251
		dev_dbg(&port->dev, "%s - set uart failed\n", __func__);
252 253 254 255 256 257 258 259

	if (cflag & CRTSCTS)
		result = ssu100_control_msg(dev, QT_HW_FLOW_CONTROL_MASK,
					    SERIAL_CRTSCTS, 0);
	else
		result = ssu100_control_msg(dev, QT_HW_FLOW_CONTROL_MASK,
					    0, 0);
	if (result < 0)
260
		dev_dbg(&port->dev, "%s - set HW flow control failed\n", __func__);
261 262 263 264 265 266 267 268 269 270 271

	if (I_IXOFF(tty) || I_IXON(tty)) {
		u16 x = ((u16)(START_CHAR(tty) << 8) | (u16)(STOP_CHAR(tty)));

		result = ssu100_control_msg(dev, QT_SW_FLOW_CONTROL_MASK,
					    x, 0);
	} else
		result = ssu100_control_msg(dev, QT_SW_FLOW_CONTROL_MASK,
					    0, 0);

	if (result < 0)
272
		dev_dbg(&port->dev, "%s - set SW flow control failed\n", __func__);
273 274 275 276 277 278 279 280 281 282

}


static int ssu100_open(struct tty_struct *tty, struct usb_serial_port *port)
{
	struct usb_device *dev = port->serial->dev;
	struct ssu100_port_private *priv = usb_get_serial_port_data(port);
	u8 *data;
	int result;
283
	unsigned long flags;
284 285 286 287 288 289 290 291 292 293

	data = kzalloc(2, GFP_KERNEL);
	if (!data)
		return -ENOMEM;

	result = usb_control_msg(dev, usb_rcvctrlpipe(dev, 0),
				 QT_OPEN_CLOSE_CHANNEL,
				 QT_TRANSFER_IN, 0x01,
				 0, data, 2, 300);
	if (result < 0) {
294
		dev_dbg(&port->dev, "%s - open failed %i\n", __func__, result);
295 296 297 298
		kfree(data);
		return result;
	}

299
	spin_lock_irqsave(&priv->status_lock, flags);
300 301
	priv->shadowLSR = data[0];
	priv->shadowMSR = data[1];
302
	spin_unlock_irqrestore(&priv->status_lock, flags);
303 304 305 306 307 308

	kfree(data);

/* set to 9600 */
	result = ssu100_control_msg(dev, QT_GET_SET_UART, 0x30, 0x0300);
	if (result < 0)
309
		dev_dbg(&port->dev, "%s - set uart failed\n", __func__);
310 311

	if (tty)
312
		ssu100_set_termios(tty, port, &tty->termios);
313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339

	return usb_serial_generic_open(tty, port);
}

static int get_serial_info(struct usb_serial_port *port,
			   struct serial_struct __user *retinfo)
{
	struct serial_struct tmp;

	if (!retinfo)
		return -EFAULT;

	memset(&tmp, 0, sizeof(tmp));
	tmp.line		= port->serial->minor;
	tmp.port		= 0;
	tmp.irq			= 0;
	tmp.flags		= ASYNC_SKIP_TEST | ASYNC_AUTO_IRQ;
	tmp.xmit_fifo_size	= port->bulk_out_size;
	tmp.baud_base		= 9600;
	tmp.close_delay		= 5*HZ;
	tmp.closing_wait	= 30*HZ;

	if (copy_to_user(retinfo, &tmp, sizeof(*retinfo)))
		return -EFAULT;
	return 0;
}

340
static int ssu100_ioctl(struct tty_struct *tty,
341 342 343 344
		    unsigned int cmd, unsigned long arg)
{
	struct usb_serial_port *port = tty->driver_data;

345
	dev_dbg(&port->dev, "%s cmd 0x%04x\n", __func__, cmd);
346 347 348 349 350 351 352 353 354

	switch (cmd) {
	case TIOCGSERIAL:
		return get_serial_info(port,
				       (struct serial_struct __user *) arg);
	default:
		break;
	}

355
	dev_dbg(&port->dev, "%s arg not supported\n", __func__);
356 357 358 359 360

	return -ENOIOCTLCMD;
}

static int ssu100_attach(struct usb_serial *serial)
361 362 363 364 365
{
	return ssu100_initdevice(serial->dev);
}

static int ssu100_port_probe(struct usb_serial_port *port)
366 367 368 369
{
	struct ssu100_port_private *priv;

	priv = kzalloc(sizeof(*priv), GFP_KERNEL);
370
	if (!priv)
371 372
		return -ENOMEM;

373
	spin_lock_init(&priv->status_lock);
374

375 376
	usb_set_serial_port_data(port, priv);

377 378 379 380 381 382 383 384 385 386 387
	return 0;
}

static int ssu100_port_remove(struct usb_serial_port *port)
{
	struct ssu100_port_private *priv;

	priv = usb_get_serial_port_data(port);
	kfree(priv);

	return 0;
388 389
}

390
static int ssu100_tiocmget(struct tty_struct *tty)
391 392 393 394 395 396 397 398 399 400
{
	struct usb_serial_port *port = tty->driver_data;
	struct usb_device *dev = port->serial->dev;
	u8 *d;
	int r;

	d = kzalloc(2, GFP_KERNEL);
	if (!d)
		return -ENOMEM;

401
	r = ssu100_getregister(dev, 0, UART_MCR, d);
402 403 404
	if (r < 0)
		goto mget_out;

405
	r = ssu100_getregister(dev, 0, UART_MSR, d+1);
406 407 408
	if (r < 0)
		goto mget_out;

409 410 411 412 413 414
	r = (d[0] & UART_MCR_DTR ? TIOCM_DTR : 0) |
		(d[0] & UART_MCR_RTS ? TIOCM_RTS : 0) |
		(d[1] & UART_MSR_CTS ? TIOCM_CTS : 0) |
		(d[1] & UART_MSR_DCD ? TIOCM_CAR : 0) |
		(d[1] & UART_MSR_RI ? TIOCM_RI : 0) |
		(d[1] & UART_MSR_DSR ? TIOCM_DSR : 0);
415 416 417 418 419 420

mget_out:
	kfree(d);
	return r;
}

421
static int ssu100_tiocmset(struct tty_struct *tty,
422 423 424 425 426 427 428 429 430 431 432 433
			   unsigned int set, unsigned int clear)
{
	struct usb_serial_port *port = tty->driver_data;
	struct usb_device *dev = port->serial->dev;

	return update_mctrl(dev, set, clear);
}

static void ssu100_dtr_rts(struct usb_serial_port *port, int on)
{
	struct usb_device *dev = port->serial->dev;

434 435 436
	/* Disable flow control */
	if (!on) {
		if (ssu100_setregister(dev, 0, UART_MCR, 0) < 0)
437 438
			dev_err(&port->dev, "error from flowcontrol urb\n");
	}
439 440 441 442 443
	/* drop RTS and DTR */
	if (on)
		set_mctrl(dev, TIOCM_DTR | TIOCM_RTS);
	else
		clear_mctrl(dev, TIOCM_DTR | TIOCM_RTS);
444 445
}

446 447 448 449 450 451 452 453 454 455 456 457
static void ssu100_update_msr(struct usb_serial_port *port, u8 msr)
{
	struct ssu100_port_private *priv = usb_get_serial_port_data(port);
	unsigned long flags;

	spin_lock_irqsave(&priv->status_lock, flags);
	priv->shadowMSR = msr;
	spin_unlock_irqrestore(&priv->status_lock, flags);

	if (msr & UART_MSR_ANY_DELTA) {
		/* update input line counters */
		if (msr & UART_MSR_DCTS)
458
			port->icount.cts++;
459
		if (msr & UART_MSR_DDSR)
460
			port->icount.dsr++;
461
		if (msr & UART_MSR_DDCD)
462
			port->icount.dcd++;
463
		if (msr & UART_MSR_TERI)
464
			port->icount.rng++;
465
		wake_up_interruptible(&port->port.delta_msr_wait);
466 467 468
	}
}

469 470
static void ssu100_update_lsr(struct usb_serial_port *port, u8 lsr,
			      char *tty_flag)
471 472 473 474 475 476 477 478
{
	struct ssu100_port_private *priv = usb_get_serial_port_data(port);
	unsigned long flags;

	spin_lock_irqsave(&priv->status_lock, flags);
	priv->shadowLSR = lsr;
	spin_unlock_irqrestore(&priv->status_lock, flags);

479
	*tty_flag = TTY_NORMAL;
480
	if (lsr & UART_LSR_BRK_ERROR_BITS) {
481 482 483
		/* we always want to update icount, but we only want to
		 * update tty_flag for one case */
		if (lsr & UART_LSR_BI) {
484
			port->icount.brk++;
485 486 487 488
			*tty_flag = TTY_BREAK;
			usb_serial_handle_break(port);
		}
		if (lsr & UART_LSR_PE) {
489
			port->icount.parity++;
490 491 492 493
			if (*tty_flag == TTY_NORMAL)
				*tty_flag = TTY_PARITY;
		}
		if (lsr & UART_LSR_FE) {
494
			port->icount.frame++;
495 496 497
			if (*tty_flag == TTY_NORMAL)
				*tty_flag = TTY_FRAME;
		}
498
		if (lsr & UART_LSR_OE) {
499
			port->icount.overrun++;
500
			tty_insert_flip_char(&port->port, 0, TTY_OVERRUN);
501
		}
502
	}
503

504 505
}

506
static void ssu100_process_read_urb(struct urb *urb)
507
{
508 509
	struct usb_serial_port *port = urb->context;
	char *packet = (char *)urb->transfer_buffer;
510
	char flag = TTY_NORMAL;
511 512
	u32 len = urb->actual_length;
	int i;
513 514
	char *ch;

515 516
	if ((len >= 4) &&
	    (packet[0] == 0x1b) && (packet[1] == 0x1b) &&
517
	    ((packet[2] == 0x00) || (packet[2] == 0x01))) {
518
		if (packet[2] == 0x00)
519
			ssu100_update_lsr(port, packet[3], &flag);
520 521
		if (packet[2] == 0x01)
			ssu100_update_msr(port, packet[3]);
522 523 524 525 526 527 528

		len -= 4;
		ch = packet + 4;
	} else
		ch = packet;

	if (!len)
529
		return;	/* status only */
530 531 532

	if (port->port.console && port->sysrq) {
		for (i = 0; i < len; i++, ch++) {
533
			if (!usb_serial_handle_sysrq_char(port, *ch))
534
				tty_insert_flip_char(&port->port, *ch, flag);
535 536
		}
	} else
537
		tty_insert_flip_string_fixed_flag(&port->port, ch, flag, len);
538

539
	tty_flip_buffer_push(&port->port);
540 541 542 543 544 545 546 547 548 549 550 551
}

static struct usb_serial_driver ssu100_device = {
	.driver = {
		.owner = THIS_MODULE,
		.name = "ssu100",
	},
	.description	     = DRIVER_DESC,
	.id_table	     = id_table,
	.num_ports	     = 1,
	.open		     = ssu100_open,
	.attach              = ssu100_attach,
552 553
	.port_probe          = ssu100_port_probe,
	.port_remove         = ssu100_port_remove,
554 555 556 557
	.dtr_rts             = ssu100_dtr_rts,
	.process_read_urb    = ssu100_process_read_urb,
	.tiocmget            = ssu100_tiocmget,
	.tiocmset            = ssu100_tiocmset,
558
	.tiocmiwait          = usb_serial_generic_tiocmiwait,
559
	.get_icount	     = usb_serial_generic_get_icount,
560 561 562 563
	.ioctl               = ssu100_ioctl,
	.set_termios         = ssu100_set_termios,
};

564 565 566 567
static struct usb_serial_driver * const serial_drivers[] = {
	&ssu100_device, NULL
};

568
module_usb_serial_driver(serial_drivers, id_table);
569 570 571

MODULE_DESCRIPTION(DRIVER_DESC);
MODULE_LICENSE("GPL");