Statistics
| Branch: | Revision:

root / hw / strongarm.c @ f5654039

History | View | Annotate | Download (40.6 kB)

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
#include "sysbus.h"
27
#include "strongarm.h"
28
#include "qemu-error.h"
29
#include "arm-misc.h"
30
#include "sysemu.h"
31
#include "ssi.h"
32

    
33
//#define DEBUG
34

    
35
/*
36
 TODO
37
 - Implement cp15, c14 ?
38
 - Implement cp15, c15 !!! (idle used in L)
39
 - Implement idle mode handling/DIM
40
 - Implement sleep mode/Wake sources
41
 - Implement reset control
42
 - Implement memory control regs
43
 - PCMCIA handling
44
 - Maybe support MBGNT/MBREQ
45
 - DMA channels
46
 - GPCLK
47
 - IrDA
48
 - MCP
49
 - Enhance UART with modem signals
50
 */
51

    
52
#ifdef DEBUG
53
# define DPRINTF(format, ...) printf(format , ## __VA_ARGS__)
54
#else
55
# define DPRINTF(format, ...) do { } while (0)
56
#endif
57

    
58
static struct {
59
    target_phys_addr_t io_base;
60
    int irq;
61
} sa_serial[] = {
62
    { 0x80010000, SA_PIC_UART1 },
63
    { 0x80030000, SA_PIC_UART2 },
64
    { 0x80050000, SA_PIC_UART3 },
65
    { 0, 0 }
66
};
67

    
68
/* Interrupt Controller */
69
typedef struct {
70
    SysBusDevice busdev;
71
    MemoryRegion iomem;
72
    qemu_irq    irq;
73
    qemu_irq    fiq;
74

    
75
    uint32_t pending;
76
    uint32_t enabled;
77
    uint32_t is_fiq;
78
    uint32_t int_idle;
79
} StrongARMPICState;
80

    
81
#define ICIP    0x00
82
#define ICMR    0x04
83
#define ICLR    0x08
84
#define ICFP    0x10
85
#define ICPR    0x20
86
#define ICCR    0x0c
87

    
88
#define SA_PIC_SRCS     32
89

    
90

    
91
static void strongarm_pic_update(void *opaque)
92
{
93
    StrongARMPICState *s = opaque;
94

    
95
    /* FIXME: reflect DIM */
96
    qemu_set_irq(s->fiq, s->pending & s->enabled &  s->is_fiq);
97
    qemu_set_irq(s->irq, s->pending & s->enabled & ~s->is_fiq);
98
}
99

    
100
static void strongarm_pic_set_irq(void *opaque, int irq, int level)
101
{
102
    StrongARMPICState *s = opaque;
103

    
104
    if (level) {
105
        s->pending |= 1 << irq;
106
    } else {
107
        s->pending &= ~(1 << irq);
108
    }
109

    
110
    strongarm_pic_update(s);
111
}
112

    
113
static uint64_t strongarm_pic_mem_read(void *opaque, target_phys_addr_t offset,
114
                                       unsigned size)
115
{
116
    StrongARMPICState *s = opaque;
117

    
118
    switch (offset) {
119
    case ICIP:
120
        return s->pending & ~s->is_fiq & s->enabled;
121
    case ICMR:
122
        return s->enabled;
123
    case ICLR:
124
        return s->is_fiq;
125
    case ICCR:
126
        return s->int_idle == 0;
127
    case ICFP:
128
        return s->pending & s->is_fiq & s->enabled;
129
    case ICPR:
130
        return s->pending;
131
    default:
132
        printf("%s: Bad register offset 0x" TARGET_FMT_plx "\n",
133
                        __func__, offset);
134
        return 0;
135
    }
136
}
137

    
138
static void strongarm_pic_mem_write(void *opaque, target_phys_addr_t offset,
139
                                    uint64_t value, unsigned size)
140
{
141
    StrongARMPICState *s = opaque;
142

    
143
    switch (offset) {
144
    case ICMR:
145
        s->enabled = value;
146
        break;
147
    case ICLR:
148
        s->is_fiq = value;
149
        break;
150
    case ICCR:
151
        s->int_idle = (value & 1) ? 0 : ~0;
152
        break;
153
    default:
154
        printf("%s: Bad register offset 0x" TARGET_FMT_plx "\n",
155
                        __func__, offset);
156
        break;
157
    }
158
    strongarm_pic_update(s);
159
}
160

    
161
static const MemoryRegionOps strongarm_pic_ops = {
162
    .read = strongarm_pic_mem_read,
163
    .write = strongarm_pic_mem_write,
164
    .endianness = DEVICE_NATIVE_ENDIAN,
165
};
166

    
167
static int strongarm_pic_initfn(SysBusDevice *dev)
168
{
169
    StrongARMPICState *s = FROM_SYSBUS(StrongARMPICState, dev);
170

    
171
    qdev_init_gpio_in(&dev->qdev, strongarm_pic_set_irq, SA_PIC_SRCS);
172
    memory_region_init_io(&s->iomem, &strongarm_pic_ops, s, "pic", 0x1000);
173
    sysbus_init_mmio_region(dev, &s->iomem);
174
    sysbus_init_irq(dev, &s->irq);
175
    sysbus_init_irq(dev, &s->fiq);
176

    
177
    return 0;
178
}
179

    
180
static int strongarm_pic_post_load(void *opaque, int version_id)
181
{
182
    strongarm_pic_update(opaque);
183
    return 0;
184
}
185

    
186
static VMStateDescription vmstate_strongarm_pic_regs = {
187
    .name = "strongarm_pic",
188
    .version_id = 0,
189
    .minimum_version_id = 0,
190
    .minimum_version_id_old = 0,
191
    .post_load = strongarm_pic_post_load,
192
    .fields = (VMStateField[]) {
193
        VMSTATE_UINT32(pending, StrongARMPICState),
194
        VMSTATE_UINT32(enabled, StrongARMPICState),
195
        VMSTATE_UINT32(is_fiq, StrongARMPICState),
196
        VMSTATE_UINT32(int_idle, StrongARMPICState),
197
        VMSTATE_END_OF_LIST(),
198
    },
199
};
200

    
201
static SysBusDeviceInfo strongarm_pic_info = {
202
    .init       = strongarm_pic_initfn,
203
    .qdev.name  = "strongarm_pic",
204
    .qdev.desc  = "StrongARM PIC",
205
    .qdev.size  = sizeof(StrongARMPICState),
206
    .qdev.vmsd  = &vmstate_strongarm_pic_regs,
207
};
208

    
209
/* Real-Time Clock */
210
#define RTAR 0x00 /* RTC Alarm register */
211
#define RCNR 0x04 /* RTC Counter register */
212
#define RTTR 0x08 /* RTC Timer Trim register */
213
#define RTSR 0x10 /* RTC Status register */
214

    
215
#define RTSR_AL (1 << 0) /* RTC Alarm detected */
216
#define RTSR_HZ (1 << 1) /* RTC 1Hz detected */
217
#define RTSR_ALE (1 << 2) /* RTC Alarm enable */
218
#define RTSR_HZE (1 << 3) /* RTC 1Hz enable */
219

    
220
/* 16 LSB of RTTR are clockdiv for internal trim logic,
221
 * trim delete isn't emulated, so
222
 * f = 32 768 / (RTTR_trim + 1) */
223

    
224
typedef struct {
225
    SysBusDevice busdev;
226
    MemoryRegion iomem;
227
    uint32_t rttr;
228
    uint32_t rtsr;
229
    uint32_t rtar;
230
    uint32_t last_rcnr;
231
    int64_t last_hz;
232
    QEMUTimer *rtc_alarm;
233
    QEMUTimer *rtc_hz;
234
    qemu_irq rtc_irq;
235
    qemu_irq rtc_hz_irq;
236
} StrongARMRTCState;
237

    
238
static inline void strongarm_rtc_int_update(StrongARMRTCState *s)
239
{
240
    qemu_set_irq(s->rtc_irq, s->rtsr & RTSR_AL);
241
    qemu_set_irq(s->rtc_hz_irq, s->rtsr & RTSR_HZ);
242
}
243

    
244
static void strongarm_rtc_hzupdate(StrongARMRTCState *s)
245
{
246
    int64_t rt = qemu_get_clock_ms(rt_clock);
247
    s->last_rcnr += ((rt - s->last_hz) << 15) /
248
            (1000 * ((s->rttr & 0xffff) + 1));
249
    s->last_hz = rt;
250
}
251

    
252
static inline void strongarm_rtc_timer_update(StrongARMRTCState *s)
253
{
254
    if ((s->rtsr & RTSR_HZE) && !(s->rtsr & RTSR_HZ)) {
255
        qemu_mod_timer(s->rtc_hz, s->last_hz + 1000);
256
    } else {
257
        qemu_del_timer(s->rtc_hz);
258
    }
259

    
260
    if ((s->rtsr & RTSR_ALE) && !(s->rtsr & RTSR_AL)) {
261
        qemu_mod_timer(s->rtc_alarm, s->last_hz +
262
                (((s->rtar - s->last_rcnr) * 1000 *
263
                  ((s->rttr & 0xffff) + 1)) >> 15));
264
    } else {
265
        qemu_del_timer(s->rtc_alarm);
266
    }
267
}
268

    
269
static inline void strongarm_rtc_alarm_tick(void *opaque)
270
{
271
    StrongARMRTCState *s = opaque;
272
    s->rtsr |= RTSR_AL;
273
    strongarm_rtc_timer_update(s);
274
    strongarm_rtc_int_update(s);
275
}
276

    
277
static inline void strongarm_rtc_hz_tick(void *opaque)
278
{
279
    StrongARMRTCState *s = opaque;
280
    s->rtsr |= RTSR_HZ;
281
    strongarm_rtc_timer_update(s);
282
    strongarm_rtc_int_update(s);
283
}
284

    
285
static uint64_t strongarm_rtc_read(void *opaque, target_phys_addr_t addr,
286
                                   unsigned size)
287
{
288
    StrongARMRTCState *s = opaque;
289

    
290
    switch (addr) {
291
    case RTTR:
292
        return s->rttr;
293
    case RTSR:
294
        return s->rtsr;
295
    case RTAR:
296
        return s->rtar;
297
    case RCNR:
298
        return s->last_rcnr +
299
                ((qemu_get_clock_ms(rt_clock) - s->last_hz) << 15) /
300
                (1000 * ((s->rttr & 0xffff) + 1));
301
    default:
302
        printf("%s: Bad register 0x" TARGET_FMT_plx "\n", __func__, addr);
303
        return 0;
304
    }
305
}
306

    
307
static void strongarm_rtc_write(void *opaque, target_phys_addr_t addr,
308
                                uint64_t value, unsigned size)
309
{
310
    StrongARMRTCState *s = opaque;
311
    uint32_t old_rtsr;
312

    
313
    switch (addr) {
314
    case RTTR:
315
        strongarm_rtc_hzupdate(s);
316
        s->rttr = value;
317
        strongarm_rtc_timer_update(s);
318
        break;
319

    
320
    case RTSR:
321
        old_rtsr = s->rtsr;
322
        s->rtsr = (value & (RTSR_ALE | RTSR_HZE)) |
323
                  (s->rtsr & ~(value & (RTSR_AL | RTSR_HZ)));
324

    
325
        if (s->rtsr != old_rtsr) {
326
            strongarm_rtc_timer_update(s);
327
        }
328

    
329
        strongarm_rtc_int_update(s);
330
        break;
331

    
332
    case RTAR:
333
        s->rtar = value;
334
        strongarm_rtc_timer_update(s);
335
        break;
336

    
337
    case RCNR:
338
        strongarm_rtc_hzupdate(s);
339
        s->last_rcnr = value;
340
        strongarm_rtc_timer_update(s);
341
        break;
342

    
343
    default:
344
        printf("%s: Bad register 0x" TARGET_FMT_plx "\n", __func__, addr);
345
    }
346
}
347

    
348
static const MemoryRegionOps strongarm_rtc_ops = {
349
    .read = strongarm_rtc_read,
350
    .write = strongarm_rtc_write,
351
    .endianness = DEVICE_NATIVE_ENDIAN,
352
};
353

    
354
static int strongarm_rtc_init(SysBusDevice *dev)
355
{
356
    StrongARMRTCState *s = FROM_SYSBUS(StrongARMRTCState, dev);
357
    struct tm tm;
358

    
359
    s->rttr = 0x0;
360
    s->rtsr = 0;
361

    
362
    qemu_get_timedate(&tm, 0);
363

    
364
    s->last_rcnr = (uint32_t) mktimegm(&tm);
365
    s->last_hz = qemu_get_clock_ms(rt_clock);
366

    
367
    s->rtc_alarm = qemu_new_timer_ms(rt_clock, strongarm_rtc_alarm_tick, s);
368
    s->rtc_hz = qemu_new_timer_ms(rt_clock, strongarm_rtc_hz_tick, s);
369

    
370
    sysbus_init_irq(dev, &s->rtc_irq);
371
    sysbus_init_irq(dev, &s->rtc_hz_irq);
372

    
373
    memory_region_init_io(&s->iomem, &strongarm_rtc_ops, s, "rtc", 0x10000);
374
    sysbus_init_mmio_region(dev, &s->iomem);
375

    
376
    return 0;
377
}
378

    
379
static void strongarm_rtc_pre_save(void *opaque)
380
{
381
    StrongARMRTCState *s = opaque;
382

    
383
    strongarm_rtc_hzupdate(s);
384
}
385

    
386
static int strongarm_rtc_post_load(void *opaque, int version_id)
387
{
388
    StrongARMRTCState *s = opaque;
389

    
390
    strongarm_rtc_timer_update(s);
391
    strongarm_rtc_int_update(s);
392

    
393
    return 0;
394
}
395

    
396
static const VMStateDescription vmstate_strongarm_rtc_regs = {
397
    .name = "strongarm-rtc",
398
    .version_id = 0,
399
    .minimum_version_id = 0,
400
    .minimum_version_id_old = 0,
401
    .pre_save = strongarm_rtc_pre_save,
402
    .post_load = strongarm_rtc_post_load,
403
    .fields = (VMStateField[]) {
404
        VMSTATE_UINT32(rttr, StrongARMRTCState),
405
        VMSTATE_UINT32(rtsr, StrongARMRTCState),
406
        VMSTATE_UINT32(rtar, StrongARMRTCState),
407
        VMSTATE_UINT32(last_rcnr, StrongARMRTCState),
408
        VMSTATE_INT64(last_hz, StrongARMRTCState),
409
        VMSTATE_END_OF_LIST(),
410
    },
411
};
412

    
413
static SysBusDeviceInfo strongarm_rtc_sysbus_info = {
414
    .init       = strongarm_rtc_init,
415
    .qdev.name  = "strongarm-rtc",
416
    .qdev.desc  = "StrongARM RTC Controller",
417
    .qdev.size  = sizeof(StrongARMRTCState),
418
    .qdev.vmsd  = &vmstate_strongarm_rtc_regs,
419
};
420

    
421
/* GPIO */
422
#define GPLR 0x00
423
#define GPDR 0x04
424
#define GPSR 0x08
425
#define GPCR 0x0c
426
#define GRER 0x10
427
#define GFER 0x14
428
#define GEDR 0x18
429
#define GAFR 0x1c
430

    
431
typedef struct StrongARMGPIOInfo StrongARMGPIOInfo;
432
struct StrongARMGPIOInfo {
433
    SysBusDevice busdev;
434
    MemoryRegion iomem;
435
    qemu_irq handler[28];
436
    qemu_irq irqs[11];
437
    qemu_irq irqX;
438

    
439
    uint32_t ilevel;
440
    uint32_t olevel;
441
    uint32_t dir;
442
    uint32_t rising;
443
    uint32_t falling;
444
    uint32_t status;
445
    uint32_t gpsr;
446
    uint32_t gafr;
447

    
448
    uint32_t prev_level;
449
};
450

    
451

    
452
static void strongarm_gpio_irq_update(StrongARMGPIOInfo *s)
453
{
454
    int i;
455
    for (i = 0; i < 11; i++) {
456
        qemu_set_irq(s->irqs[i], s->status & (1 << i));
457
    }
458

    
459
    qemu_set_irq(s->irqX, (s->status & ~0x7ff));
460
}
461

    
462
static void strongarm_gpio_set(void *opaque, int line, int level)
463
{
464
    StrongARMGPIOInfo *s = opaque;
465
    uint32_t mask;
466

    
467
    mask = 1 << line;
468

    
469
    if (level) {
470
        s->status |= s->rising & mask &
471
                ~s->ilevel & ~s->dir;
472
        s->ilevel |= mask;
473
    } else {
474
        s->status |= s->falling & mask &
475
                s->ilevel & ~s->dir;
476
        s->ilevel &= ~mask;
477
    }
478

    
479
    if (s->status & mask) {
480
        strongarm_gpio_irq_update(s);
481
    }
482
}
483

    
484
static void strongarm_gpio_handler_update(StrongARMGPIOInfo *s)
485
{
486
    uint32_t level, diff;
487
    int bit;
488

    
489
    level = s->olevel & s->dir;
490

    
491
    for (diff = s->prev_level ^ level; diff; diff ^= 1 << bit) {
492
        bit = ffs(diff) - 1;
493
        qemu_set_irq(s->handler[bit], (level >> bit) & 1);
494
    }
495

    
496
    s->prev_level = level;
497
}
498

    
499
static uint64_t strongarm_gpio_read(void *opaque, target_phys_addr_t offset,
500
                                    unsigned size)
501
{
502
    StrongARMGPIOInfo *s = opaque;
503

    
504
    switch (offset) {
505
    case GPDR:        /* GPIO Pin-Direction registers */
506
        return s->dir;
507

    
508
    case GPSR:        /* GPIO Pin-Output Set registers */
509
        DPRINTF("%s: Read from a write-only register 0x" TARGET_FMT_plx "\n",
510
                        __func__, offset);
511
        return s->gpsr;    /* Return last written value.  */
512

    
513
    case GPCR:        /* GPIO Pin-Output Clear registers */
514
        DPRINTF("%s: Read from a write-only register 0x" TARGET_FMT_plx "\n",
515
                        __func__, offset);
516
        return 31337;        /* Specified as unpredictable in the docs.  */
517

    
518
    case GRER:        /* GPIO Rising-Edge Detect Enable registers */
519
        return s->rising;
520

    
521
    case GFER:        /* GPIO Falling-Edge Detect Enable registers */
522
        return s->falling;
523

    
524
    case GAFR:        /* GPIO Alternate Function registers */
525
        return s->gafr;
526

    
527
    case GPLR:        /* GPIO Pin-Level registers */
528
        return (s->olevel & s->dir) |
529
               (s->ilevel & ~s->dir);
530

    
531
    case GEDR:        /* GPIO Edge Detect Status registers */
532
        return s->status;
533

    
534
    default:
535
        printf("%s: Bad offset 0x" TARGET_FMT_plx "\n", __func__, offset);
536
    }
537

    
538
    return 0;
539
}
540

    
541
static void strongarm_gpio_write(void *opaque, target_phys_addr_t offset,
542
                                 uint64_t value, unsigned size)
543
{
544
    StrongARMGPIOInfo *s = opaque;
545

    
546
    switch (offset) {
547
    case GPDR:        /* GPIO Pin-Direction registers */
548
        s->dir = value;
549
        strongarm_gpio_handler_update(s);
550
        break;
551

    
552
    case GPSR:        /* GPIO Pin-Output Set registers */
553
        s->olevel |= value;
554
        strongarm_gpio_handler_update(s);
555
        s->gpsr = value;
556
        break;
557

    
558
    case GPCR:        /* GPIO Pin-Output Clear registers */
559
        s->olevel &= ~value;
560
        strongarm_gpio_handler_update(s);
561
        break;
562

    
563
    case GRER:        /* GPIO Rising-Edge Detect Enable registers */
564
        s->rising = value;
565
        break;
566

    
567
    case GFER:        /* GPIO Falling-Edge Detect Enable registers */
568
        s->falling = value;
569
        break;
570

    
571
    case GAFR:        /* GPIO Alternate Function registers */
572
        s->gafr = value;
573
        break;
574

    
575
    case GEDR:        /* GPIO Edge Detect Status registers */
576
        s->status &= ~value;
577
        strongarm_gpio_irq_update(s);
578
        break;
579

    
580
    default:
581
        printf("%s: Bad offset 0x" TARGET_FMT_plx "\n", __func__, offset);
582
    }
583
}
584

    
585
static const MemoryRegionOps strongarm_gpio_ops = {
586
    .read = strongarm_gpio_read,
587
    .write = strongarm_gpio_write,
588
    .endianness = DEVICE_NATIVE_ENDIAN,
589
};
590

    
591
static DeviceState *strongarm_gpio_init(target_phys_addr_t base,
592
                DeviceState *pic)
593
{
594
    DeviceState *dev;
595
    int i;
596

    
597
    dev = qdev_create(NULL, "strongarm-gpio");
598
    qdev_init_nofail(dev);
599

    
600
    sysbus_mmio_map(sysbus_from_qdev(dev), 0, base);
601
    for (i = 0; i < 12; i++)
602
        sysbus_connect_irq(sysbus_from_qdev(dev), i,
603
                    qdev_get_gpio_in(pic, SA_PIC_GPIO0_EDGE + i));
604

    
605
    return dev;
606
}
607

    
608
static int strongarm_gpio_initfn(SysBusDevice *dev)
609
{
610
    StrongARMGPIOInfo *s;
611
    int i;
612

    
613
    s = FROM_SYSBUS(StrongARMGPIOInfo, dev);
614

    
615
    qdev_init_gpio_in(&dev->qdev, strongarm_gpio_set, 28);
616
    qdev_init_gpio_out(&dev->qdev, s->handler, 28);
617

    
618
    memory_region_init_io(&s->iomem, &strongarm_gpio_ops, s, "gpio", 0x1000);
619

    
620
    sysbus_init_mmio_region(dev, &s->iomem);
621
    for (i = 0; i < 11; i++) {
622
        sysbus_init_irq(dev, &s->irqs[i]);
623
    }
624
    sysbus_init_irq(dev, &s->irqX);
625

    
626
    return 0;
627
}
628

    
629
static const VMStateDescription vmstate_strongarm_gpio_regs = {
630
    .name = "strongarm-gpio",
631
    .version_id = 0,
632
    .minimum_version_id = 0,
633
    .minimum_version_id_old = 0,
634
    .fields = (VMStateField[]) {
635
        VMSTATE_UINT32(ilevel, StrongARMGPIOInfo),
636
        VMSTATE_UINT32(olevel, StrongARMGPIOInfo),
637
        VMSTATE_UINT32(dir, StrongARMGPIOInfo),
638
        VMSTATE_UINT32(rising, StrongARMGPIOInfo),
639
        VMSTATE_UINT32(falling, StrongARMGPIOInfo),
640
        VMSTATE_UINT32(status, StrongARMGPIOInfo),
641
        VMSTATE_UINT32(gafr, StrongARMGPIOInfo),
642
        VMSTATE_END_OF_LIST(),
643
    },
644
};
645

    
646
static SysBusDeviceInfo strongarm_gpio_info = {
647
    .init       = strongarm_gpio_initfn,
648
    .qdev.name  = "strongarm-gpio",
649
    .qdev.desc  = "StrongARM GPIO controller",
650
    .qdev.size  = sizeof(StrongARMGPIOInfo),
651
};
652

    
653
/* Peripheral Pin Controller */
654
#define PPDR 0x00
655
#define PPSR 0x04
656
#define PPAR 0x08
657
#define PSDR 0x0c
658
#define PPFR 0x10
659

    
660
typedef struct StrongARMPPCInfo StrongARMPPCInfo;
661
struct StrongARMPPCInfo {
662
    SysBusDevice busdev;
663
    MemoryRegion iomem;
664
    qemu_irq handler[28];
665

    
666
    uint32_t ilevel;
667
    uint32_t olevel;
668
    uint32_t dir;
669
    uint32_t ppar;
670
    uint32_t psdr;
671
    uint32_t ppfr;
672

    
673
    uint32_t prev_level;
674
};
675

    
676
static void strongarm_ppc_set(void *opaque, int line, int level)
677
{
678
    StrongARMPPCInfo *s = opaque;
679

    
680
    if (level) {
681
        s->ilevel |= 1 << line;
682
    } else {
683
        s->ilevel &= ~(1 << line);
684
    }
685
}
686

    
687
static void strongarm_ppc_handler_update(StrongARMPPCInfo *s)
688
{
689
    uint32_t level, diff;
690
    int bit;
691

    
692
    level = s->olevel & s->dir;
693

    
694
    for (diff = s->prev_level ^ level; diff; diff ^= 1 << bit) {
695
        bit = ffs(diff) - 1;
696
        qemu_set_irq(s->handler[bit], (level >> bit) & 1);
697
    }
698

    
699
    s->prev_level = level;
700
}
701

    
702
static uint64_t strongarm_ppc_read(void *opaque, target_phys_addr_t offset,
703
                                   unsigned size)
704
{
705
    StrongARMPPCInfo *s = opaque;
706

    
707
    switch (offset) {
708
    case PPDR:        /* PPC Pin Direction registers */
709
        return s->dir | ~0x3fffff;
710

    
711
    case PPSR:        /* PPC Pin State registers */
712
        return (s->olevel & s->dir) |
713
               (s->ilevel & ~s->dir) |
714
               ~0x3fffff;
715

    
716
    case PPAR:
717
        return s->ppar | ~0x41000;
718

    
719
    case PSDR:
720
        return s->psdr;
721

    
722
    case PPFR:
723
        return s->ppfr | ~0x7f001;
724

    
725
    default:
726
        printf("%s: Bad offset 0x" TARGET_FMT_plx "\n", __func__, offset);
727
    }
728

    
729
    return 0;
730
}
731

    
732
static void strongarm_ppc_write(void *opaque, target_phys_addr_t offset,
733
                                uint64_t value, unsigned size)
734
{
735
    StrongARMPPCInfo *s = opaque;
736

    
737
    switch (offset) {
738
    case PPDR:        /* PPC Pin Direction registers */
739
        s->dir = value & 0x3fffff;
740
        strongarm_ppc_handler_update(s);
741
        break;
742

    
743
    case PPSR:        /* PPC Pin State registers */
744
        s->olevel = value & s->dir & 0x3fffff;
745
        strongarm_ppc_handler_update(s);
746
        break;
747

    
748
    case PPAR:
749
        s->ppar = value & 0x41000;
750
        break;
751

    
752
    case PSDR:
753
        s->psdr = value & 0x3fffff;
754
        break;
755

    
756
    case PPFR:
757
        s->ppfr = value & 0x7f001;
758
        break;
759

    
760
    default:
761
        printf("%s: Bad offset 0x" TARGET_FMT_plx "\n", __func__, offset);
762
    }
763
}
764

    
765
static const MemoryRegionOps strongarm_ppc_ops = {
766
    .read = strongarm_ppc_read,
767
    .write = strongarm_ppc_write,
768
    .endianness = DEVICE_NATIVE_ENDIAN,
769
};
770

    
771
static int strongarm_ppc_init(SysBusDevice *dev)
772
{
773
    StrongARMPPCInfo *s;
774

    
775
    s = FROM_SYSBUS(StrongARMPPCInfo, dev);
776

    
777
    qdev_init_gpio_in(&dev->qdev, strongarm_ppc_set, 22);
778
    qdev_init_gpio_out(&dev->qdev, s->handler, 22);
779

    
780
    memory_region_init_io(&s->iomem, &strongarm_ppc_ops, s, "ppc", 0x1000);
781

    
782
    sysbus_init_mmio_region(dev, &s->iomem);
783

    
784
    return 0;
785
}
786

    
787
static const VMStateDescription vmstate_strongarm_ppc_regs = {
788
    .name = "strongarm-ppc",
789
    .version_id = 0,
790
    .minimum_version_id = 0,
791
    .minimum_version_id_old = 0,
792
    .fields = (VMStateField[]) {
793
        VMSTATE_UINT32(ilevel, StrongARMPPCInfo),
794
        VMSTATE_UINT32(olevel, StrongARMPPCInfo),
795
        VMSTATE_UINT32(dir, StrongARMPPCInfo),
796
        VMSTATE_UINT32(ppar, StrongARMPPCInfo),
797
        VMSTATE_UINT32(psdr, StrongARMPPCInfo),
798
        VMSTATE_UINT32(ppfr, StrongARMPPCInfo),
799
        VMSTATE_END_OF_LIST(),
800
    },
801
};
802

    
803
static SysBusDeviceInfo strongarm_ppc_info = {
804
    .init       = strongarm_ppc_init,
805
    .qdev.name  = "strongarm-ppc",
806
    .qdev.desc  = "StrongARM PPC controller",
807
    .qdev.size  = sizeof(StrongARMPPCInfo),
808
};
809

    
810
/* UART Ports */
811
#define UTCR0 0x00
812
#define UTCR1 0x04
813
#define UTCR2 0x08
814
#define UTCR3 0x0c
815
#define UTDR  0x14
816
#define UTSR0 0x1c
817
#define UTSR1 0x20
818

    
819
#define UTCR0_PE  (1 << 0) /* Parity enable */
820
#define UTCR0_OES (1 << 1) /* Even parity */
821
#define UTCR0_SBS (1 << 2) /* 2 stop bits */
822
#define UTCR0_DSS (1 << 3) /* 8-bit data */
823

    
824
#define UTCR3_RXE (1 << 0) /* Rx enable */
825
#define UTCR3_TXE (1 << 1) /* Tx enable */
826
#define UTCR3_BRK (1 << 2) /* Force Break */
827
#define UTCR3_RIE (1 << 3) /* Rx int enable */
828
#define UTCR3_TIE (1 << 4) /* Tx int enable */
829
#define UTCR3_LBM (1 << 5) /* Loopback */
830

    
831
#define UTSR0_TFS (1 << 0) /* Tx FIFO nearly empty */
832
#define UTSR0_RFS (1 << 1) /* Rx FIFO nearly full */
833
#define UTSR0_RID (1 << 2) /* Receiver Idle */
834
#define UTSR0_RBB (1 << 3) /* Receiver begin break */
835
#define UTSR0_REB (1 << 4) /* Receiver end break */
836
#define UTSR0_EIF (1 << 5) /* Error in FIFO */
837

    
838
#define UTSR1_RNE (1 << 1) /* Receive FIFO not empty */
839
#define UTSR1_TNF (1 << 2) /* Transmit FIFO not full */
840
#define UTSR1_PRE (1 << 3) /* Parity error */
841
#define UTSR1_FRE (1 << 4) /* Frame error */
842
#define UTSR1_ROR (1 << 5) /* Receive Over Run */
843

    
844
#define RX_FIFO_PRE (1 << 8)
845
#define RX_FIFO_FRE (1 << 9)
846
#define RX_FIFO_ROR (1 << 10)
847

    
848
typedef struct {
849
    SysBusDevice busdev;
850
    MemoryRegion iomem;
851
    CharDriverState *chr;
852
    qemu_irq irq;
853

    
854
    uint8_t utcr0;
855
    uint16_t brd;
856
    uint8_t utcr3;
857
    uint8_t utsr0;
858
    uint8_t utsr1;
859

    
860
    uint8_t tx_fifo[8];
861
    uint8_t tx_start;
862
    uint8_t tx_len;
863
    uint16_t rx_fifo[12]; /* value + error flags in high bits */
864
    uint8_t rx_start;
865
    uint8_t rx_len;
866

    
867
    uint64_t char_transmit_time; /* time to transmit a char in ticks*/
868
    bool wait_break_end;
869
    QEMUTimer *rx_timeout_timer;
870
    QEMUTimer *tx_timer;
871
} StrongARMUARTState;
872

    
873
static void strongarm_uart_update_status(StrongARMUARTState *s)
874
{
875
    uint16_t utsr1 = 0;
876

    
877
    if (s->tx_len != 8) {
878
        utsr1 |= UTSR1_TNF;
879
    }
880

    
881
    if (s->rx_len != 0) {
882
        uint16_t ent = s->rx_fifo[s->rx_start];
883

    
884
        utsr1 |= UTSR1_RNE;
885
        if (ent & RX_FIFO_PRE) {
886
            s->utsr1 |= UTSR1_PRE;
887
        }
888
        if (ent & RX_FIFO_FRE) {
889
            s->utsr1 |= UTSR1_FRE;
890
        }
891
        if (ent & RX_FIFO_ROR) {
892
            s->utsr1 |= UTSR1_ROR;
893
        }
894
    }
895

    
896
    s->utsr1 = utsr1;
897
}
898

    
899
static void strongarm_uart_update_int_status(StrongARMUARTState *s)
900
{
901
    uint16_t utsr0 = s->utsr0 &
902
            (UTSR0_REB | UTSR0_RBB | UTSR0_RID);
903
    int i;
904

    
905
    if ((s->utcr3 & UTCR3_TXE) &&
906
                (s->utcr3 & UTCR3_TIE) &&
907
                s->tx_len <= 4) {
908
        utsr0 |= UTSR0_TFS;
909
    }
910

    
911
    if ((s->utcr3 & UTCR3_RXE) &&
912
                (s->utcr3 & UTCR3_RIE) &&
913
                s->rx_len > 4) {
914
        utsr0 |= UTSR0_RFS;
915
    }
916

    
917
    for (i = 0; i < s->rx_len && i < 4; i++)
918
        if (s->rx_fifo[(s->rx_start + i) % 12] & ~0xff) {
919
            utsr0 |= UTSR0_EIF;
920
            break;
921
        }
922

    
923
    s->utsr0 = utsr0;
924
    qemu_set_irq(s->irq, utsr0);
925
}
926

    
927
static void strongarm_uart_update_parameters(StrongARMUARTState *s)
928
{
929
    int speed, parity, data_bits, stop_bits, frame_size;
930
    QEMUSerialSetParams ssp;
931

    
932
    /* Start bit. */
933
    frame_size = 1;
934
    if (s->utcr0 & UTCR0_PE) {
935
        /* Parity bit. */
936
        frame_size++;
937
        if (s->utcr0 & UTCR0_OES) {
938
            parity = 'E';
939
        } else {
940
            parity = 'O';
941
        }
942
    } else {
943
            parity = 'N';
944
    }
945
    if (s->utcr0 & UTCR0_SBS) {
946
        stop_bits = 2;
947
    } else {
948
        stop_bits = 1;
949
    }
950

    
951
    data_bits = (s->utcr0 & UTCR0_DSS) ? 8 : 7;
952
    frame_size += data_bits + stop_bits;
953
    speed = 3686400 / 16 / (s->brd + 1);
954
    ssp.speed = speed;
955
    ssp.parity = parity;
956
    ssp.data_bits = data_bits;
957
    ssp.stop_bits = stop_bits;
958
    s->char_transmit_time =  (get_ticks_per_sec() / speed) * frame_size;
959
    if (s->chr) {
960
        qemu_chr_fe_ioctl(s->chr, CHR_IOCTL_SERIAL_SET_PARAMS, &ssp);
961
    }
962

    
963
    DPRINTF(stderr, "%s speed=%d parity=%c data=%d stop=%d\n", s->chr->label,
964
            speed, parity, data_bits, stop_bits);
965
}
966

    
967
static void strongarm_uart_rx_to(void *opaque)
968
{
969
    StrongARMUARTState *s = opaque;
970

    
971
    if (s->rx_len) {
972
        s->utsr0 |= UTSR0_RID;
973
        strongarm_uart_update_int_status(s);
974
    }
975
}
976

    
977
static void strongarm_uart_rx_push(StrongARMUARTState *s, uint16_t c)
978
{
979
    if ((s->utcr3 & UTCR3_RXE) == 0) {
980
        /* rx disabled */
981
        return;
982
    }
983

    
984
    if (s->wait_break_end) {
985
        s->utsr0 |= UTSR0_REB;
986
        s->wait_break_end = false;
987
    }
988

    
989
    if (s->rx_len < 12) {
990
        s->rx_fifo[(s->rx_start + s->rx_len) % 12] = c;
991
        s->rx_len++;
992
    } else
993
        s->rx_fifo[(s->rx_start + 11) % 12] |= RX_FIFO_ROR;
994
}
995

    
996
static int strongarm_uart_can_receive(void *opaque)
997
{
998
    StrongARMUARTState *s = opaque;
999

    
1000
    if (s->rx_len == 12) {
1001
        return 0;
1002
    }
1003
    /* It's best not to get more than 2/3 of RX FIFO, so advertise that much */
1004
    if (s->rx_len < 8) {
1005
        return 8 - s->rx_len;
1006
    }
1007
    return 1;
1008
}
1009

    
1010
static void strongarm_uart_receive(void *opaque, const uint8_t *buf, int size)
1011
{
1012
    StrongARMUARTState *s = opaque;
1013
    int i;
1014

    
1015
    for (i = 0; i < size; i++) {
1016
        strongarm_uart_rx_push(s, buf[i]);
1017
    }
1018

    
1019
    /* call the timeout receive callback in 3 char transmit time */
1020
    qemu_mod_timer(s->rx_timeout_timer,
1021
                    qemu_get_clock_ns(vm_clock) + s->char_transmit_time * 3);
1022

    
1023
    strongarm_uart_update_status(s);
1024
    strongarm_uart_update_int_status(s);
1025
}
1026

    
1027
static void strongarm_uart_event(void *opaque, int event)
1028
{
1029
    StrongARMUARTState *s = opaque;
1030
    if (event == CHR_EVENT_BREAK) {
1031
        s->utsr0 |= UTSR0_RBB;
1032
        strongarm_uart_rx_push(s, RX_FIFO_FRE);
1033
        s->wait_break_end = true;
1034
        strongarm_uart_update_status(s);
1035
        strongarm_uart_update_int_status(s);
1036
    }
1037
}
1038

    
1039
static void strongarm_uart_tx(void *opaque)
1040
{
1041
    StrongARMUARTState *s = opaque;
1042
    uint64_t new_xmit_ts = qemu_get_clock_ns(vm_clock);
1043

    
1044
    if (s->utcr3 & UTCR3_LBM) /* loopback */ {
1045
        strongarm_uart_receive(s, &s->tx_fifo[s->tx_start], 1);
1046
    } else if (s->chr) {
1047
        qemu_chr_fe_write(s->chr, &s->tx_fifo[s->tx_start], 1);
1048
    }
1049

    
1050
    s->tx_start = (s->tx_start + 1) % 8;
1051
    s->tx_len--;
1052
    if (s->tx_len) {
1053
        qemu_mod_timer(s->tx_timer, new_xmit_ts + s->char_transmit_time);
1054
    }
1055
    strongarm_uart_update_status(s);
1056
    strongarm_uart_update_int_status(s);
1057
}
1058

    
1059
static uint64_t strongarm_uart_read(void *opaque, target_phys_addr_t addr,
1060
                                    unsigned size)
1061
{
1062
    StrongARMUARTState *s = opaque;
1063
    uint16_t ret;
1064

    
1065
    switch (addr) {
1066
    case UTCR0:
1067
        return s->utcr0;
1068

    
1069
    case UTCR1:
1070
        return s->brd >> 8;
1071

    
1072
    case UTCR2:
1073
        return s->brd & 0xff;
1074

    
1075
    case UTCR3:
1076
        return s->utcr3;
1077

    
1078
    case UTDR:
1079
        if (s->rx_len != 0) {
1080
            ret = s->rx_fifo[s->rx_start];
1081
            s->rx_start = (s->rx_start + 1) % 12;
1082
            s->rx_len--;
1083
            strongarm_uart_update_status(s);
1084
            strongarm_uart_update_int_status(s);
1085
            return ret;
1086
        }
1087
        return 0;
1088

    
1089
    case UTSR0:
1090
        return s->utsr0;
1091

    
1092
    case UTSR1:
1093
        return s->utsr1;
1094

    
1095
    default:
1096
        printf("%s: Bad register 0x" TARGET_FMT_plx "\n", __func__, addr);
1097
        return 0;
1098
    }
1099
}
1100

    
1101
static void strongarm_uart_write(void *opaque, target_phys_addr_t addr,
1102
                                 uint64_t value, unsigned size)
1103
{
1104
    StrongARMUARTState *s = opaque;
1105

    
1106
    switch (addr) {
1107
    case UTCR0:
1108
        s->utcr0 = value & 0x7f;
1109
        strongarm_uart_update_parameters(s);
1110
        break;
1111

    
1112
    case UTCR1:
1113
        s->brd = (s->brd & 0xff) | ((value & 0xf) << 8);
1114
        strongarm_uart_update_parameters(s);
1115
        break;
1116

    
1117
    case UTCR2:
1118
        s->brd = (s->brd & 0xf00) | (value & 0xff);
1119
        strongarm_uart_update_parameters(s);
1120
        break;
1121

    
1122
    case UTCR3:
1123
        s->utcr3 = value & 0x3f;
1124
        if ((s->utcr3 & UTCR3_RXE) == 0) {
1125
            s->rx_len = 0;
1126
        }
1127
        if ((s->utcr3 & UTCR3_TXE) == 0) {
1128
            s->tx_len = 0;
1129
        }
1130
        strongarm_uart_update_status(s);
1131
        strongarm_uart_update_int_status(s);
1132
        break;
1133

    
1134
    case UTDR:
1135
        if ((s->utcr3 & UTCR3_TXE) && s->tx_len != 8) {
1136
            s->tx_fifo[(s->tx_start + s->tx_len) % 8] = value;
1137
            s->tx_len++;
1138
            strongarm_uart_update_status(s);
1139
            strongarm_uart_update_int_status(s);
1140
            if (s->tx_len == 1) {
1141
                strongarm_uart_tx(s);
1142
            }
1143
        }
1144
        break;
1145

    
1146
    case UTSR0:
1147
        s->utsr0 = s->utsr0 & ~(value &
1148
                (UTSR0_REB | UTSR0_RBB | UTSR0_RID));
1149
        strongarm_uart_update_int_status(s);
1150
        break;
1151

    
1152
    default:
1153
        printf("%s: Bad register 0x" TARGET_FMT_plx "\n", __func__, addr);
1154
    }
1155
}
1156

    
1157
static const MemoryRegionOps strongarm_uart_ops = {
1158
    .read = strongarm_uart_read,
1159
    .write = strongarm_uart_write,
1160
    .endianness = DEVICE_NATIVE_ENDIAN,
1161
};
1162

    
1163
static int strongarm_uart_init(SysBusDevice *dev)
1164
{
1165
    StrongARMUARTState *s = FROM_SYSBUS(StrongARMUARTState, dev);
1166

    
1167
    memory_region_init_io(&s->iomem, &strongarm_uart_ops, s, "uart", 0x10000);
1168
    sysbus_init_mmio_region(dev, &s->iomem);
1169
    sysbus_init_irq(dev, &s->irq);
1170

    
1171
    s->rx_timeout_timer = qemu_new_timer_ns(vm_clock, strongarm_uart_rx_to, s);
1172
    s->tx_timer = qemu_new_timer_ns(vm_clock, strongarm_uart_tx, s);
1173

    
1174
    if (s->chr) {
1175
        qemu_chr_add_handlers(s->chr,
1176
                        strongarm_uart_can_receive,
1177
                        strongarm_uart_receive,
1178
                        strongarm_uart_event,
1179
                        s);
1180
    }
1181

    
1182
    return 0;
1183
}
1184

    
1185
static void strongarm_uart_reset(DeviceState *dev)
1186
{
1187
    StrongARMUARTState *s = DO_UPCAST(StrongARMUARTState, busdev.qdev, dev);
1188

    
1189
    s->utcr0 = UTCR0_DSS; /* 8 data, no parity */
1190
    s->brd = 23;    /* 9600 */
1191
    /* enable send & recv - this actually violates spec */
1192
    s->utcr3 = UTCR3_TXE | UTCR3_RXE;
1193

    
1194
    s->rx_len = s->tx_len = 0;
1195

    
1196
    strongarm_uart_update_parameters(s);
1197
    strongarm_uart_update_status(s);
1198
    strongarm_uart_update_int_status(s);
1199
}
1200

    
1201
static int strongarm_uart_post_load(void *opaque, int version_id)
1202
{
1203
    StrongARMUARTState *s = opaque;
1204

    
1205
    strongarm_uart_update_parameters(s);
1206
    strongarm_uart_update_status(s);
1207
    strongarm_uart_update_int_status(s);
1208

    
1209
    /* tx and restart timer */
1210
    if (s->tx_len) {
1211
        strongarm_uart_tx(s);
1212
    }
1213

    
1214
    /* restart rx timeout timer */
1215
    if (s->rx_len) {
1216
        qemu_mod_timer(s->rx_timeout_timer,
1217
                qemu_get_clock_ns(vm_clock) + s->char_transmit_time * 3);
1218
    }
1219

    
1220
    return 0;
1221
}
1222

    
1223
static const VMStateDescription vmstate_strongarm_uart_regs = {
1224
    .name = "strongarm-uart",
1225
    .version_id = 0,
1226
    .minimum_version_id = 0,
1227
    .minimum_version_id_old = 0,
1228
    .post_load = strongarm_uart_post_load,
1229
    .fields = (VMStateField[]) {
1230
        VMSTATE_UINT8(utcr0, StrongARMUARTState),
1231
        VMSTATE_UINT16(brd, StrongARMUARTState),
1232
        VMSTATE_UINT8(utcr3, StrongARMUARTState),
1233
        VMSTATE_UINT8(utsr0, StrongARMUARTState),
1234
        VMSTATE_UINT8_ARRAY(tx_fifo, StrongARMUARTState, 8),
1235
        VMSTATE_UINT8(tx_start, StrongARMUARTState),
1236
        VMSTATE_UINT8(tx_len, StrongARMUARTState),
1237
        VMSTATE_UINT16_ARRAY(rx_fifo, StrongARMUARTState, 12),
1238
        VMSTATE_UINT8(rx_start, StrongARMUARTState),
1239
        VMSTATE_UINT8(rx_len, StrongARMUARTState),
1240
        VMSTATE_BOOL(wait_break_end, StrongARMUARTState),
1241
        VMSTATE_END_OF_LIST(),
1242
    },
1243
};
1244

    
1245
static SysBusDeviceInfo strongarm_uart_info = {
1246
    .init       = strongarm_uart_init,
1247
    .qdev.name  = "strongarm-uart",
1248
    .qdev.desc  = "StrongARM UART controller",
1249
    .qdev.size  = sizeof(StrongARMUARTState),
1250
    .qdev.reset = strongarm_uart_reset,
1251
    .qdev.vmsd  = &vmstate_strongarm_uart_regs,
1252
    .qdev.props = (Property[]) {
1253
        DEFINE_PROP_CHR("chardev", StrongARMUARTState, chr),
1254
        DEFINE_PROP_END_OF_LIST(),
1255
    }
1256
};
1257

    
1258
/* Synchronous Serial Ports */
1259
typedef struct {
1260
    SysBusDevice busdev;
1261
    MemoryRegion iomem;
1262
    qemu_irq irq;
1263
    SSIBus *bus;
1264

    
1265
    uint16_t sscr[2];
1266
    uint16_t sssr;
1267

    
1268
    uint16_t rx_fifo[8];
1269
    uint8_t rx_level;
1270
    uint8_t rx_start;
1271
} StrongARMSSPState;
1272

    
1273
#define SSCR0 0x60 /* SSP Control register 0 */
1274
#define SSCR1 0x64 /* SSP Control register 1 */
1275
#define SSDR  0x6c /* SSP Data register */
1276
#define SSSR  0x74 /* SSP Status register */
1277

    
1278
/* Bitfields for above registers */
1279
#define SSCR0_SPI(x)    (((x) & 0x30) == 0x00)
1280
#define SSCR0_SSP(x)    (((x) & 0x30) == 0x10)
1281
#define SSCR0_UWIRE(x)  (((x) & 0x30) == 0x20)
1282
#define SSCR0_PSP(x)    (((x) & 0x30) == 0x30)
1283
#define SSCR0_SSE       (1 << 7)
1284
#define SSCR0_DSS(x)    (((x) & 0xf) + 1)
1285
#define SSCR1_RIE       (1 << 0)
1286
#define SSCR1_TIE       (1 << 1)
1287
#define SSCR1_LBM       (1 << 2)
1288
#define SSSR_TNF        (1 << 2)
1289
#define SSSR_RNE        (1 << 3)
1290
#define SSSR_TFS        (1 << 5)
1291
#define SSSR_RFS        (1 << 6)
1292
#define SSSR_ROR        (1 << 7)
1293
#define SSSR_RW         0x0080
1294

    
1295
static void strongarm_ssp_int_update(StrongARMSSPState *s)
1296
{
1297
    int level = 0;
1298

    
1299
    level |= (s->sssr & SSSR_ROR);
1300
    level |= (s->sssr & SSSR_RFS)  &&  (s->sscr[1] & SSCR1_RIE);
1301
    level |= (s->sssr & SSSR_TFS)  &&  (s->sscr[1] & SSCR1_TIE);
1302
    qemu_set_irq(s->irq, level);
1303
}
1304

    
1305
static void strongarm_ssp_fifo_update(StrongARMSSPState *s)
1306
{
1307
    s->sssr &= ~SSSR_TFS;
1308
    s->sssr &= ~SSSR_TNF;
1309
    if (s->sscr[0] & SSCR0_SSE) {
1310
        if (s->rx_level >= 4) {
1311
            s->sssr |= SSSR_RFS;
1312
        } else {
1313
            s->sssr &= ~SSSR_RFS;
1314
        }
1315
        if (s->rx_level) {
1316
            s->sssr |= SSSR_RNE;
1317
        } else {
1318
            s->sssr &= ~SSSR_RNE;
1319
        }
1320
        /* TX FIFO is never filled, so it is always in underrun
1321
           condition if SSP is enabled */
1322
        s->sssr |= SSSR_TFS;
1323
        s->sssr |= SSSR_TNF;
1324
    }
1325

    
1326
    strongarm_ssp_int_update(s);
1327
}
1328

    
1329
static uint64_t strongarm_ssp_read(void *opaque, target_phys_addr_t addr,
1330
                                   unsigned size)
1331
{
1332
    StrongARMSSPState *s = opaque;
1333
    uint32_t retval;
1334

    
1335
    switch (addr) {
1336
    case SSCR0:
1337
        return s->sscr[0];
1338
    case SSCR1:
1339
        return s->sscr[1];
1340
    case SSSR:
1341
        return s->sssr;
1342
    case SSDR:
1343
        if (~s->sscr[0] & SSCR0_SSE) {
1344
            return 0xffffffff;
1345
        }
1346
        if (s->rx_level < 1) {
1347
            printf("%s: SSP Rx Underrun\n", __func__);
1348
            return 0xffffffff;
1349
        }
1350
        s->rx_level--;
1351
        retval = s->rx_fifo[s->rx_start++];
1352
        s->rx_start &= 0x7;
1353
        strongarm_ssp_fifo_update(s);
1354
        return retval;
1355
    default:
1356
        printf("%s: Bad register 0x" TARGET_FMT_plx "\n", __func__, addr);
1357
        break;
1358
    }
1359
    return 0;
1360
}
1361

    
1362
static void strongarm_ssp_write(void *opaque, target_phys_addr_t addr,
1363
                                uint64_t value, unsigned size)
1364
{
1365
    StrongARMSSPState *s = opaque;
1366

    
1367
    switch (addr) {
1368
    case SSCR0:
1369
        s->sscr[0] = value & 0xffbf;
1370
        if ((s->sscr[0] & SSCR0_SSE) && SSCR0_DSS(value) < 4) {
1371
            printf("%s: Wrong data size: %i bits\n", __func__,
1372
                   (int)SSCR0_DSS(value));
1373
        }
1374
        if (!(value & SSCR0_SSE)) {
1375
            s->sssr = 0;
1376
            s->rx_level = 0;
1377
        }
1378
        strongarm_ssp_fifo_update(s);
1379
        break;
1380

    
1381
    case SSCR1:
1382
        s->sscr[1] = value & 0x2f;
1383
        if (value & SSCR1_LBM) {
1384
            printf("%s: Attempt to use SSP LBM mode\n", __func__);
1385
        }
1386
        strongarm_ssp_fifo_update(s);
1387
        break;
1388

    
1389
    case SSSR:
1390
        s->sssr &= ~(value & SSSR_RW);
1391
        strongarm_ssp_int_update(s);
1392
        break;
1393

    
1394
    case SSDR:
1395
        if (SSCR0_UWIRE(s->sscr[0])) {
1396
            value &= 0xff;
1397
        } else
1398
            /* Note how 32bits overflow does no harm here */
1399
            value &= (1 << SSCR0_DSS(s->sscr[0])) - 1;
1400

    
1401
        /* Data goes from here to the Tx FIFO and is shifted out from
1402
         * there directly to the slave, no need to buffer it.
1403
         */
1404
        if (s->sscr[0] & SSCR0_SSE) {
1405
            uint32_t readval;
1406
            if (s->sscr[1] & SSCR1_LBM) {
1407
                readval = value;
1408
            } else {
1409
                readval = ssi_transfer(s->bus, value);
1410
            }
1411

    
1412
            if (s->rx_level < 0x08) {
1413
                s->rx_fifo[(s->rx_start + s->rx_level++) & 0x7] = readval;
1414
            } else {
1415
                s->sssr |= SSSR_ROR;
1416
            }
1417
        }
1418
        strongarm_ssp_fifo_update(s);
1419
        break;
1420

    
1421
    default:
1422
        printf("%s: Bad register 0x" TARGET_FMT_plx "\n", __func__, addr);
1423
        break;
1424
    }
1425
}
1426

    
1427
static const MemoryRegionOps strongarm_ssp_ops = {
1428
    .read = strongarm_ssp_read,
1429
    .write = strongarm_ssp_write,
1430
    .endianness = DEVICE_NATIVE_ENDIAN,
1431
};
1432

    
1433
static int strongarm_ssp_post_load(void *opaque, int version_id)
1434
{
1435
    StrongARMSSPState *s = opaque;
1436

    
1437
    strongarm_ssp_fifo_update(s);
1438

    
1439
    return 0;
1440
}
1441

    
1442
static int strongarm_ssp_init(SysBusDevice *dev)
1443
{
1444
    StrongARMSSPState *s = FROM_SYSBUS(StrongARMSSPState, dev);
1445

    
1446
    sysbus_init_irq(dev, &s->irq);
1447

    
1448
    memory_region_init_io(&s->iomem, &strongarm_ssp_ops, s, "ssp", 0x1000);
1449
    sysbus_init_mmio_region(dev, &s->iomem);
1450

    
1451
    s->bus = ssi_create_bus(&dev->qdev, "ssi");
1452
    return 0;
1453
}
1454

    
1455
static void strongarm_ssp_reset(DeviceState *dev)
1456
{
1457
    StrongARMSSPState *s = DO_UPCAST(StrongARMSSPState, busdev.qdev, dev);
1458
    s->sssr = 0x03; /* 3 bit data, SPI, disabled */
1459
    s->rx_start = 0;
1460
    s->rx_level = 0;
1461
}
1462

    
1463
static const VMStateDescription vmstate_strongarm_ssp_regs = {
1464
    .name = "strongarm-ssp",
1465
    .version_id = 0,
1466
    .minimum_version_id = 0,
1467
    .minimum_version_id_old = 0,
1468
    .post_load = strongarm_ssp_post_load,
1469
    .fields = (VMStateField[]) {
1470
        VMSTATE_UINT16_ARRAY(sscr, StrongARMSSPState, 2),
1471
        VMSTATE_UINT16(sssr, StrongARMSSPState),
1472
        VMSTATE_UINT16_ARRAY(rx_fifo, StrongARMSSPState, 8),
1473
        VMSTATE_UINT8(rx_start, StrongARMSSPState),
1474
        VMSTATE_UINT8(rx_level, StrongARMSSPState),
1475
        VMSTATE_END_OF_LIST(),
1476
    },
1477
};
1478

    
1479
static SysBusDeviceInfo strongarm_ssp_info = {
1480
    .init       = strongarm_ssp_init,
1481
    .qdev.name  = "strongarm-ssp",
1482
    .qdev.desc  = "StrongARM SSP controller",
1483
    .qdev.size  = sizeof(StrongARMSSPState),
1484
    .qdev.reset = strongarm_ssp_reset,
1485
    .qdev.vmsd  = &vmstate_strongarm_ssp_regs,
1486
};
1487

    
1488
/* Main CPU functions */
1489
StrongARMState *sa1110_init(MemoryRegion *sysmem,
1490
                            unsigned int sdram_size, const char *rev)
1491
{
1492
    StrongARMState *s;
1493
    qemu_irq *pic;
1494
    int i;
1495

    
1496
    s = g_malloc0(sizeof(StrongARMState));
1497

    
1498
    if (!rev) {
1499
        rev = "sa1110-b5";
1500
    }
1501

    
1502
    if (strncmp(rev, "sa1110", 6)) {
1503
        error_report("Machine requires a SA1110 processor.");
1504
        exit(1);
1505
    }
1506

    
1507
    s->env = cpu_init(rev);
1508

    
1509
    if (!s->env) {
1510
        error_report("Unable to find CPU definition");
1511
        exit(1);
1512
    }
1513

    
1514
    memory_region_init_ram(&s->sdram, NULL, "strongarm.sdram", sdram_size);
1515
    memory_region_add_subregion(sysmem, SA_SDCS0, &s->sdram);
1516

    
1517
    pic = arm_pic_init_cpu(s->env);
1518
    s->pic = sysbus_create_varargs("strongarm_pic", 0x90050000,
1519
                    pic[ARM_PIC_CPU_IRQ], pic[ARM_PIC_CPU_FIQ], NULL);
1520

    
1521
    sysbus_create_varargs("pxa25x-timer", 0x90000000,
1522
                    qdev_get_gpio_in(s->pic, SA_PIC_OSTC0),
1523
                    qdev_get_gpio_in(s->pic, SA_PIC_OSTC1),
1524
                    qdev_get_gpio_in(s->pic, SA_PIC_OSTC2),
1525
                    qdev_get_gpio_in(s->pic, SA_PIC_OSTC3),
1526
                    NULL);
1527

    
1528
    sysbus_create_simple("strongarm-rtc", 0x90010000,
1529
                    qdev_get_gpio_in(s->pic, SA_PIC_RTC_ALARM));
1530

    
1531
    s->gpio = strongarm_gpio_init(0x90040000, s->pic);
1532

    
1533
    s->ppc = sysbus_create_varargs("strongarm-ppc", 0x90060000, NULL);
1534

    
1535
    for (i = 0; sa_serial[i].io_base; i++) {
1536
        DeviceState *dev = qdev_create(NULL, "strongarm-uart");
1537
        qdev_prop_set_chr(dev, "chardev", serial_hds[i]);
1538
        qdev_init_nofail(dev);
1539
        sysbus_mmio_map(sysbus_from_qdev(dev), 0,
1540
                sa_serial[i].io_base);
1541
        sysbus_connect_irq(sysbus_from_qdev(dev), 0,
1542
                qdev_get_gpio_in(s->pic, sa_serial[i].irq));
1543
    }
1544

    
1545
    s->ssp = sysbus_create_varargs("strongarm-ssp", 0x80070000,
1546
                qdev_get_gpio_in(s->pic, SA_PIC_SSP), NULL);
1547
    s->ssp_bus = (SSIBus *)qdev_get_child_bus(s->ssp, "ssi");
1548

    
1549
    return s;
1550
}
1551

    
1552
static void strongarm_register_devices(void)
1553
{
1554
    sysbus_register_withprop(&strongarm_pic_info);
1555
    sysbus_register_withprop(&strongarm_rtc_sysbus_info);
1556
    sysbus_register_withprop(&strongarm_gpio_info);
1557
    sysbus_register_withprop(&strongarm_ppc_info);
1558
    sysbus_register_withprop(&strongarm_uart_info);
1559
    sysbus_register_withprop(&strongarm_ssp_info);
1560
}
1561
device_init(strongarm_register_devices)