drivers/ide/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 DRV_NAME "ide-h8300"
  12
  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
  47 static void h8300_tf_load(ide_drive_t *drive, struct ide_cmd *cmd)
  48 {
  49         ide_hwif_t *hwif = drive->hwif;
  50         struct ide_io_ports *io_ports = &hwif->io_ports;
  51         struct ide_taskfile *tf = &cmd->tf;
  52         u8 HIHI = (cmd->tf_flags & IDE_TFLAG_LBA48) ? 0xE0 : 0xEF;
  53
  54         if (cmd->ftf_flags & IDE_FTFLAG_FLAGGED)
  55                 HIHI = 0xFF;
  56
  57         if (cmd->tf_flags & IDE_TFLAG_OUT_HOB_FEATURE)
  58                 outb(tf->hob_feature, io_ports->feature_addr);
  59         if (cmd->tf_flags & IDE_TFLAG_OUT_HOB_NSECT)
  60                 outb(tf->hob_nsect, io_ports->nsect_addr);
  61         if (cmd->tf_flags & IDE_TFLAG_OUT_HOB_LBAL)
  62                 outb(tf->hob_lbal, io_ports->lbal_addr);
  63         if (cmd->tf_flags & IDE_TFLAG_OUT_HOB_LBAM)
  64                 outb(tf->hob_lbam, io_ports->lbam_addr);
  65         if (cmd->tf_flags & IDE_TFLAG_OUT_HOB_LBAH)
  66                 outb(tf->hob_lbah, io_ports->lbah_addr);
  67
  68         if (cmd->tf_flags & IDE_TFLAG_OUT_FEATURE)
  69                 outb(tf->feature, io_ports->feature_addr);
  70         if (cmd->tf_flags & IDE_TFLAG_OUT_NSECT)
  71                 outb(tf->nsect, io_ports->nsect_addr);
  72         if (cmd->tf_flags & IDE_TFLAG_OUT_LBAL)
  73                 outb(tf->lbal, io_ports->lbal_addr);
  74         if (cmd->tf_flags & IDE_TFLAG_OUT_LBAM)
  75                 outb(tf->lbam, io_ports->lbam_addr);
  76         if (cmd->tf_flags & IDE_TFLAG_OUT_LBAH)
  77                 outb(tf->lbah, io_ports->lbah_addr);
  78
  79         if (cmd->tf_flags & IDE_TFLAG_OUT_DEVICE)
  80                 outb((tf->device & HIHI) | drive->select,
  81                      io_ports->device_addr);
  82 }
  83
  84 static void h8300_tf_read(ide_drive_t *drive, struct ide_cmd *cmd)
  85 {
  86         ide_hwif_t *hwif = drive->hwif;
  87         struct ide_io_ports *io_ports = &hwif->io_ports;
  88         struct ide_taskfile *tf = &cmd->tf;
  89
  90         /* be sure we're looking at the low order bits */
  91         outb(ATA_DEVCTL_OBS, io_ports->ctl_addr);
  92
  93         if (cmd->tf_flags & IDE_TFLAG_IN_ERROR)
  94                 tf->error  = inb(io_ports->feature_addr);
  95         if (cmd->tf_flags & IDE_TFLAG_IN_NSECT)
  96                 tf->nsect  = inb(io_ports->nsect_addr);
  97         if (cmd->tf_flags & IDE_TFLAG_IN_LBAL)
  98                 tf->lbal   = inb(io_ports->lbal_addr);
  99         if (cmd->tf_flags & IDE_TFLAG_IN_LBAM)
 100                 tf->lbam   = inb(io_ports->lbam_addr);
 101         if (cmd->tf_flags & IDE_TFLAG_IN_LBAH)
 102                 tf->lbah   = inb(io_ports->lbah_addr);
 103         if (cmd->tf_flags & IDE_TFLAG_IN_DEVICE)
 104                 tf->device = inb(io_ports->device_addr);
 105
 106         if (cmd->tf_flags & IDE_TFLAG_LBA48) {
 107                 outb(ATA_HOB | ATA_DEVCTL_OBS, io_ports->ctl_addr);
 108
 109                 if (cmd->tf_flags & IDE_TFLAG_IN_HOB_ERROR)
 110                         tf->hob_error = inb(io_ports->feature_addr);
 111                 if (cmd->tf_flags & IDE_TFLAG_IN_HOB_NSECT)
 112                         tf->hob_nsect = inb(io_ports->nsect_addr);
 113                 if (cmd->tf_flags & IDE_TFLAG_IN_HOB_LBAL)
 114                         tf->hob_lbal  = inb(io_ports->lbal_addr);
 115                 if (cmd->tf_flags & IDE_TFLAG_IN_HOB_LBAM)
 116                         tf->hob_lbam  = inb(io_ports->lbam_addr);
 117                 if (cmd->tf_flags & IDE_TFLAG_IN_HOB_LBAH)
 118                         tf->hob_lbah  = inb(io_ports->lbah_addr);
 119         }
 120 }
 121
 122 static void mm_outsw(unsigned long addr, void *buf, u32 len)
 123 {
 124         unsigned short *bp = (unsigned short *)buf;
 125         for (; len > 0; len--, bp++)
 126                 *(volatile u16 *)addr = bswap(*bp);
 127 }
 128
 129 static void mm_insw(unsigned long addr, void *buf, u32 len)
 130 {
 131         unsigned short *bp = (unsigned short *)buf;
 132         for (; len > 0; len--, bp++)
 133                 *bp = bswap(*(volatile u16 *)addr);
 134 }
 135
 136 static void h8300_input_data(ide_drive_t *drive, struct ide_cmd *cmd,
 137                              void *buf, unsigned int len)
 138 {
 139         mm_insw(drive->hwif->io_ports.data_addr, buf, (len + 1) / 2);
 140 }
 141
 142 static void h8300_output_data(ide_drive_t *drive, struct ide_cmd *cmd,
 143                               void *buf, unsigned int len)
 144 {
 145         mm_outsw(drive->hwif->io_ports.data_addr, buf, (len + 1) / 2);
 146 }
 147
 148 static const struct ide_tp_ops h8300_tp_ops = {
 149         .exec_command           = ide_exec_command,
 150         .read_status            = ide_read_status,
 151         .read_altstatus         = ide_read_altstatus,
 152         .write_devctl           = ide_write_devctl,
 153
 154         .dev_select             = ide_dev_select,
 155         .tf_load                = h8300_tf_load,
 156         .tf_read                = h8300_tf_read,
 157
 158         .input_data             = h8300_input_data,
 159         .output_data            = h8300_output_data,
 160 };
 161
 162 #define H8300_IDE_GAP (2)
 163
 164 static inline void hw_setup(hw_regs_t *hw)
 165 {
 166         int i;
 167
 168         memset(hw, 0, sizeof(hw_regs_t));
 169         for (i = 0; i <= 7; i++)
 170                 hw->io_ports_array[i] = CONFIG_H8300_IDE_BASE + H8300_IDE_GAP*i;
 171         hw->io_ports.ctl_addr = CONFIG_H8300_IDE_ALT;
 172         hw->irq = EXT_IRQ0 + CONFIG_H8300_IDE_IRQ;
 173         hw->chipset = ide_generic;
 174 }
 175
 176 static const struct ide_port_info h8300_port_info = {
 177         .tp_ops                 = &h8300_tp_ops,
 178         .host_flags             = IDE_HFLAG_NO_IO_32BIT | IDE_HFLAG_NO_DMA,
 179 };
 180
 181 static int __init h8300_ide_init(void)
 182 {
 183         hw_regs_t hw, *hws[] = { &hw, NULL, NULL, NULL };
 184
 185         printk(KERN_INFO DRV_NAME ": H8/300 generic IDE interface\n");
 186
 187         if (!request_region(CONFIG_H8300_IDE_BASE, H8300_IDE_GAP*8, "ide-h8300"))
 188                 goto out_busy;
 189         if (!request_region(CONFIG_H8300_IDE_ALT, H8300_IDE_GAP, "ide-h8300")) {
 190                 release_region(CONFIG_H8300_IDE_BASE, H8300_IDE_GAP*8);
 191                 goto out_busy;
 192         }
 193
 194         hw_setup(&hw);
 195
 196         return ide_host_add(&h8300_port_info, hws, NULL);
 197
 198 out_busy:
 199         printk(KERN_ERR "ide-h8300: IDE I/F resource already used.\n");
 200
 201         return -EBUSY;
 202 }
 203
 204 module_init(h8300_ide_init);
 205
 206 MODULE_LICENSE("GPL");