1 /* 2 * Procedures for creating, accessing and interpreting the device tree. 3 * 4 * Paul Mackerras August 1996. 5 * Copyright (C) 1996-2005 Paul Mackerras. 6 * 7 * Adapted for 64bit PowerPC by Dave Engebretsen and Peter Bergner. 8 * {engebret|bergner}@us.ibm.com 9 * 10 * This program is free software; you can redistribute it and/or 11 * modify it under the terms of the GNU General Public License 12 * as published by the Free Software Foundation; either version 13 * 2 of the License, or (at your option) any later version. 14 */ 15 16 #undef DEBUG 17 18 #include <stdarg.h> 19 #include <linux/kernel.h> 20 #include <linux/string.h> 21 #include <linux/init.h> 22 #include <linux/threads.h> 23 #include <linux/spinlock.h> 24 #include <linux/types.h> 25 #include <linux/pci.h> 26 #include <linux/stringify.h> 27 #include <linux/delay.h> 28 #include <linux/initrd.h> 29 #include <linux/bitops.h> 30 #include <linux/export.h> 31 #include <linux/kexec.h> 32 #include <linux/debugfs.h> 33 #include <linux/irq.h> 34 #include <linux/memblock.h> 35 #include <linux/of.h> 36 37 #include <asm/prom.h> 38 #include <asm/rtas.h> 39 #include <asm/page.h> 40 #include <asm/processor.h> 41 #include <asm/irq.h> 42 #include <asm/io.h> 43 #include <asm/kdump.h> 44 #include <asm/smp.h> 45 #include <asm/mmu.h> 46 #include <asm/paca.h> 47 #include <asm/pgtable.h> 48 #include <asm/pci.h> 49 #include <asm/iommu.h> 50 #include <asm/btext.h> 51 #include <asm/sections.h> 52 #include <asm/machdep.h> 53 #include <asm/pci-bridge.h> 54 #include <asm/kexec.h> 55 #include <asm/opal.h> 56 #include <asm/fadump.h> 57 #include <asm/debug.h> 58 59 #include <mm/mmu_decl.h> 60 61 #ifdef DEBUG 62 #define DBG(fmt...) printk(KERN_ERR fmt) 63 #else 64 #define DBG(fmt...) 65 #endif 66 67 #ifdef CONFIG_PPC64 68 int __initdata iommu_is_off; 69 int __initdata iommu_force_on; 70 unsigned long tce_alloc_start, tce_alloc_end; 71 u64 ppc64_rma_size; 72 #endif 73 static phys_addr_t first_memblock_size; 74 static int __initdata boot_cpu_count; 75 76 static int __init early_parse_mem(char *p) 77 { 78 if (!p) 79 return 1; 80 81 memory_limit = PAGE_ALIGN(memparse(p, &p)); 82 DBG("memory limit = 0x%llx\n", memory_limit); 83 84 return 0; 85 } 86 early_param("mem", early_parse_mem); 87 88 /* 89 * overlaps_initrd - check for overlap with page aligned extension of 90 * initrd. 91 */ 92 static inline int overlaps_initrd(unsigned long start, unsigned long size) 93 { 94 #ifdef CONFIG_BLK_DEV_INITRD 95 if (!initrd_start) 96 return 0; 97 98 return (start + size) > _ALIGN_DOWN(initrd_start, PAGE_SIZE) && 99 start <= _ALIGN_UP(initrd_end, PAGE_SIZE); 100 #else 101 return 0; 102 #endif 103 } 104 105 /** 106 * move_device_tree - move tree to an unused area, if needed. 107 * 108 * The device tree may be allocated beyond our memory limit, or inside the 109 * crash kernel region for kdump, or within the page aligned range of initrd. 110 * If so, move it out of the way. 111 */ 112 static void __init move_device_tree(void) 113 { 114 unsigned long start, size; 115 void *p; 116 117 DBG("-> move_device_tree\n"); 118 119 start = __pa(initial_boot_params); 120 size = be32_to_cpu(initial_boot_params->totalsize); 121 122 if ((memory_limit && (start + size) > PHYSICAL_START + memory_limit) || 123 overlaps_crashkernel(start, size) || 124 overlaps_initrd(start, size)) { 125 p = __va(memblock_alloc(size, PAGE_SIZE)); 126 memcpy(p, initial_boot_params, size); 127 initial_boot_params = (struct boot_param_header *)p; 128 DBG("Moved device tree to 0x%p\n", p); 129 } 130 131 DBG("<- move_device_tree\n"); 132 } 133 134 /* 135 * ibm,pa-features is a per-cpu property that contains a string of 136 * attribute descriptors, each of which has a 2 byte header plus up 137 * to 254 bytes worth of processor attribute bits. First header 138 * byte specifies the number of bytes following the header. 139 * Second header byte is an "attribute-specifier" type, of which 140 * zero is the only currently-defined value. 141 * Implementation: Pass in the byte and bit offset for the feature 142 * that we are interested in. The function will return -1 if the 143 * pa-features property is missing, or a 1/0 to indicate if the feature 144 * is supported/not supported. Note that the bit numbers are 145 * big-endian to match the definition in PAPR. 146 */ 147 static struct ibm_pa_feature { 148 unsigned long cpu_features; /* CPU_FTR_xxx bit */ 149 unsigned long mmu_features; /* MMU_FTR_xxx bit */ 150 unsigned int cpu_user_ftrs; /* PPC_FEATURE_xxx bit */ 151 unsigned char pabyte; /* byte number in ibm,pa-features */ 152 unsigned char pabit; /* bit number (big-endian) */ 153 unsigned char invert; /* if 1, pa bit set => clear feature */ 154 } ibm_pa_features[] __initdata = { 155 {0, 0, PPC_FEATURE_HAS_MMU, 0, 0, 0}, 156 {0, 0, PPC_FEATURE_HAS_FPU, 0, 1, 0}, 157 {0, MMU_FTR_SLB, 0, 0, 2, 0}, 158 {CPU_FTR_CTRL, 0, 0, 0, 3, 0}, 159 {CPU_FTR_NOEXECUTE, 0, 0, 0, 6, 0}, 160 {CPU_FTR_NODSISRALIGN, 0, 0, 1, 1, 1}, 161 {0, MMU_FTR_CI_LARGE_PAGE, 0, 1, 2, 0}, 162 {CPU_FTR_REAL_LE, PPC_FEATURE_TRUE_LE, 5, 0, 0}, 163 }; 164 165 static void __init scan_features(unsigned long node, unsigned char *ftrs, 166 unsigned long tablelen, 167 struct ibm_pa_feature *fp, 168 unsigned long ft_size) 169 { 170 unsigned long i, len, bit; 171 172 /* find descriptor with type == 0 */ 173 for (;;) { 174 if (tablelen < 3) 175 return; 176 len = 2 + ftrs[0]; 177 if (tablelen < len) 178 return; /* descriptor 0 not found */ 179 if (ftrs[1] == 0) 180 break; 181 tablelen -= len; 182 ftrs += len; 183 } 184 185 /* loop over bits we know about */ 186 for (i = 0; i < ft_size; ++i, ++fp) { 187 if (fp->pabyte >= ftrs[0]) 188 continue; 189 bit = (ftrs[2 + fp->pabyte] >> (7 - fp->pabit)) & 1; 190 if (bit ^ fp->invert) { 191 cur_cpu_spec->cpu_features |= fp->cpu_features; 192 cur_cpu_spec->cpu_user_features |= fp->cpu_user_ftrs; 193 cur_cpu_spec->mmu_features |= fp->mmu_features; 194 } else { 195 cur_cpu_spec->cpu_features &= ~fp->cpu_features; 196 cur_cpu_spec->cpu_user_features &= ~fp->cpu_user_ftrs; 197 cur_cpu_spec->mmu_features &= ~fp->mmu_features; 198 } 199 } 200 } 201 202 static void __init check_cpu_pa_features(unsigned long node) 203 { 204 unsigned char *pa_ftrs; 205 unsigned long tablelen; 206 207 pa_ftrs = of_get_flat_dt_prop(node, "ibm,pa-features", &tablelen); 208 if (pa_ftrs == NULL) 209 return; 210 211 scan_features(node, pa_ftrs, tablelen, 212 ibm_pa_features, ARRAY_SIZE(ibm_pa_features)); 213 } 214 215 #ifdef CONFIG_PPC_STD_MMU_64 216 static void __init check_cpu_slb_size(unsigned long node) 217 { 218 __be32 *slb_size_ptr; 219 220 slb_size_ptr = of_get_flat_dt_prop(node, "slb-size", NULL); 221 if (slb_size_ptr != NULL) { 222 mmu_slb_size = be32_to_cpup(slb_size_ptr); 223 return; 224 } 225 slb_size_ptr = of_get_flat_dt_prop(node, "ibm,slb-size", NULL); 226 if (slb_size_ptr != NULL) { 227 mmu_slb_size = be32_to_cpup(slb_size_ptr); 228 } 229 } 230 #else 231 #define check_cpu_slb_size(node) do { } while(0) 232 #endif 233 234 static struct feature_property { 235 const char *name; 236 u32 min_value; 237 unsigned long cpu_feature; 238 unsigned long cpu_user_ftr; 239 } feature_properties[] __initdata = { 240 #ifdef CONFIG_ALTIVEC 241 {"altivec", 0, CPU_FTR_ALTIVEC, PPC_FEATURE_HAS_ALTIVEC}, 242 {"ibm,vmx", 1, CPU_FTR_ALTIVEC, PPC_FEATURE_HAS_ALTIVEC}, 243 #endif /* CONFIG_ALTIVEC */ 244 #ifdef CONFIG_VSX 245 /* Yes, this _really_ is ibm,vmx == 2 to enable VSX */ 246 {"ibm,vmx", 2, CPU_FTR_VSX, PPC_FEATURE_HAS_VSX}, 247 #endif /* CONFIG_VSX */ 248 #ifdef CONFIG_PPC64 249 {"ibm,dfp", 1, 0, PPC_FEATURE_HAS_DFP}, 250 {"ibm,purr", 1, CPU_FTR_PURR, 0}, 251 {"ibm,spurr", 1, CPU_FTR_SPURR, 0}, 252 #endif /* CONFIG_PPC64 */ 253 }; 254 255 #if defined(CONFIG_44x) && defined(CONFIG_PPC_FPU) 256 static inline void identical_pvr_fixup(unsigned long node) 257 { 258 unsigned int pvr; 259 char *model = of_get_flat_dt_prop(node, "model", NULL); 260 261 /* 262 * Since 440GR(x)/440EP(x) processors have the same pvr, 263 * we check the node path and set bit 28 in the cur_cpu_spec 264 * pvr for EP(x) processor version. This bit is always 0 in 265 * the "real" pvr. Then we call identify_cpu again with 266 * the new logical pvr to enable FPU support. 267 */ 268 if (model && strstr(model, "440EP")) { 269 pvr = cur_cpu_spec->pvr_value | 0x8; 270 identify_cpu(0, pvr); 271 DBG("Using logical pvr %x for %s\n", pvr, model); 272 } 273 } 274 #else 275 #define identical_pvr_fixup(node) do { } while(0) 276 #endif 277 278 static void __init check_cpu_feature_properties(unsigned long node) 279 { 280 unsigned long i; 281 struct feature_property *fp = feature_properties; 282 const __be32 *prop; 283 284 for (i = 0; i < ARRAY_SIZE(feature_properties); ++i, ++fp) { 285 prop = of_get_flat_dt_prop(node, fp->name, NULL); 286 if (prop && be32_to_cpup(prop) >= fp->min_value) { 287 cur_cpu_spec->cpu_features |= fp->cpu_feature; 288 cur_cpu_spec->cpu_user_features |= fp->cpu_user_ftr; 289 } 290 } 291 } 292 293 static int __init early_init_dt_scan_cpus(unsigned long node, 294 const char *uname, int depth, 295 void *data) 296 { 297 char *type = of_get_flat_dt_prop(node, "device_type", NULL); 298 const __be32 *prop; 299 const __be32 *intserv; 300 int i, nthreads; 301 unsigned long len; 302 int found = -1; 303 int found_thread = 0; 304 305 /* We are scanning "cpu" nodes only */ 306 if (type == NULL || strcmp(type, "cpu") != 0) 307 return 0; 308 309 /* Get physical cpuid */ 310 intserv = of_get_flat_dt_prop(node, "ibm,ppc-interrupt-server#s", &len); 311 if (intserv) { 312 nthreads = len / sizeof(int); 313 } else { 314 intserv = of_get_flat_dt_prop(node, "reg", NULL); 315 nthreads = 1; 316 } 317 318 /* 319 * Now see if any of these threads match our boot cpu. 320 * NOTE: This must match the parsing done in smp_setup_cpu_maps. 321 */ 322 for (i = 0; i < nthreads; i++) { 323 /* 324 * version 2 of the kexec param format adds the phys cpuid of 325 * booted proc. 326 */ 327 if (be32_to_cpu(initial_boot_params->version) >= 2) { 328 if (be32_to_cpu(intserv[i]) == 329 be32_to_cpu(initial_boot_params->boot_cpuid_phys)) { 330 found = boot_cpu_count; 331 found_thread = i; 332 } 333 } else { 334 /* 335 * Check if it's the boot-cpu, set it's hw index now, 336 * unfortunately this format did not support booting 337 * off secondary threads. 338 */ 339 if (of_get_flat_dt_prop(node, 340 "linux,boot-cpu", NULL) != NULL) 341 found = boot_cpu_count; 342 } 343 #ifdef CONFIG_SMP 344 /* logical cpu id is always 0 on UP kernels */ 345 boot_cpu_count++; 346 #endif 347 } 348 349 if (found >= 0) { 350 DBG("boot cpu: logical %d physical %d\n", found, 351 be32_to_cpu(intserv[found_thread])); 352 boot_cpuid = found; 353 set_hard_smp_processor_id(found, 354 be32_to_cpu(intserv[found_thread])); 355 356 /* 357 * PAPR defines "logical" PVR values for cpus that 358 * meet various levels of the architecture: 359 * 0x0f000001 Architecture version 2.04 360 * 0x0f000002 Architecture version 2.05 361 * If the cpu-version property in the cpu node contains 362 * such a value, we call identify_cpu again with the 363 * logical PVR value in order to use the cpu feature 364 * bits appropriate for the architecture level. 365 * 366 * A POWER6 partition in "POWER6 architected" mode 367 * uses the 0x0f000002 PVR value; in POWER5+ mode 368 * it uses 0x0f000001. 369 */ 370 prop = of_get_flat_dt_prop(node, "cpu-version", NULL); 371 if (prop && (be32_to_cpup(prop) & 0xff000000) == 0x0f000000) 372 identify_cpu(0, be32_to_cpup(prop)); 373 374 identical_pvr_fixup(node); 375 } 376 377 check_cpu_feature_properties(node); 378 check_cpu_pa_features(node); 379 check_cpu_slb_size(node); 380 381 #ifdef CONFIG_PPC_PSERIES 382 if (nthreads > 1) 383 cur_cpu_spec->cpu_features |= CPU_FTR_SMT; 384 else 385 cur_cpu_spec->cpu_features &= ~CPU_FTR_SMT; 386 #endif 387 388 return 0; 389 } 390 391 int __init early_init_dt_scan_chosen_ppc(unsigned long node, const char *uname, 392 int depth, void *data) 393 { 394 unsigned long *lprop; /* All these set by kernel, so no need to convert endian */ 395 396 /* Use common scan routine to determine if this is the chosen node */ 397 if (early_init_dt_scan_chosen(node, uname, depth, data) == 0) 398 return 0; 399 400 #ifdef CONFIG_PPC64 401 /* check if iommu is forced on or off */ 402 if (of_get_flat_dt_prop(node, "linux,iommu-off", NULL) != NULL) 403 iommu_is_off = 1; 404 if (of_get_flat_dt_prop(node, "linux,iommu-force-on", NULL) != NULL) 405 iommu_force_on = 1; 406 #endif 407 408 /* mem=x on the command line is the preferred mechanism */ 409 lprop = of_get_flat_dt_prop(node, "linux,memory-limit", NULL); 410 if (lprop) 411 memory_limit = *lprop; 412 413 #ifdef CONFIG_PPC64 414 lprop = of_get_flat_dt_prop(node, "linux,tce-alloc-start", NULL); 415 if (lprop) 416 tce_alloc_start = *lprop; 417 lprop = of_get_flat_dt_prop(node, "linux,tce-alloc-end", NULL); 418 if (lprop) 419 tce_alloc_end = *lprop; 420 #endif 421 422 #ifdef CONFIG_KEXEC 423 lprop = of_get_flat_dt_prop(node, "linux,crashkernel-base", NULL); 424 if (lprop) 425 crashk_res.start = *lprop; 426 427 lprop = of_get_flat_dt_prop(node, "linux,crashkernel-size", NULL); 428 if (lprop) 429 crashk_res.end = crashk_res.start + *lprop - 1; 430 #endif 431 432 /* break now */ 433 return 1; 434 } 435 436 #ifdef CONFIG_PPC_PSERIES 437 /* 438 * Interpret the ibm,dynamic-memory property in the 439 * /ibm,dynamic-reconfiguration-memory node. 440 * This contains a list of memory blocks along with NUMA affinity 441 * information. 442 */ 443 static int __init early_init_dt_scan_drconf_memory(unsigned long node) 444 { 445 __be32 *dm, *ls, *usm; 446 unsigned long l, n, flags; 447 u64 base, size, memblock_size; 448 unsigned int is_kexec_kdump = 0, rngs; 449 450 ls = of_get_flat_dt_prop(node, "ibm,lmb-size", &l); 451 if (ls == NULL || l < dt_root_size_cells * sizeof(__be32)) 452 return 0; 453 memblock_size = dt_mem_next_cell(dt_root_size_cells, &ls); 454 455 dm = of_get_flat_dt_prop(node, "ibm,dynamic-memory", &l); 456 if (dm == NULL || l < sizeof(__be32)) 457 return 0; 458 459 n = of_read_number(dm++, 1); /* number of entries */ 460 if (l < (n * (dt_root_addr_cells + 4) + 1) * sizeof(__be32)) 461 return 0; 462 463 /* check if this is a kexec/kdump kernel. */ 464 usm = of_get_flat_dt_prop(node, "linux,drconf-usable-memory", 465 &l); 466 if (usm != NULL) 467 is_kexec_kdump = 1; 468 469 for (; n != 0; --n) { 470 base = dt_mem_next_cell(dt_root_addr_cells, &dm); 471 flags = of_read_number(&dm[3], 1); 472 /* skip DRC index, pad, assoc. list index, flags */ 473 dm += 4; 474 /* skip this block if the reserved bit is set in flags (0x80) 475 or if the block is not assigned to this partition (0x8) */ 476 if ((flags & 0x80) || !(flags & 0x8)) 477 continue; 478 size = memblock_size; 479 rngs = 1; 480 if (is_kexec_kdump) { 481 /* 482 * For each memblock in ibm,dynamic-memory, a corresponding 483 * entry in linux,drconf-usable-memory property contains 484 * a counter 'p' followed by 'p' (base, size) duple. 485 * Now read the counter from 486 * linux,drconf-usable-memory property 487 */ 488 rngs = dt_mem_next_cell(dt_root_size_cells, &usm); 489 if (!rngs) /* there are no (base, size) duple */ 490 continue; 491 } 492 do { 493 if (is_kexec_kdump) { 494 base = dt_mem_next_cell(dt_root_addr_cells, 495 &usm); 496 size = dt_mem_next_cell(dt_root_size_cells, 497 &usm); 498 } 499 if (iommu_is_off) { 500 if (base >= 0x80000000ul) 501 continue; 502 if ((base + size) > 0x80000000ul) 503 size = 0x80000000ul - base; 504 } 505 memblock_add(base, size); 506 } while (--rngs); 507 } 508 memblock_dump_all(); 509 return 0; 510 } 511 #else 512 #define early_init_dt_scan_drconf_memory(node) 0 513 #endif /* CONFIG_PPC_PSERIES */ 514 515 static int __init early_init_dt_scan_memory_ppc(unsigned long node, 516 const char *uname, 517 int depth, void *data) 518 { 519 if (depth == 1 && 520 strcmp(uname, "ibm,dynamic-reconfiguration-memory") == 0) 521 return early_init_dt_scan_drconf_memory(node); 522 523 return early_init_dt_scan_memory(node, uname, depth, data); 524 } 525 526 void __init early_init_dt_add_memory_arch(u64 base, u64 size) 527 { 528 #ifdef CONFIG_PPC64 529 if (iommu_is_off) { 530 if (base >= 0x80000000ul) 531 return; 532 if ((base + size) > 0x80000000ul) 533 size = 0x80000000ul - base; 534 } 535 #endif 536 /* Keep track of the beginning of memory -and- the size of 537 * the very first block in the device-tree as it represents 538 * the RMA on ppc64 server 539 */ 540 if (base < memstart_addr) { 541 memstart_addr = base; 542 first_memblock_size = size; 543 } 544 545 /* Add the chunk to the MEMBLOCK list */ 546 memblock_add(base, size); 547 } 548 549 static void __init early_reserve_mem_dt(void) 550 { 551 unsigned long i, len, dt_root; 552 const __be32 *prop; 553 554 dt_root = of_get_flat_dt_root(); 555 556 prop = of_get_flat_dt_prop(dt_root, "reserved-ranges", &len); 557 558 if (!prop) 559 return; 560 561 DBG("Found new-style reserved-ranges\n"); 562 563 /* Each reserved range is an (address,size) pair, 2 cells each, 564 * totalling 4 cells per range. */ 565 for (i = 0; i < len / (sizeof(*prop) * 4); i++) { 566 u64 base, size; 567 568 base = of_read_number(prop + (i * 4) + 0, 2); 569 size = of_read_number(prop + (i * 4) + 2, 2); 570 571 if (size) { 572 DBG("reserving: %llx -> %llx\n", base, size); 573 memblock_reserve(base, size); 574 } 575 } 576 } 577 578 static void __init early_reserve_mem(void) 579 { 580 u64 base, size; 581 __be64 *reserve_map; 582 unsigned long self_base; 583 unsigned long self_size; 584 585 reserve_map = (__be64 *)(((unsigned long)initial_boot_params) + 586 be32_to_cpu(initial_boot_params->off_mem_rsvmap)); 587 588 /* before we do anything, lets reserve the dt blob */ 589 self_base = __pa((unsigned long)initial_boot_params); 590 self_size = be32_to_cpu(initial_boot_params->totalsize); 591 memblock_reserve(self_base, self_size); 592 593 /* Look for the new "reserved-regions" property in the DT */ 594 early_reserve_mem_dt(); 595 596 #ifdef CONFIG_BLK_DEV_INITRD 597 /* Then reserve the initrd, if any */ 598 if (initrd_start && (initrd_end > initrd_start)) { 599 memblock_reserve(_ALIGN_DOWN(__pa(initrd_start), PAGE_SIZE), 600 _ALIGN_UP(initrd_end, PAGE_SIZE) - 601 _ALIGN_DOWN(initrd_start, PAGE_SIZE)); 602 } 603 #endif /* CONFIG_BLK_DEV_INITRD */ 604 605 #ifdef CONFIG_PPC32 606 /* 607 * Handle the case where we might be booting from an old kexec 608 * image that setup the mem_rsvmap as pairs of 32-bit values 609 */ 610 if (be64_to_cpup(reserve_map) > 0xffffffffull) { 611 u32 base_32, size_32; 612 __be32 *reserve_map_32 = (__be32 *)reserve_map; 613 614 DBG("Found old 32-bit reserve map\n"); 615 616 while (1) { 617 base_32 = be32_to_cpup(reserve_map_32++); 618 size_32 = be32_to_cpup(reserve_map_32++); 619 if (size_32 == 0) 620 break; 621 /* skip if the reservation is for the blob */ 622 if (base_32 == self_base && size_32 == self_size) 623 continue; 624 DBG("reserving: %x -> %x\n", base_32, size_32); 625 memblock_reserve(base_32, size_32); 626 } 627 return; 628 } 629 #endif 630 DBG("Processing reserve map\n"); 631 632 /* Handle the reserve map in the fdt blob if it exists */ 633 while (1) { 634 base = be64_to_cpup(reserve_map++); 635 size = be64_to_cpup(reserve_map++); 636 if (size == 0) 637 break; 638 DBG("reserving: %llx -> %llx\n", base, size); 639 memblock_reserve(base, size); 640 } 641 } 642 643 void __init early_init_devtree(void *params) 644 { 645 phys_addr_t limit; 646 647 DBG(" -> early_init_devtree(%p)\n", params); 648 649 /* Setup flat device-tree pointer */ 650 initial_boot_params = params; 651 652 #ifdef CONFIG_PPC_RTAS 653 /* Some machines might need RTAS info for debugging, grab it now. */ 654 of_scan_flat_dt(early_init_dt_scan_rtas, NULL); 655 #endif 656 657 #ifdef CONFIG_PPC_POWERNV 658 /* Some machines might need OPAL info for debugging, grab it now. */ 659 of_scan_flat_dt(early_init_dt_scan_opal, NULL); 660 #endif 661 662 #ifdef CONFIG_FA_DUMP 663 /* scan tree to see if dump is active during last boot */ 664 of_scan_flat_dt(early_init_dt_scan_fw_dump, NULL); 665 #endif 666 667 /* Pre-initialize the cmd_line with the content of boot_commmand_line, 668 * which will be empty except when the content of the variable has 669 * been overriden by a bootloading mechanism. This happens typically 670 * with HAL takeover 671 */ 672 strlcpy(cmd_line, boot_command_line, COMMAND_LINE_SIZE); 673 674 /* Retrieve various informations from the /chosen node of the 675 * device-tree, including the platform type, initrd location and 676 * size, TCE reserve, and more ... 677 */ 678 of_scan_flat_dt(early_init_dt_scan_chosen_ppc, cmd_line); 679 680 /* Scan memory nodes and rebuild MEMBLOCKs */ 681 of_scan_flat_dt(early_init_dt_scan_root, NULL); 682 of_scan_flat_dt(early_init_dt_scan_memory_ppc, NULL); 683 684 /* Save command line for /proc/cmdline and then parse parameters */ 685 strlcpy(boot_command_line, cmd_line, COMMAND_LINE_SIZE); 686 parse_early_param(); 687 688 /* make sure we've parsed cmdline for mem= before this */ 689 if (memory_limit) 690 first_memblock_size = min_t(u64, first_memblock_size, memory_limit); 691 setup_initial_memory_limit(memstart_addr, first_memblock_size); 692 /* Reserve MEMBLOCK regions used by kernel, initrd, dt, etc... */ 693 memblock_reserve(PHYSICAL_START, __pa(klimit) - PHYSICAL_START); 694 /* If relocatable, reserve first 32k for interrupt vectors etc. */ 695 if (PHYSICAL_START > MEMORY_START) 696 memblock_reserve(MEMORY_START, 0x8000); 697 reserve_kdump_trampoline(); 698 #ifdef CONFIG_FA_DUMP 699 /* 700 * If we fail to reserve memory for firmware-assisted dump then 701 * fallback to kexec based kdump. 702 */ 703 if (fadump_reserve_mem() == 0) 704 #endif 705 reserve_crashkernel(); 706 early_reserve_mem(); 707 708 /* 709 * Ensure that total memory size is page-aligned, because otherwise 710 * mark_bootmem() gets upset. 711 */ 712 limit = ALIGN(memory_limit ?: memblock_phys_mem_size(), PAGE_SIZE); 713 memblock_enforce_memory_limit(limit); 714 715 memblock_allow_resize(); 716 memblock_dump_all(); 717 718 DBG("Phys. mem: %llx\n", memblock_phys_mem_size()); 719 720 /* We may need to relocate the flat tree, do it now. 721 * FIXME .. and the initrd too? */ 722 move_device_tree(); 723 724 allocate_pacas(); 725 726 DBG("Scanning CPUs ...\n"); 727 728 /* Retrieve CPU related informations from the flat tree 729 * (altivec support, boot CPU ID, ...) 730 */ 731 of_scan_flat_dt(early_init_dt_scan_cpus, NULL); 732 733 #if defined(CONFIG_SMP) && defined(CONFIG_PPC64) 734 /* We'll later wait for secondaries to check in; there are 735 * NCPUS-1 non-boot CPUs :-) 736 */ 737 spinning_secondaries = boot_cpu_count - 1; 738 #endif 739 740 DBG(" <- early_init_devtree()\n"); 741 } 742 743 /******* 744 * 745 * New implementation of the OF "find" APIs, return a refcounted 746 * object, call of_node_put() when done. The device tree and list 747 * are protected by a rw_lock. 748 * 749 * Note that property management will need some locking as well, 750 * this isn't dealt with yet. 751 * 752 *******/ 753 754 /** 755 * of_get_ibm_chip_id - Returns the IBM "chip-id" of a device 756 * @np: device node of the device 757 * 758 * This looks for a property "ibm,chip-id" in the node or any 759 * of its parents and returns its content, or -1 if it cannot 760 * be found. 761 */ 762 int of_get_ibm_chip_id(struct device_node *np) 763 { 764 of_node_get(np); 765 while(np) { 766 struct device_node *old = np; 767 const __be32 *prop; 768 769 prop = of_get_property(np, "ibm,chip-id", NULL); 770 if (prop) { 771 of_node_put(np); 772 return be32_to_cpup(prop); 773 } 774 np = of_get_parent(np); 775 of_node_put(old); 776 } 777 return -1; 778 } 779 780 /** 781 * cpu_to_chip_id - Return the cpus chip-id 782 * @cpu: The logical cpu number. 783 * 784 * Return the value of the ibm,chip-id property corresponding to the given 785 * logical cpu number. If the chip-id can not be found, returns -1. 786 */ 787 int cpu_to_chip_id(int cpu) 788 { 789 struct device_node *np; 790 791 np = of_get_cpu_node(cpu, NULL); 792 if (!np) 793 return -1; 794 795 of_node_put(np); 796 return of_get_ibm_chip_id(np); 797 } 798 EXPORT_SYMBOL(cpu_to_chip_id); 799 800 #ifdef CONFIG_PPC_PSERIES 801 /* 802 * Fix up the uninitialized fields in a new device node: 803 * name, type and pci-specific fields 804 */ 805 806 static int of_finish_dynamic_node(struct device_node *node) 807 { 808 struct device_node *parent = of_get_parent(node); 809 int err = 0; 810 const phandle *ibm_phandle; 811 812 node->name = of_get_property(node, "name", NULL); 813 node->type = of_get_property(node, "device_type", NULL); 814 815 if (!node->name) 816 node->name = "<NULL>"; 817 if (!node->type) 818 node->type = "<NULL>"; 819 820 if (!parent) { 821 err = -ENODEV; 822 goto out; 823 } 824 825 /* We don't support that function on PowerMac, at least 826 * not yet 827 */ 828 if (machine_is(powermac)) 829 return -ENODEV; 830 831 /* fix up new node's phandle field */ 832 if ((ibm_phandle = of_get_property(node, "ibm,phandle", NULL))) 833 node->phandle = *ibm_phandle; 834 835 out: 836 of_node_put(parent); 837 return err; 838 } 839 840 static int prom_reconfig_notifier(struct notifier_block *nb, 841 unsigned long action, void *node) 842 { 843 int err; 844 845 switch (action) { 846 case OF_RECONFIG_ATTACH_NODE: 847 err = of_finish_dynamic_node(node); 848 if (err < 0) 849 printk(KERN_ERR "finish_node returned %d\n", err); 850 break; 851 default: 852 err = 0; 853 break; 854 } 855 return notifier_from_errno(err); 856 } 857 858 static struct notifier_block prom_reconfig_nb = { 859 .notifier_call = prom_reconfig_notifier, 860 .priority = 10, /* This one needs to run first */ 861 }; 862 863 static int __init prom_reconfig_setup(void) 864 { 865 return of_reconfig_notifier_register(&prom_reconfig_nb); 866 } 867 __initcall(prom_reconfig_setup); 868 #endif 869 870 bool arch_match_cpu_phys_id(int cpu, u64 phys_id) 871 { 872 return (int)phys_id == get_hard_smp_processor_id(cpu); 873 } 874 875 #if defined(CONFIG_DEBUG_FS) && defined(DEBUG) 876 static struct debugfs_blob_wrapper flat_dt_blob; 877 878 static int __init export_flat_device_tree(void) 879 { 880 struct dentry *d; 881 882 flat_dt_blob.data = initial_boot_params; 883 flat_dt_blob.size = be32_to_cpu(initial_boot_params->totalsize); 884 885 d = debugfs_create_blob("flat-device-tree", S_IFREG | S_IRUSR, 886 powerpc_debugfs_root, &flat_dt_blob); 887 if (!d) 888 return 1; 889 890 return 0; 891 } 892 __initcall(export_flat_device_tree); 893 #endif 894