qemu/hw/arm/strongarm.c
<<
>>
Prefs
   1/*
   2 * StrongARM SA-1100/SA-1110 emulation
   3 *
   4 * Copyright (C) 2011 Dmitry Eremin-Solenikov
   5 *
   6 * Largely based on StrongARM emulation:
   7 * Copyright (c) 2006 Openedhand Ltd.
   8 * Written by Andrzej Zaborowski <balrog@zabor.org>
   9 *
  10 * UART code based on QEMU 16550A UART emulation
  11 * Copyright (c) 2003-2004 Fabrice Bellard
  12 * Copyright (c) 2008 Citrix Systems, Inc.
  13 *
  14 *  This program is free software; you can redistribute it and/or modify
  15 *  it under the terms of the GNU General Public License version 2 as
  16 *  published by the Free Software Foundation.
  17 *
  18 *  This program is distributed in the hope that it will be useful,
  19 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  20 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21 *  GNU General Public License for more details.
  22 *
  23 *  You should have received a copy of the GNU General Public License along
  24 *  with this program; if not, see <http://www.gnu.org/licenses/>.
  25 *
  26 *  Contributions after 2012-01-13 are licensed under the terms of the
  27 *  GNU GPL, version 2 or (at your option) any later version.
  28 */
  29#include "hw/sysbus.h"
  30#include "strongarm.h"
  31#include "qemu/error-report.h"
  32#include "hw/arm/arm.h"
  33#include "sysemu/char.h"
  34#include "sysemu/sysemu.h"
  35#include "hw/ssi.h"
  36
  37//#define DEBUG
  38
  39/*
  40 TODO
  41 - Implement cp15, c14 ?
  42 - Implement cp15, c15 !!! (idle used in L)
  43 - Implement idle mode handling/DIM
  44 - Implement sleep mode/Wake sources
  45 - Implement reset control
  46 - Implement memory control regs
  47 - PCMCIA handling
  48 - Maybe support MBGNT/MBREQ
  49 - DMA channels
  50 - GPCLK
  51 - IrDA
  52 - MCP
  53 - Enhance UART with modem signals
  54 */
  55
  56#ifdef DEBUG
  57# define DPRINTF(format, ...) printf(format , ## __VA_ARGS__)
  58#else
  59# define DPRINTF(format, ...) do { } while (0)
  60#endif
  61
  62static struct {
  63    hwaddr io_base;
  64    int irq;
  65} sa_serial[] = {
  66    { 0x80010000, SA_PIC_UART1 },
  67    { 0x80030000, SA_PIC_UART2 },
  68    { 0x80050000, SA_PIC_UART3 },
  69    { 0, 0 }
  70};
  71
  72/* Interrupt Controller */
  73typedef struct {
  74    SysBusDevice busdev;
  75    MemoryRegion iomem;
  76    qemu_irq    irq;
  77    qemu_irq    fiq;
  78
  79    uint32_t pending;
  80    uint32_t enabled;
  81    uint32_t is_fiq;
  82    uint32_t int_idle;
  83} StrongARMPICState;
  84
  85#define ICIP    0x00
  86#define ICMR    0x04
  87#define ICLR    0x08
  88#define ICFP    0x10
  89#define ICPR    0x20
  90#define ICCR    0x0c
  91
  92#define SA_PIC_SRCS     32
  93
  94
  95static void strongarm_pic_update(void *opaque)
  96{
  97    StrongARMPICState *s = opaque;
  98
  99    /* FIXME: reflect DIM */
 100    qemu_set_irq(s->fiq, s->pending & s->enabled &  s->is_fiq);
 101    qemu_set_irq(s->irq, s->pending & s->enabled & ~s->is_fiq);
 102}
 103
 104static void strongarm_pic_set_irq(void *opaque, int irq, int level)
 105{
 106    StrongARMPICState *s = opaque;
 107
 108    if (level) {
 109        s->pending |= 1 << irq;
 110    } else {
 111        s->pending &= ~(1 << irq);
 112    }
 113
 114    strongarm_pic_update(s);
 115}
 116
 117static uint64_t strongarm_pic_mem_read(void *opaque, hwaddr offset,
 118                                       unsigned size)
 119{
 120    StrongARMPICState *s = opaque;
 121
 122    switch (offset) {
 123    case ICIP:
 124        return s->pending & ~s->is_fiq & s->enabled;
 125    case ICMR:
 126        return s->enabled;
 127    case ICLR:
 128        return s->is_fiq;
 129    case ICCR:
 130        return s->int_idle == 0;
 131    case ICFP:
 132        return s->pending & s->is_fiq & s->enabled;
 133    case ICPR:
 134        return s->pending;
 135    default:
 136        printf("%s: Bad register offset 0x" TARGET_FMT_plx "\n",
 137                        __func__, offset);
 138        return 0;
 139    }
 140}
 141
 142static void strongarm_pic_mem_write(void *opaque, hwaddr offset,
 143                                    uint64_t value, unsigned size)
 144{
 145    StrongARMPICState *s = opaque;
 146
 147    switch (offset) {
 148    case ICMR:
 149        s->enabled = value;
 150        break;
 151    case ICLR:
 152        s->is_fiq = value;
 153        break;
 154    case ICCR:
 155        s->int_idle = (value & 1) ? 0 : ~0;
 156        break;
 157    default:
 158        printf("%s: Bad register offset 0x" TARGET_FMT_plx "\n",
 159                        __func__, offset);
 160        break;
 161    }
 162    strongarm_pic_update(s);
 163}
 164
 165static const MemoryRegionOps strongarm_pic_ops = {
 166    .read = strongarm_pic_mem_read,
 167    .write = strongarm_pic_mem_write,
 168    .endianness = DEVICE_NATIVE_ENDIAN,
 169};
 170
 171static int strongarm_pic_initfn(SysBusDevice *dev)
 172{
 173    StrongARMPICState *s = FROM_SYSBUS(StrongARMPICState, dev);
 174
 175    qdev_init_gpio_in(&dev->qdev, strongarm_pic_set_irq, SA_PIC_SRCS);
 176    memory_region_init_io(&s->iomem, &strongarm_pic_ops, s, "pic", 0x1000);
 177    sysbus_init_mmio(dev, &s->iomem);
 178    sysbus_init_irq(dev, &s->irq);
 179    sysbus_init_irq(dev, &s->fiq);
 180
 181    return 0;
 182}
 183
 184static int strongarm_pic_post_load(void *opaque, int version_id)
 185{
 186    strongarm_pic_update(opaque);
 187    return 0;
 188}
 189
 190static VMStateDescription vmstate_strongarm_pic_regs = {
 191    .name = "strongarm_pic",
 192    .version_id = 0,
 193    .minimum_version_id = 0,
 194    .minimum_version_id_old = 0,
 195    .post_load = strongarm_pic_post_load,
 196    .fields = (VMStateField[]) {
 197        VMSTATE_UINT32(pending, StrongARMPICState),
 198        VMSTATE_UINT32(enabled, StrongARMPICState),
 199        VMSTATE_UINT32(is_fiq, StrongARMPICState),
 200        VMSTATE_UINT32(int_idle, StrongARMPICState),
 201        VMSTATE_END_OF_LIST(),
 202    },
 203};
 204
 205static void strongarm_pic_class_init(ObjectClass *klass, void *data)
 206{
 207    DeviceClass *dc = DEVICE_CLASS(klass);
 208    SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
 209
 210    k->init = strongarm_pic_initfn;
 211    dc->desc = "StrongARM PIC";
 212    dc->vmsd = &vmstate_strongarm_pic_regs;
 213}
 214
 215static const TypeInfo strongarm_pic_info = {
 216    .name          = "strongarm_pic",
 217    .parent        = TYPE_SYS_BUS_DEVICE,
 218    .instance_size = sizeof(StrongARMPICState),
 219    .class_init    = strongarm_pic_class_init,
 220};
 221
 222/* Real-Time Clock */
 223#define RTAR 0x00 /* RTC Alarm register */
 224#define RCNR 0x04 /* RTC Counter register */
 225#define RTTR 0x08 /* RTC Timer Trim register */
 226#define RTSR 0x10 /* RTC Status register */
 227
 228#define RTSR_AL (1 << 0) /* RTC Alarm detected */
 229#define RTSR_HZ (1 << 1) /* RTC 1Hz detected */
 230#define RTSR_ALE (1 << 2) /* RTC Alarm enable */
 231#define RTSR_HZE (1 << 3) /* RTC 1Hz enable */
 232
 233/* 16 LSB of RTTR are clockdiv for internal trim logic,
 234 * trim delete isn't emulated, so
 235 * f = 32 768 / (RTTR_trim + 1) */
 236
 237typedef struct {
 238    SysBusDevice busdev;
 239    MemoryRegion iomem;
 240    uint32_t rttr;
 241    uint32_t rtsr;
 242    uint32_t rtar;
 243    uint32_t last_rcnr;
 244    int64_t last_hz;
 245    QEMUTimer *rtc_alarm;
 246    QEMUTimer *rtc_hz;
 247    qemu_irq rtc_irq;
 248    qemu_irq rtc_hz_irq;
 249} StrongARMRTCState;
 250
 251static inline void strongarm_rtc_int_update(StrongARMRTCState *s)
 252{
 253    qemu_set_irq(s->rtc_irq, s->rtsr & RTSR_AL);
 254    qemu_set_irq(s->rtc_hz_irq, s->rtsr & RTSR_HZ);
 255}
 256
 257static void strongarm_rtc_hzupdate(StrongARMRTCState *s)
 258{
 259    int64_t rt = qemu_get_clock_ms(rtc_clock);
 260    s->last_rcnr += ((rt - s->last_hz) << 15) /
 261            (1000 * ((s->rttr & 0xffff) + 1));
 262    s->last_hz = rt;
 263}
 264
 265static inline void strongarm_rtc_timer_update(StrongARMRTCState *s)
 266{
 267    if ((s->rtsr & RTSR_HZE) && !(s->rtsr & RTSR_HZ)) {
 268        qemu_mod_timer(s->rtc_hz, s->last_hz + 1000);
 269    } else {
 270        qemu_del_timer(s->rtc_hz);
 271    }
 272
 273    if ((s->rtsr & RTSR_ALE) && !(s->rtsr & RTSR_AL)) {
 274        qemu_mod_timer(s->rtc_alarm, s->last_hz +
 275                (((s->rtar - s->last_rcnr) * 1000 *
 276                  ((s->rttr & 0xffff) + 1)) >> 15));
 277    } else {
 278        qemu_del_timer(s->rtc_alarm);
 279    }
 280}
 281
 282static inline void strongarm_rtc_alarm_tick(void *opaque)
 283{
 284    StrongARMRTCState *s = opaque;
 285    s->rtsr |= RTSR_AL;
 286    strongarm_rtc_timer_update(s);
 287    strongarm_rtc_int_update(s);
 288}
 289
 290static inline void strongarm_rtc_hz_tick(void *opaque)
 291{
 292    StrongARMRTCState *s = opaque;
 293    s->rtsr |= RTSR_HZ;
 294    strongarm_rtc_timer_update(s);
 295    strongarm_rtc_int_update(s);
 296}
 297
 298static uint64_t strongarm_rtc_read(void *opaque, hwaddr addr,
 299                                   unsigned size)
 300{
 301    StrongARMRTCState *s = opaque;
 302
 303    switch (addr) {
 304    case RTTR:
 305        return s->rttr;
 306    case RTSR:
 307        return s->rtsr;
 308    case RTAR:
 309        return s->rtar;
 310    case RCNR:
 311        return s->last_rcnr +
 312                ((qemu_get_clock_ms(rtc_clock) - s->last_hz) << 15) /
 313                (1000 * ((s->rttr & 0xffff) + 1));
 314    default:
 315        printf("%s: Bad register 0x" TARGET_FMT_plx "\n", __func__, addr);
 316        return 0;
 317    }
 318}
 319
 320static void strongarm_rtc_write(void *opaque, hwaddr addr,
 321                                uint64_t value, unsigned size)
 322{
 323    StrongARMRTCState *s = opaque;
 324    uint32_t old_rtsr;
 325
 326    switch (addr) {
 327    case RTTR:
 328        strongarm_rtc_hzupdate(s);
 329        s->rttr = value;
 330        strongarm_rtc_timer_update(s);
 331        break;
 332
 333    case RTSR:
 334        old_rtsr = s->rtsr;
 335        s->rtsr = (value & (RTSR_ALE | RTSR_HZE)) |
 336                  (s->rtsr & ~(value & (RTSR_AL | RTSR_HZ)));
 337
 338        if (s->rtsr != old_rtsr) {
 339            strongarm_rtc_timer_update(s);
 340        }
 341
 342        strongarm_rtc_int_update(s);
 343        break;
 344
 345    case RTAR:
 346        s->rtar = value;
 347        strongarm_rtc_timer_update(s);
 348        break;
 349
 350    case RCNR:
 351        strongarm_rtc_hzupdate(s);
 352        s->last_rcnr = value;
 353        strongarm_rtc_timer_update(s);
 354        break;
 355
 356    default:
 357        printf("%s: Bad register 0x" TARGET_FMT_plx "\n", __func__, addr);
 358    }
 359}
 360
 361static const MemoryRegionOps strongarm_rtc_ops = {
 362    .read = strongarm_rtc_read,
 363    .write = strongarm_rtc_write,
 364    .endianness = DEVICE_NATIVE_ENDIAN,
 365};
 366
 367static int strongarm_rtc_init(SysBusDevice *dev)
 368{
 369    StrongARMRTCState *s = FROM_SYSBUS(StrongARMRTCState, dev);
 370    struct tm tm;
 371
 372    s->rttr = 0x0;
 373    s->rtsr = 0;
 374
 375    qemu_get_timedate(&tm, 0);
 376
 377    s->last_rcnr = (uint32_t) mktimegm(&tm);
 378    s->last_hz = qemu_get_clock_ms(rtc_clock);
 379
 380    s->rtc_alarm = qemu_new_timer_ms(rtc_clock, strongarm_rtc_alarm_tick, s);
 381    s->rtc_hz = qemu_new_timer_ms(rtc_clock, strongarm_rtc_hz_tick, s);
 382
 383    sysbus_init_irq(dev, &s->rtc_irq);
 384    sysbus_init_irq(dev, &s->rtc_hz_irq);
 385
 386    memory_region_init_io(&s->iomem, &strongarm_rtc_ops, s, "rtc", 0x10000);
 387    sysbus_init_mmio(dev, &s->iomem);
 388
 389    return 0;
 390}
 391
 392static void strongarm_rtc_pre_save(void *opaque)
 393{
 394    StrongARMRTCState *s = opaque;
 395
 396    strongarm_rtc_hzupdate(s);
 397}
 398
 399static int strongarm_rtc_post_load(void *opaque, int version_id)
 400{
 401    StrongARMRTCState *s = opaque;
 402
 403    strongarm_rtc_timer_update(s);
 404    strongarm_rtc_int_update(s);
 405
 406    return 0;
 407}
 408
 409static const VMStateDescription vmstate_strongarm_rtc_regs = {
 410    .name = "strongarm-rtc",
 411    .version_id = 0,
 412    .minimum_version_id = 0,
 413    .minimum_version_id_old = 0,
 414    .pre_save = strongarm_rtc_pre_save,
 415    .post_load = strongarm_rtc_post_load,
 416    .fields = (VMStateField[]) {
 417        VMSTATE_UINT32(rttr, StrongARMRTCState),
 418        VMSTATE_UINT32(rtsr, StrongARMRTCState),
 419        VMSTATE_UINT32(rtar, StrongARMRTCState),
 420        VMSTATE_UINT32(last_rcnr, StrongARMRTCState),
 421        VMSTATE_INT64(last_hz, StrongARMRTCState),
 422        VMSTATE_END_OF_LIST(),
 423    },
 424};
 425
 426static void strongarm_rtc_sysbus_class_init(ObjectClass *klass, void *data)
 427{
 428    DeviceClass *dc = DEVICE_CLASS(klass);
 429    SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
 430
 431    k->init = strongarm_rtc_init;
 432    dc->desc = "StrongARM RTC Controller";
 433    dc->vmsd = &vmstate_strongarm_rtc_regs;
 434}
 435
 436static const TypeInfo strongarm_rtc_sysbus_info = {
 437    .name          = "strongarm-rtc",
 438    .parent        = TYPE_SYS_BUS_DEVICE,
 439    .instance_size = sizeof(StrongARMRTCState),
 440    .class_init    = strongarm_rtc_sysbus_class_init,
 441};
 442
 443/* GPIO */
 444#define GPLR 0x00
 445#define GPDR 0x04
 446#define GPSR 0x08
 447#define GPCR 0x0c
 448#define GRER 0x10
 449#define GFER 0x14
 450#define GEDR 0x18
 451#define GAFR 0x1c
 452
 453typedef struct StrongARMGPIOInfo StrongARMGPIOInfo;
 454struct StrongARMGPIOInfo {
 455    SysBusDevice busdev;
 456    MemoryRegion iomem;
 457    qemu_irq handler[28];
 458    qemu_irq irqs[11];
 459    qemu_irq irqX;
 460
 461    uint32_t ilevel;
 462    uint32_t olevel;
 463    uint32_t dir;
 464    uint32_t rising;
 465    uint32_t falling;
 466    uint32_t status;
 467    uint32_t gpsr;
 468    uint32_t gafr;
 469
 470    uint32_t prev_level;
 471};
 472
 473
 474static void strongarm_gpio_irq_update(StrongARMGPIOInfo *s)
 475{
 476    int i;
 477    for (i = 0; i < 11; i++) {
 478        qemu_set_irq(s->irqs[i], s->status & (1 << i));
 479    }
 480
 481    qemu_set_irq(s->irqX, (s->status & ~0x7ff));
 482}
 483
 484static void strongarm_gpio_set(void *opaque, int line, int level)
 485{
 486    StrongARMGPIOInfo *s = opaque;
 487    uint32_t mask;
 488
 489    mask = 1 << line;
 490
 491    if (level) {
 492        s->status |= s->rising & mask &
 493                ~s->ilevel & ~s->dir;
 494        s->ilevel |= mask;
 495    } else {
 496        s->status |= s->falling & mask &
 497                s->ilevel & ~s->dir;
 498        s->ilevel &= ~mask;
 499    }
 500
 501    if (s->status & mask) {
 502        strongarm_gpio_irq_update(s);
 503    }
 504}
 505
 506static void strongarm_gpio_handler_update(StrongARMGPIOInfo *s)
 507{
 508    uint32_t level, diff;
 509    int bit;
 510
 511    level = s->olevel & s->dir;
 512
 513    for (diff = s->prev_level ^ level; diff; diff ^= 1 << bit) {
 514        bit = ffs(diff) - 1;
 515        qemu_set_irq(s->handler[bit], (level >> bit) & 1);
 516    }
 517
 518    s->prev_level = level;
 519}
 520
 521static uint64_t strongarm_gpio_read(void *opaque, hwaddr offset,
 522                                    unsigned size)
 523{
 524    StrongARMGPIOInfo *s = opaque;
 525
 526    switch (offset) {
 527    case GPDR:        /* GPIO Pin-Direction registers */
 528        return s->dir;
 529
 530    case GPSR:        /* GPIO Pin-Output Set registers */
 531        DPRINTF("%s: Read from a write-only register 0x" TARGET_FMT_plx "\n",
 532                        __func__, offset);
 533        return s->gpsr;    /* Return last written value.  */
 534
 535    case GPCR:        /* GPIO Pin-Output Clear registers */
 536        DPRINTF("%s: Read from a write-only register 0x" TARGET_FMT_plx "\n",
 537                        __func__, offset);
 538        return 31337;        /* Specified as unpredictable in the docs.  */
 539
 540    case GRER:        /* GPIO Rising-Edge Detect Enable registers */
 541        return s->rising;
 542
 543    case GFER:        /* GPIO Falling-Edge Detect Enable registers */
 544        return s->falling;
 545
 546    case GAFR:        /* GPIO Alternate Function registers */
 547        return s->gafr;
 548
 549    case GPLR:        /* GPIO Pin-Level registers */
 550        return (s->olevel & s->dir) |
 551               (s->ilevel & ~s->dir);
 552
 553    case GEDR:        /* GPIO Edge Detect Status registers */
 554        return s->status;
 555
 556    default:
 557        printf("%s: Bad offset 0x" TARGET_FMT_plx "\n", __func__, offset);
 558    }
 559
 560    return 0;
 561}
 562
 563static void strongarm_gpio_write(void *opaque, hwaddr offset,
 564                                 uint64_t value, unsigned size)
 565{
 566    StrongARMGPIOInfo *s = opaque;
 567
 568    switch (offset) {
 569    case GPDR:        /* GPIO Pin-Direction registers */
 570        s->dir = value;
 571        strongarm_gpio_handler_update(s);
 572        break;
 573
 574    case GPSR:        /* GPIO Pin-Output Set registers */
 575        s->olevel |= value;
 576        strongarm_gpio_handler_update(s);
 577        s->gpsr = value;
 578        break;
 579
 580    case GPCR:        /* GPIO Pin-Output Clear registers */
 581        s->olevel &= ~value;
 582        strongarm_gpio_handler_update(s);
 583        break;
 584
 585    case GRER:        /* GPIO Rising-Edge Detect Enable registers */
 586        s->rising = value;
 587        break;
 588
 589    case GFER:        /* GPIO Falling-Edge Detect Enable registers */
 590        s->falling = value;
 591        break;
 592
 593    case GAFR:        /* GPIO Alternate Function registers */
 594        s->gafr = value;
 595        break;
 596
 597    case GEDR:        /* GPIO Edge Detect Status registers */
 598        s->status &= ~value;
 599        strongarm_gpio_irq_update(s);
 600        break;
 601
 602    default:
 603        printf("%s: Bad offset 0x" TARGET_FMT_plx "\n", __func__, offset);
 604    }
 605}
 606
 607static const MemoryRegionOps strongarm_gpio_ops = {
 608    .read = strongarm_gpio_read,
 609    .write = strongarm_gpio_write,
 610    .endianness = DEVICE_NATIVE_ENDIAN,
 611};
 612
 613static DeviceState *strongarm_gpio_init(hwaddr base,
 614                DeviceState *pic)
 615{
 616    DeviceState *dev;
 617    int i;
 618
 619    dev = qdev_create(NULL, "strongarm-gpio");
 620    qdev_init_nofail(dev);
 621
 622    sysbus_mmio_map(SYS_BUS_DEVICE(dev), 0, base);
 623    for (i = 0; i < 12; i++)
 624        sysbus_connect_irq(SYS_BUS_DEVICE(dev), i,
 625                    qdev_get_gpio_in(pic, SA_PIC_GPIO0_EDGE + i));
 626
 627    return dev;
 628}
 629
 630static int strongarm_gpio_initfn(SysBusDevice *dev)
 631{
 632    StrongARMGPIOInfo *s;
 633    int i;
 634
 635    s = FROM_SYSBUS(StrongARMGPIOInfo, dev);
 636
 637    qdev_init_gpio_in(&dev->qdev, strongarm_gpio_set, 28);
 638    qdev_init_gpio_out(&dev->qdev, s->handler, 28);
 639
 640    memory_region_init_io(&s->iomem, &strongarm_gpio_ops, s, "gpio", 0x1000);
 641
 642    sysbus_init_mmio(dev, &s->iomem);
 643    for (i = 0; i < 11; i++) {
 644        sysbus_init_irq(dev, &s->irqs[i]);
 645    }
 646    sysbus_init_irq(dev, &s->irqX);
 647
 648    return 0;
 649}
 650
 651static const VMStateDescription vmstate_strongarm_gpio_regs = {
 652    .name = "strongarm-gpio",
 653    .version_id = 0,
 654    .minimum_version_id = 0,
 655    .minimum_version_id_old = 0,
 656    .fields = (VMStateField[]) {
 657        VMSTATE_UINT32(ilevel, StrongARMGPIOInfo),
 658        VMSTATE_UINT32(olevel, StrongARMGPIOInfo),
 659        VMSTATE_UINT32(dir, StrongARMGPIOInfo),
 660        VMSTATE_UINT32(rising, StrongARMGPIOInfo),
 661        VMSTATE_UINT32(falling, StrongARMGPIOInfo),
 662        VMSTATE_UINT32(status, StrongARMGPIOInfo),
 663        VMSTATE_UINT32(gafr, StrongARMGPIOInfo),
 664        VMSTATE_END_OF_LIST(),
 665    },
 666};
 667
 668static void strongarm_gpio_class_init(ObjectClass *klass, void *data)
 669{
 670    DeviceClass *dc = DEVICE_CLASS(klass);
 671    SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
 672
 673    k->init = strongarm_gpio_initfn;
 674    dc->desc = "StrongARM GPIO controller";
 675}
 676
 677static const TypeInfo strongarm_gpio_info = {
 678    .name          = "strongarm-gpio",
 679    .parent        = TYPE_SYS_BUS_DEVICE,
 680    .instance_size = sizeof(StrongARMGPIOInfo),
 681    .class_init    = strongarm_gpio_class_init,
 682};
 683
 684/* Peripheral Pin Controller */
 685#define PPDR 0x00
 686#define PPSR 0x04
 687#define PPAR 0x08
 688#define PSDR 0x0c
 689#define PPFR 0x10
 690
 691typedef struct StrongARMPPCInfo StrongARMPPCInfo;
 692struct StrongARMPPCInfo {
 693    SysBusDevice busdev;
 694    MemoryRegion iomem;
 695    qemu_irq handler[28];
 696
 697    uint32_t ilevel;
 698    uint32_t olevel;
 699    uint32_t dir;
 700    uint32_t ppar;
 701    uint32_t psdr;
 702    uint32_t ppfr;
 703
 704    uint32_t prev_level;
 705};
 706
 707static void strongarm_ppc_set(void *opaque, int line, int level)
 708{
 709    StrongARMPPCInfo *s = opaque;
 710
 711    if (level) {
 712        s->ilevel |= 1 << line;
 713    } else {
 714        s->ilevel &= ~(1 << line);
 715    }
 716}
 717
 718static void strongarm_ppc_handler_update(StrongARMPPCInfo *s)
 719{
 720    uint32_t level, diff;
 721    int bit;
 722
 723    level = s->olevel & s->dir;
 724
 725    for (diff = s->prev_level ^ level; diff; diff ^= 1 << bit) {
 726        bit = ffs(diff) - 1;
 727        qemu_set_irq(s->handler[bit], (level >> bit) & 1);
 728    }
 729
 730    s->prev_level = level;
 731}
 732
 733static uint64_t strongarm_ppc_read(void *opaque, hwaddr offset,
 734                                   unsigned size)
 735{
 736    StrongARMPPCInfo *s = opaque;
 737
 738    switch (offset) {
 739    case PPDR:        /* PPC Pin Direction registers */
 740        return s->dir | ~0x3fffff;
 741
 742    case PPSR:        /* PPC Pin State registers */
 743        return (s->olevel & s->dir) |
 744               (s->ilevel & ~s->dir) |
 745               ~0x3fffff;
 746
 747    case PPAR:
 748        return s->ppar | ~0x41000;
 749
 750    case PSDR:
 751        return s->psdr;
 752
 753    case PPFR:
 754        return s->ppfr | ~0x7f001;
 755
 756    default:
 757        printf("%s: Bad offset 0x" TARGET_FMT_plx "\n", __func__, offset);
 758    }
 759
 760    return 0;
 761}
 762
 763static void strongarm_ppc_write(void *opaque, hwaddr offset,
 764                                uint64_t value, unsigned size)
 765{
 766    StrongARMPPCInfo *s = opaque;
 767
 768    switch (offset) {
 769    case PPDR:        /* PPC Pin Direction registers */
 770        s->dir = value & 0x3fffff;
 771        strongarm_ppc_handler_update(s);
 772        break;
 773
 774    case PPSR:        /* PPC Pin State registers */
 775        s->olevel = value & s->dir & 0x3fffff;
 776        strongarm_ppc_handler_update(s);
 777        break;
 778
 779    case PPAR:
 780        s->ppar = value & 0x41000;
 781        break;
 782
 783    case PSDR:
 784        s->psdr = value & 0x3fffff;
 785        break;
 786
 787    case PPFR:
 788        s->ppfr = value & 0x7f001;
 789        break;
 790
 791    default:
 792        printf("%s: Bad offset 0x" TARGET_FMT_plx "\n", __func__, offset);
 793    }
 794}
 795
 796static const MemoryRegionOps strongarm_ppc_ops = {
 797    .read = strongarm_ppc_read,
 798    .write = strongarm_ppc_write,
 799    .endianness = DEVICE_NATIVE_ENDIAN,
 800};
 801
 802static int strongarm_ppc_init(SysBusDevice *dev)
 803{
 804    StrongARMPPCInfo *s;
 805
 806    s = FROM_SYSBUS(StrongARMPPCInfo, dev);
 807
 808    qdev_init_gpio_in(&dev->qdev, strongarm_ppc_set, 22);
 809    qdev_init_gpio_out(&dev->qdev, s->handler, 22);
 810
 811    memory_region_init_io(&s->iomem, &strongarm_ppc_ops, s, "ppc", 0x1000);
 812
 813    sysbus_init_mmio(dev, &s->iomem);
 814
 815    return 0;
 816}
 817
 818static const VMStateDescription vmstate_strongarm_ppc_regs = {
 819    .name = "strongarm-ppc",
 820    .version_id = 0,
 821    .minimum_version_id = 0,
 822    .minimum_version_id_old = 0,
 823    .fields = (VMStateField[]) {
 824        VMSTATE_UINT32(ilevel, StrongARMPPCInfo),
 825        VMSTATE_UINT32(olevel, StrongARMPPCInfo),
 826        VMSTATE_UINT32(dir, StrongARMPPCInfo),
 827        VMSTATE_UINT32(ppar, StrongARMPPCInfo),
 828        VMSTATE_UINT32(psdr, StrongARMPPCInfo),
 829        VMSTATE_UINT32(ppfr, StrongARMPPCInfo),
 830        VMSTATE_END_OF_LIST(),
 831    },
 832};
 833
 834static void strongarm_ppc_class_init(ObjectClass *klass, void *data)
 835{
 836    DeviceClass *dc = DEVICE_CLASS(klass);
 837    SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
 838
 839    k->init = strongarm_ppc_init;
 840    dc->desc = "StrongARM PPC controller";
 841}
 842
 843static const TypeInfo strongarm_ppc_info = {
 844    .name          = "strongarm-ppc",
 845    .parent        = TYPE_SYS_BUS_DEVICE,
 846    .instance_size = sizeof(StrongARMPPCInfo),
 847    .class_init    = strongarm_ppc_class_init,
 848};
 849
 850/* UART Ports */
 851#define UTCR0 0x00
 852#define UTCR1 0x04
 853#define UTCR2 0x08
 854#define UTCR3 0x0c
 855#define UTDR  0x14
 856#define UTSR0 0x1c
 857#define UTSR1 0x20
 858
 859#define UTCR0_PE  (1 << 0) /* Parity enable */
 860#define UTCR0_OES (1 << 1) /* Even parity */
 861#define UTCR0_SBS (1 << 2) /* 2 stop bits */
 862#define UTCR0_DSS (1 << 3) /* 8-bit data */
 863
 864#define UTCR3_RXE (1 << 0) /* Rx enable */
 865#define UTCR3_TXE (1 << 1) /* Tx enable */
 866#define UTCR3_BRK (1 << 2) /* Force Break */
 867#define UTCR3_RIE (1 << 3) /* Rx int enable */
 868#define UTCR3_TIE (1 << 4) /* Tx int enable */
 869#define UTCR3_LBM (1 << 5) /* Loopback */
 870
 871#define UTSR0_TFS (1 << 0) /* Tx FIFO nearly empty */
 872#define UTSR0_RFS (1 << 1) /* Rx FIFO nearly full */
 873#define UTSR0_RID (1 << 2) /* Receiver Idle */
 874#define UTSR0_RBB (1 << 3) /* Receiver begin break */
 875#define UTSR0_REB (1 << 4) /* Receiver end break */
 876#define UTSR0_EIF (1 << 5) /* Error in FIFO */
 877
 878#define UTSR1_RNE (1 << 1) /* Receive FIFO not empty */
 879#define UTSR1_TNF (1 << 2) /* Transmit FIFO not full */
 880#define UTSR1_PRE (1 << 3) /* Parity error */
 881#define UTSR1_FRE (1 << 4) /* Frame error */
 882#define UTSR1_ROR (1 << 5) /* Receive Over Run */
 883
 884#define RX_FIFO_PRE (1 << 8)
 885#define RX_FIFO_FRE (1 << 9)
 886#define RX_FIFO_ROR (1 << 10)
 887
 888typedef struct {
 889    SysBusDevice busdev;
 890    MemoryRegion iomem;
 891    CharDriverState *chr;
 892    qemu_irq irq;
 893
 894    uint8_t utcr0;
 895    uint16_t brd;
 896    uint8_t utcr3;
 897    uint8_t utsr0;
 898    uint8_t utsr1;
 899
 900    uint8_t tx_fifo[8];
 901    uint8_t tx_start;
 902    uint8_t tx_len;
 903    uint16_t rx_fifo[12]; /* value + error flags in high bits */
 904    uint8_t rx_start;
 905    uint8_t rx_len;
 906
 907    uint64_t char_transmit_time; /* time to transmit a char in ticks*/
 908    bool wait_break_end;
 909    QEMUTimer *rx_timeout_timer;
 910    QEMUTimer *tx_timer;
 911} StrongARMUARTState;
 912
 913static void strongarm_uart_update_status(StrongARMUARTState *s)
 914{
 915    uint16_t utsr1 = 0;
 916
 917    if (s->tx_len != 8) {
 918        utsr1 |= UTSR1_TNF;
 919    }
 920
 921    if (s->rx_len != 0) {
 922        uint16_t ent = s->rx_fifo[s->rx_start];
 923
 924        utsr1 |= UTSR1_RNE;
 925        if (ent & RX_FIFO_PRE) {
 926            s->utsr1 |= UTSR1_PRE;
 927        }
 928        if (ent & RX_FIFO_FRE) {
 929            s->utsr1 |= UTSR1_FRE;
 930        }
 931        if (ent & RX_FIFO_ROR) {
 932            s->utsr1 |= UTSR1_ROR;
 933        }
 934    }
 935
 936    s->utsr1 = utsr1;
 937}
 938
 939static void strongarm_uart_update_int_status(StrongARMUARTState *s)
 940{
 941    uint16_t utsr0 = s->utsr0 &
 942            (UTSR0_REB | UTSR0_RBB | UTSR0_RID);
 943    int i;
 944
 945    if ((s->utcr3 & UTCR3_TXE) &&
 946                (s->utcr3 & UTCR3_TIE) &&
 947                s->tx_len <= 4) {
 948        utsr0 |= UTSR0_TFS;
 949    }
 950
 951    if ((s->utcr3 & UTCR3_RXE) &&
 952                (s->utcr3 & UTCR3_RIE) &&
 953                s->rx_len > 4) {
 954        utsr0 |= UTSR0_RFS;
 955    }
 956
 957    for (i = 0; i < s->rx_len && i < 4; i++)
 958        if (s->rx_fifo[(s->rx_start + i) % 12] & ~0xff) {
 959            utsr0 |= UTSR0_EIF;
 960            break;
 961        }
 962
 963    s->utsr0 = utsr0;
 964    qemu_set_irq(s->irq, utsr0);
 965}
 966
 967static void strongarm_uart_update_parameters(StrongARMUARTState *s)
 968{
 969    int speed, parity, data_bits, stop_bits, frame_size;
 970    QEMUSerialSetParams ssp;
 971
 972    /* Start bit. */
 973    frame_size = 1;
 974    if (s->utcr0 & UTCR0_PE) {
 975        /* Parity bit. */
 976        frame_size++;
 977        if (s->utcr0 & UTCR0_OES) {
 978            parity = 'E';
 979        } else {
 980            parity = 'O';
 981        }
 982    } else {
 983            parity = 'N';
 984    }
 985    if (s->utcr0 & UTCR0_SBS) {
 986        stop_bits = 2;
 987    } else {
 988        stop_bits = 1;
 989    }
 990
 991    data_bits = (s->utcr0 & UTCR0_DSS) ? 8 : 7;
 992    frame_size += data_bits + stop_bits;
 993    speed = 3686400 / 16 / (s->brd + 1);
 994    ssp.speed = speed;
 995    ssp.parity = parity;
 996    ssp.data_bits = data_bits;
 997    ssp.stop_bits = stop_bits;
 998    s->char_transmit_time =  (get_ticks_per_sec() / speed) * frame_size;
 999    if (s->chr) {
1000        qemu_chr_fe_ioctl(s->chr, CHR_IOCTL_SERIAL_SET_PARAMS, &ssp);
1001    }
1002
1003    DPRINTF(stderr, "%s speed=%d parity=%c data=%d stop=%d\n", s->chr->label,
1004            speed, parity, data_bits, stop_bits);
1005}
1006
1007static void strongarm_uart_rx_to(void *opaque)
1008{
1009    StrongARMUARTState *s = opaque;
1010
1011    if (s->rx_len) {
1012        s->utsr0 |= UTSR0_RID;
1013        strongarm_uart_update_int_status(s);
1014    }
1015}
1016
1017static void strongarm_uart_rx_push(StrongARMUARTState *s, uint16_t c)
1018{
1019    if ((s->utcr3 & UTCR3_RXE) == 0) {
1020        /* rx disabled */
1021        return;
1022    }
1023
1024    if (s->wait_break_end) {
1025        s->utsr0 |= UTSR0_REB;
1026        s->wait_break_end = false;
1027    }
1028
1029    if (s->rx_len < 12) {
1030        s->rx_fifo[(s->rx_start + s->rx_len) % 12] = c;
1031        s->rx_len++;
1032    } else
1033        s->rx_fifo[(s->rx_start + 11) % 12] |= RX_FIFO_ROR;
1034}
1035
1036static int strongarm_uart_can_receive(void *opaque)
1037{
1038    StrongARMUARTState *s = opaque;
1039
1040    if (s->rx_len == 12) {
1041        return 0;
1042    }
1043    /* It's best not to get more than 2/3 of RX FIFO, so advertise that much */
1044    if (s->rx_len < 8) {
1045        return 8 - s->rx_len;
1046    }
1047    return 1;
1048}
1049
1050static void strongarm_uart_receive(void *opaque, const uint8_t *buf, int size)
1051{
1052    StrongARMUARTState *s = opaque;
1053    int i;
1054
1055    for (i = 0; i < size; i++) {
1056        strongarm_uart_rx_push(s, buf[i]);
1057    }
1058
1059    /* call the timeout receive callback in 3 char transmit time */
1060    qemu_mod_timer(s->rx_timeout_timer,
1061                    qemu_get_clock_ns(vm_clock) + s->char_transmit_time * 3);
1062
1063    strongarm_uart_update_status(s);
1064    strongarm_uart_update_int_status(s);
1065}
1066
1067static void strongarm_uart_event(void *opaque, int event)
1068{
1069    StrongARMUARTState *s = opaque;
1070    if (event == CHR_EVENT_BREAK) {
1071        s->utsr0 |= UTSR0_RBB;
1072        strongarm_uart_rx_push(s, RX_FIFO_FRE);
1073        s->wait_break_end = true;
1074        strongarm_uart_update_status(s);
1075        strongarm_uart_update_int_status(s);
1076    }
1077}
1078
1079static void strongarm_uart_tx(void *opaque)
1080{
1081    StrongARMUARTState *s = opaque;
1082    uint64_t new_xmit_ts = qemu_get_clock_ns(vm_clock);
1083
1084    if (s->utcr3 & UTCR3_LBM) /* loopback */ {
1085        strongarm_uart_receive(s, &s->tx_fifo[s->tx_start], 1);
1086    } else if (s->chr) {
1087        qemu_chr_fe_write(s->chr, &s->tx_fifo[s->tx_start], 1);
1088    }
1089
1090    s->tx_start = (s->tx_start + 1) % 8;
1091    s->tx_len--;
1092    if (s->tx_len) {
1093        qemu_mod_timer(s->tx_timer, new_xmit_ts + s->char_transmit_time);
1094    }
1095    strongarm_uart_update_status(s);
1096    strongarm_uart_update_int_status(s);
1097}
1098
1099static uint64_t strongarm_uart_read(void *opaque, hwaddr addr,
1100                                    unsigned size)
1101{
1102    StrongARMUARTState *s = opaque;
1103    uint16_t ret;
1104
1105    switch (addr) {
1106    case UTCR0:
1107        return s->utcr0;
1108
1109    case UTCR1:
1110        return s->brd >> 8;
1111
1112    case UTCR2:
1113        return s->brd & 0xff;
1114
1115    case UTCR3:
1116        return s->utcr3;
1117
1118    case UTDR:
1119        if (s->rx_len != 0) {
1120            ret = s->rx_fifo[s->rx_start];
1121            s->rx_start = (s->rx_start + 1) % 12;
1122            s->rx_len--;
1123            strongarm_uart_update_status(s);
1124            strongarm_uart_update_int_status(s);
1125            return ret;
1126        }
1127        return 0;
1128
1129    case UTSR0:
1130        return s->utsr0;
1131
1132    case UTSR1:
1133        return s->utsr1;
1134
1135    default:
1136        printf("%s: Bad register 0x" TARGET_FMT_plx "\n", __func__, addr);
1137        return 0;
1138    }
1139}
1140
1141static void strongarm_uart_write(void *opaque, hwaddr addr,
1142                                 uint64_t value, unsigned size)
1143{
1144    StrongARMUARTState *s = opaque;
1145
1146    switch (addr) {
1147    case UTCR0:
1148        s->utcr0 = value & 0x7f;
1149        strongarm_uart_update_parameters(s);
1150        break;
1151
1152    case UTCR1:
1153        s->brd = (s->brd & 0xff) | ((value & 0xf) << 8);
1154        strongarm_uart_update_parameters(s);
1155        break;
1156
1157    case UTCR2:
1158        s->brd = (s->brd & 0xf00) | (value & 0xff);
1159        strongarm_uart_update_parameters(s);
1160        break;
1161
1162    case UTCR3:
1163        s->utcr3 = value & 0x3f;
1164        if ((s->utcr3 & UTCR3_RXE) == 0) {
1165            s->rx_len = 0;
1166        }
1167        if ((s->utcr3 & UTCR3_TXE) == 0) {
1168            s->tx_len = 0;
1169        }
1170        strongarm_uart_update_status(s);
1171        strongarm_uart_update_int_status(s);
1172        break;
1173
1174    case UTDR:
1175        if ((s->utcr3 & UTCR3_TXE) && s->tx_len != 8) {
1176            s->tx_fifo[(s->tx_start + s->tx_len) % 8] = value;
1177            s->tx_len++;
1178            strongarm_uart_update_status(s);
1179            strongarm_uart_update_int_status(s);
1180            if (s->tx_len == 1) {
1181                strongarm_uart_tx(s);
1182            }
1183        }
1184        break;
1185
1186    case UTSR0:
1187        s->utsr0 = s->utsr0 & ~(value &
1188                (UTSR0_REB | UTSR0_RBB | UTSR0_RID));
1189        strongarm_uart_update_int_status(s);
1190        break;
1191
1192    default:
1193        printf("%s: Bad register 0x" TARGET_FMT_plx "\n", __func__, addr);
1194    }
1195}
1196
1197static const MemoryRegionOps strongarm_uart_ops = {
1198    .read = strongarm_uart_read,
1199    .write = strongarm_uart_write,
1200    .endianness = DEVICE_NATIVE_ENDIAN,
1201};
1202
1203static int strongarm_uart_init(SysBusDevice *dev)
1204{
1205    StrongARMUARTState *s = FROM_SYSBUS(StrongARMUARTState, dev);
1206
1207    memory_region_init_io(&s->iomem, &strongarm_uart_ops, s, "uart", 0x10000);
1208    sysbus_init_mmio(dev, &s->iomem);
1209    sysbus_init_irq(dev, &s->irq);
1210
1211    s->rx_timeout_timer = qemu_new_timer_ns(vm_clock, strongarm_uart_rx_to, s);
1212    s->tx_timer = qemu_new_timer_ns(vm_clock, strongarm_uart_tx, s);
1213
1214    if (s->chr) {
1215        qemu_chr_add_handlers(s->chr,
1216                        strongarm_uart_can_receive,
1217                        strongarm_uart_receive,
1218                        strongarm_uart_event,
1219                        s);
1220    }
1221
1222    return 0;
1223}
1224
1225static void strongarm_uart_reset(DeviceState *dev)
1226{
1227    StrongARMUARTState *s = DO_UPCAST(StrongARMUARTState, busdev.qdev, dev);
1228
1229    s->utcr0 = UTCR0_DSS; /* 8 data, no parity */
1230    s->brd = 23;    /* 9600 */
1231    /* enable send & recv - this actually violates spec */
1232    s->utcr3 = UTCR3_TXE | UTCR3_RXE;
1233
1234    s->rx_len = s->tx_len = 0;
1235
1236    strongarm_uart_update_parameters(s);
1237    strongarm_uart_update_status(s);
1238    strongarm_uart_update_int_status(s);
1239}
1240
1241static int strongarm_uart_post_load(void *opaque, int version_id)
1242{
1243    StrongARMUARTState *s = opaque;
1244
1245    strongarm_uart_update_parameters(s);
1246    strongarm_uart_update_status(s);
1247    strongarm_uart_update_int_status(s);
1248
1249    /* tx and restart timer */
1250    if (s->tx_len) {
1251        strongarm_uart_tx(s);
1252    }
1253
1254    /* restart rx timeout timer */
1255    if (s->rx_len) {
1256        qemu_mod_timer(s->rx_timeout_timer,
1257                qemu_get_clock_ns(vm_clock) + s->char_transmit_time * 3);
1258    }
1259
1260    return 0;
1261}
1262
1263static const VMStateDescription vmstate_strongarm_uart_regs = {
1264    .name = "strongarm-uart",
1265    .version_id = 0,
1266    .minimum_version_id = 0,
1267    .minimum_version_id_old = 0,
1268    .post_load = strongarm_uart_post_load,
1269    .fields = (VMStateField[]) {
1270        VMSTATE_UINT8(utcr0, StrongARMUARTState),
1271        VMSTATE_UINT16(brd, StrongARMUARTState),
1272        VMSTATE_UINT8(utcr3, StrongARMUARTState),
1273        VMSTATE_UINT8(utsr0, StrongARMUARTState),
1274        VMSTATE_UINT8_ARRAY(tx_fifo, StrongARMUARTState, 8),
1275        VMSTATE_UINT8(tx_start, StrongARMUARTState),
1276        VMSTATE_UINT8(tx_len, StrongARMUARTState),
1277        VMSTATE_UINT16_ARRAY(rx_fifo, StrongARMUARTState, 12),
1278        VMSTATE_UINT8(rx_start, StrongARMUARTState),
1279        VMSTATE_UINT8(rx_len, StrongARMUARTState),
1280        VMSTATE_BOOL(wait_break_end, StrongARMUARTState),
1281        VMSTATE_END_OF_LIST(),
1282    },
1283};
1284
1285static Property strongarm_uart_properties[] = {
1286    DEFINE_PROP_CHR("chardev", StrongARMUARTState, chr),
1287    DEFINE_PROP_END_OF_LIST(),
1288};
1289
1290static void strongarm_uart_class_init(ObjectClass *klass, void *data)
1291{
1292    DeviceClass *dc = DEVICE_CLASS(klass);
1293    SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
1294
1295    k->init = strongarm_uart_init;
1296    dc->desc = "StrongARM UART controller";
1297    dc->reset = strongarm_uart_reset;
1298    dc->vmsd = &vmstate_strongarm_uart_regs;
1299    dc->props = strongarm_uart_properties;
1300}
1301
1302static const TypeInfo strongarm_uart_info = {
1303    .name          = "strongarm-uart",
1304    .parent        = TYPE_SYS_BUS_DEVICE,
1305    .instance_size = sizeof(StrongARMUARTState),
1306    .class_init    = strongarm_uart_class_init,
1307};
1308
1309/* Synchronous Serial Ports */
1310typedef struct {
1311    SysBusDevice busdev;
1312    MemoryRegion iomem;
1313    qemu_irq irq;
1314    SSIBus *bus;
1315
1316    uint16_t sscr[2];
1317    uint16_t sssr;
1318
1319    uint16_t rx_fifo[8];
1320    uint8_t rx_level;
1321    uint8_t rx_start;
1322} StrongARMSSPState;
1323
1324#define SSCR0 0x60 /* SSP Control register 0 */
1325#define SSCR1 0x64 /* SSP Control register 1 */
1326#define SSDR  0x6c /* SSP Data register */
1327#define SSSR  0x74 /* SSP Status register */
1328
1329/* Bitfields for above registers */
1330#define SSCR0_SPI(x)    (((x) & 0x30) == 0x00)
1331#define SSCR0_SSP(x)    (((x) & 0x30) == 0x10)
1332#define SSCR0_UWIRE(x)  (((x) & 0x30) == 0x20)
1333#define SSCR0_PSP(x)    (((x) & 0x30) == 0x30)
1334#define SSCR0_SSE       (1 << 7)
1335#define SSCR0_DSS(x)    (((x) & 0xf) + 1)
1336#define SSCR1_RIE       (1 << 0)
1337#define SSCR1_TIE       (1 << 1)
1338#define SSCR1_LBM       (1 << 2)
1339#define SSSR_TNF        (1 << 2)
1340#define SSSR_RNE        (1 << 3)
1341#define SSSR_TFS        (1 << 5)
1342#define SSSR_RFS        (1 << 6)
1343#define SSSR_ROR        (1 << 7)
1344#define SSSR_RW         0x0080
1345
1346static void strongarm_ssp_int_update(StrongARMSSPState *s)
1347{
1348    int level = 0;
1349
1350    level |= (s->sssr & SSSR_ROR);
1351    level |= (s->sssr & SSSR_RFS)  &&  (s->sscr[1] & SSCR1_RIE);
1352    level |= (s->sssr & SSSR_TFS)  &&  (s->sscr[1] & SSCR1_TIE);
1353    qemu_set_irq(s->irq, level);
1354}
1355
1356static void strongarm_ssp_fifo_update(StrongARMSSPState *s)
1357{
1358    s->sssr &= ~SSSR_TFS;
1359    s->sssr &= ~SSSR_TNF;
1360    if (s->sscr[0] & SSCR0_SSE) {
1361        if (s->rx_level >= 4) {
1362            s->sssr |= SSSR_RFS;
1363        } else {
1364            s->sssr &= ~SSSR_RFS;
1365        }
1366        if (s->rx_level) {
1367            s->sssr |= SSSR_RNE;
1368        } else {
1369            s->sssr &= ~SSSR_RNE;
1370        }
1371        /* TX FIFO is never filled, so it is always in underrun
1372           condition if SSP is enabled */
1373        s->sssr |= SSSR_TFS;
1374        s->sssr |= SSSR_TNF;
1375    }
1376
1377    strongarm_ssp_int_update(s);
1378}
1379
1380static uint64_t strongarm_ssp_read(void *opaque, hwaddr addr,
1381                                   unsigned size)
1382{
1383    StrongARMSSPState *s = opaque;
1384    uint32_t retval;
1385
1386    switch (addr) {
1387    case SSCR0:
1388        return s->sscr[0];
1389    case SSCR1:
1390        return s->sscr[1];
1391    case SSSR:
1392        return s->sssr;
1393    case SSDR:
1394        if (~s->sscr[0] & SSCR0_SSE) {
1395            return 0xffffffff;
1396        }
1397        if (s->rx_level < 1) {
1398            printf("%s: SSP Rx Underrun\n", __func__);
1399            return 0xffffffff;
1400        }
1401        s->rx_level--;
1402        retval = s->rx_fifo[s->rx_start++];
1403        s->rx_start &= 0x7;
1404        strongarm_ssp_fifo_update(s);
1405        return retval;
1406    default:
1407        printf("%s: Bad register 0x" TARGET_FMT_plx "\n", __func__, addr);
1408        break;
1409    }
1410    return 0;
1411}
1412
1413static void strongarm_ssp_write(void *opaque, hwaddr addr,
1414                                uint64_t value, unsigned size)
1415{
1416    StrongARMSSPState *s = opaque;
1417
1418    switch (addr) {
1419    case SSCR0:
1420        s->sscr[0] = value & 0xffbf;
1421        if ((s->sscr[0] & SSCR0_SSE) && SSCR0_DSS(value) < 4) {
1422            printf("%s: Wrong data size: %i bits\n", __func__,
1423                   (int)SSCR0_DSS(value));
1424        }
1425        if (!(value & SSCR0_SSE)) {
1426            s->sssr = 0;
1427            s->rx_level = 0;
1428        }
1429        strongarm_ssp_fifo_update(s);
1430        break;
1431
1432    case SSCR1:
1433        s->sscr[1] = value & 0x2f;
1434        if (value & SSCR1_LBM) {
1435            printf("%s: Attempt to use SSP LBM mode\n", __func__);
1436        }
1437        strongarm_ssp_fifo_update(s);
1438        break;
1439
1440    case SSSR:
1441        s->sssr &= ~(value & SSSR_RW);
1442        strongarm_ssp_int_update(s);
1443        break;
1444
1445    case SSDR:
1446        if (SSCR0_UWIRE(s->sscr[0])) {
1447            value &= 0xff;
1448        } else
1449            /* Note how 32bits overflow does no harm here */
1450            value &= (1 << SSCR0_DSS(s->sscr[0])) - 1;
1451
1452        /* Data goes from here to the Tx FIFO and is shifted out from
1453         * there directly to the slave, no need to buffer it.
1454         */
1455        if (s->sscr[0] & SSCR0_SSE) {
1456            uint32_t readval;
1457            if (s->sscr[1] & SSCR1_LBM) {
1458                readval = value;
1459            } else {
1460                readval = ssi_transfer(s->bus, value);
1461            }
1462
1463            if (s->rx_level < 0x08) {
1464                s->rx_fifo[(s->rx_start + s->rx_level++) & 0x7] = readval;
1465            } else {
1466                s->sssr |= SSSR_ROR;
1467            }
1468        }
1469        strongarm_ssp_fifo_update(s);
1470        break;
1471
1472    default:
1473        printf("%s: Bad register 0x" TARGET_FMT_plx "\n", __func__, addr);
1474        break;
1475    }
1476}
1477
1478static const MemoryRegionOps strongarm_ssp_ops = {
1479    .read = strongarm_ssp_read,
1480    .write = strongarm_ssp_write,
1481    .endianness = DEVICE_NATIVE_ENDIAN,
1482};
1483
1484static int strongarm_ssp_post_load(void *opaque, int version_id)
1485{
1486    StrongARMSSPState *s = opaque;
1487
1488    strongarm_ssp_fifo_update(s);
1489
1490    return 0;
1491}
1492
1493static int strongarm_ssp_init(SysBusDevice *dev)
1494{
1495    StrongARMSSPState *s = FROM_SYSBUS(StrongARMSSPState, dev);
1496
1497    sysbus_init_irq(dev, &s->irq);
1498
1499    memory_region_init_io(&s->iomem, &strongarm_ssp_ops, s, "ssp", 0x1000);
1500    sysbus_init_mmio(dev, &s->iomem);
1501
1502    s->bus = ssi_create_bus(&dev->qdev, "ssi");
1503    return 0;
1504}
1505
1506static void strongarm_ssp_reset(DeviceState *dev)
1507{
1508    StrongARMSSPState *s = DO_UPCAST(StrongARMSSPState, busdev.qdev, dev);
1509    s->sssr = 0x03; /* 3 bit data, SPI, disabled */
1510    s->rx_start = 0;
1511    s->rx_level = 0;
1512}
1513
1514static const VMStateDescription vmstate_strongarm_ssp_regs = {
1515    .name = "strongarm-ssp",
1516    .version_id = 0,
1517    .minimum_version_id = 0,
1518    .minimum_version_id_old = 0,
1519    .post_load = strongarm_ssp_post_load,
1520    .fields = (VMStateField[]) {
1521        VMSTATE_UINT16_ARRAY(sscr, StrongARMSSPState, 2),
1522        VMSTATE_UINT16(sssr, StrongARMSSPState),
1523        VMSTATE_UINT16_ARRAY(rx_fifo, StrongARMSSPState, 8),
1524        VMSTATE_UINT8(rx_start, StrongARMSSPState),
1525        VMSTATE_UINT8(rx_level, StrongARMSSPState),
1526        VMSTATE_END_OF_LIST(),
1527    },
1528};
1529
1530static void strongarm_ssp_class_init(ObjectClass *klass, void *data)
1531{
1532    DeviceClass *dc = DEVICE_CLASS(klass);
1533    SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
1534
1535    k->init = strongarm_ssp_init;
1536    dc->desc = "StrongARM SSP controller";
1537    dc->reset = strongarm_ssp_reset;
1538    dc->vmsd = &vmstate_strongarm_ssp_regs;
1539}
1540
1541static const TypeInfo strongarm_ssp_info = {
1542    .name          = "strongarm-ssp",
1543    .parent        = TYPE_SYS_BUS_DEVICE,
1544    .instance_size = sizeof(StrongARMSSPState),
1545    .class_init    = strongarm_ssp_class_init,
1546};
1547
1548/* Main CPU functions */
1549StrongARMState *sa1110_init(MemoryRegion *sysmem,
1550                            unsigned int sdram_size, const char *rev)
1551{
1552    StrongARMState *s;
1553    qemu_irq *pic;
1554    int i;
1555
1556    s = g_malloc0(sizeof(StrongARMState));
1557
1558    if (!rev) {
1559        rev = "sa1110-b5";
1560    }
1561
1562    if (strncmp(rev, "sa1110", 6)) {
1563        error_report("Machine requires a SA1110 processor.");
1564        exit(1);
1565    }
1566
1567    s->cpu = cpu_arm_init(rev);
1568
1569    if (!s->cpu) {
1570        error_report("Unable to find CPU definition");
1571        exit(1);
1572    }
1573
1574    memory_region_init_ram(&s->sdram, "strongarm.sdram", sdram_size);
1575    vmstate_register_ram_global(&s->sdram);
1576    memory_region_add_subregion(sysmem, SA_SDCS0, &s->sdram);
1577
1578    pic = arm_pic_init_cpu(s->cpu);
1579    s->pic = sysbus_create_varargs("strongarm_pic", 0x90050000,
1580                    pic[ARM_PIC_CPU_IRQ], pic[ARM_PIC_CPU_FIQ], NULL);
1581
1582    sysbus_create_varargs("pxa25x-timer", 0x90000000,
1583                    qdev_get_gpio_in(s->pic, SA_PIC_OSTC0),
1584                    qdev_get_gpio_in(s->pic, SA_PIC_OSTC1),
1585                    qdev_get_gpio_in(s->pic, SA_PIC_OSTC2),
1586                    qdev_get_gpio_in(s->pic, SA_PIC_OSTC3),
1587                    NULL);
1588
1589    sysbus_create_simple("strongarm-rtc", 0x90010000,
1590                    qdev_get_gpio_in(s->pic, SA_PIC_RTC_ALARM));
1591
1592    s->gpio = strongarm_gpio_init(0x90040000, s->pic);
1593
1594    s->ppc = sysbus_create_varargs("strongarm-ppc", 0x90060000, NULL);
1595
1596    for (i = 0; sa_serial[i].io_base; i++) {
1597        DeviceState *dev = qdev_create(NULL, "strongarm-uart");
1598        qdev_prop_set_chr(dev, "chardev", serial_hds[i]);
1599        qdev_init_nofail(dev);
1600        sysbus_mmio_map(SYS_BUS_DEVICE(dev), 0,
1601                sa_serial[i].io_base);
1602        sysbus_connect_irq(SYS_BUS_DEVICE(dev), 0,
1603                qdev_get_gpio_in(s->pic, sa_serial[i].irq));
1604    }
1605
1606    s->ssp = sysbus_create_varargs("strongarm-ssp", 0x80070000,
1607                qdev_get_gpio_in(s->pic, SA_PIC_SSP), NULL);
1608    s->ssp_bus = (SSIBus *)qdev_get_child_bus(s->ssp, "ssi");
1609
1610    return s;
1611}
1612
1613static void strongarm_register_types(void)
1614{
1615    type_register_static(&strongarm_pic_info);
1616    type_register_static(&strongarm_rtc_sysbus_info);
1617    type_register_static(&strongarm_gpio_info);
1618    type_register_static(&strongarm_ppc_info);
1619    type_register_static(&strongarm_uart_info);
1620    type_register_static(&strongarm_ssp_info);
1621}
1622
1623type_init(strongarm_register_types)
1624