Linux Audio

Check our new training course

Loading...
v6.8
   1// SPDX-License-Identifier: GPL-2.0-or-later
   2/*
   3 * Procedures for creating, accessing and interpreting the device tree.
   4 *
   5 * Paul Mackerras	August 1996.
   6 * Copyright (C) 1996-2005 Paul Mackerras.
   7 * 
   8 *  Adapted for 64bit PowerPC by Dave Engebretsen and Peter Bergner.
   9 *    {engebret|bergner}@us.ibm.com 
  10 */
  11
  12#undef DEBUG
  13
  14#include <linux/kernel.h>
  15#include <linux/string.h>
  16#include <linux/init.h>
  17#include <linux/threads.h>
  18#include <linux/spinlock.h>
  19#include <linux/types.h>
  20#include <linux/pci.h>
  21#include <linux/delay.h>
  22#include <linux/initrd.h>
  23#include <linux/bitops.h>
  24#include <linux/export.h>
  25#include <linux/kexec.h>
  26#include <linux/irq.h>
  27#include <linux/memblock.h>
  28#include <linux/of.h>
  29#include <linux/of_fdt.h>
  30#include <linux/libfdt.h>
  31#include <linux/cpu.h>
  32#include <linux/pgtable.h>
  33#include <linux/seq_buf.h>
  34
  35#include <asm/rtas.h>
  36#include <asm/page.h>
  37#include <asm/processor.h>
  38#include <asm/irq.h>
  39#include <asm/io.h>
  40#include <asm/kdump.h>
  41#include <asm/smp.h>
  42#include <asm/mmu.h>
  43#include <asm/paca.h>
  44#include <asm/powernv.h>
  45#include <asm/iommu.h>
  46#include <asm/btext.h>
  47#include <asm/sections.h>
  48#include <asm/setup.h>
  49#include <asm/pci-bridge.h>
  50#include <asm/kexec.h>
  51#include <asm/opal.h>
  52#include <asm/fadump.h>
  53#include <asm/epapr_hcalls.h>
  54#include <asm/firmware.h>
  55#include <asm/dt_cpu_ftrs.h>
  56#include <asm/drmem.h>
  57#include <asm/ultravisor.h>
  58#include <asm/prom.h>
  59#include <asm/plpks.h>
  60
  61#include <mm/mmu_decl.h>
  62
  63#ifdef DEBUG
  64#define DBG(fmt...) printk(KERN_ERR fmt)
  65#else
  66#define DBG(fmt...)
  67#endif
  68
  69int *chip_id_lookup_table;
  70
  71#ifdef CONFIG_PPC64
  72int __initdata iommu_is_off;
  73int __initdata iommu_force_on;
  74unsigned long tce_alloc_start, tce_alloc_end;
  75u64 ppc64_rma_size;
  76unsigned int boot_cpu_node_count __ro_after_init;
  77#endif
  78static phys_addr_t first_memblock_size;
  79static int __initdata boot_cpu_count;
  80
  81static int __init early_parse_mem(char *p)
  82{
  83	if (!p)
  84		return 1;
  85
  86	memory_limit = PAGE_ALIGN(memparse(p, &p));
  87	DBG("memory limit = 0x%llx\n", memory_limit);
  88
  89	return 0;
  90}
  91early_param("mem", early_parse_mem);
  92
  93/*
  94 * overlaps_initrd - check for overlap with page aligned extension of
  95 * initrd.
  96 */
  97static inline int overlaps_initrd(unsigned long start, unsigned long size)
  98{
  99#ifdef CONFIG_BLK_DEV_INITRD
 100	if (!initrd_start)
 101		return 0;
 102
 103	return	(start + size) > ALIGN_DOWN(initrd_start, PAGE_SIZE) &&
 104			start <= ALIGN(initrd_end, PAGE_SIZE);
 105#else
 106	return 0;
 107#endif
 108}
 109
 110/**
 111 * move_device_tree - move tree to an unused area, if needed.
 112 *
 113 * The device tree may be allocated beyond our memory limit, or inside the
 114 * crash kernel region for kdump, or within the page aligned range of initrd.
 115 * If so, move it out of the way.
 116 */
 117static void __init move_device_tree(void)
 118{
 119	unsigned long start, size;
 120	void *p;
 121
 122	DBG("-> move_device_tree\n");
 123
 124	start = __pa(initial_boot_params);
 125	size = fdt_totalsize(initial_boot_params);
 126
 127	if ((memory_limit && (start + size) > PHYSICAL_START + memory_limit) ||
 128	    !memblock_is_memory(start + size - 1) ||
 129	    overlaps_crashkernel(start, size) || overlaps_initrd(start, size)) {
 130		p = memblock_alloc_raw(size, PAGE_SIZE);
 131		if (!p)
 132			panic("Failed to allocate %lu bytes to move device tree\n",
 133			      size);
 134		memcpy(p, initial_boot_params, size);
 135		initial_boot_params = p;
 136		DBG("Moved device tree to 0x%px\n", p);
 137	}
 138
 139	DBG("<- move_device_tree\n");
 140}
 141
 142/*
 143 * ibm,pa/pi-features is a per-cpu property that contains a string of
 144 * attribute descriptors, each of which has a 2 byte header plus up
 145 * to 254 bytes worth of processor attribute bits.  First header
 146 * byte specifies the number of bytes following the header.
 147 * Second header byte is an "attribute-specifier" type, of which
 148 * zero is the only currently-defined value.
 149 * Implementation:  Pass in the byte and bit offset for the feature
 150 * that we are interested in.  The function will return -1 if the
 151 * pa-features property is missing, or a 1/0 to indicate if the feature
 152 * is supported/not supported.  Note that the bit numbers are
 153 * big-endian to match the definition in PAPR.
 
 
 
 154 */
 155struct ibm_feature {
 156	unsigned long	cpu_features;	/* CPU_FTR_xxx bit */
 157	unsigned long	mmu_features;	/* MMU_FTR_xxx bit */
 158	unsigned int	cpu_user_ftrs;	/* PPC_FEATURE_xxx bit */
 159	unsigned int	cpu_user_ftrs2;	/* PPC_FEATURE2_xxx bit */
 160	unsigned char	pabyte;		/* byte number in ibm,pa/pi-features */
 161	unsigned char	pabit;		/* bit number (big-endian) */
 162	unsigned char	invert;		/* if 1, pa bit set => clear feature */
 163};
 164
 165static struct ibm_feature ibm_pa_features[] __initdata = {
 166	{ .pabyte = 0,  .pabit = 0, .cpu_user_ftrs = PPC_FEATURE_HAS_MMU },
 167	{ .pabyte = 0,  .pabit = 1, .cpu_user_ftrs = PPC_FEATURE_HAS_FPU },
 168	{ .pabyte = 0,  .pabit = 3, .cpu_features  = CPU_FTR_CTRL },
 169	{ .pabyte = 0,  .pabit = 6, .cpu_features  = CPU_FTR_NOEXECUTE },
 170	{ .pabyte = 1,  .pabit = 2, .mmu_features  = MMU_FTR_CI_LARGE_PAGE },
 171#ifdef CONFIG_PPC_RADIX_MMU
 172	{ .pabyte = 40, .pabit = 0, .mmu_features  = MMU_FTR_TYPE_RADIX | MMU_FTR_GTSE },
 173#endif
 174	{ .pabyte = 5,  .pabit = 0, .cpu_features  = CPU_FTR_REAL_LE,
 175				    .cpu_user_ftrs = PPC_FEATURE_TRUE_LE },
 176	/*
 177	 * If the kernel doesn't support TM (ie CONFIG_PPC_TRANSACTIONAL_MEM=n),
 178	 * we don't want to turn on TM here, so we use the *_COMP versions
 179	 * which are 0 if the kernel doesn't support TM.
 180	 */
 181	{ .pabyte = 22, .pabit = 0, .cpu_features = CPU_FTR_TM_COMP,
 182	  .cpu_user_ftrs2 = PPC_FEATURE2_HTM_COMP | PPC_FEATURE2_HTM_NOSC_COMP },
 183
 184	{ .pabyte = 64, .pabit = 0, .cpu_features = CPU_FTR_DAWR1 },
 185	{ .pabyte = 68, .pabit = 5, .cpu_features = CPU_FTR_DEXCR_NPHIE },
 186};
 187
 188/*
 189 * ibm,pi-features property provides the support of processor specific
 190 * options not described in ibm,pa-features. Right now use byte 0, bit 3
 191 * which indicates the occurrence of DSI interrupt when the paste operation
 192 * on the suspended NX window.
 193 */
 194static struct ibm_feature ibm_pi_features[] __initdata = {
 195	{ .pabyte = 0, .pabit = 3, .mmu_features  = MMU_FTR_NX_DSI },
 
 196};
 197
 198static void __init scan_features(unsigned long node, const unsigned char *ftrs,
 199				 unsigned long tablelen,
 200				 struct ibm_feature *fp,
 201				 unsigned long ft_size)
 202{
 203	unsigned long i, len, bit;
 204
 205	/* find descriptor with type == 0 */
 206	for (;;) {
 207		if (tablelen < 3)
 208			return;
 209		len = 2 + ftrs[0];
 210		if (tablelen < len)
 211			return;		/* descriptor 0 not found */
 212		if (ftrs[1] == 0)
 213			break;
 214		tablelen -= len;
 215		ftrs += len;
 216	}
 217
 218	/* loop over bits we know about */
 219	for (i = 0; i < ft_size; ++i, ++fp) {
 220		if (fp->pabyte >= ftrs[0])
 221			continue;
 222		bit = (ftrs[2 + fp->pabyte] >> (7 - fp->pabit)) & 1;
 223		if (bit ^ fp->invert) {
 224			cur_cpu_spec->cpu_features |= fp->cpu_features;
 225			cur_cpu_spec->cpu_user_features |= fp->cpu_user_ftrs;
 226			cur_cpu_spec->cpu_user_features2 |= fp->cpu_user_ftrs2;
 227			cur_cpu_spec->mmu_features |= fp->mmu_features;
 228		} else {
 229			cur_cpu_spec->cpu_features &= ~fp->cpu_features;
 230			cur_cpu_spec->cpu_user_features &= ~fp->cpu_user_ftrs;
 231			cur_cpu_spec->cpu_user_features2 &= ~fp->cpu_user_ftrs2;
 232			cur_cpu_spec->mmu_features &= ~fp->mmu_features;
 233		}
 234	}
 235}
 236
 237static void __init check_cpu_features(unsigned long node, char *name,
 238				      struct ibm_feature *fp,
 239				      unsigned long size)
 240{
 241	const unsigned char *pa_ftrs;
 242	int tablelen;
 243
 244	pa_ftrs = of_get_flat_dt_prop(node, name, &tablelen);
 245	if (pa_ftrs == NULL)
 246		return;
 247
 248	scan_features(node, pa_ftrs, tablelen, fp, size);
 249}
 250
 251#ifdef CONFIG_PPC_64S_HASH_MMU
 252static void __init init_mmu_slb_size(unsigned long node)
 253{
 254	const __be32 *slb_size_ptr;
 255
 256	slb_size_ptr = of_get_flat_dt_prop(node, "slb-size", NULL) ? :
 257			of_get_flat_dt_prop(node, "ibm,slb-size", NULL);
 258
 259	if (slb_size_ptr)
 260		mmu_slb_size = be32_to_cpup(slb_size_ptr);
 261}
 262#else
 263#define init_mmu_slb_size(node) do { } while(0)
 264#endif
 265
 266static struct feature_property {
 267	const char *name;
 268	u32 min_value;
 269	unsigned long cpu_feature;
 270	unsigned long cpu_user_ftr;
 271} feature_properties[] __initdata = {
 272#ifdef CONFIG_ALTIVEC
 273	{"altivec", 0, CPU_FTR_ALTIVEC, PPC_FEATURE_HAS_ALTIVEC},
 274	{"ibm,vmx", 1, CPU_FTR_ALTIVEC, PPC_FEATURE_HAS_ALTIVEC},
 275#endif /* CONFIG_ALTIVEC */
 276#ifdef CONFIG_VSX
 277	/* Yes, this _really_ is ibm,vmx == 2 to enable VSX */
 278	{"ibm,vmx", 2, CPU_FTR_VSX, PPC_FEATURE_HAS_VSX},
 279#endif /* CONFIG_VSX */
 280#ifdef CONFIG_PPC64
 281	{"ibm,dfp", 1, 0, PPC_FEATURE_HAS_DFP},
 282	{"ibm,purr", 1, CPU_FTR_PURR, 0},
 283	{"ibm,spurr", 1, CPU_FTR_SPURR, 0},
 284#endif /* CONFIG_PPC64 */
 285};
 286
 287#if defined(CONFIG_44x) && defined(CONFIG_PPC_FPU)
 288static __init void identical_pvr_fixup(unsigned long node)
 289{
 290	unsigned int pvr;
 291	const char *model = of_get_flat_dt_prop(node, "model", NULL);
 292
 293	/*
 294	 * Since 440GR(x)/440EP(x) processors have the same pvr,
 295	 * we check the node path and set bit 28 in the cur_cpu_spec
 296	 * pvr for EP(x) processor version. This bit is always 0 in
 297	 * the "real" pvr. Then we call identify_cpu again with
 298	 * the new logical pvr to enable FPU support.
 299	 */
 300	if (model && strstr(model, "440EP")) {
 301		pvr = cur_cpu_spec->pvr_value | 0x8;
 302		identify_cpu(0, pvr);
 303		DBG("Using logical pvr %x for %s\n", pvr, model);
 304	}
 305}
 306#else
 307#define identical_pvr_fixup(node) do { } while(0)
 308#endif
 309
 310static void __init check_cpu_feature_properties(unsigned long node)
 311{
 312	int i;
 313	struct feature_property *fp = feature_properties;
 314	const __be32 *prop;
 315
 316	for (i = 0; i < (int)ARRAY_SIZE(feature_properties); ++i, ++fp) {
 317		prop = of_get_flat_dt_prop(node, fp->name, NULL);
 318		if (prop && be32_to_cpup(prop) >= fp->min_value) {
 319			cur_cpu_spec->cpu_features |= fp->cpu_feature;
 320			cur_cpu_spec->cpu_user_features |= fp->cpu_user_ftr;
 321		}
 322	}
 323}
 324
 325static int __init early_init_dt_scan_cpus(unsigned long node,
 326					  const char *uname, int depth,
 327					  void *data)
 328{
 329	const char *type = of_get_flat_dt_prop(node, "device_type", NULL);
 
 330	const __be32 *prop;
 331	const __be32 *intserv;
 332	int i, nthreads;
 333	int len;
 334	int found = -1;
 335	int found_thread = 0;
 336
 337	/* We are scanning "cpu" nodes only */
 338	if (type == NULL || strcmp(type, "cpu") != 0)
 339		return 0;
 340
 341	if (IS_ENABLED(CONFIG_PPC64))
 342		boot_cpu_node_count++;
 343
 344	/* Get physical cpuid */
 345	intserv = of_get_flat_dt_prop(node, "ibm,ppc-interrupt-server#s", &len);
 346	if (!intserv)
 347		intserv = of_get_flat_dt_prop(node, "reg", &len);
 348
 349	nthreads = len / sizeof(int);
 350
 351	/*
 352	 * Now see if any of these threads match our boot cpu.
 353	 * NOTE: This must match the parsing done in smp_setup_cpu_maps.
 354	 */
 355	for (i = 0; i < nthreads; i++) {
 356		if (be32_to_cpu(intserv[i]) ==
 357			fdt_boot_cpuid_phys(initial_boot_params)) {
 358			found = boot_cpu_count;
 359			found_thread = i;
 360		}
 361#ifdef CONFIG_SMP
 362		/* logical cpu id is always 0 on UP kernels */
 363		boot_cpu_count++;
 364#endif
 365	}
 366
 367	/* Not the boot CPU */
 368	if (found < 0)
 369		return 0;
 370
 371	DBG("boot cpu: logical %d physical %d\n", found,
 372	    be32_to_cpu(intserv[found_thread]));
 373	boot_cpuid = found;
 374
 375	if (IS_ENABLED(CONFIG_PPC64))
 376		boot_cpu_hwid = be32_to_cpu(intserv[found_thread]);
 377
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 378	/*
 379	 * PAPR defines "logical" PVR values for cpus that
 380	 * meet various levels of the architecture:
 381	 * 0x0f000001	Architecture version 2.04
 382	 * 0x0f000002	Architecture version 2.05
 383	 * If the cpu-version property in the cpu node contains
 384	 * such a value, we call identify_cpu again with the
 385	 * logical PVR value in order to use the cpu feature
 386	 * bits appropriate for the architecture level.
 387	 *
 388	 * A POWER6 partition in "POWER6 architected" mode
 389	 * uses the 0x0f000002 PVR value; in POWER5+ mode
 390	 * it uses 0x0f000001.
 391	 *
 392	 * If we're using device tree CPU feature discovery then we don't
 393	 * support the cpu-version property, and it's the responsibility of the
 394	 * firmware/hypervisor to provide the correct feature set for the
 395	 * architecture level via the ibm,powerpc-cpu-features binding.
 396	 */
 397	if (!dt_cpu_ftrs_in_use()) {
 398		prop = of_get_flat_dt_prop(node, "cpu-version", NULL);
 399		if (prop && (be32_to_cpup(prop) & 0xff000000) == 0x0f000000) {
 400			identify_cpu(0, be32_to_cpup(prop));
 401			seq_buf_printf(&ppc_hw_desc, "0x%04x ", be32_to_cpup(prop));
 402		}
 403
 404		check_cpu_feature_properties(node);
 405		check_cpu_features(node, "ibm,pa-features", ibm_pa_features,
 406				   ARRAY_SIZE(ibm_pa_features));
 407		check_cpu_features(node, "ibm,pi-features", ibm_pi_features,
 408				   ARRAY_SIZE(ibm_pi_features));
 409	}
 410
 411	identical_pvr_fixup(node);
 
 
 
 
 
 
 412	init_mmu_slb_size(node);
 413
 414#ifdef CONFIG_PPC64
 415	if (nthreads == 1)
 416		cur_cpu_spec->cpu_features &= ~CPU_FTR_SMT;
 417	else if (!dt_cpu_ftrs_in_use())
 418		cur_cpu_spec->cpu_features |= CPU_FTR_SMT;
 419#endif
 420
 421	return 0;
 422}
 423
 424static int __init early_init_dt_scan_chosen_ppc(unsigned long node,
 425						const char *uname,
 426						int depth, void *data)
 427{
 428	const unsigned long *lprop; /* All these set by kernel, so no need to convert endian */
 429
 430	/* Use common scan routine to determine if this is the chosen node */
 431	if (early_init_dt_scan_chosen(data) < 0)
 432		return 0;
 433
 434#ifdef CONFIG_PPC64
 435	/* check if iommu is forced on or off */
 436	if (of_get_flat_dt_prop(node, "linux,iommu-off", NULL) != NULL)
 437		iommu_is_off = 1;
 438	if (of_get_flat_dt_prop(node, "linux,iommu-force-on", NULL) != NULL)
 439		iommu_force_on = 1;
 440#endif
 441
 442	/* mem=x on the command line is the preferred mechanism */
 443	lprop = of_get_flat_dt_prop(node, "linux,memory-limit", NULL);
 444	if (lprop)
 445		memory_limit = *lprop;
 446
 447#ifdef CONFIG_PPC64
 448	lprop = of_get_flat_dt_prop(node, "linux,tce-alloc-start", NULL);
 449	if (lprop)
 450		tce_alloc_start = *lprop;
 451	lprop = of_get_flat_dt_prop(node, "linux,tce-alloc-end", NULL);
 452	if (lprop)
 453		tce_alloc_end = *lprop;
 454#endif
 455
 456#ifdef CONFIG_KEXEC_CORE
 457	lprop = of_get_flat_dt_prop(node, "linux,crashkernel-base", NULL);
 458	if (lprop)
 459		crashk_res.start = *lprop;
 460
 461	lprop = of_get_flat_dt_prop(node, "linux,crashkernel-size", NULL);
 462	if (lprop)
 463		crashk_res.end = crashk_res.start + *lprop - 1;
 464#endif
 465
 466	/* break now */
 467	return 1;
 468}
 469
 470/*
 471 * Compare the range against max mem limit and update
 472 * size if it cross the limit.
 473 */
 474
 475#ifdef CONFIG_SPARSEMEM
 476static bool __init validate_mem_limit(u64 base, u64 *size)
 477{
 478	u64 max_mem = 1UL << (MAX_PHYSMEM_BITS);
 479
 480	if (base >= max_mem)
 481		return false;
 482	if ((base + *size) > max_mem)
 483		*size = max_mem - base;
 484	return true;
 485}
 486#else
 487static bool __init validate_mem_limit(u64 base, u64 *size)
 488{
 489	return true;
 490}
 491#endif
 492
 493#ifdef CONFIG_PPC_PSERIES
 494/*
 495 * Interpret the ibm dynamic reconfiguration memory LMBs.
 496 * This contains a list of memory blocks along with NUMA affinity
 497 * information.
 498 */
 499static int  __init early_init_drmem_lmb(struct drmem_lmb *lmb,
 500					const __be32 **usm,
 501					void *data)
 502{
 503	u64 base, size;
 504	int is_kexec_kdump = 0, rngs;
 505
 506	base = lmb->base_addr;
 507	size = drmem_lmb_size();
 508	rngs = 1;
 509
 510	/*
 511	 * Skip this block if the reserved bit is set in flags
 512	 * or if the block is not assigned to this partition.
 513	 */
 514	if ((lmb->flags & DRCONF_MEM_RESERVED) ||
 515	    !(lmb->flags & DRCONF_MEM_ASSIGNED))
 516		return 0;
 517
 518	if (*usm)
 519		is_kexec_kdump = 1;
 520
 521	if (is_kexec_kdump) {
 522		/*
 523		 * For each memblock in ibm,dynamic-memory, a
 524		 * corresponding entry in linux,drconf-usable-memory
 525		 * property contains a counter 'p' followed by 'p'
 526		 * (base, size) duple. Now read the counter from
 527		 * linux,drconf-usable-memory property
 528		 */
 529		rngs = dt_mem_next_cell(dt_root_size_cells, usm);
 530		if (!rngs) /* there are no (base, size) duple */
 531			return 0;
 532	}
 533
 534	do {
 535		if (is_kexec_kdump) {
 536			base = dt_mem_next_cell(dt_root_addr_cells, usm);
 537			size = dt_mem_next_cell(dt_root_size_cells, usm);
 538		}
 539
 540		if (iommu_is_off) {
 541			if (base >= 0x80000000ul)
 542				continue;
 543			if ((base + size) > 0x80000000ul)
 544				size = 0x80000000ul - base;
 545		}
 546
 547		if (!validate_mem_limit(base, &size))
 548			continue;
 549
 550		DBG("Adding: %llx -> %llx\n", base, size);
 551		memblock_add(base, size);
 552
 553		if (lmb->flags & DRCONF_MEM_HOTREMOVABLE)
 554			memblock_mark_hotplug(base, size);
 555	} while (--rngs);
 556
 557	return 0;
 558}
 559#endif /* CONFIG_PPC_PSERIES */
 560
 561static int __init early_init_dt_scan_memory_ppc(void)
 562{
 563#ifdef CONFIG_PPC_PSERIES
 564	const void *fdt = initial_boot_params;
 565	int node = fdt_path_offset(fdt, "/ibm,dynamic-reconfiguration-memory");
 566
 567	if (node > 0)
 568		walk_drmem_lmbs_early(node, NULL, early_init_drmem_lmb);
 569
 570#endif
 571
 572	return early_init_dt_scan_memory();
 573}
 574
 575/*
 576 * For a relocatable kernel, we need to get the memstart_addr first,
 577 * then use it to calculate the virtual kernel start address. This has
 578 * to happen at a very early stage (before machine_init). In this case,
 579 * we just want to get the memstart_address and would not like to mess the
 580 * memblock at this stage. So introduce a variable to skip the memblock_add()
 581 * for this reason.
 582 */
 583#ifdef CONFIG_RELOCATABLE
 584static int add_mem_to_memblock = 1;
 585#else
 586#define add_mem_to_memblock 1
 587#endif
 588
 589void __init early_init_dt_add_memory_arch(u64 base, u64 size)
 590{
 591#ifdef CONFIG_PPC64
 592	if (iommu_is_off) {
 593		if (base >= 0x80000000ul)
 594			return;
 595		if ((base + size) > 0x80000000ul)
 596			size = 0x80000000ul - base;
 597	}
 598#endif
 599	/* Keep track of the beginning of memory -and- the size of
 600	 * the very first block in the device-tree as it represents
 601	 * the RMA on ppc64 server
 602	 */
 603	if (base < memstart_addr) {
 604		memstart_addr = base;
 605		first_memblock_size = size;
 606	}
 607
 608	/* Add the chunk to the MEMBLOCK list */
 609	if (add_mem_to_memblock) {
 610		if (validate_mem_limit(base, &size))
 611			memblock_add(base, size);
 612	}
 613}
 614
 615static void __init early_reserve_mem_dt(void)
 616{
 617	unsigned long i, dt_root;
 618	int len;
 619	const __be32 *prop;
 620
 621	early_init_fdt_reserve_self();
 622	early_init_fdt_scan_reserved_mem();
 623
 624	dt_root = of_get_flat_dt_root();
 625
 626	prop = of_get_flat_dt_prop(dt_root, "reserved-ranges", &len);
 627
 628	if (!prop)
 629		return;
 630
 631	DBG("Found new-style reserved-ranges\n");
 632
 633	/* Each reserved range is an (address,size) pair, 2 cells each,
 634	 * totalling 4 cells per range. */
 635	for (i = 0; i < len / (sizeof(*prop) * 4); i++) {
 636		u64 base, size;
 637
 638		base = of_read_number(prop + (i * 4) + 0, 2);
 639		size = of_read_number(prop + (i * 4) + 2, 2);
 640
 641		if (size) {
 642			DBG("reserving: %llx -> %llx\n", base, size);
 643			memblock_reserve(base, size);
 644		}
 645	}
 646}
 647
 648static void __init early_reserve_mem(void)
 649{
 650	__be64 *reserve_map;
 651
 652	reserve_map = (__be64 *)(((unsigned long)initial_boot_params) +
 653			fdt_off_mem_rsvmap(initial_boot_params));
 654
 655	/* Look for the new "reserved-regions" property in the DT */
 656	early_reserve_mem_dt();
 657
 658#ifdef CONFIG_BLK_DEV_INITRD
 659	/* Then reserve the initrd, if any */
 660	if (initrd_start && (initrd_end > initrd_start)) {
 661		memblock_reserve(ALIGN_DOWN(__pa(initrd_start), PAGE_SIZE),
 662			ALIGN(initrd_end, PAGE_SIZE) -
 663			ALIGN_DOWN(initrd_start, PAGE_SIZE));
 664	}
 665#endif /* CONFIG_BLK_DEV_INITRD */
 666
 667	if (!IS_ENABLED(CONFIG_PPC32))
 668		return;
 669
 670	/* 
 671	 * Handle the case where we might be booting from an old kexec
 672	 * image that setup the mem_rsvmap as pairs of 32-bit values
 673	 */
 674	if (be64_to_cpup(reserve_map) > 0xffffffffull) {
 675		u32 base_32, size_32;
 676		__be32 *reserve_map_32 = (__be32 *)reserve_map;
 677
 678		DBG("Found old 32-bit reserve map\n");
 679
 680		while (1) {
 681			base_32 = be32_to_cpup(reserve_map_32++);
 682			size_32 = be32_to_cpup(reserve_map_32++);
 683			if (size_32 == 0)
 684				break;
 685			DBG("reserving: %x -> %x\n", base_32, size_32);
 686			memblock_reserve(base_32, size_32);
 687		}
 688		return;
 689	}
 690}
 691
 692#ifdef CONFIG_PPC_TRANSACTIONAL_MEM
 693static bool tm_disabled __initdata;
 694
 695static int __init parse_ppc_tm(char *str)
 696{
 697	bool res;
 698
 699	if (kstrtobool(str, &res))
 700		return -EINVAL;
 701
 702	tm_disabled = !res;
 703
 704	return 0;
 705}
 706early_param("ppc_tm", parse_ppc_tm);
 707
 708static void __init tm_init(void)
 709{
 710	if (tm_disabled) {
 711		pr_info("Disabling hardware transactional memory (HTM)\n");
 712		cur_cpu_spec->cpu_user_features2 &=
 713			~(PPC_FEATURE2_HTM_NOSC | PPC_FEATURE2_HTM);
 714		cur_cpu_spec->cpu_features &= ~CPU_FTR_TM;
 715		return;
 716	}
 717
 718	pnv_tm_init();
 719}
 720#else
 721static void tm_init(void) { }
 722#endif /* CONFIG_PPC_TRANSACTIONAL_MEM */
 723
 724static int __init
 725early_init_dt_scan_model(unsigned long node, const char *uname,
 726			 int depth, void *data)
 727{
 728	const char *prop;
 729
 730	if (depth != 0)
 731		return 0;
 732
 733	prop = of_get_flat_dt_prop(node, "model", NULL);
 734	if (prop)
 735		seq_buf_printf(&ppc_hw_desc, "%s ", prop);
 736
 737	/* break now */
 738	return 1;
 739}
 740
 741#ifdef CONFIG_PPC64
 742static void __init save_fscr_to_task(void)
 743{
 744	/*
 745	 * Ensure the init_task (pid 0, aka swapper) uses the value of FSCR we
 746	 * have configured via the device tree features or via __init_FSCR().
 747	 * That value will then be propagated to pid 1 (init) and all future
 748	 * processes.
 749	 */
 750	if (early_cpu_has_feature(CPU_FTR_ARCH_207S))
 751		init_task.thread.fscr = mfspr(SPRN_FSCR);
 752}
 753#else
 754static inline void save_fscr_to_task(void) {}
 755#endif
 756
 757
 758void __init early_init_devtree(void *params)
 759{
 760	phys_addr_t limit;
 761
 762	DBG(" -> early_init_devtree(%px)\n", params);
 763
 764	/* Too early to BUG_ON(), do it by hand */
 765	if (!early_init_dt_verify(params))
 766		panic("BUG: Failed verifying flat device tree, bad version?");
 767
 768	of_scan_flat_dt(early_init_dt_scan_model, NULL);
 769
 770#ifdef CONFIG_PPC_RTAS
 771	/* Some machines might need RTAS info for debugging, grab it now. */
 772	of_scan_flat_dt(early_init_dt_scan_rtas, NULL);
 773#endif
 774
 775#ifdef CONFIG_PPC_POWERNV
 776	/* Some machines might need OPAL info for debugging, grab it now. */
 777	of_scan_flat_dt(early_init_dt_scan_opal, NULL);
 778
 779	/* Scan tree for ultravisor feature */
 780	of_scan_flat_dt(early_init_dt_scan_ultravisor, NULL);
 781#endif
 782
 783#if defined(CONFIG_FA_DUMP) || defined(CONFIG_PRESERVE_FA_DUMP)
 784	/* scan tree to see if dump is active during last boot */
 785	of_scan_flat_dt(early_init_dt_scan_fw_dump, NULL);
 786#endif
 787
 788	/* Retrieve various informations from the /chosen node of the
 789	 * device-tree, including the platform type, initrd location and
 790	 * size, TCE reserve, and more ...
 791	 */
 792	of_scan_flat_dt(early_init_dt_scan_chosen_ppc, boot_command_line);
 793
 
 
 
 794	/* Scan memory nodes and rebuild MEMBLOCKs */
 795	early_init_dt_scan_root();
 796	early_init_dt_scan_memory_ppc();
 797
 798	/*
 799	 * As generic code authors expect to be able to use static keys
 800	 * in early_param() handlers, we initialize the static keys just
 801	 * before parsing early params (it's fine to call jump_label_init()
 802	 * more than once).
 803	 */
 804	jump_label_init();
 805	parse_early_param();
 806
 807	/* make sure we've parsed cmdline for mem= before this */
 808	if (memory_limit)
 809		first_memblock_size = min_t(u64, first_memblock_size, memory_limit);
 810	setup_initial_memory_limit(memstart_addr, first_memblock_size);
 811	/* Reserve MEMBLOCK regions used by kernel, initrd, dt, etc... */
 812	memblock_reserve(PHYSICAL_START, __pa(_end) - PHYSICAL_START);
 
 
 
 
 
 813	/* If relocatable, reserve first 32k for interrupt vectors etc. */
 
 
 814	if (PHYSICAL_START > MEMORY_START)
 815		memblock_reserve(MEMORY_START, 0x8000);
 816	reserve_kdump_trampoline();
 817#if defined(CONFIG_FA_DUMP) || defined(CONFIG_PRESERVE_FA_DUMP)
 818	/*
 819	 * If we fail to reserve memory for firmware-assisted dump then
 820	 * fallback to kexec based kdump.
 821	 */
 822	if (fadump_reserve_mem() == 0)
 823#endif
 824		reserve_crashkernel();
 825	early_reserve_mem();
 826
 827	/* Ensure that total memory size is page-aligned. */
 828	limit = ALIGN(memory_limit ?: memblock_phys_mem_size(), PAGE_SIZE);
 829	memblock_enforce_memory_limit(limit);
 
 
 
 830
 831#if defined(CONFIG_PPC_BOOK3S_64) && defined(CONFIG_PPC_4K_PAGES)
 832	if (!early_radix_enabled())
 833		memblock_cap_memory_range(0, 1UL << (H_MAX_PHYSMEM_BITS));
 834#endif
 835
 836	memblock_allow_resize();
 837	memblock_dump_all();
 838
 839	DBG("Phys. mem: %llx\n", (unsigned long long)memblock_phys_mem_size());
 840
 841	/* We may need to relocate the flat tree, do it now.
 842	 * FIXME .. and the initrd too? */
 843	move_device_tree();
 844
 845	DBG("Scanning CPUs ...\n");
 846
 847	dt_cpu_ftrs_scan();
 848
 849	// We can now add the CPU name & PVR to the hardware description
 850	seq_buf_printf(&ppc_hw_desc, "%s 0x%04lx ", cur_cpu_spec->cpu_name, mfspr(SPRN_PVR));
 851
 852	/* Retrieve CPU related informations from the flat tree
 853	 * (altivec support, boot CPU ID, ...)
 854	 */
 855	of_scan_flat_dt(early_init_dt_scan_cpus, NULL);
 856	if (boot_cpuid < 0) {
 857		printk("Failed to identify boot CPU !\n");
 858		BUG();
 859	}
 860
 861	save_fscr_to_task();
 862
 863#if defined(CONFIG_SMP) && defined(CONFIG_PPC64)
 864	/* We'll later wait for secondaries to check in; there are
 865	 * NCPUS-1 non-boot CPUs  :-)
 866	 */
 867	spinning_secondaries = boot_cpu_count - 1;
 868#endif
 869
 870	mmu_early_init_devtree();
 
 
 
 871
 872#ifdef CONFIG_PPC_POWERNV
 873	/* Scan and build the list of machine check recoverable ranges */
 874	of_scan_flat_dt(early_init_dt_scan_recoverable_ranges, NULL);
 875#endif
 876	epapr_paravirt_early_init();
 877
 878	/* Now try to figure out if we are running on LPAR and so on */
 879	pseries_probe_fw_features();
 880
 881	/*
 882	 * Initialize pkey features and default AMR/IAMR values
 883	 */
 884	pkey_early_init_devtree();
 885
 886#ifdef CONFIG_PPC_PS3
 887	/* Identify PS3 firmware */
 888	if (of_flat_dt_is_compatible(of_get_flat_dt_root(), "sony,ps3"))
 889		powerpc_firmware_features |= FW_FEATURE_PS3_POSSIBLE;
 890#endif
 891
 892	/* If kexec left a PLPKS password in the DT, get it and clear it */
 893	plpks_early_init_devtree();
 894
 895	tm_init();
 896
 897	DBG(" <- early_init_devtree()\n");
 898}
 899
 900#ifdef CONFIG_RELOCATABLE
 901/*
 902 * This function run before early_init_devtree, so we have to init
 903 * initial_boot_params.
 904 */
 905void __init early_get_first_memblock_info(void *params, phys_addr_t *size)
 906{
 907	/* Setup flat device-tree pointer */
 908	initial_boot_params = params;
 909
 910	/*
 911	 * Scan the memory nodes and set add_mem_to_memblock to 0 to avoid
 912	 * mess the memblock.
 913	 */
 914	add_mem_to_memblock = 0;
 915	early_init_dt_scan_root();
 916	early_init_dt_scan_memory_ppc();
 917	add_mem_to_memblock = 1;
 918
 919	if (size)
 920		*size = first_memblock_size;
 921}
 922#endif
 923
 924/*******
 925 *
 926 * New implementation of the OF "find" APIs, return a refcounted
 927 * object, call of_node_put() when done.  The device tree and list
 928 * are protected by a rw_lock.
 929 *
 930 * Note that property management will need some locking as well,
 931 * this isn't dealt with yet.
 932 *
 933 *******/
 934
 935/**
 936 * of_get_ibm_chip_id - Returns the IBM "chip-id" of a device
 937 * @np: device node of the device
 938 *
 939 * This looks for a property "ibm,chip-id" in the node or any
 940 * of its parents and returns its content, or -1 if it cannot
 941 * be found.
 942 */
 943int of_get_ibm_chip_id(struct device_node *np)
 944{
 945	of_node_get(np);
 946	while (np) {
 947		u32 chip_id;
 948
 949		/*
 950		 * Skiboot may produce memory nodes that contain more than one
 951		 * cell in chip-id, we only read the first one here.
 952		 */
 953		if (!of_property_read_u32(np, "ibm,chip-id", &chip_id)) {
 954			of_node_put(np);
 955			return chip_id;
 956		}
 957
 958		np = of_get_next_parent(np);
 959	}
 960	return -1;
 961}
 962EXPORT_SYMBOL(of_get_ibm_chip_id);
 963
 964/**
 965 * cpu_to_chip_id - Return the cpus chip-id
 966 * @cpu: The logical cpu number.
 967 *
 968 * Return the value of the ibm,chip-id property corresponding to the given
 969 * logical cpu number. If the chip-id can not be found, returns -1.
 970 */
 971int cpu_to_chip_id(int cpu)
 972{
 973	struct device_node *np;
 974	int ret = -1, idx;
 975
 976	idx = cpu / threads_per_core;
 977	if (chip_id_lookup_table && chip_id_lookup_table[idx] != -1)
 978		return chip_id_lookup_table[idx];
 979
 980	np = of_get_cpu_node(cpu, NULL);
 981	if (np) {
 982		ret = of_get_ibm_chip_id(np);
 983		of_node_put(np);
 984
 985		if (chip_id_lookup_table)
 986			chip_id_lookup_table[idx] = ret;
 987	}
 988
 989	return ret;
 990}
 991EXPORT_SYMBOL(cpu_to_chip_id);
 992
 993bool arch_match_cpu_phys_id(int cpu, u64 phys_id)
 994{
 995#ifdef CONFIG_SMP
 996	/*
 997	 * Early firmware scanning must use this rather than
 998	 * get_hard_smp_processor_id because we don't have pacas allocated
 999	 * until memory topology is discovered.
1000	 */
1001	if (cpu_to_phys_id != NULL)
1002		return (int)phys_id == cpu_to_phys_id[cpu];
1003#endif
1004
1005	return (int)phys_id == get_hard_smp_processor_id(cpu);
1006}
v6.13.7
   1// SPDX-License-Identifier: GPL-2.0-or-later
   2/*
   3 * Procedures for creating, accessing and interpreting the device tree.
   4 *
   5 * Paul Mackerras	August 1996.
   6 * Copyright (C) 1996-2005 Paul Mackerras.
   7 * 
   8 *  Adapted for 64bit PowerPC by Dave Engebretsen and Peter Bergner.
   9 *    {engebret|bergner}@us.ibm.com 
  10 */
  11
  12#undef DEBUG
  13
  14#include <linux/kernel.h>
  15#include <linux/string.h>
  16#include <linux/init.h>
  17#include <linux/threads.h>
  18#include <linux/spinlock.h>
  19#include <linux/types.h>
  20#include <linux/pci.h>
  21#include <linux/delay.h>
  22#include <linux/initrd.h>
  23#include <linux/bitops.h>
  24#include <linux/export.h>
  25#include <linux/kexec.h>
  26#include <linux/irq.h>
  27#include <linux/memblock.h>
  28#include <linux/of.h>
  29#include <linux/of_fdt.h>
  30#include <linux/libfdt.h>
  31#include <linux/cpu.h>
  32#include <linux/pgtable.h>
  33#include <linux/seq_buf.h>
  34
  35#include <asm/rtas.h>
  36#include <asm/page.h>
  37#include <asm/processor.h>
  38#include <asm/irq.h>
  39#include <asm/io.h>
  40#include <asm/kdump.h>
  41#include <asm/smp.h>
  42#include <asm/mmu.h>
  43#include <asm/paca.h>
  44#include <asm/powernv.h>
  45#include <asm/iommu.h>
  46#include <asm/btext.h>
  47#include <asm/sections.h>
  48#include <asm/setup.h>
  49#include <asm/pci-bridge.h>
  50#include <asm/kexec.h>
  51#include <asm/opal.h>
  52#include <asm/fadump.h>
  53#include <asm/epapr_hcalls.h>
  54#include <asm/firmware.h>
  55#include <asm/dt_cpu_ftrs.h>
  56#include <asm/drmem.h>
  57#include <asm/ultravisor.h>
  58#include <asm/prom.h>
  59#include <asm/plpks.h>
  60
  61#include <mm/mmu_decl.h>
  62
  63#ifdef DEBUG
  64#define DBG(fmt...) printk(KERN_ERR fmt)
  65#else
  66#define DBG(fmt...)
  67#endif
  68
  69int *chip_id_lookup_table;
  70
  71#ifdef CONFIG_PPC64
  72int __initdata iommu_is_off;
  73int __initdata iommu_force_on;
  74unsigned long tce_alloc_start, tce_alloc_end;
  75u64 ppc64_rma_size;
  76unsigned int boot_cpu_node_count __ro_after_init;
  77#endif
  78static phys_addr_t first_memblock_size;
  79static int __initdata boot_cpu_count;
  80
  81static int __init early_parse_mem(char *p)
  82{
  83	if (!p)
  84		return 1;
  85
  86	memory_limit = PAGE_ALIGN(memparse(p, &p));
  87	DBG("memory limit = 0x%llx\n", memory_limit);
  88
  89	return 0;
  90}
  91early_param("mem", early_parse_mem);
  92
  93/*
  94 * overlaps_initrd - check for overlap with page aligned extension of
  95 * initrd.
  96 */
  97static inline int overlaps_initrd(unsigned long start, unsigned long size)
  98{
  99#ifdef CONFIG_BLK_DEV_INITRD
 100	if (!initrd_start)
 101		return 0;
 102
 103	return	(start + size) > ALIGN_DOWN(initrd_start, PAGE_SIZE) &&
 104			start <= ALIGN(initrd_end, PAGE_SIZE);
 105#else
 106	return 0;
 107#endif
 108}
 109
 110/**
 111 * move_device_tree - move tree to an unused area, if needed.
 112 *
 113 * The device tree may be allocated beyond our memory limit, or inside the
 114 * crash kernel region for kdump, or within the page aligned range of initrd.
 115 * If so, move it out of the way.
 116 */
 117static void __init move_device_tree(void)
 118{
 119	unsigned long start, size;
 120	void *p;
 121
 122	DBG("-> move_device_tree\n");
 123
 124	start = __pa(initial_boot_params);
 125	size = fdt_totalsize(initial_boot_params);
 126
 127	if ((memory_limit && (start + size) > PHYSICAL_START + memory_limit) ||
 128	    !memblock_is_memory(start + size - 1) ||
 129	    overlaps_crashkernel(start, size) || overlaps_initrd(start, size)) {
 130		p = memblock_alloc_raw(size, PAGE_SIZE);
 131		if (!p)
 132			panic("Failed to allocate %lu bytes to move device tree\n",
 133			      size);
 134		memcpy(p, initial_boot_params, size);
 135		initial_boot_params = p;
 136		DBG("Moved device tree to 0x%px\n", p);
 137	}
 138
 139	DBG("<- move_device_tree\n");
 140}
 141
 142/*
 143 * ibm,pa/pi-features is a per-cpu property that contains a string of
 144 * attribute descriptors, each of which has a 2 byte header plus up
 145 * to 254 bytes worth of processor attribute bits.  First header
 146 * byte specifies the number of bytes following the header.
 147 * Second header byte is an "attribute-specifier" type, of which
 148 * zero is the only currently-defined value.
 149 * Implementation:  Pass in the byte and bit offset for the feature
 150 * that we are interested in.  The function will return -1 if the
 151 * pa-features property is missing, or a 1/0 to indicate if the feature
 152 * is supported/not supported.  Note that the bit numbers are
 153 * big-endian to match the definition in PAPR.
 154 * Note: the 'clear' flag clears the feature if the bit is set in the
 155 * ibm,pa/pi-features property, it does not set the feature if the
 156 * bit is clear.
 157 */
 158struct ibm_feature {
 159	unsigned long	cpu_features;	/* CPU_FTR_xxx bit */
 160	unsigned long	mmu_features;	/* MMU_FTR_xxx bit */
 161	unsigned int	cpu_user_ftrs;	/* PPC_FEATURE_xxx bit */
 162	unsigned int	cpu_user_ftrs2;	/* PPC_FEATURE2_xxx bit */
 163	unsigned char	pabyte;		/* byte number in ibm,pa/pi-features */
 164	unsigned char	pabit;		/* bit number (big-endian) */
 165	unsigned char	clear;		/* if 1, pa bit set => clear feature */
 166};
 167
 168static struct ibm_feature ibm_pa_features[] __initdata = {
 169	{ .pabyte = 0,  .pabit = 0, .cpu_user_ftrs = PPC_FEATURE_HAS_MMU },
 170	{ .pabyte = 0,  .pabit = 1, .cpu_user_ftrs = PPC_FEATURE_HAS_FPU },
 171	{ .pabyte = 0,  .pabit = 3, .cpu_features  = CPU_FTR_CTRL },
 172	{ .pabyte = 0,  .pabit = 6, .cpu_features  = CPU_FTR_NOEXECUTE },
 173	{ .pabyte = 1,  .pabit = 2, .mmu_features  = MMU_FTR_CI_LARGE_PAGE },
 174#ifdef CONFIG_PPC_RADIX_MMU
 175	{ .pabyte = 40, .pabit = 0, .mmu_features  = MMU_FTR_TYPE_RADIX | MMU_FTR_GTSE },
 176#endif
 177	{ .pabyte = 5,  .pabit = 0, .cpu_features  = CPU_FTR_REAL_LE,
 178				    .cpu_user_ftrs = PPC_FEATURE_TRUE_LE },
 179	/*
 180	 * If the kernel doesn't support TM (ie CONFIG_PPC_TRANSACTIONAL_MEM=n),
 181	 * we don't want to turn on TM here, so we use the *_COMP versions
 182	 * which are 0 if the kernel doesn't support TM.
 183	 */
 184	{ .pabyte = 22, .pabit = 0, .cpu_features = CPU_FTR_TM_COMP,
 185	  .cpu_user_ftrs2 = PPC_FEATURE2_HTM_COMP | PPC_FEATURE2_HTM_NOSC_COMP },
 186
 187	{ .pabyte = 64, .pabit = 0, .cpu_features = CPU_FTR_DAWR1 },
 188	{ .pabyte = 68, .pabit = 5, .cpu_features = CPU_FTR_DEXCR_NPHIE },
 189};
 190
 191/*
 192 * ibm,pi-features property provides the support of processor specific
 193 * options not described in ibm,pa-features. Right now use byte 0, bit 3
 194 * which indicates the occurrence of DSI interrupt when the paste operation
 195 * on the suspended NX window.
 196 */
 197static struct ibm_feature ibm_pi_features[] __initdata = {
 198	{ .pabyte = 0, .pabit = 3, .mmu_features  = MMU_FTR_NX_DSI },
 199	{ .pabyte = 0, .pabit = 4, .cpu_features  = CPU_FTR_DBELL, .clear = 1 },
 200};
 201
 202static void __init scan_features(unsigned long node, const unsigned char *ftrs,
 203				 unsigned long tablelen,
 204				 struct ibm_feature *fp,
 205				 unsigned long ft_size)
 206{
 207	unsigned long i, len, bit;
 208
 209	/* find descriptor with type == 0 */
 210	for (;;) {
 211		if (tablelen < 3)
 212			return;
 213		len = 2 + ftrs[0];
 214		if (tablelen < len)
 215			return;		/* descriptor 0 not found */
 216		if (ftrs[1] == 0)
 217			break;
 218		tablelen -= len;
 219		ftrs += len;
 220	}
 221
 222	/* loop over bits we know about */
 223	for (i = 0; i < ft_size; ++i, ++fp) {
 224		if (fp->pabyte >= ftrs[0])
 225			continue;
 226		bit = (ftrs[2 + fp->pabyte] >> (7 - fp->pabit)) & 1;
 227		if (bit && !fp->clear) {
 228			cur_cpu_spec->cpu_features |= fp->cpu_features;
 229			cur_cpu_spec->cpu_user_features |= fp->cpu_user_ftrs;
 230			cur_cpu_spec->cpu_user_features2 |= fp->cpu_user_ftrs2;
 231			cur_cpu_spec->mmu_features |= fp->mmu_features;
 232		} else if (bit == fp->clear) {
 233			cur_cpu_spec->cpu_features &= ~fp->cpu_features;
 234			cur_cpu_spec->cpu_user_features &= ~fp->cpu_user_ftrs;
 235			cur_cpu_spec->cpu_user_features2 &= ~fp->cpu_user_ftrs2;
 236			cur_cpu_spec->mmu_features &= ~fp->mmu_features;
 237		}
 238	}
 239}
 240
 241static void __init check_cpu_features(unsigned long node, char *name,
 242				      struct ibm_feature *fp,
 243				      unsigned long size)
 244{
 245	const unsigned char *pa_ftrs;
 246	int tablelen;
 247
 248	pa_ftrs = of_get_flat_dt_prop(node, name, &tablelen);
 249	if (pa_ftrs == NULL)
 250		return;
 251
 252	scan_features(node, pa_ftrs, tablelen, fp, size);
 253}
 254
 255#ifdef CONFIG_PPC_64S_HASH_MMU
 256static void __init init_mmu_slb_size(unsigned long node)
 257{
 258	const __be32 *slb_size_ptr;
 259
 260	slb_size_ptr = of_get_flat_dt_prop(node, "slb-size", NULL) ? :
 261			of_get_flat_dt_prop(node, "ibm,slb-size", NULL);
 262
 263	if (slb_size_ptr)
 264		mmu_slb_size = be32_to_cpup(slb_size_ptr);
 265}
 266#else
 267#define init_mmu_slb_size(node) do { } while(0)
 268#endif
 269
 270static struct feature_property {
 271	const char *name;
 272	u32 min_value;
 273	unsigned long cpu_feature;
 274	unsigned long cpu_user_ftr;
 275} feature_properties[] __initdata = {
 276#ifdef CONFIG_ALTIVEC
 277	{"altivec", 0, CPU_FTR_ALTIVEC, PPC_FEATURE_HAS_ALTIVEC},
 278	{"ibm,vmx", 1, CPU_FTR_ALTIVEC, PPC_FEATURE_HAS_ALTIVEC},
 279#endif /* CONFIG_ALTIVEC */
 280#ifdef CONFIG_VSX
 281	/* Yes, this _really_ is ibm,vmx == 2 to enable VSX */
 282	{"ibm,vmx", 2, CPU_FTR_VSX, PPC_FEATURE_HAS_VSX},
 283#endif /* CONFIG_VSX */
 284#ifdef CONFIG_PPC64
 285	{"ibm,dfp", 1, 0, PPC_FEATURE_HAS_DFP},
 286	{"ibm,purr", 1, CPU_FTR_PURR, 0},
 287	{"ibm,spurr", 1, CPU_FTR_SPURR, 0},
 288#endif /* CONFIG_PPC64 */
 289};
 290
 291#if defined(CONFIG_44x) && defined(CONFIG_PPC_FPU)
 292static __init void identical_pvr_fixup(unsigned long node)
 293{
 294	unsigned int pvr;
 295	const char *model = of_get_flat_dt_prop(node, "model", NULL);
 296
 297	/*
 298	 * Since 440GR(x)/440EP(x) processors have the same pvr,
 299	 * we check the node path and set bit 28 in the cur_cpu_spec
 300	 * pvr for EP(x) processor version. This bit is always 0 in
 301	 * the "real" pvr. Then we call identify_cpu again with
 302	 * the new logical pvr to enable FPU support.
 303	 */
 304	if (model && strstr(model, "440EP")) {
 305		pvr = cur_cpu_spec->pvr_value | 0x8;
 306		identify_cpu(0, pvr);
 307		DBG("Using logical pvr %x for %s\n", pvr, model);
 308	}
 309}
 310#else
 311#define identical_pvr_fixup(node) do { } while(0)
 312#endif
 313
 314static void __init check_cpu_feature_properties(unsigned long node)
 315{
 316	int i;
 317	struct feature_property *fp = feature_properties;
 318	const __be32 *prop;
 319
 320	for (i = 0; i < (int)ARRAY_SIZE(feature_properties); ++i, ++fp) {
 321		prop = of_get_flat_dt_prop(node, fp->name, NULL);
 322		if (prop && be32_to_cpup(prop) >= fp->min_value) {
 323			cur_cpu_spec->cpu_features |= fp->cpu_feature;
 324			cur_cpu_spec->cpu_user_features |= fp->cpu_user_ftr;
 325		}
 326	}
 327}
 328
 329static int __init early_init_dt_scan_cpus(unsigned long node,
 330					  const char *uname, int depth,
 331					  void *data)
 332{
 333	const char *type = of_get_flat_dt_prop(node, "device_type", NULL);
 334	const __be32 *cpu_version = NULL;
 335	const __be32 *prop;
 336	const __be32 *intserv;
 337	int i, nthreads;
 338	int len;
 339	int found = -1;
 340	int found_thread = 0;
 341
 342	/* We are scanning "cpu" nodes only */
 343	if (type == NULL || strcmp(type, "cpu") != 0)
 344		return 0;
 345
 346	if (IS_ENABLED(CONFIG_PPC64))
 347		boot_cpu_node_count++;
 348
 349	/* Get physical cpuid */
 350	intserv = of_get_flat_dt_prop(node, "ibm,ppc-interrupt-server#s", &len);
 351	if (!intserv)
 352		intserv = of_get_flat_dt_prop(node, "reg", &len);
 353
 354	nthreads = len / sizeof(int);
 355
 356	/*
 357	 * Now see if any of these threads match our boot cpu.
 358	 * NOTE: This must match the parsing done in smp_setup_cpu_maps.
 359	 */
 360	for (i = 0; i < nthreads; i++) {
 361		if (be32_to_cpu(intserv[i]) ==
 362			fdt_boot_cpuid_phys(initial_boot_params)) {
 363			found = boot_cpu_count;
 364			found_thread = i;
 365		}
 366#ifdef CONFIG_SMP
 367		/* logical cpu id is always 0 on UP kernels */
 368		boot_cpu_count++;
 369#endif
 370	}
 371
 372	/* Not the boot CPU */
 373	if (found < 0)
 374		return 0;
 375
 
 
 376	boot_cpuid = found;
 377
 378	if (IS_ENABLED(CONFIG_PPC64))
 379		boot_cpu_hwid = be32_to_cpu(intserv[found_thread]);
 380
 381	if (nr_cpu_ids % nthreads != 0) {
 382		set_nr_cpu_ids(ALIGN(nr_cpu_ids, nthreads));
 383		pr_warn("nr_cpu_ids was not a multiple of threads_per_core, adjusted to %d\n",
 384			nr_cpu_ids);
 385	}
 386
 387	if (boot_cpuid >= nr_cpu_ids) {
 388		// Remember boot core for smp_setup_cpu_maps()
 389		boot_core_hwid = be32_to_cpu(intserv[0]);
 390
 391		pr_warn("Boot CPU %d (core hwid %d) >= nr_cpu_ids, adjusted boot CPU to %d\n",
 392			boot_cpuid, boot_core_hwid, found_thread);
 393
 394		// Adjust boot CPU to appear on logical core 0
 395		boot_cpuid = found_thread;
 396	}
 397
 398	DBG("boot cpu: logical %d physical %d\n", boot_cpuid,
 399	    be32_to_cpu(intserv[found_thread]));
 400
 401	/*
 402	 * PAPR defines "logical" PVR values for cpus that
 403	 * meet various levels of the architecture:
 404	 * 0x0f000001	Architecture version 2.04
 405	 * 0x0f000002	Architecture version 2.05
 406	 * If the cpu-version property in the cpu node contains
 407	 * such a value, we call identify_cpu again with the
 408	 * logical PVR value in order to use the cpu feature
 409	 * bits appropriate for the architecture level.
 410	 *
 411	 * A POWER6 partition in "POWER6 architected" mode
 412	 * uses the 0x0f000002 PVR value; in POWER5+ mode
 413	 * it uses 0x0f000001.
 414	 *
 415	 * If we're using device tree CPU feature discovery then we don't
 416	 * support the cpu-version property, and it's the responsibility of the
 417	 * firmware/hypervisor to provide the correct feature set for the
 418	 * architecture level via the ibm,powerpc-cpu-features binding.
 419	 */
 420	if (!dt_cpu_ftrs_in_use()) {
 421		prop = of_get_flat_dt_prop(node, "cpu-version", NULL);
 422		if (prop && (be32_to_cpup(prop) & 0xff000000) == 0x0f000000) {
 423			identify_cpu(0, be32_to_cpup(prop));
 424			cpu_version = prop;
 425		}
 426
 427		check_cpu_feature_properties(node);
 428		check_cpu_features(node, "ibm,pa-features", ibm_pa_features,
 429				   ARRAY_SIZE(ibm_pa_features));
 430		check_cpu_features(node, "ibm,pi-features", ibm_pi_features,
 431				   ARRAY_SIZE(ibm_pi_features));
 432	}
 433
 434	identical_pvr_fixup(node);
 435
 436	// We can now add the CPU name & PVR to the hardware description
 437	seq_buf_printf(&ppc_hw_desc, "%s 0x%04lx ", cur_cpu_spec->cpu_name, mfspr(SPRN_PVR));
 438	if (cpu_version)
 439		seq_buf_printf(&ppc_hw_desc, "0x%04x ", be32_to_cpup(cpu_version));
 440
 441	init_mmu_slb_size(node);
 442
 443#ifdef CONFIG_PPC64
 444	if (nthreads == 1)
 445		cur_cpu_spec->cpu_features &= ~CPU_FTR_SMT;
 446	else if (!dt_cpu_ftrs_in_use())
 447		cur_cpu_spec->cpu_features |= CPU_FTR_SMT;
 448#endif
 449
 450	return 0;
 451}
 452
 453static int __init early_init_dt_scan_chosen_ppc(unsigned long node,
 454						const char *uname,
 455						int depth, void *data)
 456{
 457	const unsigned long *lprop; /* All these set by kernel, so no need to convert endian */
 458
 459	/* Use common scan routine to determine if this is the chosen node */
 460	if (early_init_dt_scan_chosen(data) < 0)
 461		return 0;
 462
 463#ifdef CONFIG_PPC64
 464	/* check if iommu is forced on or off */
 465	if (of_get_flat_dt_prop(node, "linux,iommu-off", NULL) != NULL)
 466		iommu_is_off = 1;
 467	if (of_get_flat_dt_prop(node, "linux,iommu-force-on", NULL) != NULL)
 468		iommu_force_on = 1;
 469#endif
 470
 471	/* mem=x on the command line is the preferred mechanism */
 472	lprop = of_get_flat_dt_prop(node, "linux,memory-limit", NULL);
 473	if (lprop)
 474		memory_limit = *lprop;
 475
 476#ifdef CONFIG_PPC64
 477	lprop = of_get_flat_dt_prop(node, "linux,tce-alloc-start", NULL);
 478	if (lprop)
 479		tce_alloc_start = *lprop;
 480	lprop = of_get_flat_dt_prop(node, "linux,tce-alloc-end", NULL);
 481	if (lprop)
 482		tce_alloc_end = *lprop;
 483#endif
 484
 485#ifdef CONFIG_CRASH_RESERVE
 486	lprop = of_get_flat_dt_prop(node, "linux,crashkernel-base", NULL);
 487	if (lprop)
 488		crashk_res.start = *lprop;
 489
 490	lprop = of_get_flat_dt_prop(node, "linux,crashkernel-size", NULL);
 491	if (lprop)
 492		crashk_res.end = crashk_res.start + *lprop - 1;
 493#endif
 494
 495	/* break now */
 496	return 1;
 497}
 498
 499/*
 500 * Compare the range against max mem limit and update
 501 * size if it cross the limit.
 502 */
 503
 504#ifdef CONFIG_SPARSEMEM
 505static bool __init validate_mem_limit(u64 base, u64 *size)
 506{
 507	u64 max_mem = 1UL << (MAX_PHYSMEM_BITS);
 508
 509	if (base >= max_mem)
 510		return false;
 511	if ((base + *size) > max_mem)
 512		*size = max_mem - base;
 513	return true;
 514}
 515#else
 516static bool __init validate_mem_limit(u64 base, u64 *size)
 517{
 518	return true;
 519}
 520#endif
 521
 522#ifdef CONFIG_PPC_PSERIES
 523/*
 524 * Interpret the ibm dynamic reconfiguration memory LMBs.
 525 * This contains a list of memory blocks along with NUMA affinity
 526 * information.
 527 */
 528static int  __init early_init_drmem_lmb(struct drmem_lmb *lmb,
 529					const __be32 **usm,
 530					void *data)
 531{
 532	u64 base, size;
 533	int is_kexec_kdump = 0, rngs;
 534
 535	base = lmb->base_addr;
 536	size = drmem_lmb_size();
 537	rngs = 1;
 538
 539	/*
 540	 * Skip this block if the reserved bit is set in flags
 541	 * or if the block is not assigned to this partition.
 542	 */
 543	if ((lmb->flags & DRCONF_MEM_RESERVED) ||
 544	    !(lmb->flags & DRCONF_MEM_ASSIGNED))
 545		return 0;
 546
 547	if (*usm)
 548		is_kexec_kdump = 1;
 549
 550	if (is_kexec_kdump) {
 551		/*
 552		 * For each memblock in ibm,dynamic-memory, a
 553		 * corresponding entry in linux,drconf-usable-memory
 554		 * property contains a counter 'p' followed by 'p'
 555		 * (base, size) duple. Now read the counter from
 556		 * linux,drconf-usable-memory property
 557		 */
 558		rngs = dt_mem_next_cell(dt_root_size_cells, usm);
 559		if (!rngs) /* there are no (base, size) duple */
 560			return 0;
 561	}
 562
 563	do {
 564		if (is_kexec_kdump) {
 565			base = dt_mem_next_cell(dt_root_addr_cells, usm);
 566			size = dt_mem_next_cell(dt_root_size_cells, usm);
 567		}
 568
 569		if (iommu_is_off) {
 570			if (base >= 0x80000000ul)
 571				continue;
 572			if ((base + size) > 0x80000000ul)
 573				size = 0x80000000ul - base;
 574		}
 575
 576		if (!validate_mem_limit(base, &size))
 577			continue;
 578
 579		DBG("Adding: %llx -> %llx\n", base, size);
 580		memblock_add(base, size);
 581
 582		if (lmb->flags & DRCONF_MEM_HOTREMOVABLE)
 583			memblock_mark_hotplug(base, size);
 584	} while (--rngs);
 585
 586	return 0;
 587}
 588#endif /* CONFIG_PPC_PSERIES */
 589
 590static int __init early_init_dt_scan_memory_ppc(void)
 591{
 592#ifdef CONFIG_PPC_PSERIES
 593	const void *fdt = initial_boot_params;
 594	int node = fdt_path_offset(fdt, "/ibm,dynamic-reconfiguration-memory");
 595
 596	if (node > 0)
 597		walk_drmem_lmbs_early(node, NULL, early_init_drmem_lmb);
 598
 599#endif
 600
 601	return early_init_dt_scan_memory();
 602}
 603
 604/*
 605 * For a relocatable kernel, we need to get the memstart_addr first,
 606 * then use it to calculate the virtual kernel start address. This has
 607 * to happen at a very early stage (before machine_init). In this case,
 608 * we just want to get the memstart_address and would not like to mess the
 609 * memblock at this stage. So introduce a variable to skip the memblock_add()
 610 * for this reason.
 611 */
 612#ifdef CONFIG_RELOCATABLE
 613static int add_mem_to_memblock = 1;
 614#else
 615#define add_mem_to_memblock 1
 616#endif
 617
 618void __init early_init_dt_add_memory_arch(u64 base, u64 size)
 619{
 620#ifdef CONFIG_PPC64
 621	if (iommu_is_off) {
 622		if (base >= 0x80000000ul)
 623			return;
 624		if ((base + size) > 0x80000000ul)
 625			size = 0x80000000ul - base;
 626	}
 627#endif
 628	/* Keep track of the beginning of memory -and- the size of
 629	 * the very first block in the device-tree as it represents
 630	 * the RMA on ppc64 server
 631	 */
 632	if (base < memstart_addr) {
 633		memstart_addr = base;
 634		first_memblock_size = size;
 635	}
 636
 637	/* Add the chunk to the MEMBLOCK list */
 638	if (add_mem_to_memblock) {
 639		if (validate_mem_limit(base, &size))
 640			memblock_add(base, size);
 641	}
 642}
 643
 644static void __init early_reserve_mem_dt(void)
 645{
 646	unsigned long i, dt_root;
 647	int len;
 648	const __be32 *prop;
 649
 650	early_init_fdt_reserve_self();
 651	early_init_fdt_scan_reserved_mem();
 652
 653	dt_root = of_get_flat_dt_root();
 654
 655	prop = of_get_flat_dt_prop(dt_root, "reserved-ranges", &len);
 656
 657	if (!prop)
 658		return;
 659
 660	DBG("Found new-style reserved-ranges\n");
 661
 662	/* Each reserved range is an (address,size) pair, 2 cells each,
 663	 * totalling 4 cells per range. */
 664	for (i = 0; i < len / (sizeof(*prop) * 4); i++) {
 665		u64 base, size;
 666
 667		base = of_read_number(prop + (i * 4) + 0, 2);
 668		size = of_read_number(prop + (i * 4) + 2, 2);
 669
 670		if (size) {
 671			DBG("reserving: %llx -> %llx\n", base, size);
 672			memblock_reserve(base, size);
 673		}
 674	}
 675}
 676
 677static void __init early_reserve_mem(void)
 678{
 679	__be64 *reserve_map;
 680
 681	reserve_map = (__be64 *)(((unsigned long)initial_boot_params) +
 682			fdt_off_mem_rsvmap(initial_boot_params));
 683
 684	/* Look for the new "reserved-regions" property in the DT */
 685	early_reserve_mem_dt();
 686
 687#ifdef CONFIG_BLK_DEV_INITRD
 688	/* Then reserve the initrd, if any */
 689	if (initrd_start && (initrd_end > initrd_start)) {
 690		memblock_reserve(ALIGN_DOWN(__pa(initrd_start), PAGE_SIZE),
 691			ALIGN(initrd_end, PAGE_SIZE) -
 692			ALIGN_DOWN(initrd_start, PAGE_SIZE));
 693	}
 694#endif /* CONFIG_BLK_DEV_INITRD */
 695
 696	if (!IS_ENABLED(CONFIG_PPC32))
 697		return;
 698
 699	/* 
 700	 * Handle the case where we might be booting from an old kexec
 701	 * image that setup the mem_rsvmap as pairs of 32-bit values
 702	 */
 703	if (be64_to_cpup(reserve_map) > 0xffffffffull) {
 704		u32 base_32, size_32;
 705		__be32 *reserve_map_32 = (__be32 *)reserve_map;
 706
 707		DBG("Found old 32-bit reserve map\n");
 708
 709		while (1) {
 710			base_32 = be32_to_cpup(reserve_map_32++);
 711			size_32 = be32_to_cpup(reserve_map_32++);
 712			if (size_32 == 0)
 713				break;
 714			DBG("reserving: %x -> %x\n", base_32, size_32);
 715			memblock_reserve(base_32, size_32);
 716		}
 717		return;
 718	}
 719}
 720
 721#ifdef CONFIG_PPC_TRANSACTIONAL_MEM
 722static bool tm_disabled __initdata;
 723
 724static int __init parse_ppc_tm(char *str)
 725{
 726	bool res;
 727
 728	if (kstrtobool(str, &res))
 729		return -EINVAL;
 730
 731	tm_disabled = !res;
 732
 733	return 0;
 734}
 735early_param("ppc_tm", parse_ppc_tm);
 736
 737static void __init tm_init(void)
 738{
 739	if (tm_disabled) {
 740		pr_info("Disabling hardware transactional memory (HTM)\n");
 741		cur_cpu_spec->cpu_user_features2 &=
 742			~(PPC_FEATURE2_HTM_NOSC | PPC_FEATURE2_HTM);
 743		cur_cpu_spec->cpu_features &= ~CPU_FTR_TM;
 744		return;
 745	}
 746
 747	pnv_tm_init();
 748}
 749#else
 750static void tm_init(void) { }
 751#endif /* CONFIG_PPC_TRANSACTIONAL_MEM */
 752
 753static int __init
 754early_init_dt_scan_model(unsigned long node, const char *uname,
 755			 int depth, void *data)
 756{
 757	const char *prop;
 758
 759	if (depth != 0)
 760		return 0;
 761
 762	prop = of_get_flat_dt_prop(node, "model", NULL);
 763	if (prop)
 764		seq_buf_printf(&ppc_hw_desc, "%s ", prop);
 765
 766	/* break now */
 767	return 1;
 768}
 769
 770#ifdef CONFIG_PPC64
 771static void __init save_fscr_to_task(void)
 772{
 773	/*
 774	 * Ensure the init_task (pid 0, aka swapper) uses the value of FSCR we
 775	 * have configured via the device tree features or via __init_FSCR().
 776	 * That value will then be propagated to pid 1 (init) and all future
 777	 * processes.
 778	 */
 779	if (early_cpu_has_feature(CPU_FTR_ARCH_207S))
 780		init_task.thread.fscr = mfspr(SPRN_FSCR);
 781}
 782#else
 783static inline void save_fscr_to_task(void) {}
 784#endif
 785
 786
 787void __init early_init_devtree(void *params)
 788{
 789	phys_addr_t int_vector_size;
 790
 791	DBG(" -> early_init_devtree(%px)\n", params);
 792
 793	/* Too early to BUG_ON(), do it by hand */
 794	if (!early_init_dt_verify(params, __pa(params)))
 795		panic("BUG: Failed verifying flat device tree, bad version?");
 796
 797	of_scan_flat_dt(early_init_dt_scan_model, NULL);
 798
 799#ifdef CONFIG_PPC_RTAS
 800	/* Some machines might need RTAS info for debugging, grab it now. */
 801	of_scan_flat_dt(early_init_dt_scan_rtas, NULL);
 802#endif
 803
 804#ifdef CONFIG_PPC_POWERNV
 805	/* Some machines might need OPAL info for debugging, grab it now. */
 806	of_scan_flat_dt(early_init_dt_scan_opal, NULL);
 807
 808	/* Scan tree for ultravisor feature */
 809	of_scan_flat_dt(early_init_dt_scan_ultravisor, NULL);
 810#endif
 811
 812#if defined(CONFIG_FA_DUMP) || defined(CONFIG_PRESERVE_FA_DUMP)
 813	/* scan tree to see if dump is active during last boot */
 814	of_scan_flat_dt(early_init_dt_scan_fw_dump, NULL);
 815#endif
 816
 817	/* Retrieve various informations from the /chosen node of the
 818	 * device-tree, including the platform type, initrd location and
 819	 * size, TCE reserve, and more ...
 820	 */
 821	of_scan_flat_dt(early_init_dt_scan_chosen_ppc, boot_command_line);
 822
 823	/* Append additional parameters passed for fadump capture kernel */
 824	fadump_append_bootargs();
 825
 826	/* Scan memory nodes and rebuild MEMBLOCKs */
 827	early_init_dt_scan_root();
 828	early_init_dt_scan_memory_ppc();
 829
 830	/*
 831	 * As generic code authors expect to be able to use static keys
 832	 * in early_param() handlers, we initialize the static keys just
 833	 * before parsing early params (it's fine to call jump_label_init()
 834	 * more than once).
 835	 */
 836	jump_label_init();
 837	parse_early_param();
 838
 839	/* make sure we've parsed cmdline for mem= before this */
 840	if (memory_limit)
 841		first_memblock_size = min_t(u64, first_memblock_size, memory_limit);
 842	setup_initial_memory_limit(memstart_addr, first_memblock_size);
 843	/* Reserve MEMBLOCK regions used by kernel, initrd, dt, etc... */
 844	memblock_reserve(PHYSICAL_START, __pa(_end) - PHYSICAL_START);
 845#ifdef CONFIG_PPC64
 846	/* If relocatable, reserve at least 32k for interrupt vectors etc. */
 847	int_vector_size = __end_interrupts - _stext;
 848	int_vector_size = max_t(phys_addr_t, SZ_32K, int_vector_size);
 849#else
 850	/* If relocatable, reserve first 32k for interrupt vectors etc. */
 851	int_vector_size = SZ_32K;
 852#endif
 853	if (PHYSICAL_START > MEMORY_START)
 854		memblock_reserve(MEMORY_START, int_vector_size);
 855	reserve_kdump_trampoline();
 856#if defined(CONFIG_FA_DUMP) || defined(CONFIG_PRESERVE_FA_DUMP)
 857	/*
 858	 * If we fail to reserve memory for firmware-assisted dump then
 859	 * fallback to kexec based kdump.
 860	 */
 861	if (fadump_reserve_mem() == 0)
 862#endif
 863		reserve_crashkernel();
 864	early_reserve_mem();
 865
 866	if (memory_limit > memblock_phys_mem_size())
 867		memory_limit = 0;
 868
 869	/* Align down to 16 MB which is large page size with hash page translation */
 870	memory_limit = ALIGN_DOWN(memory_limit ?: memblock_phys_mem_size(), SZ_16M);
 871	memblock_enforce_memory_limit(memory_limit);
 872
 873#if defined(CONFIG_PPC_BOOK3S_64) && defined(CONFIG_PPC_4K_PAGES)
 874	if (!early_radix_enabled())
 875		memblock_cap_memory_range(0, 1UL << (H_MAX_PHYSMEM_BITS));
 876#endif
 877
 878	memblock_allow_resize();
 879	memblock_dump_all();
 880
 881	DBG("Phys. mem: %llx\n", (unsigned long long)memblock_phys_mem_size());
 882
 883	/* We may need to relocate the flat tree, do it now.
 884	 * FIXME .. and the initrd too? */
 885	move_device_tree();
 886
 887	DBG("Scanning CPUs ...\n");
 888
 889	dt_cpu_ftrs_scan();
 890
 
 
 
 891	/* Retrieve CPU related informations from the flat tree
 892	 * (altivec support, boot CPU ID, ...)
 893	 */
 894	of_scan_flat_dt(early_init_dt_scan_cpus, NULL);
 895	if (boot_cpuid < 0) {
 896		printk("Failed to identify boot CPU !\n");
 897		BUG();
 898	}
 899
 900	save_fscr_to_task();
 901
 902#if defined(CONFIG_SMP) && defined(CONFIG_PPC64)
 903	/* We'll later wait for secondaries to check in; there are
 904	 * NCPUS-1 non-boot CPUs  :-)
 905	 */
 906	spinning_secondaries = boot_cpu_count - 1;
 907#endif
 908
 909	mmu_early_init_devtree();
 910
 911	/* Setup param area for passing additional parameters to fadump capture kernel. */
 912	fadump_setup_param_area();
 913
 914#ifdef CONFIG_PPC_POWERNV
 915	/* Scan and build the list of machine check recoverable ranges */
 916	of_scan_flat_dt(early_init_dt_scan_recoverable_ranges, NULL);
 917#endif
 918	epapr_paravirt_early_init();
 919
 920	/* Now try to figure out if we are running on LPAR and so on */
 921	pseries_probe_fw_features();
 922
 923	/*
 924	 * Initialize pkey features and default AMR/IAMR values
 925	 */
 926	pkey_early_init_devtree();
 927
 928#ifdef CONFIG_PPC_PS3
 929	/* Identify PS3 firmware */
 930	if (of_flat_dt_is_compatible(of_get_flat_dt_root(), "sony,ps3"))
 931		powerpc_firmware_features |= FW_FEATURE_PS3_POSSIBLE;
 932#endif
 933
 934	/* If kexec left a PLPKS password in the DT, get it and clear it */
 935	plpks_early_init_devtree();
 936
 937	tm_init();
 938
 939	DBG(" <- early_init_devtree()\n");
 940}
 941
 942#ifdef CONFIG_RELOCATABLE
 943/*
 944 * This function run before early_init_devtree, so we have to init
 945 * initial_boot_params.
 946 */
 947void __init early_get_first_memblock_info(void *params, phys_addr_t *size)
 948{
 949	/* Setup flat device-tree pointer */
 950	initial_boot_params = params;
 951
 952	/*
 953	 * Scan the memory nodes and set add_mem_to_memblock to 0 to avoid
 954	 * mess the memblock.
 955	 */
 956	add_mem_to_memblock = 0;
 957	early_init_dt_scan_root();
 958	early_init_dt_scan_memory_ppc();
 959	add_mem_to_memblock = 1;
 960
 961	if (size)
 962		*size = first_memblock_size;
 963}
 964#endif
 965
 966/*******
 967 *
 968 * New implementation of the OF "find" APIs, return a refcounted
 969 * object, call of_node_put() when done.  The device tree and list
 970 * are protected by a rw_lock.
 971 *
 972 * Note that property management will need some locking as well,
 973 * this isn't dealt with yet.
 974 *
 975 *******/
 976
 977/**
 978 * of_get_ibm_chip_id - Returns the IBM "chip-id" of a device
 979 * @np: device node of the device
 980 *
 981 * This looks for a property "ibm,chip-id" in the node or any
 982 * of its parents and returns its content, or -1 if it cannot
 983 * be found.
 984 */
 985int of_get_ibm_chip_id(struct device_node *np)
 986{
 987	of_node_get(np);
 988	while (np) {
 989		u32 chip_id;
 990
 991		/*
 992		 * Skiboot may produce memory nodes that contain more than one
 993		 * cell in chip-id, we only read the first one here.
 994		 */
 995		if (!of_property_read_u32(np, "ibm,chip-id", &chip_id)) {
 996			of_node_put(np);
 997			return chip_id;
 998		}
 999
1000		np = of_get_next_parent(np);
1001	}
1002	return -1;
1003}
1004EXPORT_SYMBOL(of_get_ibm_chip_id);
1005
1006/**
1007 * cpu_to_chip_id - Return the cpus chip-id
1008 * @cpu: The logical cpu number.
1009 *
1010 * Return the value of the ibm,chip-id property corresponding to the given
1011 * logical cpu number. If the chip-id can not be found, returns -1.
1012 */
1013int cpu_to_chip_id(int cpu)
1014{
1015	struct device_node *np;
1016	int ret = -1, idx;
1017
1018	idx = cpu / threads_per_core;
1019	if (chip_id_lookup_table && chip_id_lookup_table[idx] != -1)
1020		return chip_id_lookup_table[idx];
1021
1022	np = of_get_cpu_node(cpu, NULL);
1023	if (np) {
1024		ret = of_get_ibm_chip_id(np);
1025		of_node_put(np);
1026
1027		if (chip_id_lookup_table)
1028			chip_id_lookup_table[idx] = ret;
1029	}
1030
1031	return ret;
1032}
1033EXPORT_SYMBOL(cpu_to_chip_id);
1034
1035bool arch_match_cpu_phys_id(int cpu, u64 phys_id)
1036{
1037#ifdef CONFIG_SMP
1038	/*
1039	 * Early firmware scanning must use this rather than
1040	 * get_hard_smp_processor_id because we don't have pacas allocated
1041	 * until memory topology is discovered.
1042	 */
1043	if (cpu_to_phys_id != NULL)
1044		return (int)phys_id == cpu_to_phys_id[cpu];
1045#endif
1046
1047	return (int)phys_id == get_hard_smp_processor_id(cpu);
1048}