LXR qemu/hw/pl050.c

   1/*
   2 * Arm PrimeCell PL050 Keyboard / Mouse Interface
   3 *
   4 * Copyright (c) 2006-2007 CodeSourcery.
   5 * Written by Paul Brook
   6 *
   7 * This code is licenced under the GPL.
   8 */
   9
  10#include "sysbus.h"
  11#include "ps2.h"
  12
  13typedef struct {
  14    SysBusDevice busdev;
  15    void *dev;
  16    uint32_t cr;
  17    uint32_t clk;
  18    uint32_t last;
  19    int pending;
  20    qemu_irq irq;
  21    int is_mouse;
  22} pl050_state;
  23
  24#define PL050_TXEMPTY         (1 << 6)
  25#define PL050_TXBUSY          (1 << 5)
  26#define PL050_RXFULL          (1 << 4)
  27#define PL050_RXBUSY          (1 << 3)
  28#define PL050_RXPARITY        (1 << 2)
  29#define PL050_KMIC            (1 << 1)
  30#define PL050_KMID            (1 << 0)
  31
  32static const unsigned char pl050_id[] =
  33{ 0x50, 0x10, 0x04, 0x00, 0x0d, 0xf0, 0x05, 0xb1 };
  34
  35static void pl050_update(void *opaque, int level)
  36{
  37    pl050_state *s = (pl050_state *)opaque;
  38    int raise;
  39
  40    s->pending = level;
  41    raise = (s->pending && (s->cr & 0x10) != 0)
  42            || (s->cr & 0x08) != 0;
  43    qemu_set_irq(s->irq, raise);
  44}
  45
  46static uint32_t pl050_read(void *opaque, target_phys_addr_t offset)
  47{
  48    pl050_state *s = (pl050_state *)opaque;
  49    if (offset >= 0xfe0 && offset < 0x1000)
  50        return pl050_id[(offset - 0xfe0) >> 2];
  51
  52    switch (offset >> 2) {
  53    case 0: /* KMICR */
  54        return s->cr;
  55    case 1: /* KMISTAT */
  56        {
  57            uint8_t val;
  58            uint32_t stat;
  59
  60            val = s->last;
  61            val = val ^ (val >> 4);
  62            val = val ^ (val >> 2);
  63            val = (val ^ (val >> 1)) & 1;
  64
  65            stat = PL050_TXEMPTY;
  66            if (val)
  67                stat |= PL050_RXPARITY;
  68            if (s->pending)
  69                stat |= PL050_RXFULL;
  70
  71            return stat;
  72        }
  73    case 2: /* KMIDATA */
  74        if (s->pending)
  75            s->last = ps2_read_data(s->dev);
  76        return s->last;
  77    case 3: /* KMICLKDIV */
  78        return s->clk;
  79    case 4: /* KMIIR */
  80        return s->pending | 2;
  81    default:
  82        hw_error("pl050_read: Bad offset %x\n", (int)offset);
  83        return 0;
  84    }
  85}
  86
  87static void pl050_write(void *opaque, target_phys_addr_t offset,
  88                          uint32_t value)
  89{
  90    pl050_state *s = (pl050_state *)opaque;
  91    switch (offset >> 2) {
  92    case 0: /* KMICR */
  93        s->cr = value;
  94        pl050_update(s, s->pending);
  95        /* ??? Need to implement the enable/disable bit.  */
  96        break;
  97    case 2: /* KMIDATA */
  98        /* ??? This should toggle the TX interrupt line.  */
  99        /* ??? This means kbd/mouse can block each other.  */
 100        if (s->is_mouse) {
 101            ps2_write_mouse(s->dev, value);
 102        } else {
 103            ps2_write_keyboard(s->dev, value);
 104        }
 105        break;
 106    case 3: /* KMICLKDIV */
 107        s->clk = value;
 108        return;
 109    default:
 110        hw_error("pl050_write: Bad offset %x\n", (int)offset);
 111    }
 112}
 113static CPUReadMemoryFunc * const pl050_readfn[] = {
 114   pl050_read,
 115   pl050_read,
 116   pl050_read
 117};
 118
 119static CPUWriteMemoryFunc * const pl050_writefn[] = {
 120   pl050_write,
 121   pl050_write,
 122   pl050_write
 123};
 124
 125static int pl050_init(SysBusDevice *dev, int is_mouse)
 126{
 127    pl050_state *s = FROM_SYSBUS(pl050_state, dev);
 128    int iomemtype;
 129
 130    iomemtype = cpu_register_io_memory(pl050_readfn,
 131                                       pl050_writefn, s);
 132    sysbus_init_mmio(dev, 0x1000, iomemtype);
 133    sysbus_init_irq(dev, &s->irq);
 134    s->is_mouse = is_mouse;
 135    if (s->is_mouse)
 136        s->dev = ps2_mouse_init(pl050_update, s);
 137    else
 138        s->dev = ps2_kbd_init(pl050_update, s);
 139    /* ??? Save/restore.  */
 140    return 0;
 141}
 142
 143static int pl050_init_keyboard(SysBusDevice *dev)
 144{
 145    return pl050_init(dev, 0);
 146}
 147
 148static int pl050_init_mouse(SysBusDevice *dev)
 149{
 150    return pl050_init(dev, 1);
 151}
 152
 153static void pl050_register_devices(void)
 154{
 155    sysbus_register_dev("pl050_keyboard", sizeof(pl050_state),
 156                        pl050_init_keyboard);
 157    sysbus_register_dev("pl050_mouse", sizeof(pl050_state),
 158                        pl050_init_mouse);
 159}
 160
 161device_init(pl050_register_devices)
 162