Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 1 | /* |
| 2 | * Copyright 2001 MontaVista Software Inc. |
| 3 | * Author: Jun Sun, jsun@mvista.com or jsun@junsun.net |
| 4 | * |
| 5 | * arch/mips/ddb5xxx/ddb5476/pci_ops.c |
| 6 | * Define the pci_ops for DB5477. |
| 7 | * |
| 8 | * Much of the code is derived from the original DDB5074 port by |
| 9 | * Geert Uytterhoeven <geert@sonycom.com> |
| 10 | * |
| 11 | * This program is free software; you can redistribute it and/or modify it |
| 12 | * under the terms of the GNU General Public License as published by the |
| 13 | * Free Software Foundation; either version 2 of the License, or (at your |
| 14 | * option) any later version. |
| 15 | * |
| 16 | */ |
| 17 | #include <linux/pci.h> |
| 18 | #include <linux/kernel.h> |
| 19 | #include <linux/types.h> |
| 20 | |
| 21 | #include <asm/addrspace.h> |
| 22 | #include <asm/debug.h> |
| 23 | |
| 24 | #include <asm/ddb5xxx/ddb5xxx.h> |
| 25 | |
| 26 | /* |
| 27 | * config_swap structure records what set of pdar/pmr are used |
| 28 | * to access pci config space. It also provides a place hold the |
| 29 | * original values for future restoring. |
| 30 | */ |
| 31 | struct pci_config_swap { |
| 32 | u32 pdar; |
| 33 | u32 pmr; |
| 34 | u32 config_base; |
| 35 | u32 config_size; |
| 36 | u32 pdar_backup; |
| 37 | u32 pmr_backup; |
| 38 | }; |
| 39 | |
| 40 | /* |
| 41 | * On DDB5476, we have one set of swap registers |
| 42 | */ |
| 43 | struct pci_config_swap ext_pci_swap = { |
| 44 | DDB_PCIW0, |
| 45 | DDB_PCIINIT0, |
| 46 | DDB_PCI_CONFIG_BASE, |
| 47 | DDB_PCI_CONFIG_SIZE |
| 48 | }; |
| 49 | |
| 50 | static int pci_config_workaround = 1; |
| 51 | |
| 52 | /* |
| 53 | * access config space |
| 54 | */ |
| 55 | static inline u32 ddb_access_config_base(struct pci_config_swap *swap, u32 bus, /* 0 means top level bus */ |
| 56 | u32 slot_num) |
| 57 | { |
| 58 | u32 pci_addr = 0; |
| 59 | u32 pciinit_offset = 0; |
| 60 | u32 virt_addr = swap->config_base; |
| 61 | u32 option; |
| 62 | |
| 63 | if (pci_config_workaround) { |
| 64 | /* [jsun] work around Vrc5476 controller itself, returnning |
| 65 | * slot 0 essentially makes vrc5476 invisible |
| 66 | */ |
| 67 | if (slot_num == 12) |
| 68 | slot_num = 0; |
| 69 | |
| 70 | #if 0 |
| 71 | /* BUG : skip P2P bridge for now */ |
| 72 | if (slot_num == 5) |
| 73 | slot_num = 0; |
| 74 | #endif |
| 75 | |
| 76 | } else { |
| 77 | /* now we have to be hornest, returning the true |
| 78 | * PCI config headers for vrc5476 |
| 79 | */ |
| 80 | if (slot_num == 12) { |
| 81 | swap->pdar_backup = ddb_in32(swap->pdar); |
| 82 | swap->pmr_backup = ddb_in32(swap->pmr); |
| 83 | return DDB_BASE + DDB_PCI_BASE; |
| 84 | } |
| 85 | } |
| 86 | |
| 87 | /* minimum pdar (window) size is 2MB */ |
| 88 | db_assert(swap->config_size >= (2 << 20)); |
| 89 | |
| 90 | db_assert(slot_num < (1 << 5)); |
| 91 | db_assert(bus < (1 << 8)); |
| 92 | |
| 93 | /* backup registers */ |
| 94 | swap->pdar_backup = ddb_in32(swap->pdar); |
| 95 | swap->pmr_backup = ddb_in32(swap->pmr); |
| 96 | |
| 97 | /* set the pdar (pci window) register */ |
| 98 | ddb_set_pdar(swap->pdar, swap->config_base, swap->config_size, 32, /* 32 bit wide */ |
| 99 | 0, /* not on local memory bus */ |
| 100 | 0); /* not visible from PCI bus (N/A) */ |
| 101 | |
| 102 | /* |
| 103 | * calcuate the absolute pci config addr; |
| 104 | * according to the spec, we start scanning from adr:11 (0x800) |
| 105 | */ |
| 106 | if (bus == 0) { |
| 107 | /* type 0 config */ |
| 108 | pci_addr = 0x800 << slot_num; |
| 109 | } else { |
| 110 | /* type 1 config */ |
| 111 | pci_addr = (bus << 16) | (slot_num << 11); |
| 112 | /* panic("ddb_access_config_base: we don't support type 1 config Yet"); */ |
| 113 | } |
| 114 | |
| 115 | /* |
| 116 | * if pci_addr is less than pci config window size, we set |
| 117 | * pciinit_offset to 0 and adjust the virt_address. |
| 118 | * Otherwise we will try to adjust pciinit_offset. |
| 119 | */ |
| 120 | if (pci_addr < swap->config_size) { |
| 121 | virt_addr = KSEG1ADDR(swap->config_base + pci_addr); |
| 122 | pciinit_offset = 0; |
| 123 | } else { |
| 124 | db_assert((pci_addr & (swap->config_size - 1)) == 0); |
| 125 | virt_addr = KSEG1ADDR(swap->config_base); |
| 126 | pciinit_offset = pci_addr; |
| 127 | } |
| 128 | |
| 129 | /* set the pmr register */ |
| 130 | option = DDB_PCI_ACCESS_32; |
| 131 | if (bus != 0) |
| 132 | option |= DDB_PCI_CFGTYPE1; |
| 133 | ddb_set_pmr(swap->pmr, DDB_PCICMD_CFG, pciinit_offset, option); |
| 134 | |
| 135 | return virt_addr; |
| 136 | } |
| 137 | |
| 138 | static inline void ddb_close_config_base(struct pci_config_swap *swap) |
| 139 | { |
| 140 | ddb_out32(swap->pdar, swap->pdar_backup); |
| 141 | ddb_out32(swap->pmr, swap->pmr_backup); |
| 142 | } |
| 143 | |
| 144 | static int read_config_dword(struct pci_config_swap *swap, |
| 145 | struct pci_dev *dev, u32 where, u32 * val) |
| 146 | { |
| 147 | u32 bus, slot_num, func_num; |
| 148 | u32 base; |
| 149 | |
| 150 | db_assert((where & 3) == 0); |
| 151 | db_assert(where < (1 << 8)); |
| 152 | |
| 153 | /* check if the bus is top-level */ |
| 154 | if (dev->bus->parent != NULL) { |
| 155 | bus = dev->bus->number; |
| 156 | db_assert(bus != 0); |
| 157 | } else { |
| 158 | bus = 0; |
| 159 | } |
| 160 | |
| 161 | slot_num = PCI_SLOT(dev->devfn); |
| 162 | func_num = PCI_FUNC(dev->devfn); |
| 163 | base = ddb_access_config_base(swap, bus, slot_num); |
| 164 | *val = *(volatile u32 *) (base + (func_num << 8) + where); |
| 165 | ddb_close_config_base(swap); |
| 166 | return PCIBIOS_SUCCESSFUL; |
| 167 | } |
| 168 | |
| 169 | static int read_config_word(struct pci_config_swap *swap, |
| 170 | struct pci_dev *dev, u32 where, u16 * val) |
| 171 | { |
| 172 | int status; |
| 173 | u32 result; |
| 174 | |
| 175 | db_assert((where & 1) == 0); |
| 176 | |
| 177 | status = read_config_dword(swap, dev, where & ~3, &result); |
| 178 | if (where & 2) |
| 179 | result >>= 16; |
| 180 | *val = result & 0xffff; |
| 181 | return status; |
| 182 | } |
| 183 | |
| 184 | static int read_config_byte(struct pci_config_swap *swap, |
| 185 | struct pci_dev *dev, u32 where, u8 * val) |
| 186 | { |
| 187 | int status; |
| 188 | u32 result; |
| 189 | |
| 190 | status = read_config_dword(swap, dev, where & ~3, &result); |
| 191 | if (where & 1) |
| 192 | result >>= 8; |
| 193 | if (where & 2) |
| 194 | result >>= 16; |
| 195 | *val = result & 0xff; |
| 196 | return status; |
| 197 | } |
| 198 | |
| 199 | static int write_config_dword(struct pci_config_swap *swap, |
| 200 | struct pci_dev *dev, u32 where, u32 val) |
| 201 | { |
| 202 | u32 bus, slot_num, func_num; |
| 203 | u32 base; |
| 204 | |
| 205 | db_assert((where & 3) == 0); |
| 206 | db_assert(where < (1 << 8)); |
| 207 | |
| 208 | /* check if the bus is top-level */ |
| 209 | if (dev->bus->parent != NULL) { |
| 210 | bus = dev->bus->number; |
| 211 | db_assert(bus != 0); |
| 212 | } else { |
| 213 | bus = 0; |
| 214 | } |
| 215 | |
| 216 | slot_num = PCI_SLOT(dev->devfn); |
| 217 | func_num = PCI_FUNC(dev->devfn); |
| 218 | base = ddb_access_config_base(swap, bus, slot_num); |
| 219 | *(volatile u32 *) (base + (func_num << 8) + where) = val; |
| 220 | ddb_close_config_base(swap); |
| 221 | return PCIBIOS_SUCCESSFUL; |
| 222 | } |
| 223 | |
| 224 | static int write_config_word(struct pci_config_swap *swap, |
| 225 | struct pci_dev *dev, u32 where, u16 val) |
| 226 | { |
| 227 | int status, shift = 0; |
| 228 | u32 result; |
| 229 | |
| 230 | db_assert((where & 1) == 0); |
| 231 | |
| 232 | status = read_config_dword(swap, dev, where & ~3, &result); |
| 233 | if (status != PCIBIOS_SUCCESSFUL) |
| 234 | return status; |
| 235 | |
| 236 | if (where & 2) |
| 237 | shift += 16; |
| 238 | result &= ~(0xffff << shift); |
| 239 | result |= val << shift; |
| 240 | return write_config_dword(swap, dev, where & ~3, result); |
| 241 | } |
| 242 | |
| 243 | static int write_config_byte(struct pci_config_swap *swap, |
| 244 | struct pci_dev *dev, u32 where, u8 val) |
| 245 | { |
| 246 | int status, shift = 0; |
| 247 | u32 result; |
| 248 | |
| 249 | status = read_config_dword(swap, dev, where & ~3, &result); |
| 250 | if (status != PCIBIOS_SUCCESSFUL) |
| 251 | return status; |
| 252 | |
| 253 | if (where & 2) |
| 254 | shift += 16; |
| 255 | if (where & 1) |
| 256 | shift += 8; |
| 257 | result &= ~(0xff << shift); |
| 258 | result |= val << shift; |
| 259 | return write_config_dword(swap, dev, where & ~3, result); |
| 260 | } |
| 261 | |
| 262 | #define MAKE_PCI_OPS(prefix, rw, unitname, unittype, pciswap) \ |
| 263 | static int prefix##_##rw##_config_##unitname(struct pci_dev *dev, int where, unittype val) \ |
| 264 | { \ |
| 265 | return rw##_config_##unitname(pciswap, \ |
| 266 | dev, \ |
| 267 | where, \ |
| 268 | val); \ |
| 269 | } |
| 270 | |
| 271 | MAKE_PCI_OPS(extpci, read, byte, u8 *, &ext_pci_swap) |
| 272 | MAKE_PCI_OPS(extpci, read, word, u16 *, &ext_pci_swap) |
| 273 | MAKE_PCI_OPS(extpci, read, dword, u32 *, &ext_pci_swap) |
| 274 | |
| 275 | MAKE_PCI_OPS(extpci, write, byte, u8, &ext_pci_swap) |
| 276 | MAKE_PCI_OPS(extpci, write, word, u16, &ext_pci_swap) |
| 277 | MAKE_PCI_OPS(extpci, write, dword, u32, &ext_pci_swap) |
| 278 | |
| 279 | struct pci_ops ddb5476_ext_pci_ops = { |
| 280 | extpci_read_config_byte, |
| 281 | extpci_read_config_word, |
| 282 | extpci_read_config_dword, |
| 283 | extpci_write_config_byte, |
| 284 | extpci_write_config_word, |
| 285 | extpci_write_config_dword |
| 286 | }; |