IRQ: Maintain regs pointer globally rather than passing to IRQ handlers
[linux-2.6.git] / arch / powerpc / platforms / powermac / pfunc_base.c
1 #include <linux/types.h>
2 #include <linux/init.h>
3 #include <linux/delay.h>
4 #include <linux/kernel.h>
5 #include <linux/interrupt.h>
6 #include <linux/spinlock.h>
7
8 #include <asm/pmac_feature.h>
9 #include <asm/pmac_pfunc.h>
10
11 #undef DEBUG
12 #ifdef DEBUG
13 #define DBG(fmt...)     printk(fmt)
14 #else
15 #define DBG(fmt...)
16 #endif
17
18 static irqreturn_t macio_gpio_irq(int irq, void *data)
19 {
20         pmf_do_irq(data);
21
22         return IRQ_HANDLED;
23 }
24
25 static int macio_do_gpio_irq_enable(struct pmf_function *func)
26 {
27         unsigned int irq = irq_of_parse_and_map(func->node, 0);
28         if (irq == NO_IRQ)
29                 return -EINVAL;
30         return request_irq(irq, macio_gpio_irq, 0, func->node->name, func);
31 }
32
33 static int macio_do_gpio_irq_disable(struct pmf_function *func)
34 {
35         unsigned int irq = irq_of_parse_and_map(func->node, 0);
36         if (irq == NO_IRQ)
37                 return -EINVAL;
38         free_irq(irq, func);
39         return 0;
40 }
41
42 static int macio_do_gpio_write(PMF_STD_ARGS, u8 value, u8 mask)
43 {
44         u8 __iomem *addr = (u8 __iomem *)func->driver_data;
45         unsigned long flags;
46         u8 tmp;
47
48         /* Check polarity */
49         if (args && args->count && !args->u[0].v)
50                 value = ~value;
51
52         /* Toggle the GPIO */
53         spin_lock_irqsave(&feature_lock, flags);
54         tmp = readb(addr);
55         tmp = (tmp & ~mask) | (value & mask);
56         DBG("Do write 0x%02x to GPIO %s (%p)\n",
57             tmp, func->node->full_name, addr);
58         writeb(tmp, addr);
59         spin_unlock_irqrestore(&feature_lock, flags);
60
61         return 0;
62 }
63
64 static int macio_do_gpio_read(PMF_STD_ARGS, u8 mask, int rshift, u8 xor)
65 {
66         u8 __iomem *addr = (u8 __iomem *)func->driver_data;
67         u32 value;
68
69         /* Check if we have room for reply */
70         if (args == NULL || args->count == 0 || args->u[0].p == NULL)
71                 return -EINVAL;
72
73         value = readb(addr);
74         *args->u[0].p = ((value & mask) >> rshift) ^ xor;
75
76         return 0;
77 }
78
79 static int macio_do_delay(PMF_STD_ARGS, u32 duration)
80 {
81         /* assume we can sleep ! */
82         msleep((duration + 999) / 1000);
83         return 0;
84 }
85
86 static struct pmf_handlers macio_gpio_handlers = {
87         .irq_enable     = macio_do_gpio_irq_enable,
88         .irq_disable    = macio_do_gpio_irq_disable,
89         .write_gpio     = macio_do_gpio_write,
90         .read_gpio      = macio_do_gpio_read,
91         .delay          = macio_do_delay,
92 };
93
94 static void macio_gpio_init_one(struct macio_chip *macio)
95 {
96         struct device_node *gparent, *gp;
97
98         /*
99          * Find the "gpio" parent node
100          */
101
102         for (gparent = NULL;
103              (gparent = of_get_next_child(macio->of_node, gparent)) != NULL;)
104                 if (strcmp(gparent->name, "gpio") == 0)
105                         break;
106         if (gparent == NULL)
107                 return;
108
109         DBG("Installing GPIO functions for macio %s\n",
110             macio->of_node->full_name);
111
112         /*
113          * Ok, got one, we dont need anything special to track them down, so
114          * we just create them all
115          */
116         for (gp = NULL; (gp = of_get_next_child(gparent, gp)) != NULL;) {
117                 const u32 *reg = get_property(gp, "reg", NULL);
118                 unsigned long offset;
119                 if (reg == NULL)
120                         continue;
121                 offset = *reg;
122                 /* Deal with old style device-tree. We can safely hard code the
123                  * offset for now too even if it's a bit gross ...
124                  */
125                 if (offset < 0x50)
126                         offset += 0x50;
127                 offset += (unsigned long)macio->base;
128                 pmf_register_driver(gp, &macio_gpio_handlers, (void *)offset);
129         }
130
131         DBG("Calling initial GPIO functions for macio %s\n",
132             macio->of_node->full_name);
133
134         /* And now we run all the init ones */
135         for (gp = NULL; (gp = of_get_next_child(gparent, gp)) != NULL;)
136                 pmf_do_functions(gp, NULL, 0, PMF_FLAGS_ON_INIT, NULL);
137
138         /* Note: We do not at this point implement the "at sleep" or "at wake"
139          * functions. I yet to find any for GPIOs anyway
140          */
141 }
142
143 static int macio_do_write_reg32(PMF_STD_ARGS, u32 offset, u32 value, u32 mask)
144 {
145         struct macio_chip *macio = func->driver_data;
146         unsigned long flags;
147
148         spin_lock_irqsave(&feature_lock, flags);
149         MACIO_OUT32(offset, (MACIO_IN32(offset) & ~mask) | (value & mask));
150         spin_unlock_irqrestore(&feature_lock, flags);
151         return 0;
152 }
153
154 static int macio_do_read_reg32(PMF_STD_ARGS, u32 offset)
155 {
156         struct macio_chip *macio = func->driver_data;
157
158         /* Check if we have room for reply */
159         if (args == NULL || args->count == 0 || args->u[0].p == NULL)
160                 return -EINVAL;
161
162         *args->u[0].p = MACIO_IN32(offset);
163         return 0;
164 }
165
166 static int macio_do_write_reg8(PMF_STD_ARGS, u32 offset, u8 value, u8 mask)
167 {
168         struct macio_chip *macio = func->driver_data;
169         unsigned long flags;
170
171         spin_lock_irqsave(&feature_lock, flags);
172         MACIO_OUT8(offset, (MACIO_IN8(offset) & ~mask) | (value & mask));
173         spin_unlock_irqrestore(&feature_lock, flags);
174         return 0;
175 }
176
177 static int macio_do_read_reg8(PMF_STD_ARGS, u32 offset)
178 {
179         struct macio_chip *macio = func->driver_data;
180
181         /* Check if we have room for reply */
182         if (args == NULL || args->count == 0 || args->u[0].p == NULL)
183                 return -EINVAL;
184
185         *((u8 *)(args->u[0].p)) = MACIO_IN8(offset);
186         return 0;
187 }
188
189 static int macio_do_read_reg32_msrx(PMF_STD_ARGS, u32 offset, u32 mask,
190                                     u32 shift, u32 xor)
191 {
192         struct macio_chip *macio = func->driver_data;
193
194         /* Check if we have room for reply */
195         if (args == NULL || args->count == 0 || args->u[0].p == NULL)
196                 return -EINVAL;
197
198         *args->u[0].p = ((MACIO_IN32(offset) & mask) >> shift) ^ xor;
199         return 0;
200 }
201
202 static int macio_do_read_reg8_msrx(PMF_STD_ARGS, u32 offset, u32 mask,
203                                    u32 shift, u32 xor)
204 {
205         struct macio_chip *macio = func->driver_data;
206
207         /* Check if we have room for reply */
208         if (args == NULL || args->count == 0 || args->u[0].p == NULL)
209                 return -EINVAL;
210
211         *((u8 *)(args->u[0].p)) = ((MACIO_IN8(offset) & mask) >> shift) ^ xor;
212         return 0;
213 }
214
215 static int macio_do_write_reg32_slm(PMF_STD_ARGS, u32 offset, u32 shift,
216                                     u32 mask)
217 {
218         struct macio_chip *macio = func->driver_data;
219         unsigned long flags;
220         u32 tmp, val;
221
222         /* Check args */
223         if (args == NULL || args->count == 0)
224                 return -EINVAL;
225
226         spin_lock_irqsave(&feature_lock, flags);
227         tmp = MACIO_IN32(offset);
228         val = args->u[0].v << shift;
229         tmp = (tmp & ~mask) | (val & mask);
230         MACIO_OUT32(offset, tmp);
231         spin_unlock_irqrestore(&feature_lock, flags);
232         return 0;
233 }
234
235 static int macio_do_write_reg8_slm(PMF_STD_ARGS, u32 offset, u32 shift,
236                                    u32 mask)
237 {
238         struct macio_chip *macio = func->driver_data;
239         unsigned long flags;
240         u32 tmp, val;
241
242         /* Check args */
243         if (args == NULL || args->count == 0)
244                 return -EINVAL;
245
246         spin_lock_irqsave(&feature_lock, flags);
247         tmp = MACIO_IN8(offset);
248         val = args->u[0].v << shift;
249         tmp = (tmp & ~mask) | (val & mask);
250         MACIO_OUT8(offset, tmp);
251         spin_unlock_irqrestore(&feature_lock, flags);
252         return 0;
253 }
254
255 static struct pmf_handlers macio_mmio_handlers = {
256         .write_reg32            = macio_do_write_reg32,
257         .read_reg32             = macio_do_read_reg32,
258         .write_reg8             = macio_do_write_reg8,
259         .read_reg8              = macio_do_read_reg8,
260         .read_reg32_msrx        = macio_do_read_reg32_msrx,
261         .read_reg8_msrx         = macio_do_read_reg8_msrx,
262         .write_reg32_slm        = macio_do_write_reg32_slm,
263         .write_reg8_slm         = macio_do_write_reg8_slm,
264         .delay                  = macio_do_delay,
265 };
266
267 static void macio_mmio_init_one(struct macio_chip *macio)
268 {
269         DBG("Installing MMIO functions for macio %s\n",
270             macio->of_node->full_name);
271
272         pmf_register_driver(macio->of_node, &macio_mmio_handlers, macio);
273 }
274
275 static struct device_node *unin_hwclock;
276
277 static int unin_do_write_reg32(PMF_STD_ARGS, u32 offset, u32 value, u32 mask)
278 {
279         unsigned long flags;
280
281         spin_lock_irqsave(&feature_lock, flags);
282         /* This is fairly bogus in darwin, but it should work for our needs
283          * implemeted that way:
284          */
285         UN_OUT(offset, (UN_IN(offset) & ~mask) | (value & mask));
286         spin_unlock_irqrestore(&feature_lock, flags);
287         return 0;
288 }
289
290
291 static struct pmf_handlers unin_mmio_handlers = {
292         .write_reg32            = unin_do_write_reg32,
293         .delay                  = macio_do_delay,
294 };
295
296 static void uninorth_install_pfunc(void)
297 {
298         struct device_node *np;
299
300         DBG("Installing functions for UniN %s\n",
301             uninorth_node->full_name);
302
303         /*
304          * Install handlers for the bridge itself
305          */
306         pmf_register_driver(uninorth_node, &unin_mmio_handlers, NULL);
307         pmf_do_functions(uninorth_node, NULL, 0, PMF_FLAGS_ON_INIT, NULL);
308
309
310         /*
311          * Install handlers for the hwclock child if any
312          */
313         for (np = NULL; (np = of_get_next_child(uninorth_node, np)) != NULL;)
314                 if (strcmp(np->name, "hw-clock") == 0) {
315                         unin_hwclock = np;
316                         break;
317                 }
318         if (unin_hwclock) {
319                 DBG("Installing functions for UniN clock %s\n",
320                     unin_hwclock->full_name);
321                 pmf_register_driver(unin_hwclock, &unin_mmio_handlers, NULL);
322                 pmf_do_functions(unin_hwclock, NULL, 0, PMF_FLAGS_ON_INIT,
323                                  NULL);
324         }
325 }
326
327 /* We export this as the SMP code might init us early */
328 int __init pmac_pfunc_base_install(void)
329 {
330         static int pfbase_inited;
331         int i;
332
333         if (pfbase_inited)
334                 return 0;
335         pfbase_inited = 1;
336
337         if (!machine_is(powermac))
338                 return 0;
339
340         DBG("Installing base platform functions...\n");
341
342         /*
343          * Locate mac-io chips and install handlers
344          */
345         for (i = 0 ; i < MAX_MACIO_CHIPS; i++) {
346                 if (macio_chips[i].of_node) {
347                         macio_mmio_init_one(&macio_chips[i]);
348                         macio_gpio_init_one(&macio_chips[i]);
349                 }
350         }
351
352         /*
353          * Install handlers for northbridge and direct mapped hwclock
354          * if any. We do not implement the config space access callback
355          * which is only ever used for functions that we do not call in
356          * the current driver (enabling/disabling cells in U2, mostly used
357          * to restore the PCI settings, we do that differently)
358          */
359         if (uninorth_node && uninorth_base)
360                 uninorth_install_pfunc();
361
362         DBG("All base functions installed\n");
363
364         return 0;
365 }
366
367 arch_initcall(pmac_pfunc_base_install);
368
369 #ifdef CONFIG_PM
370
371 /* Those can be called by pmac_feature. Ultimately, I should use a sysdev
372  * or a device, but for now, that's good enough until I sort out some
373  * ordering issues. Also, we do not bother with GPIOs, as so far I yet have
374  * to see a case where a GPIO function has the on-suspend or on-resume bit
375  */
376 void pmac_pfunc_base_suspend(void)
377 {
378         int i;
379
380         for (i = 0 ; i < MAX_MACIO_CHIPS; i++) {
381                 if (macio_chips[i].of_node)
382                         pmf_do_functions(macio_chips[i].of_node, NULL, 0,
383                                          PMF_FLAGS_ON_SLEEP, NULL);
384         }
385         if (uninorth_node)
386                 pmf_do_functions(uninorth_node, NULL, 0,
387                                  PMF_FLAGS_ON_SLEEP, NULL);
388         if (unin_hwclock)
389                 pmf_do_functions(unin_hwclock, NULL, 0,
390                                  PMF_FLAGS_ON_SLEEP, NULL);
391 }
392
393 void pmac_pfunc_base_resume(void)
394 {
395         int i;
396
397         if (unin_hwclock)
398                 pmf_do_functions(unin_hwclock, NULL, 0,
399                                  PMF_FLAGS_ON_WAKE, NULL);
400         if (uninorth_node)
401                 pmf_do_functions(uninorth_node, NULL, 0,
402                                  PMF_FLAGS_ON_WAKE, NULL);
403         for (i = 0 ; i < MAX_MACIO_CHIPS; i++) {
404                 if (macio_chips[i].of_node)
405                         pmf_do_functions(macio_chips[i].of_node, NULL, 0,
406                                          PMF_FLAGS_ON_WAKE, NULL);
407         }
408 }
409
410 #endif /* CONFIG_PM */