pic_distopenpic.c revision 1.1 1 /* $NetBSD: pic_distopenpic.c,v 1.1 2008/01/17 23:43:00 garbled Exp $ */
2
3 /*-
4 * Copyright (c) 2008 Tim Rightnour
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of The NetBSD Foundation nor the names of its
16 * contributors may be used to endorse or promote products derived
17 * from this software without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 #include <sys/cdefs.h>
33 __KERNEL_RCSID(0, "$NetBSD: pic_distopenpic.c,v 1.1 2008/01/17 23:43:00 garbled Exp $");
34
35 #include <sys/param.h>
36 #include <sys/malloc.h>
37 #include <sys/kernel.h>
38
39 #include <uvm/uvm_extern.h>
40
41 #include <machine/pio.h>
42 #include <powerpc/openpic.h>
43
44 #include <arch/powerpc/pic/picvar.h>
45
46 #include "opt_interrupt.h"
47
48 /* distributed stuff */
49 static int opic_isu_from_irq(struct openpic_ops *, int, int *);
50 static u_int distopic_read(struct openpic_ops *, int, int);
51 static void distopic_write(struct openpic_ops *, int, int, u_int);
52 static void distopic_establish_irq(struct pic_ops *, int, int, int);
53 static void distopic_enable_irq(struct pic_ops *, int, int);
54 static void distopic_disable_irq(struct pic_ops *, int);
55
56 struct pic_ops *
57 setup_distributed_openpic(void *addr, int nrofisus, void **isu, int *maps)
58 {
59 struct openpic_ops *opicops;
60 struct pic_ops *pic;
61 int irq, i;
62 u_int x;
63
64 openpic_base = (void *)addr;
65 opicops = malloc(sizeof(struct openpic_ops), M_DEVBUF, M_NOWAIT);
66 KASSERT(opicops != NULL);
67 pic = &opicops->pic;
68
69 x = openpic_read(OPENPIC_FEATURE);
70 if (((x & 0x07ff0000) >> 16) != 0)
71 panic("Can't handle a distributed openpic with internal ISU");
72
73 opicops->nrofisus = nrofisus;
74 opicops->isu = malloc(sizeof(volatile unsigned char *) * nrofisus,
75 M_DEVBUF, M_NOWAIT);
76 KASSERT(opicops->isu != NULL);
77 opicops->irq_per = malloc(sizeof(uint8_t) * nrofisus,
78 M_DEVBUF, M_NOWAIT);
79 KASSERT(opicops->irq_per != NULL);
80
81 for (irq=0, i=0; i < nrofisus ; i++) {
82 opicops->isu[i] = (void *)isu[i];
83 opicops->irq_per[i] = maps[i]/0x20;
84 irq += maps[i]/0x20;
85 aprint_debug("%d: irqtotal=%d, added %d\n", i, irq,
86 maps[i]/0x20);
87 }
88 aprint_normal("OpenPIC Version 1.%d: "
89 "Supports %d CPUs and %d interrupt sources.\n",
90 x & 0xff, ((x & 0x1f00) >> 8) + 1, irq);
91 pic->pic_numintrs = irq;
92 pic->pic_cookie = addr;
93 pic->pic_enable_irq = distopic_enable_irq;
94 pic->pic_reenable_irq = distopic_enable_irq;
95 pic->pic_disable_irq = distopic_disable_irq;
96 pic->pic_get_irq = opic_get_irq;
97 pic->pic_ack_irq = opic_ack_irq;
98 pic->pic_establish_irq = distopic_establish_irq;
99 pic->pic_finish_setup = opic_finish_setup;
100 opicops->flags = OPENPIC_FLAG_DIST;
101 strcpy(pic->pic_name, "openpic");
102 pic_add(pic);
103
104 openpic_set_priority(0, 15);
105
106 for (i=0; i < nrofisus; i++) {
107 for (irq = 0; irq < opicops->irq_per[i]; irq++) {
108 /* make sure to keep disabled */
109 distopic_write(opicops, i,
110 OPENPIC_DSRC_VECTOR_OFFSET(irq), OPENPIC_IMASK);
111 /* send all interrupts to CPU 0 */
112 distopic_write(opicops, i,
113 OPENPIC_DSRC_IDEST_OFFSET(irq), 1 << 0);
114 }
115 }
116
117 x = openpic_read(OPENPIC_CONFIG);
118 x |= OPENPIC_CONFIG_8259_PASSTHRU_DISABLE;
119 openpic_write(OPENPIC_CONFIG, x);
120
121 openpic_write(OPENPIC_SPURIOUS_VECTOR, 0xff);
122
123 openpic_set_priority(0, 0);
124
125 /* clear all pending interrunts */
126 for (irq = 0; irq < pic->pic_numintrs; irq++) {
127 openpic_read_irq(0);
128 openpic_eoi(0);
129 }
130
131 #if 0
132 printf("timebase freq=%d\n", openpic_read(0x10f0));
133 #endif
134 return pic;
135
136 }
137
138 /* Begin distributed openpic code */
139
140 static int
141 opic_isu_from_irq(struct openpic_ops *opic, int irq, int *realirq)
142 {
143 int i;
144
145 for (i=0; i < opic->nrofisus; i++) {
146 if (irq < opic->irq_per[i]) {
147 *realirq = irq;
148 return i;
149 } else
150 irq -= opic->irq_per[i];
151 }
152 return -1;
153 }
154
155 static u_int
156 distopic_read(struct openpic_ops *opic, int isu, int offset)
157 {
158 volatile unsigned char *addr = opic->isu[isu] + offset;
159
160 return in32rb(addr);
161 }
162
163 static void
164 distopic_write(struct openpic_ops *opic, int isu, int offset, u_int val)
165 {
166 volatile unsigned char *addr = opic->isu[isu] + offset;
167
168 out32rb(addr, val);
169 }
170
171 static void
172 distopic_establish_irq(struct pic_ops *pic, int irq, int type, int pri)
173 {
174 struct openpic_ops *opic = (struct openpic_ops *)pic;
175 int isu, realirq, realpri = max(1, min(15, pri));
176 uint32_t x;
177
178 isu = opic_isu_from_irq(opic, irq, &realirq);
179 KASSERT(isu != -1);
180
181 x = irq;
182 x |= OPENPIC_IMASK;
183 x |= (realirq == 0 && isu == 0) ?
184 OPENPIC_POLARITY_POSITIVE : OPENPIC_POLARITY_NEGATIVE;
185 x |= (type == IST_EDGE) ? OPENPIC_SENSE_EDGE : OPENPIC_SENSE_LEVEL;
186 x |= realpri << OPENPIC_PRIORITY_SHIFT;
187 distopic_write(opic, isu, OPENPIC_DSRC_VECTOR_OFFSET(realirq), x);
188
189 aprint_debug("%s: setting IRQ %d to priority %d 0x%x\n", __func__,
190 irq, realpri, x);
191 }
192
193 static void
194 distopic_enable_irq(struct pic_ops *pic, int irq, int type)
195 {
196 struct openpic_ops *opic = (struct openpic_ops *)pic;
197 int isu, realirq;
198 u_int x;
199
200 isu = opic_isu_from_irq(opic, irq, &realirq);
201 KASSERT(isu != -1);
202 x = distopic_read(opic, isu, OPENPIC_DSRC_VECTOR_OFFSET(realirq));
203 x &= ~OPENPIC_IMASK;
204 distopic_write(opic, isu, OPENPIC_DSRC_VECTOR_OFFSET(realirq), x);
205 }
206
207 static void
208 distopic_disable_irq(struct pic_ops *pic, int irq)
209 {
210 struct openpic_ops *opic = (struct openpic_ops *)pic;
211 int isu, realirq;
212 u_int x;
213
214 isu = opic_isu_from_irq(opic, irq, &realirq);
215 KASSERT(isu != -1);
216 x = distopic_read(opic, isu, OPENPIC_DSRC_VECTOR_OFFSET(realirq));
217 x |= OPENPIC_IMASK;
218 distopic_write(opic, isu, OPENPIC_DSRC_VECTOR_OFFSET(realirq), x);
219 }
220