Merge git://git.kernel.org/pub/scm/linux/kernel/git/jejb/scsi-misc-2.6
[pandora-kernel.git] / drivers / ide / h8300 / ide-h8300.c
1 /*
2  * H8/300 generic IDE interface
3  */
4
5 #include <linux/init.h>
6 #include <linux/ide.h>
7
8 #include <asm/io.h>
9 #include <asm/irq.h>
10
11 #define bswap(d) \
12 ({                                      \
13         u16 r;                          \
14         __asm__("mov.b %w1,r1h\n\t"     \
15                 "mov.b %x1,r1l\n\t"     \
16                 "mov.w r1,%0"           \
17                 :"=r"(r)                \
18                 :"r"(d)                 \
19                 :"er1");                \
20         (r);                            \
21 })
22
23 static void mm_outw(u16 d, unsigned long a)
24 {
25         __asm__("mov.b %w0,r2h\n\t"
26                 "mov.b %x0,r2l\n\t"
27                 "mov.w r2,@%1"
28                 :
29                 :"r"(d),"r"(a)
30                 :"er2");
31 }
32
33 static u16 mm_inw(unsigned long a)
34 {
35         register u16 r __asm__("er0");
36         __asm__("mov.w @%1,r2\n\t"
37                 "mov.b r2l,%x0\n\t"
38                 "mov.b r2h,%w0"
39                 :"=r"(r)
40                 :"r"(a)
41                 :"er2");
42         return r;
43 }
44
45 static void h8300_tf_load(ide_drive_t *drive, ide_task_t *task)
46 {
47         ide_hwif_t *hwif = drive->hwif;
48         struct ide_io_ports *io_ports = &hwif->io_ports;
49         struct ide_taskfile *tf = &task->tf;
50         u8 HIHI = (task->tf_flags & IDE_TFLAG_LBA48) ? 0xE0 : 0xEF;
51
52         if (task->tf_flags & IDE_TFLAG_FLAGGED)
53                 HIHI = 0xFF;
54
55         ide_set_irq(drive, 1);
56
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 */
101         outb(drive->ctl & ~0x80, io_ports->ctl_addr);
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) {
115                 outb(drive->ctl | 0x80, io_ports->ctl_addr);
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
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
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
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));
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;
166         hw->irq = EXT_IRQ0 + CONFIG_H8300_IDE_IRQ;
167         hw->chipset = ide_generic;
168 }
169
170 static inline void hwif_setup(ide_hwif_t *hwif)
171 {
172         default_hwif_iops(hwif);
173
174         hwif->tf_load = h8300_tf_load;
175         hwif->tf_read = h8300_tf_read;
176
177         hwif->input_data  = h8300_input_data;
178         hwif->output_data = h8300_output_data;
179 }
180
181 static int __init h8300_ide_init(void)
182 {
183         hw_regs_t hw;
184         ide_hwif_t *hwif;
185         int index;
186         u8 idx[4] = { 0xff, 0xff, 0xff, 0xff };
187
188         if (!request_region(CONFIG_H8300_IDE_BASE, H8300_IDE_GAP*8, "ide-h8300"))
189                 goto out_busy;
190         if (!request_region(CONFIG_H8300_IDE_ALT, H8300_IDE_GAP, "ide-h8300")) {
191                 release_region(CONFIG_H8300_IDE_BASE, H8300_IDE_GAP*8);
192                 goto out_busy;
193         }
194
195         hw_setup(&hw);
196
197         hwif = ide_find_port();
198         if (hwif == NULL) {
199                 printk(KERN_ERR "ide-h8300: IDE I/F register failed\n");
200                 return -ENOENT;
201         }
202
203         index = hwif->index;
204         ide_init_port_data(hwif, index);
205         ide_init_port_hw(hwif, &hw);
206         hwif_setup(hwif);
207         hwif->host_flags = IDE_HFLAG_NO_IO_32BIT;
208         printk(KERN_INFO "ide%d: H8/300 generic IDE interface\n", index);
209
210         idx[0] = index;
211
212         ide_device_add(idx, NULL);
213
214         return 0;
215
216 out_busy:
217         printk(KERN_ERR "ide-h8300: IDE I/F resource already used.\n");
218
219         return -EBUSY;
220 }
221
222 module_init(h8300_ide_init);
223
224 MODULE_LICENSE("GPL");