root / hw / heathrow_pic.c @ 298e01b6
History | View | Annotate | Download (4.5 kB)
1 | e68b9b2b | bellard | /*
|
---|---|---|---|
2 | 3cbee15b | j_mayer | * Heathrow PIC support (OldWorld PowerMac)
|
3 | 5fafdf24 | ths | *
|
4 | 3cbee15b | j_mayer | * Copyright (c) 2005-2007 Fabrice Bellard
|
5 | 3cbee15b | j_mayer | * Copyright (c) 2007 Jocelyn Mayer
|
6 | 5fafdf24 | ths | *
|
7 | e68b9b2b | bellard | * Permission is hereby granted, free of charge, to any person obtaining a copy
|
8 | e68b9b2b | bellard | * of this software and associated documentation files (the "Software"), to deal
|
9 | e68b9b2b | bellard | * in the Software without restriction, including without limitation the rights
|
10 | e68b9b2b | bellard | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
11 | e68b9b2b | bellard | * copies of the Software, and to permit persons to whom the Software is
|
12 | e68b9b2b | bellard | * furnished to do so, subject to the following conditions:
|
13 | e68b9b2b | bellard | *
|
14 | e68b9b2b | bellard | * The above copyright notice and this permission notice shall be included in
|
15 | e68b9b2b | bellard | * all copies or substantial portions of the Software.
|
16 | e68b9b2b | bellard | *
|
17 | e68b9b2b | bellard | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
18 | e68b9b2b | bellard | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
19 | e68b9b2b | bellard | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
20 | e68b9b2b | bellard | * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
21 | e68b9b2b | bellard | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
22 | e68b9b2b | bellard | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
23 | e68b9b2b | bellard | * THE SOFTWARE.
|
24 | e68b9b2b | bellard | */
|
25 | 87ecb68b | pbrook | #include "hw.h" |
26 | 3cbee15b | j_mayer | #include "ppc_mac.h" |
27 | e68b9b2b | bellard | |
28 | e68b9b2b | bellard | //#define DEBUG
|
29 | e68b9b2b | bellard | |
30 | e68b9b2b | bellard | typedef struct HeathrowPIC { |
31 | e68b9b2b | bellard | uint32_t events; |
32 | e68b9b2b | bellard | uint32_t mask; |
33 | e68b9b2b | bellard | uint32_t levels; |
34 | e68b9b2b | bellard | uint32_t level_triggered; |
35 | e68b9b2b | bellard | } HeathrowPIC; |
36 | e68b9b2b | bellard | |
37 | d537cf6c | pbrook | typedef struct HeathrowPICS { |
38 | e68b9b2b | bellard | HeathrowPIC pics[2];
|
39 | 3cbee15b | j_mayer | qemu_irq *irqs; |
40 | d537cf6c | pbrook | } HeathrowPICS; |
41 | e68b9b2b | bellard | |
42 | e68b9b2b | bellard | static inline int check_irq(HeathrowPIC *pic) |
43 | e68b9b2b | bellard | { |
44 | e68b9b2b | bellard | return (pic->events | (pic->levels & pic->level_triggered)) & pic->mask;
|
45 | e68b9b2b | bellard | } |
46 | e68b9b2b | bellard | |
47 | e68b9b2b | bellard | /* update the CPU irq state */
|
48 | e68b9b2b | bellard | static void heathrow_pic_update(HeathrowPICS *s) |
49 | e68b9b2b | bellard | { |
50 | e68b9b2b | bellard | if (check_irq(&s->pics[0]) || check_irq(&s->pics[1])) { |
51 | 3cbee15b | j_mayer | qemu_irq_raise(s->irqs[0]);
|
52 | e68b9b2b | bellard | } else {
|
53 | 3cbee15b | j_mayer | qemu_irq_lower(s->irqs[0]);
|
54 | e68b9b2b | bellard | } |
55 | e68b9b2b | bellard | } |
56 | e68b9b2b | bellard | |
57 | e68b9b2b | bellard | static void pic_writel (void *opaque, target_phys_addr_t addr, uint32_t value) |
58 | e68b9b2b | bellard | { |
59 | e68b9b2b | bellard | HeathrowPICS *s = opaque; |
60 | e68b9b2b | bellard | HeathrowPIC *pic; |
61 | e68b9b2b | bellard | unsigned int n; |
62 | e68b9b2b | bellard | |
63 | 3cbee15b | j_mayer | #ifdef TARGET_WORDS_BIGENDIAN
|
64 | e68b9b2b | bellard | value = bswap32(value); |
65 | e68b9b2b | bellard | #endif
|
66 | e68b9b2b | bellard | n = ((addr & 0xfff) - 0x10) >> 4; |
67 | 3cbee15b | j_mayer | #ifdef DEBUG
|
68 | 3cbee15b | j_mayer | printf("pic_writel: " PADDRX " %u: %08x\n", addr, n, value); |
69 | 3cbee15b | j_mayer | #endif
|
70 | e68b9b2b | bellard | if (n >= 2) |
71 | e68b9b2b | bellard | return;
|
72 | e68b9b2b | bellard | pic = &s->pics[n]; |
73 | e68b9b2b | bellard | switch(addr & 0xf) { |
74 | e68b9b2b | bellard | case 0x04: |
75 | e68b9b2b | bellard | pic->mask = value; |
76 | e68b9b2b | bellard | heathrow_pic_update(s); |
77 | e68b9b2b | bellard | break;
|
78 | e68b9b2b | bellard | case 0x08: |
79 | e68b9b2b | bellard | /* do not reset level triggered IRQs */
|
80 | e68b9b2b | bellard | value &= ~pic->level_triggered; |
81 | e68b9b2b | bellard | pic->events &= ~value; |
82 | e68b9b2b | bellard | heathrow_pic_update(s); |
83 | e68b9b2b | bellard | break;
|
84 | e68b9b2b | bellard | default:
|
85 | e68b9b2b | bellard | break;
|
86 | e68b9b2b | bellard | } |
87 | e68b9b2b | bellard | } |
88 | e68b9b2b | bellard | |
89 | e68b9b2b | bellard | static uint32_t pic_readl (void *opaque, target_phys_addr_t addr) |
90 | e68b9b2b | bellard | { |
91 | e68b9b2b | bellard | HeathrowPICS *s = opaque; |
92 | e68b9b2b | bellard | HeathrowPIC *pic; |
93 | e68b9b2b | bellard | unsigned int n; |
94 | e68b9b2b | bellard | uint32_t value; |
95 | 3b46e624 | ths | |
96 | e68b9b2b | bellard | n = ((addr & 0xfff) - 0x10) >> 4; |
97 | e68b9b2b | bellard | if (n >= 2) { |
98 | e68b9b2b | bellard | value = 0;
|
99 | e68b9b2b | bellard | } else {
|
100 | e68b9b2b | bellard | pic = &s->pics[n]; |
101 | e68b9b2b | bellard | switch(addr & 0xf) { |
102 | e68b9b2b | bellard | case 0x0: |
103 | e68b9b2b | bellard | value = pic->events; |
104 | e68b9b2b | bellard | break;
|
105 | e68b9b2b | bellard | case 0x4: |
106 | e68b9b2b | bellard | value = pic->mask; |
107 | e68b9b2b | bellard | break;
|
108 | e68b9b2b | bellard | case 0xc: |
109 | e68b9b2b | bellard | value = pic->levels; |
110 | e68b9b2b | bellard | break;
|
111 | e68b9b2b | bellard | default:
|
112 | e68b9b2b | bellard | value = 0;
|
113 | e68b9b2b | bellard | break;
|
114 | e68b9b2b | bellard | } |
115 | e68b9b2b | bellard | } |
116 | e68b9b2b | bellard | #ifdef DEBUG
|
117 | 3cbee15b | j_mayer | printf("pic_readl: " PADDRX " %u: %08x\n", addr, n, value); |
118 | e68b9b2b | bellard | #endif
|
119 | 3cbee15b | j_mayer | #ifdef TARGET_WORDS_BIGENDIAN
|
120 | e68b9b2b | bellard | value = bswap32(value); |
121 | 3cbee15b | j_mayer | #endif
|
122 | e68b9b2b | bellard | return value;
|
123 | e68b9b2b | bellard | } |
124 | e68b9b2b | bellard | |
125 | e68b9b2b | bellard | static CPUWriteMemoryFunc *pic_write[] = {
|
126 | e68b9b2b | bellard | &pic_writel, |
127 | e68b9b2b | bellard | &pic_writel, |
128 | e68b9b2b | bellard | &pic_writel, |
129 | e68b9b2b | bellard | }; |
130 | e68b9b2b | bellard | |
131 | e68b9b2b | bellard | static CPUReadMemoryFunc *pic_read[] = {
|
132 | e68b9b2b | bellard | &pic_readl, |
133 | e68b9b2b | bellard | &pic_readl, |
134 | e68b9b2b | bellard | &pic_readl, |
135 | e68b9b2b | bellard | }; |
136 | e68b9b2b | bellard | |
137 | e68b9b2b | bellard | |
138 | d537cf6c | pbrook | static void heathrow_pic_set_irq(void *opaque, int num, int level) |
139 | e68b9b2b | bellard | { |
140 | e68b9b2b | bellard | HeathrowPICS *s = opaque; |
141 | e68b9b2b | bellard | HeathrowPIC *pic; |
142 | e68b9b2b | bellard | unsigned int irq_bit; |
143 | e68b9b2b | bellard | |
144 | e68b9b2b | bellard | #if defined(DEBUG)
|
145 | e68b9b2b | bellard | { |
146 | e68b9b2b | bellard | static int last_level[64]; |
147 | e68b9b2b | bellard | if (last_level[num] != level) {
|
148 | e68b9b2b | bellard | printf("set_irq: num=0x%02x level=%d\n", num, level);
|
149 | e68b9b2b | bellard | last_level[num] = level; |
150 | e68b9b2b | bellard | } |
151 | e68b9b2b | bellard | } |
152 | e68b9b2b | bellard | #endif
|
153 | e68b9b2b | bellard | pic = &s->pics[1 - (num >> 5)]; |
154 | e68b9b2b | bellard | irq_bit = 1 << (num & 0x1f); |
155 | e68b9b2b | bellard | if (level) {
|
156 | e68b9b2b | bellard | pic->events |= irq_bit & ~pic->level_triggered; |
157 | e68b9b2b | bellard | pic->levels |= irq_bit; |
158 | e68b9b2b | bellard | } else {
|
159 | e68b9b2b | bellard | pic->levels &= ~irq_bit; |
160 | e68b9b2b | bellard | } |
161 | e68b9b2b | bellard | heathrow_pic_update(s); |
162 | e68b9b2b | bellard | } |
163 | e68b9b2b | bellard | |
164 | 3cbee15b | j_mayer | qemu_irq *heathrow_pic_init(int *pmem_index,
|
165 | 3cbee15b | j_mayer | int nb_cpus, qemu_irq **irqs)
|
166 | e68b9b2b | bellard | { |
167 | e68b9b2b | bellard | HeathrowPICS *s; |
168 | 3b46e624 | ths | |
169 | e68b9b2b | bellard | s = qemu_mallocz(sizeof(HeathrowPICS));
|
170 | e68b9b2b | bellard | s->pics[0].level_triggered = 0; |
171 | e68b9b2b | bellard | s->pics[1].level_triggered = 0x1ff00000; |
172 | 3cbee15b | j_mayer | /* only 1 CPU */
|
173 | 3cbee15b | j_mayer | s->irqs = irqs[0];
|
174 | e68b9b2b | bellard | *pmem_index = cpu_register_io_memory(0, pic_read, pic_write, s);
|
175 | 3cbee15b | j_mayer | |
176 | d537cf6c | pbrook | return qemu_allocate_irqs(heathrow_pic_set_irq, s, 64); |
177 | e68b9b2b | bellard | } |