arch/alpha/kernel/lca.c

/* */
This source file includes following definitions.
mk_conf_addr
conf_read
conf_write
pcibios_present
pcibios_find_class
pcibios_find_device
pcibios_read_config_byte
pcibios_read_config_word
pcibios_read_config_dword
pcibios_write_config_byte
pcibios_write_config_word
pcibios_write_config_dword
bios32_init
   1 /*
   2  * Code common to all LCA chips.
   3  */
   4 
   5 #include <linux/config.h>
   6 #include <linux/types.h>
   7 #include <linux/bios32.h>
   8 #include <linux/pci.h>
   9 
  10 #include <asm/system.h>
  11 #include <asm/lca.h>
  12 
  13 /*
  14  * BIOS32-style PCI interface:
  15  */
  16 
  17 /*
  18  * PCI BIOS32 interface:
  19  */
  20 #define MAJOR_REV       0
  21 #define MINOR_REV       0
  22 
  23 #ifdef CONFIG_PCI
  24 
  25 #define mtpr_mces(v) \
  26 ({ \
  27     register unsigned long v0 asm ("0"); \
  28     register unsigned long a0 asm ("16"); \
  29     a0 = (v); \
  30     asm volatile ("call_pal %1 # %0 %2" : "r="(v0) \
  31                   : "i"(PAL_mtpr_mces), "r"(a0) \
  32                   : "memory", "0", "1", "16", "22", "23", "24", "25"); \
  33     v0; \
  34 })
  35 
  36 #define draina()        asm volatile ("call_pal %0" :: "i"(PAL_draina))
  37 
  38 
  39 /*
  40  * Given a bus, device, and function number, compute resulting
  41  * configuration space address and setup the LCA_IOC_CONF register
  42  * accordingly.  It is therefore not safe to have concurrent
  43  * invocations to configuration space access routines, but there
  44  * really shouldn't be any need for this.
  45  */
  46 static int
  47 mk_conf_addr(unsigned char bus, unsigned char device_fn,
     /*  */
  48             unsigned char where, unsigned long *pci_addr)
  49 {
  50         unsigned long addr;
  51 
  52         if (bus == 0) {
  53                 int device = device_fn >> 3;
  54                 int func = device_fn & 0x7;
  55 
  56                 /* type 0 configuration cycle: */
  57 
  58                 if (device > 12) {
  59                         return -1;
  60                 } /* if */
  61 
  62                 *((volatile unsigned long*) LCA_IOC_CONF) = 0;
  63                 addr = (1 << (11 + device)) | (func << 8) | where;
  64         } else {
  65                 /* type 1 configuration cycle: */
  66                 *((volatile unsigned long*) LCA_IOC_CONF) = 1;
  67                 addr = (bus << 16) | (device_fn << 8) | where;
  68         } /* if */
  69         *pci_addr = addr;
  70 
  71         return 0;
  72 }
  73 
  74 
  75 static unsigned int
  76 conf_read(unsigned long addr)
     /*  */
  77 {
  78         unsigned long old_ipl, code, stat0;
  79         unsigned int value;
  80 
  81         old_ipl = swpipl(7);    /* avoid getting hit by machine check */
  82 
  83         /* reset status register to avoid loosing errors: */
  84         stat0 = *((volatile unsigned long*)LCA_IOC_STAT0);
  85         *((volatile unsigned long*)LCA_IOC_STAT0) = stat0;
  86         mb();
  87 
  88         /* access configuration space: */
  89 
  90         value = *((volatile unsigned int*)addr);
  91         draina();
  92 
  93         stat0 = *((unsigned long*)LCA_IOC_STAT0);
  94         if (stat0 & LCA_IOC_STAT0_ERR) {
  95                 code = ((stat0 >> LCA_IOC_STAT0_CODE_SHIFT)
  96                         & LCA_IOC_STAT0_CODE_MASK);
  97                 if (code != 1) {
  98                         printk("lca.c:conf_read: got stat0=%lx\n", stat0);
  99                 }
 100 
 101                 /* reset error status: */
 102                 *((volatile unsigned long*)LCA_IOC_STAT0) = stat0;
 103                 mb();
 104                 mtpr_mces(0x7);                 /* reset machine check */
 105 
 106                 value = 0xffffffff;
 107         }
 108         swpipl(old_ipl);
 109 
 110         return value;
 111 }
 112 
 113 
 114 static void
 115 conf_write(unsigned long addr, unsigned int value)
     /*  */
 116 {
 117 }
 118 
 119 
 120 int
 121 pcibios_present (void)
     /*  */
 122 {
 123         return 1;               /* present if configured */
 124 }
 125 
 126 
 127 int
 128 pcibios_find_class (unsigned long class_code, unsigned short index,
     /*  */
 129                     unsigned char *bus, unsigned char *device_fn)
 130 {
 131         pci_resource_t *dev;
 132         unsigned long w;
 133 
 134         for (dev = pci_device_list; dev; dev = dev->next) {
 135                 pcibios_read_config_dword(dev->bus, dev->dev_fn,
 136                                           PCI_CLASS_REVISION, &w);
 137                 if ((w >> 8) == class_code) {
 138                         if (index == 0) {
 139                                 *bus = dev->bus;
 140                                 *device_fn = dev->dev_fn;
 141                                 return PCIBIOS_SUCCESSFUL;
 142                         }
 143                         --index;
 144                 }
 145         }
 146         return PCIBIOS_DEVICE_NOT_FOUND;
 147 }
 148 
 149 
 150 int
 151 pcibios_find_device (unsigned short vendor, unsigned short device_id,
     /*  */
 152                      unsigned short index, unsigned char *bus,
 153                      unsigned char *device_fn)
 154 {
 155         unsigned long w, desired = (device_id << 16) | vendor;
 156         pci_resource_t *dev;
 157 
 158         if (vendor == 0xffff) {
 159                 return PCIBIOS_BAD_VENDOR_ID;
 160         }
 161 
 162         for (dev = pci_device_list; dev; dev = dev->next) {
 163                 pcibios_read_config_dword(dev->bus, dev->dev_fn,
 164                                           PCI_VENDOR_ID, &w);
 165                 if (w == desired) {
 166                         if (index == 0) {
 167                                 *bus = dev->bus;
 168                                 *device_fn = dev->dev_fn;
 169                                 return PCIBIOS_SUCCESSFUL;
 170                         }
 171                         --index;
 172                 }
 173         }
 174         return PCIBIOS_DEVICE_NOT_FOUND;
 175 }
 176 
 177 
 178 int
 179 pcibios_read_config_byte (unsigned char bus, unsigned char device_fn,
     /*  */
 180                           unsigned char where, unsigned char *value)
 181 {
 182         unsigned long addr = LCA_CONF;
 183         unsigned long pci_addr;
 184 
 185         *value = 0xff;
 186 
 187         if (mk_conf_addr(bus, device_fn, where, &pci_addr) < 0) {
 188                 return PCIBIOS_SUCCESSFUL;
 189         } /* if */
 190 
 191         addr |= (pci_addr << 5) + 0x00;
 192 
 193         *value = conf_read(addr) >> ((where & 3) * 8);
 194 
 195         return PCIBIOS_SUCCESSFUL;
 196 }
 197 
 198 
 199 int
 200 pcibios_read_config_word (unsigned char bus, unsigned char device_fn,
     /*  */
 201                           unsigned char where, unsigned short *value)
 202 {
 203         unsigned long addr = LCA_CONF;
 204         unsigned long pci_addr;
 205 
 206         *value = 0xffff;
 207 
 208         if (where & 0x1) {
 209                 return PCIBIOS_BAD_REGISTER_NUMBER;
 210         } /* if */
 211 
 212         if (mk_conf_addr(bus, device_fn, where, &pci_addr)) {
 213                 return PCIBIOS_SUCCESSFUL;
 214         } /* if */
 215 
 216         addr |= (pci_addr << 5) + 0x08;
 217 
 218         *value = conf_read(addr) >> ((where & 3) * 8);
 219         return PCIBIOS_SUCCESSFUL;
 220 }
 221 
 222 
 223 int
 224 pcibios_read_config_dword (unsigned char bus, unsigned char device_fn,
     /*  */
 225                            unsigned char where, unsigned long *value)
 226 {
 227         unsigned long addr = LCA_CONF;
 228         unsigned long pci_addr;
 229 
 230         *value = 0xffffffff;
 231 
 232         if (where & 0x3) {
 233                 return PCIBIOS_BAD_REGISTER_NUMBER;
 234         } /* if */
 235 
 236         if (mk_conf_addr(bus, device_fn, where, &pci_addr)) {
 237                 return PCIBIOS_SUCCESSFUL;
 238         } /* if */
 239 
 240         addr |= (pci_addr << 5) + 0x18;
 241 
 242         *value = conf_read(addr);
 243 
 244         return PCIBIOS_SUCCESSFUL;
 245 }
 246 
 247 
 248 int
 249 pcibios_write_config_byte (unsigned char bus, unsigned char device_fn,
     /*  */
 250                            unsigned char where, unsigned char value)
 251 {
 252         panic("pcibios_write_config_byte");
 253 }
 254 
 255 int
 256 pcibios_write_config_word (unsigned char bus, unsigned char device_fn,
     /*  */
 257                            unsigned char where, unsigned short value)
 258 {
 259         panic("pcibios_write_config_word");
 260 }
 261 
 262 int
 263 pcibios_write_config_dword (unsigned char bus, unsigned char device_fn,
     /*  */
 264                             unsigned char where, unsigned long value)
 265 {
 266         panic("pcibios_write_config_dword");
 267 }
 268 
 269 #endif /* CONFIG_PCI */
 270 
 271 
 272 unsigned long
 273 bios32_init(unsigned long memory_start, unsigned long memory_end)
     /*  */
 274 {
 275 #ifdef CONFIG_PCI
 276         printk("LCA PCI BIOS32 revision %x.%02x\n", MAJOR_REV, MINOR_REV);
 277 
 278         probe_pci();
 279 
 280 #if 0
 281         {
 282                 char buf[4096];
 283 
 284                 get_pci_list(buf);
 285                 printk("%s", buf);
 286         }
 287 #endif
 288 
 289 #if 0
 290         {
 291                 extern void NCR53c810_test(void);
 292                 NCR53c810_test();
 293         }
 294 #endif
 295 #endif /* CONFIG_PCI */
 296 
 297     return memory_start;
 298 } /* bios32_init */
 299 
 300                         /*** end of lca.c ***/
/* */
root/arch/alpha/kernel/lca.c

DEFINITIONS
