xref: /linux/arch/mips/sgi-ip27/ip27-smp.c (revision f3d9478b2ce468c3115b02ecae7e975990697f15)
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/init.h>
10 #include <linux/sched.h>
11 #include <linux/nodemask.h>
12 #include <asm/page.h>
13 #include <asm/processor.h>
14 #include <asm/sn/arch.h>
15 #include <asm/sn/gda.h>
16 #include <asm/sn/intr.h>
17 #include <asm/sn/klconfig.h>
18 #include <asm/sn/launch.h>
19 #include <asm/sn/mapped_kernel.h>
20 #include <asm/sn/sn_private.h>
21 #include <asm/sn/types.h>
22 #include <asm/sn/sn0/hubpi.h>
23 #include <asm/sn/sn0/hubio.h>
24 #include <asm/sn/sn0/ip27.h>
25 
26 /*
27  * Takes as first input the PROM assigned cpu id, and the kernel
28  * assigned cpu id as the second.
29  */
30 static void alloc_cpupda(cpuid_t cpu, int cpunum)
31 {
32 	cnodeid_t node = get_cpu_cnode(cpu);
33 	nasid_t nasid = COMPACT_TO_NASID_NODEID(node);
34 
35 	cputonasid(cpunum) = nasid;
36 	cpu_data[cpunum].p_nodeid = node;
37 	cputoslice(cpunum) = get_cpu_slice(cpu);
38 }
39 
40 static nasid_t get_actual_nasid(lboard_t *brd)
41 {
42 	klhub_t *hub;
43 
44 	if (!brd)
45 		return INVALID_NASID;
46 
47 	/* find out if we are a completely disabled brd. */
48 	hub  = (klhub_t *)find_first_component(brd, KLSTRUCT_HUB);
49 	if (!hub)
50 		return INVALID_NASID;
51 	if (!(hub->hub_info.flags & KLINFO_ENABLE))	/* disabled node brd */
52 		return hub->hub_info.physid;
53 	else
54 		return brd->brd_nasid;
55 }
56 
57 static int do_cpumask(cnodeid_t cnode, nasid_t nasid, int highest)
58 {
59 	static int tot_cpus_found = 0;
60 	lboard_t *brd;
61 	klcpu_t *acpu;
62 	int cpus_found = 0;
63 	cpuid_t cpuid;
64 
65 	brd = find_lboard((lboard_t *)KL_CONFIG_INFO(nasid), KLTYPE_IP27);
66 
67 	do {
68 		acpu = (klcpu_t *)find_first_component(brd, KLSTRUCT_CPU);
69 		while (acpu) {
70 			cpuid = acpu->cpu_info.virtid;
71 			/* cnode is not valid for completely disabled brds */
72 			if (get_actual_nasid(brd) == brd->brd_nasid)
73 				cpuid_to_compact_node[cpuid] = cnode;
74 			if (cpuid > highest)
75 				highest = cpuid;
76 			/* Only let it join in if it's marked enabled */
77 			if ((acpu->cpu_info.flags & KLINFO_ENABLE) &&
78 			    (tot_cpus_found != NR_CPUS)) {
79 				cpu_set(cpuid, phys_cpu_present_map);
80 				alloc_cpupda(cpuid, tot_cpus_found);
81 				cpus_found++;
82 				tot_cpus_found++;
83 			}
84 			acpu = (klcpu_t *)find_component(brd, (klinfo_t *)acpu,
85 								KLSTRUCT_CPU);
86 		}
87 		brd = KLCF_NEXT(brd);
88 		if (!brd)
89 			break;
90 
91 		brd = find_lboard(brd, KLTYPE_IP27);
92 	} while (brd);
93 
94 	return highest;
95 }
96 
97 void cpu_node_probe(void)
98 {
99 	int i, highest = 0;
100 	gda_t *gdap = GDA;
101 
102 	/*
103 	 * Initialize the arrays to invalid nodeid (-1)
104 	 */
105 	for (i = 0; i < MAX_COMPACT_NODES; i++)
106 		compact_to_nasid_node[i] = INVALID_NASID;
107 	for (i = 0; i < MAX_NASIDS; i++)
108 		nasid_to_compact_node[i] = INVALID_CNODEID;
109 	for (i = 0; i < MAXCPUS; i++)
110 		cpuid_to_compact_node[i] = INVALID_CNODEID;
111 
112 	/*
113 	 * MCD - this whole "compact node" stuff can probably be dropped,
114 	 * as we can handle sparse numbering now
115 	 */
116 	nodes_clear(node_online_map);
117 	for (i = 0; i < MAX_COMPACT_NODES; i++) {
118 		nasid_t nasid = gdap->g_nasidtable[i];
119 		if (nasid == INVALID_NASID)
120 			break;
121 		compact_to_nasid_node[i] = nasid;
122 		nasid_to_compact_node[nasid] = i;
123 		node_set_online(num_online_nodes());
124 		highest = do_cpumask(i, nasid, highest);
125 	}
126 
127 	printk("Discovered %d cpus on %d nodes\n", highest + 1, num_online_nodes());
128 }
129 
130 static __init void intr_clear_all(nasid_t nasid)
131 {
132 	int i;
133 
134 	REMOTE_HUB_S(nasid, PI_INT_MASK0_A, 0);
135 	REMOTE_HUB_S(nasid, PI_INT_MASK0_B, 0);
136 	REMOTE_HUB_S(nasid, PI_INT_MASK1_A, 0);
137 	REMOTE_HUB_S(nasid, PI_INT_MASK1_B, 0);
138 
139 	for (i = 0; i < 128; i++)
140 		REMOTE_HUB_CLR_INTR(nasid, i);
141 }
142 
143 void __init plat_smp_setup(void)
144 {
145 	cnodeid_t	cnode;
146 
147 	for_each_online_node(cnode) {
148 		if (cnode == 0)
149 			continue;
150 		intr_clear_all(COMPACT_TO_NASID_NODEID(cnode));
151 	}
152 
153 	replicate_kernel_text();
154 
155 	/*
156 	 * Assumption to be fixed: we're always booted on logical / physical
157 	 * processor 0.  While we're always running on logical processor 0
158 	 * this still means this is physical processor zero; it might for
159 	 * example be disabled in the firwware.
160 	 */
161 	alloc_cpupda(0, 0);
162 }
163 
164 void __init plat_prepare_cpus(unsigned int max_cpus)
165 {
166 	/* We already did everything necessary earlier */
167 }
168 
169 /*
170  * Launch a slave into smp_bootstrap().  It doesn't take an argument, and we
171  * set sp to the kernel stack of the newly created idle process, gp to the proc
172  * struct so that current_thread_info() will work.
173  */
174 void __init prom_boot_secondary(int cpu, struct task_struct *idle)
175 {
176 	unsigned long gp = (unsigned long)task_thread_info(idle);
177 	unsigned long sp = __KSTK_TOS(idle);
178 
179 	LAUNCH_SLAVE(cputonasid(cpu),cputoslice(cpu),
180 		(launch_proc_t)MAPPED_KERN_RW_TO_K0(smp_bootstrap),
181 		0, (void *) sp, (void *) gp);
182 }
183 
184 void prom_init_secondary(void)
185 {
186 	per_cpu_init();
187 	local_irq_enable();
188 }
189 
190 void __init prom_cpus_done(void)
191 {
192 }
193 
194 void prom_smp_finish(void)
195 {
196 }
197 
198 void core_send_ipi(int destid, unsigned int action)
199 {
200 	int irq;
201 
202 	switch (action) {
203 	case SMP_RESCHEDULE_YOURSELF:
204 		irq = CPU_RESCHED_A_IRQ;
205 		break;
206 	case SMP_CALL_FUNCTION:
207 		irq = CPU_CALL_A_IRQ;
208 		break;
209 	default:
210 		panic("sendintr");
211 	}
212 
213 	irq += cputoslice(destid);
214 
215 	/*
216 	 * Convert the compact hub number to the NASID to get the correct
217 	 * part of the address space.  Then set the interrupt bit associated
218 	 * with the CPU we want to send the interrupt to.
219 	 */
220 	REMOTE_HUB_SEND_INTR(COMPACT_TO_NASID_NODEID(cpu_to_node(destid)), irq);
221 }
222