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
pci_shadow_rom(pci_dev_t dev,unsigned char * dest)31 int 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