Statistics
| Branch: | Revision:

root / hw / omap2.c @ 8c5e95d8

History | View | Annotate | Download (123.6 kB)

1
/*
2
 * TI OMAP processors emulation.
3
 *
4
 * Copyright (C) 2007-2008 Nokia Corporation
5
 * Written by Andrzej Zaborowski <andrew@openedhand.com>
6
 *
7
 * This program is free software; you can redistribute it and/or
8
 * modify it under the terms of the GNU General Public License as
9
 * published by the Free Software Foundation; either version 2 or
10
 * (at your option) version 3 of the License.
11
 *
12
 * This program is distributed in the hope that it will be useful,
13
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15
 * GNU General Public License for more details.
16
 *
17
 * You should have received a copy of the GNU General Public License
18
 * along with this program; if not, write to the Free Software
19
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
20
 * MA 02111-1307 USA
21
 */
22
#include "hw.h"
23
#include "arm-misc.h"
24
#include "omap.h"
25
#include "sysemu.h"
26
#include "qemu-timer.h"
27
#include "qemu-char.h"
28
#include "flash.h"
29

    
30
/* GP timers */
31
struct omap_gp_timer_s {
32
    qemu_irq irq;
33
    qemu_irq wkup;
34
    qemu_irq in;
35
    qemu_irq out;
36
    omap_clk clk;
37
    target_phys_addr_t base;
38
    QEMUTimer *timer;
39
    QEMUTimer *match;
40
    struct omap_target_agent_s *ta;
41

    
42
    int in_val;
43
    int out_val;
44
    int64_t time;
45
    int64_t rate;
46
    int64_t ticks_per_sec;
47

    
48
    int16_t config;
49
    int status;
50
    int it_ena;
51
    int wu_ena;
52
    int enable;
53
    int inout;
54
    int capt2;
55
    int pt;
56
    enum {
57
        gpt_trigger_none, gpt_trigger_overflow, gpt_trigger_both
58
    } trigger;
59
    enum {
60
        gpt_capture_none, gpt_capture_rising,
61
        gpt_capture_falling, gpt_capture_both
62
    } capture;
63
    int scpwm;
64
    int ce;
65
    int pre;
66
    int ptv;
67
    int ar;
68
    int st;
69
    int posted;
70
    uint32_t val;
71
    uint32_t load_val;
72
    uint32_t capture_val[2];
73
    uint32_t match_val;
74
    int capt_num;
75

    
76
    uint16_t writeh;        /* LSB */
77
    uint16_t readh;        /* MSB */
78
};
79

    
80
#define GPT_TCAR_IT        (1 << 2)
81
#define GPT_OVF_IT        (1 << 1)
82
#define GPT_MAT_IT        (1 << 0)
83

    
84
static inline void omap_gp_timer_intr(struct omap_gp_timer_s *timer, int it)
85
{
86
    if (timer->it_ena & it) {
87
        if (!timer->status)
88
            qemu_irq_raise(timer->irq);
89

    
90
        timer->status |= it;
91
        /* Or are the status bits set even when masked?
92
         * i.e. is masking applied before or after the status register?  */
93
    }
94

    
95
    if (timer->wu_ena & it)
96
        qemu_irq_pulse(timer->wkup);
97
}
98

    
99
static inline void omap_gp_timer_out(struct omap_gp_timer_s *timer, int level)
100
{
101
    if (!timer->inout && timer->out_val != level) {
102
        timer->out_val = level;
103
        qemu_set_irq(timer->out, level);
104
    }
105
}
106

    
107
static inline uint32_t omap_gp_timer_read(struct omap_gp_timer_s *timer)
108
{
109
    uint64_t distance;
110

    
111
    if (timer->st && timer->rate) {
112
        distance = qemu_get_clock(vm_clock) - timer->time;
113
        distance = muldiv64(distance, timer->rate, timer->ticks_per_sec);
114

    
115
        if (distance >= 0xffffffff - timer->val)
116
            return 0xffffffff;
117
        else
118
            return timer->val + distance;
119
    } else
120
        return timer->val;
121
}
122

    
123
static inline void omap_gp_timer_sync(struct omap_gp_timer_s *timer)
124
{
125
    if (timer->st) {
126
        timer->val = omap_gp_timer_read(timer);
127
        timer->time = qemu_get_clock(vm_clock);
128
    }
129
}
130

    
131
static inline void omap_gp_timer_update(struct omap_gp_timer_s *timer)
132
{
133
    int64_t expires, matches;
134

    
135
    if (timer->st && timer->rate) {
136
        expires = muldiv64(0x100000000ll - timer->val,
137
                        timer->ticks_per_sec, timer->rate);
138
        qemu_mod_timer(timer->timer, timer->time + expires);
139

    
140
        if (timer->ce && timer->match_val >= timer->val) {
141
            matches = muldiv64(timer->match_val - timer->val,
142
                            timer->ticks_per_sec, timer->rate);
143
            qemu_mod_timer(timer->match, timer->time + matches);
144
        } else
145
            qemu_del_timer(timer->match);
146
    } else {
147
        qemu_del_timer(timer->timer);
148
        qemu_del_timer(timer->match);
149
        omap_gp_timer_out(timer, timer->scpwm);
150
    }
151
}
152

    
153
static inline void omap_gp_timer_trigger(struct omap_gp_timer_s *timer)
154
{
155
    if (timer->pt)
156
        /* TODO in overflow-and-match mode if the first event to
157
         * occurs is the match, don't toggle.  */
158
        omap_gp_timer_out(timer, !timer->out_val);
159
    else
160
        /* TODO inverted pulse on timer->out_val == 1?  */
161
        qemu_irq_pulse(timer->out);
162
}
163

    
164
static void omap_gp_timer_tick(void *opaque)
165
{
166
    struct omap_gp_timer_s *timer = (struct omap_gp_timer_s *) opaque;
167

    
168
    if (!timer->ar) {
169
        timer->st = 0;
170
        timer->val = 0;
171
    } else {
172
        timer->val = timer->load_val;
173
        timer->time = qemu_get_clock(vm_clock);
174
    }
175

    
176
    if (timer->trigger == gpt_trigger_overflow ||
177
                    timer->trigger == gpt_trigger_both)
178
        omap_gp_timer_trigger(timer);
179

    
180
    omap_gp_timer_intr(timer, GPT_OVF_IT);
181
    omap_gp_timer_update(timer);
182
}
183

    
184
static void omap_gp_timer_match(void *opaque)
185
{
186
    struct omap_gp_timer_s *timer = (struct omap_gp_timer_s *) opaque;
187

    
188
    if (timer->trigger == gpt_trigger_both)
189
        omap_gp_timer_trigger(timer);
190

    
191
    omap_gp_timer_intr(timer, GPT_MAT_IT);
192
}
193

    
194
static void omap_gp_timer_input(void *opaque, int line, int on)
195
{
196
    struct omap_gp_timer_s *s = (struct omap_gp_timer_s *) opaque;
197
    int trigger;
198

    
199
    switch (s->capture) {
200
    default:
201
    case gpt_capture_none:
202
        trigger = 0;
203
        break;
204
    case gpt_capture_rising:
205
        trigger = !s->in_val && on;
206
        break;
207
    case gpt_capture_falling:
208
        trigger = s->in_val && !on;
209
        break;
210
    case gpt_capture_both:
211
        trigger = (s->in_val == !on);
212
        break;
213
    }
214
    s->in_val = on;
215

    
216
    if (s->inout && trigger && s->capt_num < 2) {
217
        s->capture_val[s->capt_num] = omap_gp_timer_read(s);
218

    
219
        if (s->capt2 == s->capt_num ++)
220
            omap_gp_timer_intr(s, GPT_TCAR_IT);
221
    }
222
}
223

    
224
static void omap_gp_timer_clk_update(void *opaque, int line, int on)
225
{
226
    struct omap_gp_timer_s *timer = (struct omap_gp_timer_s *) opaque;
227

    
228
    omap_gp_timer_sync(timer);
229
    timer->rate = on ? omap_clk_getrate(timer->clk) : 0;
230
    omap_gp_timer_update(timer);
231
}
232

    
233
static void omap_gp_timer_clk_setup(struct omap_gp_timer_s *timer)
234
{
235
    omap_clk_adduser(timer->clk,
236
                    qemu_allocate_irqs(omap_gp_timer_clk_update, timer, 1)[0]);
237
    timer->rate = omap_clk_getrate(timer->clk);
238
}
239

    
240
static void omap_gp_timer_reset(struct omap_gp_timer_s *s)
241
{
242
    s->config = 0x000;
243
    s->status = 0;
244
    s->it_ena = 0;
245
    s->wu_ena = 0;
246
    s->inout = 0;
247
    s->capt2 = 0;
248
    s->capt_num = 0;
249
    s->pt = 0;
250
    s->trigger = gpt_trigger_none;
251
    s->capture = gpt_capture_none;
252
    s->scpwm = 0;
253
    s->ce = 0;
254
    s->pre = 0;
255
    s->ptv = 0;
256
    s->ar = 0;
257
    s->st = 0;
258
    s->posted = 1;
259
    s->val = 0x00000000;
260
    s->load_val = 0x00000000;
261
    s->capture_val[0] = 0x00000000;
262
    s->capture_val[1] = 0x00000000;
263
    s->match_val = 0x00000000;
264
    omap_gp_timer_update(s);
265
}
266

    
267
static uint32_t omap_gp_timer_readw(void *opaque, target_phys_addr_t addr)
268
{
269
    struct omap_gp_timer_s *s = (struct omap_gp_timer_s *) opaque;
270
    int offset = addr - s->base;
271

    
272
    switch (offset) {
273
    case 0x00:        /* TIDR */
274
        return 0x21;
275

    
276
    case 0x10:        /* TIOCP_CFG */
277
        return s->config;
278

    
279
    case 0x14:        /* TISTAT */
280
        /* ??? When's this bit reset? */
281
        return 1;                                                /* RESETDONE */
282

    
283
    case 0x18:        /* TISR */
284
        return s->status;
285

    
286
    case 0x1c:        /* TIER */
287
        return s->it_ena;
288

    
289
    case 0x20:        /* TWER */
290
        return s->wu_ena;
291

    
292
    case 0x24:        /* TCLR */
293
        return (s->inout << 14) |
294
                (s->capt2 << 13) |
295
                (s->pt << 12) |
296
                (s->trigger << 10) |
297
                (s->capture << 8) |
298
                (s->scpwm << 7) |
299
                (s->ce << 6) |
300
                (s->pre << 5) |
301
                (s->ptv << 2) |
302
                (s->ar << 1) |
303
                (s->st << 0);
304

    
305
    case 0x28:        /* TCRR */
306
        return omap_gp_timer_read(s);
307

    
308
    case 0x2c:        /* TLDR */
309
        return s->load_val;
310

    
311
    case 0x30:        /* TTGR */
312
        return 0xffffffff;
313

    
314
    case 0x34:        /* TWPS */
315
        return 0x00000000;        /* No posted writes pending.  */
316

    
317
    case 0x38:        /* TMAR */
318
        return s->match_val;
319

    
320
    case 0x3c:        /* TCAR1 */
321
        return s->capture_val[0];
322

    
323
    case 0x40:        /* TSICR */
324
        return s->posted << 2;
325

    
326
    case 0x44:        /* TCAR2 */
327
        return s->capture_val[1];
328
    }
329

    
330
    OMAP_BAD_REG(addr);
331
    return 0;
332
}
333

    
334
static uint32_t omap_gp_timer_readh(void *opaque, target_phys_addr_t addr)
335
{
336
    struct omap_gp_timer_s *s = (struct omap_gp_timer_s *) opaque;
337
    uint32_t ret;
338

    
339
    if (addr & 2)
340
        return s->readh;
341
    else {
342
        ret = omap_gp_timer_readw(opaque, addr);
343
        s->readh = ret >> 16;
344
        return ret & 0xffff;
345
    }
346
}
347

    
348
static CPUReadMemoryFunc *omap_gp_timer_readfn[] = {
349
    omap_badwidth_read32,
350
    omap_gp_timer_readh,
351
    omap_gp_timer_readw,
352
};
353

    
354
static void omap_gp_timer_write(void *opaque, target_phys_addr_t addr,
355
                uint32_t value)
356
{
357
    struct omap_gp_timer_s *s = (struct omap_gp_timer_s *) opaque;
358
    int offset = addr - s->base;
359

    
360
    switch (offset) {
361
    case 0x00:        /* TIDR */
362
    case 0x14:        /* TISTAT */
363
    case 0x34:        /* TWPS */
364
    case 0x3c:        /* TCAR1 */
365
    case 0x44:        /* TCAR2 */
366
        OMAP_RO_REG(addr);
367
        break;
368

    
369
    case 0x10:        /* TIOCP_CFG */
370
        s->config = value & 0x33d;
371
        if (((value >> 3) & 3) == 3)                                /* IDLEMODE */
372
            fprintf(stderr, "%s: illegal IDLEMODE value in TIOCP_CFG\n",
373
                            __FUNCTION__);
374
        if (value & 2)                                                /* SOFTRESET */
375
            omap_gp_timer_reset(s);
376
        break;
377

    
378
    case 0x18:        /* TISR */
379
        if (value & GPT_TCAR_IT)
380
            s->capt_num = 0;
381
        if (s->status && !(s->status &= ~value))
382
            qemu_irq_lower(s->irq);
383
        break;
384

    
385
    case 0x1c:        /* TIER */
386
        s->it_ena = value & 7;
387
        break;
388

    
389
    case 0x20:        /* TWER */
390
        s->wu_ena = value & 7;
391
        break;
392

    
393
    case 0x24:        /* TCLR */
394
        omap_gp_timer_sync(s);
395
        s->inout = (value >> 14) & 1;
396
        s->capt2 = (value >> 13) & 1;
397
        s->pt = (value >> 12) & 1;
398
        s->trigger = (value >> 10) & 3;
399
        if (s->capture == gpt_capture_none &&
400
                        ((value >> 8) & 3) != gpt_capture_none)
401
            s->capt_num = 0;
402
        s->capture = (value >> 8) & 3;
403
        s->scpwm = (value >> 7) & 1;
404
        s->ce = (value >> 6) & 1;
405
        s->pre = (value >> 5) & 1;
406
        s->ptv = (value >> 2) & 7;
407
        s->ar = (value >> 1) & 1;
408
        s->st = (value >> 0) & 1;
409
        if (s->inout && s->trigger != gpt_trigger_none)
410
            fprintf(stderr, "%s: GP timer pin must be an output "
411
                            "for this trigger mode\n", __FUNCTION__);
412
        if (!s->inout && s->capture != gpt_capture_none)
413
            fprintf(stderr, "%s: GP timer pin must be an input "
414
                            "for this capture mode\n", __FUNCTION__);
415
        if (s->trigger == gpt_trigger_none)
416
            omap_gp_timer_out(s, s->scpwm);
417
        /* TODO: make sure this doesn't overflow 32-bits */
418
        s->ticks_per_sec = ticks_per_sec << (s->pre ? s->ptv + 1 : 0);
419
        omap_gp_timer_update(s);
420
        break;
421

    
422
    case 0x28:        /* TCRR */
423
        s->time = qemu_get_clock(vm_clock);
424
        s->val = value;
425
        omap_gp_timer_update(s);
426
        break;
427

    
428
    case 0x2c:        /* TLDR */
429
        s->load_val = value;
430
        break;
431

    
432
    case 0x30:        /* TTGR */
433
        s->time = qemu_get_clock(vm_clock);
434
        s->val = s->load_val;
435
        omap_gp_timer_update(s);
436
        break;
437

    
438
    case 0x38:        /* TMAR */
439
        omap_gp_timer_sync(s);
440
        s->match_val = value;
441
        omap_gp_timer_update(s);
442
        break;
443

    
444
    case 0x40:        /* TSICR */
445
        s->posted = (value >> 2) & 1;
446
        if (value & 2)        /* How much exactly are we supposed to reset? */
447
            omap_gp_timer_reset(s);
448
        break;
449

    
450
    default:
451
        OMAP_BAD_REG(addr);
452
    }
453
}
454

    
455
static void omap_gp_timer_writeh(void *opaque, target_phys_addr_t addr,
456
                uint32_t value)
457
{
458
    struct omap_gp_timer_s *s = (struct omap_gp_timer_s *) opaque;
459

    
460
    if (addr & 2)
461
        return omap_gp_timer_write(opaque, addr, (value << 16) | s->writeh);
462
    else
463
        s->writeh = (uint16_t) value;
464
}
465

    
466
static CPUWriteMemoryFunc *omap_gp_timer_writefn[] = {
467
    omap_badwidth_write32,
468
    omap_gp_timer_writeh,
469
    omap_gp_timer_write,
470
};
471

    
472
struct omap_gp_timer_s *omap_gp_timer_init(struct omap_target_agent_s *ta,
473
                qemu_irq irq, omap_clk fclk, omap_clk iclk)
474
{
475
    int iomemtype;
476
    struct omap_gp_timer_s *s = (struct omap_gp_timer_s *)
477
            qemu_mallocz(sizeof(struct omap_gp_timer_s));
478

    
479
    s->ta = ta;
480
    s->irq = irq;
481
    s->clk = fclk;
482
    s->timer = qemu_new_timer(vm_clock, omap_gp_timer_tick, s);
483
    s->match = qemu_new_timer(vm_clock, omap_gp_timer_match, s);
484
    s->in = qemu_allocate_irqs(omap_gp_timer_input, s, 1)[0];
485
    omap_gp_timer_reset(s);
486
    omap_gp_timer_clk_setup(s);
487

    
488
    iomemtype = l4_register_io_memory(0, omap_gp_timer_readfn,
489
                    omap_gp_timer_writefn, s);
490
    s->base = omap_l4_attach(ta, 0, iomemtype);
491

    
492
    return s;
493
}
494

    
495
/* 32-kHz Sync Timer of the OMAP2 */
496
static uint32_t omap_synctimer_read(struct omap_synctimer_s *s) {
497
    return muldiv64(qemu_get_clock(vm_clock), 0x8000, ticks_per_sec);
498
}
499

    
500
static void omap_synctimer_reset(struct omap_synctimer_s *s)
501
{
502
    s->val = omap_synctimer_read(s);
503
}
504

    
505
static uint32_t omap_synctimer_readw(void *opaque, target_phys_addr_t addr)
506
{
507
    struct omap_synctimer_s *s = (struct omap_synctimer_s *) opaque;
508
    int offset = addr - s->base;
509

    
510
    switch (offset) {
511
    case 0x00:        /* 32KSYNCNT_REV */
512
        return 0x21;
513

    
514
    case 0x10:        /* CR */
515
        return omap_synctimer_read(s) - s->val;
516
    }
517

    
518
    OMAP_BAD_REG(addr);
519
    return 0;
520
}
521

    
522
static uint32_t omap_synctimer_readh(void *opaque, target_phys_addr_t addr)
523
{
524
    struct omap_synctimer_s *s = (struct omap_synctimer_s *) opaque;
525
    uint32_t ret;
526

    
527
    if (addr & 2)
528
        return s->readh;
529
    else {
530
        ret = omap_synctimer_readw(opaque, addr);
531
        s->readh = ret >> 16;
532
        return ret & 0xffff;
533
    }
534
}
535

    
536
static CPUReadMemoryFunc *omap_synctimer_readfn[] = {
537
    omap_badwidth_read32,
538
    omap_synctimer_readh,
539
    omap_synctimer_readw,
540
};
541

    
542
static void omap_synctimer_write(void *opaque, target_phys_addr_t addr,
543
                uint32_t value)
544
{
545
    OMAP_BAD_REG(addr);
546
}
547

    
548
static CPUWriteMemoryFunc *omap_synctimer_writefn[] = {
549
    omap_badwidth_write32,
550
    omap_synctimer_write,
551
    omap_synctimer_write,
552
};
553

    
554
void omap_synctimer_init(struct omap_target_agent_s *ta,
555
                struct omap_mpu_state_s *mpu, omap_clk fclk, omap_clk iclk)
556
{
557
    struct omap_synctimer_s *s = &mpu->synctimer;
558

    
559
    omap_synctimer_reset(s);
560
    s->base = omap_l4_attach(ta, 0, l4_register_io_memory(0,
561
                            omap_synctimer_readfn, omap_synctimer_writefn, s));
562
}
563

    
564
/* General-Purpose Interface of OMAP2 */
565
struct omap2_gpio_s {
566
    target_phys_addr_t base;
567
    qemu_irq irq[2];
568
    qemu_irq wkup;
569
    qemu_irq *in;
570
    qemu_irq handler[32];
571

    
572
    uint8_t config[2];
573
    uint32_t inputs;
574
    uint32_t outputs;
575
    uint32_t dir;
576
    uint32_t level[2];
577
    uint32_t edge[2];
578
    uint32_t mask[2];
579
    uint32_t wumask;
580
    uint32_t ints[2];
581
    uint32_t debounce;
582
    uint8_t delay;
583
};
584

    
585
static inline void omap_gpio_module_int_update(struct omap2_gpio_s *s,
586
                int line)
587
{
588
    qemu_set_irq(s->irq[line], s->ints[line] & s->mask[line]);
589
}
590

    
591
static void omap_gpio_module_wake(struct omap2_gpio_s *s, int line)
592
{
593
    if (!(s->config[0] & (1 << 2)))                        /* ENAWAKEUP */
594
        return;
595
    if (!(s->config[0] & (3 << 3)))                        /* Force Idle */
596
        return;
597
    if (!(s->wumask & (1 << line)))
598
        return;
599

    
600
    qemu_irq_raise(s->wkup);
601
}
602

    
603
static inline void omap_gpio_module_out_update(struct omap2_gpio_s *s,
604
                uint32_t diff)
605
{
606
    int ln;
607

    
608
    s->outputs ^= diff;
609
    diff &= ~s->dir;
610
    while ((ln = ffs(diff))) {
611
        ln --;
612
        qemu_set_irq(s->handler[ln], (s->outputs >> ln) & 1);
613
        diff &= ~(1 << ln);
614
    }
615
}
616

    
617
static void omap_gpio_module_level_update(struct omap2_gpio_s *s, int line)
618
{
619
    s->ints[line] |= s->dir &
620
            ((s->inputs & s->level[1]) | (~s->inputs & s->level[0]));
621
    omap_gpio_module_int_update(s, line);
622
}
623

    
624
static inline void omap_gpio_module_int(struct omap2_gpio_s *s, int line)
625
{
626
    s->ints[0] |= 1 << line;
627
    omap_gpio_module_int_update(s, 0);
628
    s->ints[1] |= 1 << line;
629
    omap_gpio_module_int_update(s, 1);
630
    omap_gpio_module_wake(s, line);
631
}
632

    
633
static void omap_gpio_module_set(void *opaque, int line, int level)
634
{
635
    struct omap2_gpio_s *s = (struct omap2_gpio_s *) opaque;
636

    
637
    if (level) {
638
        if (s->dir & (1 << line) & ((~s->inputs & s->edge[0]) | s->level[1]))
639
            omap_gpio_module_int(s, line);
640
        s->inputs |= 1 << line;
641
    } else {
642
        if (s->dir & (1 << line) & ((s->inputs & s->edge[1]) | s->level[0]))
643
            omap_gpio_module_int(s, line);
644
        s->inputs &= ~(1 << line);
645
    }
646
}
647

    
648
static void omap_gpio_module_reset(struct omap2_gpio_s *s)
649
{
650
    s->config[0] = 0;
651
    s->config[1] = 2;
652
    s->ints[0] = 0;
653
    s->ints[1] = 0;
654
    s->mask[0] = 0;
655
    s->mask[1] = 0;
656
    s->wumask = 0;
657
    s->dir = ~0;
658
    s->level[0] = 0;
659
    s->level[1] = 0;
660
    s->edge[0] = 0;
661
    s->edge[1] = 0;
662
    s->debounce = 0;
663
    s->delay = 0;
664
}
665

    
666
static uint32_t omap_gpio_module_read(void *opaque, target_phys_addr_t addr)
667
{
668
    struct omap2_gpio_s *s = (struct omap2_gpio_s *) opaque;
669
    int offset = addr - s->base;
670

    
671
    switch (offset) {
672
    case 0x00:        /* GPIO_REVISION */
673
        return 0x18;
674

    
675
    case 0x10:        /* GPIO_SYSCONFIG */
676
        return s->config[0];
677

    
678
    case 0x14:        /* GPIO_SYSSTATUS */
679
        return 0x01;
680

    
681
    case 0x18:        /* GPIO_IRQSTATUS1 */
682
        return s->ints[0];
683

    
684
    case 0x1c:        /* GPIO_IRQENABLE1 */
685
    case 0x60:        /* GPIO_CLEARIRQENABLE1 */
686
    case 0x64:        /* GPIO_SETIRQENABLE1 */
687
        return s->mask[0];
688

    
689
    case 0x20:        /* GPIO_WAKEUPENABLE */
690
    case 0x80:        /* GPIO_CLEARWKUENA */
691
    case 0x84:        /* GPIO_SETWKUENA */
692
        return s->wumask;
693

    
694
    case 0x28:        /* GPIO_IRQSTATUS2 */
695
        return s->ints[1];
696

    
697
    case 0x2c:        /* GPIO_IRQENABLE2 */
698
    case 0x70:        /* GPIO_CLEARIRQENABLE2 */
699
    case 0x74:        /* GPIO_SETIREQNEABLE2 */
700
        return s->mask[1];
701

    
702
    case 0x30:        /* GPIO_CTRL */
703
        return s->config[1];
704

    
705
    case 0x34:        /* GPIO_OE */
706
        return s->dir;
707

    
708
    case 0x38:        /* GPIO_DATAIN */
709
        return s->inputs;
710

    
711
    case 0x3c:        /* GPIO_DATAOUT */
712
    case 0x90:        /* GPIO_CLEARDATAOUT */
713
    case 0x94:        /* GPIO_SETDATAOUT */
714
        return s->outputs;
715

    
716
    case 0x40:        /* GPIO_LEVELDETECT0 */
717
        return s->level[0];
718

    
719
    case 0x44:        /* GPIO_LEVELDETECT1 */
720
        return s->level[1];
721

    
722
    case 0x48:        /* GPIO_RISINGDETECT */
723
        return s->edge[0];
724

    
725
    case 0x4c:        /* GPIO_FALLINGDETECT */
726
        return s->edge[1];
727

    
728
    case 0x50:        /* GPIO_DEBOUNCENABLE */
729
        return s->debounce;
730

    
731
    case 0x54:        /* GPIO_DEBOUNCINGTIME */
732
        return s->delay;
733
    }
734

    
735
    OMAP_BAD_REG(addr);
736
    return 0;
737
}
738

    
739
static void omap_gpio_module_write(void *opaque, target_phys_addr_t addr,
740
                uint32_t value)
741
{
742
    struct omap2_gpio_s *s = (struct omap2_gpio_s *) opaque;
743
    int offset = addr - s->base;
744
    uint32_t diff;
745
    int ln;
746

    
747
    switch (offset) {
748
    case 0x00:        /* GPIO_REVISION */
749
    case 0x14:        /* GPIO_SYSSTATUS */
750
    case 0x38:        /* GPIO_DATAIN */
751
        OMAP_RO_REG(addr);
752
        break;
753

    
754
    case 0x10:        /* GPIO_SYSCONFIG */
755
        if (((value >> 3) & 3) == 3)
756
            fprintf(stderr, "%s: bad IDLEMODE value\n", __FUNCTION__);
757
        if (value & 2)
758
            omap_gpio_module_reset(s);
759
        s->config[0] = value & 0x1d;
760
        break;
761

    
762
    case 0x18:        /* GPIO_IRQSTATUS1 */
763
        if (s->ints[0] & value) {
764
            s->ints[0] &= ~value;
765
            omap_gpio_module_level_update(s, 0);
766
        }
767
        break;
768

    
769
    case 0x1c:        /* GPIO_IRQENABLE1 */
770
        s->mask[0] = value;
771
        omap_gpio_module_int_update(s, 0);
772
        break;
773

    
774
    case 0x20:        /* GPIO_WAKEUPENABLE */
775
        s->wumask = value;
776
        break;
777

    
778
    case 0x28:        /* GPIO_IRQSTATUS2 */
779
        if (s->ints[1] & value) {
780
            s->ints[1] &= ~value;
781
            omap_gpio_module_level_update(s, 1);
782
        }
783
        break;
784

    
785
    case 0x2c:        /* GPIO_IRQENABLE2 */
786
        s->mask[1] = value;
787
        omap_gpio_module_int_update(s, 1);
788
        break;
789

    
790
    case 0x30:        /* GPIO_CTRL */
791
        s->config[1] = value & 7;
792
        break;
793

    
794
    case 0x34:        /* GPIO_OE */
795
        diff = s->outputs & (s->dir ^ value);
796
        s->dir = value;
797

    
798
        value = s->outputs & ~s->dir;
799
        while ((ln = ffs(diff))) {
800
            diff &= ~(1 <<-- ln);
801
            qemu_set_irq(s->handler[ln], (value >> ln) & 1);
802
        }
803

    
804
        omap_gpio_module_level_update(s, 0);
805
        omap_gpio_module_level_update(s, 1);
806
        break;
807

    
808
    case 0x3c:        /* GPIO_DATAOUT */
809
        omap_gpio_module_out_update(s, s->outputs ^ value);
810
        break;
811

    
812
    case 0x40:        /* GPIO_LEVELDETECT0 */
813
        s->level[0] = value;
814
        omap_gpio_module_level_update(s, 0);
815
        omap_gpio_module_level_update(s, 1);
816
        break;
817

    
818
    case 0x44:        /* GPIO_LEVELDETECT1 */
819
        s->level[1] = value;
820
        omap_gpio_module_level_update(s, 0);
821
        omap_gpio_module_level_update(s, 1);
822
        break;
823

    
824
    case 0x48:        /* GPIO_RISINGDETECT */
825
        s->edge[0] = value;
826
        break;
827

    
828
    case 0x4c:        /* GPIO_FALLINGDETECT */
829
        s->edge[1] = value;
830
        break;
831

    
832
    case 0x50:        /* GPIO_DEBOUNCENABLE */
833
        s->debounce = value;
834
        break;
835

    
836
    case 0x54:        /* GPIO_DEBOUNCINGTIME */
837
        s->delay = value;
838
        break;
839

    
840
    case 0x60:        /* GPIO_CLEARIRQENABLE1 */
841
        s->mask[0] &= ~value;
842
        omap_gpio_module_int_update(s, 0);
843
        break;
844

    
845
    case 0x64:        /* GPIO_SETIRQENABLE1 */
846
        s->mask[0] |= value;
847
        omap_gpio_module_int_update(s, 0);
848
        break;
849

    
850
    case 0x70:        /* GPIO_CLEARIRQENABLE2 */
851
        s->mask[1] &= ~value;
852
        omap_gpio_module_int_update(s, 1);
853
        break;
854

    
855
    case 0x74:        /* GPIO_SETIREQNEABLE2 */
856
        s->mask[1] |= value;
857
        omap_gpio_module_int_update(s, 1);
858
        break;
859

    
860
    case 0x80:        /* GPIO_CLEARWKUENA */
861
        s->wumask &= ~value;
862
        break;
863

    
864
    case 0x84:        /* GPIO_SETWKUENA */
865
        s->wumask |= value;
866
        break;
867

    
868
    case 0x90:        /* GPIO_CLEARDATAOUT */
869
        omap_gpio_module_out_update(s, s->outputs & value);
870
        break;
871

    
872
    case 0x94:        /* GPIO_SETDATAOUT */
873
        omap_gpio_module_out_update(s, ~s->outputs & value);
874
        break;
875

    
876
    default:
877
        OMAP_BAD_REG(addr);
878
        return;
879
    }
880
}
881

    
882
static uint32_t omap_gpio_module_readp(void *opaque, target_phys_addr_t addr)
883
{
884
    return omap_gpio_module_readp(opaque, addr) >> ((addr & 3) << 3);
885
}
886

    
887
static void omap_gpio_module_writep(void *opaque, target_phys_addr_t addr,
888
                uint32_t value)
889
{
890
    struct omap2_gpio_s *s = (struct omap2_gpio_s *) opaque;
891
    int offset = addr - s->base;
892
    uint32_t cur = 0;
893
    uint32_t mask = 0xffff;
894

    
895
    switch (offset & ~3) {
896
    case 0x00:        /* GPIO_REVISION */
897
    case 0x14:        /* GPIO_SYSSTATUS */
898
    case 0x38:        /* GPIO_DATAIN */
899
        OMAP_RO_REG(addr);
900
        break;
901

    
902
    case 0x10:        /* GPIO_SYSCONFIG */
903
    case 0x1c:        /* GPIO_IRQENABLE1 */
904
    case 0x20:        /* GPIO_WAKEUPENABLE */
905
    case 0x2c:        /* GPIO_IRQENABLE2 */
906
    case 0x30:        /* GPIO_CTRL */
907
    case 0x34:        /* GPIO_OE */
908
    case 0x3c:        /* GPIO_DATAOUT */
909
    case 0x40:        /* GPIO_LEVELDETECT0 */
910
    case 0x44:        /* GPIO_LEVELDETECT1 */
911
    case 0x48:        /* GPIO_RISINGDETECT */
912
    case 0x4c:        /* GPIO_FALLINGDETECT */
913
    case 0x50:        /* GPIO_DEBOUNCENABLE */
914
    case 0x54:        /* GPIO_DEBOUNCINGTIME */
915
        cur = omap_gpio_module_read(opaque, addr & ~3) &
916
                ~(mask << ((addr & 3) << 3));
917

    
918
        /* Fall through.  */
919
    case 0x18:        /* GPIO_IRQSTATUS1 */
920
    case 0x28:        /* GPIO_IRQSTATUS2 */
921
    case 0x60:        /* GPIO_CLEARIRQENABLE1 */
922
    case 0x64:        /* GPIO_SETIRQENABLE1 */
923
    case 0x70:        /* GPIO_CLEARIRQENABLE2 */
924
    case 0x74:        /* GPIO_SETIREQNEABLE2 */
925
    case 0x80:        /* GPIO_CLEARWKUENA */
926
    case 0x84:        /* GPIO_SETWKUENA */
927
    case 0x90:        /* GPIO_CLEARDATAOUT */
928
    case 0x94:        /* GPIO_SETDATAOUT */
929
        value <<= (addr & 3) << 3;
930
        omap_gpio_module_write(opaque, addr, cur | value);
931
        break;
932

    
933
    default:
934
        OMAP_BAD_REG(addr);
935
        return;
936
    }
937
}
938

    
939
static CPUReadMemoryFunc *omap_gpio_module_readfn[] = {
940
    omap_gpio_module_readp,
941
    omap_gpio_module_readp,
942
    omap_gpio_module_read,
943
};
944

    
945
static CPUWriteMemoryFunc *omap_gpio_module_writefn[] = {
946
    omap_gpio_module_writep,
947
    omap_gpio_module_writep,
948
    omap_gpio_module_write,
949
};
950

    
951
static void omap_gpio_module_init(struct omap2_gpio_s *s,
952
                struct omap_target_agent_s *ta, int region,
953
                qemu_irq mpu, qemu_irq dsp, qemu_irq wkup,
954
                omap_clk fclk, omap_clk iclk)
955
{
956
    int iomemtype;
957

    
958
    s->irq[0] = mpu;
959
    s->irq[1] = dsp;
960
    s->wkup = wkup;
961
    s->in = qemu_allocate_irqs(omap_gpio_module_set, s, 32);
962

    
963
    iomemtype = l4_register_io_memory(0, omap_gpio_module_readfn,
964
                    omap_gpio_module_writefn, s);
965
    s->base = omap_l4_attach(ta, region, iomemtype);
966
}
967

    
968
struct omap_gpif_s {
969
    struct omap2_gpio_s module[5];
970
    int modules;
971

    
972
    target_phys_addr_t topbase;
973
    int autoidle;
974
    int gpo;
975
};
976

    
977
static void omap_gpif_reset(struct omap_gpif_s *s)
978
{
979
    int i;
980

    
981
    for (i = 0; i < s->modules; i ++)
982
        omap_gpio_module_reset(s->module + i);
983

    
984
    s->autoidle = 0;
985
    s->gpo = 0;
986
}
987

    
988
static uint32_t omap_gpif_top_read(void *opaque, target_phys_addr_t addr)
989
{
990
    struct omap_gpif_s *s = (struct omap_gpif_s *) opaque;
991
    int offset = addr - s->topbase;
992

    
993
    switch (offset) {
994
    case 0x00:        /* IPGENERICOCPSPL_REVISION */
995
        return 0x18;
996

    
997
    case 0x10:        /* IPGENERICOCPSPL_SYSCONFIG */
998
        return s->autoidle;
999

    
1000
    case 0x14:        /* IPGENERICOCPSPL_SYSSTATUS */
1001
        return 0x01;
1002

    
1003
    case 0x18:        /* IPGENERICOCPSPL_IRQSTATUS */
1004
        return 0x00;
1005

    
1006
    case 0x40:        /* IPGENERICOCPSPL_GPO */
1007
        return s->gpo;
1008

    
1009
    case 0x50:        /* IPGENERICOCPSPL_GPI */
1010
        return 0x00;
1011
    }
1012

    
1013
    OMAP_BAD_REG(addr);
1014
    return 0;
1015
}
1016

    
1017
static void omap_gpif_top_write(void *opaque, target_phys_addr_t addr,
1018
                uint32_t value)
1019
{
1020
    struct omap_gpif_s *s = (struct omap_gpif_s *) opaque;
1021
    int offset = addr - s->topbase;
1022

    
1023
    switch (offset) {
1024
    case 0x00:        /* IPGENERICOCPSPL_REVISION */
1025
    case 0x14:        /* IPGENERICOCPSPL_SYSSTATUS */
1026
    case 0x18:        /* IPGENERICOCPSPL_IRQSTATUS */
1027
    case 0x50:        /* IPGENERICOCPSPL_GPI */
1028
        OMAP_RO_REG(addr);
1029
        break;
1030

    
1031
    case 0x10:        /* IPGENERICOCPSPL_SYSCONFIG */
1032
        if (value & (1 << 1))                                        /* SOFTRESET */
1033
            omap_gpif_reset(s);
1034
        s->autoidle = value & 1;
1035
        break;
1036

    
1037
    case 0x40:        /* IPGENERICOCPSPL_GPO */
1038
        s->gpo = value & 1;
1039
        break;
1040

    
1041
    default:
1042
        OMAP_BAD_REG(addr);
1043
        return;
1044
    }
1045
}
1046

    
1047
static CPUReadMemoryFunc *omap_gpif_top_readfn[] = {
1048
    omap_gpif_top_read,
1049
    omap_gpif_top_read,
1050
    omap_gpif_top_read,
1051
};
1052

    
1053
static CPUWriteMemoryFunc *omap_gpif_top_writefn[] = {
1054
    omap_gpif_top_write,
1055
    omap_gpif_top_write,
1056
    omap_gpif_top_write,
1057
};
1058

    
1059
struct omap_gpif_s *omap2_gpio_init(struct omap_target_agent_s *ta,
1060
                qemu_irq *irq, omap_clk *fclk, omap_clk iclk, int modules)
1061
{
1062
    int iomemtype, i;
1063
    struct omap_gpif_s *s = (struct omap_gpif_s *)
1064
            qemu_mallocz(sizeof(struct omap_gpif_s));
1065
    int region[4] = { 0, 2, 4, 5 };
1066

    
1067
    s->modules = modules;
1068
    for (i = 0; i < modules; i ++)
1069
        omap_gpio_module_init(s->module + i, ta, region[i],
1070
                        irq[i], 0, 0, fclk[i], iclk);
1071

    
1072
    omap_gpif_reset(s);
1073

    
1074
    iomemtype = l4_register_io_memory(0, omap_gpif_top_readfn,
1075
                    omap_gpif_top_writefn, s);
1076
    s->topbase = omap_l4_attach(ta, 1, iomemtype);
1077

    
1078
    return s;
1079
}
1080

    
1081
qemu_irq *omap2_gpio_in_get(struct omap_gpif_s *s, int start)
1082
{
1083
    if (start >= s->modules * 32 || start < 0)
1084
        cpu_abort(cpu_single_env, "%s: No GPIO line %i\n",
1085
                        __FUNCTION__, start);
1086
    return s->module[start >> 5].in + (start & 31);
1087
}
1088

    
1089
void omap2_gpio_out_set(struct omap_gpif_s *s, int line, qemu_irq handler)
1090
{
1091
    if (line >= s->modules * 32 || line < 0)
1092
        cpu_abort(cpu_single_env, "%s: No GPIO line %i\n", __FUNCTION__, line);
1093
    s->module[line >> 5].handler[line & 31] = handler;
1094
}
1095

    
1096
/* Multichannel SPI */
1097
struct omap_mcspi_s {
1098
    target_phys_addr_t base;
1099
    qemu_irq irq;
1100
    int chnum;
1101

    
1102
    uint32_t sysconfig;
1103
    uint32_t systest;
1104
    uint32_t irqst;
1105
    uint32_t irqen;
1106
    uint32_t wken;
1107
    uint32_t control;
1108

    
1109
    struct omap_mcspi_ch_s {
1110
        qemu_irq txdrq;
1111
        qemu_irq rxdrq;
1112
        uint32_t (*txrx)(void *opaque, uint32_t, int);
1113
        void *opaque;
1114

    
1115
        uint32_t tx;
1116
        uint32_t rx;
1117

    
1118
        uint32_t config;
1119
        uint32_t status;
1120
        uint32_t control;
1121
    } ch[4];
1122
};
1123

    
1124
static inline void omap_mcspi_interrupt_update(struct omap_mcspi_s *s)
1125
{
1126
    qemu_set_irq(s->irq, s->irqst & s->irqen);
1127
}
1128

    
1129
static inline void omap_mcspi_dmarequest_update(struct omap_mcspi_ch_s *ch)
1130
{
1131
    qemu_set_irq(ch->txdrq,
1132
                    (ch->control & 1) &&                /* EN */
1133
                    (ch->config & (1 << 14)) &&                /* DMAW */
1134
                    (ch->status & (1 << 1)) &&                /* TXS */
1135
                    ((ch->config >> 12) & 3) != 1);        /* TRM */
1136
    qemu_set_irq(ch->rxdrq,
1137
                    (ch->control & 1) &&                /* EN */
1138
                    (ch->config & (1 << 15)) &&                /* DMAW */
1139
                    (ch->status & (1 << 0)) &&                /* RXS */
1140
                    ((ch->config >> 12) & 3) != 2);        /* TRM */
1141
}
1142

    
1143
static void omap_mcspi_transfer_run(struct omap_mcspi_s *s, int chnum)
1144
{
1145
    struct omap_mcspi_ch_s *ch = s->ch + chnum;
1146

    
1147
    if (!(ch->control & 1))                                /* EN */
1148
        return;
1149
    if ((ch->status & (1 << 0)) &&                        /* RXS */
1150
                    ((ch->config >> 12) & 3) != 2 &&        /* TRM */
1151
                    !(ch->config & (1 << 19)))                /* TURBO */
1152
        goto intr_update;
1153
    if ((ch->status & (1 << 1)) &&                        /* TXS */
1154
                    ((ch->config >> 12) & 3) != 1)        /* TRM */
1155
        goto intr_update;
1156

    
1157
    if (!(s->control & 1) ||                                /* SINGLE */
1158
                    (ch->config & (1 << 20))) {                /* FORCE */
1159
        if (ch->txrx)
1160
            ch->rx = ch->txrx(ch->opaque, ch->tx,        /* WL */
1161
                            1 + (0x1f & (ch->config >> 7)));
1162
    }
1163

    
1164
    ch->tx = 0;
1165
    ch->status |= 1 << 2;                                /* EOT */
1166
    ch->status |= 1 << 1;                                /* TXS */
1167
    if (((ch->config >> 12) & 3) != 2)                        /* TRM */
1168
        ch->status |= 1 << 0;                                /* RXS */
1169

    
1170
intr_update:
1171
    if ((ch->status & (1 << 0)) &&                        /* RXS */
1172
                    ((ch->config >> 12) & 3) != 2 &&        /* TRM */
1173
                    !(ch->config & (1 << 19)))                /* TURBO */
1174
        s->irqst |= 1 << (2 + 4 * chnum);                /* RX_FULL */
1175
    if ((ch->status & (1 << 1)) &&                        /* TXS */
1176
                    ((ch->config >> 12) & 3) != 1)        /* TRM */
1177
        s->irqst |= 1 << (0 + 4 * chnum);                /* TX_EMPTY */
1178
    omap_mcspi_interrupt_update(s);
1179
    omap_mcspi_dmarequest_update(ch);
1180
}
1181

    
1182
static void omap_mcspi_reset(struct omap_mcspi_s *s)
1183
{
1184
    int ch;
1185

    
1186
    s->sysconfig = 0;
1187
    s->systest = 0;
1188
    s->irqst = 0;
1189
    s->irqen = 0;
1190
    s->wken = 0;
1191
    s->control = 4;
1192

    
1193
    for (ch = 0; ch < 4; ch ++) {
1194
        s->ch[ch].config = 0x060000;
1195
        s->ch[ch].status = 2;                                /* TXS */
1196
        s->ch[ch].control = 0;
1197

    
1198
        omap_mcspi_dmarequest_update(s->ch + ch);
1199
    }
1200

    
1201
    omap_mcspi_interrupt_update(s);
1202
}
1203

    
1204
static uint32_t omap_mcspi_read(void *opaque, target_phys_addr_t addr)
1205
{
1206
    struct omap_mcspi_s *s = (struct omap_mcspi_s *) opaque;
1207
    int offset = addr - s->base;
1208
    int ch = 0;
1209
    uint32_t ret;
1210

    
1211
    switch (offset) {
1212
    case 0x00:        /* MCSPI_REVISION */
1213
        return 0x91;
1214

    
1215
    case 0x10:        /* MCSPI_SYSCONFIG */
1216
        return s->sysconfig;
1217

    
1218
    case 0x14:        /* MCSPI_SYSSTATUS */
1219
        return 1;                                        /* RESETDONE */
1220

    
1221
    case 0x18:        /* MCSPI_IRQSTATUS */
1222
        return s->irqst;
1223

    
1224
    case 0x1c:        /* MCSPI_IRQENABLE */
1225
        return s->irqen;
1226

    
1227
    case 0x20:        /* MCSPI_WAKEUPENABLE */
1228
        return s->wken;
1229

    
1230
    case 0x24:        /* MCSPI_SYST */
1231
        return s->systest;
1232

    
1233
    case 0x28:        /* MCSPI_MODULCTRL */
1234
        return s->control;
1235

    
1236
    case 0x68: ch ++;
1237
    case 0x54: ch ++;
1238
    case 0x40: ch ++;
1239
    case 0x2c:        /* MCSPI_CHCONF */
1240
        return s->ch[ch].config;
1241

    
1242
    case 0x6c: ch ++;
1243
    case 0x58: ch ++;
1244
    case 0x44: ch ++;
1245
    case 0x30:        /* MCSPI_CHSTAT */
1246
        return s->ch[ch].status;
1247

    
1248
    case 0x70: ch ++;
1249
    case 0x5c: ch ++;
1250
    case 0x48: ch ++;
1251
    case 0x34:        /* MCSPI_CHCTRL */
1252
        return s->ch[ch].control;
1253

    
1254
    case 0x74: ch ++;
1255
    case 0x60: ch ++;
1256
    case 0x4c: ch ++;
1257
    case 0x38:        /* MCSPI_TX */
1258
        return s->ch[ch].tx;
1259

    
1260
    case 0x78: ch ++;
1261
    case 0x64: ch ++;
1262
    case 0x50: ch ++;
1263
    case 0x3c:        /* MCSPI_RX */
1264
        s->ch[ch].status &= ~(1 << 0);                        /* RXS */
1265
        ret = s->ch[ch].rx;
1266
        omap_mcspi_transfer_run(s, ch);
1267
        return ret;
1268
    }
1269

    
1270
    OMAP_BAD_REG(addr);
1271
    return 0;
1272
}
1273

    
1274
static void omap_mcspi_write(void *opaque, target_phys_addr_t addr,
1275
                uint32_t value)
1276
{
1277
    struct omap_mcspi_s *s = (struct omap_mcspi_s *) opaque;
1278
    int offset = addr - s->base;
1279
    int ch = 0;
1280

    
1281
    switch (offset) {
1282
    case 0x00:        /* MCSPI_REVISION */
1283
    case 0x14:        /* MCSPI_SYSSTATUS */
1284
    case 0x30:        /* MCSPI_CHSTAT0 */
1285
    case 0x3c:        /* MCSPI_RX0 */
1286
    case 0x44:        /* MCSPI_CHSTAT1 */
1287
    case 0x50:        /* MCSPI_RX1 */
1288
    case 0x58:        /* MCSPI_CHSTAT2 */
1289
    case 0x64:        /* MCSPI_RX2 */
1290
    case 0x6c:        /* MCSPI_CHSTAT3 */
1291
    case 0x78:        /* MCSPI_RX3 */
1292
        OMAP_RO_REG(addr);
1293
        return;
1294

    
1295
    case 0x10:        /* MCSPI_SYSCONFIG */
1296
        if (value & (1 << 1))                                /* SOFTRESET */
1297
            omap_mcspi_reset(s);
1298
        s->sysconfig = value & 0x31d;
1299
        break;
1300

    
1301
    case 0x18:        /* MCSPI_IRQSTATUS */
1302
        if (!((s->control & (1 << 3)) && (s->systest & (1 << 11)))) {
1303
            s->irqst &= ~value;
1304
            omap_mcspi_interrupt_update(s);
1305
        }
1306
        break;
1307

    
1308
    case 0x1c:        /* MCSPI_IRQENABLE */
1309
        s->irqen = value & 0x1777f;
1310
        omap_mcspi_interrupt_update(s);
1311
        break;
1312

    
1313
    case 0x20:        /* MCSPI_WAKEUPENABLE */
1314
        s->wken = value & 1;
1315
        break;
1316

    
1317
    case 0x24:        /* MCSPI_SYST */
1318
        if (s->control & (1 << 3))                        /* SYSTEM_TEST */
1319
            if (value & (1 << 11)) {                        /* SSB */
1320
                s->irqst |= 0x1777f;
1321
                omap_mcspi_interrupt_update(s);
1322
            }
1323
        s->systest = value & 0xfff;
1324
        break;
1325

    
1326
    case 0x28:        /* MCSPI_MODULCTRL */
1327
        if (value & (1 << 3))                                /* SYSTEM_TEST */
1328
            if (s->systest & (1 << 11)) {                /* SSB */
1329
                s->irqst |= 0x1777f;
1330
                omap_mcspi_interrupt_update(s);
1331
            }
1332
        s->control = value & 0xf;
1333
        break;
1334

    
1335
    case 0x68: ch ++;
1336
    case 0x54: ch ++;
1337
    case 0x40: ch ++;
1338
    case 0x2c:        /* MCSPI_CHCONF */
1339
        if ((value ^ s->ch[ch].config) & (3 << 14))        /* DMAR | DMAW */
1340
            omap_mcspi_dmarequest_update(s->ch + ch);
1341
        if (((value >> 12) & 3) == 3)                        /* TRM */
1342
            fprintf(stderr, "%s: invalid TRM value (3)\n", __FUNCTION__);
1343
        if (((value >> 7) & 0x1f) < 3)                        /* WL */
1344
            fprintf(stderr, "%s: invalid WL value (%i)\n",
1345
                            __FUNCTION__, (value >> 7) & 0x1f);
1346
        s->ch[ch].config = value & 0x7fffff;
1347
        break;
1348

    
1349
    case 0x70: ch ++;
1350
    case 0x5c: ch ++;
1351
    case 0x48: ch ++;
1352
    case 0x34:        /* MCSPI_CHCTRL */
1353
        if (value & ~s->ch[ch].control & 1) {                /* EN */
1354
            s->ch[ch].control |= 1;
1355
            omap_mcspi_transfer_run(s, ch);
1356
        } else
1357
            s->ch[ch].control = value & 1;
1358
        break;
1359

    
1360
    case 0x74: ch ++;
1361
    case 0x60: ch ++;
1362
    case 0x4c: ch ++;
1363
    case 0x38:        /* MCSPI_TX */
1364
        s->ch[ch].tx = value;
1365
        s->ch[ch].status &= ~(1 << 1);                        /* TXS */
1366
        omap_mcspi_transfer_run(s, ch);
1367
        break;
1368

    
1369
    default:
1370
        OMAP_BAD_REG(addr);
1371
        return;
1372
    }
1373
}
1374

    
1375
static CPUReadMemoryFunc *omap_mcspi_readfn[] = {
1376
    omap_badwidth_read32,
1377
    omap_badwidth_read32,
1378
    omap_mcspi_read,
1379
};
1380

    
1381
static CPUWriteMemoryFunc *omap_mcspi_writefn[] = {
1382
    omap_badwidth_write32,
1383
    omap_badwidth_write32,
1384
    omap_mcspi_write,
1385
};
1386

    
1387
struct omap_mcspi_s *omap_mcspi_init(struct omap_target_agent_s *ta, int chnum,
1388
                qemu_irq irq, qemu_irq *drq, omap_clk fclk, omap_clk iclk)
1389
{
1390
    int iomemtype;
1391
    struct omap_mcspi_s *s = (struct omap_mcspi_s *)
1392
            qemu_mallocz(sizeof(struct omap_mcspi_s));
1393
    struct omap_mcspi_ch_s *ch = s->ch;
1394

    
1395
    s->irq = irq;
1396
    s->chnum = chnum;
1397
    while (chnum --) {
1398
        ch->txdrq = *drq ++;
1399
        ch->rxdrq = *drq ++;
1400
        ch ++;
1401
    }
1402
    omap_mcspi_reset(s);
1403

    
1404
    iomemtype = l4_register_io_memory(0, omap_mcspi_readfn,
1405
                    omap_mcspi_writefn, s);
1406
    s->base = omap_l4_attach(ta, 0, iomemtype);
1407

    
1408
    return s;
1409
}
1410

    
1411
void omap_mcspi_attach(struct omap_mcspi_s *s,
1412
                uint32_t (*txrx)(void *opaque, uint32_t, int), void *opaque,
1413
                int chipselect)
1414
{
1415
    if (chipselect < 0 || chipselect >= s->chnum)
1416
        cpu_abort(cpu_single_env, "%s: Bad chipselect %i\n",
1417
                        __FUNCTION__, chipselect);
1418

    
1419
    s->ch[chipselect].txrx = txrx;
1420
    s->ch[chipselect].opaque = opaque;
1421
}
1422

    
1423
/* STI/XTI (emulation interface) console - reverse engineered only */
1424
struct omap_sti_s {
1425
    target_phys_addr_t base;
1426
    target_phys_addr_t channel_base;
1427
    qemu_irq irq;
1428
    CharDriverState *chr;
1429

    
1430
    uint32_t sysconfig;
1431
    uint32_t systest;
1432
    uint32_t irqst;
1433
    uint32_t irqen;
1434
    uint32_t clkcontrol;
1435
    uint32_t serial_config;
1436
};
1437

    
1438
#define STI_TRACE_CONSOLE_CHANNEL        239
1439
#define STI_TRACE_CONTROL_CHANNEL        253
1440

    
1441
static inline void omap_sti_interrupt_update(struct omap_sti_s *s)
1442
{
1443
    qemu_set_irq(s->irq, s->irqst & s->irqen);
1444
}
1445

    
1446
static void omap_sti_reset(struct omap_sti_s *s)
1447
{
1448
    s->sysconfig = 0;
1449
    s->irqst = 0;
1450
    s->irqen = 0;
1451
    s->clkcontrol = 0;
1452
    s->serial_config = 0;
1453

    
1454
    omap_sti_interrupt_update(s);
1455
}
1456

    
1457
static uint32_t omap_sti_read(void *opaque, target_phys_addr_t addr)
1458
{
1459
    struct omap_sti_s *s = (struct omap_sti_s *) opaque;
1460
    int offset = addr - s->base;
1461

    
1462
    switch (offset) {
1463
    case 0x00:        /* STI_REVISION */
1464
        return 0x10;
1465

    
1466
    case 0x10:        /* STI_SYSCONFIG */
1467
        return s->sysconfig;
1468

    
1469
    case 0x14:        /* STI_SYSSTATUS / STI_RX_STATUS / XTI_SYSSTATUS */
1470
        return 0x00;
1471

    
1472
    case 0x18:        /* STI_IRQSTATUS */
1473
        return s->irqst;
1474

    
1475
    case 0x1c:        /* STI_IRQSETEN / STI_IRQCLREN */
1476
        return s->irqen;
1477

    
1478
    case 0x24:        /* STI_ER / STI_DR / XTI_TRACESELECT */
1479
    case 0x28:        /* STI_RX_DR / XTI_RXDATA */
1480
        /* TODO */
1481
        return 0;
1482

    
1483
    case 0x2c:        /* STI_CLK_CTRL / XTI_SCLKCRTL */
1484
        return s->clkcontrol;
1485

    
1486
    case 0x30:        /* STI_SERIAL_CFG / XTI_SCONFIG */
1487
        return s->serial_config;
1488
    }
1489

    
1490
    OMAP_BAD_REG(addr);
1491
    return 0;
1492
}
1493

    
1494
static void omap_sti_write(void *opaque, target_phys_addr_t addr,
1495
                uint32_t value)
1496
{
1497
    struct omap_sti_s *s = (struct omap_sti_s *) opaque;
1498
    int offset = addr - s->base;
1499

    
1500
    switch (offset) {
1501
    case 0x00:        /* STI_REVISION */
1502
    case 0x14:        /* STI_SYSSTATUS / STI_RX_STATUS / XTI_SYSSTATUS */
1503
        OMAP_RO_REG(addr);
1504
        return;
1505

    
1506
    case 0x10:        /* STI_SYSCONFIG */
1507
        if (value & (1 << 1))                                /* SOFTRESET */
1508
            omap_sti_reset(s);
1509
        s->sysconfig = value & 0xfe;
1510
        break;
1511

    
1512
    case 0x18:        /* STI_IRQSTATUS */
1513
        s->irqst &= ~value;
1514
        omap_sti_interrupt_update(s);
1515
        break;
1516

    
1517
    case 0x1c:        /* STI_IRQSETEN / STI_IRQCLREN */
1518
        s->irqen = value & 0xffff;
1519
        omap_sti_interrupt_update(s);
1520
        break;
1521

    
1522
    case 0x2c:        /* STI_CLK_CTRL / XTI_SCLKCRTL */
1523
        s->clkcontrol = value & 0xff;
1524
        break;
1525

    
1526
    case 0x30:        /* STI_SERIAL_CFG / XTI_SCONFIG */
1527
        s->serial_config = value & 0xff;
1528
        break;
1529

    
1530
    case 0x24:        /* STI_ER / STI_DR / XTI_TRACESELECT */
1531
    case 0x28:        /* STI_RX_DR / XTI_RXDATA */
1532
        /* TODO */
1533
        return;
1534

    
1535
    default:
1536
        OMAP_BAD_REG(addr);
1537
        return;
1538
    }
1539
}
1540

    
1541
static CPUReadMemoryFunc *omap_sti_readfn[] = {
1542
    omap_badwidth_read32,
1543
    omap_badwidth_read32,
1544
    omap_sti_read,
1545
};
1546

    
1547
static CPUWriteMemoryFunc *omap_sti_writefn[] = {
1548
    omap_badwidth_write32,
1549
    omap_badwidth_write32,
1550
    omap_sti_write,
1551
};
1552

    
1553
static uint32_t omap_sti_fifo_read(void *opaque, target_phys_addr_t addr)
1554
{
1555
    OMAP_BAD_REG(addr);
1556
    return 0;
1557
}
1558

    
1559
static void omap_sti_fifo_write(void *opaque, target_phys_addr_t addr,
1560
                uint32_t value)
1561
{
1562
    struct omap_sti_s *s = (struct omap_sti_s *) opaque;
1563
    int offset = addr - s->channel_base;
1564
    int ch = offset >> 6;
1565
    uint8_t byte = value;
1566

    
1567
    if (ch == STI_TRACE_CONTROL_CHANNEL) {
1568
        /* Flush channel <i>value</i>.  */
1569
        qemu_chr_write(s->chr, "\r", 1);
1570
    } else if (ch == STI_TRACE_CONSOLE_CHANNEL || 1) {
1571
        if (value == 0xc0 || value == 0xc3) {
1572
            /* Open channel <i>ch</i>.  */
1573
        } else if (value == 0x00)
1574
            qemu_chr_write(s->chr, "\n", 1);
1575
        else
1576
            qemu_chr_write(s->chr, &byte, 1);
1577
    }
1578
}
1579

    
1580
static CPUReadMemoryFunc *omap_sti_fifo_readfn[] = {
1581
    omap_sti_fifo_read,
1582
    omap_badwidth_read8,
1583
    omap_badwidth_read8,
1584
};
1585

    
1586
static CPUWriteMemoryFunc *omap_sti_fifo_writefn[] = {
1587
    omap_sti_fifo_write,
1588
    omap_badwidth_write8,
1589
    omap_badwidth_write8,
1590
};
1591

    
1592
struct omap_sti_s *omap_sti_init(struct omap_target_agent_s *ta,
1593
                target_phys_addr_t channel_base, qemu_irq irq, omap_clk clk,
1594
                CharDriverState *chr)
1595
{
1596
    int iomemtype;
1597
    struct omap_sti_s *s = (struct omap_sti_s *)
1598
            qemu_mallocz(sizeof(struct omap_sti_s));
1599

    
1600
    s->irq = irq;
1601
    omap_sti_reset(s);
1602

    
1603
    s->chr = chr ?: qemu_chr_open("null");
1604

    
1605
    iomemtype = l4_register_io_memory(0, omap_sti_readfn,
1606
                    omap_sti_writefn, s);
1607
    s->base = omap_l4_attach(ta, 0, iomemtype);
1608

    
1609
    iomemtype = cpu_register_io_memory(0, omap_sti_fifo_readfn,
1610
                    omap_sti_fifo_writefn, s);
1611
    s->channel_base = channel_base;
1612
    cpu_register_physical_memory(s->channel_base, 0x10000, iomemtype);
1613

    
1614
    return s;
1615
}
1616

    
1617
/* L4 Interconnect */
1618
struct omap_target_agent_s {
1619
    struct omap_l4_s *bus;
1620
    int regions;
1621
    struct omap_l4_region_s *start;
1622
    target_phys_addr_t base;
1623
    uint32_t component;
1624
    uint32_t control;
1625
    uint32_t status;
1626
};
1627

    
1628
struct omap_l4_s {
1629
    target_phys_addr_t base;
1630
    int ta_num;
1631
    struct omap_target_agent_s ta[0];
1632
};
1633

    
1634
#ifdef L4_MUX_HACK
1635
static int omap_l4_io_entries;
1636
static int omap_cpu_io_entry;
1637
static struct omap_l4_entry {
1638
        CPUReadMemoryFunc **mem_read;
1639
        CPUWriteMemoryFunc **mem_write;
1640
        void *opaque;
1641
} *omap_l4_io_entry;
1642
static CPUReadMemoryFunc **omap_l4_io_readb_fn;
1643
static CPUReadMemoryFunc **omap_l4_io_readh_fn;
1644
static CPUReadMemoryFunc **omap_l4_io_readw_fn;
1645
static CPUWriteMemoryFunc **omap_l4_io_writeb_fn;
1646
static CPUWriteMemoryFunc **omap_l4_io_writeh_fn;
1647
static CPUWriteMemoryFunc **omap_l4_io_writew_fn;
1648
static void **omap_l4_io_opaque;
1649

    
1650
int l4_register_io_memory(int io_index, CPUReadMemoryFunc **mem_read,
1651
                CPUWriteMemoryFunc **mem_write, void *opaque)
1652
{
1653
    omap_l4_io_entry[omap_l4_io_entries].mem_read = mem_read;
1654
    omap_l4_io_entry[omap_l4_io_entries].mem_write = mem_write;
1655
    omap_l4_io_entry[omap_l4_io_entries].opaque = opaque;
1656

    
1657
    return omap_l4_io_entries ++;
1658
}
1659

    
1660
static uint32_t omap_l4_io_readb(void *opaque, target_phys_addr_t addr)
1661
{
1662
    unsigned int i = (addr - OMAP2_L4_BASE) >> TARGET_PAGE_BITS;
1663

    
1664
    return omap_l4_io_readb_fn[i](omap_l4_io_opaque[i], addr);
1665
}
1666

    
1667
static uint32_t omap_l4_io_readh(void *opaque, target_phys_addr_t addr)
1668
{
1669
    unsigned int i = (addr - OMAP2_L4_BASE) >> TARGET_PAGE_BITS;
1670

    
1671
    return omap_l4_io_readh_fn[i](omap_l4_io_opaque[i], addr);
1672
}
1673

    
1674
static uint32_t omap_l4_io_readw(void *opaque, target_phys_addr_t addr)
1675
{
1676
    unsigned int i = (addr - OMAP2_L4_BASE) >> TARGET_PAGE_BITS;
1677

    
1678
    return omap_l4_io_readw_fn[i](omap_l4_io_opaque[i], addr);
1679
}
1680

    
1681
static void omap_l4_io_writeb(void *opaque, target_phys_addr_t addr,
1682
                uint32_t value)
1683
{
1684
    unsigned int i = (addr - OMAP2_L4_BASE) >> TARGET_PAGE_BITS;
1685

    
1686
    return omap_l4_io_writeb_fn[i](omap_l4_io_opaque[i], addr, value);
1687
}
1688

    
1689
static void omap_l4_io_writeh(void *opaque, target_phys_addr_t addr,
1690
                uint32_t value)
1691
{
1692
    unsigned int i = (addr - OMAP2_L4_BASE) >> TARGET_PAGE_BITS;
1693

    
1694
    return omap_l4_io_writeh_fn[i](omap_l4_io_opaque[i], addr, value);
1695
}
1696

    
1697
static void omap_l4_io_writew(void *opaque, target_phys_addr_t addr,
1698
                uint32_t value)
1699
{
1700
    unsigned int i = (addr - OMAP2_L4_BASE) >> TARGET_PAGE_BITS;
1701

    
1702
    return omap_l4_io_writew_fn[i](omap_l4_io_opaque[i], addr, value);
1703
}
1704

    
1705
static CPUReadMemoryFunc *omap_l4_io_readfn[] = {
1706
    omap_l4_io_readb,
1707
    omap_l4_io_readh,
1708
    omap_l4_io_readw,
1709
};
1710

    
1711
static CPUWriteMemoryFunc *omap_l4_io_writefn[] = {
1712
    omap_l4_io_writeb,
1713
    omap_l4_io_writeh,
1714
    omap_l4_io_writew,
1715
};
1716
#endif
1717

    
1718
struct omap_l4_s *omap_l4_init(target_phys_addr_t base, int ta_num)
1719
{
1720
    struct omap_l4_s *bus = qemu_mallocz(
1721
                    sizeof(*bus) + ta_num * sizeof(*bus->ta));
1722

    
1723
    bus->ta_num = ta_num;
1724
    bus->base = base;
1725

    
1726
#ifdef L4_MUX_HACK
1727
    omap_l4_io_entries = 1;
1728
    omap_l4_io_entry = qemu_mallocz(125 * sizeof(*omap_l4_io_entry));
1729

    
1730
    omap_cpu_io_entry =
1731
            cpu_register_io_memory(0, omap_l4_io_readfn,
1732
                            omap_l4_io_writefn, bus);
1733
# define L4_PAGES        (0xb4000 / TARGET_PAGE_SIZE)
1734
    omap_l4_io_readb_fn = qemu_mallocz(sizeof(void *) * L4_PAGES);
1735
    omap_l4_io_readh_fn = qemu_mallocz(sizeof(void *) * L4_PAGES);
1736
    omap_l4_io_readw_fn = qemu_mallocz(sizeof(void *) * L4_PAGES);
1737
    omap_l4_io_writeb_fn = qemu_mallocz(sizeof(void *) * L4_PAGES);
1738
    omap_l4_io_writeh_fn = qemu_mallocz(sizeof(void *) * L4_PAGES);
1739
    omap_l4_io_writew_fn = qemu_mallocz(sizeof(void *) * L4_PAGES);
1740
    omap_l4_io_opaque = qemu_mallocz(sizeof(void *) * L4_PAGES);
1741
#endif
1742

    
1743
    return bus;
1744
}
1745

    
1746
static uint32_t omap_l4ta_read(void *opaque, target_phys_addr_t addr)
1747
{
1748
    struct omap_target_agent_s *s = (struct omap_target_agent_s *) opaque;
1749
    target_phys_addr_t reg = addr - s->base;
1750

    
1751
    switch (reg) {
1752
    case 0x00:        /* COMPONENT */
1753
        return s->component;
1754

    
1755
    case 0x20:        /* AGENT_CONTROL */
1756
        return s->control;
1757

    
1758
    case 0x28:        /* AGENT_STATUS */
1759
        return s->status;
1760
    }
1761

    
1762
    OMAP_BAD_REG(addr);
1763
    return 0;
1764
}
1765

    
1766
static void omap_l4ta_write(void *opaque, target_phys_addr_t addr,
1767
                uint32_t value)
1768
{
1769
    struct omap_target_agent_s *s = (struct omap_target_agent_s *) opaque;
1770
    target_phys_addr_t reg = addr - s->base;
1771

    
1772
    switch (reg) {
1773
    case 0x00:        /* COMPONENT */
1774
    case 0x28:        /* AGENT_STATUS */
1775
        OMAP_RO_REG(addr);
1776
        break;
1777

    
1778
    case 0x20:        /* AGENT_CONTROL */
1779
        s->control = value & 0x01000700;
1780
        if (value & 1)                                        /* OCP_RESET */
1781
            s->status &= ~1;                                /* REQ_TIMEOUT */
1782
        break;
1783

    
1784
    default:
1785
        OMAP_BAD_REG(addr);
1786
    }
1787
}
1788

    
1789
static CPUReadMemoryFunc *omap_l4ta_readfn[] = {
1790
    omap_badwidth_read16,
1791
    omap_l4ta_read,
1792
    omap_badwidth_read16,
1793
};
1794

    
1795
static CPUWriteMemoryFunc *omap_l4ta_writefn[] = {
1796
    omap_badwidth_write32,
1797
    omap_badwidth_write32,
1798
    omap_l4ta_write,
1799
};
1800

    
1801
#define L4TA(n)                (n)
1802
#define L4TAO(n)        ((n) + 39)
1803

    
1804
static struct omap_l4_region_s {
1805
    target_phys_addr_t offset;
1806
    size_t size;
1807
    int access;
1808
} omap_l4_region[125] = {
1809
    [  1] = { 0x40800,  0x800, 32          }, /* Initiator agent */
1810
    [  2] = { 0x41000, 0x1000, 32          }, /* Link agent */
1811
    [  0] = { 0x40000,  0x800, 32          }, /* Address and protection */
1812
    [  3] = { 0x00000, 0x1000, 32 | 16 | 8 }, /* System Control and Pinout */
1813
    [  4] = { 0x01000, 0x1000, 32 | 16 | 8 }, /* L4TAO1 */
1814
    [  5] = { 0x04000, 0x1000, 32 | 16     }, /* 32K Timer */
1815
    [  6] = { 0x05000, 0x1000, 32 | 16 | 8 }, /* L4TAO2 */
1816
    [  7] = { 0x08000,  0x800, 32          }, /* PRCM Region A */
1817
    [  8] = { 0x08800,  0x800, 32          }, /* PRCM Region B */
1818
    [  9] = { 0x09000, 0x1000, 32 | 16 | 8 }, /* L4TAO */
1819
    [ 10] = { 0x12000, 0x1000, 32 | 16 | 8 }, /* Test (BCM) */
1820
    [ 11] = { 0x13000, 0x1000, 32 | 16 | 8 }, /* L4TA1 */
1821
    [ 12] = { 0x14000, 0x1000, 32          }, /* Test/emulation (TAP) */
1822
    [ 13] = { 0x15000, 0x1000, 32 | 16 | 8 }, /* L4TA2 */
1823
    [ 14] = { 0x18000, 0x1000, 32 | 16 | 8 }, /* GPIO1 */
1824
    [ 16] = { 0x1a000, 0x1000, 32 | 16 | 8 }, /* GPIO2 */
1825
    [ 18] = { 0x1c000, 0x1000, 32 | 16 | 8 }, /* GPIO3 */
1826
    [ 19] = { 0x1e000, 0x1000, 32 | 16 | 8 }, /* GPIO4 */
1827
    [ 15] = { 0x19000, 0x1000, 32 | 16 | 8 }, /* Quad GPIO TOP */
1828
    [ 17] = { 0x1b000, 0x1000, 32 | 16 | 8 }, /* L4TA3 */
1829
    [ 20] = { 0x20000, 0x1000, 32 | 16 | 8 }, /* WD Timer 1 (Secure) */
1830
    [ 22] = { 0x22000, 0x1000, 32 | 16 | 8 }, /* WD Timer 2 (OMAP) */
1831
    [ 21] = { 0x21000, 0x1000, 32 | 16 | 8 }, /* Dual WD timer TOP */
1832
    [ 23] = { 0x23000, 0x1000, 32 | 16 | 8 }, /* L4TA4 */
1833
    [ 24] = { 0x28000, 0x1000, 32 | 16 | 8 }, /* GP Timer 1 */
1834
    [ 25] = { 0x29000, 0x1000, 32 | 16 | 8 }, /* L4TA7 */
1835
    [ 26] = { 0x48000, 0x2000, 32 | 16 | 8 }, /* Emulation (ARM11ETB) */
1836
    [ 27] = { 0x4a000, 0x1000, 32 | 16 | 8 }, /* L4TA9 */
1837
    [ 28] = { 0x50000,  0x400, 32 | 16 | 8 }, /* Display top */
1838
    [ 29] = { 0x50400,  0x400, 32 | 16 | 8 }, /* Display control */
1839
    [ 30] = { 0x50800,  0x400, 32 | 16 | 8 }, /* Display RFBI */
1840
    [ 31] = { 0x50c00,  0x400, 32 | 16 | 8 }, /* Display encoder */
1841
    [ 32] = { 0x51000, 0x1000, 32 | 16 | 8 }, /* L4TA10 */
1842
    [ 33] = { 0x52000,  0x400, 32 | 16 | 8 }, /* Camera top */
1843
    [ 34] = { 0x52400,  0x400, 32 | 16 | 8 }, /* Camera core */
1844
    [ 35] = { 0x52800,  0x400, 32 | 16 | 8 }, /* Camera DMA */
1845
    [ 36] = { 0x52c00,  0x400, 32 | 16 | 8 }, /* Camera MMU */
1846
    [ 37] = { 0x53000, 0x1000, 32 | 16 | 8 }, /* L4TA11 */
1847
    [ 38] = { 0x56000, 0x1000, 32 | 16 | 8 }, /* sDMA */
1848
    [ 39] = { 0x57000, 0x1000, 32 | 16 | 8 }, /* L4TA12 */
1849
    [ 40] = { 0x58000, 0x1000, 32 | 16 | 8 }, /* SSI top */
1850
    [ 41] = { 0x59000, 0x1000, 32 | 16 | 8 }, /* SSI GDD */
1851
    [ 42] = { 0x5a000, 0x1000, 32 | 16 | 8 }, /* SSI Port1 */
1852
    [ 43] = { 0x5b000, 0x1000, 32 | 16 | 8 }, /* SSI Port2 */
1853
    [ 44] = { 0x5c000, 0x1000, 32 | 16 | 8 }, /* L4TA13 */
1854
    [ 45] = { 0x5e000, 0x1000, 32 | 16 | 8 }, /* USB OTG */
1855
    [ 46] = { 0x5f000, 0x1000, 32 | 16 | 8 }, /* L4TAO4 */
1856
    [ 47] = { 0x60000, 0x1000, 32 | 16 | 8 }, /* Emulation (WIN_TRACER1SDRC) */
1857
    [ 48] = { 0x61000, 0x1000, 32 | 16 | 8 }, /* L4TA14 */
1858
    [ 49] = { 0x62000, 0x1000, 32 | 16 | 8 }, /* Emulation (WIN_TRACER2GPMC) */
1859
    [ 50] = { 0x63000, 0x1000, 32 | 16 | 8 }, /* L4TA15 */
1860
    [ 51] = { 0x64000, 0x1000, 32 | 16 | 8 }, /* Emulation (WIN_TRACER3OCM) */
1861
    [ 52] = { 0x65000, 0x1000, 32 | 16 | 8 }, /* L4TA16 */
1862
    [ 53] = { 0x66000,  0x300, 32 | 16 | 8 }, /* Emulation (WIN_TRACER4L4) */
1863
    [ 54] = { 0x67000, 0x1000, 32 | 16 | 8 }, /* L4TA17 */
1864
    [ 55] = { 0x68000, 0x1000, 32 | 16 | 8 }, /* Emulation (XTI) */
1865
    [ 56] = { 0x69000, 0x1000, 32 | 16 | 8 }, /* L4TA18 */
1866
    [ 57] = { 0x6a000, 0x1000,      16 | 8 }, /* UART1 */
1867
    [ 58] = { 0x6b000, 0x1000, 32 | 16 | 8 }, /* L4TA19 */
1868
    [ 59] = { 0x6c000, 0x1000,      16 | 8 }, /* UART2 */
1869
    [ 60] = { 0x6d000, 0x1000, 32 | 16 | 8 }, /* L4TA20 */
1870
    [ 61] = { 0x6e000, 0x1000,      16 | 8 }, /* UART3 */
1871
    [ 62] = { 0x6f000, 0x1000, 32 | 16 | 8 }, /* L4TA21 */
1872
    [ 63] = { 0x70000, 0x1000,      16     }, /* I2C1 */
1873
    [ 64] = { 0x71000, 0x1000, 32 | 16 | 8 }, /* L4TAO5 */
1874
    [ 65] = { 0x72000, 0x1000,      16     }, /* I2C2 */
1875
    [ 66] = { 0x73000, 0x1000, 32 | 16 | 8 }, /* L4TAO6 */
1876
    [ 67] = { 0x74000, 0x1000,      16     }, /* McBSP1 */
1877
    [ 68] = { 0x75000, 0x1000, 32 | 16 | 8 }, /* L4TAO7 */
1878
    [ 69] = { 0x76000, 0x1000,      16     }, /* McBSP2 */
1879
    [ 70] = { 0x77000, 0x1000, 32 | 16 | 8 }, /* L4TAO8 */
1880
    [ 71] = { 0x24000, 0x1000, 32 | 16 | 8 }, /* WD Timer 3 (DSP) */
1881
    [ 72] = { 0x25000, 0x1000, 32 | 16 | 8 }, /* L4TA5 */
1882
    [ 73] = { 0x26000, 0x1000, 32 | 16 | 8 }, /* WD Timer 4 (IVA) */
1883
    [ 74] = { 0x27000, 0x1000, 32 | 16 | 8 }, /* L4TA6 */
1884
    [ 75] = { 0x2a000, 0x1000, 32 | 16 | 8 }, /* GP Timer 2 */
1885
    [ 76] = { 0x2b000, 0x1000, 32 | 16 | 8 }, /* L4TA8 */
1886
    [ 77] = { 0x78000, 0x1000, 32 | 16 | 8 }, /* GP Timer 3 */
1887
    [ 78] = { 0x79000, 0x1000, 32 | 16 | 8 }, /* L4TA22 */
1888
    [ 79] = { 0x7a000, 0x1000, 32 | 16 | 8 }, /* GP Timer 4 */
1889
    [ 80] = { 0x7b000, 0x1000, 32 | 16 | 8 }, /* L4TA23 */
1890
    [ 81] = { 0x7c000, 0x1000, 32 | 16 | 8 }, /* GP Timer 5 */
1891
    [ 82] = { 0x7d000, 0x1000, 32 | 16 | 8 }, /* L4TA24 */
1892
    [ 83] = { 0x7e000, 0x1000, 32 | 16 | 8 }, /* GP Timer 6 */
1893
    [ 84] = { 0x7f000, 0x1000, 32 | 16 | 8 }, /* L4TA25 */
1894
    [ 85] = { 0x80000, 0x1000, 32 | 16 | 8 }, /* GP Timer 7 */
1895
    [ 86] = { 0x81000, 0x1000, 32 | 16 | 8 }, /* L4TA26 */
1896
    [ 87] = { 0x82000, 0x1000, 32 | 16 | 8 }, /* GP Timer 8 */
1897
    [ 88] = { 0x83000, 0x1000, 32 | 16 | 8 }, /* L4TA27 */
1898
    [ 89] = { 0x84000, 0x1000, 32 | 16 | 8 }, /* GP Timer 9 */
1899
    [ 90] = { 0x85000, 0x1000, 32 | 16 | 8 }, /* L4TA28 */
1900
    [ 91] = { 0x86000, 0x1000, 32 | 16 | 8 }, /* GP Timer 10 */
1901
    [ 92] = { 0x87000, 0x1000, 32 | 16 | 8 }, /* L4TA29 */
1902
    [ 93] = { 0x88000, 0x1000, 32 | 16 | 8 }, /* GP Timer 11 */
1903
    [ 94] = { 0x89000, 0x1000, 32 | 16 | 8 }, /* L4TA30 */
1904
    [ 95] = { 0x8a000, 0x1000, 32 | 16 | 8 }, /* GP Timer 12 */
1905
    [ 96] = { 0x8b000, 0x1000, 32 | 16 | 8 }, /* L4TA31 */
1906
    [ 97] = { 0x90000, 0x1000,      16     }, /* EAC */
1907
    [ 98] = { 0x91000, 0x1000, 32 | 16 | 8 }, /* L4TA32 */
1908
    [ 99] = { 0x92000, 0x1000,      16     }, /* FAC */
1909
    [100] = { 0x93000, 0x1000, 32 | 16 | 8 }, /* L4TA33 */
1910
    [101] = { 0x94000, 0x1000, 32 | 16 | 8 }, /* IPC (MAILBOX) */
1911
    [102] = { 0x95000, 0x1000, 32 | 16 | 8 }, /* L4TA34 */
1912
    [103] = { 0x98000, 0x1000, 32 | 16 | 8 }, /* SPI1 */
1913
    [104] = { 0x99000, 0x1000, 32 | 16 | 8 }, /* L4TA35 */
1914
    [105] = { 0x9a000, 0x1000, 32 | 16 | 8 }, /* SPI2 */
1915
    [106] = { 0x9b000, 0x1000, 32 | 16 | 8 }, /* L4TA36 */
1916
    [107] = { 0x9c000, 0x1000,      16 | 8 }, /* MMC SDIO */
1917
    [108] = { 0x9d000, 0x1000, 32 | 16 | 8 }, /* L4TAO9 */
1918
    [109] = { 0x9e000, 0x1000, 32 | 16 | 8 }, /* MS_PRO */
1919
    [110] = { 0x9f000, 0x1000, 32 | 16 | 8 }, /* L4TAO10 */
1920
    [111] = { 0xa0000, 0x1000, 32          }, /* RNG */
1921
    [112] = { 0xa1000, 0x1000, 32 | 16 | 8 }, /* L4TAO11 */
1922
    [113] = { 0xa2000, 0x1000, 32          }, /* DES3DES */
1923
    [114] = { 0xa3000, 0x1000, 32 | 16 | 8 }, /* L4TAO12 */
1924
    [115] = { 0xa4000, 0x1000, 32          }, /* SHA1MD5 */
1925
    [116] = { 0xa5000, 0x1000, 32 | 16 | 8 }, /* L4TAO13 */
1926
    [117] = { 0xa6000, 0x1000, 32          }, /* AES */
1927
    [118] = { 0xa7000, 0x1000, 32 | 16 | 8 }, /* L4TA37 */
1928
    [119] = { 0xa8000, 0x2000, 32          }, /* PKA */
1929
    [120] = { 0xaa000, 0x1000, 32 | 16 | 8 }, /* L4TA38 */
1930
    [121] = { 0xb0000, 0x1000, 32          }, /* MG */
1931
    [122] = { 0xb1000, 0x1000, 32 | 16 | 8 },
1932
    [123] = { 0xb2000, 0x1000, 32          }, /* HDQ/1-Wire */
1933
    [124] = { 0xb3000, 0x1000, 32 | 16 | 8 }, /* L4TA39 */
1934
};
1935

    
1936
static struct omap_l4_agent_info_s {
1937
    int ta;
1938
    int region;
1939
    int regions;
1940
    int ta_region;
1941
} omap_l4_agent_info[54] = {
1942
    { 0,           0, 3, 2 }, /* L4IA initiatior agent */
1943
    { L4TAO(1),    3, 2, 1 }, /* Control and pinout module */
1944
    { L4TAO(2),    5, 2, 1 }, /* 32K timer */
1945
    { L4TAO(3),    7, 3, 2 }, /* PRCM */
1946
    { L4TA(1),    10, 2, 1 }, /* BCM */
1947
    { L4TA(2),    12, 2, 1 }, /* Test JTAG */
1948
    { L4TA(3),    14, 6, 3 }, /* Quad GPIO */
1949
    { L4TA(4),    20, 4, 3 }, /* WD timer 1/2 */
1950
    { L4TA(7),    24, 2, 1 }, /* GP timer 1 */
1951
    { L4TA(9),    26, 2, 1 }, /* ATM11 ETB */
1952
    { L4TA(10),   28, 5, 4 }, /* Display subsystem */
1953
    { L4TA(11),   33, 5, 4 }, /* Camera subsystem */
1954
    { L4TA(12),   38, 2, 1 }, /* sDMA */
1955
    { L4TA(13),   40, 5, 4 }, /* SSI */
1956
    { L4TAO(4),   45, 2, 1 }, /* USB */
1957
    { L4TA(14),   47, 2, 1 }, /* Win Tracer1 */
1958
    { L4TA(15),   49, 2, 1 }, /* Win Tracer2 */
1959
    { L4TA(16),   51, 2, 1 }, /* Win Tracer3 */
1960
    { L4TA(17),   53, 2, 1 }, /* Win Tracer4 */
1961
    { L4TA(18),   55, 2, 1 }, /* XTI */
1962
    { L4TA(19),   57, 2, 1 }, /* UART1 */
1963
    { L4TA(20),   59, 2, 1 }, /* UART2 */
1964
    { L4TA(21),   61, 2, 1 }, /* UART3 */
1965
    { L4TAO(5),   63, 2, 1 }, /* I2C1 */
1966
    { L4TAO(6),   65, 2, 1 }, /* I2C2 */
1967
    { L4TAO(7),   67, 2, 1 }, /* McBSP1 */
1968
    { L4TAO(8),   69, 2, 1 }, /* McBSP2 */
1969
    { L4TA(5),    71, 2, 1 }, /* WD Timer 3 (DSP) */
1970
    { L4TA(6),    73, 2, 1 }, /* WD Timer 4 (IVA) */
1971
    { L4TA(8),    75, 2, 1 }, /* GP Timer 2 */
1972
    { L4TA(22),   77, 2, 1 }, /* GP Timer 3 */
1973
    { L4TA(23),   79, 2, 1 }, /* GP Timer 4 */
1974
    { L4TA(24),   81, 2, 1 }, /* GP Timer 5 */
1975
    { L4TA(25),   83, 2, 1 }, /* GP Timer 6 */
1976
    { L4TA(26),   85, 2, 1 }, /* GP Timer 7 */
1977
    { L4TA(27),   87, 2, 1 }, /* GP Timer 8 */
1978
    { L4TA(28),   89, 2, 1 }, /* GP Timer 9 */
1979
    { L4TA(29),   91, 2, 1 }, /* GP Timer 10 */
1980
    { L4TA(30),   93, 2, 1 }, /* GP Timer 11 */
1981
    { L4TA(31),   95, 2, 1 }, /* GP Timer 12 */
1982
    { L4TA(32),   97, 2, 1 }, /* EAC */
1983
    { L4TA(33),   99, 2, 1 }, /* FAC */
1984
    { L4TA(34),  101, 2, 1 }, /* IPC */
1985
    { L4TA(35),  103, 2, 1 }, /* SPI1 */
1986
    { L4TA(36),  105, 2, 1 }, /* SPI2 */
1987
    { L4TAO(9),  107, 2, 1 }, /* MMC SDIO */
1988
    { L4TAO(10), 109, 2, 1 },
1989
    { L4TAO(11), 111, 2, 1 }, /* RNG */
1990
    { L4TAO(12), 113, 2, 1 }, /* DES3DES */
1991
    { L4TAO(13), 115, 2, 1 }, /* SHA1MD5 */
1992
    { L4TA(37),  117, 2, 1 }, /* AES */
1993
    { L4TA(38),  119, 2, 1 }, /* PKA */
1994
    { -1,        121, 2, 1 },
1995
    { L4TA(39),  123, 2, 1 }, /* HDQ/1-Wire */
1996
};
1997

    
1998
#define omap_l4ta(bus, cs)        omap_l4ta_get(bus, L4TA(cs))
1999
#define omap_l4tao(bus, cs)        omap_l4ta_get(bus, L4TAO(cs))
2000

    
2001
struct omap_target_agent_s *omap_l4ta_get(struct omap_l4_s *bus, int cs)
2002
{
2003
    int i, iomemtype;
2004
    struct omap_target_agent_s *ta = 0;
2005
    struct omap_l4_agent_info_s *info = 0;
2006

    
2007
    for (i = 0; i < bus->ta_num; i ++)
2008
        if (omap_l4_agent_info[i].ta == cs) {
2009
            ta = &bus->ta[i];
2010
            info = &omap_l4_agent_info[i];
2011
            break;
2012
        }
2013
    if (!ta) {
2014
        fprintf(stderr, "%s: bad target agent (%i)\n", __FUNCTION__, cs);
2015
        exit(-1);
2016
    }
2017

    
2018
    ta->bus = bus;
2019
    ta->start = &omap_l4_region[info->region];
2020
    ta->regions = info->regions;
2021

    
2022
    ta->component = ('Q' << 24) | ('E' << 16) | ('M' << 8) | ('U' << 0);
2023
    ta->status = 0x00000000;
2024
    ta->control = 0x00000200;        /* XXX 01000200 for L4TAO */
2025

    
2026
    iomemtype = l4_register_io_memory(0, omap_l4ta_readfn,
2027
                    omap_l4ta_writefn, ta);
2028
    ta->base = omap_l4_attach(ta, info->ta_region, iomemtype);
2029

    
2030
    return ta;
2031
}
2032

    
2033
target_phys_addr_t omap_l4_attach(struct omap_target_agent_s *ta, int region,
2034
                int iotype)
2035
{
2036
    target_phys_addr_t base;
2037
    ssize_t size;
2038
#ifdef L4_MUX_HACK
2039
    int i;
2040
#endif
2041

    
2042
    if (region < 0 || region >= ta->regions) {
2043
        fprintf(stderr, "%s: bad io region (%i)\n", __FUNCTION__, region);
2044
        exit(-1);
2045
    }
2046

    
2047
    base = ta->bus->base + ta->start[region].offset;
2048
    size = ta->start[region].size;
2049
    if (iotype) {
2050
#ifndef L4_MUX_HACK
2051
        cpu_register_physical_memory(base, size, iotype);
2052
#else
2053
        cpu_register_physical_memory(base, size, omap_cpu_io_entry);
2054
        i = (base - ta->bus->base) / TARGET_PAGE_SIZE;
2055
        for (; size > 0; size -= TARGET_PAGE_SIZE, i ++) {
2056
            omap_l4_io_readb_fn[i] = omap_l4_io_entry[iotype].mem_read[0];
2057
            omap_l4_io_readh_fn[i] = omap_l4_io_entry[iotype].mem_read[1];
2058
            omap_l4_io_readw_fn[i] = omap_l4_io_entry[iotype].mem_read[2];
2059
            omap_l4_io_writeb_fn[i] = omap_l4_io_entry[iotype].mem_write[0];
2060
            omap_l4_io_writeh_fn[i] = omap_l4_io_entry[iotype].mem_write[1];
2061
            omap_l4_io_writew_fn[i] = omap_l4_io_entry[iotype].mem_write[2];
2062
            omap_l4_io_opaque[i] = omap_l4_io_entry[iotype].opaque;
2063
        }
2064
#endif
2065
    }
2066

    
2067
    return base;
2068
}
2069

    
2070
/* TEST-Chip-level TAP */
2071
static uint32_t omap_tap_read(void *opaque, target_phys_addr_t addr)
2072
{
2073
    struct omap_mpu_state_s *s = (struct omap_mpu_state_s *) opaque;
2074
    target_phys_addr_t reg = addr - s->tap_base;
2075

    
2076
    switch (reg) {
2077
    case 0x204:        /* IDCODE_reg */
2078
        switch (s->mpu_model) {
2079
        case omap2420:
2080
        case omap2422:
2081
        case omap2423:
2082
            return 0x5b5d902f;        /* ES 2.2 */
2083
        case omap2430:
2084
            return 0x5b68a02f;        /* ES 2.2 */
2085
        case omap3430:
2086
            return 0x1b7ae02f;        /* ES 2 */
2087
        default:
2088
            cpu_abort(cpu_single_env, "%s: Bad mpu model\n", __FUNCTION__);
2089
        }
2090

    
2091
    case 0x208:        /* PRODUCTION_ID_reg for OMAP2 */
2092
    case 0x210:        /* PRODUCTION_ID_reg for OMAP3 */
2093
        switch (s->mpu_model) {
2094
        case omap2420:
2095
            return 0x000254f0;        /* POP ESHS2.1.1 in N91/93/95, ES2 in N800 */
2096
        case omap2422:
2097
            return 0x000400f0;
2098
        case omap2423:
2099
            return 0x000800f0;
2100
        case omap2430:
2101
            return 0x000000f0;
2102
        case omap3430:
2103
            return 0x000000f0;
2104
        default:
2105
            cpu_abort(cpu_single_env, "%s: Bad mpu model\n", __FUNCTION__);
2106
        }
2107

    
2108
    case 0x20c:
2109
        switch (s->mpu_model) {
2110
        case omap2420:
2111
        case omap2422:
2112
        case omap2423:
2113
            return 0xcafeb5d9;        /* ES 2.2 */
2114
        case omap2430:
2115
            return 0xcafeb68a;        /* ES 2.2 */
2116
        case omap3430:
2117
            return 0xcafeb7ae;        /* ES 2 */
2118
        default:
2119
            cpu_abort(cpu_single_env, "%s: Bad mpu model\n", __FUNCTION__);
2120
        }
2121

    
2122
    case 0x218:        /* DIE_ID_reg */
2123
        return ('Q' << 24) | ('E' << 16) | ('M' << 8) | ('U' << 0);
2124
    case 0x21c:        /* DIE_ID_reg */
2125
        return 0x54 << 24;
2126
    case 0x220:        /* DIE_ID_reg */
2127
        return ('Q' << 24) | ('E' << 16) | ('M' << 8) | ('U' << 0);
2128
    case 0x224:        /* DIE_ID_reg */
2129
        return ('Q' << 24) | ('E' << 16) | ('M' << 8) | ('U' << 0);
2130
    }
2131

    
2132
    OMAP_BAD_REG(addr);
2133
    return 0;
2134
}
2135

    
2136
static void omap_tap_write(void *opaque, target_phys_addr_t addr,
2137
                uint32_t value)
2138
{
2139
    OMAP_BAD_REG(addr);
2140
}
2141

    
2142
static CPUReadMemoryFunc *omap_tap_readfn[] = {
2143
    omap_badwidth_read32,
2144
    omap_badwidth_read32,
2145
    omap_tap_read,
2146
};
2147

    
2148
static CPUWriteMemoryFunc *omap_tap_writefn[] = {
2149
    omap_badwidth_write32,
2150
    omap_badwidth_write32,
2151
    omap_tap_write,
2152
};
2153

    
2154
void omap_tap_init(struct omap_target_agent_s *ta,
2155
                struct omap_mpu_state_s *mpu)
2156
{
2157
    mpu->tap_base = omap_l4_attach(ta, 0, l4_register_io_memory(0,
2158
                            omap_tap_readfn, omap_tap_writefn, mpu));
2159
}
2160

    
2161
/* Power, Reset, and Clock Management */
2162
struct omap_prcm_s {
2163
    target_phys_addr_t base;
2164
    qemu_irq irq[3];
2165
    struct omap_mpu_state_s *mpu;
2166

    
2167
    uint32_t irqst[3];
2168
    uint32_t irqen[3];
2169

    
2170
    uint32_t sysconfig;
2171
    uint32_t voltctrl;
2172
    uint32_t scratch[20];
2173

    
2174
    uint32_t clksrc[1];
2175
    uint32_t clkout[1];
2176
    uint32_t clkemul[1];
2177
    uint32_t clkpol[1];
2178
    uint32_t clksel[8];
2179
    uint32_t clken[12];
2180
    uint32_t clkctrl[4];
2181
    uint32_t clkidle[7];
2182
    uint32_t setuptime[2];
2183

    
2184
    uint32_t wkup[3];
2185
    uint32_t wken[3];
2186
    uint32_t wkst[3];
2187
    uint32_t rst[4];
2188
    uint32_t rstctrl[1];
2189
    uint32_t power[4];
2190
    uint32_t rsttime_wkup;
2191

    
2192
    uint32_t ev;
2193
    uint32_t evtime[2];
2194
};
2195

    
2196
static void omap_prcm_int_update(struct omap_prcm_s *s, int dom)
2197
{
2198
    qemu_set_irq(s->irq[dom], s->irqst[dom] & s->irqen[dom]);
2199
    /* XXX or is the mask applied before PRCM_IRQSTATUS_* ? */
2200
}
2201

    
2202
static uint32_t omap_prcm_read(void *opaque, target_phys_addr_t addr)
2203
{
2204
    struct omap_prcm_s *s = (struct omap_prcm_s *) opaque;
2205
    int offset = addr - s->base;
2206

    
2207
    switch (offset) {
2208
    case 0x000:        /* PRCM_REVISION */
2209
        return 0x10;
2210

    
2211
    case 0x010:        /* PRCM_SYSCONFIG */
2212
        return s->sysconfig;
2213

    
2214
    case 0x018:        /* PRCM_IRQSTATUS_MPU */
2215
        return s->irqst[0];
2216

    
2217
    case 0x01c:        /* PRCM_IRQENABLE_MPU */
2218
        return s->irqen[0];
2219

    
2220
    case 0x050:        /* PRCM_VOLTCTRL */
2221
        return s->voltctrl;
2222
    case 0x054:        /* PRCM_VOLTST */
2223
        return s->voltctrl & 3;
2224

    
2225
    case 0x060:        /* PRCM_CLKSRC_CTRL */
2226
        return s->clksrc[0];
2227
    case 0x070:        /* PRCM_CLKOUT_CTRL */
2228
        return s->clkout[0];
2229
    case 0x078:        /* PRCM_CLKEMUL_CTRL */
2230
        return s->clkemul[0];
2231
    case 0x080:        /* PRCM_CLKCFG_CTRL */
2232
    case 0x084:        /* PRCM_CLKCFG_STATUS */
2233
        return 0;
2234

    
2235
    case 0x090:        /* PRCM_VOLTSETUP */
2236
        return s->setuptime[0];
2237

    
2238
    case 0x094:        /* PRCM_CLKSSETUP */
2239
        return s->setuptime[1];
2240

    
2241
    case 0x098:        /* PRCM_POLCTRL */
2242
        return s->clkpol[0];
2243

    
2244
    case 0x0b0:        /* GENERAL_PURPOSE1 */
2245
    case 0x0b4:        /* GENERAL_PURPOSE2 */
2246
    case 0x0b8:        /* GENERAL_PURPOSE3 */
2247
    case 0x0bc:        /* GENERAL_PURPOSE4 */
2248
    case 0x0c0:        /* GENERAL_PURPOSE5 */
2249
    case 0x0c4:        /* GENERAL_PURPOSE6 */
2250
    case 0x0c8:        /* GENERAL_PURPOSE7 */
2251
    case 0x0cc:        /* GENERAL_PURPOSE8 */
2252
    case 0x0d0:        /* GENERAL_PURPOSE9 */
2253
    case 0x0d4:        /* GENERAL_PURPOSE10 */
2254
    case 0x0d8:        /* GENERAL_PURPOSE11 */
2255
    case 0x0dc:        /* GENERAL_PURPOSE12 */
2256
    case 0x0e0:        /* GENERAL_PURPOSE13 */
2257
    case 0x0e4:        /* GENERAL_PURPOSE14 */
2258
    case 0x0e8:        /* GENERAL_PURPOSE15 */
2259
    case 0x0ec:        /* GENERAL_PURPOSE16 */
2260
    case 0x0f0:        /* GENERAL_PURPOSE17 */
2261
    case 0x0f4:        /* GENERAL_PURPOSE18 */
2262
    case 0x0f8:        /* GENERAL_PURPOSE19 */
2263
    case 0x0fc:        /* GENERAL_PURPOSE20 */
2264
        return s->scratch[(offset - 0xb0) >> 2];
2265

    
2266
    case 0x140:        /* CM_CLKSEL_MPU */
2267
        return s->clksel[0];
2268
    case 0x148:        /* CM_CLKSTCTRL_MPU */
2269
        return s->clkctrl[0];
2270

    
2271
    case 0x158:        /* RM_RSTST_MPU */
2272
        return s->rst[0];
2273
    case 0x1c8:        /* PM_WKDEP_MPU */
2274
        return s->wkup[0];
2275
    case 0x1d4:        /* PM_EVGENCTRL_MPU */
2276
        return s->ev;
2277
    case 0x1d8:        /* PM_EVEGENONTIM_MPU */
2278
        return s->evtime[0];
2279
    case 0x1dc:        /* PM_EVEGENOFFTIM_MPU */
2280
        return s->evtime[1];
2281
    case 0x1e0:        /* PM_PWSTCTRL_MPU */
2282
        return s->power[0];
2283
    case 0x1e4:        /* PM_PWSTST_MPU */
2284
        return 0;
2285

    
2286
    case 0x200:        /* CM_FCLKEN1_CORE */
2287
        return s->clken[0];
2288
    case 0x204:        /* CM_FCLKEN2_CORE */
2289
        return s->clken[1];
2290
    case 0x210:        /* CM_ICLKEN1_CORE */
2291
        return s->clken[2];
2292
    case 0x214:        /* CM_ICLKEN2_CORE */
2293
        return s->clken[3];
2294
    case 0x21c:        /* CM_ICLKEN4_CORE */
2295
        return s->clken[4];
2296

    
2297
    case 0x220:        /* CM_IDLEST1_CORE */
2298
        /* TODO: check the actual iclk status */
2299
        return 0x7ffffff9;
2300
    case 0x224:        /* CM_IDLEST2_CORE */
2301
        /* TODO: check the actual iclk status */
2302
        return 0x00000007;
2303
    case 0x22c:        /* CM_IDLEST4_CORE */
2304
        /* TODO: check the actual iclk status */
2305
        return 0x0000001f;
2306

    
2307
    case 0x230:        /* CM_AUTOIDLE1_CORE */
2308
        return s->clkidle[0];
2309
    case 0x234:        /* CM_AUTOIDLE2_CORE */
2310
        return s->clkidle[1];
2311
    case 0x238:        /* CM_AUTOIDLE3_CORE */
2312
        return s->clkidle[2];
2313
    case 0x23c:        /* CM_AUTOIDLE4_CORE */
2314
        return s->clkidle[3];
2315

    
2316
    case 0x240:        /* CM_CLKSEL1_CORE */
2317
        return s->clksel[1];
2318
    case 0x244:        /* CM_CLKSEL2_CORE */
2319
        return s->clksel[2];
2320

    
2321
    case 0x248:        /* CM_CLKSTCTRL_CORE */
2322
        return s->clkctrl[1];
2323

    
2324
    case 0x2a0:        /* PM_WKEN1_CORE */
2325
        return s->wken[0];
2326
    case 0x2a4:        /* PM_WKEN2_CORE */
2327
        return s->wken[1];
2328

    
2329
    case 0x2b0:        /* PM_WKST1_CORE */
2330
        return s->wkst[0];
2331
    case 0x2b4:        /* PM_WKST2_CORE */
2332
        return s->wkst[1];
2333
    case 0x2c8:        /* PM_WKDEP_CORE */
2334
        return 0x1e;
2335

    
2336
    case 0x2e0:        /* PM_PWSTCTRL_CORE */
2337
        return s->power[1];
2338
    case 0x2e4:        /* PM_PWSTST_CORE */
2339
        return 0x000030 | (s->power[1] & 0xfc00);
2340

    
2341
    case 0x300:        /* CM_FCLKEN_GFX */
2342
        return s->clken[5];
2343
    case 0x310:        /* CM_ICLKEN_GFX */
2344
        return s->clken[6];
2345
    case 0x320:        /* CM_IDLEST_GFX */
2346
        /* TODO: check the actual iclk status */
2347
        return 0x00000001;
2348
    case 0x340:        /* CM_CLKSEL_GFX */
2349
        return s->clksel[3];
2350
    case 0x348:        /* CM_CLKSTCTRL_GFX */
2351
        return s->clkctrl[2];
2352
    case 0x350:        /* RM_RSTCTRL_GFX */
2353
        return s->rstctrl[0];
2354
    case 0x358:        /* RM_RSTST_GFX */
2355
        return s->rst[1];
2356
    case 0x3c8:        /* PM_WKDEP_GFX */
2357
        return s->wkup[1];
2358

    
2359
    case 0x3e0:        /* PM_PWSTCTRL_GFX */
2360
        return s->power[2];
2361
    case 0x3e4:        /* PM_PWSTST_GFX */
2362
        return s->power[2] & 3;
2363

    
2364
    case 0x400:        /* CM_FCLKEN_WKUP */
2365
        return s->clken[7];
2366
    case 0x410:        /* CM_ICLKEN_WKUP */
2367
        return s->clken[8];
2368
    case 0x420:        /* CM_IDLEST_WKUP */
2369
        /* TODO: check the actual iclk status */
2370
        return 0x0000003f;
2371
    case 0x430:        /* CM_AUTOIDLE_WKUP */
2372
        return s->clkidle[4];
2373
    case 0x440:        /* CM_CLKSEL_WKUP */
2374
        return s->clksel[4];
2375
    case 0x450:        /* RM_RSTCTRL_WKUP */
2376
        return 0;
2377
    case 0x454:        /* RM_RSTTIME_WKUP */
2378
        return s->rsttime_wkup;
2379
    case 0x458:        /* RM_RSTST_WKUP */
2380
        return s->rst[2];
2381
    case 0x4a0:        /* PM_WKEN_WKUP */
2382
        return s->wken[2];
2383
    case 0x4b0:        /* PM_WKST_WKUP */
2384
        return s->wkst[2];
2385

    
2386
    case 0x500:        /* CM_CLKEN_PLL */
2387
        return s->clken[9];
2388
    case 0x520:        /* CM_IDLEST_CKGEN */
2389
        /* Core uses 32-kHz clock */
2390
        if (!(s->clksel[6] & 3))
2391
            return 0x00000377;
2392
        /* DPLL not in lock mode, core uses ref_clk */
2393
        if ((s->clken[9] & 3) != 3)
2394
            return 0x00000375;
2395
        /* Core uses DPLL */
2396
        return 0x00000376;
2397
    case 0x530:        /* CM_AUTOIDLE_PLL */
2398
        return s->clkidle[5];
2399
    case 0x540:        /* CM_CLKSEL1_PLL */
2400
        return s->clksel[5];
2401
    case 0x544:        /* CM_CLKSEL2_PLL */
2402
        return s->clksel[6];
2403

    
2404
    case 0x800:        /* CM_FCLKEN_DSP */
2405
        return s->clken[10];
2406
    case 0x810:        /* CM_ICLKEN_DSP */
2407
        return s->clken[11];
2408
    case 0x820:        /* CM_IDLEST_DSP */
2409
        /* TODO: check the actual iclk status */
2410
        return 0x00000103;
2411
    case 0x830:        /* CM_AUTOIDLE_DSP */
2412
        return s->clkidle[6];
2413
    case 0x840:        /* CM_CLKSEL_DSP */
2414
        return s->clksel[7];
2415
    case 0x848:        /* CM_CLKSTCTRL_DSP */
2416
        return s->clkctrl[3];
2417
    case 0x850:        /* RM_RSTCTRL_DSP */
2418
        return 0;
2419
    case 0x858:        /* RM_RSTST_DSP */
2420
        return s->rst[3];
2421
    case 0x8c8:        /* PM_WKDEP_DSP */
2422
        return s->wkup[2];
2423
    case 0x8e0:        /* PM_PWSTCTRL_DSP */
2424
        return s->power[3];
2425
    case 0x8e4:        /* PM_PWSTST_DSP */
2426
        return 0x008030 | (s->power[3] & 0x3003);
2427

    
2428
    case 0x8f0:        /* PRCM_IRQSTATUS_DSP */
2429
        return s->irqst[1];
2430
    case 0x8f4:        /* PRCM_IRQENABLE_DSP */
2431
        return s->irqen[1];
2432

    
2433
    case 0x8f8:        /* PRCM_IRQSTATUS_IVA */
2434
        return s->irqst[2];
2435
    case 0x8fc:        /* PRCM_IRQENABLE_IVA */
2436
        return s->irqen[2];
2437
    }
2438

    
2439
    OMAP_BAD_REG(addr);
2440
    return 0;
2441
}
2442

    
2443
static void omap_prcm_write(void *opaque, target_phys_addr_t addr,
2444
                uint32_t value)
2445
{
2446
    struct omap_prcm_s *s = (struct omap_prcm_s *) opaque;
2447
    int offset = addr - s->base;
2448

    
2449
    switch (offset) {
2450
    case 0x000:        /* PRCM_REVISION */
2451
    case 0x054:        /* PRCM_VOLTST */
2452
    case 0x084:        /* PRCM_CLKCFG_STATUS */
2453
    case 0x1e4:        /* PM_PWSTST_MPU */
2454
    case 0x220:        /* CM_IDLEST1_CORE */
2455
    case 0x224:        /* CM_IDLEST2_CORE */
2456
    case 0x22c:        /* CM_IDLEST4_CORE */
2457
    case 0x2c8:        /* PM_WKDEP_CORE */
2458
    case 0x2e4:        /* PM_PWSTST_CORE */
2459
    case 0x320:        /* CM_IDLEST_GFX */
2460
    case 0x3e4:        /* PM_PWSTST_GFX */
2461
    case 0x420:        /* CM_IDLEST_WKUP */
2462
    case 0x520:        /* CM_IDLEST_CKGEN */
2463
    case 0x820:        /* CM_IDLEST_DSP */
2464
    case 0x8e4:        /* PM_PWSTST_DSP */
2465
        OMAP_RO_REG(addr);
2466
        return;
2467

    
2468
    case 0x010:        /* PRCM_SYSCONFIG */
2469
        s->sysconfig = value & 1;
2470
        break;
2471

    
2472
    case 0x018:        /* PRCM_IRQSTATUS_MPU */
2473
        s->irqst[0] &= ~value;
2474
        omap_prcm_int_update(s, 0);
2475
        break;
2476
    case 0x01c:        /* PRCM_IRQENABLE_MPU */
2477
        s->irqen[0] = value & 0x3f;
2478
        omap_prcm_int_update(s, 0);
2479
        break;
2480

    
2481
    case 0x050:        /* PRCM_VOLTCTRL */
2482
        s->voltctrl = value & 0xf1c3;
2483
        break;
2484

    
2485
    case 0x060:        /* PRCM_CLKSRC_CTRL */
2486
        s->clksrc[0] = value & 0xdb;
2487
        /* TODO update clocks */
2488
        break;
2489

    
2490
    case 0x070:        /* PRCM_CLKOUT_CTRL */
2491
        s->clkout[0] = value & 0xbbbb;
2492
        /* TODO update clocks */
2493
        break;
2494

    
2495
    case 0x078:        /* PRCM_CLKEMUL_CTRL */
2496
        s->clkemul[0] = value & 1;
2497
        /* TODO update clocks */
2498
        break;
2499

    
2500
    case 0x080:        /* PRCM_CLKCFG_CTRL */
2501
        break;
2502

    
2503
    case 0x090:        /* PRCM_VOLTSETUP */
2504
        s->setuptime[0] = value & 0xffff;
2505
        break;
2506
    case 0x094:        /* PRCM_CLKSSETUP */
2507
        s->setuptime[1] = value & 0xffff;
2508
        break;
2509

    
2510
    case 0x098:        /* PRCM_POLCTRL */
2511
        s->clkpol[0] = value & 0x701;
2512
        break;
2513

    
2514
    case 0x0b0:        /* GENERAL_PURPOSE1 */
2515
    case 0x0b4:        /* GENERAL_PURPOSE2 */
2516
    case 0x0b8:        /* GENERAL_PURPOSE3 */
2517
    case 0x0bc:        /* GENERAL_PURPOSE4 */
2518
    case 0x0c0:        /* GENERAL_PURPOSE5 */
2519
    case 0x0c4:        /* GENERAL_PURPOSE6 */
2520
    case 0x0c8:        /* GENERAL_PURPOSE7 */
2521
    case 0x0cc:        /* GENERAL_PURPOSE8 */
2522
    case 0x0d0:        /* GENERAL_PURPOSE9 */
2523
    case 0x0d4:        /* GENERAL_PURPOSE10 */
2524
    case 0x0d8:        /* GENERAL_PURPOSE11 */
2525
    case 0x0dc:        /* GENERAL_PURPOSE12 */
2526
    case 0x0e0:        /* GENERAL_PURPOSE13 */
2527
    case 0x0e4:        /* GENERAL_PURPOSE14 */
2528
    case 0x0e8:        /* GENERAL_PURPOSE15 */
2529
    case 0x0ec:        /* GENERAL_PURPOSE16 */
2530
    case 0x0f0:        /* GENERAL_PURPOSE17 */
2531
    case 0x0f4:        /* GENERAL_PURPOSE18 */
2532
    case 0x0f8:        /* GENERAL_PURPOSE19 */
2533
    case 0x0fc:        /* GENERAL_PURPOSE20 */
2534
        s->scratch[(offset - 0xb0) >> 2] = value;
2535
        break;
2536

    
2537
    case 0x140:        /* CM_CLKSEL_MPU */
2538
        s->clksel[0] = value & 0x1f;
2539
        /* TODO update clocks */
2540
        break;
2541
    case 0x148:        /* CM_CLKSTCTRL_MPU */
2542
        s->clkctrl[0] = value & 0x1f;
2543
        break;
2544

    
2545
    case 0x158:        /* RM_RSTST_MPU */
2546
        s->rst[0] &= ~value;
2547
        break;
2548
    case 0x1c8:        /* PM_WKDEP_MPU */
2549
        s->wkup[0] = value & 0x15;
2550
        break;
2551

    
2552
    case 0x1d4:        /* PM_EVGENCTRL_MPU */
2553
        s->ev = value & 0x1f;
2554
        break;
2555
    case 0x1d8:        /* PM_EVEGENONTIM_MPU */
2556
        s->evtime[0] = value;
2557
        break;
2558
    case 0x1dc:        /* PM_EVEGENOFFTIM_MPU */
2559
        s->evtime[1] = value;
2560
        break;
2561

    
2562
    case 0x1e0:        /* PM_PWSTCTRL_MPU */
2563
        s->power[0] = value & 0xc0f;
2564
        break;
2565

    
2566
    case 0x200:        /* CM_FCLKEN1_CORE */
2567
        s->clken[0] = value & 0xbfffffff;
2568
        /* TODO update clocks */
2569
        break;
2570
    case 0x204:        /* CM_FCLKEN2_CORE */
2571
        s->clken[1] = value & 0x00000007;
2572
        /* TODO update clocks */
2573
        break;
2574
    case 0x210:        /* CM_ICLKEN1_CORE */
2575
        s->clken[2] = value & 0xfffffff9;
2576
        /* TODO update clocks */
2577
        break;
2578
    case 0x214:        /* CM_ICLKEN2_CORE */
2579
        s->clken[3] = value & 0x00000007;
2580
        /* TODO update clocks */
2581
        break;
2582
    case 0x21c:        /* CM_ICLKEN4_CORE */
2583
        s->clken[4] = value & 0x0000001f;
2584
        /* TODO update clocks */
2585
        break;
2586

    
2587
    case 0x230:        /* CM_AUTOIDLE1_CORE */
2588
        s->clkidle[0] = value & 0xfffffff9;
2589
        /* TODO update clocks */
2590
        break;
2591
    case 0x234:        /* CM_AUTOIDLE2_CORE */
2592
        s->clkidle[1] = value & 0x00000007;
2593
        /* TODO update clocks */
2594
        break;
2595
    case 0x238:        /* CM_AUTOIDLE3_CORE */
2596
        s->clkidle[2] = value & 0x00000007;
2597
        /* TODO update clocks */
2598
        break;
2599
    case 0x23c:        /* CM_AUTOIDLE4_CORE */
2600
        s->clkidle[3] = value & 0x0000001f;
2601
        /* TODO update clocks */
2602
        break;
2603

    
2604
    case 0x240:        /* CM_CLKSEL1_CORE */
2605
        s->clksel[1] = value & 0x0fffbf7f;
2606
        /* TODO update clocks */
2607
        break;
2608

    
2609
    case 0x244:        /* CM_CLKSEL2_CORE */
2610
        s->clksel[2] = value & 0x00fffffc;
2611
        /* TODO update clocks */
2612
        break;
2613

    
2614
    case 0x248:        /* CM_CLKSTCTRL_CORE */
2615
        s->clkctrl[1] = value & 0x7;
2616
        break;
2617

    
2618
    case 0x2a0:        /* PM_WKEN1_CORE */
2619
        s->wken[0] = value & 0x04667ff8;
2620
        break;
2621
    case 0x2a4:        /* PM_WKEN2_CORE */
2622
        s->wken[1] = value & 0x00000005;
2623
        break;
2624

    
2625
    case 0x2b0:        /* PM_WKST1_CORE */
2626
        s->wkst[0] &= ~value;
2627
        break;
2628
    case 0x2b4:        /* PM_WKST2_CORE */
2629
        s->wkst[1] &= ~value;
2630
        break;
2631

    
2632
    case 0x2e0:        /* PM_PWSTCTRL_CORE */
2633
        s->power[1] = (value & 0x00fc3f) | (1 << 2);
2634
        break;
2635

    
2636
    case 0x300:        /* CM_FCLKEN_GFX */
2637
        s->clken[5] = value & 6;
2638
        /* TODO update clocks */
2639
        break;
2640
    case 0x310:        /* CM_ICLKEN_GFX */
2641
        s->clken[6] = value & 1;
2642
        /* TODO update clocks */
2643
        break;
2644
    case 0x340:        /* CM_CLKSEL_GFX */
2645
        s->clksel[3] = value & 7;
2646
        /* TODO update clocks */
2647
        break;
2648
    case 0x348:        /* CM_CLKSTCTRL_GFX */
2649
        s->clkctrl[2] = value & 1;
2650
        break;
2651
    case 0x350:        /* RM_RSTCTRL_GFX */
2652
        s->rstctrl[0] = value & 1;
2653
        /* TODO: reset */
2654
        break;
2655
    case 0x358:        /* RM_RSTST_GFX */
2656
        s->rst[1] &= ~value;
2657
        break;
2658
    case 0x3c8:        /* PM_WKDEP_GFX */
2659
        s->wkup[1] = value & 0x13;
2660
        break;
2661
    case 0x3e0:        /* PM_PWSTCTRL_GFX */
2662
        s->power[2] = (value & 0x00c0f) | (3 << 2);
2663
        break;
2664

    
2665
    case 0x400:        /* CM_FCLKEN_WKUP */
2666
        s->clken[7] = value & 0xd;
2667
        /* TODO update clocks */
2668
        break;
2669
    case 0x410:        /* CM_ICLKEN_WKUP */
2670
        s->clken[8] = value & 0x3f;
2671
        /* TODO update clocks */
2672
        break;
2673
    case 0x430:        /* CM_AUTOIDLE_WKUP */
2674
        s->clkidle[4] = value & 0x0000003f;
2675
        /* TODO update clocks */
2676
        break;
2677
    case 0x440:        /* CM_CLKSEL_WKUP */
2678
        s->clksel[4] = value & 3;
2679
        /* TODO update clocks */
2680
        break;
2681
    case 0x450:        /* RM_RSTCTRL_WKUP */
2682
        /* TODO: reset */
2683
        if (value & 2)
2684
            qemu_system_reset_request();
2685
        break;
2686
    case 0x454:        /* RM_RSTTIME_WKUP */
2687
        s->rsttime_wkup = value & 0x1fff;
2688
        break;
2689
    case 0x458:        /* RM_RSTST_WKUP */
2690
        s->rst[2] &= ~value;
2691
        break;
2692
    case 0x4a0:        /* PM_WKEN_WKUP */
2693
        s->wken[2] = value & 0x00000005;
2694
        break;
2695
    case 0x4b0:        /* PM_WKST_WKUP */
2696
        s->wkst[2] &= ~value;
2697
        break;
2698

    
2699
    case 0x500:        /* CM_CLKEN_PLL */
2700
        s->clken[9] = value & 0xcf;
2701
        /* TODO update clocks */
2702
        break;
2703
    case 0x530:        /* CM_AUTOIDLE_PLL */
2704
        s->clkidle[5] = value & 0x000000cf;
2705
        /* TODO update clocks */
2706
        break;
2707
    case 0x540:        /* CM_CLKSEL1_PLL */
2708
        s->clksel[5] = value & 0x03bfff28;
2709
        /* TODO update clocks */
2710
        break;
2711
    case 0x544:        /* CM_CLKSEL2_PLL */
2712
        s->clksel[6] = value & 3;
2713
        /* TODO update clocks */
2714
        break;
2715

    
2716
    case 0x800:        /* CM_FCLKEN_DSP */
2717
        s->clken[10] = value & 0x501;
2718
        /* TODO update clocks */
2719
        break;
2720
    case 0x810:        /* CM_ICLKEN_DSP */
2721
        s->clken[11] = value & 0x2;
2722
        /* TODO update clocks */
2723
        break;
2724
    case 0x830:        /* CM_AUTOIDLE_DSP */
2725
        s->clkidle[6] = value & 0x2;
2726
        /* TODO update clocks */
2727
        break;
2728
    case 0x840:        /* CM_CLKSEL_DSP */
2729
        s->clksel[7] = value & 0x3fff;
2730
        /* TODO update clocks */
2731
        break;
2732
    case 0x848:        /* CM_CLKSTCTRL_DSP */
2733
        s->clkctrl[3] = value & 0x101;
2734
        break;
2735
    case 0x850:        /* RM_RSTCTRL_DSP */
2736
        /* TODO: reset */
2737
        break;
2738
    case 0x858:        /* RM_RSTST_DSP */
2739
        s->rst[3] &= ~value;
2740
        break;
2741
    case 0x8c8:        /* PM_WKDEP_DSP */
2742
        s->wkup[2] = value & 0x13;
2743
        break;
2744
    case 0x8e0:        /* PM_PWSTCTRL_DSP */
2745
        s->power[3] = (value & 0x03017) | (3 << 2);
2746
        break;
2747

    
2748
    case 0x8f0:        /* PRCM_IRQSTATUS_DSP */
2749
        s->irqst[1] &= ~value;
2750
        omap_prcm_int_update(s, 1);
2751
        break;
2752
    case 0x8f4:        /* PRCM_IRQENABLE_DSP */
2753
        s->irqen[1] = value & 0x7;
2754
        omap_prcm_int_update(s, 1);
2755
        break;
2756

    
2757
    case 0x8f8:        /* PRCM_IRQSTATUS_IVA */
2758
        s->irqst[2] &= ~value;
2759
        omap_prcm_int_update(s, 2);
2760
        break;
2761
    case 0x8fc:        /* PRCM_IRQENABLE_IVA */
2762
        s->irqen[2] = value & 0x7;
2763
        omap_prcm_int_update(s, 2);
2764
        break;
2765

    
2766
    default:
2767
        OMAP_BAD_REG(addr);
2768
        return;
2769
    }
2770
}
2771

    
2772
static CPUReadMemoryFunc *omap_prcm_readfn[] = {
2773
    omap_badwidth_read32,
2774
    omap_badwidth_read32,
2775
    omap_prcm_read,
2776
};
2777

    
2778
static CPUWriteMemoryFunc *omap_prcm_writefn[] = {
2779
    omap_badwidth_write32,
2780
    omap_badwidth_write32,
2781
    omap_prcm_write,
2782
};
2783

    
2784
static void omap_prcm_reset(struct omap_prcm_s *s)
2785
{
2786
    s->sysconfig = 0;
2787
    s->irqst[0] = 0;
2788
    s->irqst[1] = 0;
2789
    s->irqst[2] = 0;
2790
    s->irqen[0] = 0;
2791
    s->irqen[1] = 0;
2792
    s->irqen[2] = 0;
2793
    s->voltctrl = 0x1040;
2794
    s->ev = 0x14;
2795
    s->evtime[0] = 0;
2796
    s->evtime[1] = 0;
2797
    s->clkctrl[0] = 0;
2798
    s->clkctrl[1] = 0;
2799
    s->clkctrl[2] = 0;
2800
    s->clkctrl[3] = 0;
2801
    s->clken[1] = 7;
2802
    s->clken[3] = 7;
2803
    s->clken[4] = 0;
2804
    s->clken[5] = 0;
2805
    s->clken[6] = 0;
2806
    s->clken[7] = 0xc;
2807
    s->clken[8] = 0x3e;
2808
    s->clken[9] = 0x0d;
2809
    s->clken[10] = 0;
2810
    s->clken[11] = 0;
2811
    s->clkidle[0] = 0;
2812
    s->clkidle[2] = 7;
2813
    s->clkidle[3] = 0;
2814
    s->clkidle[4] = 0;
2815
    s->clkidle[5] = 0x0c;
2816
    s->clkidle[6] = 0;
2817
    s->clksel[0] = 0x01;
2818
    s->clksel[1] = 0x02100121;
2819
    s->clksel[2] = 0x00000000;
2820
    s->clksel[3] = 0x01;
2821
    s->clksel[4] = 0;
2822
    s->clksel[7] = 0x0121;
2823
    s->wkup[0] = 0x15;
2824
    s->wkup[1] = 0x13;
2825
    s->wkup[2] = 0x13;
2826
    s->wken[0] = 0x04667ff8;
2827
    s->wken[1] = 0x00000005;
2828
    s->wken[2] = 5;
2829
    s->wkst[0] = 0;
2830
    s->wkst[1] = 0;
2831
    s->wkst[2] = 0;
2832
    s->power[0] = 0x00c;
2833
    s->power[1] = 4;
2834
    s->power[2] = 0x0000c;
2835
    s->power[3] = 0x14;
2836
    s->rstctrl[0] = 1;
2837
    s->rst[3] = 1;
2838
}
2839

    
2840
static void omap_prcm_coldreset(struct omap_prcm_s *s)
2841
{
2842
    s->setuptime[0] = 0;
2843
    s->setuptime[1] = 0;
2844
    memset(&s->scratch, 0, sizeof(s->scratch));
2845
    s->rst[0] = 0x01;
2846
    s->rst[1] = 0x00;
2847
    s->rst[2] = 0x01;
2848
    s->clken[0] = 0;
2849
    s->clken[2] = 0;
2850
    s->clkidle[1] = 0;
2851
    s->clksel[5] = 0;
2852
    s->clksel[6] = 2;
2853
    s->clksrc[0] = 0x43;
2854
    s->clkout[0] = 0x0303;
2855
    s->clkemul[0] = 0;
2856
    s->clkpol[0] = 0x100;
2857
    s->rsttime_wkup = 0x1002;
2858

    
2859
    omap_prcm_reset(s);
2860
}
2861

    
2862
struct omap_prcm_s *omap_prcm_init(struct omap_target_agent_s *ta,
2863
                qemu_irq mpu_int, qemu_irq dsp_int, qemu_irq iva_int,
2864
                struct omap_mpu_state_s *mpu)
2865
{
2866
    int iomemtype;
2867
    struct omap_prcm_s *s = (struct omap_prcm_s *)
2868
            qemu_mallocz(sizeof(struct omap_prcm_s));
2869

    
2870
    s->irq[0] = mpu_int;
2871
    s->irq[1] = dsp_int;
2872
    s->irq[2] = iva_int;
2873
    s->mpu = mpu;
2874
    omap_prcm_coldreset(s);
2875

    
2876
    iomemtype = l4_register_io_memory(0, omap_prcm_readfn,
2877
                    omap_prcm_writefn, s);
2878
    s->base = omap_l4_attach(ta, 0, iomemtype);
2879
    omap_l4_attach(ta, 1, iomemtype);
2880

    
2881
    return s;
2882
}
2883

    
2884
/* System and Pinout control */
2885
struct omap_sysctl_s {
2886
    target_phys_addr_t base;
2887
    struct omap_mpu_state_s *mpu;
2888

    
2889
    uint32_t sysconfig;
2890
    uint32_t devconfig;
2891
    uint32_t psaconfig;
2892
    uint32_t padconf[0x45];
2893
    uint8_t obs;
2894
    uint32_t msuspendmux[5];
2895
};
2896

    
2897
static uint32_t omap_sysctl_read(void *opaque, target_phys_addr_t addr)
2898
{
2899
    struct omap_sysctl_s *s = (struct omap_sysctl_s *) opaque;
2900
    int offset = addr - s->base;
2901

    
2902
    switch (offset) {
2903
    case 0x000:        /* CONTROL_REVISION */
2904
        return 0x20;
2905

    
2906
    case 0x010:        /* CONTROL_SYSCONFIG */
2907
        return s->sysconfig;
2908

    
2909
    case 0x030 ... 0x140:        /* CONTROL_PADCONF - only used in the POP */
2910
        return s->padconf[(offset - 0x30) >> 2];
2911

    
2912
    case 0x270:        /* CONTROL_DEBOBS */
2913
        return s->obs;
2914

    
2915
    case 0x274:        /* CONTROL_DEVCONF */
2916
        return s->devconfig;
2917

    
2918
    case 0x28c:        /* CONTROL_EMU_SUPPORT */
2919
        return 0;
2920

    
2921
    case 0x290:        /* CONTROL_MSUSPENDMUX_0 */
2922
        return s->msuspendmux[0];
2923
    case 0x294:        /* CONTROL_MSUSPENDMUX_1 */
2924
        return s->msuspendmux[1];
2925
    case 0x298:        /* CONTROL_MSUSPENDMUX_2 */
2926
        return s->msuspendmux[2];
2927
    case 0x29c:        /* CONTROL_MSUSPENDMUX_3 */
2928
        return s->msuspendmux[3];
2929
    case 0x2a0:        /* CONTROL_MSUSPENDMUX_4 */
2930
        return s->msuspendmux[4];
2931
    case 0x2a4:        /* CONTROL_MSUSPENDMUX_5 */
2932
        return 0;
2933

    
2934
    case 0x2b8:        /* CONTROL_PSA_CTRL */
2935
        return s->psaconfig;
2936
    case 0x2bc:        /* CONTROL_PSA_CMD */
2937
    case 0x2c0:        /* CONTROL_PSA_VALUE */
2938
        return 0;
2939

    
2940
    case 0x2b0:        /* CONTROL_SEC_CTRL */
2941
        return 0x800000f1;
2942
    case 0x2d0:        /* CONTROL_SEC_EMU */
2943
        return 0x80000015;
2944
    case 0x2d4:        /* CONTROL_SEC_TAP */
2945
        return 0x8000007f;
2946
    case 0x2b4:        /* CONTROL_SEC_TEST */
2947
    case 0x2f0:        /* CONTROL_SEC_STATUS */
2948
    case 0x2f4:        /* CONTROL_SEC_ERR_STATUS */
2949
        /* Secure mode is not present on general-pusrpose device.  Outside
2950
         * secure mode these values cannot be read or written.  */
2951
        return 0;
2952

    
2953
    case 0x2d8:        /* CONTROL_OCM_RAM_PERM */
2954
        return 0xff;
2955
    case 0x2dc:        /* CONTROL_OCM_PUB_RAM_ADD */
2956
    case 0x2e0:        /* CONTROL_EXT_SEC_RAM_START_ADD */
2957
    case 0x2e4:        /* CONTROL_EXT_SEC_RAM_STOP_ADD */
2958
        /* No secure mode so no Extended Secure RAM present.  */
2959
        return 0;
2960

    
2961
    case 0x2f8:        /* CONTROL_STATUS */
2962
        /* Device Type => General-purpose */
2963
        return 0x0300;
2964
    case 0x2fc:        /* CONTROL_GENERAL_PURPOSE_STATUS */
2965

    
2966
    case 0x300:        /* CONTROL_RPUB_KEY_H_0 */
2967
    case 0x304:        /* CONTROL_RPUB_KEY_H_1 */
2968
    case 0x308:        /* CONTROL_RPUB_KEY_H_2 */
2969
    case 0x30c:        /* CONTROL_RPUB_KEY_H_3 */
2970
        return 0xdecafbad;
2971

    
2972
    case 0x310:        /* CONTROL_RAND_KEY_0 */
2973
    case 0x314:        /* CONTROL_RAND_KEY_1 */
2974
    case 0x318:        /* CONTROL_RAND_KEY_2 */
2975
    case 0x31c:        /* CONTROL_RAND_KEY_3 */
2976
    case 0x320:        /* CONTROL_CUST_KEY_0 */
2977
    case 0x324:        /* CONTROL_CUST_KEY_1 */
2978
    case 0x330:        /* CONTROL_TEST_KEY_0 */
2979
    case 0x334:        /* CONTROL_TEST_KEY_1 */
2980
    case 0x338:        /* CONTROL_TEST_KEY_2 */
2981
    case 0x33c:        /* CONTROL_TEST_KEY_3 */
2982
    case 0x340:        /* CONTROL_TEST_KEY_4 */
2983
    case 0x344:        /* CONTROL_TEST_KEY_5 */
2984
    case 0x348:        /* CONTROL_TEST_KEY_6 */
2985
    case 0x34c:        /* CONTROL_TEST_KEY_7 */
2986
    case 0x350:        /* CONTROL_TEST_KEY_8 */
2987
    case 0x354:        /* CONTROL_TEST_KEY_9 */
2988
        /* Can only be accessed in secure mode and when C_FieldAccEnable
2989
         * bit is set in CONTROL_SEC_CTRL.
2990
         * TODO: otherwise an interconnect access error is generated.  */
2991
        return 0;
2992
    }
2993

    
2994
    OMAP_BAD_REG(addr);
2995
    return 0;
2996
}
2997

    
2998
static void omap_sysctl_write(void *opaque, target_phys_addr_t addr,
2999
                uint32_t value)
3000
{
3001
    struct omap_sysctl_s *s = (struct omap_sysctl_s *) opaque;
3002
    int offset = addr - s->base;
3003

    
3004
    switch (offset) {
3005
    case 0x000:        /* CONTROL_REVISION */
3006
    case 0x2a4:        /* CONTROL_MSUSPENDMUX_5 */
3007
    case 0x2c0:        /* CONTROL_PSA_VALUE */
3008
    case 0x2f8:        /* CONTROL_STATUS */
3009
    case 0x2fc:        /* CONTROL_GENERAL_PURPOSE_STATUS */
3010
    case 0x300:        /* CONTROL_RPUB_KEY_H_0 */
3011
    case 0x304:        /* CONTROL_RPUB_KEY_H_1 */
3012
    case 0x308:        /* CONTROL_RPUB_KEY_H_2 */
3013
    case 0x30c:        /* CONTROL_RPUB_KEY_H_3 */
3014
    case 0x310:        /* CONTROL_RAND_KEY_0 */
3015
    case 0x314:        /* CONTROL_RAND_KEY_1 */
3016
    case 0x318:        /* CONTROL_RAND_KEY_2 */
3017
    case 0x31c:        /* CONTROL_RAND_KEY_3 */
3018
    case 0x320:        /* CONTROL_CUST_KEY_0 */
3019
    case 0x324:        /* CONTROL_CUST_KEY_1 */
3020
    case 0x330:        /* CONTROL_TEST_KEY_0 */
3021
    case 0x334:        /* CONTROL_TEST_KEY_1 */
3022
    case 0x338:        /* CONTROL_TEST_KEY_2 */
3023
    case 0x33c:        /* CONTROL_TEST_KEY_3 */
3024
    case 0x340:        /* CONTROL_TEST_KEY_4 */
3025
    case 0x344:        /* CONTROL_TEST_KEY_5 */
3026
    case 0x348:        /* CONTROL_TEST_KEY_6 */
3027
    case 0x34c:        /* CONTROL_TEST_KEY_7 */
3028
    case 0x350:        /* CONTROL_TEST_KEY_8 */
3029
    case 0x354:        /* CONTROL_TEST_KEY_9 */
3030
        OMAP_RO_REG(addr);
3031
        return;
3032

    
3033
    case 0x010:        /* CONTROL_SYSCONFIG */
3034
        s->sysconfig = value & 0x1e;
3035
        break;
3036

    
3037
    case 0x030 ... 0x140:        /* CONTROL_PADCONF - only used in the POP */
3038
        /* XXX: should check constant bits */
3039
        s->padconf[(offset - 0x30) >> 2] = value & 0x1f1f1f1f;
3040
        break;
3041

    
3042
    case 0x270:        /* CONTROL_DEBOBS */
3043
        s->obs = value & 0xff;
3044
        break;
3045

    
3046
    case 0x274:        /* CONTROL_DEVCONF */
3047
        s->devconfig = value & 0xffffc7ff;
3048
        break;
3049

    
3050
    case 0x28c:        /* CONTROL_EMU_SUPPORT */
3051
        break;
3052

    
3053
    case 0x290:        /* CONTROL_MSUSPENDMUX_0 */
3054
        s->msuspendmux[0] = value & 0x3fffffff;
3055
        break;
3056
    case 0x294:        /* CONTROL_MSUSPENDMUX_1 */
3057
        s->msuspendmux[1] = value & 0x3fffffff;
3058
        break;
3059
    case 0x298:        /* CONTROL_MSUSPENDMUX_2 */
3060
        s->msuspendmux[2] = value & 0x3fffffff;
3061
        break;
3062
    case 0x29c:        /* CONTROL_MSUSPENDMUX_3 */
3063
        s->msuspendmux[3] = value & 0x3fffffff;
3064
        break;
3065
    case 0x2a0:        /* CONTROL_MSUSPENDMUX_4 */
3066
        s->msuspendmux[4] = value & 0x3fffffff;
3067
        break;
3068

    
3069
    case 0x2b8:        /* CONTROL_PSA_CTRL */
3070
        s->psaconfig = value & 0x1c;
3071
        s->psaconfig |= (value & 0x20) ? 2 : 1;
3072
        break;
3073
    case 0x2bc:        /* CONTROL_PSA_CMD */
3074
        break;
3075

    
3076
    case 0x2b0:        /* CONTROL_SEC_CTRL */
3077
    case 0x2b4:        /* CONTROL_SEC_TEST */
3078
    case 0x2d0:        /* CONTROL_SEC_EMU */
3079
    case 0x2d4:        /* CONTROL_SEC_TAP */
3080
    case 0x2d8:        /* CONTROL_OCM_RAM_PERM */
3081
    case 0x2dc:        /* CONTROL_OCM_PUB_RAM_ADD */
3082
    case 0x2e0:        /* CONTROL_EXT_SEC_RAM_START_ADD */
3083
    case 0x2e4:        /* CONTROL_EXT_SEC_RAM_STOP_ADD */
3084
    case 0x2f0:        /* CONTROL_SEC_STATUS */
3085
    case 0x2f4:        /* CONTROL_SEC_ERR_STATUS */
3086
        break;
3087

    
3088
    default:
3089
        OMAP_BAD_REG(addr);
3090
        return;
3091
    }
3092
}
3093

    
3094
static CPUReadMemoryFunc *omap_sysctl_readfn[] = {
3095
    omap_badwidth_read32,        /* TODO */
3096
    omap_badwidth_read32,        /* TODO */
3097
    omap_sysctl_read,
3098
};
3099

    
3100
static CPUWriteMemoryFunc *omap_sysctl_writefn[] = {
3101
    omap_badwidth_write32,        /* TODO */
3102
    omap_badwidth_write32,        /* TODO */
3103
    omap_sysctl_write,
3104
};
3105

    
3106
static void omap_sysctl_reset(struct omap_sysctl_s *s)
3107
{
3108
    /* (power-on reset) */
3109
    s->sysconfig = 0;
3110
    s->obs = 0;
3111
    s->devconfig = 0x0c000000;
3112
    s->msuspendmux[0] = 0x00000000;
3113
    s->msuspendmux[1] = 0x00000000;
3114
    s->msuspendmux[2] = 0x00000000;
3115
    s->msuspendmux[3] = 0x00000000;
3116
    s->msuspendmux[4] = 0x00000000;
3117
    s->psaconfig = 1;
3118

    
3119
    s->padconf[0x00] = 0x000f0f0f;
3120
    s->padconf[0x01] = 0x00000000;
3121
    s->padconf[0x02] = 0x00000000;
3122
    s->padconf[0x03] = 0x00000000;
3123
    s->padconf[0x04] = 0x00000000;
3124
    s->padconf[0x05] = 0x00000000;
3125
    s->padconf[0x06] = 0x00000000;
3126
    s->padconf[0x07] = 0x00000000;
3127
    s->padconf[0x08] = 0x08080800;
3128
    s->padconf[0x09] = 0x08080808;
3129
    s->padconf[0x0a] = 0x08080808;
3130
    s->padconf[0x0b] = 0x08080808;
3131
    s->padconf[0x0c] = 0x08080808;
3132
    s->padconf[0x0d] = 0x08080800;
3133
    s->padconf[0x0e] = 0x08080808;
3134
    s->padconf[0x0f] = 0x08080808;
3135
    s->padconf[0x10] = 0x18181808;        /* | 0x07070700 if SBoot3 */
3136
    s->padconf[0x11] = 0x18181818;        /* | 0x07070707 if SBoot3 */
3137
    s->padconf[0x12] = 0x18181818;        /* | 0x07070707 if SBoot3 */
3138
    s->padconf[0x13] = 0x18181818;        /* | 0x07070707 if SBoot3 */
3139
    s->padconf[0x14] = 0x18181818;        /* | 0x00070707 if SBoot3 */
3140
    s->padconf[0x15] = 0x18181818;
3141
    s->padconf[0x16] = 0x18181818;        /* | 0x07000000 if SBoot3 */
3142
    s->padconf[0x17] = 0x1f001f00;
3143
    s->padconf[0x18] = 0x1f1f1f1f;
3144
    s->padconf[0x19] = 0x00000000;
3145
    s->padconf[0x1a] = 0x1f180000;
3146
    s->padconf[0x1b] = 0x00001f1f;
3147
    s->padconf[0x1c] = 0x1f001f00;
3148
    s->padconf[0x1d] = 0x00000000;
3149
    s->padconf[0x1e] = 0x00000000;
3150
    s->padconf[0x1f] = 0x08000000;
3151
    s->padconf[0x20] = 0x08080808;
3152
    s->padconf[0x21] = 0x08080808;
3153
    s->padconf[0x22] = 0x0f080808;
3154
    s->padconf[0x23] = 0x0f0f0f0f;
3155
    s->padconf[0x24] = 0x000f0f0f;
3156
    s->padconf[0x25] = 0x1f1f1f0f;
3157
    s->padconf[0x26] = 0x080f0f1f;
3158
    s->padconf[0x27] = 0x070f1808;
3159
    s->padconf[0x28] = 0x0f070707;
3160
    s->padconf[0x29] = 0x000f0f1f;
3161
    s->padconf[0x2a] = 0x0f0f0f1f;
3162
    s->padconf[0x2b] = 0x08000000;
3163
    s->padconf[0x2c] = 0x0000001f;
3164
    s->padconf[0x2d] = 0x0f0f1f00;
3165
    s->padconf[0x2e] = 0x1f1f0f0f;
3166
    s->padconf[0x2f] = 0x0f1f1f1f;
3167
    s->padconf[0x30] = 0x0f0f0f0f;
3168
    s->padconf[0x31] = 0x0f1f0f1f;
3169
    s->padconf[0x32] = 0x0f0f0f0f;
3170
    s->padconf[0x33] = 0x0f1f0f1f;
3171
    s->padconf[0x34] = 0x1f1f0f0f;
3172
    s->padconf[0x35] = 0x0f0f1f1f;
3173
    s->padconf[0x36] = 0x0f0f1f0f;
3174
    s->padconf[0x37] = 0x0f0f0f0f;
3175
    s->padconf[0x38] = 0x1f18180f;
3176
    s->padconf[0x39] = 0x1f1f1f1f;
3177
    s->padconf[0x3a] = 0x00001f1f;
3178
    s->padconf[0x3b] = 0x00000000;
3179
    s->padconf[0x3c] = 0x00000000;
3180
    s->padconf[0x3d] = 0x0f0f0f0f;
3181
    s->padconf[0x3e] = 0x18000f0f;
3182
    s->padconf[0x3f] = 0x00070000;
3183
    s->padconf[0x40] = 0x00000707;
3184
    s->padconf[0x41] = 0x0f1f0700;
3185
    s->padconf[0x42] = 0x1f1f070f;
3186
    s->padconf[0x43] = 0x0008081f;
3187
    s->padconf[0x44] = 0x00000800;
3188
}
3189

    
3190
struct omap_sysctl_s *omap_sysctl_init(struct omap_target_agent_s *ta,
3191
                omap_clk iclk, struct omap_mpu_state_s *mpu)
3192
{
3193
    int iomemtype;
3194
    struct omap_sysctl_s *s = (struct omap_sysctl_s *)
3195
            qemu_mallocz(sizeof(struct omap_sysctl_s));
3196

    
3197
    s->mpu = mpu;
3198
    omap_sysctl_reset(s);
3199

    
3200
    iomemtype = l4_register_io_memory(0, omap_sysctl_readfn,
3201
                    omap_sysctl_writefn, s);
3202
    s->base = omap_l4_attach(ta, 0, iomemtype);
3203
    omap_l4_attach(ta, 0, iomemtype);
3204

    
3205
    return s;
3206
}
3207

    
3208
/* SDRAM Controller Subsystem */
3209
struct omap_sdrc_s {
3210
    target_phys_addr_t base;
3211

    
3212
    uint8_t config;
3213
};
3214

    
3215
static void omap_sdrc_reset(struct omap_sdrc_s *s)
3216
{
3217
    s->config = 0x10;
3218
}
3219

    
3220
static uint32_t omap_sdrc_read(void *opaque, target_phys_addr_t addr)
3221
{
3222
    struct omap_sdrc_s *s = (struct omap_sdrc_s *) opaque;
3223
    int offset = addr - s->base;
3224

    
3225
    switch (offset) {
3226
    case 0x00:        /* SDRC_REVISION */
3227
        return 0x20;
3228

    
3229
    case 0x10:        /* SDRC_SYSCONFIG */
3230
        return s->config;
3231

    
3232
    case 0x14:        /* SDRC_SYSSTATUS */
3233
        return 1;                                                /* RESETDONE */
3234

    
3235
    case 0x40:        /* SDRC_CS_CFG */
3236
    case 0x44:        /* SDRC_SHARING */
3237
    case 0x48:        /* SDRC_ERR_ADDR */
3238
    case 0x4c:        /* SDRC_ERR_TYPE */
3239
    case 0x60:        /* SDRC_DLLA_SCTRL */
3240
    case 0x64:        /* SDRC_DLLA_STATUS */
3241
    case 0x68:        /* SDRC_DLLB_CTRL */
3242
    case 0x6c:        /* SDRC_DLLB_STATUS */
3243
    case 0x70:        /* SDRC_POWER */
3244
    case 0x80:        /* SDRC_MCFG_0 */
3245
    case 0x84:        /* SDRC_MR_0 */
3246
    case 0x88:        /* SDRC_EMR1_0 */
3247
    case 0x8c:        /* SDRC_EMR2_0 */
3248
    case 0x90:        /* SDRC_EMR3_0 */
3249
    case 0x94:        /* SDRC_DCDL1_CTRL */
3250
    case 0x98:        /* SDRC_DCDL2_CTRL */
3251
    case 0x9c:        /* SDRC_ACTIM_CTRLA_0 */
3252
    case 0xa0:        /* SDRC_ACTIM_CTRLB_0 */
3253
    case 0xa4:        /* SDRC_RFR_CTRL_0 */
3254
    case 0xa8:        /* SDRC_MANUAL_0 */
3255
    case 0xb0:        /* SDRC_MCFG_1 */
3256
    case 0xb4:        /* SDRC_MR_1 */
3257
    case 0xb8:        /* SDRC_EMR1_1 */
3258
    case 0xbc:        /* SDRC_EMR2_1 */
3259
    case 0xc0:        /* SDRC_EMR3_1 */
3260
    case 0xc4:        /* SDRC_ACTIM_CTRLA_1 */
3261
    case 0xc8:        /* SDRC_ACTIM_CTRLB_1 */
3262
    case 0xd4:        /* SDRC_RFR_CTRL_1 */
3263
    case 0xd8:        /* SDRC_MANUAL_1 */
3264
        return 0x00;
3265
    }
3266

    
3267
    OMAP_BAD_REG(addr);
3268
    return 0;
3269
}
3270

    
3271
static void omap_sdrc_write(void *opaque, target_phys_addr_t addr,
3272
                uint32_t value)
3273
{
3274
    struct omap_sdrc_s *s = (struct omap_sdrc_s *) opaque;
3275
    int offset = addr - s->base;
3276

    
3277
    switch (offset) {
3278
    case 0x00:        /* SDRC_REVISION */
3279
    case 0x14:        /* SDRC_SYSSTATUS */
3280
    case 0x48:        /* SDRC_ERR_ADDR */
3281
    case 0x64:        /* SDRC_DLLA_STATUS */
3282
    case 0x6c:        /* SDRC_DLLB_STATUS */
3283
        OMAP_RO_REG(addr);
3284
        return;
3285

    
3286
    case 0x10:        /* SDRC_SYSCONFIG */
3287
        if ((value >> 3) != 0x2)
3288
            fprintf(stderr, "%s: bad SDRAM idle mode %i\n",
3289
                            __FUNCTION__, value >> 3);
3290
        if (value & 2)
3291
            omap_sdrc_reset(s);
3292
        s->config = value & 0x18;
3293
        break;
3294

    
3295
    case 0x40:        /* SDRC_CS_CFG */
3296
    case 0x44:        /* SDRC_SHARING */
3297
    case 0x4c:        /* SDRC_ERR_TYPE */
3298
    case 0x60:        /* SDRC_DLLA_SCTRL */
3299
    case 0x68:        /* SDRC_DLLB_CTRL */
3300
    case 0x70:        /* SDRC_POWER */
3301
    case 0x80:        /* SDRC_MCFG_0 */
3302
    case 0x84:        /* SDRC_MR_0 */
3303
    case 0x88:        /* SDRC_EMR1_0 */
3304
    case 0x8c:        /* SDRC_EMR2_0 */
3305
    case 0x90:        /* SDRC_EMR3_0 */
3306
    case 0x94:        /* SDRC_DCDL1_CTRL */
3307
    case 0x98:        /* SDRC_DCDL2_CTRL */
3308
    case 0x9c:        /* SDRC_ACTIM_CTRLA_0 */
3309
    case 0xa0:        /* SDRC_ACTIM_CTRLB_0 */
3310
    case 0xa4:        /* SDRC_RFR_CTRL_0 */
3311
    case 0xa8:        /* SDRC_MANUAL_0 */
3312
    case 0xb0:        /* SDRC_MCFG_1 */
3313
    case 0xb4:        /* SDRC_MR_1 */
3314
    case 0xb8:        /* SDRC_EMR1_1 */
3315
    case 0xbc:        /* SDRC_EMR2_1 */
3316
    case 0xc0:        /* SDRC_EMR3_1 */
3317
    case 0xc4:        /* SDRC_ACTIM_CTRLA_1 */
3318
    case 0xc8:        /* SDRC_ACTIM_CTRLB_1 */
3319
    case 0xd4:        /* SDRC_RFR_CTRL_1 */
3320
    case 0xd8:        /* SDRC_MANUAL_1 */
3321
        break;
3322

    
3323
    default:
3324
        OMAP_BAD_REG(addr);
3325
        return;
3326
    }
3327
}
3328

    
3329
static CPUReadMemoryFunc *omap_sdrc_readfn[] = {
3330
    omap_badwidth_read32,
3331
    omap_badwidth_read32,
3332
    omap_sdrc_read,
3333
};
3334

    
3335
static CPUWriteMemoryFunc *omap_sdrc_writefn[] = {
3336
    omap_badwidth_write32,
3337
    omap_badwidth_write32,
3338
    omap_sdrc_write,
3339
};
3340

    
3341
struct omap_sdrc_s *omap_sdrc_init(target_phys_addr_t base)
3342
{
3343
    int iomemtype;
3344
    struct omap_sdrc_s *s = (struct omap_sdrc_s *)
3345
            qemu_mallocz(sizeof(struct omap_sdrc_s));
3346

    
3347
    s->base = base;
3348
    omap_sdrc_reset(s);
3349

    
3350
    iomemtype = cpu_register_io_memory(0, omap_sdrc_readfn,
3351
                    omap_sdrc_writefn, s);
3352
    cpu_register_physical_memory(s->base, 0x1000, iomemtype);
3353

    
3354
    return s;
3355
}
3356

    
3357
/* General-Purpose Memory Controller */
3358
struct omap_gpmc_s {
3359
    target_phys_addr_t base;
3360
    qemu_irq irq;
3361

    
3362
    uint8_t sysconfig;
3363
    uint16_t irqst;
3364
    uint16_t irqen;
3365
    uint16_t timeout;
3366
    uint16_t config;
3367
    uint32_t prefconfig[2];
3368
    int prefcontrol;
3369
    int preffifo;
3370
    int prefcount;
3371
    struct omap_gpmc_cs_file_s {
3372
        uint32_t config[7];
3373
        target_phys_addr_t base;
3374
        size_t size;
3375
        int iomemtype;
3376
        void (*base_update)(void *opaque, target_phys_addr_t new);
3377
        void (*unmap)(void *opaque);
3378
        void *opaque;
3379
    } cs_file[8];
3380
    int ecc_cs;
3381
    int ecc_ptr;
3382
    uint32_t ecc_cfg;
3383
    struct ecc_state_s ecc[9];
3384
};
3385

    
3386
static void omap_gpmc_int_update(struct omap_gpmc_s *s)
3387
{
3388
    qemu_set_irq(s->irq, s->irqen & s->irqst);
3389
}
3390

    
3391
static void omap_gpmc_cs_map(struct omap_gpmc_cs_file_s *f, int base, int mask)
3392
{
3393
    /* TODO: check for overlapping regions and report access errors */
3394
    if ((mask != 0x8 && mask != 0xc && mask != 0xe && mask != 0xf) ||
3395
                    (base < 0 || base >= 0x40) ||
3396
                    (base & 0x0f & ~mask)) {
3397
        fprintf(stderr, "%s: wrong cs address mapping/decoding!\n",
3398
                        __FUNCTION__);
3399
        return;
3400
    }
3401

    
3402
    if (!f->opaque)
3403
        return;
3404

    
3405
    f->base = base << 24;
3406
    f->size = (0x0fffffff & ~(mask << 24)) + 1;
3407
    /* TODO: rather than setting the size of the mapping (which should be
3408
     * constant), the mask should cause wrapping of the address space, so
3409
     * that the same memory becomes accessible at every <i>size</i> bytes
3410
     * starting from <i>base</i>.  */
3411
    if (f->iomemtype)
3412
        cpu_register_physical_memory(f->base, f->size, f->iomemtype);
3413

    
3414
    if (f->base_update)
3415
        f->base_update(f->opaque, f->base);
3416
}
3417

    
3418
static void omap_gpmc_cs_unmap(struct omap_gpmc_cs_file_s *f)
3419
{
3420
    if (f->size) {
3421
        if (f->unmap)
3422
            f->unmap(f->opaque);
3423
        if (f->iomemtype)
3424
            cpu_register_physical_memory(f->base, f->size, IO_MEM_UNASSIGNED);
3425
        f->base = 0;
3426
        f->size = 0;
3427
    }
3428
}
3429

    
3430
static void omap_gpmc_reset(struct omap_gpmc_s *s)
3431
{
3432
    int i;
3433

    
3434
    s->sysconfig = 0;
3435
    s->irqst = 0;
3436
    s->irqen = 0;
3437
    omap_gpmc_int_update(s);
3438
    s->timeout = 0;
3439
    s->config = 0xa00;
3440
    s->prefconfig[0] = 0x00004000;
3441
    s->prefconfig[1] = 0x00000000;
3442
    s->prefcontrol = 0;
3443
    s->preffifo = 0;
3444
    s->prefcount = 0;
3445
    for (i = 0; i < 8; i ++) {
3446
        if (s->cs_file[i].config[6] & (1 << 6))                        /* CSVALID */
3447
            omap_gpmc_cs_unmap(s->cs_file + i);
3448
        s->cs_file[i].config[0] = i ? 1 << 12 : 0;
3449
        s->cs_file[i].config[1] = 0x101001;
3450
        s->cs_file[i].config[2] = 0x020201;
3451
        s->cs_file[i].config[3] = 0x10031003;
3452
        s->cs_file[i].config[4] = 0x10f1111;
3453
        s->cs_file[i].config[5] = 0;
3454
        s->cs_file[i].config[6] = 0xf00 | (i ? 0 : 1 << 6);
3455
        if (s->cs_file[i].config[6] & (1 << 6))                        /* CSVALID */
3456
            omap_gpmc_cs_map(&s->cs_file[i],
3457
                            s->cs_file[i].config[6] & 0x1f,        /* MASKADDR */
3458
                        (s->cs_file[i].config[6] >> 8 & 0xf));        /* BASEADDR */
3459
    }
3460
    omap_gpmc_cs_map(s->cs_file, 0, 0xf);
3461
    s->ecc_cs = 0;
3462
    s->ecc_ptr = 0;
3463
    s->ecc_cfg = 0x3fcff000;
3464
    for (i = 0; i < 9; i ++)
3465
        ecc_reset(&s->ecc[i]);
3466
}
3467

    
3468
static uint32_t omap_gpmc_read(void *opaque, target_phys_addr_t addr)
3469
{
3470
    struct omap_gpmc_s *s = (struct omap_gpmc_s *) opaque;
3471
    int offset = addr - s->base;
3472
    int cs;
3473
    struct omap_gpmc_cs_file_s *f;
3474

    
3475
    switch (offset) {
3476
    case 0x000:        /* GPMC_REVISION */
3477
        return 0x20;
3478

    
3479
    case 0x010:        /* GPMC_SYSCONFIG */
3480
        return s->sysconfig;
3481

    
3482
    case 0x014:        /* GPMC_SYSSTATUS */
3483
        return 1;                                                /* RESETDONE */
3484

    
3485
    case 0x018:        /* GPMC_IRQSTATUS */
3486
        return s->irqst;
3487

    
3488
    case 0x01c:        /* GPMC_IRQENABLE */
3489
        return s->irqen;
3490

    
3491
    case 0x040:        /* GPMC_TIMEOUT_CONTROL */
3492
        return s->timeout;
3493

    
3494
    case 0x044:        /* GPMC_ERR_ADDRESS */
3495
    case 0x048:        /* GPMC_ERR_TYPE */
3496
        return 0;
3497

    
3498
    case 0x050:        /* GPMC_CONFIG */
3499
        return s->config;
3500

    
3501
    case 0x054:        /* GPMC_STATUS */
3502
        return 0x001;
3503

    
3504
    case 0x060 ... 0x1d4:
3505
        cs = (offset - 0x060) / 0x30;
3506
        offset -= cs * 0x30;
3507
        f = s->cs_file + cs;
3508
        switch (offset - cs * 0x30) {
3509
            case 0x60:        /* GPMC_CONFIG1 */
3510
                return f->config[0];
3511
            case 0x64:        /* GPMC_CONFIG2 */
3512
                return f->config[1];
3513
            case 0x68:        /* GPMC_CONFIG3 */
3514
                return f->config[2];
3515
            case 0x6c:        /* GPMC_CONFIG4 */
3516
                return f->config[3];
3517
            case 0x70:        /* GPMC_CONFIG5 */
3518
                return f->config[4];
3519
            case 0x74:        /* GPMC_CONFIG6 */
3520
                return f->config[5];
3521
            case 0x78:        /* GPMC_CONFIG7 */
3522
                return f->config[6];
3523
            case 0x84:        /* GPMC_NAND_DATA */
3524
                return 0;
3525
        }
3526
        break;
3527

    
3528
    case 0x1e0:        /* GPMC_PREFETCH_CONFIG1 */
3529
        return s->prefconfig[0];
3530
    case 0x1e4:        /* GPMC_PREFETCH_CONFIG2 */
3531
        return s->prefconfig[1];
3532
    case 0x1ec:        /* GPMC_PREFETCH_CONTROL */
3533
        return s->prefcontrol;
3534
    case 0x1f0:        /* GPMC_PREFETCH_STATUS */
3535
        return (s->preffifo << 24) |
3536
                ((s->preffifo >
3537
                  ((s->prefconfig[0] >> 8) & 0x7f) ? 1 : 0) << 16) |
3538
                s->prefcount;
3539

    
3540
    case 0x1f4:        /* GPMC_ECC_CONFIG */
3541
        return s->ecc_cs;
3542
    case 0x1f8:        /* GPMC_ECC_CONTROL */
3543
        return s->ecc_ptr;
3544
    case 0x1fc:        /* GPMC_ECC_SIZE_CONFIG */
3545
        return s->ecc_cfg;
3546
    case 0x200 ... 0x220:        /* GPMC_ECC_RESULT */
3547
        cs = (offset & 0x1f) >> 2;
3548
        /* TODO: check correctness */
3549
        return
3550
                ((s->ecc[cs].cp    &  0x07) <<  0) |
3551
                ((s->ecc[cs].cp    &  0x38) << 13) |
3552
                ((s->ecc[cs].lp[0] & 0x1ff) <<  3) |
3553
                ((s->ecc[cs].lp[1] & 0x1ff) << 19);
3554

    
3555
    case 0x230:        /* GPMC_TESTMODE_CTRL */
3556
        return 0;
3557
    case 0x234:        /* GPMC_PSA_LSB */
3558
    case 0x238:        /* GPMC_PSA_MSB */
3559
        return 0x00000000;
3560
    }
3561

    
3562
    OMAP_BAD_REG(addr);
3563
    return 0;
3564
}
3565

    
3566
static void omap_gpmc_write(void *opaque, target_phys_addr_t addr,
3567
                uint32_t value)
3568
{
3569
    struct omap_gpmc_s *s = (struct omap_gpmc_s *) opaque;
3570
    int offset = addr - s->base;
3571
    int cs;
3572
    struct omap_gpmc_cs_file_s *f;
3573

    
3574
    switch (offset) {
3575
    case 0x000:        /* GPMC_REVISION */
3576
    case 0x014:        /* GPMC_SYSSTATUS */
3577
    case 0x054:        /* GPMC_STATUS */
3578
    case 0x1f0:        /* GPMC_PREFETCH_STATUS */
3579
    case 0x200 ... 0x220:        /* GPMC_ECC_RESULT */
3580
    case 0x234:        /* GPMC_PSA_LSB */
3581
    case 0x238:        /* GPMC_PSA_MSB */
3582
        OMAP_RO_REG(addr);
3583
        break;
3584

    
3585
    case 0x010:        /* GPMC_SYSCONFIG */
3586
        if ((value >> 3) == 0x3)
3587
            fprintf(stderr, "%s: bad SDRAM idle mode %i\n",
3588
                            __FUNCTION__, value >> 3);
3589
        if (value & 2)
3590
            omap_gpmc_reset(s);
3591
        s->sysconfig = value & 0x19;
3592
        break;
3593

    
3594
    case 0x018:        /* GPMC_IRQSTATUS */
3595
        s->irqen = ~value;
3596
        omap_gpmc_int_update(s);
3597
        break;
3598

    
3599
    case 0x01c:        /* GPMC_IRQENABLE */
3600
        s->irqen = value & 0xf03;
3601
        omap_gpmc_int_update(s);
3602
        break;
3603

    
3604
    case 0x040:        /* GPMC_TIMEOUT_CONTROL */
3605
        s->timeout = value & 0x1ff1;
3606
        break;
3607

    
3608
    case 0x044:        /* GPMC_ERR_ADDRESS */
3609
    case 0x048:        /* GPMC_ERR_TYPE */
3610
        break;
3611

    
3612
    case 0x050:        /* GPMC_CONFIG */
3613
        s->config = value & 0xf13;
3614
        break;
3615

    
3616
    case 0x060 ... 0x1d4:
3617
        cs = (offset - 0x060) / 0x30;
3618
        offset -= cs * 0x30;
3619
        f = s->cs_file + cs;
3620
        switch (offset) {
3621
            case 0x60:        /* GPMC_CONFIG1 */
3622
                f->config[0] = value & 0xffef3e13;
3623
                break;
3624
            case 0x64:        /* GPMC_CONFIG2 */
3625
                f->config[1] = value & 0x001f1f8f;
3626
                break;
3627
            case 0x68:        /* GPMC_CONFIG3 */
3628
                f->config[2] = value & 0x001f1f8f;
3629
                break;
3630
            case 0x6c:        /* GPMC_CONFIG4 */
3631
                f->config[3] = value & 0x1f8f1f8f;
3632
                break;
3633
            case 0x70:        /* GPMC_CONFIG5 */
3634
                f->config[4] = value & 0x0f1f1f1f;
3635
                break;
3636
            case 0x74:        /* GPMC_CONFIG6 */
3637
                f->config[5] = value & 0x00000fcf;
3638
                break;
3639
            case 0x78:        /* GPMC_CONFIG7 */
3640
                if ((f->config[6] ^ value) & 0xf7f) {
3641
                    if (f->config[6] & (1 << 6))                /* CSVALID */
3642
                        omap_gpmc_cs_unmap(f);
3643
                    if (value & (1 << 6))                        /* CSVALID */
3644
                        omap_gpmc_cs_map(f, value & 0x1f,        /* MASKADDR */
3645
                                        (value >> 8 & 0xf));        /* BASEADDR */
3646
                }
3647
                f->config[6] = value & 0x00000f7f;
3648
                break;
3649
            case 0x7c:        /* GPMC_NAND_COMMAND */
3650
            case 0x80:        /* GPMC_NAND_ADDRESS */
3651
            case 0x84:        /* GPMC_NAND_DATA */
3652
                break;
3653

    
3654
            default:
3655
                goto bad_reg;
3656
        }
3657
        break;
3658

    
3659
    case 0x1e0:        /* GPMC_PREFETCH_CONFIG1 */
3660
        s->prefconfig[0] = value & 0x7f8f7fbf;
3661
        /* TODO: update interrupts, fifos, dmas */
3662
        break;
3663

    
3664
    case 0x1e4:        /* GPMC_PREFETCH_CONFIG2 */
3665
        s->prefconfig[1] = value & 0x3fff;
3666
        break;
3667

    
3668
    case 0x1ec:        /* GPMC_PREFETCH_CONTROL */
3669
        s->prefcontrol = value & 1;
3670
        if (s->prefcontrol) {
3671
            if (s->prefconfig[0] & 1)
3672
                s->preffifo = 0x40;
3673
            else
3674
                s->preffifo = 0x00;
3675
        }
3676
        /* TODO: start */
3677
        break;
3678

    
3679
    case 0x1f4:        /* GPMC_ECC_CONFIG */
3680
        s->ecc_cs = 0x8f;
3681
        break;
3682
    case 0x1f8:        /* GPMC_ECC_CONTROL */
3683
        if (value & (1 << 8))
3684
            for (cs = 0; cs < 9; cs ++)
3685
                ecc_reset(&s->ecc[cs]);
3686
        s->ecc_ptr = value & 0xf;
3687
        if (s->ecc_ptr == 0 || s->ecc_ptr > 9) {
3688
            s->ecc_ptr = 0;
3689
            s->ecc_cs &= ~1;
3690
        }
3691
        break;
3692
    case 0x1fc:        /* GPMC_ECC_SIZE_CONFIG */
3693
        s->ecc_cfg = value & 0x3fcff1ff;
3694
        break;
3695
    case 0x230:        /* GPMC_TESTMODE_CTRL */
3696
        if (value & 7)
3697
            fprintf(stderr, "%s: test mode enable attempt\n", __FUNCTION__);
3698
        break;
3699

    
3700
    default:
3701
    bad_reg:
3702
        OMAP_BAD_REG(addr);
3703
        return;
3704
    }
3705
}
3706

    
3707
static CPUReadMemoryFunc *omap_gpmc_readfn[] = {
3708
    omap_badwidth_read32,        /* TODO */
3709
    omap_badwidth_read32,        /* TODO */
3710
    omap_gpmc_read,
3711
};
3712

    
3713
static CPUWriteMemoryFunc *omap_gpmc_writefn[] = {
3714
    omap_badwidth_write32,        /* TODO */
3715
    omap_badwidth_write32,        /* TODO */
3716
    omap_gpmc_write,
3717
};
3718

    
3719
struct omap_gpmc_s *omap_gpmc_init(target_phys_addr_t base, qemu_irq irq)
3720
{
3721
    int iomemtype;
3722
    struct omap_gpmc_s *s = (struct omap_gpmc_s *)
3723
            qemu_mallocz(sizeof(struct omap_gpmc_s));
3724

    
3725
    s->base = base;
3726
    omap_gpmc_reset(s);
3727

    
3728
    iomemtype = cpu_register_io_memory(0, omap_gpmc_readfn,
3729
                    omap_gpmc_writefn, s);
3730
    cpu_register_physical_memory(s->base, 0x1000, iomemtype);
3731

    
3732
    return s;
3733
}
3734

    
3735
void omap_gpmc_attach(struct omap_gpmc_s *s, int cs, int iomemtype,
3736
                void (*base_upd)(void *opaque, target_phys_addr_t new),
3737
                void (*unmap)(void *opaque), void *opaque)
3738
{
3739
    struct omap_gpmc_cs_file_s *f;
3740

    
3741
    if (cs < 0 || cs >= 8) {
3742
        fprintf(stderr, "%s: bad chip-select %i\n", __FUNCTION__, cs);
3743
        exit(-1);
3744
    }
3745
    f = &s->cs_file[cs];
3746

    
3747
    f->iomemtype = iomemtype;
3748
    f->base_update = base_upd;
3749
    f->unmap = unmap;
3750
    f->opaque = opaque;
3751

    
3752
    if (f->config[6] & (1 << 6))                                /* CSVALID */
3753
        omap_gpmc_cs_map(f, f->config[6] & 0x1f,                /* MASKADDR */
3754
                        (f->config[6] >> 8 & 0xf));                /* BASEADDR */
3755
}
3756

    
3757
/* General chip reset */
3758
static void omap2_mpu_reset(void *opaque)
3759
{
3760
    struct omap_mpu_state_s *mpu = (struct omap_mpu_state_s *) opaque;
3761

    
3762
    omap_inth_reset(mpu->ih[0]);
3763
    omap_dma_reset(mpu->dma);
3764
    omap_prcm_reset(mpu->prcm);
3765
    omap_sysctl_reset(mpu->sysc);
3766
    omap_gp_timer_reset(mpu->gptimer[0]);
3767
    omap_gp_timer_reset(mpu->gptimer[1]);
3768
    omap_gp_timer_reset(mpu->gptimer[2]);
3769
    omap_gp_timer_reset(mpu->gptimer[3]);
3770
    omap_gp_timer_reset(mpu->gptimer[4]);
3771
    omap_gp_timer_reset(mpu->gptimer[5]);
3772
    omap_gp_timer_reset(mpu->gptimer[6]);
3773
    omap_gp_timer_reset(mpu->gptimer[7]);
3774
    omap_gp_timer_reset(mpu->gptimer[8]);
3775
    omap_gp_timer_reset(mpu->gptimer[9]);
3776
    omap_gp_timer_reset(mpu->gptimer[10]);
3777
    omap_gp_timer_reset(mpu->gptimer[11]);
3778
    omap_synctimer_reset(&mpu->synctimer);
3779
    omap_sdrc_reset(mpu->sdrc);
3780
    omap_gpmc_reset(mpu->gpmc);
3781
    omap_dss_reset(mpu->dss);
3782
    omap_uart_reset(mpu->uart[0]);
3783
    omap_uart_reset(mpu->uart[1]);
3784
    omap_uart_reset(mpu->uart[2]);
3785
    omap_mmc_reset(mpu->mmc);
3786
    omap_gpif_reset(mpu->gpif);
3787
    omap_mcspi_reset(mpu->mcspi[0]);
3788
    omap_mcspi_reset(mpu->mcspi[1]);
3789
    omap_i2c_reset(mpu->i2c[0]);
3790
    omap_i2c_reset(mpu->i2c[1]);
3791
    cpu_reset(mpu->env);
3792
}
3793

    
3794
static int omap2_validate_addr(struct omap_mpu_state_s *s,
3795
                target_phys_addr_t addr)
3796
{
3797
    return 1;
3798
}
3799

    
3800
static const struct dma_irq_map omap2_dma_irq_map[] = {
3801
    { 0, OMAP_INT_24XX_SDMA_IRQ0 },
3802
    { 0, OMAP_INT_24XX_SDMA_IRQ1 },
3803
    { 0, OMAP_INT_24XX_SDMA_IRQ2 },
3804
    { 0, OMAP_INT_24XX_SDMA_IRQ3 },
3805
};
3806

    
3807
struct omap_mpu_state_s *omap2420_mpu_init(unsigned long sdram_size,
3808
                DisplayState *ds, const char *core)
3809
{
3810
    struct omap_mpu_state_s *s = (struct omap_mpu_state_s *)
3811
            qemu_mallocz(sizeof(struct omap_mpu_state_s));
3812
    ram_addr_t sram_base, q2_base;
3813
    qemu_irq *cpu_irq;
3814
    qemu_irq dma_irqs[4];
3815
    omap_clk gpio_clks[4];
3816
    int sdindex;
3817
    int i;
3818

    
3819
    /* Core */
3820
    s->mpu_model = omap2420;
3821
    s->env = cpu_init(core ?: "arm1136-r2");
3822
    if (!s->env) {
3823
        fprintf(stderr, "Unable to find CPU definition\n");
3824
        exit(1);
3825
    }
3826
    s->sdram_size = sdram_size;
3827
    s->sram_size = OMAP242X_SRAM_SIZE;
3828

    
3829
    s->wakeup = qemu_allocate_irqs(omap_mpu_wakeup, s, 1)[0];
3830

    
3831
    /* Clocks */
3832
    omap_clk_init(s);
3833

    
3834
    /* Memory-mapped stuff */
3835
    cpu_register_physical_memory(OMAP2_Q2_BASE, s->sdram_size,
3836
                    (q2_base = qemu_ram_alloc(s->sdram_size)) | IO_MEM_RAM);
3837
    cpu_register_physical_memory(OMAP2_SRAM_BASE, s->sram_size,
3838
                    (sram_base = qemu_ram_alloc(s->sram_size)) | IO_MEM_RAM);
3839

    
3840
    s->l4 = omap_l4_init(OMAP2_L4_BASE, 54);
3841

    
3842
    /* Actually mapped at any 2K boundary in the ARM11 private-peripheral if */
3843
    cpu_irq = arm_pic_init_cpu(s->env);
3844
    s->ih[0] = omap2_inth_init(0x480fe000, 0x1000, 3, &s->irq[0],
3845
                    cpu_irq[ARM_PIC_CPU_IRQ], cpu_irq[ARM_PIC_CPU_FIQ],
3846
                    omap_findclk(s, "mpu_intc_fclk"),
3847
                    omap_findclk(s, "mpu_intc_iclk"));
3848

    
3849
    s->prcm = omap_prcm_init(omap_l4tao(s->l4, 3),
3850
                    s->irq[0][OMAP_INT_24XX_PRCM_MPU_IRQ], NULL, NULL, s);
3851

    
3852
    s->sysc = omap_sysctl_init(omap_l4tao(s->l4, 1),
3853
                    omap_findclk(s, "omapctrl_iclk"), s);
3854

    
3855
    for (i = 0; i < 4; i ++)
3856
        dma_irqs[i] =
3857
                s->irq[omap2_dma_irq_map[i].ih][omap2_dma_irq_map[i].intr];
3858
    s->dma = omap_dma4_init(0x48056000, dma_irqs, s, 256, 32,
3859
                    omap_findclk(s, "sdma_iclk"),
3860
                    omap_findclk(s, "sdma_fclk"));
3861
    s->port->addr_valid = omap2_validate_addr;
3862

    
3863
    s->uart[0] = omap2_uart_init(omap_l4ta(s->l4, 19),
3864
                    s->irq[0][OMAP_INT_24XX_UART1_IRQ],
3865
                    omap_findclk(s, "uart1_fclk"),
3866
                    omap_findclk(s, "uart1_iclk"),
3867
                    s->drq[OMAP24XX_DMA_UART1_TX],
3868
                    s->drq[OMAP24XX_DMA_UART1_RX], serial_hds[0]);
3869
    s->uart[1] = omap2_uart_init(omap_l4ta(s->l4, 20),
3870
                    s->irq[0][OMAP_INT_24XX_UART2_IRQ],
3871
                    omap_findclk(s, "uart2_fclk"),
3872
                    omap_findclk(s, "uart2_iclk"),
3873
                    s->drq[OMAP24XX_DMA_UART2_TX],
3874
                    s->drq[OMAP24XX_DMA_UART2_RX],
3875
                    serial_hds[0] ? serial_hds[1] : 0);
3876
    s->uart[2] = omap2_uart_init(omap_l4ta(s->l4, 21),
3877
                    s->irq[0][OMAP_INT_24XX_UART3_IRQ],
3878
                    omap_findclk(s, "uart3_fclk"),
3879
                    omap_findclk(s, "uart3_iclk"),
3880
                    s->drq[OMAP24XX_DMA_UART3_TX],
3881
                    s->drq[OMAP24XX_DMA_UART3_RX],
3882
                    serial_hds[0] && serial_hds[1] ? serial_hds[2] : 0);
3883

    
3884
    s->gptimer[0] = omap_gp_timer_init(omap_l4ta(s->l4, 7),
3885
                    s->irq[0][OMAP_INT_24XX_GPTIMER1],
3886
                    omap_findclk(s, "wu_gpt1_clk"),
3887
                    omap_findclk(s, "wu_l4_iclk"));
3888
    s->gptimer[1] = omap_gp_timer_init(omap_l4ta(s->l4, 8),
3889
                    s->irq[0][OMAP_INT_24XX_GPTIMER2],
3890
                    omap_findclk(s, "core_gpt2_clk"),
3891
                    omap_findclk(s, "core_l4_iclk"));
3892
    s->gptimer[2] = omap_gp_timer_init(omap_l4ta(s->l4, 22),
3893
                    s->irq[0][OMAP_INT_24XX_GPTIMER3],
3894
                    omap_findclk(s, "core_gpt3_clk"),
3895
                    omap_findclk(s, "core_l4_iclk"));
3896
    s->gptimer[3] = omap_gp_timer_init(omap_l4ta(s->l4, 23),
3897
                    s->irq[0][OMAP_INT_24XX_GPTIMER4],
3898
                    omap_findclk(s, "core_gpt4_clk"),
3899
                    omap_findclk(s, "core_l4_iclk"));
3900
    s->gptimer[4] = omap_gp_timer_init(omap_l4ta(s->l4, 24),
3901
                    s->irq[0][OMAP_INT_24XX_GPTIMER5],
3902
                    omap_findclk(s, "core_gpt5_clk"),
3903
                    omap_findclk(s, "core_l4_iclk"));
3904
    s->gptimer[5] = omap_gp_timer_init(omap_l4ta(s->l4, 25),
3905
                    s->irq[0][OMAP_INT_24XX_GPTIMER6],
3906
                    omap_findclk(s, "core_gpt6_clk"),
3907
                    omap_findclk(s, "core_l4_iclk"));
3908
    s->gptimer[6] = omap_gp_timer_init(omap_l4ta(s->l4, 26),
3909
                    s->irq[0][OMAP_INT_24XX_GPTIMER7],
3910
                    omap_findclk(s, "core_gpt7_clk"),
3911
                    omap_findclk(s, "core_l4_iclk"));
3912
    s->gptimer[7] = omap_gp_timer_init(omap_l4ta(s->l4, 27),
3913
                    s->irq[0][OMAP_INT_24XX_GPTIMER8],
3914
                    omap_findclk(s, "core_gpt8_clk"),
3915
                    omap_findclk(s, "core_l4_iclk"));
3916
    s->gptimer[8] = omap_gp_timer_init(omap_l4ta(s->l4, 28),
3917
                    s->irq[0][OMAP_INT_24XX_GPTIMER9],
3918
                    omap_findclk(s, "core_gpt9_clk"),
3919
                    omap_findclk(s, "core_l4_iclk"));
3920
    s->gptimer[9] = omap_gp_timer_init(omap_l4ta(s->l4, 29),
3921
                    s->irq[0][OMAP_INT_24XX_GPTIMER10],
3922
                    omap_findclk(s, "core_gpt10_clk"),
3923
                    omap_findclk(s, "core_l4_iclk"));
3924
    s->gptimer[10] = omap_gp_timer_init(omap_l4ta(s->l4, 30),
3925
                    s->irq[0][OMAP_INT_24XX_GPTIMER11],
3926
                    omap_findclk(s, "core_gpt11_clk"),
3927
                    omap_findclk(s, "core_l4_iclk"));
3928
    s->gptimer[11] = omap_gp_timer_init(omap_l4ta(s->l4, 31),
3929
                    s->irq[0][OMAP_INT_24XX_GPTIMER12],
3930
                    omap_findclk(s, "core_gpt12_clk"),
3931
                    omap_findclk(s, "core_l4_iclk"));
3932

    
3933
    omap_tap_init(omap_l4ta(s->l4, 2), s);
3934

    
3935
    omap_synctimer_init(omap_l4tao(s->l4, 2), s,
3936
                    omap_findclk(s, "clk32-kHz"),
3937
                    omap_findclk(s, "core_l4_iclk"));
3938

    
3939
    s->i2c[0] = omap2_i2c_init(omap_l4tao(s->l4, 5),
3940
                    s->irq[0][OMAP_INT_24XX_I2C1_IRQ],
3941
                    &s->drq[OMAP24XX_DMA_I2C1_TX],
3942
                    omap_findclk(s, "i2c1.fclk"),
3943
                    omap_findclk(s, "i2c1.iclk"));
3944
    s->i2c[1] = omap2_i2c_init(omap_l4tao(s->l4, 6),
3945
                    s->irq[0][OMAP_INT_24XX_I2C2_IRQ],
3946
                    &s->drq[OMAP24XX_DMA_I2C2_TX],
3947
                    omap_findclk(s, "i2c2.fclk"),
3948
                    omap_findclk(s, "i2c2.iclk"));
3949

    
3950
    gpio_clks[0] = omap_findclk(s, "gpio1_dbclk");
3951
    gpio_clks[1] = omap_findclk(s, "gpio2_dbclk");
3952
    gpio_clks[2] = omap_findclk(s, "gpio3_dbclk");
3953
    gpio_clks[3] = omap_findclk(s, "gpio4_dbclk");
3954
    s->gpif = omap2_gpio_init(omap_l4ta(s->l4, 3),
3955
                    &s->irq[0][OMAP_INT_24XX_GPIO_BANK1],
3956
                    gpio_clks, omap_findclk(s, "gpio_iclk"), 4);
3957

    
3958
    s->sdrc = omap_sdrc_init(0x68009000);
3959
    s->gpmc = omap_gpmc_init(0x6800a000, s->irq[0][OMAP_INT_24XX_GPMC_IRQ]);
3960

    
3961
    sdindex = drive_get_index(IF_SD, 0, 0);
3962
    if (sdindex == -1) {
3963
        fprintf(stderr, "qemu: missing SecureDigital device\n");
3964
        exit(1);
3965
    }
3966
    s->mmc = omap2_mmc_init(omap_l4tao(s->l4, 9), drives_table[sdindex].bdrv,
3967
                    s->irq[0][OMAP_INT_24XX_MMC_IRQ],
3968
                    &s->drq[OMAP24XX_DMA_MMC1_TX],
3969
                    omap_findclk(s, "mmc_fclk"), omap_findclk(s, "mmc_iclk"));
3970

    
3971
    s->mcspi[0] = omap_mcspi_init(omap_l4ta(s->l4, 35), 4,
3972
                    s->irq[0][OMAP_INT_24XX_MCSPI1_IRQ], 
3973
                    &s->drq[OMAP24XX_DMA_SPI1_TX0],
3974
                    omap_findclk(s, "spi1_fclk"),
3975
                    omap_findclk(s, "spi1_iclk"));
3976
    s->mcspi[1] = omap_mcspi_init(omap_l4ta(s->l4, 36), 2,
3977
                    s->irq[0][OMAP_INT_24XX_MCSPI2_IRQ], 
3978
                    &s->drq[OMAP24XX_DMA_SPI2_TX0],
3979
                    omap_findclk(s, "spi2_fclk"),
3980
                    omap_findclk(s, "spi2_iclk"));
3981

    
3982
    s->dss = omap_dss_init(omap_l4ta(s->l4, 10), 0x68000800, ds,
3983
                    /* XXX wire M_IRQ_25, D_L2_IRQ_30 and I_IRQ_13 together */
3984
                    s->irq[0][OMAP_INT_24XX_DSS_IRQ], s->drq[OMAP24XX_DMA_DSS],
3985
                    omap_findclk(s, "dss_clk1"), omap_findclk(s, "dss_clk2"),
3986
                    omap_findclk(s, "dss_54m_clk"),
3987
                    omap_findclk(s, "dss_l3_iclk"),
3988
                    omap_findclk(s, "dss_l4_iclk"));
3989

    
3990
    omap_sti_init(omap_l4ta(s->l4, 18), 0x54000000,
3991
                    s->irq[0][OMAP_INT_24XX_STI], omap_findclk(s, "emul_ck"),
3992
                    serial_hds[0] && serial_hds[1] && serial_hds[2] ?
3993
                    serial_hds[3] : 0);
3994

    
3995
    /* All register mappings (includin those not currenlty implemented):
3996
     * SystemControlMod        48000000 - 48000fff
3997
     * SystemControlL4        48001000 - 48001fff
3998
     * 32kHz Timer Mod        48004000 - 48004fff
3999
     * 32kHz Timer L4        48005000 - 48005fff
4000
     * PRCM ModA        48008000 - 480087ff
4001
     * PRCM ModB        48008800 - 48008fff
4002
     * PRCM L4                48009000 - 48009fff
4003
     * TEST-BCM Mod        48012000 - 48012fff
4004
     * TEST-BCM L4        48013000 - 48013fff
4005
     * TEST-TAP Mod        48014000 - 48014fff
4006
     * TEST-TAP L4        48015000 - 48015fff
4007
     * GPIO1 Mod        48018000 - 48018fff
4008
     * GPIO Top                48019000 - 48019fff
4009
     * GPIO2 Mod        4801a000 - 4801afff
4010
     * GPIO L4                4801b000 - 4801bfff
4011
     * GPIO3 Mod        4801c000 - 4801cfff
4012
     * GPIO4 Mod        4801e000 - 4801efff
4013
     * WDTIMER1 Mod        48020000 - 48010fff
4014
     * WDTIMER Top        48021000 - 48011fff
4015
     * WDTIMER2 Mod        48022000 - 48012fff
4016
     * WDTIMER L4        48023000 - 48013fff
4017
     * WDTIMER3 Mod        48024000 - 48014fff
4018
     * WDTIMER3 L4        48025000 - 48015fff
4019
     * WDTIMER4 Mod        48026000 - 48016fff
4020
     * WDTIMER4 L4        48027000 - 48017fff
4021
     * GPTIMER1 Mod        48028000 - 48018fff
4022
     * GPTIMER1 L4        48029000 - 48019fff
4023
     * GPTIMER2 Mod        4802a000 - 4801afff
4024
     * GPTIMER2 L4        4802b000 - 4801bfff
4025
     * L4-Config AP        48040000 - 480407ff
4026
     * L4-Config IP        48040800 - 48040fff
4027
     * L4-Config LA        48041000 - 48041fff
4028
     * ARM11ETB Mod        48048000 - 48049fff
4029
     * ARM11ETB L4        4804a000 - 4804afff
4030
     * DISPLAY Top        48050000 - 480503ff
4031
     * DISPLAY DISPC        48050400 - 480507ff
4032
     * DISPLAY RFBI        48050800 - 48050bff
4033
     * DISPLAY VENC        48050c00 - 48050fff
4034
     * DISPLAY L4        48051000 - 48051fff
4035
     * CAMERA Top        48052000 - 480523ff
4036
     * CAMERA core        48052400 - 480527ff
4037
     * CAMERA DMA        48052800 - 48052bff
4038
     * CAMERA MMU        48052c00 - 48052fff
4039
     * CAMERA L4        48053000 - 48053fff
4040
     * SDMA Mod                48056000 - 48056fff
4041
     * SDMA L4                48057000 - 48057fff
4042
     * SSI Top                48058000 - 48058fff
4043
     * SSI GDD                48059000 - 48059fff
4044
     * SSI Port1        4805a000 - 4805afff
4045
     * SSI Port2        4805b000 - 4805bfff
4046
     * SSI L4                4805c000 - 4805cfff
4047
     * USB Mod                4805e000 - 480fefff
4048
     * USB L4                4805f000 - 480fffff
4049
     * WIN_TRACER1 Mod        48060000 - 48060fff
4050
     * WIN_TRACER1 L4        48061000 - 48061fff
4051
     * WIN_TRACER2 Mod        48062000 - 48062fff
4052
     * WIN_TRACER2 L4        48063000 - 48063fff
4053
     * WIN_TRACER3 Mod        48064000 - 48064fff
4054
     * WIN_TRACER3 L4        48065000 - 48065fff
4055
     * WIN_TRACER4 Top        48066000 - 480660ff
4056
     * WIN_TRACER4 ETT        48066100 - 480661ff
4057
     * WIN_TRACER4 WT        48066200 - 480662ff
4058
     * WIN_TRACER4 L4        48067000 - 48067fff
4059
     * XTI Mod                48068000 - 48068fff
4060
     * XTI L4                48069000 - 48069fff
4061
     * UART1 Mod        4806a000 - 4806afff
4062
     * UART1 L4                4806b000 - 4806bfff
4063
     * UART2 Mod        4806c000 - 4806cfff
4064
     * UART2 L4                4806d000 - 4806dfff
4065
     * UART3 Mod        4806e000 - 4806efff
4066
     * UART3 L4                4806f000 - 4806ffff
4067
     * I2C1 Mod                48070000 - 48070fff
4068
     * I2C1 L4                48071000 - 48071fff
4069
     * I2C2 Mod                48072000 - 48072fff
4070
     * I2C2 L4                48073000 - 48073fff
4071
     * McBSP1 Mod        48074000 - 48074fff
4072
     * McBSP1 L4        48075000 - 48075fff
4073
     * McBSP2 Mod        48076000 - 48076fff
4074
     * McBSP2 L4        48077000 - 48077fff
4075
     * GPTIMER3 Mod        48078000 - 48078fff
4076
     * GPTIMER3 L4        48079000 - 48079fff
4077
     * GPTIMER4 Mod        4807a000 - 4807afff
4078
     * GPTIMER4 L4        4807b000 - 4807bfff
4079
     * GPTIMER5 Mod        4807c000 - 4807cfff
4080
     * GPTIMER5 L4        4807d000 - 4807dfff
4081
     * GPTIMER6 Mod        4807e000 - 4807efff
4082
     * GPTIMER6 L4        4807f000 - 4807ffff
4083
     * GPTIMER7 Mod        48080000 - 48080fff
4084
     * GPTIMER7 L4        48081000 - 48081fff
4085
     * GPTIMER8 Mod        48082000 - 48082fff
4086
     * GPTIMER8 L4        48083000 - 48083fff
4087
     * GPTIMER9 Mod        48084000 - 48084fff
4088
     * GPTIMER9 L4        48085000 - 48085fff
4089
     * GPTIMER10 Mod        48086000 - 48086fff
4090
     * GPTIMER10 L4        48087000 - 48087fff
4091
     * GPTIMER11 Mod        48088000 - 48088fff
4092
     * GPTIMER11 L4        48089000 - 48089fff
4093
     * GPTIMER12 Mod        4808a000 - 4808afff
4094
     * GPTIMER12 L4        4808b000 - 4808bfff
4095
     * EAC Mod                48090000 - 48090fff
4096
     * EAC L4                48091000 - 48091fff
4097
     * FAC Mod                48092000 - 48092fff
4098
     * FAC L4                48093000 - 48093fff
4099
     * MAILBOX Mod        48094000 - 48094fff
4100
     * MAILBOX L4        48095000 - 48095fff
4101
     * SPI1 Mod                48098000 - 48098fff
4102
     * SPI1 L4                48099000 - 48099fff
4103
     * SPI2 Mod                4809a000 - 4809afff
4104
     * SPI2 L4                4809b000 - 4809bfff
4105
     * MMC/SDIO Mod        4809c000 - 4809cfff
4106
     * MMC/SDIO L4        4809d000 - 4809dfff
4107
     * MS_PRO Mod        4809e000 - 4809efff
4108
     * MS_PRO L4        4809f000 - 4809ffff
4109
     * RNG Mod                480a0000 - 480a0fff
4110
     * RNG L4                480a1000 - 480a1fff
4111
     * DES3DES Mod        480a2000 - 480a2fff
4112
     * DES3DES L4        480a3000 - 480a3fff
4113
     * SHA1MD5 Mod        480a4000 - 480a4fff
4114
     * SHA1MD5 L4        480a5000 - 480a5fff
4115
     * AES Mod                480a6000 - 480a6fff
4116
     * AES L4                480a7000 - 480a7fff
4117
     * PKA Mod                480a8000 - 480a9fff
4118
     * PKA L4                480aa000 - 480aafff
4119
     * MG Mod                480b0000 - 480b0fff
4120
     * MG L4                480b1000 - 480b1fff
4121
     * HDQ/1-wire Mod        480b2000 - 480b2fff
4122
     * HDQ/1-wire L4        480b3000 - 480b3fff
4123
     * MPU interrupt        480fe000 - 480fefff
4124
     * STI channel base        54000000 - 5400ffff
4125
     * IVA RAM                5c000000 - 5c01ffff
4126
     * IVA ROM                5c020000 - 5c027fff
4127
     * IMG_BUF_A        5c040000 - 5c040fff
4128
     * IMG_BUF_B        5c042000 - 5c042fff
4129
     * VLCDS                5c048000 - 5c0487ff
4130
     * IMX_COEF                5c049000 - 5c04afff
4131
     * IMX_CMD                5c051000 - 5c051fff
4132
     * VLCDQ                5c053000 - 5c0533ff
4133
     * VLCDH                5c054000 - 5c054fff
4134
     * SEQ_CMD                5c055000 - 5c055fff
4135
     * IMX_REG                5c056000 - 5c0560ff
4136
     * VLCD_REG                5c056100 - 5c0561ff
4137
     * SEQ_REG                5c056200 - 5c0562ff
4138
     * IMG_BUF_REG        5c056300 - 5c0563ff
4139
     * SEQIRQ_REG        5c056400 - 5c0564ff
4140
     * OCP_REG                5c060000 - 5c060fff
4141
     * SYSC_REG                5c070000 - 5c070fff
4142
     * MMU_REG                5d000000 - 5d000fff
4143
     * sDMA R                68000400 - 680005ff
4144
     * sDMA W                68000600 - 680007ff
4145
     * Display Control        68000800 - 680009ff
4146
     * DSP subsystem        68000a00 - 68000bff
4147
     * MPU subsystem        68000c00 - 68000dff
4148
     * IVA subsystem        68001000 - 680011ff
4149
     * USB                68001200 - 680013ff
4150
     * Camera                68001400 - 680015ff
4151
     * VLYNQ (firewall)        68001800 - 68001bff
4152
     * VLYNQ                68001e00 - 68001fff
4153
     * SSI                68002000 - 680021ff
4154
     * L4                68002400 - 680025ff
4155
     * DSP (firewall)        68002800 - 68002bff
4156
     * DSP subsystem        68002e00 - 68002fff
4157
     * IVA (firewall)        68003000 - 680033ff
4158
     * IVA                68003600 - 680037ff
4159
     * GFX                68003a00 - 68003bff
4160
     * CMDWR emulation        68003c00 - 68003dff
4161
     * SMS                68004000 - 680041ff
4162
     * OCM                68004200 - 680043ff
4163
     * GPMC                68004400 - 680045ff
4164
     * RAM (firewall)        68005000 - 680053ff
4165
     * RAM (err login)        68005400 - 680057ff
4166
     * ROM (firewall)        68005800 - 68005bff
4167
     * ROM (err login)        68005c00 - 68005fff
4168
     * GPMC (firewall)        68006000 - 680063ff
4169
     * GPMC (err login)        68006400 - 680067ff
4170
     * SMS (err login)        68006c00 - 68006fff
4171
     * SMS registers        68008000 - 68008fff
4172
     * SDRC registers        68009000 - 68009fff
4173
     * GPMC registers        6800a000   6800afff
4174
     */
4175

    
4176
    qemu_register_reset(omap2_mpu_reset, s);
4177

    
4178
    return s;
4179
}