[qemu.git] / hw / usb-serial.c

/*
 * FTDI FT232BM Device emulation
 *
 * Copyright (c) 2006 CodeSourcery.
 * Copyright (c) 2008 Samuel Thibault <samuel.thibault@ens-lyon.org>
 * Written by Paul Brook, reused for FTDI by Samuel Thibault
 *
 * This code is licensed under the LGPL.
 */

#include "qemu-common.h"
#include "qemu-error.h"
#include "usb.h"
#include "usb-desc.h"
#include "qemu-char.h"

//#define DEBUG_Serial

#ifdef DEBUG_Serial
#define DPRINTF(fmt, ...) \
do { printf("usb-serial: " fmt , ## __VA_ARGS__); } while (0)
#else
#define DPRINTF(fmt, ...) do {} while(0)
#endif

#define RECV_BUF 384

/* Commands */
#define FTDI_RESET		0
#define FTDI_SET_MDM_CTRL	1
#define FTDI_SET_FLOW_CTRL	2
#define FTDI_SET_BAUD		3
#define FTDI_SET_DATA		4
#define FTDI_GET_MDM_ST		5
#define FTDI_SET_EVENT_CHR	6
#define FTDI_SET_ERROR_CHR	7
#define FTDI_SET_LATENCY	9
#define FTDI_GET_LATENCY	10

#define DeviceOutVendor	((USB_DIR_OUT|USB_TYPE_VENDOR|USB_RECIP_DEVICE)<<8)
#define DeviceInVendor	((USB_DIR_IN |USB_TYPE_VENDOR|USB_RECIP_DEVICE)<<8)

/* RESET */

#define FTDI_RESET_SIO	0
#define FTDI_RESET_RX	1
#define FTDI_RESET_TX	2

/* SET_MDM_CTRL */

#define FTDI_DTR	1
#define FTDI_SET_DTR	(FTDI_DTR << 8)
#define FTDI_RTS	2
#define FTDI_SET_RTS	(FTDI_RTS << 8)

/* SET_FLOW_CTRL */

#define FTDI_RTS_CTS_HS		1
#define FTDI_DTR_DSR_HS		2
#define FTDI_XON_XOFF_HS	4

/* SET_DATA */

#define FTDI_PARITY	(0x7 << 8)
#define FTDI_ODD	(0x1 << 8)
#define FTDI_EVEN	(0x2 << 8)
#define FTDI_MARK	(0x3 << 8)
#define FTDI_SPACE	(0x4 << 8)

#define FTDI_STOP	(0x3 << 11)
#define FTDI_STOP1	(0x0 << 11)
#define FTDI_STOP15	(0x1 << 11)
#define FTDI_STOP2	(0x2 << 11)

/* GET_MDM_ST */
/* TODO: should be sent every 40ms */
#define FTDI_CTS  (1<<4)        // CTS line status
#define FTDI_DSR  (1<<5)        // DSR line status
#define FTDI_RI   (1<<6)        // RI line status
#define FTDI_RLSD (1<<7)        // Receive Line Signal Detect

/* Status */

#define FTDI_DR   (1<<0)        // Data Ready
#define FTDI_OE   (1<<1)        // Overrun Err
#define FTDI_PE   (1<<2)        // Parity Err
#define FTDI_FE   (1<<3)        // Framing Err
#define FTDI_BI   (1<<4)        // Break Interrupt
#define FTDI_THRE (1<<5)        // Transmitter Holding Register
#define FTDI_TEMT (1<<6)        // Transmitter Empty
#define FTDI_FIFO (1<<7)        // Error in FIFO

typedef struct {
    USBDevice dev;
    uint8_t recv_buf[RECV_BUF];
    uint16_t recv_ptr;
    uint16_t recv_used;
    uint8_t event_chr;
    uint8_t error_chr;
    uint8_t event_trigger;
    QEMUSerialSetParams params;
    int latency;        /* ms */
    CharDriverState *cs;
} USBSerialState;

enum {
    STR_MANUFACTURER = 1,
    STR_PRODUCT_SERIAL,
    STR_PRODUCT_BRAILLE,
    STR_SERIALNUMBER,
};

static const USBDescStrings desc_strings = {
    [STR_MANUFACTURER]    = "QEMU " QEMU_VERSION,
    [STR_PRODUCT_SERIAL]  = "QEMU USB SERIAL",
    [STR_PRODUCT_BRAILLE] = "QEMU USB BRAILLE",
    [STR_SERIALNUMBER]    = "1",
};

static const USBDescIface desc_iface0 = {
    .bInterfaceNumber              = 0,
    .bNumEndpoints                 = 2,
    .bInterfaceClass               = 0xff,
    .bInterfaceSubClass            = 0xff,
    .bInterfaceProtocol            = 0xff,
    .eps = (USBDescEndpoint[]) {
        {
            .bEndpointAddress      = USB_DIR_IN | 0x01,
            .bmAttributes          = USB_ENDPOINT_XFER_BULK,
            .wMaxPacketSize        = 64,
        },{
            .bEndpointAddress      = USB_DIR_OUT | 0x02,
            .bmAttributes          = USB_ENDPOINT_XFER_BULK,
            .wMaxPacketSize        = 64,
        },
    }
};

static const USBDescDevice desc_device = {
    .bcdUSB                        = 0x0200,
    .bMaxPacketSize0               = 8,
    .bNumConfigurations            = 1,
    .confs = (USBDescConfig[]) {
        {
            .bNumInterfaces        = 1,
            .bConfigurationValue   = 1,
            .bmAttributes          = 0x80,
            .bMaxPower             = 50,
            .nif = 1,
            .ifs = &desc_iface0,
        },
    },
};

static const USBDesc desc_serial = {
    .id = {
        .idVendor          = 0x0403,
        .idProduct         = 0x6001,
        .bcdDevice         = 0x0400,
        .iManufacturer     = STR_MANUFACTURER,
        .iProduct          = STR_PRODUCT_SERIAL,
        .iSerialNumber     = STR_SERIALNUMBER,
    },
    .full = &desc_device,
    .str  = desc_strings,
};

static const USBDesc desc_braille = {
    .id = {
        .idVendor          = 0x0403,
        .idProduct         = 0xfe72,
        .bcdDevice         = 0x0400,
        .iManufacturer     = STR_MANUFACTURER,
        .iProduct          = STR_PRODUCT_BRAILLE,
        .iSerialNumber     = STR_SERIALNUMBER,
    },
    .full = &desc_device,
    .str  = desc_strings,
};

static void usb_serial_reset(USBSerialState *s)
{
    /* TODO: Set flow control to none */
    s->event_chr = 0x0d;
    s->event_trigger = 0;
    s->recv_ptr = 0;
    s->recv_used = 0;
    /* TODO: purge in char driver */
}

static void usb_serial_handle_reset(USBDevice *dev)
{
    USBSerialState *s = (USBSerialState *)dev;

    DPRINTF("Reset\n");

    usb_serial_reset(s);
    /* TODO: Reset char device, send BREAK? */
}

static uint8_t usb_get_modem_lines(USBSerialState *s)
{
    int flags;
    uint8_t ret;

    if (qemu_chr_fe_ioctl(s->cs, CHR_IOCTL_SERIAL_GET_TIOCM, &flags) == -ENOTSUP)
        return FTDI_CTS|FTDI_DSR|FTDI_RLSD;

    ret = 0;
    if (flags & CHR_TIOCM_CTS)
        ret |= FTDI_CTS;
    if (flags & CHR_TIOCM_DSR)
        ret |= FTDI_DSR;
    if (flags & CHR_TIOCM_RI)
        ret |= FTDI_RI;
    if (flags & CHR_TIOCM_CAR)
        ret |= FTDI_RLSD;

    return ret;
}

static int usb_serial_handle_control(USBDevice *dev, USBPacket *p,
               int request, int value, int index, int length, uint8_t *data)
{
    USBSerialState *s = (USBSerialState *)dev;
    int ret;

    DPRINTF("got control %x, value %x\n",request, value);
    ret = usb_desc_handle_control(dev, p, request, value, index, length, data);
    if (ret >= 0) {
        return ret;
    }

    ret = 0;
    switch (request) {
    case EndpointOutRequest | USB_REQ_CLEAR_FEATURE:
        ret = 0;
        break;

        /* Class specific requests.  */
    case DeviceOutVendor | FTDI_RESET:
        switch (value) {
        case FTDI_RESET_SIO:
            usb_serial_reset(s);
            break;
        case FTDI_RESET_RX:
            s->recv_ptr = 0;
            s->recv_used = 0;
            /* TODO: purge from char device */
            break;
        case FTDI_RESET_TX:
            /* TODO: purge from char device */
            break;
        }
        break;
    case DeviceOutVendor | FTDI_SET_MDM_CTRL:
    {
        static int flags;
        qemu_chr_fe_ioctl(s->cs,CHR_IOCTL_SERIAL_GET_TIOCM, &flags);
        if (value & FTDI_SET_RTS) {
            if (value & FTDI_RTS)
                flags |= CHR_TIOCM_RTS;
            else
                flags &= ~CHR_TIOCM_RTS;
        }
        if (value & FTDI_SET_DTR) {
            if (value & FTDI_DTR)
                flags |= CHR_TIOCM_DTR;
            else
                flags &= ~CHR_TIOCM_DTR;
        }
        qemu_chr_fe_ioctl(s->cs,CHR_IOCTL_SERIAL_SET_TIOCM, &flags);
        break;
    }
    case DeviceOutVendor | FTDI_SET_FLOW_CTRL:
        /* TODO: ioctl */
        break;
    case DeviceOutVendor | FTDI_SET_BAUD: {
        static const int subdivisors8[8] = { 0, 4, 2, 1, 3, 5, 6, 7 };
        int subdivisor8 = subdivisors8[((value & 0xc000) >> 14)
                                     | ((index & 1) << 2)];
        int divisor = value & 0x3fff;

        /* chip special cases */
        if (divisor == 1 && subdivisor8 == 0)
            subdivisor8 = 4;
        if (divisor == 0 && subdivisor8 == 0)
            divisor = 1;

        s->params.speed = (48000000 / 2) / (8 * divisor + subdivisor8);
        qemu_chr_fe_ioctl(s->cs, CHR_IOCTL_SERIAL_SET_PARAMS, &s->params);
        break;
    }
    case DeviceOutVendor | FTDI_SET_DATA:
        switch (value & FTDI_PARITY) {
            case 0:
                s->params.parity = 'N';
                break;
            case FTDI_ODD:
                s->params.parity = 'O';
                break;
            case FTDI_EVEN:
                s->params.parity = 'E';
                break;
            default:
                DPRINTF("unsupported parity %d\n", value & FTDI_PARITY);
                goto fail;
        }
        switch (value & FTDI_STOP) {
            case FTDI_STOP1:
                s->params.stop_bits = 1;
                break;
            case FTDI_STOP2:
                s->params.stop_bits = 2;
                break;
            default:
                DPRINTF("unsupported stop bits %d\n", value & FTDI_STOP);
                goto fail;
        }
        qemu_chr_fe_ioctl(s->cs, CHR_IOCTL_SERIAL_SET_PARAMS, &s->params);
        /* TODO: TX ON/OFF */
        break;
    case DeviceInVendor | FTDI_GET_MDM_ST:
        data[0] = usb_get_modem_lines(s) | 1;
        data[1] = 0;
        ret = 2;
        break;
    case DeviceOutVendor | FTDI_SET_EVENT_CHR:
        /* TODO: handle it */
        s->event_chr = value;
        break;
    case DeviceOutVendor | FTDI_SET_ERROR_CHR:
        /* TODO: handle it */
        s->error_chr = value;
        break;
    case DeviceOutVendor | FTDI_SET_LATENCY:
        s->latency = value;
        break;
    case DeviceInVendor | FTDI_GET_LATENCY:
        data[0] = s->latency;
        ret = 1;
        break;
    default:
    fail:
        DPRINTF("got unsupported/bogus control %x, value %x\n", request, value);
        ret = USB_RET_STALL;
        break;
    }
    return ret;
}

static int usb_serial_handle_data(USBDevice *dev, USBPacket *p)
{
    USBSerialState *s = (USBSerialState *)dev;
    int i, ret = 0;
    uint8_t devep = p->devep;
    struct iovec *iov;
    uint8_t header[2];
    int first_len, len;

    switch (p->pid) {
    case USB_TOKEN_OUT:
        if (devep != 2)
            goto fail;
        for (i = 0; i < p->iov.niov; i++) {
            iov = p->iov.iov + i;
            qemu_chr_fe_write(s->cs, iov->iov_base, iov->iov_len);
        }
        break;

    case USB_TOKEN_IN:
        if (devep != 1)
            goto fail;
        first_len = RECV_BUF - s->recv_ptr;
        len = p->iov.size;
        if (len <= 2) {
            ret = USB_RET_NAK;
            break;
        }
        header[0] = usb_get_modem_lines(s) | 1;
        /* We do not have the uart details */
        /* handle serial break */
        if (s->event_trigger && s->event_trigger & FTDI_BI) {
            s->event_trigger &= ~FTDI_BI;
            header[1] = FTDI_BI;
            usb_packet_copy(p, header, 2);
            ret = 2;
            break;
        } else {
            header[1] = 0;
        }
        len -= 2;
        if (len > s->recv_used)
            len = s->recv_used;
        if (!len) {
            ret = USB_RET_NAK;
            break;
        }
        if (first_len > len)
            first_len = len;
        usb_packet_copy(p, header, 2);
        usb_packet_copy(p, s->recv_buf + s->recv_ptr, first_len);
        if (len > first_len)
            usb_packet_copy(p, s->recv_buf, len - first_len);
        s->recv_used -= len;
        s->recv_ptr = (s->recv_ptr + len) % RECV_BUF;
        ret = len + 2;
        break;

    default:
        DPRINTF("Bad token\n");
    fail:
        ret = USB_RET_STALL;
        break;
    }

    return ret;
}

static void usb_serial_handle_destroy(USBDevice *dev)
{
    USBSerialState *s = (USBSerialState *)dev;

    qemu_chr_delete(s->cs);
}

static int usb_serial_can_read(void *opaque)
{
    USBSerialState *s = opaque;
    return RECV_BUF - s->recv_used;
}

static void usb_serial_read(void *opaque, const uint8_t *buf, int size)
{
    USBSerialState *s = opaque;
    int first_size, start;

    /* room in the buffer? */
    if (size > (RECV_BUF - s->recv_used))
        size = RECV_BUF - s->recv_used;

    start = s->recv_ptr + s->recv_used;
    if (start < RECV_BUF) {
        /* copy data to end of buffer */
        first_size = RECV_BUF - start;
        if (first_size > size)
            first_size = size;

        memcpy(s->recv_buf + start, buf, first_size);

        /* wrap around to front if needed */
        if (size > first_size)
            memcpy(s->recv_buf, buf + first_size, size - first_size);
    } else {
        start -= RECV_BUF;
        memcpy(s->recv_buf + start, buf, size);
    }
    s->recv_used += size;
}

static void usb_serial_event(void *opaque, int event)
{
    USBSerialState *s = opaque;

    switch (event) {
        case CHR_EVENT_BREAK:
            s->event_trigger |= FTDI_BI;
            break;
        case CHR_EVENT_FOCUS:
            break;
        case CHR_EVENT_OPENED:
            usb_serial_reset(s);
            /* TODO: Reset USB port */
            break;
    }
}

static int usb_serial_initfn(USBDevice *dev)
{
    USBSerialState *s = DO_UPCAST(USBSerialState, dev, dev);

    usb_desc_init(dev);

    if (!s->cs) {
        error_report("Property chardev is required");
        return -1;
    }

    qemu_chr_add_handlers(s->cs, usb_serial_can_read, usb_serial_read,
                          usb_serial_event, s);
    usb_serial_handle_reset(dev);
    return 0;
}

static USBDevice *usb_serial_init(const char *filename)
{
    USBDevice *dev;
    CharDriverState *cdrv;
    uint32_t vendorid = 0, productid = 0;
    char label[32];
    static int index;

    while (*filename && *filename != ':') {
        const char *p;
        char *e;
        if (strstart(filename, "vendorid=", &p)) {
            vendorid = strtol(p, &e, 16);
            if (e == p || (*e && *e != ',' && *e != ':')) {
                error_report("bogus vendor ID %s", p);
                return NULL;
            }
            filename = e;
        } else if (strstart(filename, "productid=", &p)) {
            productid = strtol(p, &e, 16);
            if (e == p || (*e && *e != ',' && *e != ':')) {
                error_report("bogus product ID %s", p);
                return NULL;
            }
            filename = e;
        } else {
            error_report("unrecognized serial USB option %s", filename);
            return NULL;
        }
        while(*filename == ',')
            filename++;
    }
    if (!*filename) {
        error_report("character device specification needed");
        return NULL;
    }
    filename++;

    snprintf(label, sizeof(label), "usbserial%d", index++);
    cdrv = qemu_chr_new(label, filename, NULL);
    if (!cdrv)
        return NULL;

    dev = usb_create(NULL /* FIXME */, "usb-serial");
    if (!dev) {
        return NULL;
    }
    qdev_prop_set_chr(&dev->qdev, "chardev", cdrv);
    if (vendorid)
        qdev_prop_set_uint16(&dev->qdev, "vendorid", vendorid);
    if (productid)
        qdev_prop_set_uint16(&dev->qdev, "productid", productid);
    qdev_init_nofail(&dev->qdev);

    return dev;
}

static USBDevice *usb_braille_init(const char *unused)
{
    USBDevice *dev;
    CharDriverState *cdrv;

    cdrv = qemu_chr_new("braille", "braille", NULL);
    if (!cdrv)
        return NULL;

    dev = usb_create(NULL /* FIXME */, "usb-braille");
    qdev_prop_set_chr(&dev->qdev, "chardev", cdrv);
    qdev_init_nofail(&dev->qdev);

    return dev;
}

static const VMStateDescription vmstate_usb_serial = {
    .name = "usb-serial",
    .unmigratable = 1,
};

static struct USBDeviceInfo serial_info = {
    .product_desc   = "QEMU USB Serial",
    .qdev.name      = "usb-serial",
    .qdev.size      = sizeof(USBSerialState),
    .qdev.vmsd      = &vmstate_usb_serial,
    .usb_desc       = &desc_serial,
    .init           = usb_serial_initfn,
    .handle_packet  = usb_generic_handle_packet,
    .handle_reset   = usb_serial_handle_reset,
    .handle_control = usb_serial_handle_control,
    .handle_data    = usb_serial_handle_data,
    .handle_destroy = usb_serial_handle_destroy,
    .usbdevice_name = "serial",
    .usbdevice_init = usb_serial_init,
    .qdev.props     = (Property[]) {
        DEFINE_PROP_CHR("chardev", USBSerialState, cs),
        DEFINE_PROP_END_OF_LIST(),
    },
};

static struct USBDeviceInfo braille_info = {
    .product_desc   = "QEMU USB Braille",
    .qdev.name      = "usb-braille",
    .qdev.size      = sizeof(USBSerialState),
    .qdev.vmsd      = &vmstate_usb_serial,
    .usb_desc       = &desc_braille,
    .init           = usb_serial_initfn,
    .handle_packet  = usb_generic_handle_packet,
    .handle_reset   = usb_serial_handle_reset,
    .handle_control = usb_serial_handle_control,
    .handle_data    = usb_serial_handle_data,
    .handle_destroy = usb_serial_handle_destroy,
    .usbdevice_name = "braille",
    .usbdevice_init = usb_braille_init,
    .qdev.props     = (Property[]) {
        DEFINE_PROP_CHR("chardev", USBSerialState, cs),
        DEFINE_PROP_END_OF_LIST(),
    },
};

static void usb_serial_register_devices(void)
{
    usb_qdev_register(&serial_info);
    usb_qdev_register(&braille_info);
}
device_init(usb_serial_register_devices)
Commit	Line	Data
a7954218 AZ	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	*
8e31bf38	8	* This code is licensed under the LGPL.
a7954218 AZ	9	*/
	10
	11	#include "qemu-common.h"
2f792016	12	#include "qemu-error.h"
a7954218	13	#include "usb.h"
f29783f7	14	#include "usb-desc.h"
a7954218 AZ	15	#include "qemu-char.h"
	16
	17	//#define DEBUG_Serial
	18
	19	#ifdef DEBUG_Serial
001faf32 BS	20	#define DPRINTF(fmt, ...) \
001faf32 BS	21	do { printf("usb-serial: " fmt , ## __VA_ARGS__); } while (0)
a7954218	22	#else
001faf32	23	#define DPRINTF(fmt, ...) do {} while(0)
a7954218 AZ	24	#endif
	25
	26	#define RECV_BUF 384
a7954218 AZ	27
	28	/* Commands */
	29	#define FTDI_RESET 0
	30	#define FTDI_SET_MDM_CTRL 1
	31	#define FTDI_SET_FLOW_CTRL 2
	32	#define FTDI_SET_BAUD 3
	33	#define FTDI_SET_DATA 4
	34	#define FTDI_GET_MDM_ST 5
	35	#define FTDI_SET_EVENT_CHR 6
	36	#define FTDI_SET_ERROR_CHR 7
	37	#define FTDI_SET_LATENCY 9
	38	#define FTDI_GET_LATENCY 10
	39
	40	#define DeviceOutVendor ((USB_DIR_OUT\|USB_TYPE_VENDOR\|USB_RECIP_DEVICE)<<8)
	41	#define DeviceInVendor ((USB_DIR_IN \|USB_TYPE_VENDOR\|USB_RECIP_DEVICE)<<8)
	42
	43	/* RESET */
	44
	45	#define FTDI_RESET_SIO 0
	46	#define FTDI_RESET_RX 1
	47	#define FTDI_RESET_TX 2
	48
	49	/* SET_MDM_CTRL */
	50
a7954218	51	#define FTDI_DTR 1
abb8a139	52	#define FTDI_SET_DTR (FTDI_DTR << 8)
a7954218	53	#define FTDI_RTS 2
abb8a139	54	#define FTDI_SET_RTS (FTDI_RTS << 8)
a7954218 AZ	55
	56	/* SET_FLOW_CTRL */
	57
	58	#define FTDI_RTS_CTS_HS 1
	59	#define FTDI_DTR_DSR_HS 2
	60	#define FTDI_XON_XOFF_HS 4
	61
	62	/* SET_DATA */
	63
	64	#define FTDI_PARITY (0x7 << 8)
	65	#define FTDI_ODD (0x1 << 8)
	66	#define FTDI_EVEN (0x2 << 8)
	67	#define FTDI_MARK (0x3 << 8)
	68	#define FTDI_SPACE (0x4 << 8)
	69
	70	#define FTDI_STOP (0x3 << 11)
	71	#define FTDI_STOP1 (0x0 << 11)
	72	#define FTDI_STOP15 (0x1 << 11)
	73	#define FTDI_STOP2 (0x2 << 11)
	74
	75	/* GET_MDM_ST */
	76	/* TODO: should be sent every 40ms */
	77	#define FTDI_CTS (1<<4) // CTS line status
	78	#define FTDI_DSR (1<<5) // DSR line status
	79	#define FTDI_RI (1<<6) // RI line status
	80	#define FTDI_RLSD (1<<7) // Receive Line Signal Detect
	81
	82	/* Status */
	83
	84	#define FTDI_DR (1<<0) // Data Ready
	85	#define FTDI_OE (1<<1) // Overrun Err
	86	#define FTDI_PE (1<<2) // Parity Err
	87	#define FTDI_FE (1<<3) // Framing Err
	88	#define FTDI_BI (1<<4) // Break Interrupt
	89	#define FTDI_THRE (1<<5) // Transmitter Holding Register
	90	#define FTDI_TEMT (1<<6) // Transmitter Empty
	91	#define FTDI_FIFO (1<<7) // Error in FIFO
	92
	93	typedef struct {
	94	USBDevice dev;
a7954218	95	uint8_t recv_buf[RECV_BUF];
8109b9b6 AJ	96	uint16_t recv_ptr;
8109b9b6 AJ	97	uint16_t recv_used;
a7954218 AZ	98	uint8_t event_chr;
	99	uint8_t error_chr;
	100	uint8_t event_trigger;
a7954218 AZ	101	QEMUSerialSetParams params;
	102	int latency; /* ms */
	103	CharDriverState *cs;
	104	} USBSerialState;
	105
f29783f7 GH	106	enum {
	107	STR_MANUFACTURER = 1,
	108	STR_PRODUCT_SERIAL,
	109	STR_PRODUCT_BRAILLE,
	110	STR_SERIALNUMBER,
a7954218 AZ	111	};
a7954218 AZ	112
f29783f7 GH	113	static const USBDescStrings desc_strings = {
	114	[STR_MANUFACTURER] = "QEMU " QEMU_VERSION,
	115	[STR_PRODUCT_SERIAL] = "QEMU USB SERIAL",
	116	[STR_PRODUCT_BRAILLE] = "QEMU USB BRAILLE",
	117	[STR_SERIALNUMBER] = "1",
	118	};
	119
	120	static const USBDescIface desc_iface0 = {
	121	.bInterfaceNumber = 0,
	122	.bNumEndpoints = 2,
	123	.bInterfaceClass = 0xff,
	124	.bInterfaceSubClass = 0xff,
	125	.bInterfaceProtocol = 0xff,
	126	.eps = (USBDescEndpoint[]) {
	127	{
	128	.bEndpointAddress = USB_DIR_IN \| 0x01,
	129	.bmAttributes = USB_ENDPOINT_XFER_BULK,
	130	.wMaxPacketSize = 64,
	131	},{
	132	.bEndpointAddress = USB_DIR_OUT \| 0x02,
	133	.bmAttributes = USB_ENDPOINT_XFER_BULK,
	134	.wMaxPacketSize = 64,
	135	},
	136	}
	137	};
	138
	139	static const USBDescDevice desc_device = {
	140	.bcdUSB = 0x0200,
	141	.bMaxPacketSize0 = 8,
	142	.bNumConfigurations = 1,
	143	.confs = (USBDescConfig[]) {
	144	{
	145	.bNumInterfaces = 1,
	146	.bConfigurationValue = 1,
	147	.bmAttributes = 0x80,
	148	.bMaxPower = 50,
add75088	149	.nif = 1,
f29783f7 GH	150	.ifs = &desc_iface0,
	151	},
	152	},
	153	};
	154
	155	static const USBDesc desc_serial = {
	156	.id = {
	157	.idVendor = 0x0403,
	158	.idProduct = 0x6001,
	159	.bcdDevice = 0x0400,
	160	.iManufacturer = STR_MANUFACTURER,
	161	.iProduct = STR_PRODUCT_SERIAL,
	162	.iSerialNumber = STR_SERIALNUMBER,
	163	},
	164	.full = &desc_device,
	165	.str = desc_strings,
	166	};
	167
	168	static const USBDesc desc_braille = {
	169	.id = {
	170	.idVendor = 0x0403,
	171	.idProduct = 0xfe72,
	172	.bcdDevice = 0x0400,
	173	.iManufacturer = STR_MANUFACTURER,
	174	.iProduct = STR_PRODUCT_BRAILLE,
	175	.iSerialNumber = STR_SERIALNUMBER,
	176	},
	177	.full = &desc_device,
	178	.str = desc_strings,
a7954218 AZ	179	};
	180
	181	static void usb_serial_reset(USBSerialState *s)
	182	{
	183	/* TODO: Set flow control to none */
	184	s->event_chr = 0x0d;
	185	s->event_trigger = 0;
	186	s->recv_ptr = 0;
	187	s->recv_used = 0;
	188	/* TODO: purge in char driver */
a7954218 AZ	189	}
	190
	191	static void usb_serial_handle_reset(USBDevice *dev)
	192	{
	193	USBSerialState s = (USBSerialState )dev;
	194
	195	DPRINTF("Reset\n");
	196
	197	usb_serial_reset(s);
	198	/* TODO: Reset char device, send BREAK? */
	199	}
	200
abb8a139 AJ	201	static uint8_t usb_get_modem_lines(USBSerialState *s)
	202	{
	203	int flags;
	204	uint8_t ret;
	205
41084f1b	206	if (qemu_chr_fe_ioctl(s->cs, CHR_IOCTL_SERIAL_GET_TIOCM, &flags) == -ENOTSUP)
abb8a139 AJ	207	return FTDI_CTS\|FTDI_DSR\|FTDI_RLSD;
	208
	209	ret = 0;
	210	if (flags & CHR_TIOCM_CTS)
	211	ret \|= FTDI_CTS;
	212	if (flags & CHR_TIOCM_DSR)
	213	ret \|= FTDI_DSR;
	214	if (flags & CHR_TIOCM_RI)
	215	ret \|= FTDI_RI;
	216	if (flags & CHR_TIOCM_CAR)
	217	ret \|= FTDI_RLSD;
	218
	219	return ret;
	220	}
	221
007fd62f HG	222	static int usb_serial_handle_control(USBDevice dev, USBPacket p,
007fd62f HG	223	int request, int value, int index, int length, uint8_t *data)
a7954218 AZ	224	{
a7954218 AZ	225	USBSerialState s = (USBSerialState )dev;
f29783f7 GH	226	int ret;
	227
	228	DPRINTF("got control %x, value %x\n",request, value);
007fd62f	229	ret = usb_desc_handle_control(dev, p, request, value, index, length, data);
f29783f7 GH	230	if (ret >= 0) {
	231	return ret;
	232	}
a7954218	233
f29783f7	234	ret = 0;
a7954218	235	switch (request) {
a7954218 AZ	236	case EndpointOutRequest \| USB_REQ_CLEAR_FEATURE:
	237	ret = 0;
	238	break;
	239
	240	/* Class specific requests. */
	241	case DeviceOutVendor \| FTDI_RESET:
	242	switch (value) {
	243	case FTDI_RESET_SIO:
	244	usb_serial_reset(s);
	245	break;
	246	case FTDI_RESET_RX:
	247	s->recv_ptr = 0;
	248	s->recv_used = 0;
	249	/* TODO: purge from char device */
	250	break;
	251	case FTDI_RESET_TX:
	252	/* TODO: purge from char device */
	253	break;
	254	}
	255	break;
	256	case DeviceOutVendor \| FTDI_SET_MDM_CTRL:
abb8a139 AJ	257	{
abb8a139 AJ	258	static int flags;
41084f1b	259	qemu_chr_fe_ioctl(s->cs,CHR_IOCTL_SERIAL_GET_TIOCM, &flags);
abb8a139 AJ	260	if (value & FTDI_SET_RTS) {
	261	if (value & FTDI_RTS)
	262	flags \|= CHR_TIOCM_RTS;
	263	else
	264	flags &= ~CHR_TIOCM_RTS;
	265	}
	266	if (value & FTDI_SET_DTR) {
	267	if (value & FTDI_DTR)
	268	flags \|= CHR_TIOCM_DTR;
	269	else
	270	flags &= ~CHR_TIOCM_DTR;
	271	}
41084f1b	272	qemu_chr_fe_ioctl(s->cs,CHR_IOCTL_SERIAL_SET_TIOCM, &flags);
a7954218	273	break;
abb8a139	274	}
a7954218 AZ	275	case DeviceOutVendor \| FTDI_SET_FLOW_CTRL:
	276	/* TODO: ioctl */
	277	break;
	278	case DeviceOutVendor \| FTDI_SET_BAUD: {
	279	static const int subdivisors8[8] = { 0, 4, 2, 1, 3, 5, 6, 7 };
	280	int subdivisor8 = subdivisors8[((value & 0xc000) >> 14)
	281	\| ((index & 1) << 2)];
	282	int divisor = value & 0x3fff;
	283
	284	/* chip special cases */
	285	if (divisor == 1 && subdivisor8 == 0)
	286	subdivisor8 = 4;
	287	if (divisor == 0 && subdivisor8 == 0)
	288	divisor = 1;
	289
	290	s->params.speed = (48000000 / 2) / (8 * divisor + subdivisor8);
41084f1b	291	qemu_chr_fe_ioctl(s->cs, CHR_IOCTL_SERIAL_SET_PARAMS, &s->params);
a7954218 AZ	292	break;
	293	}
	294	case DeviceOutVendor \| FTDI_SET_DATA:
	295	switch (value & FTDI_PARITY) {
	296	case 0:
	297	s->params.parity = 'N';
	298	break;
	299	case FTDI_ODD:
	300	s->params.parity = 'O';
	301	break;
	302	case FTDI_EVEN:
	303	s->params.parity = 'E';
	304	break;
	305	default:
	306	DPRINTF("unsupported parity %d\n", value & FTDI_PARITY);
	307	goto fail;
	308	}
	309	switch (value & FTDI_STOP) {
	310	case FTDI_STOP1:
	311	s->params.stop_bits = 1;
	312	break;
	313	case FTDI_STOP2:
	314	s->params.stop_bits = 2;
	315	break;
	316	default:
	317	DPRINTF("unsupported stop bits %d\n", value & FTDI_STOP);
	318	goto fail;
	319	}
41084f1b	320	qemu_chr_fe_ioctl(s->cs, CHR_IOCTL_SERIAL_SET_PARAMS, &s->params);
a7954218 AZ	321	/* TODO: TX ON/OFF */
	322	break;
	323	case DeviceInVendor \| FTDI_GET_MDM_ST:
abb8a139 AJ	324	data[0] = usb_get_modem_lines(s) \| 1;
	325	data[1] = 0;
	326	ret = 2;
a7954218 AZ	327	break;
	328	case DeviceOutVendor \| FTDI_SET_EVENT_CHR:
	329	/* TODO: handle it */
	330	s->event_chr = value;
	331	break;
	332	case DeviceOutVendor \| FTDI_SET_ERROR_CHR:
	333	/* TODO: handle it */
	334	s->error_chr = value;
	335	break;
	336	case DeviceOutVendor \| FTDI_SET_LATENCY:
	337	s->latency = value;
	338	break;
	339	case DeviceInVendor \| FTDI_GET_LATENCY:
	340	data[0] = s->latency;
	341	ret = 1;
	342	break;
	343	default:
	344	fail:
	345	DPRINTF("got unsupported/bogus control %x, value %x\n", request, value);
	346	ret = USB_RET_STALL;
	347	break;
	348	}
	349	return ret;
	350	}
	351
	352	static int usb_serial_handle_data(USBDevice dev, USBPacket p)
	353	{
	354	USBSerialState s = (USBSerialState )dev;
9440b7e5	355	int i, ret = 0;
a7954218	356	uint8_t devep = p->devep;
9440b7e5 GH	357	struct iovec *iov;
	358	uint8_t header[2];
	359	int first_len, len;
a7954218 AZ	360
	361	switch (p->pid) {
	362	case USB_TOKEN_OUT:
	363	if (devep != 2)
	364	goto fail;
9440b7e5 GH	365	for (i = 0; i < p->iov.niov; i++) {
9440b7e5 GH	366	iov = p->iov.iov + i;
2cc6e0a1	367	qemu_chr_fe_write(s->cs, iov->iov_base, iov->iov_len);
9440b7e5	368	}
a7954218 AZ	369	break;
	370
	371	case USB_TOKEN_IN:
	372	if (devep != 1)
	373	goto fail;
	374	first_len = RECV_BUF - s->recv_ptr;
9440b7e5	375	len = p->iov.size;
a7954218 AZ	376	if (len <= 2) {
	377	ret = USB_RET_NAK;
	378	break;
	379	}
9440b7e5	380	header[0] = usb_get_modem_lines(s) \| 1;
abb8a139	381	/* We do not have the uart details */
7e57f049 JW	382	/* handle serial break */
	383	if (s->event_trigger && s->event_trigger & FTDI_BI) {
	384	s->event_trigger &= ~FTDI_BI;
9440b7e5 GH	385	header[1] = FTDI_BI;
9440b7e5 GH	386	usb_packet_copy(p, header, 2);
7e57f049 JW	387	ret = 2;
	388	break;
	389	} else {
9440b7e5	390	header[1] = 0;
7e57f049	391	}
a7954218 AZ	392	len -= 2;
	393	if (len > s->recv_used)
	394	len = s->recv_used;
	395	if (!len) {
	396	ret = USB_RET_NAK;
	397	break;
	398	}
	399	if (first_len > len)
	400	first_len = len;
9440b7e5 GH	401	usb_packet_copy(p, header, 2);
9440b7e5 GH	402	usb_packet_copy(p, s->recv_buf + s->recv_ptr, first_len);
a7954218	403	if (len > first_len)
9440b7e5	404	usb_packet_copy(p, s->recv_buf, len - first_len);
a7954218 AZ	405	s->recv_used -= len;
	406	s->recv_ptr = (s->recv_ptr + len) % RECV_BUF;
	407	ret = len + 2;
	408	break;
	409
	410	default:
	411	DPRINTF("Bad token\n");
	412	fail:
	413	ret = USB_RET_STALL;
	414	break;
	415	}
	416
	417	return ret;
	418	}
	419
	420	static void usb_serial_handle_destroy(USBDevice *dev)
	421	{
	422	USBSerialState s = (USBSerialState )dev;
	423
70f24fb6	424	qemu_chr_delete(s->cs);
a7954218 AZ	425	}
a7954218 AZ	426
8fcd3692	427	static int usb_serial_can_read(void *opaque)
a7954218 AZ	428	{
	429	USBSerialState *s = opaque;
	430	return RECV_BUF - s->recv_used;
	431	}
	432
8fcd3692	433	static void usb_serial_read(void opaque, const uint8_t buf, int size)
a7954218 AZ	434	{
a7954218 AZ	435	USBSerialState *s = opaque;
4ab4183d DA	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	}
a7954218 AZ	458	s->recv_used += size;
	459	}
	460
8fcd3692	461	static void usb_serial_event(void *opaque, int event)
a7954218 AZ	462	{
	463	USBSerialState *s = opaque;
	464
	465	switch (event) {
	466	case CHR_EVENT_BREAK:
7e57f049	467	s->event_trigger \|= FTDI_BI;
a7954218 AZ	468	break;
	469	case CHR_EVENT_FOCUS:
	470	break;
b6b8df56	471	case CHR_EVENT_OPENED:
a7954218 AZ	472	usb_serial_reset(s);
	473	/* TODO: Reset USB port */
	474	break;
	475	}
	476	}
	477
806b6024 GH	478	static int usb_serial_initfn(USBDevice *dev)
	479	{
	480	USBSerialState *s = DO_UPCAST(USBSerialState, dev, dev);
a980a065 GH	481
a980a065 GH	482	usb_desc_init(dev);
2b0efdc3	483
81bf96d3 MA	484	if (!s->cs) {
	485	error_report("Property chardev is required");
	486	return -1;
	487	}
	488
2b0efdc3 GH	489	qemu_chr_add_handlers(s->cs, usb_serial_can_read, usb_serial_read,
	490	usb_serial_event, s);
	491	usb_serial_handle_reset(dev);
806b6024 GH	492	return 0;
	493	}
	494
2b0efdc3	495	static USBDevice usb_serial_init(const char filename)
a7954218	496	{
806b6024	497	USBDevice *dev;
a7954218	498	CharDriverState *cdrv;
2b0efdc3	499	uint32_t vendorid = 0, productid = 0;
5ccfae10 AL	500	char label[32];
5ccfae10 AL	501	static int index;
a7954218 AZ	502
	503	while (filename && filename != ':') {
	504	const char *p;
	505	char *e;
	506	if (strstart(filename, "vendorid=", &p)) {
	507	vendorid = strtol(p, &e, 16);
	508	if (e == p \|\| (e && e != ',' && *e != ':')) {
1ecda02b	509	error_report("bogus vendor ID %s", p);
a7954218 AZ	510	return NULL;
	511	}
	512	filename = e;
	513	} else if (strstart(filename, "productid=", &p)) {
	514	productid = strtol(p, &e, 16);
	515	if (e == p \|\| (e && e != ',' && *e != ':')) {
1ecda02b	516	error_report("bogus product ID %s", p);
a7954218 AZ	517	return NULL;
	518	}
	519	filename = e;
	520	} else {
1ecda02b	521	error_report("unrecognized serial USB option %s", filename);
a7954218 AZ	522	return NULL;
	523	}
	524	while(*filename == ',')
	525	filename++;
	526	}
	527	if (!*filename) {
1ecda02b	528	error_report("character device specification needed");
a7954218 AZ	529	return NULL;
	530	}
	531	filename++;
a7954218	532
5ccfae10	533	snprintf(label, sizeof(label), "usbserial%d", index++);
27143a44	534	cdrv = qemu_chr_new(label, filename, NULL);
a7954218	535	if (!cdrv)
806b6024	536	return NULL;
a7954218	537
556cd098	538	dev = usb_create(NULL /* FIXME */, "usb-serial");
d44168ff PB	539	if (!dev) {
	540	return NULL;
	541	}
2b0efdc3 GH	542	qdev_prop_set_chr(&dev->qdev, "chardev", cdrv);
	543	if (vendorid)
	544	qdev_prop_set_uint16(&dev->qdev, "vendorid", vendorid);
	545	if (productid)
	546	qdev_prop_set_uint16(&dev->qdev, "productid", productid);
beb6f0de	547	qdev_init_nofail(&dev->qdev);
a7954218	548
2b0efdc3 GH	549	return dev;
	550	}
	551
	552	static USBDevice usb_braille_init(const char unused)
	553	{
	554	USBDevice *dev;
	555	CharDriverState *cdrv;
	556
27143a44	557	cdrv = qemu_chr_new("braille", "braille", NULL);
2b0efdc3 GH	558	if (!cdrv)
2b0efdc3 GH	559	return NULL;
806b6024	560
556cd098	561	dev = usb_create(NULL /* FIXME */, "usb-braille");
2b0efdc3	562	qdev_prop_set_chr(&dev->qdev, "chardev", cdrv);
beb6f0de	563	qdev_init_nofail(&dev->qdev);
2b0efdc3 GH	564
2b0efdc3 GH	565	return dev;
a7954218	566	}
806b6024	567
98e51ec9 GH	568	static const VMStateDescription vmstate_usb_serial = {
	569	.name = "usb-serial",
	570	.unmigratable = 1,
	571	};
	572
806b6024	573	static struct USBDeviceInfo serial_info = {
06384698	574	.product_desc = "QEMU USB Serial",
556cd098	575	.qdev.name = "usb-serial",
2b0efdc3	576	.qdev.size = sizeof(USBSerialState),
98e51ec9	577	.qdev.vmsd = &vmstate_usb_serial,
f29783f7	578	.usb_desc = &desc_serial,
2b0efdc3 GH	579	.init = usb_serial_initfn,
	580	.handle_packet = usb_generic_handle_packet,
	581	.handle_reset = usb_serial_handle_reset,
	582	.handle_control = usb_serial_handle_control,
	583	.handle_data = usb_serial_handle_data,
	584	.handle_destroy = usb_serial_handle_destroy,
	585	.usbdevice_name = "serial",
	586	.usbdevice_init = usb_serial_init,
	587	.qdev.props = (Property[]) {
f29783f7	588	DEFINE_PROP_CHR("chardev", USBSerialState, cs),
2b0efdc3 GH	589	DEFINE_PROP_END_OF_LIST(),
	590	},
	591	};
	592
	593	static struct USBDeviceInfo braille_info = {
06384698	594	.product_desc = "QEMU USB Braille",
556cd098	595	.qdev.name = "usb-braille",
806b6024	596	.qdev.size = sizeof(USBSerialState),
98e51ec9	597	.qdev.vmsd = &vmstate_usb_serial,
f29783f7	598	.usb_desc = &desc_braille,
806b6024 GH	599	.init = usb_serial_initfn,
	600	.handle_packet = usb_generic_handle_packet,
	601	.handle_reset = usb_serial_handle_reset,
	602	.handle_control = usb_serial_handle_control,
	603	.handle_data = usb_serial_handle_data,
	604	.handle_destroy = usb_serial_handle_destroy,
2b0efdc3 GH	605	.usbdevice_name = "braille",
	606	.usbdevice_init = usb_braille_init,
	607	.qdev.props = (Property[]) {
f29783f7	608	DEFINE_PROP_CHR("chardev", USBSerialState, cs),
2b0efdc3 GH	609	DEFINE_PROP_END_OF_LIST(),
2b0efdc3 GH	610	},
806b6024 GH	611	};
	612
	613	static void usb_serial_register_devices(void)
	614	{
	615	usb_qdev_register(&serial_info);
2b0efdc3	616	usb_qdev_register(&braille_info);
806b6024 GH	617	}
806b6024 GH	618	device_init(usb_serial_register_devices)