arch/sparc/lib/PeeCeeI.c

   1 /*
   2  * PeeCeeI.c: The emerging standard...
   3  *
   4  * Copyright (C) 1997 David S. Miller (davem@caip.rutgers.edu)
   5  */
   6
   7 #include <linux/module.h>
   8
   9 #include <asm/io.h>
  10 #include <asm/byteorder.h>
  11
  12 void outsb(unsigned long __addr, const void *src, unsigned long count)
  13 {
  14         void __iomem *addr = (void __iomem *) __addr;
  15         const u8 *p = src;
  16
  17         while (count--)
  18                 outb(*p++, addr);
  19 }
  20 EXPORT_SYMBOL(outsb);
  21
  22 void outsw(unsigned long __addr, const void *src, unsigned long count)
  23 {
  24         void __iomem *addr = (void __iomem *) __addr;
  25
  26         while (count--) {
  27                 __raw_writew(*(u16 *)src, addr);
  28                 src += sizeof(u16);
  29         }
  30 }
  31 EXPORT_SYMBOL(outsw);
  32
  33 void outsl(unsigned long __addr, const void *src, unsigned long count)
  34 {
  35         void __iomem *addr = (void __iomem *) __addr;
  36         u32 l, l2;
  37
  38         if (!count)
  39                 return;
  40
  41         switch (((unsigned long)src) & 0x3) {
  42         case 0x0:
  43                 /* src is naturally aligned */
  44                 while (count--) {
  45                         __raw_writel(*(u32 *)src, addr);
  46                         src += sizeof(u32);
  47                 }
  48                 break;
  49         case 0x2:
  50                 /* 2-byte alignment */
  51                 while (count--) {
  52                         l = (*(u16 *)src) << 16;
  53                         l |= *(u16 *)(src + sizeof(u16));
  54                         __raw_writel(l, addr);
  55                         src += sizeof(u32);
  56                 }
  57                 break;
  58         case 0x1:
  59                 /* Hold three bytes in l each time, grab a byte from l2 */
  60                 l = (*(u8 *)src) << 24;
  61                 l |= (*(u16 *)(src + sizeof(u8))) << 8;
  62                 src += sizeof(u8) + sizeof(u16);
  63                 while (count--) {
  64                         l2 = *(u32 *)src;
  65                         l |= (l2 >> 24);
  66                         __raw_writel(l, addr);
  67                         l = l2 << 8;
  68                         src += sizeof(u32);
  69                 }
  70                 break;
  71         case 0x3:
  72                 /* Hold a byte in l each time, grab 3 bytes from l2 */
  73                 l = (*(u8 *)src) << 24;
  74                 src += sizeof(u8);
  75                 while (count--) {
  76                         l2 = *(u32 *)src;
  77                         l |= (l2 >> 8);
  78                         __raw_writel(l, addr);
  79                         l = l2 << 24;
  80                         src += sizeof(u32);
  81                 }
  82                 break;
  83         }
  84 }
  85 EXPORT_SYMBOL(outsl);
  86
  87 void insb(unsigned long __addr, void *dst, unsigned long count)
  88 {
  89         void __iomem *addr = (void __iomem *) __addr;
  90
  91         if (count) {
  92                 u32 *pi;
  93                 u8 *pb = dst;
  94
  95                 while ((((unsigned long)pb) & 0x3) && count--)
  96                         *pb++ = inb(addr);
  97                 pi = (u32 *)pb;
  98                 while (count >= 4) {
  99                         u32 w;
 100
 101                         w  = (inb(addr) << 24);
 102                         w |= (inb(addr) << 16);
 103                         w |= (inb(addr) << 8);
 104                         w |= (inb(addr) << 0);
 105                         *pi++ = w;
 106                         count -= 4;
 107                 }
 108                 pb = (u8 *)pi;
 109                 while (count--)
 110                         *pb++ = inb(addr);
 111         }
 112 }
 113 EXPORT_SYMBOL(insb);
 114
 115 void insw(unsigned long __addr, void *dst, unsigned long count)
 116 {
 117         void __iomem *addr = (void __iomem *) __addr;
 118
 119         if (count) {
 120                 u16 *ps = dst;
 121                 u32 *pi;
 122
 123                 if (((unsigned long)ps) & 0x2) {
 124                         *ps++ = le16_to_cpu(inw(addr));
 125                         count--;
 126                 }
 127                 pi = (u32 *)ps;
 128                 while (count >= 2) {
 129                         u32 w;
 130
 131                         w  = (le16_to_cpu(inw(addr)) << 16);
 132                         w |= (le16_to_cpu(inw(addr)) << 0);
 133                         *pi++ = w;
 134                         count -= 2;
 135                 }
 136                 ps = (u16 *)pi;
 137                 if (count)
 138                         *ps = le16_to_cpu(inw(addr));
 139         }
 140 }
 141 EXPORT_SYMBOL(insw);
 142
 143 void insl(unsigned long __addr, void *dst, unsigned long count)
 144 {
 145         void __iomem *addr = (void __iomem *) __addr;
 146
 147         if (count) {
 148                 if ((((unsigned long)dst) & 0x3) == 0) {
 149                         u32 *pi = dst;
 150                         while (count--)
 151                                 *pi++ = le32_to_cpu(inl(addr));
 152                 } else {
 153                         u32 l = 0, l2, *pi;
 154                         u16 *ps;
 155                         u8 *pb;
 156
 157                         switch (((unsigned long)dst) & 3) {
 158                         case 0x2:
 159                                 ps = dst;
 160                                 count -= 1;
 161                                 l = le32_to_cpu(inl(addr));
 162                                 *ps++ = l;
 163                                 pi = (u32 *)ps;
 164                                 while (count--) {
 165                                         l2 = le32_to_cpu(inl(addr));
 166                                         *pi++ = (l << 16) | (l2 >> 16);
 167                                         l = l2;
 168                                 }
 169                                 ps = (u16 *)pi;
 170                                 *ps = l;
 171                                 break;
 172
 173                         case 0x1:
 174                                 pb = dst;
 175                                 count -= 1;
 176                                 l = le32_to_cpu(inl(addr));
 177                                 *pb++ = l >> 24;
 178                                 ps = (u16 *)pb;
 179                                 *ps++ = ((l >> 8) & 0xffff);
 180                                 pi = (u32 *)ps;
 181                                 while (count--) {
 182                                         l2 = le32_to_cpu(inl(addr));
 183                                         *pi++ = (l << 24) | (l2 >> 8);
 184                                         l = l2;
 185                                 }
 186                                 pb = (u8 *)pi;
 187                                 *pb = l;
 188                                 break;
 189
 190                         case 0x3:
 191                                 pb = (u8 *)dst;
 192                                 count -= 1;
 193                                 l = le32_to_cpu(inl(addr));
 194                                 *pb++ = l >> 24;
 195                                 pi = (u32 *)pb;
 196                                 while (count--) {
 197                                         l2 = le32_to_cpu(inl(addr));
 198                                         *pi++ = (l << 8) | (l2 >> 24);
 199                                         l = l2;
 200                                 }
 201                                 ps = (u16 *)pi;
 202                                 *ps++ = ((l >> 8) & 0xffff);
 203                                 pb = (u8 *)ps;
 204                                 *pb = l;
 205                                 break;
 206                         }
 207                 }
 208         }
 209 }
 210 EXPORT_SYMBOL(insl);
 211