qemu/hw/musicpal.c
<<
>>
Prefs
   1/*
   2 * Marvell MV88W8618 / Freecom MusicPal emulation.
   3 *
   4 * Copyright (c) 2008 Jan Kiszka
   5 *
   6 * This code is licensed under the GNU GPL v2.
   7 *
   8 * Contributions after 2012-01-13 are licensed under the terms of the
   9 * GNU GPL, version 2 or (at your option) any later version.
  10 */
  11
  12#include "sysbus.h"
  13#include "arm-misc.h"
  14#include "devices.h"
  15#include "net/net.h"
  16#include "sysemu/sysemu.h"
  17#include "boards.h"
  18#include "serial.h"
  19#include "qemu/timer.h"
  20#include "ptimer.h"
  21#include "block/block.h"
  22#include "flash.h"
  23#include "ui/console.h"
  24#include "i2c.h"
  25#include "sysemu/blockdev.h"
  26#include "exec/address-spaces.h"
  27#include "ui/pixel_ops.h"
  28
  29#define MP_MISC_BASE            0x80002000
  30#define MP_MISC_SIZE            0x00001000
  31
  32#define MP_ETH_BASE             0x80008000
  33#define MP_ETH_SIZE             0x00001000
  34
  35#define MP_WLAN_BASE            0x8000C000
  36#define MP_WLAN_SIZE            0x00000800
  37
  38#define MP_UART1_BASE           0x8000C840
  39#define MP_UART2_BASE           0x8000C940
  40
  41#define MP_GPIO_BASE            0x8000D000
  42#define MP_GPIO_SIZE            0x00001000
  43
  44#define MP_FLASHCFG_BASE        0x90006000
  45#define MP_FLASHCFG_SIZE        0x00001000
  46
  47#define MP_AUDIO_BASE           0x90007000
  48
  49#define MP_PIC_BASE             0x90008000
  50#define MP_PIC_SIZE             0x00001000
  51
  52#define MP_PIT_BASE             0x90009000
  53#define MP_PIT_SIZE             0x00001000
  54
  55#define MP_LCD_BASE             0x9000c000
  56#define MP_LCD_SIZE             0x00001000
  57
  58#define MP_SRAM_BASE            0xC0000000
  59#define MP_SRAM_SIZE            0x00020000
  60
  61#define MP_RAM_DEFAULT_SIZE     32*1024*1024
  62#define MP_FLASH_SIZE_MAX       32*1024*1024
  63
  64#define MP_TIMER1_IRQ           4
  65#define MP_TIMER2_IRQ           5
  66#define MP_TIMER3_IRQ           6
  67#define MP_TIMER4_IRQ           7
  68#define MP_EHCI_IRQ             8
  69#define MP_ETH_IRQ              9
  70#define MP_UART1_IRQ            11
  71#define MP_UART2_IRQ            11
  72#define MP_GPIO_IRQ             12
  73#define MP_RTC_IRQ              28
  74#define MP_AUDIO_IRQ            30
  75
  76/* Wolfson 8750 I2C address */
  77#define MP_WM_ADDR              0x1A
  78
  79/* Ethernet register offsets */
  80#define MP_ETH_SMIR             0x010
  81#define MP_ETH_PCXR             0x408
  82#define MP_ETH_SDCMR            0x448
  83#define MP_ETH_ICR              0x450
  84#define MP_ETH_IMR              0x458
  85#define MP_ETH_FRDP0            0x480
  86#define MP_ETH_FRDP1            0x484
  87#define MP_ETH_FRDP2            0x488
  88#define MP_ETH_FRDP3            0x48C
  89#define MP_ETH_CRDP0            0x4A0
  90#define MP_ETH_CRDP1            0x4A4
  91#define MP_ETH_CRDP2            0x4A8
  92#define MP_ETH_CRDP3            0x4AC
  93#define MP_ETH_CTDP0            0x4E0
  94#define MP_ETH_CTDP1            0x4E4
  95#define MP_ETH_CTDP2            0x4E8
  96#define MP_ETH_CTDP3            0x4EC
  97
  98/* MII PHY access */
  99#define MP_ETH_SMIR_DATA        0x0000FFFF
 100#define MP_ETH_SMIR_ADDR        0x03FF0000
 101#define MP_ETH_SMIR_OPCODE      (1 << 26) /* Read value */
 102#define MP_ETH_SMIR_RDVALID     (1 << 27)
 103
 104/* PHY registers */
 105#define MP_ETH_PHY1_BMSR        0x00210000
 106#define MP_ETH_PHY1_PHYSID1     0x00410000
 107#define MP_ETH_PHY1_PHYSID2     0x00610000
 108
 109#define MP_PHY_BMSR_LINK        0x0004
 110#define MP_PHY_BMSR_AUTONEG     0x0008
 111
 112#define MP_PHY_88E3015          0x01410E20
 113
 114/* TX descriptor status */
 115#define MP_ETH_TX_OWN           (1 << 31)
 116
 117/* RX descriptor status */
 118#define MP_ETH_RX_OWN           (1 << 31)
 119
 120/* Interrupt cause/mask bits */
 121#define MP_ETH_IRQ_RX_BIT       0
 122#define MP_ETH_IRQ_RX           (1 << MP_ETH_IRQ_RX_BIT)
 123#define MP_ETH_IRQ_TXHI_BIT     2
 124#define MP_ETH_IRQ_TXLO_BIT     3
 125
 126/* Port config bits */
 127#define MP_ETH_PCXR_2BSM_BIT    28 /* 2-byte incoming suffix */
 128
 129/* SDMA command bits */
 130#define MP_ETH_CMD_TXHI         (1 << 23)
 131#define MP_ETH_CMD_TXLO         (1 << 22)
 132
 133typedef struct mv88w8618_tx_desc {
 134    uint32_t cmdstat;
 135    uint16_t res;
 136    uint16_t bytes;
 137    uint32_t buffer;
 138    uint32_t next;
 139} mv88w8618_tx_desc;
 140
 141typedef struct mv88w8618_rx_desc {
 142    uint32_t cmdstat;
 143    uint16_t bytes;
 144    uint16_t buffer_size;
 145    uint32_t buffer;
 146    uint32_t next;
 147} mv88w8618_rx_desc;
 148
 149typedef struct mv88w8618_eth_state {
 150    SysBusDevice busdev;
 151    MemoryRegion iomem;
 152    qemu_irq irq;
 153    uint32_t smir;
 154    uint32_t icr;
 155    uint32_t imr;
 156    int mmio_index;
 157    uint32_t vlan_header;
 158    uint32_t tx_queue[2];
 159    uint32_t rx_queue[4];
 160    uint32_t frx_queue[4];
 161    uint32_t cur_rx[4];
 162    NICState *nic;
 163    NICConf conf;
 164} mv88w8618_eth_state;
 165
 166static void eth_rx_desc_put(uint32_t addr, mv88w8618_rx_desc *desc)
 167{
 168    cpu_to_le32s(&desc->cmdstat);
 169    cpu_to_le16s(&desc->bytes);
 170    cpu_to_le16s(&desc->buffer_size);
 171    cpu_to_le32s(&desc->buffer);
 172    cpu_to_le32s(&desc->next);
 173    cpu_physical_memory_write(addr, (void *)desc, sizeof(*desc));
 174}
 175
 176static void eth_rx_desc_get(uint32_t addr, mv88w8618_rx_desc *desc)
 177{
 178    cpu_physical_memory_read(addr, (void *)desc, sizeof(*desc));
 179    le32_to_cpus(&desc->cmdstat);
 180    le16_to_cpus(&desc->bytes);
 181    le16_to_cpus(&desc->buffer_size);
 182    le32_to_cpus(&desc->buffer);
 183    le32_to_cpus(&desc->next);
 184}
 185
 186static int eth_can_receive(NetClientState *nc)
 187{
 188    return 1;
 189}
 190
 191static ssize_t eth_receive(NetClientState *nc, const uint8_t *buf, size_t size)
 192{
 193    mv88w8618_eth_state *s = qemu_get_nic_opaque(nc);
 194    uint32_t desc_addr;
 195    mv88w8618_rx_desc desc;
 196    int i;
 197
 198    for (i = 0; i < 4; i++) {
 199        desc_addr = s->cur_rx[i];
 200        if (!desc_addr) {
 201            continue;
 202        }
 203        do {
 204            eth_rx_desc_get(desc_addr, &desc);
 205            if ((desc.cmdstat & MP_ETH_RX_OWN) && desc.buffer_size >= size) {
 206                cpu_physical_memory_write(desc.buffer + s->vlan_header,
 207                                          buf, size);
 208                desc.bytes = size + s->vlan_header;
 209                desc.cmdstat &= ~MP_ETH_RX_OWN;
 210                s->cur_rx[i] = desc.next;
 211
 212                s->icr |= MP_ETH_IRQ_RX;
 213                if (s->icr & s->imr) {
 214                    qemu_irq_raise(s->irq);
 215                }
 216                eth_rx_desc_put(desc_addr, &desc);
 217                return size;
 218            }
 219            desc_addr = desc.next;
 220        } while (desc_addr != s->rx_queue[i]);
 221    }
 222    return size;
 223}
 224
 225static void eth_tx_desc_put(uint32_t addr, mv88w8618_tx_desc *desc)
 226{
 227    cpu_to_le32s(&desc->cmdstat);
 228    cpu_to_le16s(&desc->res);
 229    cpu_to_le16s(&desc->bytes);
 230    cpu_to_le32s(&desc->buffer);
 231    cpu_to_le32s(&desc->next);
 232    cpu_physical_memory_write(addr, (void *)desc, sizeof(*desc));
 233}
 234
 235static void eth_tx_desc_get(uint32_t addr, mv88w8618_tx_desc *desc)
 236{
 237    cpu_physical_memory_read(addr, (void *)desc, sizeof(*desc));
 238    le32_to_cpus(&desc->cmdstat);
 239    le16_to_cpus(&desc->res);
 240    le16_to_cpus(&desc->bytes);
 241    le32_to_cpus(&desc->buffer);
 242    le32_to_cpus(&desc->next);
 243}
 244
 245static void eth_send(mv88w8618_eth_state *s, int queue_index)
 246{
 247    uint32_t desc_addr = s->tx_queue[queue_index];
 248    mv88w8618_tx_desc desc;
 249    uint32_t next_desc;
 250    uint8_t buf[2048];
 251    int len;
 252
 253    do {
 254        eth_tx_desc_get(desc_addr, &desc);
 255        next_desc = desc.next;
 256        if (desc.cmdstat & MP_ETH_TX_OWN) {
 257            len = desc.bytes;
 258            if (len < 2048) {
 259                cpu_physical_memory_read(desc.buffer, buf, len);
 260                qemu_send_packet(qemu_get_queue(s->nic), buf, len);
 261            }
 262            desc.cmdstat &= ~MP_ETH_TX_OWN;
 263            s->icr |= 1 << (MP_ETH_IRQ_TXLO_BIT - queue_index);
 264            eth_tx_desc_put(desc_addr, &desc);
 265        }
 266        desc_addr = next_desc;
 267    } while (desc_addr != s->tx_queue[queue_index]);
 268}
 269
 270static uint64_t mv88w8618_eth_read(void *opaque, hwaddr offset,
 271                                   unsigned size)
 272{
 273    mv88w8618_eth_state *s = opaque;
 274
 275    switch (offset) {
 276    case MP_ETH_SMIR:
 277        if (s->smir & MP_ETH_SMIR_OPCODE) {
 278            switch (s->smir & MP_ETH_SMIR_ADDR) {
 279            case MP_ETH_PHY1_BMSR:
 280                return MP_PHY_BMSR_LINK | MP_PHY_BMSR_AUTONEG |
 281                       MP_ETH_SMIR_RDVALID;
 282            case MP_ETH_PHY1_PHYSID1:
 283                return (MP_PHY_88E3015 >> 16) | MP_ETH_SMIR_RDVALID;
 284            case MP_ETH_PHY1_PHYSID2:
 285                return (MP_PHY_88E3015 & 0xFFFF) | MP_ETH_SMIR_RDVALID;
 286            default:
 287                return MP_ETH_SMIR_RDVALID;
 288            }
 289        }
 290        return 0;
 291
 292    case MP_ETH_ICR:
 293        return s->icr;
 294
 295    case MP_ETH_IMR:
 296        return s->imr;
 297
 298    case MP_ETH_FRDP0 ... MP_ETH_FRDP3:
 299        return s->frx_queue[(offset - MP_ETH_FRDP0)/4];
 300
 301    case MP_ETH_CRDP0 ... MP_ETH_CRDP3:
 302        return s->rx_queue[(offset - MP_ETH_CRDP0)/4];
 303
 304    case MP_ETH_CTDP0 ... MP_ETH_CTDP3:
 305        return s->tx_queue[(offset - MP_ETH_CTDP0)/4];
 306
 307    default:
 308        return 0;
 309    }
 310}
 311
 312static void mv88w8618_eth_write(void *opaque, hwaddr offset,
 313                                uint64_t value, unsigned size)
 314{
 315    mv88w8618_eth_state *s = opaque;
 316
 317    switch (offset) {
 318    case MP_ETH_SMIR:
 319        s->smir = value;
 320        break;
 321
 322    case MP_ETH_PCXR:
 323        s->vlan_header = ((value >> MP_ETH_PCXR_2BSM_BIT) & 1) * 2;
 324        break;
 325
 326    case MP_ETH_SDCMR:
 327        if (value & MP_ETH_CMD_TXHI) {
 328            eth_send(s, 1);
 329        }
 330        if (value & MP_ETH_CMD_TXLO) {
 331            eth_send(s, 0);
 332        }
 333        if (value & (MP_ETH_CMD_TXHI | MP_ETH_CMD_TXLO) && s->icr & s->imr) {
 334            qemu_irq_raise(s->irq);
 335        }
 336        break;
 337
 338    case MP_ETH_ICR:
 339        s->icr &= value;
 340        break;
 341
 342    case MP_ETH_IMR:
 343        s->imr = value;
 344        if (s->icr & s->imr) {
 345            qemu_irq_raise(s->irq);
 346        }
 347        break;
 348
 349    case MP_ETH_FRDP0 ... MP_ETH_FRDP3:
 350        s->frx_queue[(offset - MP_ETH_FRDP0)/4] = value;
 351        break;
 352
 353    case MP_ETH_CRDP0 ... MP_ETH_CRDP3:
 354        s->rx_queue[(offset - MP_ETH_CRDP0)/4] =
 355            s->cur_rx[(offset - MP_ETH_CRDP0)/4] = value;
 356        break;
 357
 358    case MP_ETH_CTDP0 ... MP_ETH_CTDP3:
 359        s->tx_queue[(offset - MP_ETH_CTDP0)/4] = value;
 360        break;
 361    }
 362}
 363
 364static const MemoryRegionOps mv88w8618_eth_ops = {
 365    .read = mv88w8618_eth_read,
 366    .write = mv88w8618_eth_write,
 367    .endianness = DEVICE_NATIVE_ENDIAN,
 368};
 369
 370static void eth_cleanup(NetClientState *nc)
 371{
 372    mv88w8618_eth_state *s = qemu_get_nic_opaque(nc);
 373
 374    s->nic = NULL;
 375}
 376
 377static NetClientInfo net_mv88w8618_info = {
 378    .type = NET_CLIENT_OPTIONS_KIND_NIC,
 379    .size = sizeof(NICState),
 380    .can_receive = eth_can_receive,
 381    .receive = eth_receive,
 382    .cleanup = eth_cleanup,
 383};
 384
 385static int mv88w8618_eth_init(SysBusDevice *dev)
 386{
 387    mv88w8618_eth_state *s = FROM_SYSBUS(mv88w8618_eth_state, dev);
 388
 389    sysbus_init_irq(dev, &s->irq);
 390    s->nic = qemu_new_nic(&net_mv88w8618_info, &s->conf,
 391                          object_get_typename(OBJECT(dev)), dev->qdev.id, s);
 392    memory_region_init_io(&s->iomem, &mv88w8618_eth_ops, s, "mv88w8618-eth",
 393                          MP_ETH_SIZE);
 394    sysbus_init_mmio(dev, &s->iomem);
 395    return 0;
 396}
 397
 398static const VMStateDescription mv88w8618_eth_vmsd = {
 399    .name = "mv88w8618_eth",
 400    .version_id = 1,
 401    .minimum_version_id = 1,
 402    .minimum_version_id_old = 1,
 403    .fields = (VMStateField[]) {
 404        VMSTATE_UINT32(smir, mv88w8618_eth_state),
 405        VMSTATE_UINT32(icr, mv88w8618_eth_state),
 406        VMSTATE_UINT32(imr, mv88w8618_eth_state),
 407        VMSTATE_UINT32(vlan_header, mv88w8618_eth_state),
 408        VMSTATE_UINT32_ARRAY(tx_queue, mv88w8618_eth_state, 2),
 409        VMSTATE_UINT32_ARRAY(rx_queue, mv88w8618_eth_state, 4),
 410        VMSTATE_UINT32_ARRAY(frx_queue, mv88w8618_eth_state, 4),
 411        VMSTATE_UINT32_ARRAY(cur_rx, mv88w8618_eth_state, 4),
 412        VMSTATE_END_OF_LIST()
 413    }
 414};
 415
 416static Property mv88w8618_eth_properties[] = {
 417    DEFINE_NIC_PROPERTIES(mv88w8618_eth_state, conf),
 418    DEFINE_PROP_END_OF_LIST(),
 419};
 420
 421static void mv88w8618_eth_class_init(ObjectClass *klass, void *data)
 422{
 423    DeviceClass *dc = DEVICE_CLASS(klass);
 424    SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
 425
 426    k->init = mv88w8618_eth_init;
 427    dc->vmsd = &mv88w8618_eth_vmsd;
 428    dc->props = mv88w8618_eth_properties;
 429}
 430
 431static const TypeInfo mv88w8618_eth_info = {
 432    .name          = "mv88w8618_eth",
 433    .parent        = TYPE_SYS_BUS_DEVICE,
 434    .instance_size = sizeof(mv88w8618_eth_state),
 435    .class_init    = mv88w8618_eth_class_init,
 436};
 437
 438/* LCD register offsets */
 439#define MP_LCD_IRQCTRL          0x180
 440#define MP_LCD_IRQSTAT          0x184
 441#define MP_LCD_SPICTRL          0x1ac
 442#define MP_LCD_INST             0x1bc
 443#define MP_LCD_DATA             0x1c0
 444
 445/* Mode magics */
 446#define MP_LCD_SPI_DATA         0x00100011
 447#define MP_LCD_SPI_CMD          0x00104011
 448#define MP_LCD_SPI_INVALID      0x00000000
 449
 450/* Commmands */
 451#define MP_LCD_INST_SETPAGE0    0xB0
 452/* ... */
 453#define MP_LCD_INST_SETPAGE7    0xB7
 454
 455#define MP_LCD_TEXTCOLOR        0xe0e0ff /* RRGGBB */
 456
 457typedef struct musicpal_lcd_state {
 458    SysBusDevice busdev;
 459    MemoryRegion iomem;
 460    uint32_t brightness;
 461    uint32_t mode;
 462    uint32_t irqctrl;
 463    uint32_t page;
 464    uint32_t page_off;
 465    DisplayState *ds;
 466    uint8_t video_ram[128*64/8];
 467} musicpal_lcd_state;
 468
 469static uint8_t scale_lcd_color(musicpal_lcd_state *s, uint8_t col)
 470{
 471    switch (s->brightness) {
 472    case 7:
 473        return col;
 474    case 0:
 475        return 0;
 476    default:
 477        return (col * s->brightness) / 7;
 478    }
 479}
 480
 481#define SET_LCD_PIXEL(depth, type) \
 482static inline void glue(set_lcd_pixel, depth) \
 483        (musicpal_lcd_state *s, int x, int y, type col) \
 484{ \
 485    int dx, dy; \
 486    type *pixel = &((type *) ds_get_data(s->ds))[(y * 128 * 3 + x) * 3]; \
 487\
 488    for (dy = 0; dy < 3; dy++, pixel += 127 * 3) \
 489        for (dx = 0; dx < 3; dx++, pixel++) \
 490            *pixel = col; \
 491}
 492SET_LCD_PIXEL(8, uint8_t)
 493SET_LCD_PIXEL(16, uint16_t)
 494SET_LCD_PIXEL(32, uint32_t)
 495
 496static void lcd_refresh(void *opaque)
 497{
 498    musicpal_lcd_state *s = opaque;
 499    int x, y, col;
 500
 501    switch (ds_get_bits_per_pixel(s->ds)) {
 502    case 0:
 503        return;
 504#define LCD_REFRESH(depth, func) \
 505    case depth: \
 506        col = func(scale_lcd_color(s, (MP_LCD_TEXTCOLOR >> 16) & 0xff), \
 507                   scale_lcd_color(s, (MP_LCD_TEXTCOLOR >> 8) & 0xff), \
 508                   scale_lcd_color(s, MP_LCD_TEXTCOLOR & 0xff)); \
 509        for (x = 0; x < 128; x++) { \
 510            for (y = 0; y < 64; y++) { \
 511                if (s->video_ram[x + (y/8)*128] & (1 << (y % 8))) { \
 512                    glue(set_lcd_pixel, depth)(s, x, y, col); \
 513                } else { \
 514                    glue(set_lcd_pixel, depth)(s, x, y, 0); \
 515                } \
 516            } \
 517        } \
 518        break;
 519    LCD_REFRESH(8, rgb_to_pixel8)
 520    LCD_REFRESH(16, rgb_to_pixel16)
 521    LCD_REFRESH(32, (is_surface_bgr(s->ds->surface) ?
 522                     rgb_to_pixel32bgr : rgb_to_pixel32))
 523    default:
 524        hw_error("unsupported colour depth %i\n",
 525                  ds_get_bits_per_pixel(s->ds));
 526    }
 527
 528    dpy_gfx_update(s->ds, 0, 0, 128*3, 64*3);
 529}
 530
 531static void lcd_invalidate(void *opaque)
 532{
 533}
 534
 535static void musicpal_lcd_gpio_brigthness_in(void *opaque, int irq, int level)
 536{
 537    musicpal_lcd_state *s = opaque;
 538    s->brightness &= ~(1 << irq);
 539    s->brightness |= level << irq;
 540}
 541
 542static uint64_t musicpal_lcd_read(void *opaque, hwaddr offset,
 543                                  unsigned size)
 544{
 545    musicpal_lcd_state *s = opaque;
 546
 547    switch (offset) {
 548    case MP_LCD_IRQCTRL:
 549        return s->irqctrl;
 550
 551    default:
 552        return 0;
 553    }
 554}
 555
 556static void musicpal_lcd_write(void *opaque, hwaddr offset,
 557                               uint64_t value, unsigned size)
 558{
 559    musicpal_lcd_state *s = opaque;
 560
 561    switch (offset) {
 562    case MP_LCD_IRQCTRL:
 563        s->irqctrl = value;
 564        break;
 565
 566    case MP_LCD_SPICTRL:
 567        if (value == MP_LCD_SPI_DATA || value == MP_LCD_SPI_CMD) {
 568            s->mode = value;
 569        } else {
 570            s->mode = MP_LCD_SPI_INVALID;
 571        }
 572        break;
 573
 574    case MP_LCD_INST:
 575        if (value >= MP_LCD_INST_SETPAGE0 && value <= MP_LCD_INST_SETPAGE7) {
 576            s->page = value - MP_LCD_INST_SETPAGE0;
 577            s->page_off = 0;
 578        }
 579        break;
 580
 581    case MP_LCD_DATA:
 582        if (s->mode == MP_LCD_SPI_CMD) {
 583            if (value >= MP_LCD_INST_SETPAGE0 &&
 584                value <= MP_LCD_INST_SETPAGE7) {
 585                s->page = value - MP_LCD_INST_SETPAGE0;
 586                s->page_off = 0;
 587            }
 588        } else if (s->mode == MP_LCD_SPI_DATA) {
 589            s->video_ram[s->page*128 + s->page_off] = value;
 590            s->page_off = (s->page_off + 1) & 127;
 591        }
 592        break;
 593    }
 594}
 595
 596static const MemoryRegionOps musicpal_lcd_ops = {
 597    .read = musicpal_lcd_read,
 598    .write = musicpal_lcd_write,
 599    .endianness = DEVICE_NATIVE_ENDIAN,
 600};
 601
 602static int musicpal_lcd_init(SysBusDevice *dev)
 603{
 604    musicpal_lcd_state *s = FROM_SYSBUS(musicpal_lcd_state, dev);
 605
 606    s->brightness = 7;
 607
 608    memory_region_init_io(&s->iomem, &musicpal_lcd_ops, s,
 609                          "musicpal-lcd", MP_LCD_SIZE);
 610    sysbus_init_mmio(dev, &s->iomem);
 611
 612    s->ds = graphic_console_init(lcd_refresh, lcd_invalidate,
 613                                 NULL, NULL, s);
 614    qemu_console_resize(s->ds, 128*3, 64*3);
 615
 616    qdev_init_gpio_in(&dev->qdev, musicpal_lcd_gpio_brigthness_in, 3);
 617
 618    return 0;
 619}
 620
 621static const VMStateDescription musicpal_lcd_vmsd = {
 622    .name = "musicpal_lcd",
 623    .version_id = 1,
 624    .minimum_version_id = 1,
 625    .minimum_version_id_old = 1,
 626    .fields = (VMStateField[]) {
 627        VMSTATE_UINT32(brightness, musicpal_lcd_state),
 628        VMSTATE_UINT32(mode, musicpal_lcd_state),
 629        VMSTATE_UINT32(irqctrl, musicpal_lcd_state),
 630        VMSTATE_UINT32(page, musicpal_lcd_state),
 631        VMSTATE_UINT32(page_off, musicpal_lcd_state),
 632        VMSTATE_BUFFER(video_ram, musicpal_lcd_state),
 633        VMSTATE_END_OF_LIST()
 634    }
 635};
 636
 637static void musicpal_lcd_class_init(ObjectClass *klass, void *data)
 638{
 639    DeviceClass *dc = DEVICE_CLASS(klass);
 640    SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
 641
 642    k->init = musicpal_lcd_init;
 643    dc->vmsd = &musicpal_lcd_vmsd;
 644}
 645
 646static const TypeInfo musicpal_lcd_info = {
 647    .name          = "musicpal_lcd",
 648    .parent        = TYPE_SYS_BUS_DEVICE,
 649    .instance_size = sizeof(musicpal_lcd_state),
 650    .class_init    = musicpal_lcd_class_init,
 651};
 652
 653/* PIC register offsets */
 654#define MP_PIC_STATUS           0x00
 655#define MP_PIC_ENABLE_SET       0x08
 656#define MP_PIC_ENABLE_CLR       0x0C
 657
 658typedef struct mv88w8618_pic_state
 659{
 660    SysBusDevice busdev;
 661    MemoryRegion iomem;
 662    uint32_t level;
 663    uint32_t enabled;
 664    qemu_irq parent_irq;
 665} mv88w8618_pic_state;
 666
 667static void mv88w8618_pic_update(mv88w8618_pic_state *s)
 668{
 669    qemu_set_irq(s->parent_irq, (s->level & s->enabled));
 670}
 671
 672static void mv88w8618_pic_set_irq(void *opaque, int irq, int level)
 673{
 674    mv88w8618_pic_state *s = opaque;
 675
 676    if (level) {
 677        s->level |= 1 << irq;
 678    } else {
 679        s->level &= ~(1 << irq);
 680    }
 681    mv88w8618_pic_update(s);
 682}
 683
 684static uint64_t mv88w8618_pic_read(void *opaque, hwaddr offset,
 685                                   unsigned size)
 686{
 687    mv88w8618_pic_state *s = opaque;
 688
 689    switch (offset) {
 690    case MP_PIC_STATUS:
 691        return s->level & s->enabled;
 692
 693    default:
 694        return 0;
 695    }
 696}
 697
 698static void mv88w8618_pic_write(void *opaque, hwaddr offset,
 699                                uint64_t value, unsigned size)
 700{
 701    mv88w8618_pic_state *s = opaque;
 702
 703    switch (offset) {
 704    case MP_PIC_ENABLE_SET:
 705        s->enabled |= value;
 706        break;
 707
 708    case MP_PIC_ENABLE_CLR:
 709        s->enabled &= ~value;
 710        s->level &= ~value;
 711        break;
 712    }
 713    mv88w8618_pic_update(s);
 714}
 715
 716static void mv88w8618_pic_reset(DeviceState *d)
 717{
 718    mv88w8618_pic_state *s = FROM_SYSBUS(mv88w8618_pic_state,
 719                                         SYS_BUS_DEVICE(d));
 720
 721    s->level = 0;
 722    s->enabled = 0;
 723}
 724
 725static const MemoryRegionOps mv88w8618_pic_ops = {
 726    .read = mv88w8618_pic_read,
 727    .write = mv88w8618_pic_write,
 728    .endianness = DEVICE_NATIVE_ENDIAN,
 729};
 730
 731static int mv88w8618_pic_init(SysBusDevice *dev)
 732{
 733    mv88w8618_pic_state *s = FROM_SYSBUS(mv88w8618_pic_state, dev);
 734
 735    qdev_init_gpio_in(&dev->qdev, mv88w8618_pic_set_irq, 32);
 736    sysbus_init_irq(dev, &s->parent_irq);
 737    memory_region_init_io(&s->iomem, &mv88w8618_pic_ops, s,
 738                          "musicpal-pic", MP_PIC_SIZE);
 739    sysbus_init_mmio(dev, &s->iomem);
 740    return 0;
 741}
 742
 743static const VMStateDescription mv88w8618_pic_vmsd = {
 744    .name = "mv88w8618_pic",
 745    .version_id = 1,
 746    .minimum_version_id = 1,
 747    .minimum_version_id_old = 1,
 748    .fields = (VMStateField[]) {
 749        VMSTATE_UINT32(level, mv88w8618_pic_state),
 750        VMSTATE_UINT32(enabled, mv88w8618_pic_state),
 751        VMSTATE_END_OF_LIST()
 752    }
 753};
 754
 755static void mv88w8618_pic_class_init(ObjectClass *klass, void *data)
 756{
 757    DeviceClass *dc = DEVICE_CLASS(klass);
 758    SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
 759
 760    k->init = mv88w8618_pic_init;
 761    dc->reset = mv88w8618_pic_reset;
 762    dc->vmsd = &mv88w8618_pic_vmsd;
 763}
 764
 765static const TypeInfo mv88w8618_pic_info = {
 766    .name          = "mv88w8618_pic",
 767    .parent        = TYPE_SYS_BUS_DEVICE,
 768    .instance_size = sizeof(mv88w8618_pic_state),
 769    .class_init    = mv88w8618_pic_class_init,
 770};
 771
 772/* PIT register offsets */
 773#define MP_PIT_TIMER1_LENGTH    0x00
 774/* ... */
 775#define MP_PIT_TIMER4_LENGTH    0x0C
 776#define MP_PIT_CONTROL          0x10
 777#define MP_PIT_TIMER1_VALUE     0x14
 778/* ... */
 779#define MP_PIT_TIMER4_VALUE     0x20
 780#define MP_BOARD_RESET          0x34
 781
 782/* Magic board reset value (probably some watchdog behind it) */
 783#define MP_BOARD_RESET_MAGIC    0x10000
 784
 785typedef struct mv88w8618_timer_state {
 786    ptimer_state *ptimer;
 787    uint32_t limit;
 788    int freq;
 789    qemu_irq irq;
 790} mv88w8618_timer_state;
 791
 792typedef struct mv88w8618_pit_state {
 793    SysBusDevice busdev;
 794    MemoryRegion iomem;
 795    mv88w8618_timer_state timer[4];
 796} mv88w8618_pit_state;
 797
 798static void mv88w8618_timer_tick(void *opaque)
 799{
 800    mv88w8618_timer_state *s = opaque;
 801
 802    qemu_irq_raise(s->irq);
 803}
 804
 805static void mv88w8618_timer_init(SysBusDevice *dev, mv88w8618_timer_state *s,
 806                                 uint32_t freq)
 807{
 808    QEMUBH *bh;
 809
 810    sysbus_init_irq(dev, &s->irq);
 811    s->freq = freq;
 812
 813    bh = qemu_bh_new(mv88w8618_timer_tick, s);
 814    s->ptimer = ptimer_init(bh);
 815}
 816
 817static uint64_t mv88w8618_pit_read(void *opaque, hwaddr offset,
 818                                   unsigned size)
 819{
 820    mv88w8618_pit_state *s = opaque;
 821    mv88w8618_timer_state *t;
 822
 823    switch (offset) {
 824    case MP_PIT_TIMER1_VALUE ... MP_PIT_TIMER4_VALUE:
 825        t = &s->timer[(offset-MP_PIT_TIMER1_VALUE) >> 2];
 826        return ptimer_get_count(t->ptimer);
 827
 828    default:
 829        return 0;
 830    }
 831}
 832
 833static void mv88w8618_pit_write(void *opaque, hwaddr offset,
 834                                uint64_t value, unsigned size)
 835{
 836    mv88w8618_pit_state *s = opaque;
 837    mv88w8618_timer_state *t;
 838    int i;
 839
 840    switch (offset) {
 841    case MP_PIT_TIMER1_LENGTH ... MP_PIT_TIMER4_LENGTH:
 842        t = &s->timer[offset >> 2];
 843        t->limit = value;
 844        if (t->limit > 0) {
 845            ptimer_set_limit(t->ptimer, t->limit, 1);
 846        } else {
 847            ptimer_stop(t->ptimer);
 848        }
 849        break;
 850
 851    case MP_PIT_CONTROL:
 852        for (i = 0; i < 4; i++) {
 853            t = &s->timer[i];
 854            if (value & 0xf && t->limit > 0) {
 855                ptimer_set_limit(t->ptimer, t->limit, 0);
 856                ptimer_set_freq(t->ptimer, t->freq);
 857                ptimer_run(t->ptimer, 0);
 858            } else {
 859                ptimer_stop(t->ptimer);
 860            }
 861            value >>= 4;
 862        }
 863        break;
 864
 865    case MP_BOARD_RESET:
 866        if (value == MP_BOARD_RESET_MAGIC) {
 867            qemu_system_reset_request();
 868        }
 869        break;
 870    }
 871}
 872
 873static void mv88w8618_pit_reset(DeviceState *d)
 874{
 875    mv88w8618_pit_state *s = FROM_SYSBUS(mv88w8618_pit_state,
 876                                         SYS_BUS_DEVICE(d));
 877    int i;
 878
 879    for (i = 0; i < 4; i++) {
 880        ptimer_stop(s->timer[i].ptimer);
 881        s->timer[i].limit = 0;
 882    }
 883}
 884
 885static const MemoryRegionOps mv88w8618_pit_ops = {
 886    .read = mv88w8618_pit_read,
 887    .write = mv88w8618_pit_write,
 888    .endianness = DEVICE_NATIVE_ENDIAN,
 889};
 890
 891static int mv88w8618_pit_init(SysBusDevice *dev)
 892{
 893    mv88w8618_pit_state *s = FROM_SYSBUS(mv88w8618_pit_state, dev);
 894    int i;
 895
 896    /* Letting them all run at 1 MHz is likely just a pragmatic
 897     * simplification. */
 898    for (i = 0; i < 4; i++) {
 899        mv88w8618_timer_init(dev, &s->timer[i], 1000000);
 900    }
 901
 902    memory_region_init_io(&s->iomem, &mv88w8618_pit_ops, s,
 903                          "musicpal-pit", MP_PIT_SIZE);
 904    sysbus_init_mmio(dev, &s->iomem);
 905    return 0;
 906}
 907
 908static const VMStateDescription mv88w8618_timer_vmsd = {
 909    .name = "timer",
 910    .version_id = 1,
 911    .minimum_version_id = 1,
 912    .minimum_version_id_old = 1,
 913    .fields = (VMStateField[]) {
 914        VMSTATE_PTIMER(ptimer, mv88w8618_timer_state),
 915        VMSTATE_UINT32(limit, mv88w8618_timer_state),
 916        VMSTATE_END_OF_LIST()
 917    }
 918};
 919
 920static const VMStateDescription mv88w8618_pit_vmsd = {
 921    .name = "mv88w8618_pit",
 922    .version_id = 1,
 923    .minimum_version_id = 1,
 924    .minimum_version_id_old = 1,
 925    .fields = (VMStateField[]) {
 926        VMSTATE_STRUCT_ARRAY(timer, mv88w8618_pit_state, 4, 1,
 927                             mv88w8618_timer_vmsd, mv88w8618_timer_state),
 928        VMSTATE_END_OF_LIST()
 929    }
 930};
 931
 932static void mv88w8618_pit_class_init(ObjectClass *klass, void *data)
 933{
 934    DeviceClass *dc = DEVICE_CLASS(klass);
 935    SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
 936
 937    k->init = mv88w8618_pit_init;
 938    dc->reset = mv88w8618_pit_reset;
 939    dc->vmsd = &mv88w8618_pit_vmsd;
 940}
 941
 942static const TypeInfo mv88w8618_pit_info = {
 943    .name          = "mv88w8618_pit",
 944    .parent        = TYPE_SYS_BUS_DEVICE,
 945    .instance_size = sizeof(mv88w8618_pit_state),
 946    .class_init    = mv88w8618_pit_class_init,
 947};
 948
 949/* Flash config register offsets */
 950#define MP_FLASHCFG_CFGR0    0x04
 951
 952typedef struct mv88w8618_flashcfg_state {
 953    SysBusDevice busdev;
 954    MemoryRegion iomem;
 955    uint32_t cfgr0;
 956} mv88w8618_flashcfg_state;
 957
 958static uint64_t mv88w8618_flashcfg_read(void *opaque,
 959                                        hwaddr offset,
 960                                        unsigned size)
 961{
 962    mv88w8618_flashcfg_state *s = opaque;
 963
 964    switch (offset) {
 965    case MP_FLASHCFG_CFGR0:
 966        return s->cfgr0;
 967
 968    default:
 969        return 0;
 970    }
 971}
 972
 973static void mv88w8618_flashcfg_write(void *opaque, hwaddr offset,
 974                                     uint64_t value, unsigned size)
 975{
 976    mv88w8618_flashcfg_state *s = opaque;
 977
 978    switch (offset) {
 979    case MP_FLASHCFG_CFGR0:
 980        s->cfgr0 = value;
 981        break;
 982    }
 983}
 984
 985static const MemoryRegionOps mv88w8618_flashcfg_ops = {
 986    .read = mv88w8618_flashcfg_read,
 987    .write = mv88w8618_flashcfg_write,
 988    .endianness = DEVICE_NATIVE_ENDIAN,
 989};
 990
 991static int mv88w8618_flashcfg_init(SysBusDevice *dev)
 992{
 993    mv88w8618_flashcfg_state *s = FROM_SYSBUS(mv88w8618_flashcfg_state, dev);
 994
 995    s->cfgr0 = 0xfffe4285; /* Default as set by U-Boot for 8 MB flash */
 996    memory_region_init_io(&s->iomem, &mv88w8618_flashcfg_ops, s,
 997                          "musicpal-flashcfg", MP_FLASHCFG_SIZE);
 998    sysbus_init_mmio(dev, &s->iomem);
 999    return 0;
1000}
1001
1002static const VMStateDescription mv88w8618_flashcfg_vmsd = {
1003    .name = "mv88w8618_flashcfg",
1004    .version_id = 1,
1005    .minimum_version_id = 1,
1006    .minimum_version_id_old = 1,
1007    .fields = (VMStateField[]) {
1008        VMSTATE_UINT32(cfgr0, mv88w8618_flashcfg_state),
1009        VMSTATE_END_OF_LIST()
1010    }
1011};
1012
1013static void mv88w8618_flashcfg_class_init(ObjectClass *klass, void *data)
1014{
1015    DeviceClass *dc = DEVICE_CLASS(klass);
1016    SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
1017
1018    k->init = mv88w8618_flashcfg_init;
1019    dc->vmsd = &mv88w8618_flashcfg_vmsd;
1020}
1021
1022static const TypeInfo mv88w8618_flashcfg_info = {
1023    .name          = "mv88w8618_flashcfg",
1024    .parent        = TYPE_SYS_BUS_DEVICE,
1025    .instance_size = sizeof(mv88w8618_flashcfg_state),
1026    .class_init    = mv88w8618_flashcfg_class_init,
1027};
1028
1029/* Misc register offsets */
1030#define MP_MISC_BOARD_REVISION  0x18
1031
1032#define MP_BOARD_REVISION       0x31
1033
1034static uint64_t musicpal_misc_read(void *opaque, hwaddr offset,
1035                                   unsigned size)
1036{
1037    switch (offset) {
1038    case MP_MISC_BOARD_REVISION:
1039        return MP_BOARD_REVISION;
1040
1041    default:
1042        return 0;
1043    }
1044}
1045
1046static void musicpal_misc_write(void *opaque, hwaddr offset,
1047                                uint64_t value, unsigned size)
1048{
1049}
1050
1051static const MemoryRegionOps musicpal_misc_ops = {
1052    .read = musicpal_misc_read,
1053    .write = musicpal_misc_write,
1054    .endianness = DEVICE_NATIVE_ENDIAN,
1055};
1056
1057static void musicpal_misc_init(SysBusDevice *dev)
1058{
1059    MemoryRegion *iomem = g_new(MemoryRegion, 1);
1060
1061    memory_region_init_io(iomem, &musicpal_misc_ops, NULL,
1062                          "musicpal-misc", MP_MISC_SIZE);
1063    sysbus_add_memory(dev, MP_MISC_BASE, iomem);
1064}
1065
1066/* WLAN register offsets */
1067#define MP_WLAN_MAGIC1          0x11c
1068#define MP_WLAN_MAGIC2          0x124
1069
1070static uint64_t mv88w8618_wlan_read(void *opaque, hwaddr offset,
1071                                    unsigned size)
1072{
1073    switch (offset) {
1074    /* Workaround to allow loading the binary-only wlandrv.ko crap
1075     * from the original Freecom firmware. */
1076    case MP_WLAN_MAGIC1:
1077        return ~3;
1078    case MP_WLAN_MAGIC2:
1079        return -1;
1080
1081    default:
1082        return 0;
1083    }
1084}
1085
1086static void mv88w8618_wlan_write(void *opaque, hwaddr offset,
1087                                 uint64_t value, unsigned size)
1088{
1089}
1090
1091static const MemoryRegionOps mv88w8618_wlan_ops = {
1092    .read = mv88w8618_wlan_read,
1093    .write =mv88w8618_wlan_write,
1094    .endianness = DEVICE_NATIVE_ENDIAN,
1095};
1096
1097static int mv88w8618_wlan_init(SysBusDevice *dev)
1098{
1099    MemoryRegion *iomem = g_new(MemoryRegion, 1);
1100
1101    memory_region_init_io(iomem, &mv88w8618_wlan_ops, NULL,
1102                          "musicpal-wlan", MP_WLAN_SIZE);
1103    sysbus_init_mmio(dev, iomem);
1104    return 0;
1105}
1106
1107/* GPIO register offsets */
1108#define MP_GPIO_OE_LO           0x008
1109#define MP_GPIO_OUT_LO          0x00c
1110#define MP_GPIO_IN_LO           0x010
1111#define MP_GPIO_IER_LO          0x014
1112#define MP_GPIO_IMR_LO          0x018
1113#define MP_GPIO_ISR_LO          0x020
1114#define MP_GPIO_OE_HI           0x508
1115#define MP_GPIO_OUT_HI          0x50c
1116#define MP_GPIO_IN_HI           0x510
1117#define MP_GPIO_IER_HI          0x514
1118#define MP_GPIO_IMR_HI          0x518
1119#define MP_GPIO_ISR_HI          0x520
1120
1121/* GPIO bits & masks */
1122#define MP_GPIO_LCD_BRIGHTNESS  0x00070000
1123#define MP_GPIO_I2C_DATA_BIT    29
1124#define MP_GPIO_I2C_CLOCK_BIT   30
1125
1126/* LCD brightness bits in GPIO_OE_HI */
1127#define MP_OE_LCD_BRIGHTNESS    0x0007
1128
1129typedef struct musicpal_gpio_state {
1130    SysBusDevice busdev;
1131    MemoryRegion iomem;
1132    uint32_t lcd_brightness;
1133    uint32_t out_state;
1134    uint32_t in_state;
1135    uint32_t ier;
1136    uint32_t imr;
1137    uint32_t isr;
1138    qemu_irq irq;
1139    qemu_irq out[5]; /* 3 brightness out + 2 lcd (data and clock ) */
1140} musicpal_gpio_state;
1141
1142static void musicpal_gpio_brightness_update(musicpal_gpio_state *s) {
1143    int i;
1144    uint32_t brightness;
1145
1146    /* compute brightness ratio */
1147    switch (s->lcd_brightness) {
1148    case 0x00000007:
1149        brightness = 0;
1150        break;
1151
1152    case 0x00020000:
1153        brightness = 1;
1154        break;
1155
1156    case 0x00020001:
1157        brightness = 2;
1158        break;
1159
1160    case 0x00040000:
1161        brightness = 3;
1162        break;
1163
1164    case 0x00010006:
1165        brightness = 4;
1166        break;
1167
1168    case 0x00020005:
1169        brightness = 5;
1170        break;
1171
1172    case 0x00040003:
1173        brightness = 6;
1174        break;
1175
1176    case 0x00030004:
1177    default:
1178        brightness = 7;
1179    }
1180
1181    /* set lcd brightness GPIOs  */
1182    for (i = 0; i <= 2; i++) {
1183        qemu_set_irq(s->out[i], (brightness >> i) & 1);
1184    }
1185}
1186
1187static void musicpal_gpio_pin_event(void *opaque, int pin, int level)
1188{
1189    musicpal_gpio_state *s = opaque;
1190    uint32_t mask = 1 << pin;
1191    uint32_t delta = level << pin;
1192    uint32_t old = s->in_state & mask;
1193
1194    s->in_state &= ~mask;
1195    s->in_state |= delta;
1196
1197    if ((old ^ delta) &&
1198        ((level && (s->imr & mask)) || (!level && (s->ier & mask)))) {
1199        s->isr = mask;
1200        qemu_irq_raise(s->irq);
1201    }
1202}
1203
1204static uint64_t musicpal_gpio_read(void *opaque, hwaddr offset,
1205                                   unsigned size)
1206{
1207    musicpal_gpio_state *s = opaque;
1208
1209    switch (offset) {
1210    case MP_GPIO_OE_HI: /* used for LCD brightness control */
1211        return s->lcd_brightness & MP_OE_LCD_BRIGHTNESS;
1212
1213    case MP_GPIO_OUT_LO:
1214        return s->out_state & 0xFFFF;
1215    case MP_GPIO_OUT_HI:
1216        return s->out_state >> 16;
1217
1218    case MP_GPIO_IN_LO:
1219        return s->in_state & 0xFFFF;
1220    case MP_GPIO_IN_HI:
1221        return s->in_state >> 16;
1222
1223    case MP_GPIO_IER_LO:
1224        return s->ier & 0xFFFF;
1225    case MP_GPIO_IER_HI:
1226        return s->ier >> 16;
1227
1228    case MP_GPIO_IMR_LO:
1229        return s->imr & 0xFFFF;
1230    case MP_GPIO_IMR_HI:
1231        return s->imr >> 16;
1232
1233    case MP_GPIO_ISR_LO:
1234        return s->isr & 0xFFFF;
1235    case MP_GPIO_ISR_HI:
1236        return s->isr >> 16;
1237
1238    default:
1239        return 0;
1240    }
1241}
1242
1243static void musicpal_gpio_write(void *opaque, hwaddr offset,
1244                                uint64_t value, unsigned size)
1245{
1246    musicpal_gpio_state *s = opaque;
1247    switch (offset) {
1248    case MP_GPIO_OE_HI: /* used for LCD brightness control */
1249        s->lcd_brightness = (s->lcd_brightness & MP_GPIO_LCD_BRIGHTNESS) |
1250                         (value & MP_OE_LCD_BRIGHTNESS);
1251        musicpal_gpio_brightness_update(s);
1252        break;
1253
1254    case MP_GPIO_OUT_LO:
1255        s->out_state = (s->out_state & 0xFFFF0000) | (value & 0xFFFF);
1256        break;
1257    case MP_GPIO_OUT_HI:
1258        s->out_state = (s->out_state & 0xFFFF) | (value << 16);
1259        s->lcd_brightness = (s->lcd_brightness & 0xFFFF) |
1260                            (s->out_state & MP_GPIO_LCD_BRIGHTNESS);
1261        musicpal_gpio_brightness_update(s);
1262        qemu_set_irq(s->out[3], (s->out_state >> MP_GPIO_I2C_DATA_BIT) & 1);
1263        qemu_set_irq(s->out[4], (s->out_state >> MP_GPIO_I2C_CLOCK_BIT) & 1);
1264        break;
1265
1266    case MP_GPIO_IER_LO:
1267        s->ier = (s->ier & 0xFFFF0000) | (value & 0xFFFF);
1268        break;
1269    case MP_GPIO_IER_HI:
1270        s->ier = (s->ier & 0xFFFF) | (value << 16);
1271        break;
1272
1273    case MP_GPIO_IMR_LO:
1274        s->imr = (s->imr & 0xFFFF0000) | (value & 0xFFFF);
1275        break;
1276    case MP_GPIO_IMR_HI:
1277        s->imr = (s->imr & 0xFFFF) | (value << 16);
1278        break;
1279    }
1280}
1281
1282static const MemoryRegionOps musicpal_gpio_ops = {
1283    .read = musicpal_gpio_read,
1284    .write = musicpal_gpio_write,
1285    .endianness = DEVICE_NATIVE_ENDIAN,
1286};
1287
1288static void musicpal_gpio_reset(DeviceState *d)
1289{
1290    musicpal_gpio_state *s = FROM_SYSBUS(musicpal_gpio_state,
1291                                         SYS_BUS_DEVICE(d));
1292
1293    s->lcd_brightness = 0;
1294    s->out_state = 0;
1295    s->in_state = 0xffffffff;
1296    s->ier = 0;
1297    s->imr = 0;
1298    s->isr = 0;
1299}
1300
1301static int musicpal_gpio_init(SysBusDevice *dev)
1302{
1303    musicpal_gpio_state *s = FROM_SYSBUS(musicpal_gpio_state, dev);
1304
1305    sysbus_init_irq(dev, &s->irq);
1306
1307    memory_region_init_io(&s->iomem, &musicpal_gpio_ops, s,
1308                          "musicpal-gpio", MP_GPIO_SIZE);
1309    sysbus_init_mmio(dev, &s->iomem);
1310
1311    qdev_init_gpio_out(&dev->qdev, s->out, ARRAY_SIZE(s->out));
1312
1313    qdev_init_gpio_in(&dev->qdev, musicpal_gpio_pin_event, 32);
1314
1315    return 0;
1316}
1317
1318static const VMStateDescription musicpal_gpio_vmsd = {
1319    .name = "musicpal_gpio",
1320    .version_id = 1,
1321    .minimum_version_id = 1,
1322    .minimum_version_id_old = 1,
1323    .fields = (VMStateField[]) {
1324        VMSTATE_UINT32(lcd_brightness, musicpal_gpio_state),
1325        VMSTATE_UINT32(out_state, musicpal_gpio_state),
1326        VMSTATE_UINT32(in_state, musicpal_gpio_state),
1327        VMSTATE_UINT32(ier, musicpal_gpio_state),
1328        VMSTATE_UINT32(imr, musicpal_gpio_state),
1329        VMSTATE_UINT32(isr, musicpal_gpio_state),
1330        VMSTATE_END_OF_LIST()
1331    }
1332};
1333
1334static void musicpal_gpio_class_init(ObjectClass *klass, void *data)
1335{
1336    DeviceClass *dc = DEVICE_CLASS(klass);
1337    SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
1338
1339    k->init = musicpal_gpio_init;
1340    dc->reset = musicpal_gpio_reset;
1341    dc->vmsd = &musicpal_gpio_vmsd;
1342}
1343
1344static const TypeInfo musicpal_gpio_info = {
1345    .name          = "musicpal_gpio",
1346    .parent        = TYPE_SYS_BUS_DEVICE,
1347    .instance_size = sizeof(musicpal_gpio_state),
1348    .class_init    = musicpal_gpio_class_init,
1349};
1350
1351/* Keyboard codes & masks */
1352#define KEY_RELEASED            0x80
1353#define KEY_CODE                0x7f
1354
1355#define KEYCODE_TAB             0x0f
1356#define KEYCODE_ENTER           0x1c
1357#define KEYCODE_F               0x21
1358#define KEYCODE_M               0x32
1359
1360#define KEYCODE_EXTENDED        0xe0
1361#define KEYCODE_UP              0x48
1362#define KEYCODE_DOWN            0x50
1363#define KEYCODE_LEFT            0x4b
1364#define KEYCODE_RIGHT           0x4d
1365
1366#define MP_KEY_WHEEL_VOL       (1 << 0)
1367#define MP_KEY_WHEEL_VOL_INV   (1 << 1)
1368#define MP_KEY_WHEEL_NAV       (1 << 2)
1369#define MP_KEY_WHEEL_NAV_INV   (1 << 3)
1370#define MP_KEY_BTN_FAVORITS    (1 << 4)
1371#define MP_KEY_BTN_MENU        (1 << 5)
1372#define MP_KEY_BTN_VOLUME      (1 << 6)
1373#define MP_KEY_BTN_NAVIGATION  (1 << 7)
1374
1375typedef struct musicpal_key_state {
1376    SysBusDevice busdev;
1377    MemoryRegion iomem;
1378    uint32_t kbd_extended;
1379    uint32_t pressed_keys;
1380    qemu_irq out[8];
1381} musicpal_key_state;
1382
1383static void musicpal_key_event(void *opaque, int keycode)
1384{
1385    musicpal_key_state *s = opaque;
1386    uint32_t event = 0;
1387    int i;
1388
1389    if (keycode == KEYCODE_EXTENDED) {
1390        s->kbd_extended = 1;
1391        return;
1392    }
1393
1394    if (s->kbd_extended) {
1395        switch (keycode & KEY_CODE) {
1396        case KEYCODE_UP:
1397            event = MP_KEY_WHEEL_NAV | MP_KEY_WHEEL_NAV_INV;
1398            break;
1399
1400        case KEYCODE_DOWN:
1401            event = MP_KEY_WHEEL_NAV;
1402            break;
1403
1404        case KEYCODE_LEFT:
1405            event = MP_KEY_WHEEL_VOL | MP_KEY_WHEEL_VOL_INV;
1406            break;
1407
1408        case KEYCODE_RIGHT:
1409            event = MP_KEY_WHEEL_VOL;
1410            break;
1411        }
1412    } else {
1413        switch (keycode & KEY_CODE) {
1414        case KEYCODE_F:
1415            event = MP_KEY_BTN_FAVORITS;
1416            break;
1417
1418        case KEYCODE_TAB:
1419            event = MP_KEY_BTN_VOLUME;
1420            break;
1421
1422        case KEYCODE_ENTER:
1423            event = MP_KEY_BTN_NAVIGATION;
1424            break;
1425
1426        case KEYCODE_M:
1427            event = MP_KEY_BTN_MENU;
1428            break;
1429        }
1430        /* Do not repeat already pressed buttons */
1431        if (!(keycode & KEY_RELEASED) && (s->pressed_keys & event)) {
1432            event = 0;
1433        }
1434    }
1435
1436    if (event) {
1437        /* Raise GPIO pin first if repeating a key */
1438        if (!(keycode & KEY_RELEASED) && (s->pressed_keys & event)) {
1439            for (i = 0; i <= 7; i++) {
1440                if (event & (1 << i)) {
1441                    qemu_set_irq(s->out[i], 1);
1442                }
1443            }
1444        }
1445        for (i = 0; i <= 7; i++) {
1446            if (event & (1 << i)) {
1447                qemu_set_irq(s->out[i], !!(keycode & KEY_RELEASED));
1448            }
1449        }
1450        if (keycode & KEY_RELEASED) {
1451            s->pressed_keys &= ~event;
1452        } else {
1453            s->pressed_keys |= event;
1454        }
1455    }
1456
1457    s->kbd_extended = 0;
1458}
1459
1460static int musicpal_key_init(SysBusDevice *dev)
1461{
1462    musicpal_key_state *s = FROM_SYSBUS(musicpal_key_state, dev);
1463
1464    memory_region_init(&s->iomem, "dummy", 0);
1465    sysbus_init_mmio(dev, &s->iomem);
1466
1467    s->kbd_extended = 0;
1468    s->pressed_keys = 0;
1469
1470    qdev_init_gpio_out(&dev->qdev, s->out, ARRAY_SIZE(s->out));
1471
1472    qemu_add_kbd_event_handler(musicpal_key_event, s);
1473
1474    return 0;
1475}
1476
1477static const VMStateDescription musicpal_key_vmsd = {
1478    .name = "musicpal_key",
1479    .version_id = 1,
1480    .minimum_version_id = 1,
1481    .minimum_version_id_old = 1,
1482    .fields = (VMStateField[]) {
1483        VMSTATE_UINT32(kbd_extended, musicpal_key_state),
1484        VMSTATE_UINT32(pressed_keys, musicpal_key_state),
1485        VMSTATE_END_OF_LIST()
1486    }
1487};
1488
1489static void musicpal_key_class_init(ObjectClass *klass, void *data)
1490{
1491    DeviceClass *dc = DEVICE_CLASS(klass);
1492    SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
1493
1494    k->init = musicpal_key_init;
1495    dc->vmsd = &musicpal_key_vmsd;
1496}
1497
1498static const TypeInfo musicpal_key_info = {
1499    .name          = "musicpal_key",
1500    .parent        = TYPE_SYS_BUS_DEVICE,
1501    .instance_size = sizeof(musicpal_key_state),
1502    .class_init    = musicpal_key_class_init,
1503};
1504
1505static struct arm_boot_info musicpal_binfo = {
1506    .loader_start = 0x0,
1507    .board_id = 0x20e,
1508};
1509
1510static void musicpal_init(QEMUMachineInitArgs *args)
1511{
1512    const char *cpu_model = args->cpu_model;
1513    const char *kernel_filename = args->kernel_filename;
1514    const char *kernel_cmdline = args->kernel_cmdline;
1515    const char *initrd_filename = args->initrd_filename;
1516    ARMCPU *cpu;
1517    qemu_irq *cpu_pic;
1518    qemu_irq pic[32];
1519    DeviceState *dev;
1520    DeviceState *i2c_dev;
1521    DeviceState *lcd_dev;
1522    DeviceState *key_dev;
1523    DeviceState *wm8750_dev;
1524    SysBusDevice *s;
1525    i2c_bus *i2c;
1526    int i;
1527    unsigned long flash_size;
1528    DriveInfo *dinfo;
1529    MemoryRegion *address_space_mem = get_system_memory();
1530    MemoryRegion *ram = g_new(MemoryRegion, 1);
1531    MemoryRegion *sram = g_new(MemoryRegion, 1);
1532
1533    if (!cpu_model) {
1534        cpu_model = "arm926";
1535    }
1536    cpu = cpu_arm_init(cpu_model);
1537    if (!cpu) {
1538        fprintf(stderr, "Unable to find CPU definition\n");
1539        exit(1);
1540    }
1541    cpu_pic = arm_pic_init_cpu(cpu);
1542
1543    /* For now we use a fixed - the original - RAM size */
1544    memory_region_init_ram(ram, "musicpal.ram", MP_RAM_DEFAULT_SIZE);
1545    vmstate_register_ram_global(ram);
1546    memory_region_add_subregion(address_space_mem, 0, ram);
1547
1548    memory_region_init_ram(sram, "musicpal.sram", MP_SRAM_SIZE);
1549    vmstate_register_ram_global(sram);
1550    memory_region_add_subregion(address_space_mem, MP_SRAM_BASE, sram);
1551
1552    dev = sysbus_create_simple("mv88w8618_pic", MP_PIC_BASE,
1553                               cpu_pic[ARM_PIC_CPU_IRQ]);
1554    for (i = 0; i < 32; i++) {
1555        pic[i] = qdev_get_gpio_in(dev, i);
1556    }
1557    sysbus_create_varargs("mv88w8618_pit", MP_PIT_BASE, pic[MP_TIMER1_IRQ],
1558                          pic[MP_TIMER2_IRQ], pic[MP_TIMER3_IRQ],
1559                          pic[MP_TIMER4_IRQ], NULL);
1560
1561    if (serial_hds[0]) {
1562        serial_mm_init(address_space_mem, MP_UART1_BASE, 2, pic[MP_UART1_IRQ],
1563                       1825000, serial_hds[0], DEVICE_NATIVE_ENDIAN);
1564    }
1565    if (serial_hds[1]) {
1566        serial_mm_init(address_space_mem, MP_UART2_BASE, 2, pic[MP_UART2_IRQ],
1567                       1825000, serial_hds[1], DEVICE_NATIVE_ENDIAN);
1568    }
1569
1570    /* Register flash */
1571    dinfo = drive_get(IF_PFLASH, 0, 0);
1572    if (dinfo) {
1573        flash_size = bdrv_getlength(dinfo->bdrv);
1574        if (flash_size != 8*1024*1024 && flash_size != 16*1024*1024 &&
1575            flash_size != 32*1024*1024) {
1576            fprintf(stderr, "Invalid flash image size\n");
1577            exit(1);
1578        }
1579
1580        /*
1581         * The original U-Boot accesses the flash at 0xFE000000 instead of
1582         * 0xFF800000 (if there is 8 MB flash). So remap flash access if the
1583         * image is smaller than 32 MB.
1584         */
1585#ifdef TARGET_WORDS_BIGENDIAN
1586        pflash_cfi02_register(0x100000000ULL-MP_FLASH_SIZE_MAX, NULL,
1587                              "musicpal.flash", flash_size,
1588                              dinfo->bdrv, 0x10000,
1589                              (flash_size + 0xffff) >> 16,
1590                              MP_FLASH_SIZE_MAX / flash_size,
1591                              2, 0x00BF, 0x236D, 0x0000, 0x0000,
1592                              0x5555, 0x2AAA, 1);
1593#else
1594        pflash_cfi02_register(0x100000000ULL-MP_FLASH_SIZE_MAX, NULL,
1595                              "musicpal.flash", flash_size,
1596                              dinfo->bdrv, 0x10000,
1597                              (flash_size + 0xffff) >> 16,
1598                              MP_FLASH_SIZE_MAX / flash_size,
1599                              2, 0x00BF, 0x236D, 0x0000, 0x0000,
1600                              0x5555, 0x2AAA, 0);
1601#endif
1602
1603    }
1604    sysbus_create_simple("mv88w8618_flashcfg", MP_FLASHCFG_BASE, NULL);
1605
1606    qemu_check_nic_model(&nd_table[0], "mv88w8618");
1607    dev = qdev_create(NULL, "mv88w8618_eth");
1608    qdev_set_nic_properties(dev, &nd_table[0]);
1609    qdev_init_nofail(dev);
1610    sysbus_mmio_map(SYS_BUS_DEVICE(dev), 0, MP_ETH_BASE);
1611    sysbus_connect_irq(SYS_BUS_DEVICE(dev), 0, pic[MP_ETH_IRQ]);
1612
1613    sysbus_create_simple("mv88w8618_wlan", MP_WLAN_BASE, NULL);
1614
1615    musicpal_misc_init(SYS_BUS_DEVICE(dev));
1616
1617    dev = sysbus_create_simple("musicpal_gpio", MP_GPIO_BASE, pic[MP_GPIO_IRQ]);
1618    i2c_dev = sysbus_create_simple("gpio_i2c", -1, NULL);
1619    i2c = (i2c_bus *)qdev_get_child_bus(i2c_dev, "i2c");
1620
1621    lcd_dev = sysbus_create_simple("musicpal_lcd", MP_LCD_BASE, NULL);
1622    key_dev = sysbus_create_simple("musicpal_key", -1, NULL);
1623
1624    /* I2C read data */
1625    qdev_connect_gpio_out(i2c_dev, 0,
1626                          qdev_get_gpio_in(dev, MP_GPIO_I2C_DATA_BIT));
1627    /* I2C data */
1628    qdev_connect_gpio_out(dev, 3, qdev_get_gpio_in(i2c_dev, 0));
1629    /* I2C clock */
1630    qdev_connect_gpio_out(dev, 4, qdev_get_gpio_in(i2c_dev, 1));
1631
1632    for (i = 0; i < 3; i++) {
1633        qdev_connect_gpio_out(dev, i, qdev_get_gpio_in(lcd_dev, i));
1634    }
1635    for (i = 0; i < 4; i++) {
1636        qdev_connect_gpio_out(key_dev, i, qdev_get_gpio_in(dev, i + 8));
1637    }
1638    for (i = 4; i < 8; i++) {
1639        qdev_connect_gpio_out(key_dev, i, qdev_get_gpio_in(dev, i + 15));
1640    }
1641
1642    wm8750_dev = i2c_create_slave(i2c, "wm8750", MP_WM_ADDR);
1643    dev = qdev_create(NULL, "mv88w8618_audio");
1644    s = SYS_BUS_DEVICE(dev);
1645    qdev_prop_set_ptr(dev, "wm8750", wm8750_dev);
1646    qdev_init_nofail(dev);
1647    sysbus_mmio_map(s, 0, MP_AUDIO_BASE);
1648    sysbus_connect_irq(s, 0, pic[MP_AUDIO_IRQ]);
1649
1650    musicpal_binfo.ram_size = MP_RAM_DEFAULT_SIZE;
1651    musicpal_binfo.kernel_filename = kernel_filename;
1652    musicpal_binfo.kernel_cmdline = kernel_cmdline;
1653    musicpal_binfo.initrd_filename = initrd_filename;
1654    arm_load_kernel(cpu, &musicpal_binfo);
1655}
1656
1657static QEMUMachine musicpal_machine = {
1658    .name = "musicpal",
1659    .desc = "Marvell 88w8618 / MusicPal (ARM926EJ-S)",
1660    .init = musicpal_init,
1661    DEFAULT_MACHINE_OPTIONS,
1662};
1663
1664static void musicpal_machine_init(void)
1665{
1666    qemu_register_machine(&musicpal_machine);
1667}
1668
1669machine_init(musicpal_machine_init);
1670
1671static void mv88w8618_wlan_class_init(ObjectClass *klass, void *data)
1672{
1673    SysBusDeviceClass *sdc = SYS_BUS_DEVICE_CLASS(klass);
1674
1675    sdc->init = mv88w8618_wlan_init;
1676}
1677
1678static const TypeInfo mv88w8618_wlan_info = {
1679    .name          = "mv88w8618_wlan",
1680    .parent        = TYPE_SYS_BUS_DEVICE,
1681    .instance_size = sizeof(SysBusDevice),
1682    .class_init    = mv88w8618_wlan_class_init,
1683};
1684
1685static void musicpal_register_types(void)
1686{
1687    type_register_static(&mv88w8618_pic_info);
1688    type_register_static(&mv88w8618_pit_info);
1689    type_register_static(&mv88w8618_flashcfg_info);
1690    type_register_static(&mv88w8618_eth_info);
1691    type_register_static(&mv88w8618_wlan_info);
1692    type_register_static(&musicpal_lcd_info);
1693    type_register_static(&musicpal_gpio_info);
1694    type_register_static(&musicpal_key_info);
1695}
1696
1697type_init(musicpal_register_types)
1698