[linux-block.git] / drivers / ide / legacy / umc8672.c

/*
 *  linux/drivers/ide/legacy/umc8672.c		Version 0.05	Jul 31, 1996
 *
 *  Copyright (C) 1995-1996  Linus Torvalds & author (see below)
 */

/*
 *  Principal Author/Maintainer:  PODIEN@hml2.atlas.de (Wolfram Podien)
 *
 *  This file provides support for the advanced features
 *  of the UMC 8672 IDE interface.
 *
 *  Version 0.01	Initial version, hacked out of ide.c,
 *			and #include'd rather than compiled separately.
 *			This will get cleaned up in a subsequent release.
 *
 *  Version 0.02	now configs/compiles separate from ide.c  -ml
 *  Version 0.03	enhanced auto-tune, fix display bug
 *  Version 0.05	replace sti() with restore_flags()  -ml
 *			add detection of possible race condition  -ml
 */

/*
 * VLB Controller Support from 
 * Wolfram Podien
 * Rohoefe 3
 * D28832 Achim
 * Germany
 *
 * To enable UMC8672 support there must a lilo line like
 * append="ide0=umc8672"...
 * To set the speed according to the abilities of the hardware there must be a
 * line like
 * #define UMC_DRIVE0 11
 * in the beginning of the driver, which sets the speed of drive 0 to 11 (there
 * are some lines present). 0 - 11 are allowed speed values. These values are
 * the results from the DOS speed test program supplied from UMC. 11 is the 
 * highest speed (about PIO mode 3)
 */
#define REALLY_SLOW_IO		/* some systems can safely undef this */

#include <linux/module.h>
#include <linux/types.h>
#include <linux/kernel.h>
#include <linux/delay.h>
#include <linux/timer.h>
#include <linux/mm.h>
#include <linux/ioport.h>
#include <linux/blkdev.h>
#include <linux/hdreg.h>
#include <linux/ide.h>
#include <linux/init.h>

#include <asm/io.h>

/*
 * Default speeds.  These can be changed with "auto-tune" and/or hdparm.
 */
#define UMC_DRIVE0      1              /* DOS measured drive speeds */
#define UMC_DRIVE1      1              /* 0 to 11 allowed */
#define UMC_DRIVE2      1              /* 11 = Fastest Speed */
#define UMC_DRIVE3      1              /* In case of crash reduce speed */

static u8 current_speeds[4] = {UMC_DRIVE0, UMC_DRIVE1, UMC_DRIVE2, UMC_DRIVE3};
static const u8 pio_to_umc [5] = {0,3,7,10,11};	/* rough guesses */

/*       0    1    2    3    4    5    6    7    8    9    10   11      */
static const u8 speedtab [3][12] = {
	{0xf, 0xb, 0x2, 0x2, 0x2, 0x1, 0x1, 0x1, 0x1, 0x1, 0x1, 0x1 },
	{0x3, 0x2, 0x2, 0x2, 0x2, 0x2, 0x1, 0x1, 0x1, 0x1, 0x1, 0x1 },
	{0xff,0xcb,0xc0,0x58,0x36,0x33,0x23,0x22,0x21,0x11,0x10,0x0}};

static void out_umc (char port,char wert)
{
	outb_p(port,0x108);
	outb_p(wert,0x109);
}

static inline u8 in_umc (char port)
{
	outb_p(port,0x108);
	return inb_p(0x109);
}

static void umc_set_speeds (u8 speeds[])
{
	int i, tmp;

	outb_p(0x5A,0x108); /* enable umc */

	out_umc (0xd7,(speedtab[0][speeds[2]] | (speedtab[0][speeds[3]]<<4)));
	out_umc (0xd6,(speedtab[0][speeds[0]] | (speedtab[0][speeds[1]]<<4)));
	tmp = 0;
	for (i = 3; i >= 0; i--) {
		tmp = (tmp << 2) | speedtab[1][speeds[i]];
	}
	out_umc (0xdc,tmp);
	for (i = 0;i < 4; i++) {
		out_umc (0xd0+i,speedtab[2][speeds[i]]);
		out_umc (0xd8+i,speedtab[2][speeds[i]]);
	}
	outb_p(0xa5,0x108); /* disable umc */

	printk ("umc8672: drive speeds [0 to 11]: %d %d %d %d\n",
		speeds[0], speeds[1], speeds[2], speeds[3]);
}

static void umc_set_pio_mode(ide_drive_t *drive, const u8 pio)
{
	unsigned long flags;
	ide_hwgroup_t *hwgroup = ide_hwifs[HWIF(drive)->index^1].hwgroup;

	printk("%s: setting umc8672 to PIO mode%d (speed %d)\n",
		drive->name, pio, pio_to_umc[pio]);
	spin_lock_irqsave(&ide_lock, flags);
	if (hwgroup && hwgroup->handler != NULL) {
		printk(KERN_ERR "umc8672: other interface is busy: exiting tune_umc()\n");
	} else {
		current_speeds[drive->name[2] - 'a'] = pio_to_umc[pio];
		umc_set_speeds (current_speeds);
	}
	spin_unlock_irqrestore(&ide_lock, flags);
}

static int __init umc8672_probe(void)
{
	ide_hwif_t *hwif, *mate;
	unsigned long flags;
	static u8 idx[4] = { 0, 1, 0xff, 0xff };

	if (!request_region(0x108, 2, "umc8672")) {
		printk(KERN_ERR "umc8672: ports 0x108-0x109 already in use.\n");
		return 1;
	}
	local_irq_save(flags);
	outb_p(0x5A,0x108); /* enable umc */
	if (in_umc (0xd5) != 0xa0) {
		local_irq_restore(flags);
		printk(KERN_ERR "umc8672: not found\n");
		release_region(0x108, 2);
		return 1;  
	}
	outb_p(0xa5,0x108); /* disable umc */

	umc_set_speeds (current_speeds);
	local_irq_restore(flags);

	hwif = &ide_hwifs[0];
	mate = &ide_hwifs[1];

	hwif->chipset = ide_umc8672;
	hwif->pio_mask = ATA_PIO4;
	hwif->set_pio_mode = &umc_set_pio_mode;
	hwif->mate = mate;

	mate->chipset = ide_umc8672;
	mate->pio_mask = ATA_PIO4;
	mate->set_pio_mode = &umc_set_pio_mode;
	mate->mate = hwif;
	mate->channel = 1;

	ide_device_add(idx);

	return 0;
}

int probe_umc8672 = 0;

module_param_named(probe, probe_umc8672, bool, 0);
MODULE_PARM_DESC(probe, "probe for UMC8672 chipset");

static int __init umc8672_init(void)
{
	if (probe_umc8672 == 0)
		goto out;

	if (umc8672_probe() == 0)
		return 0;;
out:
	return -ENODEV;;
}

module_init(umc8672_init);

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