1/* 2 * Maintainer: Tom Rini <trini@kernel.crashing.org> 3 * 4 * In the past: Gary Thomas, Cort Dougan <cort@cs.nmt.edu> 5 */ 6 7#include <linux/pci_ids.h> 8#include <linux/types.h> 9#include <asm/residual.h> 10#include <asm/string.h> 11#include <asm/byteorder.h> 12#include "mpc10x.h" 13#include "of1275.h" 14#include "nonstdio.h" 15 16extern int keyb_present; /* keyboard controller is present by default */ 17RESIDUAL hold_resid_buf; 18RESIDUAL *hold_residual = &hold_resid_buf; 19static void *OFW_interface; /* Pointer to OF, if available. */ 20 21#ifdef CONFIG_VGA_CONSOLE 22char *vidmem = (char *)0xC00B8000; 23int lines = 25, cols = 80; 24int orig_x, orig_y = 24; 25#endif /* CONFIG_VGA_CONSOLE */ 26 27extern int CRT_tstc(void); 28extern int vga_init(unsigned char *ISA_mem); 29extern void gunzip(void *, int, unsigned char *, int *); 30extern unsigned long serial_init(int chan, void *ignored); 31extern void serial_fixups(void); 32extern struct bi_record *decompress_kernel(unsigned long load_addr, 33 int num_words, unsigned long cksum); 34extern void disable_6xx_mmu(void); 35extern unsigned long mpc10x_get_mem_size(void); 36 37static void 38writel(unsigned int val, unsigned int address) 39{ 40 /* Ensure I/O operations complete */ 41 __asm__ volatile("eieio"); 42 *(unsigned int *)address = cpu_to_le32(val); 43} 44 45#define PCI_CFG_ADDR(dev,off) ((0x80<<24) | (dev<<8) | (off&0xfc)) 46#define PCI_CFG_DATA(off) (MPC10X_MAPA_CNFG_DATA+(off&3)) 47 48static void 49pci_read_config_32(unsigned char devfn, 50 unsigned char offset, 51 unsigned int *val) 52{ 53 /* Ensure I/O operations complete */ 54 __asm__ volatile("eieio"); 55 *(unsigned int *)PCI_CFG_ADDR(devfn,offset) = 56 cpu_to_le32(MPC10X_MAPA_CNFG_ADDR); 57 /* Ensure I/O operations complete */ 58 __asm__ volatile("eieio"); 59 *val = le32_to_cpu(*(unsigned int *)PCI_CFG_DATA(offset)); 60 return; 61} 62 63#ifdef CONFIG_VGA_CONSOLE 64void 65scroll(void) 66{ 67 int i; 68 69 memcpy ( vidmem, vidmem + cols * 2, ( lines - 1 ) * cols * 2 ); 70 for ( i = ( lines - 1 ) * cols * 2; i < lines * cols * 2; i += 2 ) 71 vidmem[i] = ' '; 72} 73#endif /* CONFIG_VGA_CONSOLE */ 74 75unsigned long 76load_kernel(unsigned long load_addr, int num_words, unsigned long cksum, 77 RESIDUAL *residual, void *OFW) 78{ 79 int start_multi = 0; 80 unsigned int pci_viddid, pci_did, tulip_pci_base, tulip_base; 81 82 /* If we have Open Firmware, initialise it immediately */ 83 if (OFW) { 84 OFW_interface = OFW; 85 ofinit(OFW_interface); 86 } 87 88 board_isa_init(); 89#if defined(CONFIG_VGA_CONSOLE) 90 vga_init((unsigned char *)0xC0000000); 91#endif /* CONFIG_VGA_CONSOLE */ 92 93 if (residual) { 94 /* Is this Motorola PPCBug? */ 95 if ((1 & residual->VitalProductData.FirmwareSupports) && 96 (1 == residual->VitalProductData.FirmwareSupplier)) { 97 unsigned char base_mod; 98 unsigned char board_type = inb(0x801) & 0xF0; 99 100 /* 101 * Reset the onboard 21x4x Ethernet 102 * Motorola Ethernet is at IDSEL 14 (devfn 0x70) 103 */ 104 pci_read_config_32(0x70, 0x00, &pci_viddid); 105 pci_did = (pci_viddid & 0xffff0000) >> 16; 106 /* Be sure we've really found a 21x4x chip */ 107 if (((pci_viddid & 0xffff) == PCI_VENDOR_ID_DEC) && 108 ((pci_did == PCI_DEVICE_ID_DEC_TULIP_FAST) || 109 (pci_did == PCI_DEVICE_ID_DEC_TULIP) || 110 (pci_did == PCI_DEVICE_ID_DEC_TULIP_PLUS) || 111 (pci_did == PCI_DEVICE_ID_DEC_21142))) { 112 pci_read_config_32(0x70, 113 0x10, 114 &tulip_pci_base); 115 /* Get the physical base address */ 116 tulip_base = 117 (tulip_pci_base & ~0x03UL) + 0x80000000; 118 /* Strobe the 21x4x reset bit in CSR0 */ 119 writel(0x1, tulip_base); 120 } 121 122 /* If this is genesis 2 board then check for no 123 * keyboard controller and more than one processor. 124 */ 125 if (board_type == 0xe0) { 126 base_mod = inb(0x803); 127 /* if a MVME2300/2400 or a Sitka then no keyboard */ 128 if((base_mod == 0xFA) || (base_mod == 0xF9) || 129 (base_mod == 0xE1)) { 130 keyb_present = 0; /* no keyboard */ 131 } 132 } 133 /* If this is a multiprocessor system then 134 * park the other processor so that the 135 * kernel knows where to find them. 136 */ 137 if (residual->MaxNumCpus > 1) 138 start_multi = 1; 139 } 140 memcpy(hold_residual,residual,sizeof(RESIDUAL)); 141 } 142 143 /* Call decompress_kernel */ 144 decompress_kernel(load_addr, num_words, cksum); 145 146 if (start_multi) { 147 residual->VitalProductData.SmpIar = (unsigned long)0xc0; 148 residual->Cpus[1].CpuState = CPU_GOOD; 149 hold_residual->VitalProductData.Reserved5 = 0xdeadbeef; 150 } 151 152 /* Now go and clear out the BATs and ensure that our MSR is 153 * correct .*/ 154 disable_6xx_mmu(); 155 156 /* Make r3 be a pointer to the residual data. */ 157 return (unsigned long)hold_residual; 158} 159 160unsigned long 161get_mem_size(void) 162{ 163 unsigned int pci_viddid, pci_did; 164 165 /* First, figure out what kind of host bridge we are on. If it's 166 * an MPC10x, we can ask it directly how much memory it has. 167 * Otherwise, see if the residual data has anything. This isn't 168 * the best way, but it can be the only way. If there's nothing, 169 * assume 32MB. -- Tom. 170 */ 171 /* See what our host bridge is. */ 172 pci_read_config_32(0x00, 0x00, &pci_viddid); 173 pci_did = (pci_viddid & 0xffff0000) >> 16; 174 /* See if we are on an MPC10x. */ 175 if (((pci_viddid & 0xffff) == PCI_VENDOR_ID_MOTOROLA) 176 && ((pci_did == PCI_DEVICE_ID_MOTOROLA_MPC105) 177 || (pci_did == PCI_DEVICE_ID_MOTOROLA_MPC106) 178 || (pci_did == PCI_DEVICE_ID_MOTOROLA_MPC107))) 179 return mpc10x_get_mem_size(); 180 /* If it's not, see if we have anything in the residual data. */ 181 else if (hold_residual && hold_residual->TotalMemory) 182 return hold_residual->TotalMemory; 183 else if (OFW_interface) { 184 /* 185 * This is a 'best guess' check. We want to make sure 186 * we don't try this on a PReP box without OF 187 * -- Cort 188 */ 189 while (OFW_interface) 190 { 191 phandle dev_handle; 192 int mem_info[2]; 193 194 /* get handle to memory description */ 195 if (!(dev_handle = finddevice("/memory@0"))) 196 break; 197 198 /* get the info */ 199 if (getprop(dev_handle, "reg", mem_info, 200 sizeof(mem_info)) != 8) 201 break; 202 203 return mem_info[1]; 204 } 205 } 206 207 /* Fall back to hard-coding 32MB. */ 208 return 32*1024*1024; 209} 210