arch/powerpc/kernel/setup_64.c

   1 /*
   2  *
   3  * Common boot and setup code.
   4  *
   5  * Copyright (C) 2001 PPC64 Team, IBM Corp
   6  *
   7  *      This program is free software; you can redistribute it and/or
   8  *      modify it under the terms of the GNU General Public License
   9  *      as published by the Free Software Foundation; either version
  10  *      2 of the License, or (at your option) any later version.
  11  */
  12
  13 #define DEBUG
  14
  15 #include <linux/export.h>
  16 #include <linux/string.h>
  17 #include <linux/sched.h>
  18 #include <linux/init.h>
  19 #include <linux/kernel.h>
  20 #include <linux/reboot.h>
  21 #include <linux/delay.h>
  22 #include <linux/initrd.h>
  23 #include <linux/seq_file.h>
  24 #include <linux/ioport.h>
  25 #include <linux/console.h>
  26 #include <linux/utsname.h>
  27 #include <linux/tty.h>
  28 #include <linux/root_dev.h>
  29 #include <linux/notifier.h>
  30 #include <linux/cpu.h>
  31 #include <linux/unistd.h>
  32 #include <linux/serial.h>
  33 #include <linux/serial_8250.h>
  34 #include <linux/bootmem.h>
  35 #include <linux/pci.h>
  36 #include <linux/lockdep.h>
  37 #include <linux/memblock.h>
  38 #include <linux/hugetlb.h>
  39
  40 #include <asm/io.h>
  41 #include <asm/kdump.h>
  42 #include <asm/prom.h>
  43 #include <asm/processor.h>
  44 #include <asm/pgtable.h>
  45 #include <asm/smp.h>
  46 #include <asm/elf.h>
  47 #include <asm/machdep.h>
  48 #include <asm/paca.h>
  49 #include <asm/time.h>
  50 #include <asm/cputable.h>
  51 #include <asm/sections.h>
  52 #include <asm/btext.h>
  53 #include <asm/nvram.h>
  54 #include <asm/setup.h>
  55 #include <asm/rtas.h>
  56 #include <asm/iommu.h>
  57 #include <asm/serial.h>
  58 #include <asm/cache.h>
  59 #include <asm/page.h>
  60 #include <asm/mmu.h>
  61 #include <asm/firmware.h>
  62 #include <asm/xmon.h>
  63 #include <asm/udbg.h>
  64 #include <asm/kexec.h>
  65 #include <asm/mmu_context.h>
  66 #include <asm/code-patching.h>
  67 #include <asm/kvm_ppc.h>
  68 #include <asm/hugetlb.h>
  69 #include <asm/epapr_hcalls.h>
  70
  71 #ifdef DEBUG
  72 #define DBG(fmt...) udbg_printf(fmt)
  73 #else
  74 #define DBG(fmt...)
  75 #endif
  76
  77 int boot_cpuid = 0;
  78 int spinning_secondaries;
  79 u64 ppc64_pft_size;
  80
  81 /* Pick defaults since we might want to patch instructions
  82  * before we've read this from the device tree.
  83  */
  84 struct ppc64_caches ppc64_caches = {
  85         .dline_size = 0x40,
  86         .log_dline_size = 6,
  87         .iline_size = 0x40,
  88         .log_iline_size = 6
  89 };
  90 EXPORT_SYMBOL_GPL(ppc64_caches);
  91
  92 /*
  93  * These are used in binfmt_elf.c to put aux entries on the stack
  94  * for each elf executable being started.
  95  */
  96 int dcache_bsize;
  97 int icache_bsize;
  98 int ucache_bsize;
  99
 100 #if defined(CONFIG_PPC_BOOK3E) && defined(CONFIG_SMP)
 101 static void setup_tlb_core_data(void)
 102 {
 103         int cpu;
 104
 105         BUILD_BUG_ON(offsetof(struct tlb_core_data, lock) != 0);
 106
 107         for_each_possible_cpu(cpu) {
 108                 int first = cpu_first_thread_sibling(cpu);
 109
 110                 paca[cpu].tcd_ptr = &paca[first].tcd;
 111
 112                 /*
 113                  * If we have threads, we need either tlbsrx.
 114                  * or e6500 tablewalk mode, or else TLB handlers
 115                  * will be racy and could produce duplicate entries.
 116                  */
 117                 if (smt_enabled_at_boot >= 2 &&
 118                     !mmu_has_feature(MMU_FTR_USE_TLBRSRV) &&
 119                     book3e_htw_mode != PPC_HTW_E6500) {
 120                         /* Should we panic instead? */
 121                         WARN_ONCE("%s: unsupported MMU configuration -- expect problems\n",
 122                                   __func__);
 123                 }
 124         }
 125 }
 126 #else
 127 static void setup_tlb_core_data(void)
 128 {
 129 }
 130 #endif
 131
 132 #ifdef CONFIG_SMP
 133
 134 static char *smt_enabled_cmdline;
 135
 136 /* Look for ibm,smt-enabled OF option */
 137 static void check_smt_enabled(void)
 138 {
 139         struct device_node *dn;
 140         const char *smt_option;
 141
 142         /* Default to enabling all threads */
 143         smt_enabled_at_boot = threads_per_core;
 144
 145         /* Allow the command line to overrule the OF option */
 146         if (smt_enabled_cmdline) {
 147                 if (!strcmp(smt_enabled_cmdline, "on"))
 148                         smt_enabled_at_boot = threads_per_core;
 149                 else if (!strcmp(smt_enabled_cmdline, "off"))
 150                         smt_enabled_at_boot = 0;
 151                 else {
 152                         long smt;
 153                         int rc;
 154
 155                         rc = strict_strtol(smt_enabled_cmdline, 10, &smt);
 156                         if (!rc)
 157                                 smt_enabled_at_boot =
 158                                         min(threads_per_core, (int)smt);
 159                 }
 160         } else {
 161                 dn = of_find_node_by_path("/options");
 162                 if (dn) {
 163                         smt_option = of_get_property(dn, "ibm,smt-enabled",
 164                                                      NULL);
 165
 166                         if (smt_option) {
 167                                 if (!strcmp(smt_option, "on"))
 168                                         smt_enabled_at_boot = threads_per_core;
 169                                 else if (!strcmp(smt_option, "off"))
 170                                         smt_enabled_at_boot = 0;
 171                         }
 172
 173                         of_node_put(dn);
 174                 }
 175         }
 176 }
 177
 178 /* Look for smt-enabled= cmdline option */
 179 static int __init early_smt_enabled(char *p)
 180 {
 181         smt_enabled_cmdline = p;
 182         return 0;
 183 }
 184 early_param("smt-enabled", early_smt_enabled);
 185
 186 #else
 187 #define check_smt_enabled()
 188 #endif /* CONFIG_SMP */
 189
 190 /** Fix up paca fields required for the boot cpu */
 191 static void fixup_boot_paca(void)
 192 {
 193         /* The boot cpu is started */
 194         get_paca()->cpu_start = 1;
 195         /* Allow percpu accesses to work until we setup percpu data */
 196         get_paca()->data_offset = 0;
 197 }
 198
 199 /*
 200  * Early initialization entry point. This is called by head.S
 201  * with MMU translation disabled. We rely on the "feature" of
 202  * the CPU that ignores the top 2 bits of the address in real
 203  * mode so we can access kernel globals normally provided we
 204  * only toy with things in the RMO region. From here, we do
 205  * some early parsing of the device-tree to setup out MEMBLOCK
 206  * data structures, and allocate & initialize the hash table
 207  * and segment tables so we can start running with translation
 208  * enabled.
 209  *
 210  * It is this function which will call the probe() callback of
 211  * the various platform types and copy the matching one to the
 212  * global ppc_md structure. Your platform can eventually do
 213  * some very early initializations from the probe() routine, but
 214  * this is not recommended, be very careful as, for example, the
 215  * device-tree is not accessible via normal means at this point.
 216  */
 217
 218 void __init early_setup(unsigned long dt_ptr)
 219 {
 220         static __initdata struct paca_struct boot_paca;
 221
 222         /* -------- printk is _NOT_ safe to use here ! ------- */
 223
 224         /* Identify CPU type */
 225         identify_cpu(0, mfspr(SPRN_PVR));
 226
 227         /* Assume we're on cpu 0 for now. Don't write to the paca yet! */
 228         initialise_paca(&boot_paca, 0);
 229         setup_paca(&boot_paca);
 230         fixup_boot_paca();
 231
 232         /* Initialize lockdep early or else spinlocks will blow */
 233         lockdep_init();
 234
 235         /* -------- printk is now safe to use ------- */
 236
 237         /* Enable early debugging if any specified (see udbg.h) */
 238         udbg_early_init();
 239
 240         DBG(" -> early_setup(), dt_ptr: 0x%lx\n", dt_ptr);
 241
 242         /*
 243          * Do early initialization using the flattened device
 244          * tree, such as retrieving the physical memory map or
 245          * calculating/retrieving the hash table size.
 246          */
 247         early_init_devtree(__va(dt_ptr));
 248
 249         epapr_paravirt_early_init();
 250
 251         /* Now we know the logical id of our boot cpu, setup the paca. */
 252         setup_paca(&paca[boot_cpuid]);
 253         fixup_boot_paca();
 254
 255         /* Probe the machine type */
 256         probe_machine();
 257
 258         setup_kdump_trampoline();
 259
 260         DBG("Found, Initializing memory management...\n");
 261
 262         /* Initialize the hash table or TLB handling */
 263         early_init_mmu();
 264
 265         kvm_cma_reserve();
 266
 267         /*
 268          * Reserve any gigantic pages requested on the command line.
 269          * memblock needs to have been initialized by the time this is
 270          * called since this will reserve memory.
 271          */
 272         reserve_hugetlb_gpages();
 273
 274         DBG(" <- early_setup()\n");
 275
 276 #ifdef CONFIG_PPC_EARLY_DEBUG_BOOTX
 277         /*
 278          * This needs to be done *last* (after the above DBG() even)
 279          *
 280          * Right after we return from this function, we turn on the MMU
 281          * which means the real-mode access trick that btext does will
 282          * no longer work, it needs to switch to using a real MMU
 283          * mapping. This call will ensure that it does
 284          */
 285         btext_map();
 286 #endif /* CONFIG_PPC_EARLY_DEBUG_BOOTX */
 287 }
 288
 289 #ifdef CONFIG_SMP
 290 void early_setup_secondary(void)
 291 {
 292         /* Mark interrupts enabled in PACA */
 293         get_paca()->soft_enabled = 0;
 294
 295         /* Initialize the hash table or TLB handling */
 296         early_init_mmu_secondary();
 297 }
 298
 299 #endif /* CONFIG_SMP */
 300
 301 #if defined(CONFIG_SMP) || defined(CONFIG_KEXEC)
 302 void smp_release_cpus(void)
 303 {
 304         unsigned long *ptr;
 305         int i;
 306
 307         DBG(" -> smp_release_cpus()\n");
 308
 309         /* All secondary cpus are spinning on a common spinloop, release them
 310          * all now so they can start to spin on their individual paca
 311          * spinloops. For non SMP kernels, the secondary cpus never get out
 312          * of the common spinloop.
 313          */
 314
 315         ptr  = (unsigned long *)((unsigned long)&__secondary_hold_spinloop
 316                         - PHYSICAL_START);
 317         *ptr = __pa(generic_secondary_smp_init);
 318
 319         /* And wait a bit for them to catch up */
 320         for (i = 0; i < 100000; i++) {
 321                 mb();
 322                 HMT_low();
 323                 if (spinning_secondaries == 0)
 324                         break;
 325                 udelay(1);
 326         }
 327         DBG("spinning_secondaries = %d\n", spinning_secondaries);
 328
 329         DBG(" <- smp_release_cpus()\n");
 330 }
 331 #endif /* CONFIG_SMP || CONFIG_KEXEC */
 332
 333 /*
 334  * Initialize some remaining members of the ppc64_caches and systemcfg
 335  * structures
 336  * (at least until we get rid of them completely). This is mostly some
 337  * cache informations about the CPU that will be used by cache flush
 338  * routines and/or provided to userland
 339  */
 340 static void __init initialize_cache_info(void)
 341 {
 342         struct device_node *np;
 343         unsigned long num_cpus = 0;
 344
 345         DBG(" -> initialize_cache_info()\n");
 346
 347         for_each_node_by_type(np, "cpu") {
 348                 num_cpus += 1;
 349
 350                 /*
 351                  * We're assuming *all* of the CPUs have the same
 352                  * d-cache and i-cache sizes... -Peter
 353                  */
 354                 if (num_cpus == 1) {
 355                         const __be32 *sizep, *lsizep;
 356                         u32 size, lsize;
 357
 358                         size = 0;
 359                         lsize = cur_cpu_spec->dcache_bsize;
 360                         sizep = of_get_property(np, "d-cache-size", NULL);
 361                         if (sizep != NULL)
 362                                 size = be32_to_cpu(*sizep);
 363                         lsizep = of_get_property(np, "d-cache-block-size",
 364                                                  NULL);
 365                         /* fallback if block size missing */
 366                         if (lsizep == NULL)
 367                                 lsizep = of_get_property(np,
 368                                                          "d-cache-line-size",
 369                                                          NULL);
 370                         if (lsizep != NULL)
 371                                 lsize = be32_to_cpu(*lsizep);
 372                         if (sizep == NULL || lsizep == NULL)
 373                                 DBG("Argh, can't find dcache properties ! "
 374                                     "sizep: %p, lsizep: %p\n", sizep, lsizep);
 375
 376                         ppc64_caches.dsize = size;
 377                         ppc64_caches.dline_size = lsize;
 378                         ppc64_caches.log_dline_size = __ilog2(lsize);
 379                         ppc64_caches.dlines_per_page = PAGE_SIZE / lsize;
 380
 381                         size = 0;
 382                         lsize = cur_cpu_spec->icache_bsize;
 383                         sizep = of_get_property(np, "i-cache-size", NULL);
 384                         if (sizep != NULL)
 385                                 size = be32_to_cpu(*sizep);
 386                         lsizep = of_get_property(np, "i-cache-block-size",
 387                                                  NULL);
 388                         if (lsizep == NULL)
 389                                 lsizep = of_get_property(np,
 390                                                          "i-cache-line-size",
 391                                                          NULL);
 392                         if (lsizep != NULL)
 393                                 lsize = be32_to_cpu(*lsizep);
 394                         if (sizep == NULL || lsizep == NULL)
 395                                 DBG("Argh, can't find icache properties ! "
 396                                     "sizep: %p, lsizep: %p\n", sizep, lsizep);
 397
 398                         ppc64_caches.isize = size;
 399                         ppc64_caches.iline_size = lsize;
 400                         ppc64_caches.log_iline_size = __ilog2(lsize);
 401                         ppc64_caches.ilines_per_page = PAGE_SIZE / lsize;
 402                 }
 403         }
 404
 405         DBG(" <- initialize_cache_info()\n");
 406 }
 407
 408
 409 /*
 410  * Do some initial setup of the system.  The parameters are those which
 411  * were passed in from the bootloader.
 412  */
 413 void __init setup_system(void)
 414 {
 415         DBG(" -> setup_system()\n");
 416
 417         /* Apply the CPUs-specific and firmware specific fixups to kernel
 418          * text (nop out sections not relevant to this CPU or this firmware)
 419          */
 420         do_feature_fixups(cur_cpu_spec->cpu_features,
 421                           &__start___ftr_fixup, &__stop___ftr_fixup);
 422         do_feature_fixups(cur_cpu_spec->mmu_features,
 423                           &__start___mmu_ftr_fixup, &__stop___mmu_ftr_fixup);
 424         do_feature_fixups(powerpc_firmware_features,
 425                           &__start___fw_ftr_fixup, &__stop___fw_ftr_fixup);
 426         do_lwsync_fixups(cur_cpu_spec->cpu_features,
 427                          &__start___lwsync_fixup, &__stop___lwsync_fixup);
 428         do_final_fixups();
 429
 430         /*
 431          * Unflatten the device-tree passed by prom_init or kexec
 432          */
 433         unflatten_device_tree();
 434
 435         /*
 436          * Fill the ppc64_caches & systemcfg structures with informations
 437          * retrieved from the device-tree.
 438          */
 439         initialize_cache_info();
 440
 441 #ifdef CONFIG_PPC_RTAS
 442         /*
 443          * Initialize RTAS if available
 444          */
 445         rtas_initialize();
 446 #endif /* CONFIG_PPC_RTAS */
 447
 448         /*
 449          * Check if we have an initrd provided via the device-tree
 450          */
 451         check_for_initrd();
 452
 453         /*
 454          * Do some platform specific early initializations, that includes
 455          * setting up the hash table pointers. It also sets up some interrupt-mapping
 456          * related options that will be used by finish_device_tree()
 457          */
 458         if (ppc_md.init_early)
 459                 ppc_md.init_early();
 460
 461         /*
 462          * We can discover serial ports now since the above did setup the
 463          * hash table management for us, thus ioremap works. We do that early
 464          * so that further code can be debugged
 465          */
 466         find_legacy_serial_ports();
 467
 468         /*
 469          * Register early console
 470          */
 471         register_early_udbg_console();
 472
 473         /*
 474          * Initialize xmon
 475          */
 476         xmon_setup();
 477
 478         smp_setup_cpu_maps();
 479         check_smt_enabled();
 480         setup_tlb_core_data();
 481
 482 #ifdef CONFIG_SMP
 483         /* Release secondary cpus out of their spinloops at 0x60 now that
 484          * we can map physical -> logical CPU ids
 485          */
 486         smp_release_cpus();
 487 #endif
 488
 489         printk("Starting Linux PPC64 %s\n", init_utsname()->version);
 490
 491         printk("-----------------------------------------------------\n");
 492         printk("ppc64_pft_size                = 0x%llx\n", ppc64_pft_size);
 493         printk("physicalMemorySize            = 0x%llx\n", memblock_phys_mem_size());
 494         if (ppc64_caches.dline_size != 0x80)
 495                 printk("ppc64_caches.dcache_line_size = 0x%x\n",
 496                        ppc64_caches.dline_size);
 497         if (ppc64_caches.iline_size != 0x80)
 498                 printk("ppc64_caches.icache_line_size = 0x%x\n",
 499                        ppc64_caches.iline_size);
 500 #ifdef CONFIG_PPC_STD_MMU_64
 501         if (htab_address)
 502                 printk("htab_address                  = 0x%p\n", htab_address);
 503         printk("htab_hash_mask                = 0x%lx\n", htab_hash_mask);
 504 #endif /* CONFIG_PPC_STD_MMU_64 */
 505         if (PHYSICAL_START > 0)
 506                 printk("physical_start                = 0x%llx\n",
 507                        (unsigned long long)PHYSICAL_START);
 508         printk("-----------------------------------------------------\n");
 509
 510         DBG(" <- setup_system()\n");
 511 }
 512
 513 /* This returns the limit below which memory accesses to the linear
 514  * mapping are guarnateed not to cause a TLB or SLB miss. This is
 515  * used to allocate interrupt or emergency stacks for which our
 516  * exception entry path doesn't deal with being interrupted.
 517  */
 518 static u64 safe_stack_limit(void)
 519 {
 520 #ifdef CONFIG_PPC_BOOK3E
 521         /* Freescale BookE bolts the entire linear mapping */
 522         if (mmu_has_feature(MMU_FTR_TYPE_FSL_E))
 523                 return linear_map_top;
 524         /* Other BookE, we assume the first GB is bolted */
 525         return 1ul << 30;
 526 #else
 527         /* BookS, the first segment is bolted */
 528         if (mmu_has_feature(MMU_FTR_1T_SEGMENT))
 529                 return 1UL << SID_SHIFT_1T;
 530         return 1UL << SID_SHIFT;
 531 #endif
 532 }
 533
 534 static void __init irqstack_early_init(void)
 535 {
 536         u64 limit = safe_stack_limit();
 537         unsigned int i;
 538
 539         /*
 540          * Interrupt stacks must be in the first segment since we
 541          * cannot afford to take SLB misses on them.
 542          */
 543         for_each_possible_cpu(i) {
 544                 softirq_ctx[i] = (struct thread_info *)
 545                         __va(memblock_alloc_base(THREAD_SIZE,
 546                                             THREAD_SIZE, limit));
 547                 hardirq_ctx[i] = (struct thread_info *)
 548                         __va(memblock_alloc_base(THREAD_SIZE,
 549                                             THREAD_SIZE, limit));
 550         }
 551 }
 552
 553 #ifdef CONFIG_PPC_BOOK3E
 554 static void __init exc_lvl_early_init(void)
 555 {
 556         unsigned int i;
 557         unsigned long sp;
 558
 559         for_each_possible_cpu(i) {
 560                 sp = memblock_alloc(THREAD_SIZE, THREAD_SIZE);
 561                 critirq_ctx[i] = (struct thread_info *)__va(sp);
 562                 paca[i].crit_kstack = __va(sp + THREAD_SIZE);
 563
 564                 sp = memblock_alloc(THREAD_SIZE, THREAD_SIZE);
 565                 dbgirq_ctx[i] = (struct thread_info *)__va(sp);
 566                 paca[i].dbg_kstack = __va(sp + THREAD_SIZE);
 567
 568                 sp = memblock_alloc(THREAD_SIZE, THREAD_SIZE);
 569                 mcheckirq_ctx[i] = (struct thread_info *)__va(sp);
 570                 paca[i].mc_kstack = __va(sp + THREAD_SIZE);
 571         }
 572
 573         if (cpu_has_feature(CPU_FTR_DEBUG_LVL_EXC))
 574                 patch_exception(0x040, exc_debug_debug_book3e);
 575 }
 576 #else
 577 #define exc_lvl_early_init()
 578 #endif
 579
 580 /*
 581  * Stack space used when we detect a bad kernel stack pointer, and
 582  * early in SMP boots before relocation is enabled. Exclusive emergency
 583  * stack for machine checks.
 584  */
 585 static void __init emergency_stack_init(void)
 586 {
 587         u64 limit;
 588         unsigned int i;
 589
 590         /*
 591          * Emergency stacks must be under 256MB, we cannot afford to take
 592          * SLB misses on them. The ABI also requires them to be 128-byte
 593          * aligned.
 594          *
 595          * Since we use these as temporary stacks during secondary CPU
 596          * bringup, we need to get at them in real mode. This means they
 597          * must also be within the RMO region.
 598          */
 599         limit = min(safe_stack_limit(), ppc64_rma_size);
 600
 601         for_each_possible_cpu(i) {
 602                 unsigned long sp;
 603                 sp  = memblock_alloc_base(THREAD_SIZE, THREAD_SIZE, limit);
 604                 sp += THREAD_SIZE;
 605                 paca[i].emergency_sp = __va(sp);
 606
 607 #ifdef CONFIG_PPC_BOOK3S_64
 608                 /* emergency stack for machine check exception handling. */
 609                 sp  = memblock_alloc_base(THREAD_SIZE, THREAD_SIZE, limit);
 610                 sp += THREAD_SIZE;
 611                 paca[i].mc_emergency_sp = __va(sp);
 612 #endif
 613         }
 614 }
 615
 616 /*
 617  * Called into from start_kernel this initializes bootmem, which is used
 618  * to manage page allocation until mem_init is called.
 619  */
 620 void __init setup_arch(char **cmdline_p)
 621 {
 622         ppc64_boot_msg(0x12, "Setup Arch");
 623
 624         *cmdline_p = cmd_line;
 625
 626         /*
 627          * Set cache line size based on type of cpu as a default.
 628          * Systems with OF can look in the properties on the cpu node(s)
 629          * for a possibly more accurate value.
 630          */
 631         dcache_bsize = ppc64_caches.dline_size;
 632         icache_bsize = ppc64_caches.iline_size;
 633
 634         if (ppc_md.panic)
 635                 setup_panic();
 636
 637         init_mm.start_code = (unsigned long)_stext;
 638         init_mm.end_code = (unsigned long) _etext;
 639         init_mm.end_data = (unsigned long) _edata;
 640         init_mm.brk = klimit;
 641 #ifdef CONFIG_PPC_64K_PAGES
 642         init_mm.context.pte_frag = NULL;
 643 #endif
 644         irqstack_early_init();
 645         exc_lvl_early_init();
 646         emergency_stack_init();
 647
 648 #ifdef CONFIG_PPC_STD_MMU_64
 649         stabs_alloc();
 650 #endif
 651         /* set up the bootmem stuff with available memory */
 652         do_init_bootmem();
 653         sparse_init();
 654
 655 #ifdef CONFIG_DUMMY_CONSOLE
 656         conswitchp = &dummy_con;
 657 #endif
 658
 659         if (ppc_md.setup_arch)
 660                 ppc_md.setup_arch();
 661
 662         paging_init();
 663
 664         /* Initialize the MMU context management stuff */
 665         mmu_context_init();
 666
 667         /* Interrupt code needs to be 64K-aligned */
 668         if ((unsigned long)_stext & 0xffff)
 669                 panic("Kernelbase not 64K-aligned (0x%lx)!\n",
 670                       (unsigned long)_stext);
 671
 672         ppc64_boot_msg(0x15, "Setup Done");
 673 }
 674
 675
 676 /* ToDo: do something useful if ppc_md is not yet setup. */
 677 #define PPC64_LINUX_FUNCTION 0x0f000000
 678 #define PPC64_IPL_MESSAGE 0xc0000000
 679 #define PPC64_TERM_MESSAGE 0xb0000000
 680
 681 static void ppc64_do_msg(unsigned int src, const char *msg)
 682 {
 683         if (ppc_md.progress) {
 684                 char buf[128];
 685
 686                 sprintf(buf, "%08X\n", src);
 687                 ppc_md.progress(buf, 0);
 688                 snprintf(buf, 128, "%s", msg);
 689                 ppc_md.progress(buf, 0);
 690         }
 691 }
 692
 693 /* Print a boot progress message. */
 694 void ppc64_boot_msg(unsigned int src, const char *msg)
 695 {
 696         ppc64_do_msg(PPC64_LINUX_FUNCTION|PPC64_IPL_MESSAGE|src, msg);
 697         printk("[boot]%04x %s\n", src, msg);
 698 }
 699
 700 #ifdef CONFIG_SMP
 701 #define PCPU_DYN_SIZE           ()
 702
 703 static void * __init pcpu_fc_alloc(unsigned int cpu, size_t size, size_t align)
 704 {
 705         return __alloc_bootmem_node(NODE_DATA(cpu_to_node(cpu)), size, align,
 706                                     __pa(MAX_DMA_ADDRESS));
 707 }
 708
 709 static void __init pcpu_fc_free(void *ptr, size_t size)
 710 {
 711         free_bootmem(__pa(ptr), size);
 712 }
 713
 714 static int pcpu_cpu_distance(unsigned int from, unsigned int to)
 715 {
 716         if (cpu_to_node(from) == cpu_to_node(to))
 717                 return LOCAL_DISTANCE;
 718         else
 719                 return REMOTE_DISTANCE;
 720 }
 721
 722 unsigned long __per_cpu_offset[NR_CPUS] __read_mostly;
 723 EXPORT_SYMBOL(__per_cpu_offset);
 724
 725 void __init setup_per_cpu_areas(void)
 726 {
 727         const size_t dyn_size = PERCPU_MODULE_RESERVE + PERCPU_DYNAMIC_RESERVE;
 728         size_t atom_size;
 729         unsigned long delta;
 730         unsigned int cpu;
 731         int rc;
 732
 733         /*
 734          * Linear mapping is one of 4K, 1M and 16M.  For 4K, no need
 735          * to group units.  For larger mappings, use 1M atom which
 736          * should be large enough to contain a number of units.
 737          */
 738         if (mmu_linear_psize == MMU_PAGE_4K)
 739                 atom_size = PAGE_SIZE;
 740         else
 741                 atom_size = 1 << 20;
 742
 743         rc = pcpu_embed_first_chunk(0, dyn_size, atom_size, pcpu_cpu_distance,
 744                                     pcpu_fc_alloc, pcpu_fc_free);
 745         if (rc < 0)
 746                 panic("cannot initialize percpu area (err=%d)", rc);
 747
 748         delta = (unsigned long)pcpu_base_addr - (unsigned long)__per_cpu_start;
 749         for_each_possible_cpu(cpu) {
 750                 __per_cpu_offset[cpu] = delta + pcpu_unit_offsets[cpu];
 751                 paca[cpu].data_offset = __per_cpu_offset[cpu];
 752         }
 753 }
 754 #endif
 755
 756
 757 #if defined(CONFIG_PPC_INDIRECT_PIO) || defined(CONFIG_PPC_INDIRECT_MMIO)
 758 struct ppc_pci_io ppc_pci_io;
 759 EXPORT_SYMBOL(ppc_pci_io);
 760 #endif