drivers/ide/legacy/umc8672.c

   1 /*
   2  *  Copyright (C) 1995-1996  Linus Torvalds & author (see below)
   3  */
   4
   5 /*
   6  *  Principal Author/Maintainer:  PODIEN@hml2.atlas.de (Wolfram Podien)
   7  *
   8  *  This file provides support for the advanced features
   9  *  of the UMC 8672 IDE interface.
  10  *
  11  *  Version 0.01        Initial version, hacked out of ide.c,
  12  *                      and #include'd rather than compiled separately.
  13  *                      This will get cleaned up in a subsequent release.
  14  *
  15  *  Version 0.02        now configs/compiles separate from ide.c  -ml
  16  *  Version 0.03        enhanced auto-tune, fix display bug
  17  *  Version 0.05        replace sti() with restore_flags()  -ml
  18  *                      add detection of possible race condition  -ml
  19  */
  20
  21 /*
  22  * VLB Controller Support from
  23  * Wolfram Podien
  24  * Rohoefe 3
  25  * D28832 Achim
  26  * Germany
  27  *
  28  * To enable UMC8672 support there must a lilo line like
  29  * append="ide0=umc8672"...
  30  * To set the speed according to the abilities of the hardware there must be a
  31  * line like
  32  * #define UMC_DRIVE0 11
  33  * in the beginning of the driver, which sets the speed of drive 0 to 11 (there
  34  * are some lines present). 0 - 11 are allowed speed values. These values are
  35  * the results from the DOS speed test program supplied from UMC. 11 is the
  36  * highest speed (about PIO mode 3)
  37  */
  38 #define REALLY_SLOW_IO          /* some systems can safely undef this */
  39
  40 #include <linux/module.h>
  41 #include <linux/types.h>
  42 #include <linux/kernel.h>
  43 #include <linux/delay.h>
  44 #include <linux/timer.h>
  45 #include <linux/mm.h>
  46 #include <linux/ioport.h>
  47 #include <linux/blkdev.h>
  48 #include <linux/hdreg.h>
  49 #include <linux/ide.h>
  50 #include <linux/init.h>
  51
  52 #include <asm/io.h>
  53
  54 /*
  55  * Default speeds.  These can be changed with "auto-tune" and/or hdparm.
  56  */
  57 #define UMC_DRIVE0      1              /* DOS measured drive speeds */
  58 #define UMC_DRIVE1      1              /* 0 to 11 allowed */
  59 #define UMC_DRIVE2      1              /* 11 = Fastest Speed */
  60 #define UMC_DRIVE3      1              /* In case of crash reduce speed */
  61
  62 static u8 current_speeds[4] = {UMC_DRIVE0, UMC_DRIVE1, UMC_DRIVE2, UMC_DRIVE3};
  63 static const u8 pio_to_umc [5] = {0, 3, 7, 10, 11};     /* rough guesses */
  64
  65 /*       0    1    2    3    4    5    6    7    8    9    10   11      */
  66 static const u8 speedtab [3][12] = {
  67         {0x0f, 0x0b, 0x02, 0x02, 0x02, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x1},
  68         {0x03, 0x02, 0x02, 0x02, 0x02, 0x02, 0x01, 0x01, 0x01, 0x01, 0x01, 0x1},
  69         {0xff, 0xcb, 0xc0, 0x58, 0x36, 0x33, 0x23, 0x22, 0x21, 0x11, 0x10, 0x0}
  70 };
  71
  72 static void out_umc(char port, char wert)
  73 {
  74         outb_p(port, 0x108);
  75         outb_p(wert, 0x109);
  76 }
  77
  78 static inline u8 in_umc(char port)
  79 {
  80         outb_p(port, 0x108);
  81         return inb_p(0x109);
  82 }
  83
  84 static void umc_set_speeds(u8 speeds[])
  85 {
  86         int i, tmp;
  87
  88         outb_p(0x5A, 0x108); /* enable umc */
  89
  90         out_umc(0xd7, (speedtab[0][speeds[2]] | (speedtab[0][speeds[3]]<<4)));
  91         out_umc(0xd6, (speedtab[0][speeds[0]] | (speedtab[0][speeds[1]]<<4)));
  92         tmp = 0;
  93         for (i = 3; i >= 0; i--)
  94                 tmp = (tmp << 2) | speedtab[1][speeds[i]];
  95         out_umc(0xdc, tmp);
  96         for (i = 0; i < 4; i++) {
  97                 out_umc(0xd0 + i, speedtab[2][speeds[i]]);
  98                 out_umc(0xd8 + i, speedtab[2][speeds[i]]);
  99         }
 100         outb_p(0xa5, 0x108); /* disable umc */
 101
 102         printk("umc8672: drive speeds [0 to 11]: %d %d %d %d\n",
 103                 speeds[0], speeds[1], speeds[2], speeds[3]);
 104 }
 105
 106 static void umc_set_pio_mode(ide_drive_t *drive, const u8 pio)
 107 {
 108         ide_hwif_t *hwif = drive->hwif;
 109         unsigned long flags;
 110
 111         printk("%s: setting umc8672 to PIO mode%d (speed %d)\n",
 112                 drive->name, pio, pio_to_umc[pio]);
 113         spin_lock_irqsave(&ide_lock, flags);
 114         if (hwif->mate && hwif->mate->hwgroup->handler) {
 115                 printk(KERN_ERR "umc8672: other interface is busy: exiting tune_umc()\n");
 116         } else {
 117                 current_speeds[drive->name[2] - 'a'] = pio_to_umc[pio];
 118                 umc_set_speeds(current_speeds);
 119         }
 120         spin_unlock_irqrestore(&ide_lock, flags);
 121 }
 122
 123 static const struct ide_port_info umc8672_port_info __initdata = {
 124         .chipset                = ide_umc8672,
 125         .host_flags             = IDE_HFLAG_NO_DMA | IDE_HFLAG_NO_AUTOTUNE,
 126         .pio_mask               = ATA_PIO4,
 127 };
 128
 129 static int __init umc8672_probe(void)
 130 {
 131         ide_hwif_t *hwif, *mate;
 132         unsigned long flags;
 133         static u8 idx[4] = { 0xff, 0xff, 0xff, 0xff };
 134         hw_regs_t hw[2];
 135
 136         if (!request_region(0x108, 2, "umc8672")) {
 137                 printk(KERN_ERR "umc8672: ports 0x108-0x109 already in use.\n");
 138                 return 1;
 139         }
 140         local_irq_save(flags);
 141         outb_p(0x5A, 0x108); /* enable umc */
 142         if (in_umc (0xd5) != 0xa0) {
 143                 local_irq_restore(flags);
 144                 printk(KERN_ERR "umc8672: not found\n");
 145                 release_region(0x108, 2);
 146                 return 1;
 147         }
 148         outb_p(0xa5, 0x108); /* disable umc */
 149
 150         umc_set_speeds(current_speeds);
 151         local_irq_restore(flags);
 152
 153         memset(&hw, 0, sizeof(hw));
 154
 155         ide_std_init_ports(&hw[0], 0x1f0, 0x3f6);
 156         hw[0].irq = 14;
 157
 158         ide_std_init_ports(&hw[1], 0x170, 0x376);
 159         hw[1].irq = 15;
 160
 161         hwif = ide_find_port();
 162         if (hwif) {
 163                 ide_init_port_hw(hwif, &hw[0]);
 164                 hwif->set_pio_mode = umc_set_pio_mode;
 165                 idx[0] = hwif->index;
 166         }
 167
 168         mate = ide_find_port();
 169         if (mate) {
 170                 ide_init_port_hw(mate, &hw[1]);
 171                 mate->set_pio_mode = umc_set_pio_mode;
 172                 idx[1] = mate->index;
 173         }
 174
 175         ide_device_add(idx, &umc8672_port_info);
 176
 177         return 0;
 178 }
 179
 180 int probe_umc8672;
 181
 182 module_param_named(probe, probe_umc8672, bool, 0);
 183 MODULE_PARM_DESC(probe, "probe for UMC8672 chipset");
 184
 185 static int __init umc8672_init(void)
 186 {
 187         if (probe_umc8672 == 0)
 188                 goto out;
 189
 190         if (umc8672_probe() == 0)
 191                 return 0;;
 192 out:
 193         return -ENODEV;;
 194 }
 195
 196 module_init(umc8672_init);
 197
 198 MODULE_AUTHOR("Wolfram Podien");
 199 MODULE_DESCRIPTION("Support for UMC 8672 IDE chipset");
 200 MODULE_LICENSE("GPL");