i2c: ds1682 warning fix
[linux-2.6] / drivers / ide / ppc / mpc8xx.c
1 /*
2  *  linux/drivers/ide/ppc/ide-m8xx.c
3  *
4  *  Copyright (C) 2000, 2001 Wolfgang Denk, wd@denx.de
5  *  Modified for direct IDE interface
6  *      by Thomas Lange, thomas@corelatus.com
7  *  Modified for direct IDE interface on 8xx without using the PCMCIA
8  *  controller
9  *      by Steven.Scholz@imc-berlin.de
10  *  Moved out of arch/ppc/kernel/m8xx_setup.c, other minor cleanups
11  *      by Mathew Locke <mattl@mvista.com>
12  */
13
14 #include <linux/errno.h>
15 #include <linux/kernel.h>
16 #include <linux/mm.h>
17 #include <linux/stddef.h>
18 #include <linux/unistd.h>
19 #include <linux/ptrace.h>
20 #include <linux/slab.h>
21 #include <linux/user.h>
22 #include <linux/a.out.h>
23 #include <linux/tty.h>
24 #include <linux/major.h>
25 #include <linux/interrupt.h>
26 #include <linux/reboot.h>
27 #include <linux/init.h>
28 #include <linux/ioport.h>
29 #include <linux/ide.h>
30 #include <linux/bootmem.h>
31
32 #include <asm/mpc8xx.h>
33 #include <asm/mmu.h>
34 #include <asm/processor.h>
35 #include <asm/residual.h>
36 #include <asm/io.h>
37 #include <asm/pgtable.h>
38 #include <asm/ide.h>
39 #include <asm/8xx_immap.h>
40 #include <asm/machdep.h>
41 #include <asm/irq.h>
42
43 static int identify  (volatile u8 *p);
44 static void print_fixed (volatile u8 *p);
45 static void print_funcid (int func);
46 static int check_ide_device (unsigned long base);
47
48 static void ide_interrupt_ack (void *dev);
49 static void m8xx_ide_tuneproc(ide_drive_t *drive, u8 pio);
50
51 typedef struct ide_ioport_desc {
52         unsigned long   base_off;               /* Offset to PCMCIA memory      */
53         unsigned long   reg_off[IDE_NR_PORTS];  /* controller register offsets  */
54         int             irq;                    /* IRQ                          */
55 } ide_ioport_desc_t;
56
57 ide_ioport_desc_t ioport_dsc[MAX_HWIFS] = {
58 #ifdef IDE0_BASE_OFFSET
59         { IDE0_BASE_OFFSET,
60             {
61                 IDE0_DATA_REG_OFFSET,
62                 IDE0_ERROR_REG_OFFSET,
63                 IDE0_NSECTOR_REG_OFFSET,
64                 IDE0_SECTOR_REG_OFFSET,
65                 IDE0_LCYL_REG_OFFSET,
66                 IDE0_HCYL_REG_OFFSET,
67                 IDE0_SELECT_REG_OFFSET,
68                 IDE0_STATUS_REG_OFFSET,
69                 IDE0_CONTROL_REG_OFFSET,
70                 IDE0_IRQ_REG_OFFSET,
71             },
72             IDE0_INTERRUPT,
73         },
74 #ifdef IDE1_BASE_OFFSET
75         { IDE1_BASE_OFFSET,
76             {
77                 IDE1_DATA_REG_OFFSET,
78                 IDE1_ERROR_REG_OFFSET,
79                 IDE1_NSECTOR_REG_OFFSET,
80                 IDE1_SECTOR_REG_OFFSET,
81                 IDE1_LCYL_REG_OFFSET,
82                 IDE1_HCYL_REG_OFFSET,
83                 IDE1_SELECT_REG_OFFSET,
84                 IDE1_STATUS_REG_OFFSET,
85                 IDE1_CONTROL_REG_OFFSET,
86                 IDE1_IRQ_REG_OFFSET,
87             },
88             IDE1_INTERRUPT,
89         },
90 #endif /* IDE1_BASE_OFFSET */
91 #endif  /* IDE0_BASE_OFFSET */
92 };
93
94 ide_pio_timings_t ide_pio_clocks[6];
95 int hold_time[6] =  {30, 20, 15, 10, 10, 10 };   /* PIO Mode 5 with IORDY (nonstandard) */
96
97 /*
98  * Warning: only 1 (ONE) PCMCIA slot supported here,
99  * which must be correctly initialized by the firmware (PPCBoot).
100  */
101 static int _slot_ = -1;                 /* will be read from PCMCIA registers   */
102
103 /* Make clock cycles and always round up */
104 #define PCMCIA_MK_CLKS( t, T ) (( (t) * ((T)/1000000) + 999U ) / 1000U )
105
106
107
108 /*
109  * IDE stuff.
110  */
111 static int
112 m8xx_ide_default_irq(unsigned long base)
113 {
114 #ifdef CONFIG_BLK_DEV_MPC8xx_IDE
115         if (base >= MAX_HWIFS)
116                 return 0;
117
118         printk("[%d] m8xx_ide_default_irq %d\n",__LINE__,ioport_dsc[base].irq);
119         
120         return (ioport_dsc[base].irq);
121 #else
122         return 9;
123 #endif
124 }
125
126 static unsigned long
127 m8xx_ide_default_io_base(int index)
128 {
129         return index;
130 }
131
132 #define M8XX_PCMCIA_CD2(slot)      (0x10000000 >> (slot << 4))
133 #define M8XX_PCMCIA_CD1(slot)      (0x08000000 >> (slot << 4))
134
135 /*
136  * The TQM850L hardware has two pins swapped! Grrrrgh!
137  */
138 #ifdef  CONFIG_TQM850L
139 #define __MY_PCMCIA_GCRX_CXRESET        PCMCIA_GCRX_CXOE
140 #define __MY_PCMCIA_GCRX_CXOE           PCMCIA_GCRX_CXRESET
141 #else
142 #define __MY_PCMCIA_GCRX_CXRESET        PCMCIA_GCRX_CXRESET
143 #define __MY_PCMCIA_GCRX_CXOE           PCMCIA_GCRX_CXOE
144 #endif
145
146 #if defined(CONFIG_BLK_DEV_MPC8xx_IDE) && defined(CONFIG_IDE_8xx_PCCARD)
147 #define PCMCIA_SCHLVL IDE0_INTERRUPT    /* Status Change Interrupt Level        */
148 static int pcmcia_schlvl = PCMCIA_SCHLVL;
149 #endif
150
151 /*
152  * See include/linux/ide.h for definition of hw_regs_t (p, base)
153  */
154
155 /*
156  * m8xx_ide_init_hwif_ports for a direct IDE interface _using_
157  */
158 #if defined(CONFIG_IDE_8xx_PCCARD) || defined(CONFIG_IDE_8xx_DIRECT)
159 static void
160 m8xx_ide_init_hwif_ports(hw_regs_t *hw, unsigned long data_port, 
161                 unsigned long ctrl_port, int *irq)
162 {
163         unsigned long *p = hw->io_ports;
164         int i;
165
166         typedef struct {
167                 ulong br;
168                 ulong or;
169         } pcmcia_win_t;
170         volatile pcmcia_win_t *win;
171         volatile pcmconf8xx_t *pcmp;
172
173         uint *pgcrx;
174         u32 pcmcia_phy_base;
175         u32 pcmcia_phy_end;
176         static unsigned long pcmcia_base = 0;
177         unsigned long base;
178
179         *p = 0;
180         if (irq)
181                 *irq = 0;
182
183         pcmp = (pcmconf8xx_t *)(&(((immap_t *)IMAP_ADDR)->im_pcmcia));
184
185         if (!pcmcia_base) {
186                 /*
187                  * Read out PCMCIA registers. Since the reset values
188                  * are undefined, we sure hope that they have been
189                  * set up by firmware
190                  */
191
192                 /* Scan all registers for valid settings */
193                 pcmcia_phy_base = 0xFFFFFFFF;
194                 pcmcia_phy_end = 0;
195                 /* br0 is start of brX and orX regs */
196                 win = (pcmcia_win_t *) \
197                         (&(((immap_t *)IMAP_ADDR)->im_pcmcia.pcmc_pbr0));
198                 for (i = 0; i < 8; i++) {
199                         if (win->or & 1) {      /* This bank is marked as valid */
200                                 if (win->br < pcmcia_phy_base) {
201                                         pcmcia_phy_base = win->br;
202                                 }
203                                 if ((win->br + PCMCIA_MEM_SIZE) > pcmcia_phy_end) {
204                                         pcmcia_phy_end  = win->br + PCMCIA_MEM_SIZE;
205                                 }
206                                 /* Check which slot that has been defined */
207                                 _slot_ = (win->or >> 2) & 1;
208
209                         }                                       /* Valid bank */
210                         win++;
211                 }                                               /* for */
212
213                 printk ("PCMCIA slot %c: phys mem %08x...%08x (size %08x)\n",
214                         'A' + _slot_,
215                         pcmcia_phy_base, pcmcia_phy_end,
216                         pcmcia_phy_end - pcmcia_phy_base);
217
218                 pcmcia_base=(unsigned long)ioremap(pcmcia_phy_base,
219                                                    pcmcia_phy_end-pcmcia_phy_base);
220
221 #ifdef DEBUG
222                 printk ("PCMCIA virt base: %08lx\n", pcmcia_base);
223 #endif
224                 /* Compute clock cycles for PIO timings */
225                 for (i=0; i<6; ++i) {
226                         bd_t    *binfo = (bd_t *)__res;
227
228                         hold_time[i]   =
229                                 PCMCIA_MK_CLKS (hold_time[i],
230                                                 binfo->bi_busfreq);
231                         ide_pio_clocks[i].setup_time  =
232                                 PCMCIA_MK_CLKS (ide_pio_timings[i].setup_time,
233                                                 binfo->bi_busfreq);
234                         ide_pio_clocks[i].active_time =
235                                 PCMCIA_MK_CLKS (ide_pio_timings[i].active_time,
236                                                 binfo->bi_busfreq);
237                         ide_pio_clocks[i].cycle_time  =
238                                 PCMCIA_MK_CLKS (ide_pio_timings[i].cycle_time,
239                                                 binfo->bi_busfreq);
240 #if 0
241                         printk ("PIO mode %d timings: %d/%d/%d => %d/%d/%d\n",
242                                 i,
243                                 ide_pio_clocks[i].setup_time,
244                                 ide_pio_clocks[i].active_time,
245                                 ide_pio_clocks[i].hold_time,
246                                 ide_pio_clocks[i].cycle_time,
247                                 ide_pio_timings[i].setup_time,
248                                 ide_pio_timings[i].active_time,
249                                 ide_pio_timings[i].hold_time,
250                                 ide_pio_timings[i].cycle_time);
251 #endif
252                 }
253         }
254
255         if (data_port >= MAX_HWIFS)
256                 return;
257
258         if (_slot_ == -1) {
259                 printk ("PCMCIA slot has not been defined! Using A as default\n");
260                 _slot_ = 0;
261         }
262
263 #ifdef CONFIG_IDE_8xx_PCCARD
264
265 #ifdef DEBUG
266         printk ("PIPR = 0x%08X  slot %c ==> mask = 0x%X\n",
267                 pcmp->pcmc_pipr,
268                 'A' + _slot_,
269                 M8XX_PCMCIA_CD1(_slot_) | M8XX_PCMCIA_CD2(_slot_) );
270 #endif /* DEBUG */
271
272         if (pcmp->pcmc_pipr & (M8XX_PCMCIA_CD1(_slot_)|M8XX_PCMCIA_CD2(_slot_))) {
273                 printk ("No card in slot %c: PIPR=%08x\n",
274                         'A' + _slot_, (u32) pcmp->pcmc_pipr);
275                 return;         /* No card in slot */
276         }
277
278         check_ide_device (pcmcia_base);
279
280 #endif  /* CONFIG_IDE_8xx_PCCARD */
281
282         base = pcmcia_base + ioport_dsc[data_port].base_off;
283 #ifdef DEBUG
284         printk ("base: %08x + %08x = %08x\n",
285                         pcmcia_base, ioport_dsc[data_port].base_off, base);
286 #endif
287
288         for (i = 0; i < IDE_NR_PORTS; ++i) {
289 #ifdef DEBUG
290                 printk ("port[%d]: %08x + %08x = %08x\n",
291                         i,
292                         base,
293                         ioport_dsc[data_port].reg_off[i],
294                         i, base + ioport_dsc[data_port].reg_off[i]);
295 #endif
296                 *p++ = base + ioport_dsc[data_port].reg_off[i];
297         }
298
299         if (irq) {
300 #ifdef CONFIG_IDE_8xx_PCCARD
301                 unsigned int reg;
302
303                 *irq = ioport_dsc[data_port].irq;
304                 if (_slot_)
305                         pgcrx = &((immap_t *) IMAP_ADDR)->im_pcmcia.pcmc_pgcrb;
306                 else
307                         pgcrx = &((immap_t *) IMAP_ADDR)->im_pcmcia.pcmc_pgcra;
308
309                 reg = *pgcrx;
310                 reg |= mk_int_int_mask (pcmcia_schlvl) << 24;
311                 reg |= mk_int_int_mask (pcmcia_schlvl) << 16;
312                 *pgcrx = reg;
313 #else   /* direct connected IDE drive, i.e. external IRQ, not the PCMCIA irq */
314                 *irq = ioport_dsc[data_port].irq;
315 #endif  /* CONFIG_IDE_8xx_PCCARD */
316         }
317
318         /* register routine to tune PIO mode */
319         ide_hwifs[data_port].pio_mask = ATA_PIO4;
320         ide_hwifs[data_port].tuneproc = m8xx_ide_tuneproc;
321
322         hw->ack_intr = (ide_ack_intr_t *) ide_interrupt_ack;
323         /* Enable Harddisk Interrupt,
324          * and make it edge sensitive
325          */
326         /* (11-18) Set edge detect for irq, no wakeup from low power mode */
327         ((immap_t *)IMAP_ADDR)->im_siu_conf.sc_siel |=
328                                         (0x80000000 >> ioport_dsc[data_port].irq);
329
330 #ifdef CONFIG_IDE_8xx_PCCARD
331         /* Make sure we don't get garbage irq */
332         ((immap_t *) IMAP_ADDR)->im_pcmcia.pcmc_pscr = 0xFFFF;
333
334         /* Enable falling edge irq */
335         pcmp->pcmc_per = 0x100000 >> (16 * _slot_);
336 #endif  /* CONFIG_IDE_8xx_PCCARD */
337 }       /* m8xx_ide_init_hwif_ports() using 8xx internal PCMCIA interface */
338 #endif /* CONFIG_IDE_8xx_PCCARD || CONFIG_IDE_8xx_DIRECT */
339
340 /*
341  * m8xx_ide_init_hwif_ports for a direct IDE interface _not_ using
342  * MPC8xx's internal PCMCIA interface
343  */
344 #if defined(CONFIG_IDE_EXT_DIRECT)
345 void m8xx_ide_init_hwif_ports (hw_regs_t *hw,
346         unsigned long data_port, unsigned long ctrl_port, int *irq)
347 {
348         unsigned long *p = hw->io_ports;
349         int i;
350
351         u32 ide_phy_base;
352         u32 ide_phy_end;
353         static unsigned long ide_base = 0;
354         unsigned long base;
355
356         *p = 0;
357         if (irq)
358                 *irq = 0;
359
360         if (!ide_base) {
361
362                 /* TODO:
363                  * - add code to read ORx, BRx
364                  */
365                 ide_phy_base = CFG_ATA_BASE_ADDR;
366                 ide_phy_end  = CFG_ATA_BASE_ADDR + 0x200;
367
368                 printk ("IDE phys mem : %08x...%08x (size %08x)\n",
369                         ide_phy_base, ide_phy_end,
370                         ide_phy_end - ide_phy_base);
371                 
372                 ide_base=(unsigned long)ioremap(ide_phy_base,
373                                                 ide_phy_end-ide_phy_base);
374
375 #ifdef DEBUG
376                 printk ("IDE virt base: %08lx\n", ide_base);
377 #endif
378         }
379
380         if (data_port >= MAX_HWIFS)
381                 return;
382
383         base = ide_base + ioport_dsc[data_port].base_off;
384 #ifdef DEBUG
385         printk ("base: %08x + %08x = %08x\n",
386                 ide_base, ioport_dsc[data_port].base_off, base);
387 #endif
388
389         for (i = 0; i < IDE_NR_PORTS; ++i) {
390 #ifdef DEBUG
391                 printk ("port[%d]: %08x + %08x = %08x\n",
392                         i,
393                         base,
394                         ioport_dsc[data_port].reg_off[i],
395                         i, base + ioport_dsc[data_port].reg_off[i]);
396 #endif
397                 *p++ = base + ioport_dsc[data_port].reg_off[i];
398         }
399
400         if (irq) {
401                 /* direct connected IDE drive, i.e. external IRQ */
402                 *irq = ioport_dsc[data_port].irq;
403         }
404
405         /* register routine to tune PIO mode */
406         ide_hwifs[data_port].pio_mask = ATA_PIO4;
407         ide_hwifs[data_port].tuneproc = m8xx_ide_tuneproc;
408
409         hw->ack_intr = (ide_ack_intr_t *) ide_interrupt_ack;
410         /* Enable Harddisk Interrupt,
411          * and make it edge sensitive
412          */
413         /* (11-18) Set edge detect for irq, no wakeup from low power mode */
414         ((immap_t *) IMAP_ADDR)->im_siu_conf.sc_siel |=
415                         (0x80000000 >> ioport_dsc[data_port].irq);
416 }       /* m8xx_ide_init_hwif_ports() for CONFIG_IDE_8xx_DIRECT */ 
417
418 #endif  /* CONFIG_IDE_8xx_DIRECT */
419
420
421 /* -------------------------------------------------------------------- */
422
423
424 /* PCMCIA Timing */
425 #ifndef PCMCIA_SHT
426 #define PCMCIA_SHT(t)   ((t & 0x0F)<<16)        /* Strobe Hold  Time    */
427 #define PCMCIA_SST(t)   ((t & 0x0F)<<12)        /* Strobe Setup Time    */
428 #define PCMCIA_SL(t) ((t==32) ? 0 : ((t & 0x1F)<<7)) /* Strobe Length   */
429 #endif
430
431
432 /* Calculate PIO timings */
433 static void
434 m8xx_ide_tuneproc(ide_drive_t *drive, u8 pio)
435 {
436 #if defined(CONFIG_IDE_8xx_PCCARD) || defined(CONFIG_IDE_8xx_DIRECT)
437         volatile pcmconf8xx_t   *pcmp;
438         ulong timing, mask, reg;
439 #endif
440
441         pio = ide_get_best_pio_mode(drive, pio, 4);
442
443 #if 1
444         printk("%s[%d] %s: best PIO mode: %d\n",
445                 __FILE__,__LINE__,__FUNCTION__, pio);
446 #endif
447
448 #if defined(CONFIG_IDE_8xx_PCCARD) || defined(CONFIG_IDE_8xx_DIRECT)
449         pcmp = (pcmconf8xx_t *)(&(((immap_t *)IMAP_ADDR)->im_pcmcia));
450
451         mask = ~(PCMCIA_SHT(0xFF) | PCMCIA_SST(0xFF) | PCMCIA_SL(0xFF));
452
453         timing  = PCMCIA_SHT(hold_time[pio]  )
454                 | PCMCIA_SST(ide_pio_clocks[pio].setup_time )
455                 | PCMCIA_SL (ide_pio_clocks[pio].active_time)
456                 ;
457
458 #if 1
459         printk ("Setting timing bits 0x%08lx in PCMCIA controller\n", timing);
460 #endif
461         if ((reg = pcmp->pcmc_por0 & mask) != 0)
462                 pcmp->pcmc_por0 = reg | timing;
463
464         if ((reg = pcmp->pcmc_por1 & mask) != 0)
465                 pcmp->pcmc_por1 = reg | timing;
466
467         if ((reg = pcmp->pcmc_por2 & mask) != 0)
468                 pcmp->pcmc_por2 = reg | timing;
469
470         if ((reg = pcmp->pcmc_por3 & mask) != 0)
471                 pcmp->pcmc_por3 = reg | timing;
472
473         if ((reg = pcmp->pcmc_por4 & mask) != 0)
474                 pcmp->pcmc_por4 = reg | timing;
475
476         if ((reg = pcmp->pcmc_por5 & mask) != 0)
477                 pcmp->pcmc_por5 = reg | timing;
478
479         if ((reg = pcmp->pcmc_por6 & mask) != 0)
480                 pcmp->pcmc_por6 = reg | timing;
481
482         if ((reg = pcmp->pcmc_por7 & mask) != 0)
483                 pcmp->pcmc_por7 = reg | timing;
484
485 #elif defined(CONFIG_IDE_EXT_DIRECT)
486
487         printk("%s[%d] %s: not implemented yet!\n",
488                 __FILE__,__LINE__,__FUNCTION__);
489 #endif /* defined(CONFIG_IDE_8xx_PCCARD) || defined(CONFIG_IDE_8xx_PCMCIA */
490 }
491
492 static void
493 ide_interrupt_ack (void *dev)
494 {
495 #ifdef CONFIG_IDE_8xx_PCCARD
496         u_int pscr, pipr;
497
498 #if (PCMCIA_SOCKETS_NO == 2)
499         u_int _slot_;
500 #endif
501
502         /* get interrupt sources */
503
504         pscr = ((volatile immap_t *)IMAP_ADDR)->im_pcmcia.pcmc_pscr;
505         pipr = ((volatile immap_t *)IMAP_ADDR)->im_pcmcia.pcmc_pipr;
506
507         /*
508          * report only if both card detect signals are the same
509          * not too nice done,
510          * we depend on that CD2 is the bit to the left of CD1...
511          */
512
513         if(_slot_==-1){
514           printk("PCMCIA slot has not been defined! Using A as default\n");
515           _slot_=0;
516         }
517
518         if(((pipr & M8XX_PCMCIA_CD2(_slot_)) >> 1) ^
519            (pipr & M8XX_PCMCIA_CD1(_slot_))         ) {
520           printk ("card detect interrupt\n");
521         }
522         /* clear the interrupt sources */
523         ((immap_t *)IMAP_ADDR)->im_pcmcia.pcmc_pscr = pscr;
524
525 #else /* ! CONFIG_IDE_8xx_PCCARD */
526         /*
527          * Only CONFIG_IDE_8xx_PCCARD is using the interrupt of the
528          * MPC8xx's PCMCIA controller, so there is nothing to be done here
529          * for CONFIG_IDE_8xx_DIRECT and CONFIG_IDE_EXT_DIRECT.
530          * The interrupt is handled somewhere else.     -- Steven
531          */
532 #endif /* CONFIG_IDE_8xx_PCCARD */
533 }
534
535
536
537 /*
538  * CIS Tupel codes
539  */
540 #define CISTPL_NULL             0x00
541 #define CISTPL_DEVICE           0x01
542 #define CISTPL_LONGLINK_CB      0x02
543 #define CISTPL_INDIRECT         0x03
544 #define CISTPL_CONFIG_CB        0x04
545 #define CISTPL_CFTABLE_ENTRY_CB 0x05
546 #define CISTPL_LONGLINK_MFC     0x06
547 #define CISTPL_BAR              0x07
548 #define CISTPL_PWR_MGMNT        0x08
549 #define CISTPL_EXTDEVICE        0x09
550 #define CISTPL_CHECKSUM         0x10
551 #define CISTPL_LONGLINK_A       0x11
552 #define CISTPL_LONGLINK_C       0x12
553 #define CISTPL_LINKTARGET       0x13
554 #define CISTPL_NO_LINK          0x14
555 #define CISTPL_VERS_1           0x15
556 #define CISTPL_ALTSTR           0x16
557 #define CISTPL_DEVICE_A         0x17
558 #define CISTPL_JEDEC_C          0x18
559 #define CISTPL_JEDEC_A          0x19
560 #define CISTPL_CONFIG           0x1a
561 #define CISTPL_CFTABLE_ENTRY    0x1b
562 #define CISTPL_DEVICE_OC        0x1c
563 #define CISTPL_DEVICE_OA        0x1d
564 #define CISTPL_DEVICE_GEO       0x1e
565 #define CISTPL_DEVICE_GEO_A     0x1f
566 #define CISTPL_MANFID           0x20
567 #define CISTPL_FUNCID           0x21
568 #define CISTPL_FUNCE            0x22
569 #define CISTPL_SWIL             0x23
570 #define CISTPL_END              0xff
571
572 /*
573  * CIS Function ID codes
574  */
575 #define CISTPL_FUNCID_MULTI     0x00
576 #define CISTPL_FUNCID_MEMORY    0x01
577 #define CISTPL_FUNCID_SERIAL    0x02
578 #define CISTPL_FUNCID_PARALLEL  0x03
579 #define CISTPL_FUNCID_FIXED     0x04
580 #define CISTPL_FUNCID_VIDEO     0x05
581 #define CISTPL_FUNCID_NETWORK   0x06
582 #define CISTPL_FUNCID_AIMS      0x07
583 #define CISTPL_FUNCID_SCSI      0x08
584
585 /*
586  * Fixed Disk FUNCE codes
587  */
588 #define CISTPL_IDE_INTERFACE    0x01
589
590 #define CISTPL_FUNCE_IDE_IFACE  0x01
591 #define CISTPL_FUNCE_IDE_MASTER 0x02
592 #define CISTPL_FUNCE_IDE_SLAVE  0x03
593
594 /* First feature byte */
595 #define CISTPL_IDE_SILICON      0x04
596 #define CISTPL_IDE_UNIQUE       0x08
597 #define CISTPL_IDE_DUAL         0x10
598
599 /* Second feature byte */
600 #define CISTPL_IDE_HAS_SLEEP    0x01
601 #define CISTPL_IDE_HAS_STANDBY  0x02
602 #define CISTPL_IDE_HAS_IDLE     0x04
603 #define CISTPL_IDE_LOW_POWER    0x08
604 #define CISTPL_IDE_REG_INHIBIT  0x10
605 #define CISTPL_IDE_HAS_INDEX    0x20
606 #define CISTPL_IDE_IOIS16       0x40
607
608
609 /* -------------------------------------------------------------------- */
610
611
612 #define MAX_TUPEL_SZ    512
613 #define MAX_FEATURES    4
614
615 static int check_ide_device (unsigned long base)
616 {
617         volatile u8 *ident = NULL;
618         volatile u8 *feature_p[MAX_FEATURES];
619         volatile u8 *p, *start;
620         int n_features = 0;
621         u8 func_id = ~0;
622         u8 code, len;
623         unsigned short config_base = 0;
624         int found = 0;
625         int i;
626
627 #ifdef DEBUG
628         printk ("PCMCIA MEM: %08lX\n", base);
629 #endif
630         start = p = (volatile u8 *) base;
631
632         while ((p - start) < MAX_TUPEL_SZ) {
633
634                 code = *p; p += 2;
635
636                 if (code == 0xFF) { /* End of chain */
637                         break;
638                 }
639
640                 len = *p; p += 2;
641 #ifdef  DEBUG_PCMCIA
642                 { volatile u8 *q = p;
643                         printk ("\nTuple code %02x  length %d\n\tData:",
644                                 code, len);
645
646                         for (i = 0; i < len; ++i) {
647                                 printk (" %02x", *q);
648                                 q+= 2;
649                         }
650                 }
651 #endif  /* DEBUG_PCMCIA */
652                 switch (code) {
653                 case CISTPL_VERS_1:
654                         ident = p + 4;
655                         break;
656                 case CISTPL_FUNCID:
657                         func_id = *p;
658                         break;
659                 case CISTPL_FUNCE:
660                         if (n_features < MAX_FEATURES)
661                                 feature_p[n_features++] = p;
662                         break;
663                 case CISTPL_CONFIG:
664                         config_base = (*(p+6) << 8) + (*(p+4));
665                 default:
666                         break;
667                 }
668                 p += 2 * len;
669         }
670
671         found = identify (ident);
672
673         if (func_id != ((u8)~0)) {
674                 print_funcid (func_id);
675
676                 if (func_id == CISTPL_FUNCID_FIXED)
677                         found = 1;
678                 else
679                         return (1);     /* no disk drive */
680         }
681
682         for (i=0; i<n_features; ++i) {
683                 print_fixed (feature_p[i]);
684         }
685
686         if (!found) {
687                 printk ("unknown card type\n");
688                 return (1);
689         }
690
691         /* set level mode irq and I/O mapped device in config reg*/
692         *((u8 *)(base + config_base)) = 0x41;
693
694         return (0);
695 }
696
697 /* ------------------------------------------------------------------------- */
698
699 static void print_funcid (int func)
700 {
701         switch (func) {
702         case CISTPL_FUNCID_MULTI:
703                 printk (" Multi-Function");
704                 break;
705         case CISTPL_FUNCID_MEMORY:
706                 printk (" Memory");
707                 break;
708         case CISTPL_FUNCID_SERIAL:
709                 printk (" Serial Port");
710                 break;
711         case CISTPL_FUNCID_PARALLEL:
712                 printk (" Parallel Port");
713                 break;
714         case CISTPL_FUNCID_FIXED:
715                 printk (" Fixed Disk");
716                 break;
717         case CISTPL_FUNCID_VIDEO:
718                 printk (" Video Adapter");
719                 break;
720         case CISTPL_FUNCID_NETWORK:
721                 printk (" Network Adapter");
722                 break;
723         case CISTPL_FUNCID_AIMS:
724                 printk (" AIMS Card");
725                 break;
726         case CISTPL_FUNCID_SCSI:
727                 printk (" SCSI Adapter");
728                 break;
729         default:
730                 printk (" Unknown");
731                 break;
732         }
733         printk (" Card\n");
734 }
735
736 /* ------------------------------------------------------------------------- */
737
738 static void print_fixed (volatile u8 *p)
739 {
740         if (p == NULL)
741                 return;
742
743         switch (*p) {
744         case CISTPL_FUNCE_IDE_IFACE:
745             {   u8 iface = *(p+2);
746
747                 printk ((iface == CISTPL_IDE_INTERFACE) ? " IDE" : " unknown");
748                 printk (" interface ");
749                 break;
750             }
751         case CISTPL_FUNCE_IDE_MASTER:
752         case CISTPL_FUNCE_IDE_SLAVE:
753             {   u8 f1 = *(p+2);
754                 u8 f2 = *(p+4);
755
756                 printk ((f1 & CISTPL_IDE_SILICON) ? " [silicon]" : " [rotating]");
757
758                 if (f1 & CISTPL_IDE_UNIQUE)
759                         printk (" [unique]");
760
761                 printk ((f1 & CISTPL_IDE_DUAL) ? " [dual]" : " [single]");
762
763                 if (f2 & CISTPL_IDE_HAS_SLEEP)
764                         printk (" [sleep]");
765
766                 if (f2 & CISTPL_IDE_HAS_STANDBY)
767                         printk (" [standby]");
768
769                 if (f2 & CISTPL_IDE_HAS_IDLE)
770                         printk (" [idle]");
771
772                 if (f2 & CISTPL_IDE_LOW_POWER)
773                         printk (" [low power]");
774
775                 if (f2 & CISTPL_IDE_REG_INHIBIT)
776                         printk (" [reg inhibit]");
777
778                 if (f2 & CISTPL_IDE_HAS_INDEX)
779                         printk (" [index]");
780
781                 if (f2 & CISTPL_IDE_IOIS16)
782                         printk (" [IOis16]");
783
784                 break;
785             }
786         }
787         printk ("\n");
788 }
789
790 /* ------------------------------------------------------------------------- */
791
792
793 #define MAX_IDENT_CHARS         64
794 #define MAX_IDENT_FIELDS        4
795
796 static u8 *known_cards[] = {
797         "ARGOSY PnPIDE D5",
798         NULL
799 };
800
801 static int identify  (volatile u8 *p)
802 {
803         u8 id_str[MAX_IDENT_CHARS];
804         u8 data;
805         u8 *t;
806         u8 **card;
807         int i, done;
808
809         if (p == NULL)
810                 return (0);     /* Don't know */
811
812         t = id_str;
813         done =0;
814
815         for (i=0; i<=4 && !done; ++i, p+=2) {
816                 while ((data = *p) != '\0') {
817                         if (data == 0xFF) {
818                                 done = 1;
819                                 break;
820                         }
821                         *t++ = data;
822                         if (t == &id_str[MAX_IDENT_CHARS-1]) {
823                                 done = 1;
824                                 break;
825                         }
826                         p += 2;
827                 }
828                 if (!done)
829                         *t++ = ' ';
830         }
831         *t = '\0';
832         while (--t > id_str) {
833                 if (*t == ' ')
834                         *t = '\0';
835                 else
836                         break;
837         }
838         printk ("Card ID: %s\n", id_str);
839
840         for (card=known_cards; *card; ++card) {
841                 if (strcmp(*card, id_str) == 0) {       /* found! */
842                         return (1);
843                 }
844         }
845
846         return (0);     /* don't know */
847 }
848
849 void m8xx_ide_init(void)
850 {
851         ppc_ide_md.default_irq          = m8xx_ide_default_irq;
852         ppc_ide_md.default_io_base      = m8xx_ide_default_io_base;
853         ppc_ide_md.ide_init_hwif        = m8xx_ide_init_hwif_ports;
854 }