[deliverable/linux.git] / drivers / ide / h8300 / ide-h8300.c

/*
 * H8/300 generic IDE interface
 */

#include <linux/init.h>
#include <linux/ide.h>

#include <asm/io.h>
#include <asm/irq.h>

#define DRV_NAME "ide-h8300"

#define bswap(d) \
({					\
	u16 r;				\
	__asm__("mov.b %w1,r1h\n\t"	\
		"mov.b %x1,r1l\n\t"	\
		"mov.w r1,%0"		\
		:"=r"(r)		\
		:"r"(d)			\
		:"er1");		\
	(r);				\
})

static void mm_outw(u16 d, unsigned long a)
{
	__asm__("mov.b %w0,r2h\n\t"
		"mov.b %x0,r2l\n\t"
		"mov.w r2,@%1"
		:
		:"r"(d),"r"(a)
		:"er2");
}

static u16 mm_inw(unsigned long a)
{
	register u16 r __asm__("er0");
	__asm__("mov.w @%1,r2\n\t"
		"mov.b r2l,%x0\n\t"
		"mov.b r2h,%w0"
		:"=r"(r)
		:"r"(a)
		:"er2");
	return r;
}

static void h8300_tf_load(ide_drive_t *drive, ide_task_t *task)
{
	ide_hwif_t *hwif = drive->hwif;
	struct ide_io_ports *io_ports = &hwif->io_ports;
	struct ide_taskfile *tf = &task->tf;
	u8 HIHI = (task->tf_flags & IDE_TFLAG_LBA48) ? 0xE0 : 0xEF;

	if (task->tf_flags & IDE_TFLAG_FLAGGED)
		HIHI = 0xFF;

	if (task->tf_flags & IDE_TFLAG_OUT_DATA)
		mm_outw((tf->hob_data << 8) | tf->data, io_ports->data_addr);

	if (task->tf_flags & IDE_TFLAG_OUT_HOB_FEATURE)
		outb(tf->hob_feature, io_ports->feature_addr);
	if (task->tf_flags & IDE_TFLAG_OUT_HOB_NSECT)
		outb(tf->hob_nsect, io_ports->nsect_addr);
	if (task->tf_flags & IDE_TFLAG_OUT_HOB_LBAL)
		outb(tf->hob_lbal, io_ports->lbal_addr);
	if (task->tf_flags & IDE_TFLAG_OUT_HOB_LBAM)
		outb(tf->hob_lbam, io_ports->lbam_addr);
	if (task->tf_flags & IDE_TFLAG_OUT_HOB_LBAH)
		outb(tf->hob_lbah, io_ports->lbah_addr);

	if (task->tf_flags & IDE_TFLAG_OUT_FEATURE)
		outb(tf->feature, io_ports->feature_addr);
	if (task->tf_flags & IDE_TFLAG_OUT_NSECT)
		outb(tf->nsect, io_ports->nsect_addr);
	if (task->tf_flags & IDE_TFLAG_OUT_LBAL)
		outb(tf->lbal, io_ports->lbal_addr);
	if (task->tf_flags & IDE_TFLAG_OUT_LBAM)
		outb(tf->lbam, io_ports->lbam_addr);
	if (task->tf_flags & IDE_TFLAG_OUT_LBAH)
		outb(tf->lbah, io_ports->lbah_addr);

	if (task->tf_flags & IDE_TFLAG_OUT_DEVICE)
		outb((tf->device & HIHI) | drive->select.all,
		     io_ports->device_addr);
}

static void h8300_tf_read(ide_drive_t *drive, ide_task_t *task)
{
	ide_hwif_t *hwif = drive->hwif;
	struct ide_io_ports *io_ports = &hwif->io_ports;
	struct ide_taskfile *tf = &task->tf;

	if (task->tf_flags & IDE_TFLAG_IN_DATA) {
		u16 data = mm_inw(io_ports->data_addr);

		tf->data = data & 0xff;
		tf->hob_data = (data >> 8) & 0xff;
	}

	/* be sure we're looking at the low order bits */
	outb(ATA_DEVCTL_OBS & ~0x80, io_ports->ctl_addr);

	if (task->tf_flags & IDE_TFLAG_IN_NSECT)
		tf->nsect  = inb(io_ports->nsect_addr);
	if (task->tf_flags & IDE_TFLAG_IN_LBAL)
		tf->lbal   = inb(io_ports->lbal_addr);
	if (task->tf_flags & IDE_TFLAG_IN_LBAM)
		tf->lbam   = inb(io_ports->lbam_addr);
	if (task->tf_flags & IDE_TFLAG_IN_LBAH)
		tf->lbah   = inb(io_ports->lbah_addr);
	if (task->tf_flags & IDE_TFLAG_IN_DEVICE)
		tf->device = inb(io_ports->device_addr);

	if (task->tf_flags & IDE_TFLAG_LBA48) {
		outb(ATA_DEVCTL_OBS | 0x80, io_ports->ctl_addr);

		if (task->tf_flags & IDE_TFLAG_IN_HOB_FEATURE)
			tf->hob_feature = inb(io_ports->feature_addr);
		if (task->tf_flags & IDE_TFLAG_IN_HOB_NSECT)
			tf->hob_nsect   = inb(io_ports->nsect_addr);
		if (task->tf_flags & IDE_TFLAG_IN_HOB_LBAL)
			tf->hob_lbal    = inb(io_ports->lbal_addr);
		if (task->tf_flags & IDE_TFLAG_IN_HOB_LBAM)
			tf->hob_lbam    = inb(io_ports->lbam_addr);
		if (task->tf_flags & IDE_TFLAG_IN_HOB_LBAH)
			tf->hob_lbah    = inb(io_ports->lbah_addr);
	}
}

static void mm_outsw(unsigned long addr, void *buf, u32 len)
{
	unsigned short *bp = (unsigned short *)buf;
	for (; len > 0; len--, bp++)
		*(volatile u16 *)addr = bswap(*bp);
}

static void mm_insw(unsigned long addr, void *buf, u32 len)
{
	unsigned short *bp = (unsigned short *)buf;
	for (; len > 0; len--, bp++)
		*bp = bswap(*(volatile u16 *)addr);
}

static void h8300_input_data(ide_drive_t *drive, struct request *rq,
			     void *buf, unsigned int len)
{
	mm_insw(drive->hwif->io_ports.data_addr, buf, (len + 1) / 2);
}

static void h8300_output_data(ide_drive_t *drive, struct request *rq,
			      void *buf, unsigned int len)
{
	mm_outsw(drive->hwif->io_ports.data_addr, buf, (len + 1) / 2);
}

#define H8300_IDE_GAP (2)

static inline void hw_setup(hw_regs_t *hw)
{
	int i;

	memset(hw, 0, sizeof(hw_regs_t));
	for (i = 0; i <= 7; i++)
		hw->io_ports_array[i] = CONFIG_H8300_IDE_BASE + H8300_IDE_GAP*i;
	hw->io_ports.ctl_addr = CONFIG_H8300_IDE_ALT;
	hw->irq = EXT_IRQ0 + CONFIG_H8300_IDE_IRQ;
	hw->chipset = ide_generic;
}

static inline void hwif_setup(ide_hwif_t *hwif)
{
	default_hwif_iops(hwif);

	hwif->tf_load = h8300_tf_load;
	hwif->tf_read = h8300_tf_read;

	hwif->input_data  = h8300_input_data;
	hwif->output_data = h8300_output_data;
}

static const struct ide_port_info h8300_port_info = {
	.host_flags		= IDE_HFLAG_NO_IO_32BIT | IDE_HFLAG_NO_DMA,
};

static int __init h8300_ide_init(void)
{
	hw_regs_t hw;
	ide_hwif_t *hwif;
	int index;
	u8 idx[4] = { 0xff, 0xff, 0xff, 0xff };

	if (!request_region(CONFIG_H8300_IDE_BASE, H8300_IDE_GAP*8, "ide-h8300"))
		goto out_busy;
	if (!request_region(CONFIG_H8300_IDE_ALT, H8300_IDE_GAP, "ide-h8300")) {
		release_region(CONFIG_H8300_IDE_BASE, H8300_IDE_GAP*8);
		goto out_busy;
	}

	hw_setup(&hw);

	hwif = ide_find_port_slot(&h8300_port_info);
	if (hwif == NULL)
		return -ENOENT;

	index = hwif->index;
	ide_init_port_hw(hwif, &hw);
	hwif_setup(hwif);
	printk(KERN_INFO "ide%d: H8/300 generic IDE interface\n", index);

	idx[0] = index;

	ide_device_add(idx, &h8300_port_info);

	return 0;

out_busy:
	printk(KERN_ERR "ide-h8300: IDE I/F resource already used.\n");

	return -EBUSY;
}

module_init(h8300_ide_init);

MODULE_LICENSE("GPL");
Commit	Line	Data
1da177e4	1	/*
1da177e4 LT	2	* H8/300 generic IDE interface
	3	*/
	4
	5	#include <linux/init.h>
	6	#include <linux/ide.h>
1da177e4 LT	7
	8	#include <asm/io.h>
	9	#include <asm/irq.h>
	10
eb3aff55 BZ	11	#define DRV_NAME "ide-h8300"
eb3aff55 BZ	12
1da177e4 LT	13	#define bswap(d) \
	14	({ \
	15	u16 r; \
	16	__asm__("mov.b %w1,r1h\n\t" \
	17	"mov.b %x1,r1l\n\t" \
	18	"mov.w r1,%0" \
	19	:"=r"(r) \
	20	:"r"(d) \
	21	:"er1"); \
	22	(r); \
	23	})
	24
	25	static void mm_outw(u16 d, unsigned long a)
	26	{
	27	__asm__("mov.b %w0,r2h\n\t"
	28	"mov.b %x0,r2l\n\t"
	29	"mov.w r2,@%1"
	30	:
	31	:"r"(d),"r"(a)
	32	:"er2");
	33	}
	34
	35	static u16 mm_inw(unsigned long a)
	36	{
	37	register u16 r __asm__("er0");
	38	__asm__("mov.w @%1,r2\n\t"
	39	"mov.b r2l,%x0\n\t"
	40	"mov.b r2h,%w0"
	41	:"=r"(r)
	42	:"r"(a)
	43	:"er2");
	44	return r;
	45	}
	46
92fcaaa8 BZ	47	static void h8300_tf_load(ide_drive_t drive, ide_task_t task)
	48	{
	49	ide_hwif_t *hwif = drive->hwif;
	50	struct ide_io_ports *io_ports = &hwif->io_ports;
	51	struct ide_taskfile *tf = &task->tf;
	52	u8 HIHI = (task->tf_flags & IDE_TFLAG_LBA48) ? 0xE0 : 0xEF;
	53
	54	if (task->tf_flags & IDE_TFLAG_FLAGGED)
	55	HIHI = 0xFF;
	56
92fcaaa8 BZ	57	if (task->tf_flags & IDE_TFLAG_OUT_DATA)
	58	mm_outw((tf->hob_data << 8) \| tf->data, io_ports->data_addr);
	59
	60	if (task->tf_flags & IDE_TFLAG_OUT_HOB_FEATURE)
	61	outb(tf->hob_feature, io_ports->feature_addr);
	62	if (task->tf_flags & IDE_TFLAG_OUT_HOB_NSECT)
	63	outb(tf->hob_nsect, io_ports->nsect_addr);
	64	if (task->tf_flags & IDE_TFLAG_OUT_HOB_LBAL)
	65	outb(tf->hob_lbal, io_ports->lbal_addr);
	66	if (task->tf_flags & IDE_TFLAG_OUT_HOB_LBAM)
	67	outb(tf->hob_lbam, io_ports->lbam_addr);
	68	if (task->tf_flags & IDE_TFLAG_OUT_HOB_LBAH)
	69	outb(tf->hob_lbah, io_ports->lbah_addr);
	70
	71	if (task->tf_flags & IDE_TFLAG_OUT_FEATURE)
	72	outb(tf->feature, io_ports->feature_addr);
	73	if (task->tf_flags & IDE_TFLAG_OUT_NSECT)
	74	outb(tf->nsect, io_ports->nsect_addr);
	75	if (task->tf_flags & IDE_TFLAG_OUT_LBAL)
	76	outb(tf->lbal, io_ports->lbal_addr);
	77	if (task->tf_flags & IDE_TFLAG_OUT_LBAM)
	78	outb(tf->lbam, io_ports->lbam_addr);
	79	if (task->tf_flags & IDE_TFLAG_OUT_LBAH)
	80	outb(tf->lbah, io_ports->lbah_addr);
	81
	82	if (task->tf_flags & IDE_TFLAG_OUT_DEVICE)
	83	outb((tf->device & HIHI) \| drive->select.all,
	84	io_ports->device_addr);
	85	}
	86
	87	static void h8300_tf_read(ide_drive_t drive, ide_task_t task)
	88	{
	89	ide_hwif_t *hwif = drive->hwif;
	90	struct ide_io_ports *io_ports = &hwif->io_ports;
	91	struct ide_taskfile *tf = &task->tf;
	92
	93	if (task->tf_flags & IDE_TFLAG_IN_DATA) {
	94	u16 data = mm_inw(io_ports->data_addr);
	95
	96	tf->data = data & 0xff;
	97	tf->hob_data = (data >> 8) & 0xff;
	98	}
	99
	100	/* be sure we're looking at the low order bits */
ff074883	101	outb(ATA_DEVCTL_OBS & ~0x80, io_ports->ctl_addr);
92fcaaa8 BZ	102
	103	if (task->tf_flags & IDE_TFLAG_IN_NSECT)
	104	tf->nsect = inb(io_ports->nsect_addr);
	105	if (task->tf_flags & IDE_TFLAG_IN_LBAL)
	106	tf->lbal = inb(io_ports->lbal_addr);
	107	if (task->tf_flags & IDE_TFLAG_IN_LBAM)
	108	tf->lbam = inb(io_ports->lbam_addr);
	109	if (task->tf_flags & IDE_TFLAG_IN_LBAH)
	110	tf->lbah = inb(io_ports->lbah_addr);
	111	if (task->tf_flags & IDE_TFLAG_IN_DEVICE)
	112	tf->device = inb(io_ports->device_addr);
	113
	114	if (task->tf_flags & IDE_TFLAG_LBA48) {
ff074883	115	outb(ATA_DEVCTL_OBS \| 0x80, io_ports->ctl_addr);
92fcaaa8 BZ	116
	117	if (task->tf_flags & IDE_TFLAG_IN_HOB_FEATURE)
	118	tf->hob_feature = inb(io_ports->feature_addr);
	119	if (task->tf_flags & IDE_TFLAG_IN_HOB_NSECT)
	120	tf->hob_nsect = inb(io_ports->nsect_addr);
	121	if (task->tf_flags & IDE_TFLAG_IN_HOB_LBAL)
	122	tf->hob_lbal = inb(io_ports->lbal_addr);
	123	if (task->tf_flags & IDE_TFLAG_IN_HOB_LBAM)
	124	tf->hob_lbam = inb(io_ports->lbam_addr);
	125	if (task->tf_flags & IDE_TFLAG_IN_HOB_LBAH)
	126	tf->hob_lbah = inb(io_ports->lbah_addr);
	127	}
	128	}
	129
1da177e4 LT	130	static void mm_outsw(unsigned long addr, void *buf, u32 len)
	131	{
	132	unsigned short bp = (unsigned short )buf;
	133	for (; len > 0; len--, bp++)
	134	(volatile u16 )addr = bswap(*bp);
	135	}
	136
	137	static void mm_insw(unsigned long addr, void *buf, u32 len)
	138	{
	139	unsigned short bp = (unsigned short )buf;
	140	for (; len > 0; len--, bp++)
	141	bp = bswap((volatile u16 *)addr);
	142	}
	143
f04ff9cb BZ	144	static void h8300_input_data(ide_drive_t drive, struct request rq,
	145	void *buf, unsigned int len)
	146	{
	147	mm_insw(drive->hwif->io_ports.data_addr, buf, (len + 1) / 2);
	148	}
	149
	150	static void h8300_output_data(ide_drive_t drive, struct request rq,
	151	void *buf, unsigned int len)
	152	{
	153	mm_outsw(drive->hwif->io_ports.data_addr, buf, (len + 1) / 2);
	154	}
	155
1da177e4 LT	156	#define H8300_IDE_GAP (2)
	157
	158	static inline void hw_setup(hw_regs_t *hw)
	159	{
	160	int i;
	161
	162	memset(hw, 0, sizeof(hw_regs_t));
4c3032d8 BZ	163	for (i = 0; i <= 7; i++)
	164	hw->io_ports_array[i] = CONFIG_H8300_IDE_BASE + H8300_IDE_GAP*i;
	165	hw->io_ports.ctl_addr = CONFIG_H8300_IDE_ALT;
1da177e4	166	hw->irq = EXT_IRQ0 + CONFIG_H8300_IDE_IRQ;
1da177e4 LT	167	hw->chipset = ide_generic;
	168	}
	169
	170	static inline void hwif_setup(ide_hwif_t *hwif)
	171	{
	172	default_hwif_iops(hwif);
	173
92fcaaa8 BZ	174	hwif->tf_load = h8300_tf_load;
	175	hwif->tf_read = h8300_tf_read;
	176
f04ff9cb BZ	177	hwif->input_data = h8300_input_data;
f04ff9cb BZ	178	hwif->output_data = h8300_output_data;
1da177e4 LT	179	}
1da177e4 LT	180
f81eb80b BZ	181	static const struct ide_port_info h8300_port_info = {
	182	.host_flags = IDE_HFLAG_NO_IO_32BIT \| IDE_HFLAG_NO_DMA,
	183	};
	184
ade2daf9	185	static int __init h8300_ide_init(void)
1da177e4 LT	186	{
	187	hw_regs_t hw;
	188	ide_hwif_t *hwif;
cbb010c1	189	int index;
8ac4ce74	190	u8 idx[4] = { 0xff, 0xff, 0xff, 0xff };
1da177e4 LT	191
	192	if (!request_region(CONFIG_H8300_IDE_BASE, H8300_IDE_GAP*8, "ide-h8300"))
	193	goto out_busy;
	194	if (!request_region(CONFIG_H8300_IDE_ALT, H8300_IDE_GAP, "ide-h8300")) {
	195	release_region(CONFIG_H8300_IDE_BASE, H8300_IDE_GAP*8);
	196	goto out_busy;
	197	}
	198
	199	hw_setup(&hw);
	200
eb3aff55 BZ	201	hwif = ide_find_port_slot(&h8300_port_info);
eb3aff55 BZ	202	if (hwif == NULL)
ade2daf9	203	return -ENOENT;
1da177e4	204
cbb010c1	205	index = hwif->index;
cbb010c1	206	ide_init_port_hw(hwif, &hw);
1da177e4	207	hwif_setup(hwif);
cbb010c1	208	printk(KERN_INFO "ide%d: H8/300 generic IDE interface\n", index);
8ac4ce74 BZ	209
	210	idx[0] = index;
	211
f81eb80b	212	ide_device_add(idx, &h8300_port_info);
8ac4ce74	213
ade2daf9	214	return 0;
1da177e4 LT	215
	216	out_busy:
	217	printk(KERN_ERR "ide-h8300: IDE I/F resource already used.\n");
ade2daf9 BZ	218
ade2daf9 BZ	219	return -EBUSY;
1da177e4	220	}
ade2daf9 BZ	221
ade2daf9 BZ	222	module_init(h8300_ide_init);
f95dc320 AB	223
f95dc320 AB	224	MODULE_LICENSE("GPL");