Merge master.kernel.org:/pub/scm/linux/kernel/git/davej/agpgart
[linux-2.6] / arch / m32r / kernel / smpboot.c
1 /*
2  *  linux/arch/m32r/kernel/smpboot.c
3  *    orig : i386 2.4.10
4  *
5  *  M32R SMP booting functions
6  *
7  *  Copyright (c) 2001, 2002, 2003  Hitoshi Yamamoto
8  *
9  *  Taken from i386 version.
10  *        (c) 1995 Alan Cox, Building #3 <alan@redhat.com>
11  *        (c) 1998, 1999, 2000 Ingo Molnar <mingo@redhat.com>
12  *
13  *      Much of the core SMP work is based on previous work by Thomas Radke, to
14  *      whom a great many thanks are extended.
15  *
16  *      Thanks to Intel for making available several different Pentium,
17  *      Pentium Pro and Pentium-II/Xeon MP machines.
18  *      Original development of Linux SMP code supported by Caldera.
19  *
20  *      This code is released under the GNU General Public License version 2 or
21  *      later.
22  *
23  *      Fixes
24  *              Felix Koop      :       NR_CPUS used properly
25  *              Jose Renau      :       Handle single CPU case.
26  *              Alan Cox        :       By repeated request
27  *                                      8) - Total BogoMIP report.
28  *              Greg Wright     :       Fix for kernel stacks panic.
29  *              Erich Boleyn    :       MP v1.4 and additional changes.
30  *      Matthias Sattler        :       Changes for 2.1 kernel map.
31  *      Michel Lespinasse       :       Changes for 2.1 kernel map.
32  *      Michael Chastain        :       Change trampoline.S to gnu as.
33  *              Alan Cox        :       Dumb bug: 'B' step PPro's are fine
34  *              Ingo Molnar     :       Added APIC timers, based on code
35  *                                      from Jose Renau
36  *              Ingo Molnar     :       various cleanups and rewrites
37  *              Tigran Aivazian :       fixed "0.00 in /proc/uptime on SMP" bug.
38  *      Maciej W. Rozycki       :       Bits for genuine 82489DX APICs
39  *              Martin J. Bligh :       Added support for multi-quad systems
40  */
41
42 #include <linux/module.h>
43 #include <linux/init.h>
44 #include <linux/kernel.h>
45 #include <linux/mm.h>
46 #include <linux/smp_lock.h>
47 #include <linux/irq.h>
48 #include <linux/bootmem.h>
49 #include <linux/delay.h>
50
51 #include <asm/io.h>
52 #include <asm/pgalloc.h>
53 #include <asm/tlbflush.h>
54
55 #define DEBUG_SMP
56 #ifdef DEBUG_SMP
57 #define Dprintk(x...) printk(x)
58 #else
59 #define Dprintk(x...)
60 #endif
61
62 extern cpumask_t cpu_initialized;
63
64 /*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*/
65 /* Data structures and variables                                             */
66 /*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*/
67
68 /* Processor that is doing the boot up */
69 static unsigned int bsp_phys_id = -1;
70
71 /* Bitmask of physically existing CPUs */
72 physid_mask_t phys_cpu_present_map;
73
74 /* Bitmask of currently online CPUs */
75 cpumask_t cpu_online_map;
76 EXPORT_SYMBOL(cpu_online_map);
77
78 cpumask_t cpu_bootout_map;
79 cpumask_t cpu_bootin_map;
80 static cpumask_t cpu_callin_map;
81 cpumask_t cpu_callout_map;
82 EXPORT_SYMBOL(cpu_callout_map);
83 cpumask_t cpu_possible_map = CPU_MASK_ALL;
84 EXPORT_SYMBOL(cpu_possible_map);
85
86 /* Per CPU bogomips and other parameters */
87 struct cpuinfo_m32r cpu_data[NR_CPUS] __cacheline_aligned;
88
89 static int cpucount;
90 static cpumask_t smp_commenced_mask;
91
92 extern struct {
93         void * spi;
94         unsigned short ss;
95 } stack_start;
96
97 /* which physical physical ID maps to which logical CPU number */
98 static volatile int physid_2_cpu[NR_CPUS];
99 #define physid_to_cpu(physid)   physid_2_cpu[physid]
100
101 /* which logical CPU number maps to which physical ID */
102 volatile int cpu_2_physid[NR_CPUS];
103
104 DEFINE_PER_CPU(int, prof_multiplier) = 1;
105 DEFINE_PER_CPU(int, prof_old_multiplier) = 1;
106 DEFINE_PER_CPU(int, prof_counter) = 1;
107
108 spinlock_t ipi_lock[NR_IPIS];
109
110 static unsigned int calibration_result;
111
112 /*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*/
113 /* Function Prototypes                                                       */
114 /*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*/
115
116 void smp_prepare_boot_cpu(void);
117 void smp_prepare_cpus(unsigned int);
118 static void init_ipi_lock(void);
119 static void do_boot_cpu(int);
120 int __cpu_up(unsigned int);
121 void smp_cpus_done(unsigned int);
122
123 int start_secondary(void *);
124 static void smp_callin(void);
125 static void smp_online(void);
126
127 static void show_mp_info(int);
128 static void smp_store_cpu_info(int);
129 static void show_cpu_info(int);
130 int setup_profiling_timer(unsigned int);
131 static void init_cpu_to_physid(void);
132 static void map_cpu_to_physid(int, int);
133 static void unmap_cpu_to_physid(int, int);
134
135 /*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*/
136 /* Boot up APs Routins : BSP                                                 */
137 /*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*/
138 void __devinit smp_prepare_boot_cpu(void)
139 {
140         bsp_phys_id = hard_smp_processor_id();
141         physid_set(bsp_phys_id, phys_cpu_present_map);
142         cpu_set(0, cpu_online_map);     /* BSP's cpu_id == 0 */
143         cpu_set(0, cpu_callout_map);
144         cpu_set(0, cpu_callin_map);
145
146         /*
147          * Initialize the logical to physical CPU number mapping
148          */
149         init_cpu_to_physid();
150         map_cpu_to_physid(0, bsp_phys_id);
151         current_thread_info()->cpu = 0;
152 }
153
154 /*==========================================================================*
155  * Name:         smp_prepare_cpus (old smp_boot_cpus)
156  *
157  * Description:  This routine boot up APs.
158  *
159  * Born on Date: 2002.02.05
160  *
161  * Arguments:    NONE
162  *
163  * Returns:      void (cannot fail)
164  *
165  * Modification log:
166  * Date       Who Description
167  * ---------- --- --------------------------------------------------------
168  * 2003-06-24 hy  modify for linux-2.5.69
169  *
170  *==========================================================================*/
171 void __init smp_prepare_cpus(unsigned int max_cpus)
172 {
173         int phys_id;
174         unsigned long nr_cpu;
175
176         nr_cpu = inl(M32R_FPGA_NUM_OF_CPUS_PORTL);
177         if (nr_cpu > NR_CPUS) {
178                 printk(KERN_INFO "NUM_OF_CPUS reg. value [%ld] > NR_CPU [%d]",
179                         nr_cpu, NR_CPUS);
180                 goto smp_done;
181         }
182         for (phys_id = 0 ; phys_id < nr_cpu ; phys_id++)
183                 physid_set(phys_id, phys_cpu_present_map);
184 #ifndef CONFIG_HOTPLUG_CPU
185         cpu_present_map = cpu_possible_map;
186 #endif
187
188         show_mp_info(nr_cpu);
189
190         init_ipi_lock();
191
192         /*
193          * Setup boot CPU information
194          */
195         smp_store_cpu_info(0); /* Final full version of the data */
196
197         /*
198          * If SMP should be disabled, then really disable it!
199          */
200         if (!max_cpus) {
201                 printk(KERN_INFO "SMP mode deactivated by commandline.\n");
202                 goto smp_done;
203         }
204
205         /*
206          * Now scan the CPU present map and fire up the other CPUs.
207          */
208         Dprintk("CPU present map : %lx\n", physids_coerce(phys_cpu_present_map));
209
210         for (phys_id = 0 ; phys_id < NR_CPUS ; phys_id++) {
211                 /*
212                  * Don't even attempt to start the boot CPU!
213                  */
214                 if (phys_id == bsp_phys_id)
215                         continue;
216
217                 if (!physid_isset(phys_id, phys_cpu_present_map))
218                         continue;
219
220                 if ((max_cpus >= 0) && (max_cpus <= cpucount + 1))
221                         continue;
222
223                 do_boot_cpu(phys_id);
224
225                 /*
226                  * Make sure we unmap all failed CPUs
227                  */
228                 if (physid_to_cpu(phys_id) == -1) {
229                         physid_clear(phys_id, phys_cpu_present_map);
230                         printk("phys CPU#%d not responding - " \
231                                 "cannot use it.\n", phys_id);
232                 }
233         }
234
235 smp_done:
236         Dprintk("Boot done.\n");
237 }
238
239 /*
240  * init_ipi_lock : Initialize IPI locks.
241  */
242 static void __init init_ipi_lock(void)
243 {
244         int ipi;
245
246         for (ipi = 0 ; ipi < NR_IPIS ; ipi++)
247                 spin_lock_init(&ipi_lock[ipi]);
248 }
249
250 /*==========================================================================*
251  * Name:         do_boot_cpu
252  *
253  * Description:  This routine boot up one AP.
254  *
255  * Born on Date: 2002.02.05
256  *
257  * Arguments:    phys_id - Target CPU physical ID
258  *
259  * Returns:      void (cannot fail)
260  *
261  * Modification log:
262  * Date       Who Description
263  * ---------- --- --------------------------------------------------------
264  * 2003-06-24 hy  modify for linux-2.5.69
265  *
266  *==========================================================================*/
267 static void __init do_boot_cpu(int phys_id)
268 {
269         struct task_struct *idle;
270         unsigned long send_status, boot_status;
271         int timeout, cpu_id;
272
273         cpu_id = ++cpucount;
274
275         /*
276          * We can't use kernel_thread since we must avoid to
277          * reschedule the child.
278          */
279         idle = fork_idle(cpu_id);
280         if (IS_ERR(idle))
281                 panic("failed fork for CPU#%d.", cpu_id);
282
283         idle->thread.lr = (unsigned long)start_secondary;
284
285         map_cpu_to_physid(cpu_id, phys_id);
286
287         /* So we see what's up   */
288         printk("Booting processor %d/%d\n", phys_id, cpu_id);
289         stack_start.spi = (void *)idle->thread.sp;
290         task_thread_info(idle)->cpu = cpu_id;
291
292         /*
293          * Send Startup IPI
294          *   1.IPI received by CPU#(phys_id).
295          *   2.CPU#(phys_id) enter startup_AP (arch/m32r/kernel/head.S)
296          *   3.CPU#(phys_id) enter start_secondary()
297          */
298         send_status = 0;
299         boot_status = 0;
300
301         cpu_set(phys_id, cpu_bootout_map);
302
303         /* Send Startup IPI */
304         send_IPI_mask_phys(cpumask_of_cpu(phys_id), CPU_BOOT_IPI, 0);
305
306         Dprintk("Waiting for send to finish...\n");
307         timeout = 0;
308
309         /* Wait 100[ms] */
310         do {
311                 Dprintk("+");
312                 udelay(1000);
313                 send_status = !cpu_isset(phys_id, cpu_bootin_map);
314         } while (send_status && (timeout++ < 100));
315
316         Dprintk("After Startup.\n");
317
318         if (!send_status) {
319                 /*
320                  * allow APs to start initializing.
321                  */
322                 Dprintk("Before Callout %d.\n", cpu_id);
323                 cpu_set(cpu_id, cpu_callout_map);
324                 Dprintk("After Callout %d.\n", cpu_id);
325
326                 /*
327                  * Wait 5s total for a response
328                  */
329                 for (timeout = 0; timeout < 5000; timeout++) {
330                         if (cpu_isset(cpu_id, cpu_callin_map))
331                                 break;  /* It has booted */
332                         udelay(1000);
333                 }
334
335                 if (cpu_isset(cpu_id, cpu_callin_map)) {
336                         /* number CPUs logically, starting from 1 (BSP is 0) */
337                         Dprintk("OK.\n");
338                 } else {
339                         boot_status = 1;
340                         printk("Not responding.\n");
341                 }
342         } else
343                 printk("IPI never delivered???\n");
344
345         if (send_status || boot_status) {
346                 unmap_cpu_to_physid(cpu_id, phys_id);
347                 cpu_clear(cpu_id, cpu_callout_map);
348                 cpu_clear(cpu_id, cpu_callin_map);
349                 cpu_clear(cpu_id, cpu_initialized);
350                 cpucount--;
351         }
352 }
353
354 int __cpuinit __cpu_up(unsigned int cpu_id)
355 {
356         int timeout;
357
358         cpu_set(cpu_id, smp_commenced_mask);
359
360         /*
361          * Wait 5s total for a response
362          */
363         for (timeout = 0; timeout < 5000; timeout++) {
364                 if (cpu_isset(cpu_id, cpu_online_map))
365                         break;
366                 udelay(1000);
367         }
368         if (!cpu_isset(cpu_id, cpu_online_map))
369                 BUG();
370
371         return 0;
372 }
373
374 void __init smp_cpus_done(unsigned int max_cpus)
375 {
376         int cpu_id, timeout;
377         unsigned long bogosum = 0;
378
379         for (timeout = 0; timeout < 5000; timeout++) {
380                 if (cpus_equal(cpu_callin_map, cpu_online_map))
381                         break;
382                 udelay(1000);
383         }
384         if (!cpus_equal(cpu_callin_map, cpu_online_map))
385                 BUG();
386
387         for (cpu_id = 0 ; cpu_id < num_online_cpus() ; cpu_id++)
388                 show_cpu_info(cpu_id);
389
390         /*
391          * Allow the user to impress friends.
392          */
393         Dprintk("Before bogomips.\n");
394         if (cpucount) {
395                 for_each_cpu_mask(cpu_id, cpu_online_map)
396                         bogosum += cpu_data[cpu_id].loops_per_jiffy;
397
398                 printk(KERN_INFO "Total of %d processors activated " \
399                         "(%lu.%02lu BogoMIPS).\n", cpucount + 1,
400                         bogosum / (500000 / HZ),
401                         (bogosum / (5000 / HZ)) % 100);
402                 Dprintk("Before bogocount - setting activated=1.\n");
403         }
404 }
405
406 /*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*/
407 /* Activate a secondary processor Routins                                    */
408 /*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*/
409
410 /*==========================================================================*
411  * Name:         start_secondary
412  *
413  * Description:  This routine activate a secondary processor.
414  *
415  * Born on Date: 2002.02.05
416  *
417  * Arguments:    *unused - currently unused.
418  *
419  * Returns:      void (cannot fail)
420  *
421  * Modification log:
422  * Date       Who Description
423  * ---------- --- --------------------------------------------------------
424  * 2003-06-24 hy  modify for linux-2.5.69
425  *
426  *==========================================================================*/
427 int __init start_secondary(void *unused)
428 {
429         cpu_init();
430         preempt_disable();
431         smp_callin();
432         while (!cpu_isset(smp_processor_id(), smp_commenced_mask))
433                 cpu_relax();
434
435         smp_online();
436
437         /*
438          * low-memory mappings have been cleared, flush them from
439          * the local TLBs too.
440          */
441         local_flush_tlb_all();
442
443         cpu_idle();
444         return 0;
445 }
446
447 /*==========================================================================*
448  * Name:         smp_callin
449  *
450  * Description:  This routine activate a secondary processor.
451  *
452  * Born on Date: 2002.02.05
453  *
454  * Arguments:    NONE
455  *
456  * Returns:      void (cannot fail)
457  *
458  * Modification log:
459  * Date       Who Description
460  * ---------- --- --------------------------------------------------------
461  * 2003-06-24 hy  modify for linux-2.5.69
462  *
463  *==========================================================================*/
464 static void __init smp_callin(void)
465 {
466         int phys_id = hard_smp_processor_id();
467         int cpu_id = smp_processor_id();
468         unsigned long timeout;
469
470         if (cpu_isset(cpu_id, cpu_callin_map)) {
471                 printk("huh, phys CPU#%d, CPU#%d already present??\n",
472                         phys_id, cpu_id);
473                 BUG();
474         }
475         Dprintk("CPU#%d (phys ID: %d) waiting for CALLOUT\n", cpu_id, phys_id);
476
477         /* Waiting 2s total for startup (udelay is not yet working) */
478         timeout = jiffies + (2 * HZ);
479         while (time_before(jiffies, timeout)) {
480                 /* Has the boot CPU finished it's STARTUP sequence ? */
481                 if (cpu_isset(cpu_id, cpu_callout_map))
482                         break;
483                 cpu_relax();
484         }
485
486         if (!time_before(jiffies, timeout)) {
487                 printk("BUG: CPU#%d started up but did not get a callout!\n",
488                         cpu_id);
489                 BUG();
490         }
491
492         /* Allow the master to continue. */
493         cpu_set(cpu_id, cpu_callin_map);
494 }
495
496 static void __init smp_online(void)
497 {
498         int cpu_id = smp_processor_id();
499
500         local_irq_enable();
501
502         /* Get our bogomips. */
503         calibrate_delay();
504
505         /* Save our processor parameters */
506         smp_store_cpu_info(cpu_id);
507
508         cpu_set(cpu_id, cpu_online_map);
509 }
510
511 /*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*/
512 /* Boot up CPUs common Routins                                               */
513 /*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*/
514 static void __init show_mp_info(int nr_cpu)
515 {
516         int i;
517         char cpu_model0[17], cpu_model1[17], cpu_ver[9];
518
519         strncpy(cpu_model0, (char *)M32R_FPGA_CPU_NAME_ADDR, 16);
520         strncpy(cpu_model1, (char *)M32R_FPGA_MODEL_ID_ADDR, 16);
521         strncpy(cpu_ver, (char *)M32R_FPGA_VERSION_ADDR, 8);
522
523         cpu_model0[16] = '\0';
524         for (i = 15 ; i >= 0 ; i--) {
525                 if (cpu_model0[i] != ' ')
526                         break;
527                 cpu_model0[i] = '\0';
528         }
529         cpu_model1[16] = '\0';
530         for (i = 15 ; i >= 0 ; i--) {
531                 if (cpu_model1[i] != ' ')
532                         break;
533                 cpu_model1[i] = '\0';
534         }
535         cpu_ver[8] = '\0';
536         for (i = 7 ; i >= 0 ; i--) {
537                 if (cpu_ver[i] != ' ')
538                         break;
539                 cpu_ver[i] = '\0';
540         }
541
542         printk(KERN_INFO "M32R-mp information\n");
543         printk(KERN_INFO "  On-chip CPUs : %d\n", nr_cpu);
544         printk(KERN_INFO "  CPU model : %s/%s(%s)\n", cpu_model0,
545                 cpu_model1, cpu_ver);
546 }
547
548 /*
549  * The bootstrap kernel entry code has set these up. Save them for
550  * a given CPU
551  */
552 static void __init smp_store_cpu_info(int cpu_id)
553 {
554         struct cpuinfo_m32r *ci = cpu_data + cpu_id;
555
556         *ci = boot_cpu_data;
557         ci->loops_per_jiffy = loops_per_jiffy;
558 }
559
560 static void __init show_cpu_info(int cpu_id)
561 {
562         struct cpuinfo_m32r *ci = &cpu_data[cpu_id];
563
564         printk("CPU#%d : ", cpu_id);
565
566 #define PRINT_CLOCK(name, value) \
567         printk(name " clock %d.%02dMHz", \
568                 ((value) / 1000000), ((value) % 1000000) / 10000)
569
570         PRINT_CLOCK("CPU", (int)ci->cpu_clock);
571         PRINT_CLOCK(", Bus", (int)ci->bus_clock);
572         printk(", loops_per_jiffy[%ld]\n", ci->loops_per_jiffy);
573 }
574
575 /*
576  * the frequency of the profiling timer can be changed
577  * by writing a multiplier value into /proc/profile.
578  */
579 int setup_profiling_timer(unsigned int multiplier)
580 {
581         int i;
582
583         /*
584          * Sanity check. [at least 500 APIC cycles should be
585          * between APIC interrupts as a rule of thumb, to avoid
586          * irqs flooding us]
587          */
588         if ( (!multiplier) || (calibration_result / multiplier < 500))
589                 return -EINVAL;
590
591         /*
592          * Set the new multiplier for each CPU. CPUs don't start using the
593          * new values until the next timer interrupt in which they do process
594          * accounting. At that time they also adjust their APIC timers
595          * accordingly.
596          */
597         for (i = 0; i < NR_CPUS; ++i)
598                 per_cpu(prof_multiplier, i) = multiplier;
599
600         return 0;
601 }
602
603 /* Initialize all maps between cpu number and apicids */
604 static void __init init_cpu_to_physid(void)
605 {
606         int  i;
607
608         for (i = 0 ; i < NR_CPUS ; i++) {
609                 cpu_2_physid[i] = -1;
610                 physid_2_cpu[i] = -1;
611         }
612 }
613
614 /*
615  * set up a mapping between cpu and apicid. Uses logical apicids for multiquad,
616  * else physical apic ids
617  */
618 static void __init map_cpu_to_physid(int cpu_id, int phys_id)
619 {
620         physid_2_cpu[phys_id] = cpu_id;
621         cpu_2_physid[cpu_id] = phys_id;
622 }
623
624 /*
625  * undo a mapping between cpu and apicid. Uses logical apicids for multiquad,
626  * else physical apic ids
627  */
628 static void __init unmap_cpu_to_physid(int cpu_id, int phys_id)
629 {
630         physid_2_cpu[phys_id] = -1;
631         cpu_2_physid[cpu_id] = -1;
632 }