Merge branch 'master' of git://git.kernel.org/pub/scm/linux/kernel/git/torvalds/linux-2.6
[linux-2.6] / drivers / macintosh / mediabay.c
1 /*
2  * Driver for the media bay on the PowerBook 3400 and 2400.
3  *
4  * Copyright (C) 1998 Paul Mackerras.
5  *
6  * Various evolutions by Benjamin Herrenschmidt & Henry Worth
7  *
8  *  This program is free software; you can redistribute it and/or
9  *  modify it under the terms of the GNU General Public License
10  *  as published by the Free Software Foundation; either version
11  *  2 of the License, or (at your option) any later version.
12  */
13 #include <linux/types.h>
14 #include <linux/errno.h>
15 #include <linux/kernel.h>
16 #include <linux/delay.h>
17 #include <linux/sched.h>
18 #include <linux/timer.h>
19 #include <linux/hdreg.h>
20 #include <linux/stddef.h>
21 #include <linux/init.h>
22 #include <linux/ide.h>
23 #include <linux/kthread.h>
24 #include <asm/prom.h>
25 #include <asm/pgtable.h>
26 #include <asm/io.h>
27 #include <asm/machdep.h>
28 #include <asm/pmac_feature.h>
29 #include <asm/mediabay.h>
30 #include <asm/sections.h>
31 #include <asm/ohare.h>
32 #include <asm/heathrow.h>
33 #include <asm/keylargo.h>
34 #include <linux/adb.h>
35 #include <linux/pmu.h>
36
37
38 #define MB_DEBUG
39
40 #ifdef MB_DEBUG
41 #define MBDBG(fmt, arg...)      printk(KERN_INFO fmt , ## arg)
42 #else
43 #define MBDBG(fmt, arg...)      do { } while (0)
44 #endif
45
46 #define MB_FCR32(bay, r)        ((bay)->base + ((r) >> 2))
47 #define MB_FCR8(bay, r)         (((volatile u8 __iomem *)((bay)->base)) + (r))
48
49 #define MB_IN32(bay,r)          (in_le32(MB_FCR32(bay,r)))
50 #define MB_OUT32(bay,r,v)       (out_le32(MB_FCR32(bay,r), (v)))
51 #define MB_BIS(bay,r,v)         (MB_OUT32((bay), (r), MB_IN32((bay), r) | (v)))
52 #define MB_BIC(bay,r,v)         (MB_OUT32((bay), (r), MB_IN32((bay), r) & ~(v)))
53 #define MB_IN8(bay,r)           (in_8(MB_FCR8(bay,r)))
54 #define MB_OUT8(bay,r,v)        (out_8(MB_FCR8(bay,r), (v)))
55
56 struct media_bay_info;
57
58 struct mb_ops {
59         char*   name;
60         void    (*init)(struct media_bay_info *bay);
61         u8      (*content)(struct media_bay_info *bay);
62         void    (*power)(struct media_bay_info *bay, int on_off);
63         int     (*setup_bus)(struct media_bay_info *bay, u8 device_id);
64         void    (*un_reset)(struct media_bay_info *bay);
65         void    (*un_reset_ide)(struct media_bay_info *bay);
66 };
67
68 struct media_bay_info {
69         u32 __iomem                     *base;
70         int                             content_id;
71         int                             state;
72         int                             last_value;
73         int                             value_count;
74         int                             timer;
75         struct macio_dev                *mdev;
76         struct mb_ops*                  ops;
77         int                             index;
78         int                             cached_gpio;
79         int                             sleeping;
80         struct semaphore                lock;
81 #ifdef CONFIG_BLK_DEV_IDE_PMAC
82         void __iomem                    *cd_base;
83         int                             cd_irq;
84         int                             cd_retry;
85 #endif
86 #if defined(CONFIG_BLK_DEV_IDE_PMAC) || defined(CONFIG_MAC_FLOPPY)
87         int                             cd_index;
88 #endif
89 };
90
91 #define MAX_BAYS        2
92
93 static struct media_bay_info media_bays[MAX_BAYS];
94 int media_bay_count = 0;
95
96 #ifdef CONFIG_BLK_DEV_IDE_PMAC
97 /* check the busy bit in the media-bay ide interface
98    (assumes the media-bay contains an ide device) */
99 #define MB_IDE_READY(i) ((readb(media_bays[i].cd_base + 0x70) & 0x80) == 0)
100 #endif
101
102 /*
103  * Wait that number of ms between each step in normal polling mode
104  */
105 #define MB_POLL_DELAY   25
106
107 /*
108  * Consider the media-bay ID value stable if it is the same for
109  * this number of milliseconds
110  */
111 #define MB_STABLE_DELAY 100
112
113 /* Wait after powering up the media bay this delay in ms
114  * timeout bumped for some powerbooks
115  */
116 #define MB_POWER_DELAY  200
117
118 /*
119  * Hold the media-bay reset signal true for this many ticks
120  * after a device is inserted before releasing it.
121  */
122 #define MB_RESET_DELAY  50
123
124 /*
125  * Wait this long after the reset signal is released and before doing
126  * further operations. After this delay, the IDE reset signal is released
127  * too for an IDE device
128  */
129 #define MB_SETUP_DELAY  100
130
131 /*
132  * Wait this many ticks after an IDE device (e.g. CD-ROM) is inserted
133  * (or until the device is ready) before waiting for busy bit to disappear
134  */
135 #define MB_IDE_WAIT     1000
136
137 /*
138  * Timeout waiting for busy bit of an IDE device to go down
139  */
140 #define MB_IDE_TIMEOUT  5000
141
142 /*
143  * Max retries of the full power up/down sequence for an IDE device
144  */
145 #define MAX_CD_RETRIES  3
146
147 /*
148  * States of a media bay
149  */
150 enum {
151         mb_empty = 0,           /* Idle */
152         mb_powering_up,         /* power bit set, waiting MB_POWER_DELAY */
153         mb_enabling_bay,        /* enable bits set, waiting MB_RESET_DELAY */
154         mb_resetting,           /* reset bit unset, waiting MB_SETUP_DELAY */
155         mb_ide_resetting,       /* IDE reset bit unser, waiting MB_IDE_WAIT */
156         mb_ide_waiting,         /* Waiting for BUSY bit to go away until MB_IDE_TIMEOUT */
157         mb_up,                  /* Media bay full */
158         mb_powering_down        /* Powering down (avoid too fast down/up) */
159 };
160
161 #define MB_POWER_SOUND          0x08
162 #define MB_POWER_FLOPPY         0x04
163 #define MB_POWER_ATA            0x02
164 #define MB_POWER_PCI            0x01
165 #define MB_POWER_OFF            0x00
166
167 /*
168  * Functions for polling content of media bay
169  */
170  
171 static u8
172 ohare_mb_content(struct media_bay_info *bay)
173 {
174         return (MB_IN32(bay, OHARE_MBCR) >> 12) & 7;
175 }
176
177 static u8
178 heathrow_mb_content(struct media_bay_info *bay)
179 {
180         return (MB_IN32(bay, HEATHROW_MBCR) >> 12) & 7;
181 }
182
183 static u8
184 keylargo_mb_content(struct media_bay_info *bay)
185 {
186         int new_gpio;
187
188         new_gpio = MB_IN8(bay, KL_GPIO_MEDIABAY_IRQ) & KEYLARGO_GPIO_INPUT_DATA;
189         if (new_gpio) {
190                 bay->cached_gpio = new_gpio;
191                 return MB_NO;
192         } else if (bay->cached_gpio != new_gpio) {
193                 MB_BIS(bay, KEYLARGO_MBCR, KL_MBCR_MB0_ENABLE);
194                 (void)MB_IN32(bay, KEYLARGO_MBCR);
195                 udelay(5);
196                 MB_BIC(bay, KEYLARGO_MBCR, 0x0000000F);
197                 (void)MB_IN32(bay, KEYLARGO_MBCR);
198                 udelay(5);
199                 bay->cached_gpio = new_gpio;
200         }
201         return (MB_IN32(bay, KEYLARGO_MBCR) >> 4) & 7;
202 }
203
204 /*
205  * Functions for powering up/down the bay, puts the bay device
206  * into reset state as well
207  */
208
209 static void
210 ohare_mb_power(struct media_bay_info* bay, int on_off)
211 {
212         if (on_off) {
213                 /* Power up device, assert it's reset line */
214                 MB_BIC(bay, OHARE_FCR, OH_BAY_RESET_N);
215                 MB_BIC(bay, OHARE_FCR, OH_BAY_POWER_N);
216         } else {
217                 /* Disable all devices */
218                 MB_BIC(bay, OHARE_FCR, OH_BAY_DEV_MASK);
219                 MB_BIC(bay, OHARE_FCR, OH_FLOPPY_ENABLE);
220                 /* Cut power from bay, release reset line */
221                 MB_BIS(bay, OHARE_FCR, OH_BAY_POWER_N);
222                 MB_BIS(bay, OHARE_FCR, OH_BAY_RESET_N);
223                 MB_BIS(bay, OHARE_FCR, OH_IDE1_RESET_N);
224         }
225         MB_BIC(bay, OHARE_MBCR, 0x00000F00);
226 }
227
228 static void
229 heathrow_mb_power(struct media_bay_info* bay, int on_off)
230 {
231         if (on_off) {
232                 /* Power up device, assert it's reset line */
233                 MB_BIC(bay, HEATHROW_FCR, HRW_BAY_RESET_N);
234                 MB_BIC(bay, HEATHROW_FCR, HRW_BAY_POWER_N);
235         } else {
236                 /* Disable all devices */
237                 MB_BIC(bay, HEATHROW_FCR, HRW_BAY_DEV_MASK);
238                 MB_BIC(bay, HEATHROW_FCR, HRW_SWIM_ENABLE);
239                 /* Cut power from bay, release reset line */
240                 MB_BIS(bay, HEATHROW_FCR, HRW_BAY_POWER_N);
241                 MB_BIS(bay, HEATHROW_FCR, HRW_BAY_RESET_N);
242                 MB_BIS(bay, HEATHROW_FCR, HRW_IDE1_RESET_N);
243         }
244         MB_BIC(bay, HEATHROW_MBCR, 0x00000F00);
245 }
246
247 static void
248 keylargo_mb_power(struct media_bay_info* bay, int on_off)
249 {
250         if (on_off) {
251                 /* Power up device, assert it's reset line */
252                 MB_BIC(bay, KEYLARGO_MBCR, KL_MBCR_MB0_DEV_RESET);
253                 MB_BIC(bay, KEYLARGO_MBCR, KL_MBCR_MB0_DEV_POWER);
254         } else {
255                 /* Disable all devices */
256                 MB_BIC(bay, KEYLARGO_MBCR, KL_MBCR_MB0_DEV_MASK);
257                 MB_BIC(bay, KEYLARGO_FCR1, KL1_EIDE0_ENABLE);
258                 /* Cut power from bay, release reset line */
259                 MB_BIS(bay, KEYLARGO_MBCR, KL_MBCR_MB0_DEV_POWER);
260                 MB_BIS(bay, KEYLARGO_MBCR, KL_MBCR_MB0_DEV_RESET);
261                 MB_BIS(bay, KEYLARGO_FCR1, KL1_EIDE0_RESET_N);
262         }
263         MB_BIC(bay, KEYLARGO_MBCR, 0x0000000F);
264 }
265
266 /*
267  * Functions for configuring the media bay for a given type of device,
268  * enable the related busses
269  */
270
271 static int
272 ohare_mb_setup_bus(struct media_bay_info* bay, u8 device_id)
273 {
274         switch(device_id) {
275                 case MB_FD:
276                 case MB_FD1:
277                         MB_BIS(bay, OHARE_FCR, OH_BAY_FLOPPY_ENABLE);
278                         MB_BIS(bay, OHARE_FCR, OH_FLOPPY_ENABLE);
279                         return 0;
280                 case MB_CD:
281                         MB_BIC(bay, OHARE_FCR, OH_IDE1_RESET_N);
282                         MB_BIS(bay, OHARE_FCR, OH_BAY_IDE_ENABLE);
283                         return 0;
284                 case MB_PCI:
285                         MB_BIS(bay, OHARE_FCR, OH_BAY_PCI_ENABLE);
286                         return 0;
287         }
288         return -ENODEV;
289 }
290
291 static int
292 heathrow_mb_setup_bus(struct media_bay_info* bay, u8 device_id)
293 {
294         switch(device_id) {
295                 case MB_FD:
296                 case MB_FD1:
297                         MB_BIS(bay, HEATHROW_FCR, HRW_BAY_FLOPPY_ENABLE);
298                         MB_BIS(bay, HEATHROW_FCR, HRW_SWIM_ENABLE);
299                         return 0;
300                 case MB_CD:
301                         MB_BIC(bay, HEATHROW_FCR, HRW_IDE1_RESET_N);
302                         MB_BIS(bay, HEATHROW_FCR, HRW_BAY_IDE_ENABLE);
303                         return 0;
304                 case MB_PCI:
305                         MB_BIS(bay, HEATHROW_FCR, HRW_BAY_PCI_ENABLE);
306                         return 0;
307         }
308         return -ENODEV;
309 }
310
311 static int
312 keylargo_mb_setup_bus(struct media_bay_info* bay, u8 device_id)
313 {
314         switch(device_id) {
315                 case MB_CD:
316                         MB_BIS(bay, KEYLARGO_MBCR, KL_MBCR_MB0_IDE_ENABLE);
317                         MB_BIC(bay, KEYLARGO_FCR1, KL1_EIDE0_RESET_N);
318                         MB_BIS(bay, KEYLARGO_FCR1, KL1_EIDE0_ENABLE);
319                         return 0;
320                 case MB_PCI:
321                         MB_BIS(bay, KEYLARGO_MBCR, KL_MBCR_MB0_PCI_ENABLE);
322                         return 0;
323                 case MB_SOUND:
324                         MB_BIS(bay, KEYLARGO_MBCR, KL_MBCR_MB0_SOUND_ENABLE);
325                         return 0;
326         }
327         return -ENODEV;
328 }
329
330 /*
331  * Functions for tweaking resets
332  */
333
334 static void
335 ohare_mb_un_reset(struct media_bay_info* bay)
336 {
337         MB_BIS(bay, OHARE_FCR, OH_BAY_RESET_N);
338 }
339
340 static void keylargo_mb_init(struct media_bay_info *bay)
341 {
342         MB_BIS(bay, KEYLARGO_MBCR, KL_MBCR_MB0_ENABLE);
343 }
344
345 static void heathrow_mb_un_reset(struct media_bay_info* bay)
346 {
347         MB_BIS(bay, HEATHROW_FCR, HRW_BAY_RESET_N);
348 }
349
350 static void keylargo_mb_un_reset(struct media_bay_info* bay)
351 {
352         MB_BIS(bay, KEYLARGO_MBCR, KL_MBCR_MB0_DEV_RESET);
353 }
354
355 static void ohare_mb_un_reset_ide(struct media_bay_info* bay)
356 {
357         MB_BIS(bay, OHARE_FCR, OH_IDE1_RESET_N);
358 }
359
360 static void heathrow_mb_un_reset_ide(struct media_bay_info* bay)
361 {
362         MB_BIS(bay, HEATHROW_FCR, HRW_IDE1_RESET_N);
363 }
364
365 static void keylargo_mb_un_reset_ide(struct media_bay_info* bay)
366 {
367         MB_BIS(bay, KEYLARGO_FCR1, KL1_EIDE0_RESET_N);
368 }
369
370 static inline void set_mb_power(struct media_bay_info* bay, int onoff)
371 {
372         /* Power up up and assert the bay reset line */
373         if (onoff) {
374                 bay->ops->power(bay, 1);
375                 bay->state = mb_powering_up;
376                 MBDBG("mediabay%d: powering up\n", bay->index);
377         } else { 
378                 /* Make sure everything is powered down & disabled */
379                 bay->ops->power(bay, 0);
380                 bay->state = mb_powering_down;
381                 MBDBG("mediabay%d: powering down\n", bay->index);
382         }
383         bay->timer = msecs_to_jiffies(MB_POWER_DELAY);
384 }
385
386 static void poll_media_bay(struct media_bay_info* bay)
387 {
388         int id = bay->ops->content(bay);
389
390         if (id == bay->last_value) {
391                 if (id != bay->content_id) {
392                         bay->value_count += msecs_to_jiffies(MB_POLL_DELAY);
393                         if (bay->value_count >= msecs_to_jiffies(MB_STABLE_DELAY)) {
394                                 /* If the device type changes without going thru
395                                  * "MB_NO", we force a pass by "MB_NO" to make sure
396                                  * things are properly reset
397                                  */
398                                 if ((id != MB_NO) && (bay->content_id != MB_NO)) {
399                                         id = MB_NO;
400                                         MBDBG("mediabay%d: forcing MB_NO\n", bay->index);
401                                 }
402                                 MBDBG("mediabay%d: switching to %d\n", bay->index, id);
403                                 set_mb_power(bay, id != MB_NO);
404                                 bay->content_id = id;
405                                 if (id == MB_NO) {
406 #ifdef CONFIG_BLK_DEV_IDE_PMAC
407                                         bay->cd_retry = 0;
408 #endif
409                                         printk(KERN_INFO "media bay %d is empty\n", bay->index);
410                                 }
411                         }
412                 }
413         } else {
414                 bay->last_value = id;
415                 bay->value_count = 0;
416         }
417 }
418
419 int check_media_bay(struct device_node *which_bay, int what)
420 {
421         int     i;
422
423         for (i=0; i<media_bay_count; i++)
424                 if (media_bays[i].mdev && which_bay == media_bays[i].mdev->ofdev.node) {
425                         if ((what == media_bays[i].content_id) && media_bays[i].state == mb_up)
426                                 return 0;
427                         media_bays[i].cd_index = -1;
428                         return -EINVAL;
429                 }
430         return -ENODEV;
431 }
432 EXPORT_SYMBOL(check_media_bay);
433
434 #ifdef CONFIG_BLK_DEV_IDE_PMAC
435 int check_media_bay_by_base(unsigned long base, int what)
436 {
437         int     i;
438
439         for (i=0; i<media_bay_count; i++)
440                 if (media_bays[i].mdev && base == (unsigned long) media_bays[i].cd_base) {
441                         if ((what == media_bays[i].content_id) && media_bays[i].state == mb_up)
442                                 return 0;
443                         media_bays[i].cd_index = -1;
444                         return -EINVAL;
445                 } 
446
447         return -ENODEV;
448 }
449
450 int media_bay_set_ide_infos(struct device_node* which_bay, unsigned long base,
451                             int irq, int index)
452 {
453         int     i;
454
455         for (i=0; i<media_bay_count; i++) {
456                 struct media_bay_info* bay = &media_bays[i];
457
458                 if (bay->mdev && which_bay == bay->mdev->ofdev.node) {
459                         int timeout = 5000;
460                         
461                         down(&bay->lock);
462
463                         bay->cd_base    = (void __iomem *) base;
464                         bay->cd_irq     = irq;
465
466                         if ((MB_CD != bay->content_id) || bay->state != mb_up) {
467                                 up(&bay->lock);
468                                 return 0;
469                         }
470                         printk(KERN_DEBUG "Registered ide%d for media bay %d\n", index, i);
471                         do {
472                                 if (MB_IDE_READY(i)) {
473                                         bay->cd_index   = index;
474                                         up(&bay->lock);
475                                         return 0;
476                                 }
477                                 mdelay(1);
478                         } while(--timeout);
479                         printk(KERN_DEBUG "Timeount waiting IDE in bay %d\n", i);
480                         up(&bay->lock);
481                         return -ENODEV;
482                 }
483         }
484
485         return -ENODEV;
486 }
487 #endif /* CONFIG_BLK_DEV_IDE_PMAC */
488
489 static void media_bay_step(int i)
490 {
491         struct media_bay_info* bay = &media_bays[i];
492
493         /* We don't poll when powering down */
494         if (bay->state != mb_powering_down)
495             poll_media_bay(bay);
496
497         /* If timer expired or polling IDE busy, run state machine */
498         if ((bay->state != mb_ide_waiting) && (bay->timer != 0)) {
499                 bay->timer -= msecs_to_jiffies(MB_POLL_DELAY);
500                 if (bay->timer > 0)
501                         return;
502                 bay->timer = 0;
503         }
504
505         switch(bay->state) {
506         case mb_powering_up:
507                 if (bay->ops->setup_bus(bay, bay->last_value) < 0) {
508                         MBDBG("mediabay%d: device not supported (kind:%d)\n", i, bay->content_id);
509                         set_mb_power(bay, 0);
510                         break;
511                 }
512                 bay->timer = msecs_to_jiffies(MB_RESET_DELAY);
513                 bay->state = mb_enabling_bay;
514                 MBDBG("mediabay%d: enabling (kind:%d)\n", i, bay->content_id);
515                 break;
516         case mb_enabling_bay:
517                 bay->ops->un_reset(bay);
518                 bay->timer = msecs_to_jiffies(MB_SETUP_DELAY);
519                 bay->state = mb_resetting;
520                 MBDBG("mediabay%d: waiting reset (kind:%d)\n", i, bay->content_id);
521                 break;
522         case mb_resetting:
523                 if (bay->content_id != MB_CD) {
524                         MBDBG("mediabay%d: bay is up (kind:%d)\n", i, bay->content_id);
525                         bay->state = mb_up;
526                         break;
527                 }
528 #ifdef CONFIG_BLK_DEV_IDE_PMAC
529                 MBDBG("mediabay%d: waiting IDE reset (kind:%d)\n", i, bay->content_id);
530                 bay->ops->un_reset_ide(bay);
531                 bay->timer = msecs_to_jiffies(MB_IDE_WAIT);
532                 bay->state = mb_ide_resetting;
533 #else
534                 printk(KERN_DEBUG "media-bay %d is ide (not compiled in kernel)\n", i);
535                 set_mb_power(bay, 0);
536 #endif /* CONFIG_BLK_DEV_IDE_PMAC */
537                 break;
538 #ifdef CONFIG_BLK_DEV_IDE_PMAC
539         case mb_ide_resetting:
540                 bay->timer = msecs_to_jiffies(MB_IDE_TIMEOUT);
541                 bay->state = mb_ide_waiting;
542                 MBDBG("mediabay%d: waiting IDE ready (kind:%d)\n", i, bay->content_id);
543                 break;
544         case mb_ide_waiting:
545                 if (bay->cd_base == NULL) {
546                         bay->timer = 0;
547                         bay->state = mb_up;
548                         MBDBG("mediabay%d: up before IDE init\n", i);
549                         break;
550                 } else if (MB_IDE_READY(i)) {
551                         bay->timer = 0;
552                         bay->state = mb_up;
553                         if (bay->cd_index < 0) {
554                                 hw_regs_t hw;
555
556                                 printk("mediabay %d, registering IDE...\n", i);
557                                 pmu_suspend();
558                                 ide_init_hwif_ports(&hw, (unsigned long) bay->cd_base, (unsigned long) 0, NULL);
559                                 hw.irq = bay->cd_irq;
560                                 hw.chipset = ide_pmac;
561                                 bay->cd_index =
562                                         ide_register_hw(&hw, NULL, NULL);
563                                 pmu_resume();
564                         }
565                         if (bay->cd_index == -1) {
566                                 /* We eventually do a retry */
567                                 bay->cd_retry++;
568                                 printk("IDE register error\n");
569                                 set_mb_power(bay, 0);
570                         } else {
571                                 printk(KERN_DEBUG "media-bay %d is ide%d\n", i, bay->cd_index);
572                                 MBDBG("mediabay %d IDE ready\n", i);
573                         }
574                         break;
575                 } else if (bay->timer > 0)
576                         bay->timer -= msecs_to_jiffies(MB_POLL_DELAY);
577                 if (bay->timer <= 0) {
578                         printk("\nIDE Timeout in bay %d !, IDE state is: 0x%02x\n",
579                                i, readb(bay->cd_base + 0x70));
580                         MBDBG("mediabay%d: nIDE Timeout !\n", i);
581                         set_mb_power(bay, 0);
582                         bay->timer = 0;
583                 }
584                 break;
585 #endif /* CONFIG_BLK_DEV_IDE_PMAC */
586         case mb_powering_down:
587                 bay->state = mb_empty;
588 #ifdef CONFIG_BLK_DEV_IDE_PMAC
589                 if (bay->cd_index >= 0) {
590                         printk(KERN_DEBUG "Unregistering mb %d ide, index:%d\n", i,
591                                bay->cd_index);
592                         ide_unregister(bay->cd_index, 1, 1);
593                         bay->cd_index = -1;
594                 }
595                 if (bay->cd_retry) {
596                         if (bay->cd_retry > MAX_CD_RETRIES) {
597                                 /* Should add an error sound (sort of beep in dmasound) */
598                                 printk("\nmedia-bay %d, IDE device badly inserted or unrecognised\n", i);
599                         } else {
600                                 /* Force a new power down/up sequence */
601                                 bay->content_id = MB_NO;
602                         }
603                 }
604 #endif /* CONFIG_BLK_DEV_IDE_PMAC */
605                 MBDBG("mediabay%d: end of power down\n", i);
606                 break;
607         }
608 }
609
610 /*
611  * This procedure runs as a kernel thread to poll the media bay
612  * once each tick and register and unregister the IDE interface
613  * with the IDE driver.  It needs to be a thread because
614  * ide_register can't be called from interrupt context.
615  */
616 static int media_bay_task(void *x)
617 {
618         int     i;
619
620         while (!kthread_should_stop()) {
621                 for (i = 0; i < media_bay_count; ++i) {
622                         down(&media_bays[i].lock);
623                         if (!media_bays[i].sleeping)
624                                 media_bay_step(i);
625                         up(&media_bays[i].lock);
626                 }
627
628                 msleep_interruptible(MB_POLL_DELAY);
629         }
630         return 0;
631 }
632
633 static int __devinit media_bay_attach(struct macio_dev *mdev, const struct of_device_id *match)
634 {
635         struct media_bay_info* bay;
636         u32 __iomem *regbase;
637         struct device_node *ofnode;
638         unsigned long base;
639         int i;
640
641         ofnode = mdev->ofdev.node;
642
643         if (macio_resource_count(mdev) < 1)
644                 return -ENODEV;
645         if (macio_request_resources(mdev, "media-bay"))
646                 return -EBUSY;
647         /* Media bay registers are located at the beginning of the
648          * mac-io chip, for now, we trick and align down the first
649          * resource passed in
650          */
651         base = macio_resource_start(mdev, 0) & 0xffff0000u;
652         regbase = (u32 __iomem *)ioremap(base, 0x100);
653         if (regbase == NULL) {
654                 macio_release_resources(mdev);
655                 return -ENOMEM;
656         }
657         
658         i = media_bay_count++;
659         bay = &media_bays[i];
660         bay->mdev = mdev;
661         bay->base = regbase;
662         bay->index = i;
663         bay->ops = match->data;
664         bay->sleeping = 0;
665         init_MUTEX(&bay->lock);
666
667         /* Init HW probing */
668         if (bay->ops->init)
669                 bay->ops->init(bay);
670
671         printk(KERN_INFO "mediabay%d: Registered %s media-bay\n", i, bay->ops->name);
672
673         /* Force an immediate detect */
674         set_mb_power(bay, 0);
675         msleep(MB_POWER_DELAY);
676         bay->content_id = MB_NO;
677         bay->last_value = bay->ops->content(bay);
678         bay->value_count = msecs_to_jiffies(MB_STABLE_DELAY);
679         bay->state = mb_empty;
680         do {
681                 msleep(MB_POLL_DELAY);
682                 media_bay_step(i);
683         } while((bay->state != mb_empty) &&
684                 (bay->state != mb_up));
685
686         /* Mark us ready by filling our mdev data */
687         macio_set_drvdata(mdev, bay);
688
689         /* Startup kernel thread */
690         if (i == 0)
691                 kthread_run(media_bay_task, NULL, "media-bay");
692
693         return 0;
694
695 }
696
697 static int media_bay_suspend(struct macio_dev *mdev, pm_message_t state)
698 {
699         struct media_bay_info   *bay = macio_get_drvdata(mdev);
700
701         if (state.event != mdev->ofdev.dev.power.power_state.event && state.event == PM_EVENT_SUSPEND) {
702                 down(&bay->lock);
703                 bay->sleeping = 1;
704                 set_mb_power(bay, 0);
705                 up(&bay->lock);
706                 msleep(MB_POLL_DELAY);
707                 mdev->ofdev.dev.power.power_state = state;
708         }
709         return 0;
710 }
711
712 static int media_bay_resume(struct macio_dev *mdev)
713 {
714         struct media_bay_info   *bay = macio_get_drvdata(mdev);
715
716         if (mdev->ofdev.dev.power.power_state.event != PM_EVENT_ON) {
717                 mdev->ofdev.dev.power.power_state = PMSG_ON;
718
719                 /* We re-enable the bay using it's previous content
720                    only if it did not change. Note those bozo timings,
721                    they seem to help the 3400 get it right.
722                  */
723                 /* Force MB power to 0 */
724                 down(&bay->lock);
725                 set_mb_power(bay, 0);
726                 msleep(MB_POWER_DELAY);
727                 if (bay->ops->content(bay) != bay->content_id) {
728                         printk("mediabay%d: content changed during sleep...\n", bay->index);
729                         up(&bay->lock);
730                         return 0;
731                 }
732                 set_mb_power(bay, 1);
733                 bay->last_value = bay->content_id;
734                 bay->value_count = msecs_to_jiffies(MB_STABLE_DELAY);
735                 bay->timer = msecs_to_jiffies(MB_POWER_DELAY);
736 #ifdef CONFIG_BLK_DEV_IDE_PMAC
737                 bay->cd_retry = 0;
738 #endif
739                 do {
740                         msleep(MB_POLL_DELAY);
741                         media_bay_step(bay->index);
742                 } while((bay->state != mb_empty) &&
743                         (bay->state != mb_up));
744                 bay->sleeping = 0;
745                 up(&bay->lock);
746         }
747         return 0;
748 }
749
750
751 /* Definitions of "ops" structures.
752  */
753 static struct mb_ops ohare_mb_ops = {
754         .name           = "Ohare",
755         .content        = ohare_mb_content,
756         .power          = ohare_mb_power,
757         .setup_bus      = ohare_mb_setup_bus,
758         .un_reset       = ohare_mb_un_reset,
759         .un_reset_ide   = ohare_mb_un_reset_ide,
760 };
761
762 static struct mb_ops heathrow_mb_ops = {
763         .name           = "Heathrow",
764         .content        = heathrow_mb_content,
765         .power          = heathrow_mb_power,
766         .setup_bus      = heathrow_mb_setup_bus,
767         .un_reset       = heathrow_mb_un_reset,
768         .un_reset_ide   = heathrow_mb_un_reset_ide,
769 };
770
771 static struct mb_ops keylargo_mb_ops = {
772         .name           = "KeyLargo",
773         .init           = keylargo_mb_init,
774         .content        = keylargo_mb_content,
775         .power          = keylargo_mb_power,
776         .setup_bus      = keylargo_mb_setup_bus,
777         .un_reset       = keylargo_mb_un_reset,
778         .un_reset_ide   = keylargo_mb_un_reset_ide,
779 };
780
781 /*
782  * It seems that the bit for the media-bay interrupt in the IRQ_LEVEL
783  * register is always set when there is something in the media bay.
784  * This causes problems for the interrupt code if we attach an interrupt
785  * handler to the media-bay interrupt, because it tends to go into
786  * an infinite loop calling the media bay interrupt handler.
787  * Therefore we do it all by polling the media bay once each tick.
788  */
789
790 static struct of_device_id media_bay_match[] =
791 {
792         {
793         .name           = "media-bay",
794         .compatible     = "keylargo-media-bay",
795         .data           = &keylargo_mb_ops,
796         },
797         {
798         .name           = "media-bay",
799         .compatible     = "heathrow-media-bay",
800         .data           = &heathrow_mb_ops,
801         },
802         {
803         .name           = "media-bay",
804         .compatible     = "ohare-media-bay",
805         .data           = &ohare_mb_ops,
806         },
807         {},
808 };
809
810 static struct macio_driver media_bay_driver =
811 {
812         .name           = "media-bay",
813         .match_table    = media_bay_match,
814         .probe          = media_bay_attach,
815         .suspend        = media_bay_suspend,
816         .resume         = media_bay_resume
817 };
818
819 static int __init media_bay_init(void)
820 {
821         int i;
822
823         for (i=0; i<MAX_BAYS; i++) {
824                 memset((char *)&media_bays[i], 0, sizeof(struct media_bay_info));
825                 media_bays[i].content_id        = -1;
826 #ifdef CONFIG_BLK_DEV_IDE_PMAC
827                 media_bays[i].cd_index          = -1;
828 #endif
829         }
830         if (!machine_is(powermac))
831                 return 0;
832
833         macio_register_driver(&media_bay_driver);       
834
835         return 0;
836 }
837
838 device_initcall(media_bay_init);