1 /* 2 * This file is subject to the terms and conditions of the GNU General 3 * Public License. See the file "COPYING" in the main directory of this 4 * archive for more details. 5 * 6 * Copyright (C) 2000 - 2001 by Kanoj Sarcar (kanoj@sgi.com) 7 * Copyright (C) 2000 - 2001 by Silicon Graphics, Inc. 8 */ 9 #include <linux/config.h> 10 #include <linux/kernel.h> 11 #include <linux/init.h> 12 #include <linux/sched.h> 13 #include <linux/mm.h> 14 #include <linux/module.h> 15 #include <linux/cpumask.h> 16 #include <asm/cpu.h> 17 #include <asm/io.h> 18 #include <asm/pgtable.h> 19 #include <asm/time.h> 20 #include <asm/sn/types.h> 21 #include <asm/sn/sn0/addrs.h> 22 #include <asm/sn/sn0/hubni.h> 23 #include <asm/sn/sn0/hubio.h> 24 #include <asm/sn/klconfig.h> 25 #include <asm/sn/ioc3.h> 26 #include <asm/mipsregs.h> 27 #include <asm/sn/gda.h> 28 #include <asm/sn/hub.h> 29 #include <asm/sn/intr.h> 30 #include <asm/current.h> 31 #include <asm/smp.h> 32 #include <asm/processor.h> 33 #include <asm/mmu_context.h> 34 #include <asm/thread_info.h> 35 #include <asm/sn/launch.h> 36 #include <asm/sn/sn_private.h> 37 #include <asm/sn/sn0/ip27.h> 38 #include <asm/sn/mapped_kernel.h> 39 40 #define CPU_NONE (cpuid_t)-1 41 42 static DECLARE_BITMAP(hub_init_mask, MAX_COMPACT_NODES); 43 nasid_t master_nasid = INVALID_NASID; 44 45 cnodeid_t nasid_to_compact_node[MAX_NASIDS]; 46 nasid_t compact_to_nasid_node[MAX_COMPACT_NODES]; 47 cnodeid_t cpuid_to_compact_node[MAXCPUS]; 48 49 EXPORT_SYMBOL(nasid_to_compact_node); 50 51 extern void pcibr_setup(cnodeid_t); 52 53 extern void xtalk_probe_node(cnodeid_t nid); 54 55 static void __init per_hub_init(cnodeid_t cnode) 56 { 57 struct hub_data *hub = hub_data(cnode); 58 nasid_t nasid = COMPACT_TO_NASID_NODEID(cnode); 59 60 cpu_set(smp_processor_id(), hub->h_cpus); 61 62 if (test_and_set_bit(cnode, hub_init_mask)) 63 return; 64 65 /* 66 * Set CRB timeout at 5ms, (< PI timeout of 10ms) 67 */ 68 REMOTE_HUB_S(nasid, IIO_ICTP, 0x800); 69 REMOTE_HUB_S(nasid, IIO_ICTO, 0xff); 70 71 hub_rtc_init(cnode); 72 xtalk_probe_node(cnode); 73 74 #ifdef CONFIG_REPLICATE_EXHANDLERS 75 /* 76 * If this is not a headless node initialization, 77 * copy over the caliased exception handlers. 78 */ 79 if (get_compact_nodeid() == cnode) { 80 extern char except_vec2_generic, except_vec3_generic; 81 extern void build_tlb_refill_handler(void); 82 83 memcpy((void *)(CKSEG0 + 0x100), &except_vec2_generic, 0x80); 84 memcpy((void *)(CKSEG0 + 0x180), &except_vec3_generic, 0x80); 85 build_tlb_refill_handler(); 86 memcpy((void *)(CKSEG0 + 0x100), (void *) CKSEG0, 0x80); 87 memcpy((void *)(CKSEG0 + 0x180), &except_vec3_generic, 0x100); 88 __flush_cache_all(); 89 } 90 #endif 91 } 92 93 void __init per_cpu_init(void) 94 { 95 int cpu = smp_processor_id(); 96 int slice = LOCAL_HUB_L(PI_CPU_NUM); 97 cnodeid_t cnode = get_compact_nodeid(); 98 struct hub_data *hub = hub_data(cnode); 99 struct slice_data *si = hub->slice + slice; 100 int i; 101 102 if (test_and_set_bit(slice, &hub->slice_map)) 103 return; 104 105 clear_c0_status(ST0_IM); 106 107 for (i = 0; i < LEVELS_PER_SLICE; i++) 108 si->level_to_irq[i] = -1; 109 110 /* 111 * Some interrupts are reserved by hardware or by software convention. 112 * Mark these as reserved right away so they won't be used accidently 113 * later. 114 */ 115 for (i = 0; i <= BASE_PCI_IRQ; i++) { 116 __set_bit(i, si->irq_alloc_mask); 117 LOCAL_HUB_S(PI_INT_PEND_MOD, i); 118 } 119 120 __set_bit(IP_PEND0_6_63, si->irq_alloc_mask); 121 LOCAL_HUB_S(PI_INT_PEND_MOD, IP_PEND0_6_63); 122 123 for (i = NI_BRDCAST_ERR_A; i <= MSC_PANIC_INTR; i++) { 124 __set_bit(i, si->irq_alloc_mask + 1); 125 LOCAL_HUB_S(PI_INT_PEND_MOD, i); 126 } 127 128 LOCAL_HUB_L(PI_INT_PEND0); 129 130 /* 131 * We use this so we can find the local hub's data as fast as only 132 * possible. 133 */ 134 cpu_data[cpu].data = si; 135 136 cpu_time_init(); 137 install_ipi(); 138 139 /* Install our NMI handler if symmon hasn't installed one. */ 140 install_cpu_nmi_handler(cputoslice(cpu)); 141 142 set_c0_status(SRB_DEV0 | SRB_DEV1); 143 144 per_hub_init(cnode); 145 } 146 147 /* 148 * get_nasid() returns the physical node id number of the caller. 149 */ 150 nasid_t 151 get_nasid(void) 152 { 153 return (nasid_t)((LOCAL_HUB_L(NI_STATUS_REV_ID) & NSRI_NODEID_MASK) 154 >> NSRI_NODEID_SHFT); 155 } 156 157 /* 158 * Map the physical node id to a virtual node id (virtual node ids are contiguous). 159 */ 160 cnodeid_t get_compact_nodeid(void) 161 { 162 return NASID_TO_COMPACT_NODEID(get_nasid()); 163 } 164 165 /* Extracted from the IOC3 meta driver. FIXME. */ 166 static inline void ioc3_sio_init(void) 167 { 168 struct ioc3 *ioc3; 169 nasid_t nid; 170 long loops; 171 172 nid = get_nasid(); 173 ioc3 = (struct ioc3 *) KL_CONFIG_CH_CONS_INFO(nid)->memory_base; 174 175 ioc3->sscr_a = 0; /* PIO mode for uarta. */ 176 ioc3->sscr_b = 0; /* PIO mode for uartb. */ 177 ioc3->sio_iec = ~0; 178 ioc3->sio_ies = (SIO_IR_SA_INT | SIO_IR_SB_INT); 179 180 loops=1000000; while(loops--); 181 ioc3->sregs.uarta.iu_fcr = 0; 182 ioc3->sregs.uartb.iu_fcr = 0; 183 loops=1000000; while(loops--); 184 } 185 186 static inline void ioc3_eth_init(void) 187 { 188 struct ioc3 *ioc3; 189 nasid_t nid; 190 191 nid = get_nasid(); 192 ioc3 = (struct ioc3 *) KL_CONFIG_CH_CONS_INFO(nid)->memory_base; 193 194 ioc3->eier = 0; 195 } 196 197 extern void ip27_setup_console(void); 198 extern void ip27_time_init(void); 199 extern void ip27_reboot_setup(void); 200 201 static int __init ip27_setup(void) 202 { 203 hubreg_t p, e, n_mode; 204 nasid_t nid; 205 206 ip27_setup_console(); 207 ip27_reboot_setup(); 208 209 /* 210 * hub_rtc init and cpu clock intr enabled for later calibrate_delay. 211 */ 212 nid = get_nasid(); 213 printk("IP27: Running on node %d.\n", nid); 214 215 p = LOCAL_HUB_L(PI_CPU_PRESENT_A) & 1; 216 e = LOCAL_HUB_L(PI_CPU_ENABLE_A) & 1; 217 printk("Node %d has %s primary CPU%s.\n", nid, 218 p ? "a" : "no", 219 e ? ", CPU is running" : ""); 220 221 p = LOCAL_HUB_L(PI_CPU_PRESENT_B) & 1; 222 e = LOCAL_HUB_L(PI_CPU_ENABLE_B) & 1; 223 printk("Node %d has %s secondary CPU%s.\n", nid, 224 p ? "a" : "no", 225 e ? ", CPU is running" : ""); 226 227 /* 228 * Try to catch kernel missconfigurations and give user an 229 * indication what option to select. 230 */ 231 n_mode = LOCAL_HUB_L(NI_STATUS_REV_ID) & NSRI_MORENODES_MASK; 232 printk("Machine is in %c mode.\n", n_mode ? 'N' : 'M'); 233 #ifdef CONFIG_SGI_SN0_N_MODE 234 if (!n_mode) 235 panic("Kernel compiled for M mode."); 236 #else 237 if (n_mode) 238 panic("Kernel compiled for N mode."); 239 #endif 240 241 ioc3_sio_init(); 242 ioc3_eth_init(); 243 per_cpu_init(); 244 245 set_io_port_base(IO_BASE); 246 247 board_time_init = ip27_time_init; 248 249 return 0; 250 } 251 252 early_initcall(ip27_setup); 253