LXR uboot/lib_i386/pci.c

   1/*
   2 * (C) Copyright 2002
   3 * Daniel Engström, Omicron Ceti AB, daniel@omicron.se
   4 *
   5 * See file CREDITS for list of people who contributed to this
   6 * project.
   7 *
   8 * This program is free software; you can redistribute it and/or
   9 * modify it under the terms of the GNU General Public License as
  10 * published by the Free Software Foundation; either version 2 of
  11 * the License, or (at your option) any later version.
  12 *
  13 * This program is distributed in the hope that it will be useful,
  14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16 * GNU General Public License for more details.
  17 *
  18 * You should have received a copy of the GNU General Public License
  19 * along with this program; if not, write to the Free Software
  20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  21 * MA 02111-1307 USA
  22 */
  23
  24#include <common.h>
  25#include <pci.h>
  26#include <asm/io.h>
  27#include <asm/pci.h>
  28
  29#undef PCI_ROM_SCAN_VERBOSE
  30
  31int pci_shadow_rom(pci_dev_t dev, unsigned char *dest)
  32{
  33        struct pci_controller *hose;
  34        int res = -1;
  35        int i;
  36
  37        u32 rom_addr;
  38        u32 addr_reg;
  39        u32 size;
  40
  41        u16 vendor;
  42        u16 device;
  43        u32 class_code;
  44
  45        hose = pci_bus_to_hose(PCI_BUS(dev));
  46#if 0
  47        printf("pci_shadow_rom() asked to shadow device %x to %x\n",
  48               dev, (u32)dest);
  49#endif
  50        pci_read_config_word(dev, PCI_VENDOR_ID, &vendor);
  51        pci_read_config_word(dev, PCI_DEVICE_ID, &device);
  52        pci_read_config_dword(dev, PCI_CLASS_REVISION, &class_code);
  53
  54        class_code &= 0xffffff00;
  55        class_code >>= 8;
  56
  57#if 0
  58        printf("PCI Header Vendor %04x device %04x class %06x\n",
  59               vendor, device, class_code);
  60#endif
  61        /* Enable the rom addess decoder */
  62        pci_write_config_dword(dev, PCI_ROM_ADDRESS, (u32)PCI_ROM_ADDRESS_MASK);
  63        pci_read_config_dword(dev, PCI_ROM_ADDRESS, &addr_reg);
  64
  65        if (!addr_reg) {
  66                /* register unimplemented */
  67                printf("pci_chadow_rom: device do not seem to have a rom\n");
  68                return -1;
  69        }
  70
  71        size = (~(addr_reg&PCI_ROM_ADDRESS_MASK))+1;
  72
  73#if 0
  74        printf("ROM is %d bytes\n", size);
  75#endif
  76        rom_addr = pci_get_rom_window(hose, size);
  77#if 0
  78        printf("ROM mapped at %x \n", rom_addr);
  79#endif
  80        pci_write_config_dword(dev, PCI_ROM_ADDRESS,
  81                               pci_phys_to_mem(dev, rom_addr)
  82                               |PCI_ROM_ADDRESS_ENABLE);
  83
  84
  85        for (i=rom_addr;i<rom_addr+size; i+=512) {
  86
  87
  88                if (readw(i) == 0xaa55) {
  89                        u32 pci_data;
  90#ifdef PCI_ROM_SCAN_VERBOSE
  91                        printf("ROM signature found\n");
  92#endif
  93                        pci_data = readw(0x18+i);
  94                        pci_data += i;
  95
  96                        if (0==memcmp((void*)pci_data, "PCIR", 4)) {
  97#ifdef PCI_ROM_SCAN_VERBOSE
  98                                printf("Fount PCI rom image at offset %d\n", i-rom_addr);
  99                                printf("Vendor %04x device %04x class %06x\n",
 100                                       readw(pci_data+4), readw(pci_data+6),
 101                                       readl(pci_data+0x0d)&0xffffff);
 102                                printf("%s\n",
 103                                       (readw(pci_data+0x15) &0x80)?
 104                                       "Last image":"More images follow");
 105                                switch  (readb(pci_data+0x14)) {
 106                                case 0:
 107                                        printf("X86 code\n");
 108                                        break;
 109                                case 1:
 110                                        printf("Openfirmware code\n");
 111                                        break;
 112                                case 2:
 113                                        printf("PARISC code\n");
 114                                        break;
 115                                }
 116                                printf("Image size %d\n", readw(pci_data+0x10) * 512);
 117#endif
 118                                /* FixMe: I think we should compare the class code
 119                                 * bytes as well but I have no reference on the
 120                                 * exact order of these bytes in the PCI ROM header */
 121                                if (readw(pci_data+4) == vendor &&
 122                                    readw(pci_data+6) == device &&
 123                                    /* (readl(pci_data+0x0d)&0xffffff) == class_code && */
 124                                    readb(pci_data+0x14) == 0 /* x86 code image */ ) {
 125#ifdef PCI_ROM_SCAN_VERBOSE
 126                                        printf("Suitable ROM image found, copying\n");
 127#endif
 128                                        memmove(dest, (void*)rom_addr, readw(pci_data+0x10) * 512);
 129                                        res = 0;
 130                                        break;
 131
 132                                }
 133                                if (readw(pci_data+0x15) &0x80) {
 134                                        break;
 135                                }
 136                        }
 137                }
 138
 139        }
 140
 141#ifdef PCI_ROM_SCAN_VERBOSE
 142        if (res) {
 143                printf("No suitable image found\n");
 144        }
 145#endif
 146        /* disable PAR register and PCI device ROM address devocer */
 147        pci_remove_rom_window(hose, rom_addr);
 148
 149        pci_write_config_dword(dev, PCI_ROM_ADDRESS, 0);
 150
 151        return res;
 152}
 153