target/linux/ar7-2.6/files/arch/mips/ar7/vlynq-pci.c

   1 /*
   2  * $Id$
   3  *
   4  * Copyright (C) 2006, 2007 OpenWrt.org
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  19  */
  20
  21 #include <linux/types.h>
  22 #include <linux/pci.h>
  23 #include <linux/kernel.h>
  24 #include <linux/init.h>
  25 #include <linux/irq.h>
  26 #include <asm/ar7/vlynq.h>
  27
  28 #define VLYNQ_PCI_SLOTS 2
  29
  30 struct vlynq_reg_config {
  31         u32 offset;
  32         u32 value;
  33 };
  34
  35 struct vlynq_pci_config {
  36         u32 chip_id;
  37         char name[32];
  38         struct vlynq_mapping rx_mapping[4];
  39         int irq;
  40         int irq_type;
  41         u32 chip;
  42         u32 class;
  43         int num_regs;
  44         struct vlynq_reg_config regs[10];
  45 };
  46
  47 struct vlynq_pci_private {
  48         u32 latency;
  49         u32 cache_line;
  50         u32 command;
  51         u32 sz_mask;
  52         struct vlynq_pci_config *config;
  53 };
  54
  55 static struct vlynq_pci_config known_devices[] = {
  56         {
  57                 .chip_id = 0x00000009, .name = "TI ACX111",
  58                 .rx_mapping = {
  59                         { .size = 0x22000, .offset = 0xf0000000 },
  60                         { .size = 0x40000, .offset = 0xc0000000 },
  61                         { .size = 0x0, .offset = 0x0 },
  62                         { .size = 0x0, .offset = 0x0 },
  63                 },
  64                 .irq = 0, .chip = 0x9066104c,
  65                 .irq_type = IRQ_TYPE_EDGE_RISING,
  66                 .class = PCI_CLASS_NETWORK_OTHER,
  67                 .num_regs = 5,
  68                 .regs = {
  69                         { .offset = 0x790, .value = (0xd0000000 - (ARCH_PFN_OFFSET << PAGE_SHIFT)) },
  70                         { .offset = 0x794, .value = (0xd0000000 - (ARCH_PFN_OFFSET << PAGE_SHIFT)) },
  71                         { .offset = 0x740, .value = 0 },
  72                         { .offset = 0x744, .value = 0x00010000 },
  73                         { .offset = 0x764, .value = 0x00010000 },
  74                 },
  75         },
  76 };
  77
  78 static struct vlynq_device *slots[VLYNQ_PCI_SLOTS] = { NULL, };
  79
  80 static struct resource vlynq_io_resource = {
  81         .start  = 0x00000000,
  82         .end    = 0x00000000,
  83         .name   = "pci IO space",
  84         .flags  = IORESOURCE_IO
  85 };
  86
  87 static struct resource vlynq_mem_resource = {
  88         .start  = 0x00000000,
  89         .end    = 0x00000000,
  90         .name   = "pci memory space",
  91         .flags  = IORESOURCE_MEM
  92 };
  93
  94 static inline u32 vlynq_get_mapped(struct vlynq_device *dev, int res)
  95 {
  96         int i;
  97         struct vlynq_pci_private *priv = dev->priv;
  98         u32 ret = dev->mem_start;
  99         if (!priv->config->rx_mapping[res].size) return 0;
 100         for (i = 0; i < res; i++)
 101                 ret += priv->config->rx_mapping[i].size;
 102
 103         return ret;
 104 }
 105
 106 static inline u32 vlynq_read(u32 val, int size) {
 107         switch (size) {
 108         case 1:
 109                 return *(u8 *)&val;
 110         case 2:
 111                 return *(u16 *)&val;
 112         }
 113         return val;
 114 }
 115
 116 static int vlynq_config_read(struct pci_bus *bus, unsigned int devfn, int where, int size, u32 *val)
 117 {
 118         struct vlynq_device *dev;
 119         struct vlynq_pci_private *priv;
 120         int resno, slot = PCI_SLOT(devfn);
 121
 122         if ((size == 2) && (where & 1))
 123                 return PCIBIOS_BAD_REGISTER_NUMBER;
 124         else if ((size == 4) && (where & 3))
 125                 return PCIBIOS_BAD_REGISTER_NUMBER;
 126
 127         if (slot >= VLYNQ_PCI_SLOTS)
 128                 return PCIBIOS_DEVICE_NOT_FOUND;
 129
 130         dev = slots[slot];
 131
 132         if (!dev || (PCI_FUNC(devfn) > 0))
 133                 return PCIBIOS_DEVICE_NOT_FOUND;
 134
 135         priv = dev->priv;
 136
 137         switch (where) {
 138         case PCI_VENDOR_ID:
 139                 *val = vlynq_read(priv->config->chip, size);
 140                 break;
 141         case PCI_DEVICE_ID:
 142                 *val = priv->config->chip & 0xffff;
 143         case PCI_COMMAND:
 144                 *val = priv->command;
 145         case PCI_STATUS:
 146 /*              *val = PCI_STATUS_CAP_LIST;*/
 147                 *val = 0;
 148                 break;
 149         case PCI_CLASS_REVISION:
 150                 *val = priv->config->class;
 151                 break;
 152         case PCI_LATENCY_TIMER:
 153                 *val = priv->latency;
 154                 break;
 155         case PCI_HEADER_TYPE:
 156                 *val = PCI_HEADER_TYPE_NORMAL;
 157                 break;
 158         case PCI_CACHE_LINE_SIZE:
 159                 *val = priv->cache_line;
 160                 break;
 161         case PCI_BASE_ADDRESS_0:
 162         case PCI_BASE_ADDRESS_1:
 163         case PCI_BASE_ADDRESS_2:
 164         case PCI_BASE_ADDRESS_3:
 165                 resno = (where - PCI_BASE_ADDRESS_0) >> 2;
 166                 if (priv->sz_mask & (1 << resno)) {
 167                         priv->sz_mask &= ~(1 << resno);
 168                         *val = priv->config->rx_mapping[resno].size;
 169                 } else {
 170                         *val = vlynq_get_mapped(dev, resno);
 171                 }
 172                 break;
 173         case PCI_BASE_ADDRESS_4:
 174         case PCI_BASE_ADDRESS_5:
 175         case PCI_SUBSYSTEM_VENDOR_ID:
 176         case PCI_SUBSYSTEM_ID:
 177         case PCI_ROM_ADDRESS:
 178         case PCI_INTERRUPT_LINE:
 179         case PCI_CARDBUS_CIS:
 180         case PCI_CAPABILITY_LIST:
 181         case PCI_INTERRUPT_PIN:
 182                 *val = 0;
 183                 break;
 184         default:
 185                 printk("%s: Read of unknown register 0x%x (size %d)\n",
 186                        dev->dev.bus_id, where, size);
 187                 return PCIBIOS_BAD_REGISTER_NUMBER;
 188         }
 189         return PCIBIOS_SUCCESSFUL;
 190 }
 191
 192 static int vlynq_config_write(struct pci_bus *bus, unsigned int devfn, int where, int size, u32 val)
 193 {
 194         struct vlynq_device *dev;
 195         struct vlynq_pci_private *priv;
 196         int resno, slot = PCI_SLOT(devfn);
 197
 198         if ((size == 2) && (where & 1))
 199                 return PCIBIOS_BAD_REGISTER_NUMBER;
 200         else if ((size == 4) && (where & 3))
 201                 return PCIBIOS_BAD_REGISTER_NUMBER;
 202
 203         if (slot >= VLYNQ_PCI_SLOTS)
 204                 return PCIBIOS_DEVICE_NOT_FOUND;
 205
 206         dev = slots[slot];
 207
 208         if (!dev || (PCI_FUNC(devfn) > 0))
 209                 return PCIBIOS_DEVICE_NOT_FOUND;
 210
 211         priv = dev->priv;
 212
 213         switch (where) {
 214         case PCI_VENDOR_ID:
 215         case PCI_DEVICE_ID:
 216         case PCI_STATUS:
 217         case PCI_CLASS_REVISION:
 218         case PCI_HEADER_TYPE:
 219         case PCI_CACHE_LINE_SIZE:
 220         case PCI_SUBSYSTEM_VENDOR_ID:
 221         case PCI_SUBSYSTEM_ID:
 222         case PCI_INTERRUPT_LINE:
 223         case PCI_INTERRUPT_PIN:
 224         case PCI_CARDBUS_CIS:
 225         case PCI_CAPABILITY_LIST:
 226                 return PCIBIOS_FUNC_NOT_SUPPORTED;
 227         case PCI_COMMAND:
 228                 priv->command = val;
 229         case PCI_LATENCY_TIMER:
 230                 priv->latency = val;
 231                 break;
 232         case PCI_BASE_ADDRESS_0:
 233         case PCI_BASE_ADDRESS_1:
 234         case PCI_BASE_ADDRESS_2:
 235         case PCI_BASE_ADDRESS_3:
 236                 if (val == 0xffffffff) {
 237                         resno = (where - PCI_BASE_ADDRESS_0) >> 2;
 238                         priv->sz_mask |= (1 << resno);
 239                         break;
 240                 }
 241         case PCI_BASE_ADDRESS_4:
 242         case PCI_BASE_ADDRESS_5:
 243         case PCI_ROM_ADDRESS:
 244                 break;
 245         default:
 246                 printk("%s: Write to unknown register 0x%x (size %d) value=0x%x\n",
 247                        dev->dev.bus_id, where, size, val);
 248                 return PCIBIOS_BAD_REGISTER_NUMBER;
 249         }
 250         return PCIBIOS_SUCCESSFUL;
 251 }
 252
 253 static struct pci_ops vlynq_pci_ops = {
 254         vlynq_config_read,
 255         vlynq_config_write
 256 };
 257
 258 static struct pci_controller vlynq_controller = {
 259         .pci_ops        = &vlynq_pci_ops,
 260         .io_resource    = &vlynq_io_resource,
 261         .mem_resource   = &vlynq_mem_resource,
 262 };
 263
 264 static int vlynq_pci_probe(struct vlynq_device *dev)
 265 {
 266         int result, i;
 267         u32 chip_id, addr;
 268         struct vlynq_pci_private *priv;
 269         struct vlynq_mapping mapping[4] = { { 0, }, };
 270         struct vlynq_pci_config *config = NULL;
 271
 272         result = vlynq_set_local_irq(dev, 31);
 273         if (result)
 274                 return result;
 275
 276         result = vlynq_set_remote_irq(dev, 30);
 277         if (result)
 278                 return result;
 279
 280         result = vlynq_device_enable(dev);
 281         if (result)
 282                 return result;
 283
 284         chip_id = vlynq_remote_id(dev);
 285         for (i = 0; i < ARRAY_SIZE(known_devices); i++)
 286                 if (chip_id == known_devices[i].chip_id)
 287                         config = &known_devices[i];
 288
 289         if (!config) {
 290                 printk("vlynq-pci: skipping unknown device "
 291                        "%04x:%04x at %s\n", chip_id >> 16,
 292                        chip_id & 0xffff, dev->dev.bus_id);
 293                 result = -ENODEV;
 294                 goto fail;
 295         }
 296
 297         printk("vlynq-pci: attaching device %s at %s\n",
 298                config->name, dev->dev.bus_id);
 299
 300         priv = kmalloc(sizeof(struct vlynq_pci_private), GFP_KERNEL);
 301         if (!priv) {
 302                 printk(KERN_ERR "%s: failed to allocate private data\n",
 303                        dev->dev.bus_id);
 304                 result = -ENOMEM;
 305                 goto fail;
 306         }
 307
 308         memset(priv, 0, sizeof(struct vlynq_pci_private));
 309         priv->latency = 64;
 310         priv->cache_line = 32;
 311         priv->config = config;
 312
 313         mapping[0].offset = ARCH_PFN_OFFSET << PAGE_SHIFT;
 314         mapping[0].size = 0x02000000;
 315         vlynq_set_local_mapping(dev, dev->mem_start, mapping);
 316         vlynq_set_remote_mapping(dev, 0, config->rx_mapping);
 317
 318         set_irq_type(vlynq_virq_to_irq(dev, config->irq), config->irq_type);
 319
 320         addr = (u32)ioremap_nocache(dev->mem_start, 0x10000);
 321         if (!addr) {
 322                 printk(KERN_ERR "%s: failed to remap io memory\n",
 323                        dev->dev.bus_id);
 324                 result = -ENXIO;
 325                 goto fail;
 326         }
 327
 328         for (i = 0; i < config->num_regs; i++)
 329                 *(volatile u32 *)(addr + config->regs[i].offset) =
 330                         config->regs[i].value;
 331
 332         dev->priv = priv;
 333         for (i = 0; i < VLYNQ_PCI_SLOTS; i++) {
 334                 if (!slots[i]) {
 335                         slots[i] = dev;
 336                         break;
 337                 }
 338         }
 339
 340         return 0;
 341
 342 fail:
 343         vlynq_device_disable(dev);
 344
 345         return result;
 346 }
 347
 348 static int vlynq_pci_remove(struct vlynq_device *dev)
 349 {
 350         int i;
 351         struct vlynq_pci_private *priv = dev->priv;
 352
 353         for (i = 0; i < VLYNQ_PCI_SLOTS; i++)
 354                 if (slots[i] == dev)
 355                         slots[i] = NULL;
 356
 357         vlynq_device_disable(dev);
 358         kfree(priv);
 359
 360         return 0;
 361 }
 362
 363 static struct vlynq_driver vlynq_pci = {
 364         .name = "PCI over VLYNQ emulation",
 365         .probe = vlynq_pci_probe,
 366         .remove = vlynq_pci_remove,
 367 };
 368
 369 int vlynq_pci_init(void)
 370 {
 371         int res;
 372         res = vlynq_register_driver(&vlynq_pci);
 373         if (res)
 374                 return res;
 375
 376         register_pci_controller(&vlynq_controller);
 377
 378         return 0;
 379 }
 380
 381 int pcibios_map_irq(struct pci_dev *pdev, u8 slot, u8 pin)
 382 {
 383         struct vlynq_device *dev;
 384         struct vlynq_pci_private *priv;
 385
 386         dev = slots[slot];
 387
 388         if (!dev)
 389                 return 0;
 390
 391         priv = dev->priv;
 392
 393         return vlynq_virq_to_irq(dev, priv->config->irq);
 394 }
 395
 396 /* Do platform specific device initialization at pci_enable_device() time */
 397 int pcibios_plat_dev_init(struct pci_dev *dev)
 398 {
 399         return 0;
 400 }