smp.c 13.8 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32
/*
 * SMP support for ppc.
 *
 * Written by Cort Dougan (cort@cs.nmt.edu) borrowing a great
 * deal of code from the sparc and intel versions.
 *
 * Copyright (C) 1999 Cort Dougan <cort@cs.nmt.edu>
 *
 * PowerPC-64 Support added by Dave Engebretsen, Peter Bergner, and
 * Mike Corrigan {engebret|bergner|mikec}@us.ibm.com
 *
 *      This program is free software; you can redistribute it and/or
 *      modify it under the terms of the GNU General Public License
 *      as published by the Free Software Foundation; either version
 *      2 of the License, or (at your option) any later version.
 */

#undef DEBUG

#include <linux/kernel.h>
#include <linux/module.h>
#include <linux/sched.h>
#include <linux/smp.h>
#include <linux/interrupt.h>
#include <linux/delay.h>
#include <linux/init.h>
#include <linux/spinlock.h>
#include <linux/cache.h>
#include <linux/err.h>
#include <linux/sysdev.h>
#include <linux/cpu.h>
#include <linux/notifier.h>
33
#include <linux/topology.h>
L
Linus Torvalds 已提交
34 35 36 37 38 39 40 41 42 43

#include <asm/ptrace.h>
#include <asm/atomic.h>
#include <asm/irq.h>
#include <asm/page.h>
#include <asm/pgtable.h>
#include <asm/prom.h>
#include <asm/smp.h>
#include <asm/time.h>
#include <asm/machdep.h>
44
#include <asm/cputhreads.h>
L
Linus Torvalds 已提交
45 46
#include <asm/cputable.h>
#include <asm/system.h>
47
#include <asm/mpic.h>
48
#include <asm/vdso_datapage.h>
P
Paul Mackerras 已提交
49 50 51 52
#ifdef CONFIG_PPC64
#include <asm/paca.h>
#endif

L
Linus Torvalds 已提交
53
#ifdef DEBUG
54
#include <asm/udbg.h>
L
Linus Torvalds 已提交
55 56 57 58 59
#define DBG(fmt...) udbg_printf(fmt)
#else
#define DBG(fmt...)
#endif

60 61
struct thread_info *secondary_ti;

62 63
DEFINE_PER_CPU(cpumask_var_t, cpu_sibling_map);
DEFINE_PER_CPU(cpumask_var_t, cpu_core_map);
L
Linus Torvalds 已提交
64

65
EXPORT_PER_CPU_SYMBOL(cpu_sibling_map);
66
EXPORT_PER_CPU_SYMBOL(cpu_core_map);
L
Linus Torvalds 已提交
67

P
Paul Mackerras 已提交
68
/* SMP operations for this machine */
L
Linus Torvalds 已提交
69 70
struct smp_ops_t *smp_ops;

71 72
/* Can't be static due to PowerMac hackery */
volatile unsigned int cpu_callin_map[NR_CPUS];
L
Linus Torvalds 已提交
73 74 75

int smt_enabled_at_boot = 1;

76 77
static void (*crash_ipi_function_ptr)(struct pt_regs *) = NULL;

P
Paul Mackerras 已提交
78
#ifdef CONFIG_PPC64
L
Linus Torvalds 已提交
79 80 81 82 83 84 85 86 87 88
void __devinit smp_generic_kick_cpu(int nr)
{
	BUG_ON(nr < 0 || nr >= NR_CPUS);

	/*
	 * The processor is currently spinning, waiting for the
	 * cpu_start field to become non-zero After we set cpu_start,
	 * the processor will continue on to secondary_start
	 */
	paca[nr].cpu_start = 1;
89
	smp_mb();
L
Linus Torvalds 已提交
90
}
P
Paul Mackerras 已提交
91
#endif
L
Linus Torvalds 已提交
92

93
void smp_message_recv(int msg)
L
Linus Torvalds 已提交
94 95 96
{
	switch(msg) {
	case PPC_MSG_CALL_FUNCTION:
97
		generic_smp_call_function_interrupt();
L
Linus Torvalds 已提交
98
		break;
P
Paul Mackerras 已提交
99
	case PPC_MSG_RESCHEDULE:
100
		/* we notice need_resched on exit */
L
Linus Torvalds 已提交
101
		break;
102 103 104
	case PPC_MSG_CALL_FUNC_SINGLE:
		generic_smp_call_function_single_interrupt();
		break;
L
Linus Torvalds 已提交
105
	case PPC_MSG_DEBUGGER_BREAK:
106
		if (crash_ipi_function_ptr) {
107
			crash_ipi_function_ptr(get_irq_regs());
108 109 110
			break;
		}
#ifdef CONFIG_DEBUGGER
111
		debugger_ipi(get_irq_regs());
L
Linus Torvalds 已提交
112
		break;
113 114
#endif /* CONFIG_DEBUGGER */
		/* FALLTHROUGH */
L
Linus Torvalds 已提交
115 116 117 118 119 120 121
	default:
		printk("SMP %d: smp_message_recv(): unknown msg %d\n",
		       smp_processor_id(), msg);
		break;
	}
}

122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180
static irqreturn_t call_function_action(int irq, void *data)
{
	generic_smp_call_function_interrupt();
	return IRQ_HANDLED;
}

static irqreturn_t reschedule_action(int irq, void *data)
{
	/* we just need the return path side effect of checking need_resched */
	return IRQ_HANDLED;
}

static irqreturn_t call_function_single_action(int irq, void *data)
{
	generic_smp_call_function_single_interrupt();
	return IRQ_HANDLED;
}

static irqreturn_t debug_ipi_action(int irq, void *data)
{
	smp_message_recv(PPC_MSG_DEBUGGER_BREAK);
	return IRQ_HANDLED;
}

static irq_handler_t smp_ipi_action[] = {
	[PPC_MSG_CALL_FUNCTION] =  call_function_action,
	[PPC_MSG_RESCHEDULE] = reschedule_action,
	[PPC_MSG_CALL_FUNC_SINGLE] = call_function_single_action,
	[PPC_MSG_DEBUGGER_BREAK] = debug_ipi_action,
};

const char *smp_ipi_name[] = {
	[PPC_MSG_CALL_FUNCTION] =  "ipi call function",
	[PPC_MSG_RESCHEDULE] = "ipi reschedule",
	[PPC_MSG_CALL_FUNC_SINGLE] = "ipi call function single",
	[PPC_MSG_DEBUGGER_BREAK] = "ipi debugger",
};

/* optional function to request ipi, for controllers with >= 4 ipis */
int smp_request_message_ipi(int virq, int msg)
{
	int err;

	if (msg < 0 || msg > PPC_MSG_DEBUGGER_BREAK) {
		return -EINVAL;
	}
#if !defined(CONFIG_DEBUGGER) && !defined(CONFIG_KEXEC)
	if (msg == PPC_MSG_DEBUGGER_BREAK) {
		return 1;
	}
#endif
	err = request_irq(virq, smp_ipi_action[msg], IRQF_DISABLED|IRQF_PERCPU,
			  smp_ipi_name[msg], 0);
	WARN(err < 0, "unable to request_irq %d for %s (rc %d)\n",
		virq, smp_ipi_name[msg], err);

	return err;
}

L
Linus Torvalds 已提交
181 182
void smp_send_reschedule(int cpu)
{
183 184
	if (likely(smp_ops))
		smp_ops->message_pass(cpu, PPC_MSG_RESCHEDULE);
L
Linus Torvalds 已提交
185 186
}

187 188 189 190 191
void arch_send_call_function_single_ipi(int cpu)
{
	smp_ops->message_pass(cpu, PPC_MSG_CALL_FUNC_SINGLE);
}

192
void arch_send_call_function_ipi_mask(const struct cpumask *mask)
193 194 195
{
	unsigned int cpu;

196
	for_each_cpu(cpu, mask)
197 198 199
		smp_ops->message_pass(cpu, PPC_MSG_CALL_FUNCTION);
}

L
Linus Torvalds 已提交
200 201 202
#ifdef CONFIG_DEBUGGER
void smp_send_debugger_break(int cpu)
{
203 204
	if (likely(smp_ops))
		smp_ops->message_pass(cpu, PPC_MSG_DEBUGGER_BREAK);
L
Linus Torvalds 已提交
205 206 207
}
#endif

208 209 210 211
#ifdef CONFIG_KEXEC
void crash_send_ipi(void (*crash_ipi_callback)(struct pt_regs *))
{
	crash_ipi_function_ptr = crash_ipi_callback;
212
	if (crash_ipi_callback && smp_ops) {
213 214 215 216 217 218
		mb();
		smp_ops->message_pass(MSG_ALL_BUT_SELF, PPC_MSG_DEBUGGER_BREAK);
	}
}
#endif

L
Linus Torvalds 已提交
219 220
static void stop_this_cpu(void *dummy)
{
221 222 223
	/* Remove this CPU */
	set_cpu_online(smp_processor_id(), false);

L
Linus Torvalds 已提交
224 225 226 227 228
	local_irq_disable();
	while (1)
		;
}

229 230
void smp_send_stop(void)
{
231
	smp_call_function(stop_this_cpu, NULL, 0);
L
Linus Torvalds 已提交
232 233 234 235 236 237
}

struct thread_info *current_set[NR_CPUS];

static void __devinit smp_store_cpu_info(int id)
{
238
	per_cpu(cpu_pvr, id) = mfspr(SPRN_PVR);
L
Linus Torvalds 已提交
239 240 241 242 243 244 245 246 247 248
}

static void __init smp_create_idle(unsigned int cpu)
{
	struct task_struct *p;

	/* create a process for the processor */
	p = fork_idle(cpu);
	if (IS_ERR(p))
		panic("failed fork for CPU %u: %li", cpu, PTR_ERR(p));
P
Paul Mackerras 已提交
249
#ifdef CONFIG_PPC64
L
Linus Torvalds 已提交
250
	paca[cpu].__current = p;
251 252
	paca[cpu].kstack = (unsigned long) task_thread_info(p)
		+ THREAD_SIZE - STACK_FRAME_OVERHEAD;
P
Paul Mackerras 已提交
253
#endif
A
Al Viro 已提交
254 255
	current_set[cpu] = task_thread_info(p);
	task_thread_info(p)->cpu = cpu;
L
Linus Torvalds 已提交
256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273
}

void __init smp_prepare_cpus(unsigned int max_cpus)
{
	unsigned int cpu;

	DBG("smp_prepare_cpus\n");

	/* 
	 * setup_cpu may need to be called on the boot cpu. We havent
	 * spun any cpus up but lets be paranoid.
	 */
	BUG_ON(boot_cpuid != smp_processor_id());

	/* Fixup boot cpu */
	smp_store_cpu_info(boot_cpuid);
	cpu_callin_map[boot_cpuid] = 1;

274 275 276 277 278 279 280 281 282 283
	for_each_possible_cpu(cpu) {
		zalloc_cpumask_var_node(&per_cpu(cpu_sibling_map, cpu),
					GFP_KERNEL, cpu_to_node(cpu));
		zalloc_cpumask_var_node(&per_cpu(cpu_core_map, cpu),
					GFP_KERNEL, cpu_to_node(cpu));
	}

	cpumask_set_cpu(boot_cpuid, cpu_sibling_mask(boot_cpuid));
	cpumask_set_cpu(boot_cpuid, cpu_core_mask(boot_cpuid));

284
	if (smp_ops)
285 286 287 288
		if (smp_ops->probe)
			max_cpus = smp_ops->probe();
		else
			max_cpus = NR_CPUS;
289 290
	else
		max_cpus = 1;
L
Linus Torvalds 已提交
291

292
	for_each_possible_cpu(cpu)
L
Linus Torvalds 已提交
293 294 295 296 297 298 299
		if (cpu != boot_cpuid)
			smp_create_idle(cpu);
}

void __devinit smp_prepare_boot_cpu(void)
{
	BUG_ON(smp_processor_id() != boot_cpuid);
P
Paul Mackerras 已提交
300
#ifdef CONFIG_PPC64
L
Linus Torvalds 已提交
301
	paca[boot_cpuid].__current = current;
P
Paul Mackerras 已提交
302
#endif
A
Al Viro 已提交
303
	current_set[boot_cpuid] = task_thread_info(current);
L
Linus Torvalds 已提交
304 305 306 307 308 309 310 311 312 313 314 315 316
}

#ifdef CONFIG_HOTPLUG_CPU
/* State of each CPU during hotplug phases */
DEFINE_PER_CPU(int, cpu_state) = { 0 };

int generic_cpu_disable(void)
{
	unsigned int cpu = smp_processor_id();

	if (cpu == boot_cpuid)
		return -EBUSY;

317
	set_cpu_online(cpu, false);
318
#ifdef CONFIG_PPC64
319
	vdso_data->processorCount--;
320
	fixup_irqs(cpu_online_mask);
321
#endif
L
Linus Torvalds 已提交
322 323 324 325 326 327 328 329 330 331 332 333
	return 0;
}

int generic_cpu_enable(unsigned int cpu)
{
	/* Do the normal bootup if we haven't
	 * already bootstrapped. */
	if (system_state != SYSTEM_RUNNING)
		return -ENOSYS;

	/* get the target out of it's holding state */
	per_cpu(cpu_state, cpu) = CPU_UP_PREPARE;
334
	smp_wmb();
L
Linus Torvalds 已提交
335 336 337 338

	while (!cpu_online(cpu))
		cpu_relax();

339
#ifdef CONFIG_PPC64
340
	fixup_irqs(cpu_online_mask);
L
Linus Torvalds 已提交
341 342
	/* counter the irq disable in fixup_irqs */
	local_irq_enable();
343
#endif
L
Linus Torvalds 已提交
344 345 346 347 348 349 350 351
	return 0;
}

void generic_cpu_die(unsigned int cpu)
{
	int i;

	for (i = 0; i < 100; i++) {
352
		smp_rmb();
L
Linus Torvalds 已提交
353 354 355 356 357 358 359 360 361 362 363 364 365 366 367
		if (per_cpu(cpu_state, cpu) == CPU_DEAD)
			return;
		msleep(100);
	}
	printk(KERN_ERR "CPU%d didn't die...\n", cpu);
}

void generic_mach_cpu_die(void)
{
	unsigned int cpu;

	local_irq_disable();
	cpu = smp_processor_id();
	printk(KERN_DEBUG "CPU%d offline\n", cpu);
	__get_cpu_var(cpu_state) = CPU_DEAD;
368
	smp_wmb();
L
Linus Torvalds 已提交
369 370
	while (__get_cpu_var(cpu_state) != CPU_UP_PREPARE)
		cpu_relax();
371
	set_cpu_online(cpu, true);
L
Linus Torvalds 已提交
372 373 374 375 376 377
	local_irq_enable();
}
#endif

static int __devinit cpu_enable(unsigned int cpu)
{
378
	if (smp_ops && smp_ops->cpu_enable)
L
Linus Torvalds 已提交
379 380 381 382 383
		return smp_ops->cpu_enable(cpu);

	return -ENOSYS;
}

384
int __cpuinit __cpu_up(unsigned int cpu)
L
Linus Torvalds 已提交
385 386 387
{
	int c;

P
Paul Mackerras 已提交
388
	secondary_ti = current_set[cpu];
L
Linus Torvalds 已提交
389 390 391
	if (!cpu_enable(cpu))
		return 0;

392 393
	if (smp_ops == NULL ||
	    (smp_ops->cpu_bootable && !smp_ops->cpu_bootable(cpu)))
L
Linus Torvalds 已提交
394 395 396 397 398 399 400 401 402 403 404
		return -EINVAL;

	/* Make sure callin-map entry is 0 (can be leftover a CPU
	 * hotplug
	 */
	cpu_callin_map[cpu] = 0;

	/* The information for processor bringup must
	 * be written out to main store before we release
	 * the processor.
	 */
405
	smp_mb();
L
Linus Torvalds 已提交
406 407 408 409 410 411 412 413 414 415 416

	/* wake up cpus */
	DBG("smp: kicking cpu %d\n", cpu);
	smp_ops->kick_cpu(cpu);

	/*
	 * wait to see if the cpu made a callin (is actually up).
	 * use this value that I found through experimentation.
	 * -- Cort
	 */
	if (system_state < SYSTEM_RUNNING)
417
		for (c = 50000; c && !cpu_callin_map[cpu]; c--)
L
Linus Torvalds 已提交
418 419 420 421 422 423 424
			udelay(100);
#ifdef CONFIG_HOTPLUG_CPU
	else
		/*
		 * CPUs can take much longer to come up in the
		 * hotplug case.  Wait five seconds.
		 */
425 426
		for (c = 5000; c && !cpu_callin_map[cpu]; c--)
			msleep(1);
L
Linus Torvalds 已提交
427 428 429
#endif

	if (!cpu_callin_map[cpu]) {
430
		printk(KERN_ERR "Processor %u is stuck.\n", cpu);
L
Linus Torvalds 已提交
431 432 433
		return -ENOENT;
	}

434
	DBG("Processor %u found.\n", cpu);
L
Linus Torvalds 已提交
435 436 437 438 439 440 441 442 443 444 445

	if (smp_ops->give_timebase)
		smp_ops->give_timebase();

	/* Wait until cpu puts itself in the online map */
	while (!cpu_online(cpu))
		cpu_relax();

	return 0;
}

446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468
/* Return the value of the reg property corresponding to the given
 * logical cpu.
 */
int cpu_to_core_id(int cpu)
{
	struct device_node *np;
	const int *reg;
	int id = -1;

	np = of_get_cpu_node(cpu, NULL);
	if (!np)
		goto out;

	reg = of_get_property(np, "reg", NULL);
	if (!reg)
		goto out;

	id = *reg;
out:
	of_node_put(np);
	return id;
}

469
/* Must be called when no change can occur to cpu_present_mask,
470 471 472 473 474
 * i.e. during cpu online or offline.
 */
static struct device_node *cpu_to_l2cache(int cpu)
{
	struct device_node *np;
475
	struct device_node *cache;
476 477 478 479 480 481 482 483

	if (!cpu_present(cpu))
		return NULL;

	np = of_get_cpu_node(cpu, NULL);
	if (np == NULL)
		return NULL;

484 485
	cache = of_find_next_cache_node(np);

486 487
	of_node_put(np);

488
	return cache;
489
}
L
Linus Torvalds 已提交
490 491 492 493 494

/* Activate a secondary processor. */
int __devinit start_secondary(void *unused)
{
	unsigned int cpu = smp_processor_id();
495
	struct device_node *l2_cache;
496
	int i, base;
L
Linus Torvalds 已提交
497 498 499 500 501

	atomic_inc(&init_mm.mm_count);
	current->active_mm = &init_mm;

	smp_store_cpu_info(cpu);
P
Paul Mackerras 已提交
502
	set_dec(tb_ticks_per_jiffy);
A
Andrew Morton 已提交
503
	preempt_disable();
L
Linus Torvalds 已提交
504 505
	cpu_callin_map[cpu] = 1;

506 507
	if (smp_ops->setup_cpu)
		smp_ops->setup_cpu(cpu);
L
Linus Torvalds 已提交
508 509 510
	if (smp_ops->take_timebase)
		smp_ops->take_timebase();

511
	if (system_state > SYSTEM_BOOTING)
512
		snapshot_timebase();
513

514 515
	secondary_cpu_time_init();

516
	ipi_call_lock();
517
	notify_cpu_starting(cpu);
518
	set_cpu_online(cpu, true);
519 520 521 522 523
	/* Update sibling maps */
	base = cpu_first_thread_in_core(cpu);
	for (i = 0; i < threads_per_core; i++) {
		if (cpu_is_offline(base + i))
			continue;
524 525
		cpumask_set_cpu(cpu, cpu_sibling_mask(base + i));
		cpumask_set_cpu(base + i, cpu_sibling_mask(cpu));
526 527 528 529 530

		/* cpu_core_map should be a superset of
		 * cpu_sibling_map even if we don't have cache
		 * information, so update the former here, too.
		 */
531 532
		cpumask_set_cpu(cpu, cpu_core_mask(base + i));
		cpumask_set_cpu(base + i, cpu_core_mask(cpu));
533
	}
534 535 536 537 538 539
	l2_cache = cpu_to_l2cache(cpu);
	for_each_online_cpu(i) {
		struct device_node *np = cpu_to_l2cache(i);
		if (!np)
			continue;
		if (np == l2_cache) {
540 541
			cpumask_set_cpu(cpu, cpu_core_mask(i));
			cpumask_set_cpu(i, cpu_core_mask(cpu));
542 543 544 545
		}
		of_node_put(np);
	}
	of_node_put(l2_cache);
546
	ipi_call_unlock();
L
Linus Torvalds 已提交
547 548 549 550 551 552 553 554 555 556 557 558 559 560

	local_irq_enable();

	cpu_idle();
	return 0;
}

int setup_profiling_timer(unsigned int multiplier)
{
	return 0;
}

void __init smp_cpus_done(unsigned int max_cpus)
{
561
	cpumask_var_t old_mask;
L
Linus Torvalds 已提交
562 563 564 565 566

	/* We want the setup_cpu() here to be called from CPU 0, but our
	 * init thread may have been "borrowed" by another CPU in the meantime
	 * se we pin us down to CPU 0 for a short while
	 */
567 568
	alloc_cpumask_var(&old_mask, GFP_NOWAIT);
	cpumask_copy(old_mask, &current->cpus_allowed);
J
Julia Lawall 已提交
569
	set_cpus_allowed_ptr(current, cpumask_of(boot_cpuid));
L
Linus Torvalds 已提交
570
	
571
	if (smp_ops && smp_ops->setup_cpu)
572
		smp_ops->setup_cpu(boot_cpuid);
L
Linus Torvalds 已提交
573

574 575 576
	set_cpus_allowed_ptr(current, old_mask);

	free_cpumask_var(old_mask);
577

578 579
	snapshot_timebases();

580
	dump_numa_cpu_topology();
L
Linus Torvalds 已提交
581 582 583 584 585
}

#ifdef CONFIG_HOTPLUG_CPU
int __cpu_disable(void)
{
586
	struct device_node *l2_cache;
587 588 589
	int cpu = smp_processor_id();
	int base, i;
	int err;
L
Linus Torvalds 已提交
590

591 592 593 594 595 596 597 598 599 600
	if (!smp_ops->cpu_disable)
		return -ENOSYS;

	err = smp_ops->cpu_disable();
	if (err)
		return err;

	/* Update sibling maps */
	base = cpu_first_thread_in_core(cpu);
	for (i = 0; i < threads_per_core; i++) {
601 602 603 604
		cpumask_clear_cpu(cpu, cpu_sibling_mask(base + i));
		cpumask_clear_cpu(base + i, cpu_sibling_mask(cpu));
		cpumask_clear_cpu(cpu, cpu_core_mask(base + i));
		cpumask_clear_cpu(base + i, cpu_core_mask(cpu));
605 606 607 608 609 610 611 612
	}

	l2_cache = cpu_to_l2cache(cpu);
	for_each_present_cpu(i) {
		struct device_node *np = cpu_to_l2cache(i);
		if (!np)
			continue;
		if (np == l2_cache) {
613 614
			cpumask_clear_cpu(cpu, cpu_core_mask(i));
			cpumask_clear_cpu(i, cpu_core_mask(cpu));
615 616
		}
		of_node_put(np);
617
	}
618 619
	of_node_put(l2_cache);

620 621

	return 0;
L
Linus Torvalds 已提交
622 623 624 625 626 627 628
}

void __cpu_die(unsigned int cpu)
{
	if (smp_ops->cpu_die)
		smp_ops->cpu_die(cpu);
}
629 630 631 632 633 634 635 636 637 638 639 640

static DEFINE_MUTEX(powerpc_cpu_hotplug_driver_mutex);

void cpu_hotplug_driver_lock()
{
	mutex_lock(&powerpc_cpu_hotplug_driver_mutex);
}

void cpu_hotplug_driver_unlock()
{
	mutex_unlock(&powerpc_cpu_hotplug_driver_mutex);
}
641 642 643 644 645 646

void cpu_die(void)
{
	if (ppc_md.cpu_die)
		ppc_md.cpu_die();
}
L
Linus Torvalds 已提交
647
#endif