?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
hw/arm/virt: Support using SMC for PSCI
[qemu/ar7.git] / hw / usb / dev-serial.c
blob6066d9b0f7aeebe7c224e11acc933cc3e3adf15b
1 /*
2 * FTDI FT232BM Device emulation
3 *
4 * Copyright (c) 2006 CodeSourcery.
5 * Copyright (c) 2008 Samuel Thibault <samuel.thibault@ens-lyon.org>
6 * Written by Paul Brook, reused for FTDI by Samuel Thibault
7 *
8 * This code is licensed under the LGPL.
9 */
10
11 #include "qemu/osdep.h"
12 #include "qapi/error.h"
13 #include "qemu-common.h"
14 #include "qemu/cutils.h"
15 #include "qemu/error-report.h"
16 #include "hw/usb.h"
17 #include "hw/usb/desc.h"
18 #include "sysemu/char.h"
19
20 //#define DEBUG_Serial
21
22 #ifdef DEBUG_Serial
23 #define DPRINTF(fmt, ...) \
24 do { printf("usb-serial: " fmt , ## __VA_ARGS__); } while (0)
25 #else
26 #define DPRINTF(fmt, ...) do {} while(0)
27 #endif
28
29 #define RECV_BUF 384
30
31 /* Commands */
32 #define FTDI_RESET 0
33 #define FTDI_SET_MDM_CTRL 1
34 #define FTDI_SET_FLOW_CTRL 2
35 #define FTDI_SET_BAUD 3
36 #define FTDI_SET_DATA 4
37 #define FTDI_GET_MDM_ST 5
38 #define FTDI_SET_EVENT_CHR 6
39 #define FTDI_SET_ERROR_CHR 7
40 #define FTDI_SET_LATENCY 9
41 #define FTDI_GET_LATENCY 10
42
43 #define DeviceOutVendor ((USB_DIR_OUT|USB_TYPE_VENDOR|USB_RECIP_DEVICE)<<8)
44 #define DeviceInVendor ((USB_DIR_IN |USB_TYPE_VENDOR|USB_RECIP_DEVICE)<<8)
45
46 /* RESET */
47
48 #define FTDI_RESET_SIO 0
49 #define FTDI_RESET_RX 1
50 #define FTDI_RESET_TX 2
51
52 /* SET_MDM_CTRL */
53
54 #define FTDI_DTR 1
55 #define FTDI_SET_DTR (FTDI_DTR << 8)
56 #define FTDI_RTS 2
57 #define FTDI_SET_RTS (FTDI_RTS << 8)
58
59 /* SET_FLOW_CTRL */
60
61 #define FTDI_RTS_CTS_HS 1
62 #define FTDI_DTR_DSR_HS 2
63 #define FTDI_XON_XOFF_HS 4
64
65 /* SET_DATA */
66
67 #define FTDI_PARITY (0x7 << 8)
68 #define FTDI_ODD (0x1 << 8)
69 #define FTDI_EVEN (0x2 << 8)
70 #define FTDI_MARK (0x3 << 8)
71 #define FTDI_SPACE (0x4 << 8)
72
73 #define FTDI_STOP (0x3 << 11)
74 #define FTDI_STOP1 (0x0 << 11)
75 #define FTDI_STOP15 (0x1 << 11)
76 #define FTDI_STOP2 (0x2 << 11)
77
78 /* GET_MDM_ST */
79 /* TODO: should be sent every 40ms */
80 #define FTDI_CTS (1<<4) // CTS line status
81 #define FTDI_DSR (1<<5) // DSR line status
82 #define FTDI_RI (1<<6) // RI line status
83 #define FTDI_RLSD (1<<7) // Receive Line Signal Detect
84
85 /* Status */
86
87 #define FTDI_DR (1<<0) // Data Ready
88 #define FTDI_OE (1<<1) // Overrun Err
89 #define FTDI_PE (1<<2) // Parity Err
90 #define FTDI_FE (1<<3) // Framing Err
91 #define FTDI_BI (1<<4) // Break Interrupt
92 #define FTDI_THRE (1<<5) // Transmitter Holding Register
93 #define FTDI_TEMT (1<<6) // Transmitter Empty
94 #define FTDI_FIFO (1<<7) // Error in FIFO
95
96 typedef struct {
97 USBDevice dev;
98 uint8_t recv_buf[RECV_BUF];
99 uint16_t recv_ptr;
100 uint16_t recv_used;
101 uint8_t event_chr;
102 uint8_t error_chr;
103 uint8_t event_trigger;
104 QEMUSerialSetParams params;
105 int latency; /* ms */
106 CharBackend cs;
107 } USBSerialState;
108
109 #define TYPE_USB_SERIAL "usb-serial-dev"
110 #define USB_SERIAL_DEV(obj) OBJECT_CHECK(USBSerialState, (obj), TYPE_USB_SERIAL)
111
112 enum {
113 STR_MANUFACTURER = 1,
114 STR_PRODUCT_SERIAL,
115 STR_PRODUCT_BRAILLE,
116 STR_SERIALNUMBER,
117 };
118
119 static const USBDescStrings desc_strings = {
120 [STR_MANUFACTURER] = "QEMU",
121 [STR_PRODUCT_SERIAL] = "QEMU USB SERIAL",
122 [STR_PRODUCT_BRAILLE] = "QEMU USB BAUM BRAILLE",
123 [STR_SERIALNUMBER] = "1",
124 };
125
126 static const USBDescIface desc_iface0 = {
127 .bInterfaceNumber = 0,
128 .bNumEndpoints = 2,
129 .bInterfaceClass = 0xff,
130 .bInterfaceSubClass = 0xff,
131 .bInterfaceProtocol = 0xff,
132 .eps = (USBDescEndpoint[]) {
133 {
134 .bEndpointAddress = USB_DIR_IN | 0x01,
135 .bmAttributes = USB_ENDPOINT_XFER_BULK,
136 .wMaxPacketSize = 64,
137 },{
138 .bEndpointAddress = USB_DIR_OUT | 0x02,
139 .bmAttributes = USB_ENDPOINT_XFER_BULK,
140 .wMaxPacketSize = 64,
141 },
142 }
143 };
144
145 static const USBDescDevice desc_device = {
146 .bcdUSB = 0x0200,
147 .bMaxPacketSize0 = 8,
148 .bNumConfigurations = 1,
149 .confs = (USBDescConfig[]) {
150 {
151 .bNumInterfaces = 1,
152 .bConfigurationValue = 1,
153 .bmAttributes = USB_CFG_ATT_ONE,
154 .bMaxPower = 50,
155 .nif = 1,
156 .ifs = &desc_iface0,
157 },
158 },
159 };
160
161 static const USBDesc desc_serial = {
162 .id = {
163 .idVendor = 0x0403,
164 .idProduct = 0x6001,
165 .bcdDevice = 0x0400,
166 .iManufacturer = STR_MANUFACTURER,
167 .iProduct = STR_PRODUCT_SERIAL,
168 .iSerialNumber = STR_SERIALNUMBER,
169 },
170 .full = &desc_device,
171 .str = desc_strings,
172 };
173
174 static const USBDesc desc_braille = {
175 .id = {
176 .idVendor = 0x0403,
177 .idProduct = 0xfe72,
178 .bcdDevice = 0x0400,
179 .iManufacturer = STR_MANUFACTURER,
180 .iProduct = STR_PRODUCT_BRAILLE,
181 .iSerialNumber = STR_SERIALNUMBER,
182 },
183 .full = &desc_device,
184 .str = desc_strings,
185 };
186
187 static void usb_serial_reset(USBSerialState *s)
188 {
189 /* TODO: Set flow control to none */
190 s->event_chr = 0x0d;
191 s->event_trigger = 0;
192 s->recv_ptr = 0;
193 s->recv_used = 0;
194 /* TODO: purge in char driver */
195 }
196
197 static void usb_serial_handle_reset(USBDevice *dev)
198 {
199 USBSerialState *s = (USBSerialState *)dev;
200
201 DPRINTF("Reset\n");
202
203 usb_serial_reset(s);
204 /* TODO: Reset char device, send BREAK? */
205 }
206
207 static uint8_t usb_get_modem_lines(USBSerialState *s)
208 {
209 int flags;
210 uint8_t ret;
211
212 if (qemu_chr_fe_ioctl(&s->cs,
213 CHR_IOCTL_SERIAL_GET_TIOCM, &flags) == -ENOTSUP) {
214 return FTDI_CTS|FTDI_DSR|FTDI_RLSD;
215 }
216
217 ret = 0;
218 if (flags & CHR_TIOCM_CTS)
219 ret |= FTDI_CTS;
220 if (flags & CHR_TIOCM_DSR)
221 ret |= FTDI_DSR;
222 if (flags & CHR_TIOCM_RI)
223 ret |= FTDI_RI;
224 if (flags & CHR_TIOCM_CAR)
225 ret |= FTDI_RLSD;
226
227 return ret;
228 }
229
230 static void usb_serial_handle_control(USBDevice *dev, USBPacket *p,
231 int request, int value, int index, int length, uint8_t *data)
232 {
233 USBSerialState *s = (USBSerialState *)dev;
234 int ret;
235
236 DPRINTF("got control %x, value %x\n",request, value);
237 ret = usb_desc_handle_control(dev, p, request, value, index, length, data);
238 if (ret >= 0) {
239 return;
240 }
241
242 switch (request) {
243 case EndpointOutRequest | USB_REQ_CLEAR_FEATURE:
244 break;
245
246 /* Class specific requests. */
247 case DeviceOutVendor | FTDI_RESET:
248 switch (value) {
249 case FTDI_RESET_SIO:
250 usb_serial_reset(s);
251 break;
252 case FTDI_RESET_RX:
253 s->recv_ptr = 0;
254 s->recv_used = 0;
255 /* TODO: purge from char device */
256 break;
257 case FTDI_RESET_TX:
258 /* TODO: purge from char device */
259 break;
260 }
261 break;
262 case DeviceOutVendor | FTDI_SET_MDM_CTRL:
263 {
264 static int flags;
265 qemu_chr_fe_ioctl(&s->cs, CHR_IOCTL_SERIAL_GET_TIOCM, &flags);
266 if (value & FTDI_SET_RTS) {
267 if (value & FTDI_RTS)
268 flags |= CHR_TIOCM_RTS;
269 else
270 flags &= ~CHR_TIOCM_RTS;
271 }
272 if (value & FTDI_SET_DTR) {
273 if (value & FTDI_DTR)
274 flags |= CHR_TIOCM_DTR;
275 else
276 flags &= ~CHR_TIOCM_DTR;
277 }
278 qemu_chr_fe_ioctl(&s->cs, CHR_IOCTL_SERIAL_SET_TIOCM, &flags);
279 break;
280 }
281 case DeviceOutVendor | FTDI_SET_FLOW_CTRL:
282 /* TODO: ioctl */
283 break;
284 case DeviceOutVendor | FTDI_SET_BAUD: {
285 static const int subdivisors8[8] = { 0, 4, 2, 1, 3, 5, 6, 7 };
286 int subdivisor8 = subdivisors8[((value & 0xc000) >> 14)
287 | ((index & 1) << 2)];
288 int divisor = value & 0x3fff;
289
290 /* chip special cases */
291 if (divisor == 1 && subdivisor8 == 0)
292 subdivisor8 = 4;
293 if (divisor == 0 && subdivisor8 == 0)
294 divisor = 1;
295
296 s->params.speed = (48000000 / 2) / (8 * divisor + subdivisor8);
297 qemu_chr_fe_ioctl(&s->cs, CHR_IOCTL_SERIAL_SET_PARAMS, &s->params);
298 break;
299 }
300 case DeviceOutVendor | FTDI_SET_DATA:
301 switch (value & FTDI_PARITY) {
302 case 0:
303 s->params.parity = 'N';
304 break;
305 case FTDI_ODD:
306 s->params.parity = 'O';
307 break;
308 case FTDI_EVEN:
309 s->params.parity = 'E';
310 break;
311 default:
312 DPRINTF("unsupported parity %d\n", value & FTDI_PARITY);
313 goto fail;
314 }
315 switch (value & FTDI_STOP) {
316 case FTDI_STOP1:
317 s->params.stop_bits = 1;
318 break;
319 case FTDI_STOP2:
320 s->params.stop_bits = 2;
321 break;
322 default:
323 DPRINTF("unsupported stop bits %d\n", value & FTDI_STOP);
324 goto fail;
325 }
326 qemu_chr_fe_ioctl(&s->cs, CHR_IOCTL_SERIAL_SET_PARAMS, &s->params);
327 /* TODO: TX ON/OFF */
328 break;
329 case DeviceInVendor | FTDI_GET_MDM_ST:
330 data[0] = usb_get_modem_lines(s) | 1;
331 data[1] = 0;
332 p->actual_length = 2;
333 break;
334 case DeviceOutVendor | FTDI_SET_EVENT_CHR:
335 /* TODO: handle it */
336 s->event_chr = value;
337 break;
338 case DeviceOutVendor | FTDI_SET_ERROR_CHR:
339 /* TODO: handle it */
340 s->error_chr = value;
341 break;
342 case DeviceOutVendor | FTDI_SET_LATENCY:
343 s->latency = value;
344 break;
345 case DeviceInVendor | FTDI_GET_LATENCY:
346 data[0] = s->latency;
347 p->actual_length = 1;
348 break;
349 default:
350 fail:
351 DPRINTF("got unsupported/bogus control %x, value %x\n", request, value);
352 p->status = USB_RET_STALL;
353 break;
354 }
355 }
356
357 static void usb_serial_handle_data(USBDevice *dev, USBPacket *p)
358 {
359 USBSerialState *s = (USBSerialState *)dev;
360 uint8_t devep = p->ep->nr;
361 struct iovec *iov;
362 uint8_t header[2];
363 int i, first_len, len;
364
365 switch (p->pid) {
366 case USB_TOKEN_OUT:
367 if (devep != 2)
368 goto fail;
369 for (i = 0; i < p->iov.niov; i++) {
370 iov = p->iov.iov + i;
371 /* XXX this blocks entire thread. Rewrite to use
372 * qemu_chr_fe_write and background I/O callbacks */
373 qemu_chr_fe_write_all(&s->cs, iov->iov_base, iov->iov_len);
374 }
375 p->actual_length = p->iov.size;
376 break;
377
378 case USB_TOKEN_IN:
379 if (devep != 1)
380 goto fail;
381 first_len = RECV_BUF - s->recv_ptr;
382 len = p->iov.size;
383 if (len <= 2) {
384 p->status = USB_RET_NAK;
385 break;
386 }
387 header[0] = usb_get_modem_lines(s) | 1;
388 /* We do not have the uart details */
389 /* handle serial break */
390 if (s->event_trigger && s->event_trigger & FTDI_BI) {
391 s->event_trigger &= ~FTDI_BI;
392 header[1] = FTDI_BI;
393 usb_packet_copy(p, header, 2);
394 break;
395 } else {
396 header[1] = 0;
397 }
398 len -= 2;
399 if (len > s->recv_used)
400 len = s->recv_used;
401 if (!len) {
402 p->status = USB_RET_NAK;
403 break;
404 }
405 if (first_len > len)
406 first_len = len;
407 usb_packet_copy(p, header, 2);
408 usb_packet_copy(p, s->recv_buf + s->recv_ptr, first_len);
409 if (len > first_len)
410 usb_packet_copy(p, s->recv_buf, len - first_len);
411 s->recv_used -= len;
412 s->recv_ptr = (s->recv_ptr + len) % RECV_BUF;
413 break;
414
415 default:
416 DPRINTF("Bad token\n");
417 fail:
418 p->status = USB_RET_STALL;
419 break;
420 }
421 }
422
423 static int usb_serial_can_read(void *opaque)
424 {
425 USBSerialState *s = opaque;
426
427 if (!s->dev.attached) {
428 return 0;
429 }
430 return RECV_BUF - s->recv_used;
431 }
432
433 static void usb_serial_read(void *opaque, const uint8_t *buf, int size)
434 {
435 USBSerialState *s = opaque;
436 int first_size, start;
437
438 /* room in the buffer? */
439 if (size > (RECV_BUF - s->recv_used))
440 size = RECV_BUF - s->recv_used;
441
442 start = s->recv_ptr + s->recv_used;
443 if (start < RECV_BUF) {
444 /* copy data to end of buffer */
445 first_size = RECV_BUF - start;
446 if (first_size > size)
447 first_size = size;
448
449 memcpy(s->recv_buf + start, buf, first_size);
450
451 /* wrap around to front if needed */
452 if (size > first_size)
453 memcpy(s->recv_buf, buf + first_size, size - first_size);
454 } else {
455 start -= RECV_BUF;
456 memcpy(s->recv_buf + start, buf, size);
457 }
458 s->recv_used += size;
459 }
460
461 static void usb_serial_event(void *opaque, int event)
462 {
463 USBSerialState *s = opaque;
464
465 switch (event) {
466 case CHR_EVENT_BREAK:
467 s->event_trigger |= FTDI_BI;
468 break;
469 case CHR_EVENT_OPENED:
470 if (!s->dev.attached) {
471 usb_device_attach(&s->dev, &error_abort);
472 }
473 break;
474 case CHR_EVENT_CLOSED:
475 if (s->dev.attached) {
476 usb_device_detach(&s->dev);
477 }
478 break;
479 }
480 }
481
482 static void usb_serial_realize(USBDevice *dev, Error **errp)
483 {
484 USBSerialState *s = USB_SERIAL_DEV(dev);
485 Error *local_err = NULL;
486 CharDriverState *chr = qemu_chr_fe_get_driver(&s->cs);
487
488 usb_desc_create_serial(dev);
489 usb_desc_init(dev);
490 dev->auto_attach = 0;
491
492 if (!chr) {
493 error_setg(errp, "Property chardev is required");
494 return;
495 }
496
497 usb_check_attach(dev, &local_err);
498 if (local_err) {
499 error_propagate(errp, local_err);
500 return;
501 }
502
503 qemu_chr_fe_set_handlers(&s->cs, usb_serial_can_read, usb_serial_read,
504 usb_serial_event, s, NULL, true);
505 usb_serial_handle_reset(dev);
506
507 if (chr->be_open && !dev->attached) {
508 usb_device_attach(dev, &error_abort);
509 }
510 }
511
512 static USBDevice *usb_serial_init(USBBus *bus, const char *filename)
513 {
514 USBDevice *dev;
515 CharDriverState *cdrv;
516 uint32_t vendorid = 0, productid = 0;
517 char label[32];
518 static int index;
519
520 while (*filename && *filename != ':') {
521 const char *p;
522 char *e;
523 if (strstart(filename, "vendorid=", &p)) {
524 vendorid = strtol(p, &e, 16);
525 if (e == p || (*e && *e != ',' && *e != ':')) {
526 error_report("bogus vendor ID %s", p);
527 return NULL;
528 }
529 filename = e;
530 } else if (strstart(filename, "productid=", &p)) {
531 productid = strtol(p, &e, 16);
532 if (e == p || (*e && *e != ',' && *e != ':')) {
533 error_report("bogus product ID %s", p);
534 return NULL;
535 }
536 filename = e;
537 } else {
538 error_report("unrecognized serial USB option %s", filename);
539 return NULL;
540 }
541 while(*filename == ',')
542 filename++;
543 }
544 if (!*filename) {
545 error_report("character device specification needed");
546 return NULL;
547 }
548 filename++;
549
550 snprintf(label, sizeof(label), "usbserial%d", index++);
551 cdrv = qemu_chr_new(label, filename);
552 if (!cdrv)
553 return NULL;
554
555 dev = usb_create(bus, "usb-serial");
556 qdev_prop_set_chr(&dev->qdev, "chardev", cdrv);
557 if (vendorid)
558 qdev_prop_set_uint16(&dev->qdev, "vendorid", vendorid);
559 if (productid)
560 qdev_prop_set_uint16(&dev->qdev, "productid", productid);
561 return dev;
562 }
563
564 static USBDevice *usb_braille_init(USBBus *bus, const char *unused)
565 {
566 USBDevice *dev;
567 CharDriverState *cdrv;
568
569 cdrv = qemu_chr_new("braille", "braille");
570 if (!cdrv)
571 return NULL;
572
573 dev = usb_create(bus, "usb-braille");
574 qdev_prop_set_chr(&dev->qdev, "chardev", cdrv);
575 return dev;
576 }
577
578 static const VMStateDescription vmstate_usb_serial = {
579 .name = "usb-serial",
580 .unmigratable = 1,
581 };
582
583 static Property serial_properties[] = {
584 DEFINE_PROP_CHR("chardev", USBSerialState, cs),
585 DEFINE_PROP_END_OF_LIST(),
586 };
587
588 static void usb_serial_dev_class_init(ObjectClass *klass, void *data)
589 {
590 DeviceClass *dc = DEVICE_CLASS(klass);
591 USBDeviceClass *uc = USB_DEVICE_CLASS(klass);
592
593 uc->realize = usb_serial_realize;
594 uc->handle_reset = usb_serial_handle_reset;
595 uc->handle_control = usb_serial_handle_control;
596 uc->handle_data = usb_serial_handle_data;
597 dc->vmsd = &vmstate_usb_serial;
598 set_bit(DEVICE_CATEGORY_INPUT, dc->categories);
599 }
600
601 static const TypeInfo usb_serial_dev_type_info = {
602 .name = TYPE_USB_SERIAL,
603 .parent = TYPE_USB_DEVICE,
604 .instance_size = sizeof(USBSerialState),
605 .abstract = true,
606 .class_init = usb_serial_dev_class_init,
607 };
608
609 static void usb_serial_class_initfn(ObjectClass *klass, void *data)
610 {
611 DeviceClass *dc = DEVICE_CLASS(klass);
612 USBDeviceClass *uc = USB_DEVICE_CLASS(klass);
613
614 uc->product_desc = "QEMU USB Serial";
615 uc->usb_desc = &desc_serial;
616 dc->props = serial_properties;
617 }
618
619 static const TypeInfo serial_info = {
620 .name = "usb-serial",
621 .parent = TYPE_USB_SERIAL,
622 .class_init = usb_serial_class_initfn,
623 };
624
625 static Property braille_properties[] = {
626 DEFINE_PROP_CHR("chardev", USBSerialState, cs),
627 DEFINE_PROP_END_OF_LIST(),
628 };
629
630 static void usb_braille_class_initfn(ObjectClass *klass, void *data)
631 {
632 DeviceClass *dc = DEVICE_CLASS(klass);
633 USBDeviceClass *uc = USB_DEVICE_CLASS(klass);
634
635 uc->product_desc = "QEMU USB Braille";
636 uc->usb_desc = &desc_braille;
637 dc->props = braille_properties;
638 }
639
640 static const TypeInfo braille_info = {
641 .name = "usb-braille",
642 .parent = TYPE_USB_SERIAL,
643 .class_init = usb_braille_class_initfn,
644 };
645
646 static void usb_serial_register_types(void)
647 {
648 type_register_static(&usb_serial_dev_type_info);
649 type_register_static(&serial_info);
650 usb_legacy_register("usb-serial", "serial", usb_serial_init);
651 type_register_static(&braille_info);
652 usb_legacy_register("usb-braille", "braille", usb_braille_init);
653 }
654
655 type_init(usb_serial_register_types)
AR7 emulation for QEMU