src/devices/pci_rom.c

   1 /*
   2  * This file is part of the coreboot project.
   3  *
   4  * Copyright (C) 2005 Li-Ta Lo <ollie@lanl.gov>
   5  * Copyright (C) 2005 Tyan
   6  * (Written by Yinghai Lu <yhlu@tyan.com> for Tyan)
   7  * Copyright (C) 2005 Ronald G. Minnich <rminnich@gmail.com>
   8  * Copyright (C) 2005-2007 Stefan Reinauer <stepan@openbios.org>
   9  *
  10  * This program is free software; you can redistribute it and/or modify
  11  * it under the terms of the GNU General Public License as published by
  12  * the Free Software Foundation; version 2 of the License.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  22  */
  23
  24 #include <console/console.h>
  25 #include <device/device.h>
  26 #include <device/pci.h>
  27 #include <device/pci_ids.h>
  28 #include <device/pci_ops.h>
  29 #include <string.h>
  30
  31 struct rom_header * pci_rom_probe(struct device *dev)
  32 {
  33         unsigned long rom_address;
  34         struct rom_header *rom_header;
  35         struct pci_data *rom_data;
  36
  37         if (dev->on_mainboard) {
  38                 // in case some device PCI_ROM_ADDRESS can not be set or readonly
  39                 rom_address = dev->rom_address;
  40         } else {
  41                 rom_address = pci_read_config32(dev, PCI_ROM_ADDRESS);
  42         }
  43
  44         if (rom_address == 0x00000000 || rom_address == 0xffffffff) {
  45                 return NULL;
  46         }
  47
  48         printk_debug("rom address for %s = %x\n", dev_path(dev), rom_address);
  49
  50         if(!dev->on_mainboard) {
  51                 /* enable expansion ROM address decoding */
  52                 pci_write_config32(dev, PCI_ROM_ADDRESS,
  53                                    rom_address|PCI_ROM_ADDRESS_ENABLE);
  54         }
  55
  56         rom_header = (struct rom_header *)rom_address;
  57         printk_spew("PCI Expansion ROM, signature 0x%04x, INIT size 0x%04x, data ptr 0x%04x\n",
  58                     le32_to_cpu(rom_header->signature),
  59                     rom_header->size * 512, le32_to_cpu(rom_header->data));
  60         if (le32_to_cpu(rom_header->signature) != PCI_ROM_HDR) {
  61                 printk_err("Incorrect Expansion ROM Header Signature %04x\n",
  62                            le32_to_cpu(rom_header->signature));
  63                 return NULL;
  64         }
  65
  66         rom_data = (struct pci_data *) ((void *)rom_header + le32_to_cpu(rom_header->data));
  67         printk_spew("PCI ROM Image, Vendor %04x, Device %04x,\n",
  68                     rom_data->vendor, rom_data->device);
  69         if (dev->vendor != rom_data->vendor || dev->device != rom_data->device) {
  70                 printk_err("Device or Vendor ID mismatch Vendor %04x, Device %04x\n",
  71                            rom_data->vendor, rom_data->device);
  72                 return NULL;
  73         }
  74
  75         printk_spew("PCI ROM Image,  Class Code %04x%02x, Code Type %02x\n",
  76                     rom_data->class_hi, rom_data->class_lo,
  77                     rom_data->type);
  78         if (dev->class != ((rom_data->class_hi << 8) | rom_data->class_lo)) {
  79                 printk_debug("Class Code mismatch ROM %08x, dev %08x\n",
  80                             (rom_data->class_hi << 8) | rom_data->class_lo, dev->class);
  81                 //return NULL;
  82         }
  83
  84         return rom_header;
  85 }
  86
  87 static void *pci_ram_image_start = (void *)PCI_RAM_IMAGE_START;
  88
  89 struct rom_header *pci_rom_load(struct device *dev, struct rom_header *rom_header)
  90 {
  91         struct pci_data * rom_data;
  92         unsigned long rom_address;
  93         unsigned int rom_size;
  94         unsigned int image_size=0;
  95
  96         rom_address = pci_read_config32(dev, PCI_ROM_ADDRESS);
  97
  98         do {
  99                 rom_header = (struct rom_header *)((void *) rom_header + image_size); // get next image
 100                 rom_data = (struct pci_data *)((void *) rom_header + le32_to_cpu(rom_header->data));
 101                 image_size = le32_to_cpu(rom_data->ilen) * 512;
 102         } while ((rom_data->type!=0) && (rom_data->indicator!=0));  // make sure we got x86 version
 103
 104         if(rom_data->type!=0) return NULL;
 105
 106         rom_size = rom_header->size * 512;
 107
 108         if (PCI_CLASS_DISPLAY_VGA == rom_data->class_hi) {
 109 #if CONFIG_CONSOLE_VGA == 1 && CONFIG_CONSOLE_VGA_MULTI == 0
 110                 extern device_t vga_pri;        // the primary vga device, defined in device.c
 111                 if (dev != vga_pri) return NULL; // only one VGA supported
 112 #endif
 113                 printk_debug("copying VGA ROM Image from 0x%x to 0x%x, 0x%x bytes\n",
 114                             rom_header, PCI_VGA_RAM_IMAGE_START, rom_size);
 115                 memcpy((void *)PCI_VGA_RAM_IMAGE_START, rom_header, rom_size);
 116                 return (struct rom_header *) (PCI_VGA_RAM_IMAGE_START);
 117         } else {
 118                 printk_debug("copying non-VGA ROM Image from 0x%x to 0x%x, 0x%x bytes\n",
 119                             rom_header, pci_ram_image_start, rom_size);
 120                 memcpy(pci_ram_image_start, rom_header, rom_size);
 121                 pci_ram_image_start += rom_size;
 122                 return (struct rom_header *) (pci_ram_image_start-rom_size);
 123         }
 124         /* disable expansion ROM address decoding */
 125         pci_write_config32(dev, PCI_ROM_ADDRESS, rom_address & ~PCI_ROM_ADDRESS_ENABLE);
 126
 127         return NULL;
 128 }