smp.c 20 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882
  1. /*
  2. * arch/s390/kernel/smp.c
  3. *
  4. * Copyright (C) IBM Corp. 1999,2006
  5. * Author(s): Denis Joseph Barrow (djbarrow@de.ibm.com,barrow_dj@yahoo.com),
  6. * Martin Schwidefsky (schwidefsky@de.ibm.com)
  7. * Heiko Carstens (heiko.carstens@de.ibm.com)
  8. *
  9. * based on other smp stuff by
  10. * (c) 1995 Alan Cox, CymruNET Ltd <alan@cymru.net>
  11. * (c) 1998 Ingo Molnar
  12. *
  13. * We work with logical cpu numbering everywhere we can. The only
  14. * functions using the real cpu address (got from STAP) are the sigp
  15. * functions. For all other functions we use the identity mapping.
  16. * That means that cpu_number_map[i] == i for every cpu. cpu_number_map is
  17. * used e.g. to find the idle task belonging to a logical cpu. Every array
  18. * in the kernel is sorted by the logical cpu number and not by the physical
  19. * one which is causing all the confusion with __cpu_logical_map and
  20. * cpu_number_map in other architectures.
  21. */
  22. #include <linux/module.h>
  23. #include <linux/init.h>
  24. #include <linux/mm.h>
  25. #include <linux/spinlock.h>
  26. #include <linux/kernel_stat.h>
  27. #include <linux/smp_lock.h>
  28. #include <linux/delay.h>
  29. #include <linux/cache.h>
  30. #include <linux/interrupt.h>
  31. #include <linux/cpu.h>
  32. #include <asm/sigp.h>
  33. #include <asm/pgalloc.h>
  34. #include <asm/irq.h>
  35. #include <asm/s390_ext.h>
  36. #include <asm/cpcmd.h>
  37. #include <asm/tlbflush.h>
  38. extern volatile int __cpu_logical_map[];
  39. /*
  40. * An array with a pointer the lowcore of every CPU.
  41. */
  42. struct _lowcore *lowcore_ptr[NR_CPUS];
  43. cpumask_t cpu_online_map = CPU_MASK_NONE;
  44. cpumask_t cpu_possible_map = CPU_MASK_NONE;
  45. static struct task_struct *current_set[NR_CPUS];
  46. /*
  47. * Reboot, halt and power_off routines for SMP.
  48. */
  49. extern char vmhalt_cmd[];
  50. extern char vmpoff_cmd[];
  51. static void smp_ext_bitcall(int, ec_bit_sig);
  52. static void smp_ext_bitcall_others(ec_bit_sig);
  53. /*
  54. * Structure and data for smp_call_function(). This is designed to minimise
  55. * static memory requirements. It also looks cleaner.
  56. */
  57. static DEFINE_SPINLOCK(call_lock);
  58. struct call_data_struct {
  59. void (*func) (void *info);
  60. void *info;
  61. atomic_t started;
  62. atomic_t finished;
  63. int wait;
  64. };
  65. static struct call_data_struct * call_data;
  66. /*
  67. * 'Call function' interrupt callback
  68. */
  69. static void do_call_function(void)
  70. {
  71. void (*func) (void *info) = call_data->func;
  72. void *info = call_data->info;
  73. int wait = call_data->wait;
  74. atomic_inc(&call_data->started);
  75. (*func)(info);
  76. if (wait)
  77. atomic_inc(&call_data->finished);
  78. }
  79. /*
  80. * this function sends a 'generic call function' IPI to all other CPUs
  81. * in the system.
  82. */
  83. int smp_call_function (void (*func) (void *info), void *info, int nonatomic,
  84. int wait)
  85. /*
  86. * [SUMMARY] Run a function on all other CPUs.
  87. * <func> The function to run. This must be fast and non-blocking.
  88. * <info> An arbitrary pointer to pass to the function.
  89. * <nonatomic> currently unused.
  90. * <wait> If true, wait (atomically) until function has completed on other CPUs.
  91. * [RETURNS] 0 on success, else a negative status code. Does not return until
  92. * remote CPUs are nearly ready to execute <<func>> or are or have executed.
  93. *
  94. * You must not call this function with disabled interrupts or from a
  95. * hardware interrupt handler or from a bottom half handler.
  96. */
  97. {
  98. struct call_data_struct data;
  99. int cpus = num_online_cpus()-1;
  100. if (cpus <= 0)
  101. return 0;
  102. /* Can deadlock when called with interrupts disabled */
  103. WARN_ON(irqs_disabled());
  104. data.func = func;
  105. data.info = info;
  106. atomic_set(&data.started, 0);
  107. data.wait = wait;
  108. if (wait)
  109. atomic_set(&data.finished, 0);
  110. spin_lock(&call_lock);
  111. call_data = &data;
  112. /* Send a message to all other CPUs and wait for them to respond */
  113. smp_ext_bitcall_others(ec_call_function);
  114. /* Wait for response */
  115. while (atomic_read(&data.started) != cpus)
  116. cpu_relax();
  117. if (wait)
  118. while (atomic_read(&data.finished) != cpus)
  119. cpu_relax();
  120. spin_unlock(&call_lock);
  121. return 0;
  122. }
  123. /*
  124. * Call a function on one CPU
  125. * cpu : the CPU the function should be executed on
  126. *
  127. * You must not call this function with disabled interrupts or from a
  128. * hardware interrupt handler. You may call it from a bottom half.
  129. *
  130. * It is guaranteed that the called function runs on the specified CPU,
  131. * preemption is disabled.
  132. */
  133. int smp_call_function_on(void (*func) (void *info), void *info,
  134. int nonatomic, int wait, int cpu)
  135. {
  136. struct call_data_struct data;
  137. int curr_cpu;
  138. if (!cpu_online(cpu))
  139. return -EINVAL;
  140. /* disable preemption for local function call */
  141. curr_cpu = get_cpu();
  142. if (curr_cpu == cpu) {
  143. /* direct call to function */
  144. func(info);
  145. put_cpu();
  146. return 0;
  147. }
  148. data.func = func;
  149. data.info = info;
  150. atomic_set(&data.started, 0);
  151. data.wait = wait;
  152. if (wait)
  153. atomic_set(&data.finished, 0);
  154. spin_lock_bh(&call_lock);
  155. call_data = &data;
  156. smp_ext_bitcall(cpu, ec_call_function);
  157. /* Wait for response */
  158. while (atomic_read(&data.started) != 1)
  159. cpu_relax();
  160. if (wait)
  161. while (atomic_read(&data.finished) != 1)
  162. cpu_relax();
  163. spin_unlock_bh(&call_lock);
  164. put_cpu();
  165. return 0;
  166. }
  167. EXPORT_SYMBOL(smp_call_function_on);
  168. static inline void do_send_stop(void)
  169. {
  170. int cpu, rc;
  171. /* stop all processors */
  172. for_each_online_cpu(cpu) {
  173. if (cpu == smp_processor_id())
  174. continue;
  175. do {
  176. rc = signal_processor(cpu, sigp_stop);
  177. } while (rc == sigp_busy);
  178. }
  179. }
  180. static inline void do_store_status(void)
  181. {
  182. int cpu, rc;
  183. /* store status of all processors in their lowcores (real 0) */
  184. for_each_online_cpu(cpu) {
  185. if (cpu == smp_processor_id())
  186. continue;
  187. do {
  188. rc = signal_processor_p(
  189. (__u32)(unsigned long) lowcore_ptr[cpu], cpu,
  190. sigp_store_status_at_address);
  191. } while(rc == sigp_busy);
  192. }
  193. }
  194. /*
  195. * this function sends a 'stop' sigp to all other CPUs in the system.
  196. * it goes straight through.
  197. */
  198. void smp_send_stop(void)
  199. {
  200. /* write magic number to zero page (absolute 0) */
  201. lowcore_ptr[smp_processor_id()]->panic_magic = __PANIC_MAGIC;
  202. /* stop other processors. */
  203. do_send_stop();
  204. /* store status of other processors. */
  205. do_store_status();
  206. }
  207. /*
  208. * Reboot, halt and power_off routines for SMP.
  209. */
  210. static void do_machine_restart(void * __unused)
  211. {
  212. int cpu;
  213. static atomic_t cpuid = ATOMIC_INIT(-1);
  214. if (atomic_cmpxchg(&cpuid, -1, smp_processor_id()) != -1)
  215. signal_processor(smp_processor_id(), sigp_stop);
  216. /* Wait for all other cpus to enter stopped state */
  217. for_each_online_cpu(cpu) {
  218. if (cpu == smp_processor_id())
  219. continue;
  220. while(!smp_cpu_not_running(cpu))
  221. cpu_relax();
  222. }
  223. /* Store status of other cpus. */
  224. do_store_status();
  225. /*
  226. * Finally call reipl. Because we waited for all other
  227. * cpus to enter this function we know that they do
  228. * not hold any s390irq-locks (the cpus have been
  229. * interrupted by an external interrupt and s390irq
  230. * locks are always held disabled).
  231. */
  232. do_reipl();
  233. }
  234. void machine_restart_smp(char * __unused)
  235. {
  236. on_each_cpu(do_machine_restart, NULL, 0, 0);
  237. }
  238. static void do_wait_for_stop(void)
  239. {
  240. unsigned long cr[16];
  241. __ctl_store(cr, 0, 15);
  242. cr[0] &= ~0xffff;
  243. cr[6] = 0;
  244. __ctl_load(cr, 0, 15);
  245. for (;;)
  246. enabled_wait();
  247. }
  248. static void do_machine_halt(void * __unused)
  249. {
  250. static atomic_t cpuid = ATOMIC_INIT(-1);
  251. if (atomic_cmpxchg(&cpuid, -1, smp_processor_id()) == -1) {
  252. smp_send_stop();
  253. if (MACHINE_IS_VM && strlen(vmhalt_cmd) > 0)
  254. cpcmd(vmhalt_cmd, NULL, 0, NULL);
  255. signal_processor(smp_processor_id(),
  256. sigp_stop_and_store_status);
  257. }
  258. do_wait_for_stop();
  259. }
  260. void machine_halt_smp(void)
  261. {
  262. on_each_cpu(do_machine_halt, NULL, 0, 0);
  263. }
  264. static void do_machine_power_off(void * __unused)
  265. {
  266. static atomic_t cpuid = ATOMIC_INIT(-1);
  267. if (atomic_cmpxchg(&cpuid, -1, smp_processor_id()) == -1) {
  268. smp_send_stop();
  269. if (MACHINE_IS_VM && strlen(vmpoff_cmd) > 0)
  270. cpcmd(vmpoff_cmd, NULL, 0, NULL);
  271. signal_processor(smp_processor_id(),
  272. sigp_stop_and_store_status);
  273. }
  274. do_wait_for_stop();
  275. }
  276. void machine_power_off_smp(void)
  277. {
  278. on_each_cpu(do_machine_power_off, NULL, 0, 0);
  279. }
  280. /*
  281. * This is the main routine where commands issued by other
  282. * cpus are handled.
  283. */
  284. void do_ext_call_interrupt(struct pt_regs *regs, __u16 code)
  285. {
  286. unsigned long bits;
  287. /*
  288. * handle bit signal external calls
  289. *
  290. * For the ec_schedule signal we have to do nothing. All the work
  291. * is done automatically when we return from the interrupt.
  292. */
  293. bits = xchg(&S390_lowcore.ext_call_fast, 0);
  294. if (test_bit(ec_call_function, &bits))
  295. do_call_function();
  296. }
  297. /*
  298. * Send an external call sigp to another cpu and return without waiting
  299. * for its completion.
  300. */
  301. static void smp_ext_bitcall(int cpu, ec_bit_sig sig)
  302. {
  303. /*
  304. * Set signaling bit in lowcore of target cpu and kick it
  305. */
  306. set_bit(sig, (unsigned long *) &lowcore_ptr[cpu]->ext_call_fast);
  307. while(signal_processor(cpu, sigp_emergency_signal) == sigp_busy)
  308. udelay(10);
  309. }
  310. /*
  311. * Send an external call sigp to every other cpu in the system and
  312. * return without waiting for its completion.
  313. */
  314. static void smp_ext_bitcall_others(ec_bit_sig sig)
  315. {
  316. int cpu;
  317. for_each_online_cpu(cpu) {
  318. if (cpu == smp_processor_id())
  319. continue;
  320. /*
  321. * Set signaling bit in lowcore of target cpu and kick it
  322. */
  323. set_bit(sig, (unsigned long *) &lowcore_ptr[cpu]->ext_call_fast);
  324. while (signal_processor(cpu, sigp_emergency_signal) == sigp_busy)
  325. udelay(10);
  326. }
  327. }
  328. #ifndef CONFIG_64BIT
  329. /*
  330. * this function sends a 'purge tlb' signal to another CPU.
  331. */
  332. void smp_ptlb_callback(void *info)
  333. {
  334. local_flush_tlb();
  335. }
  336. void smp_ptlb_all(void)
  337. {
  338. on_each_cpu(smp_ptlb_callback, NULL, 0, 1);
  339. }
  340. EXPORT_SYMBOL(smp_ptlb_all);
  341. #endif /* ! CONFIG_64BIT */
  342. /*
  343. * this function sends a 'reschedule' IPI to another CPU.
  344. * it goes straight through and wastes no time serializing
  345. * anything. Worst case is that we lose a reschedule ...
  346. */
  347. void smp_send_reschedule(int cpu)
  348. {
  349. smp_ext_bitcall(cpu, ec_schedule);
  350. }
  351. /*
  352. * parameter area for the set/clear control bit callbacks
  353. */
  354. typedef struct
  355. {
  356. __u16 start_ctl;
  357. __u16 end_ctl;
  358. unsigned long orvals[16];
  359. unsigned long andvals[16];
  360. } ec_creg_mask_parms;
  361. /*
  362. * callback for setting/clearing control bits
  363. */
  364. void smp_ctl_bit_callback(void *info) {
  365. ec_creg_mask_parms *pp;
  366. unsigned long cregs[16];
  367. int i;
  368. pp = (ec_creg_mask_parms *) info;
  369. __ctl_store(cregs[pp->start_ctl], pp->start_ctl, pp->end_ctl);
  370. for (i = pp->start_ctl; i <= pp->end_ctl; i++)
  371. cregs[i] = (cregs[i] & pp->andvals[i]) | pp->orvals[i];
  372. __ctl_load(cregs[pp->start_ctl], pp->start_ctl, pp->end_ctl);
  373. }
  374. /*
  375. * Set a bit in a control register of all cpus
  376. */
  377. void smp_ctl_set_bit(int cr, int bit) {
  378. ec_creg_mask_parms parms;
  379. parms.start_ctl = cr;
  380. parms.end_ctl = cr;
  381. parms.orvals[cr] = 1 << bit;
  382. parms.andvals[cr] = -1L;
  383. preempt_disable();
  384. smp_call_function(smp_ctl_bit_callback, &parms, 0, 1);
  385. __ctl_set_bit(cr, bit);
  386. preempt_enable();
  387. }
  388. /*
  389. * Clear a bit in a control register of all cpus
  390. */
  391. void smp_ctl_clear_bit(int cr, int bit) {
  392. ec_creg_mask_parms parms;
  393. parms.start_ctl = cr;
  394. parms.end_ctl = cr;
  395. parms.orvals[cr] = 0;
  396. parms.andvals[cr] = ~(1L << bit);
  397. preempt_disable();
  398. smp_call_function(smp_ctl_bit_callback, &parms, 0, 1);
  399. __ctl_clear_bit(cr, bit);
  400. preempt_enable();
  401. }
  402. /*
  403. * Lets check how many CPUs we have.
  404. */
  405. static unsigned int
  406. __init smp_count_cpus(void)
  407. {
  408. unsigned int cpu, num_cpus;
  409. __u16 boot_cpu_addr;
  410. /*
  411. * cpu 0 is the boot cpu. See smp_prepare_boot_cpu.
  412. */
  413. boot_cpu_addr = S390_lowcore.cpu_data.cpu_addr;
  414. current_thread_info()->cpu = 0;
  415. num_cpus = 1;
  416. for (cpu = 0; cpu <= 65535; cpu++) {
  417. if ((__u16) cpu == boot_cpu_addr)
  418. continue;
  419. __cpu_logical_map[1] = (__u16) cpu;
  420. if (signal_processor(1, sigp_sense) ==
  421. sigp_not_operational)
  422. continue;
  423. num_cpus++;
  424. }
  425. printk("Detected %d CPU's\n",(int) num_cpus);
  426. printk("Boot cpu address %2X\n", boot_cpu_addr);
  427. return num_cpus;
  428. }
  429. /*
  430. * Activate a secondary processor.
  431. */
  432. extern void init_cpu_timer(void);
  433. extern void init_cpu_vtimer(void);
  434. extern int pfault_init(void);
  435. extern void pfault_fini(void);
  436. int __devinit start_secondary(void *cpuvoid)
  437. {
  438. /* Setup the cpu */
  439. cpu_init();
  440. preempt_disable();
  441. /* init per CPU timer */
  442. init_cpu_timer();
  443. #ifdef CONFIG_VIRT_TIMER
  444. init_cpu_vtimer();
  445. #endif
  446. #ifdef CONFIG_PFAULT
  447. /* Enable pfault pseudo page faults on this cpu. */
  448. if (MACHINE_IS_VM)
  449. pfault_init();
  450. #endif
  451. /* Mark this cpu as online */
  452. cpu_set(smp_processor_id(), cpu_online_map);
  453. /* Switch on interrupts */
  454. local_irq_enable();
  455. /* Print info about this processor */
  456. print_cpu_info(&S390_lowcore.cpu_data);
  457. /* cpu_idle will call schedule for us */
  458. cpu_idle();
  459. return 0;
  460. }
  461. static void __init smp_create_idle(unsigned int cpu)
  462. {
  463. struct task_struct *p;
  464. /*
  465. * don't care about the psw and regs settings since we'll never
  466. * reschedule the forked task.
  467. */
  468. p = fork_idle(cpu);
  469. if (IS_ERR(p))
  470. panic("failed fork for CPU %u: %li", cpu, PTR_ERR(p));
  471. current_set[cpu] = p;
  472. }
  473. /* Reserving and releasing of CPUs */
  474. static DEFINE_SPINLOCK(smp_reserve_lock);
  475. static int smp_cpu_reserved[NR_CPUS];
  476. int
  477. smp_get_cpu(cpumask_t cpu_mask)
  478. {
  479. unsigned long flags;
  480. int cpu;
  481. spin_lock_irqsave(&smp_reserve_lock, flags);
  482. /* Try to find an already reserved cpu. */
  483. for_each_cpu_mask(cpu, cpu_mask) {
  484. if (smp_cpu_reserved[cpu] != 0) {
  485. smp_cpu_reserved[cpu]++;
  486. /* Found one. */
  487. goto out;
  488. }
  489. }
  490. /* Reserve a new cpu from cpu_mask. */
  491. for_each_cpu_mask(cpu, cpu_mask) {
  492. if (cpu_online(cpu)) {
  493. smp_cpu_reserved[cpu]++;
  494. goto out;
  495. }
  496. }
  497. cpu = -ENODEV;
  498. out:
  499. spin_unlock_irqrestore(&smp_reserve_lock, flags);
  500. return cpu;
  501. }
  502. void
  503. smp_put_cpu(int cpu)
  504. {
  505. unsigned long flags;
  506. spin_lock_irqsave(&smp_reserve_lock, flags);
  507. smp_cpu_reserved[cpu]--;
  508. spin_unlock_irqrestore(&smp_reserve_lock, flags);
  509. }
  510. static inline int
  511. cpu_stopped(int cpu)
  512. {
  513. __u32 status;
  514. /* Check for stopped state */
  515. if (signal_processor_ps(&status, 0, cpu, sigp_sense) == sigp_status_stored) {
  516. if (status & 0x40)
  517. return 1;
  518. }
  519. return 0;
  520. }
  521. /* Upping and downing of CPUs */
  522. int
  523. __cpu_up(unsigned int cpu)
  524. {
  525. struct task_struct *idle;
  526. struct _lowcore *cpu_lowcore;
  527. struct stack_frame *sf;
  528. sigp_ccode ccode;
  529. int curr_cpu;
  530. for (curr_cpu = 0; curr_cpu <= 65535; curr_cpu++) {
  531. __cpu_logical_map[cpu] = (__u16) curr_cpu;
  532. if (cpu_stopped(cpu))
  533. break;
  534. }
  535. if (!cpu_stopped(cpu))
  536. return -ENODEV;
  537. ccode = signal_processor_p((__u32)(unsigned long)(lowcore_ptr[cpu]),
  538. cpu, sigp_set_prefix);
  539. if (ccode){
  540. printk("sigp_set_prefix failed for cpu %d "
  541. "with condition code %d\n",
  542. (int) cpu, (int) ccode);
  543. return -EIO;
  544. }
  545. idle = current_set[cpu];
  546. cpu_lowcore = lowcore_ptr[cpu];
  547. cpu_lowcore->kernel_stack = (unsigned long)
  548. task_stack_page(idle) + (THREAD_SIZE);
  549. sf = (struct stack_frame *) (cpu_lowcore->kernel_stack
  550. - sizeof(struct pt_regs)
  551. - sizeof(struct stack_frame));
  552. memset(sf, 0, sizeof(struct stack_frame));
  553. sf->gprs[9] = (unsigned long) sf;
  554. cpu_lowcore->save_area[15] = (unsigned long) sf;
  555. __ctl_store(cpu_lowcore->cregs_save_area[0], 0, 15);
  556. __asm__ __volatile__("stam 0,15,0(%0)"
  557. : : "a" (&cpu_lowcore->access_regs_save_area)
  558. : "memory");
  559. cpu_lowcore->percpu_offset = __per_cpu_offset[cpu];
  560. cpu_lowcore->current_task = (unsigned long) idle;
  561. cpu_lowcore->cpu_data.cpu_nr = cpu;
  562. eieio();
  563. while (signal_processor(cpu,sigp_restart) == sigp_busy)
  564. udelay(10);
  565. while (!cpu_online(cpu))
  566. cpu_relax();
  567. return 0;
  568. }
  569. static unsigned int __initdata additional_cpus;
  570. static unsigned int __initdata possible_cpus;
  571. void __init smp_setup_cpu_possible_map(void)
  572. {
  573. unsigned int phy_cpus, pos_cpus, cpu;
  574. phy_cpus = smp_count_cpus();
  575. pos_cpus = min(phy_cpus + additional_cpus, (unsigned int) NR_CPUS);
  576. if (possible_cpus)
  577. pos_cpus = min(possible_cpus, (unsigned int) NR_CPUS);
  578. for (cpu = 0; cpu < pos_cpus; cpu++)
  579. cpu_set(cpu, cpu_possible_map);
  580. phy_cpus = min(phy_cpus, pos_cpus);
  581. for (cpu = 0; cpu < phy_cpus; cpu++)
  582. cpu_set(cpu, cpu_present_map);
  583. }
  584. #ifdef CONFIG_HOTPLUG_CPU
  585. static int __init setup_additional_cpus(char *s)
  586. {
  587. additional_cpus = simple_strtoul(s, NULL, 0);
  588. return 0;
  589. }
  590. early_param("additional_cpus", setup_additional_cpus);
  591. static int __init setup_possible_cpus(char *s)
  592. {
  593. possible_cpus = simple_strtoul(s, NULL, 0);
  594. return 0;
  595. }
  596. early_param("possible_cpus", setup_possible_cpus);
  597. int
  598. __cpu_disable(void)
  599. {
  600. unsigned long flags;
  601. ec_creg_mask_parms cr_parms;
  602. int cpu = smp_processor_id();
  603. spin_lock_irqsave(&smp_reserve_lock, flags);
  604. if (smp_cpu_reserved[cpu] != 0) {
  605. spin_unlock_irqrestore(&smp_reserve_lock, flags);
  606. return -EBUSY;
  607. }
  608. cpu_clear(cpu, cpu_online_map);
  609. #ifdef CONFIG_PFAULT
  610. /* Disable pfault pseudo page faults on this cpu. */
  611. if (MACHINE_IS_VM)
  612. pfault_fini();
  613. #endif
  614. /* disable all external interrupts */
  615. cr_parms.start_ctl = 0;
  616. cr_parms.end_ctl = 0;
  617. cr_parms.orvals[0] = 0;
  618. cr_parms.andvals[0] = ~(1<<15 | 1<<14 | 1<<13 | 1<<12 |
  619. 1<<11 | 1<<10 | 1<< 6 | 1<< 4);
  620. smp_ctl_bit_callback(&cr_parms);
  621. /* disable all I/O interrupts */
  622. cr_parms.start_ctl = 6;
  623. cr_parms.end_ctl = 6;
  624. cr_parms.orvals[6] = 0;
  625. cr_parms.andvals[6] = ~(1<<31 | 1<<30 | 1<<29 | 1<<28 |
  626. 1<<27 | 1<<26 | 1<<25 | 1<<24);
  627. smp_ctl_bit_callback(&cr_parms);
  628. /* disable most machine checks */
  629. cr_parms.start_ctl = 14;
  630. cr_parms.end_ctl = 14;
  631. cr_parms.orvals[14] = 0;
  632. cr_parms.andvals[14] = ~(1<<28 | 1<<27 | 1<<26 | 1<<25 | 1<<24);
  633. smp_ctl_bit_callback(&cr_parms);
  634. spin_unlock_irqrestore(&smp_reserve_lock, flags);
  635. return 0;
  636. }
  637. void
  638. __cpu_die(unsigned int cpu)
  639. {
  640. /* Wait until target cpu is down */
  641. while (!smp_cpu_not_running(cpu))
  642. cpu_relax();
  643. printk("Processor %d spun down\n", cpu);
  644. }
  645. void
  646. cpu_die(void)
  647. {
  648. idle_task_exit();
  649. signal_processor(smp_processor_id(), sigp_stop);
  650. BUG();
  651. for(;;);
  652. }
  653. #endif /* CONFIG_HOTPLUG_CPU */
  654. /*
  655. * Cycle through the processors and setup structures.
  656. */
  657. void __init smp_prepare_cpus(unsigned int max_cpus)
  658. {
  659. unsigned long stack;
  660. unsigned int cpu;
  661. int i;
  662. /* request the 0x1201 emergency signal external interrupt */
  663. if (register_external_interrupt(0x1201, do_ext_call_interrupt) != 0)
  664. panic("Couldn't request external interrupt 0x1201");
  665. memset(lowcore_ptr,0,sizeof(lowcore_ptr));
  666. /*
  667. * Initialize prefix pages and stacks for all possible cpus
  668. */
  669. print_cpu_info(&S390_lowcore.cpu_data);
  670. for_each_possible_cpu(i) {
  671. lowcore_ptr[i] = (struct _lowcore *)
  672. __get_free_pages(GFP_KERNEL|GFP_DMA,
  673. sizeof(void*) == 8 ? 1 : 0);
  674. stack = __get_free_pages(GFP_KERNEL,ASYNC_ORDER);
  675. if (lowcore_ptr[i] == NULL || stack == 0ULL)
  676. panic("smp_boot_cpus failed to allocate memory\n");
  677. *(lowcore_ptr[i]) = S390_lowcore;
  678. lowcore_ptr[i]->async_stack = stack + (ASYNC_SIZE);
  679. stack = __get_free_pages(GFP_KERNEL,0);
  680. if (stack == 0ULL)
  681. panic("smp_boot_cpus failed to allocate memory\n");
  682. lowcore_ptr[i]->panic_stack = stack + (PAGE_SIZE);
  683. #ifndef CONFIG_64BIT
  684. if (MACHINE_HAS_IEEE) {
  685. lowcore_ptr[i]->extended_save_area_addr =
  686. (__u32) __get_free_pages(GFP_KERNEL,0);
  687. if (lowcore_ptr[i]->extended_save_area_addr == 0)
  688. panic("smp_boot_cpus failed to "
  689. "allocate memory\n");
  690. }
  691. #endif
  692. }
  693. #ifndef CONFIG_64BIT
  694. if (MACHINE_HAS_IEEE)
  695. ctl_set_bit(14, 29); /* enable extended save area */
  696. #endif
  697. set_prefix((u32)(unsigned long) lowcore_ptr[smp_processor_id()]);
  698. for_each_possible_cpu(cpu)
  699. if (cpu != smp_processor_id())
  700. smp_create_idle(cpu);
  701. }
  702. void __devinit smp_prepare_boot_cpu(void)
  703. {
  704. BUG_ON(smp_processor_id() != 0);
  705. cpu_set(0, cpu_online_map);
  706. S390_lowcore.percpu_offset = __per_cpu_offset[0];
  707. current_set[0] = current;
  708. }
  709. void smp_cpus_done(unsigned int max_cpus)
  710. {
  711. cpu_present_map = cpu_possible_map;
  712. }
  713. /*
  714. * the frequency of the profiling timer can be changed
  715. * by writing a multiplier value into /proc/profile.
  716. *
  717. * usually you want to run this on all CPUs ;)
  718. */
  719. int setup_profiling_timer(unsigned int multiplier)
  720. {
  721. return 0;
  722. }
  723. static DEFINE_PER_CPU(struct cpu, cpu_devices);
  724. static int __init topology_init(void)
  725. {
  726. int cpu;
  727. int ret;
  728. for_each_possible_cpu(cpu) {
  729. ret = register_cpu(&per_cpu(cpu_devices, cpu), cpu);
  730. if (ret)
  731. printk(KERN_WARNING "topology_init: register_cpu %d "
  732. "failed (%d)\n", cpu, ret);
  733. }
  734. return 0;
  735. }
  736. subsys_initcall(topology_init);
  737. EXPORT_SYMBOL(cpu_online_map);
  738. EXPORT_SYMBOL(cpu_possible_map);
  739. EXPORT_SYMBOL(lowcore_ptr);
  740. EXPORT_SYMBOL(smp_ctl_set_bit);
  741. EXPORT_SYMBOL(smp_ctl_clear_bit);
  742. EXPORT_SYMBOL(smp_call_function);
  743. EXPORT_SYMBOL(smp_get_cpu);
  744. EXPORT_SYMBOL(smp_put_cpu);