arch/loongarch/kernel/setup.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /*
   3  * Copyright (C) 2020-2022 Loongson Technology Corporation Limited
   4  *
   5  * Derived from MIPS:
   6  * Copyright (C) 1995 Linus Torvalds
   7  * Copyright (C) 1995 Waldorf Electronics
   8  * Copyright (C) 1994, 95, 96, 97, 98, 99, 2000, 01, 02, 03  Ralf Baechle
   9  * Copyright (C) 1996 Stoned Elipot
  10  * Copyright (C) 1999 Silicon Graphics, Inc.
  11  * Copyright (C) 2000, 2001, 2002, 2007  Maciej W. Rozycki
  12  */
  13 #include <linux/init.h>
  14 #include <linux/acpi.h>
  15 #include <linux/dmi.h>
  16 #include <linux/efi.h>
  17 #include <linux/export.h>
  18 #include <linux/screen_info.h>
  19 #include <linux/memblock.h>
  20 #include <linux/initrd.h>
  21 #include <linux/ioport.h>
  22 #include <linux/kexec.h>
  23 #include <linux/crash_dump.h>
  24 #include <linux/root_dev.h>
  25 #include <linux/console.h>
  26 #include <linux/pfn.h>
  27 #include <linux/platform_device.h>
  28 #include <linux/sizes.h>
  29 #include <linux/device.h>
  30 #include <linux/dma-map-ops.h>
  31 #include <linux/libfdt.h>
  32 #include <linux/of_fdt.h>
  33 #include <linux/of_address.h>
  34 #include <linux/suspend.h>
  35 #include <linux/swiotlb.h>
  36
  37 #include <asm/addrspace.h>
  38 #include <asm/alternative.h>
  39 #include <asm/bootinfo.h>
  40 #include <asm/bugs.h>
  41 #include <asm/cache.h>
  42 #include <asm/cpu.h>
  43 #include <asm/dma.h>
  44 #include <asm/efi.h>
  45 #include <asm/loongson.h>
  46 #include <asm/numa.h>
  47 #include <asm/pgalloc.h>
  48 #include <asm/sections.h>
  49 #include <asm/setup.h>
  50 #include <asm/time.h>
  51
  52 #define SMBIOS_BIOSSIZE_OFFSET          0x09
  53 #define SMBIOS_BIOSEXTERN_OFFSET        0x13
  54 #define SMBIOS_FREQLOW_OFFSET           0x16
  55 #define SMBIOS_FREQHIGH_OFFSET          0x17
  56 #define SMBIOS_FREQLOW_MASK             0xFF
  57 #define SMBIOS_CORE_PACKAGE_OFFSET      0x23
  58 #define LOONGSON_EFI_ENABLE             (1 << 3)
  59
  60 struct screen_info screen_info __section(".data");
  61
  62 unsigned long fw_arg0, fw_arg1, fw_arg2;
  63 DEFINE_PER_CPU(unsigned long, kernelsp);
  64 struct cpuinfo_loongarch cpu_data[NR_CPUS] __read_mostly;
  65
  66 EXPORT_SYMBOL(cpu_data);
  67
  68 struct loongson_board_info b_info;
  69 static const char dmi_empty_string[] = "        ";
  70
  71 /*
  72  * Setup information
  73  *
  74  * These are initialized so they are in the .data section
  75  */
  76 char init_command_line[COMMAND_LINE_SIZE] __initdata;
  77
  78 static int num_standard_resources;
  79 static struct resource *standard_resources;
  80
  81 static struct resource code_resource = { .name = "Kernel code", };
  82 static struct resource data_resource = { .name = "Kernel data", };
  83 static struct resource bss_resource  = { .name = "Kernel bss", };
  84
  85 const char *get_system_type(void)
  86 {
  87         return "generic-loongson-machine";
  88 }
  89
  90 void __init check_bugs(void)
  91 {
  92         alternative_instructions();
  93 }
  94
  95 static const char *dmi_string_parse(const struct dmi_header *dm, u8 s)
  96 {
  97         const u8 *bp = ((u8 *) dm) + dm->length;
  98
  99         if (s) {
 100                 s--;
 101                 while (s > 0 && *bp) {
 102                         bp += strlen(bp) + 1;
 103                         s--;
 104                 }
 105
 106                 if (*bp != 0) {
 107                         size_t len = strlen(bp)+1;
 108                         size_t cmp_len = len > 8 ? 8 : len;
 109
 110                         if (!memcmp(bp, dmi_empty_string, cmp_len))
 111                                 return dmi_empty_string;
 112
 113                         return bp;
 114                 }
 115         }
 116
 117         return "";
 118 }
 119
 120 static void __init parse_cpu_table(const struct dmi_header *dm)
 121 {
 122         long freq_temp = 0;
 123         char *dmi_data = (char *)dm;
 124
 125         freq_temp = ((*(dmi_data + SMBIOS_FREQHIGH_OFFSET) << 8) +
 126                         ((*(dmi_data + SMBIOS_FREQLOW_OFFSET)) & SMBIOS_FREQLOW_MASK));
 127         cpu_clock_freq = freq_temp * 1000000;
 128
 129         loongson_sysconf.cpuname = (void *)dmi_string_parse(dm, dmi_data[16]);
 130         loongson_sysconf.cores_per_package = *(dmi_data + SMBIOS_CORE_PACKAGE_OFFSET);
 131
 132         pr_info("CpuClock = %llu\n", cpu_clock_freq);
 133 }
 134
 135 static void __init parse_bios_table(const struct dmi_header *dm)
 136 {
 137         char *dmi_data = (char *)dm;
 138
 139         b_info.bios_size = (*(dmi_data + SMBIOS_BIOSSIZE_OFFSET) + 1) << 6;
 140 }
 141
 142 static void __init find_tokens(const struct dmi_header *dm, void *dummy)
 143 {
 144         switch (dm->type) {
 145         case 0x0: /* Extern BIOS */
 146                 parse_bios_table(dm);
 147                 break;
 148         case 0x4: /* Calling interface */
 149                 parse_cpu_table(dm);
 150                 break;
 151         }
 152 }
 153 static void __init smbios_parse(void)
 154 {
 155         b_info.bios_vendor = (void *)dmi_get_system_info(DMI_BIOS_VENDOR);
 156         b_info.bios_version = (void *)dmi_get_system_info(DMI_BIOS_VERSION);
 157         b_info.bios_release_date = (void *)dmi_get_system_info(DMI_BIOS_DATE);
 158         b_info.board_vendor = (void *)dmi_get_system_info(DMI_BOARD_VENDOR);
 159         b_info.board_name = (void *)dmi_get_system_info(DMI_BOARD_NAME);
 160         dmi_walk(find_tokens, NULL);
 161 }
 162
 163 static int usermem __initdata;
 164
 165 static int __init early_parse_mem(char *p)
 166 {
 167         phys_addr_t start, size;
 168
 169         if (!p) {
 170                 pr_err("mem parameter is empty, do nothing\n");
 171                 return -EINVAL;
 172         }
 173
 174         /*
 175          * If a user specifies memory size, we
 176          * blow away any automatically generated
 177          * size.
 178          */
 179         if (usermem == 0) {
 180                 usermem = 1;
 181                 memblock_remove(memblock_start_of_DRAM(),
 182                         memblock_end_of_DRAM() - memblock_start_of_DRAM());
 183         }
 184         start = 0;
 185         size = memparse(p, &p);
 186         if (*p == '@')
 187                 start = memparse(p + 1, &p);
 188         else {
 189                 pr_err("Invalid format!\n");
 190                 return -EINVAL;
 191         }
 192
 193         if (!IS_ENABLED(CONFIG_NUMA))
 194                 memblock_add(start, size);
 195         else
 196                 memblock_add_node(start, size, pa_to_nid(start), MEMBLOCK_NONE);
 197
 198         return 0;
 199 }
 200 early_param("mem", early_parse_mem);
 201
 202 static void __init arch_reserve_vmcore(void)
 203 {
 204 #ifdef CONFIG_PROC_VMCORE
 205         u64 i;
 206         phys_addr_t start, end;
 207
 208         if (!is_kdump_kernel())
 209                 return;
 210
 211         if (!elfcorehdr_size) {
 212                 for_each_mem_range(i, &start, &end) {
 213                         if (elfcorehdr_addr >= start && elfcorehdr_addr < end) {
 214                                 /*
 215                                  * Reserve from the elf core header to the end of
 216                                  * the memory segment, that should all be kdump
 217                                  * reserved memory.
 218                                  */
 219                                 elfcorehdr_size = end - elfcorehdr_addr;
 220                                 break;
 221                         }
 222                 }
 223         }
 224
 225         if (memblock_is_region_reserved(elfcorehdr_addr, elfcorehdr_size)) {
 226                 pr_warn("elfcorehdr is overlapped\n");
 227                 return;
 228         }
 229
 230         memblock_reserve(elfcorehdr_addr, elfcorehdr_size);
 231
 232         pr_info("Reserving %llu KiB of memory at 0x%llx for elfcorehdr\n",
 233                 elfcorehdr_size >> 10, elfcorehdr_addr);
 234 #endif
 235 }
 236
 237 /* 2MB alignment for crash kernel regions */
 238 #define CRASH_ALIGN     SZ_2M
 239 #define CRASH_ADDR_MAX  SZ_4G
 240
 241 static void __init arch_parse_crashkernel(void)
 242 {
 243 #ifdef CONFIG_KEXEC
 244         int ret;
 245         unsigned long long total_mem;
 246         unsigned long long crash_base, crash_size;
 247
 248         total_mem = memblock_phys_mem_size();
 249         ret = parse_crashkernel(boot_command_line, total_mem, &crash_size, &crash_base);
 250         if (ret < 0 || crash_size <= 0)
 251                 return;
 252
 253         if (crash_base <= 0) {
 254                 crash_base = memblock_phys_alloc_range(crash_size, CRASH_ALIGN, CRASH_ALIGN, CRASH_ADDR_MAX);
 255                 if (!crash_base) {
 256                         pr_warn("crashkernel reservation failed - No suitable area found.\n");
 257                         return;
 258                 }
 259         } else if (!memblock_phys_alloc_range(crash_size, CRASH_ALIGN, crash_base, crash_base + crash_size)) {
 260                 pr_warn("Invalid memory region reserved for crash kernel\n");
 261                 return;
 262         }
 263
 264         crashk_res.start = crash_base;
 265         crashk_res.end   = crash_base + crash_size - 1;
 266 #endif
 267 }
 268
 269 static void __init fdt_setup(void)
 270 {
 271 #ifdef CONFIG_OF_EARLY_FLATTREE
 272         void *fdt_pointer;
 273
 274         /* ACPI-based systems do not require parsing fdt */
 275         if (acpi_os_get_root_pointer())
 276                 return;
 277
 278         /* Look for a device tree configuration table entry */
 279         fdt_pointer = efi_fdt_pointer();
 280         if (!fdt_pointer || fdt_check_header(fdt_pointer))
 281                 return;
 282
 283         early_init_dt_scan(fdt_pointer);
 284         early_init_fdt_reserve_self();
 285
 286         max_low_pfn = PFN_PHYS(memblock_end_of_DRAM());
 287 #endif
 288 }
 289
 290 static void __init bootcmdline_init(char **cmdline_p)
 291 {
 292         /*
 293          * If CONFIG_CMDLINE_FORCE is enabled then initializing the command line
 294          * is trivial - we simply use the built-in command line unconditionally &
 295          * unmodified.
 296          */
 297         if (IS_ENABLED(CONFIG_CMDLINE_FORCE)) {
 298                 strscpy(boot_command_line, CONFIG_CMDLINE, COMMAND_LINE_SIZE);
 299                 goto out;
 300         }
 301
 302 #ifdef CONFIG_OF_FLATTREE
 303         /*
 304          * If CONFIG_CMDLINE_BOOTLOADER is enabled and we are in FDT-based system,
 305          * the boot_command_line will be overwritten by early_init_dt_scan_chosen().
 306          * So we need to append init_command_line (the original copy of boot_command_line)
 307          * to boot_command_line.
 308          */
 309         if (initial_boot_params) {
 310                 if (boot_command_line[0])
 311                         strlcat(boot_command_line, " ", COMMAND_LINE_SIZE);
 312
 313                 strlcat(boot_command_line, init_command_line, COMMAND_LINE_SIZE);
 314         }
 315 #endif
 316
 317 out:
 318         *cmdline_p = boot_command_line;
 319 }
 320
 321 void __init platform_init(void)
 322 {
 323         arch_reserve_vmcore();
 324         arch_parse_crashkernel();
 325
 326 #ifdef CONFIG_ACPI_TABLE_UPGRADE
 327         acpi_table_upgrade();
 328 #endif
 329 #ifdef CONFIG_ACPI
 330         acpi_gbl_use_default_register_widths = false;
 331         acpi_boot_table_init();
 332 #endif
 333         unflatten_and_copy_device_tree();
 334
 335 #ifdef CONFIG_NUMA
 336         init_numa_memory();
 337 #endif
 338         dmi_setup();
 339         smbios_parse();
 340         pr_info("The BIOS Version: %s\n", b_info.bios_version);
 341
 342         efi_runtime_init();
 343 }
 344
 345 static void __init check_kernel_sections_mem(void)
 346 {
 347         phys_addr_t start = __pa_symbol(&_text);
 348         phys_addr_t size = __pa_symbol(&_end) - start;
 349
 350         if (!memblock_is_region_memory(start, size)) {
 351                 pr_info("Kernel sections are not in the memory maps\n");
 352                 memblock_add(start, size);
 353         }
 354 }
 355
 356 /*
 357  * arch_mem_init - initialize memory management subsystem
 358  */
 359 static void __init arch_mem_init(char **cmdline_p)
 360 {
 361         if (usermem)
 362                 pr_info("User-defined physical RAM map overwrite\n");
 363
 364         check_kernel_sections_mem();
 365
 366         early_init_fdt_scan_reserved_mem();
 367
 368         /*
 369          * In order to reduce the possibility of kernel panic when failed to
 370          * get IO TLB memory under CONFIG_SWIOTLB, it is better to allocate
 371          * low memory as small as possible before plat_swiotlb_setup(), so
 372          * make sparse_init() using top-down allocation.
 373          */
 374         memblock_set_bottom_up(false);
 375         sparse_init();
 376         memblock_set_bottom_up(true);
 377
 378         swiotlb_init(true, SWIOTLB_VERBOSE);
 379
 380         dma_contiguous_reserve(PFN_PHYS(max_low_pfn));
 381
 382         /* Reserve for hibernation. */
 383         register_nosave_region(PFN_DOWN(__pa_symbol(&__nosave_begin)),
 384                                    PFN_UP(__pa_symbol(&__nosave_end)));
 385
 386         memblock_dump_all();
 387
 388         early_memtest(PFN_PHYS(ARCH_PFN_OFFSET), PFN_PHYS(max_low_pfn));
 389 }
 390
 391 static void __init resource_init(void)
 392 {
 393         long i = 0;
 394         size_t res_size;
 395         struct resource *res;
 396         struct memblock_region *region;
 397
 398         code_resource.start = __pa_symbol(&_text);
 399         code_resource.end = __pa_symbol(&_etext) - 1;
 400         data_resource.start = __pa_symbol(&_etext);
 401         data_resource.end = __pa_symbol(&_edata) - 1;
 402         bss_resource.start = __pa_symbol(&__bss_start);
 403         bss_resource.end = __pa_symbol(&__bss_stop) - 1;
 404
 405         num_standard_resources = memblock.memory.cnt;
 406         res_size = num_standard_resources * sizeof(*standard_resources);
 407         standard_resources = memblock_alloc(res_size, SMP_CACHE_BYTES);
 408
 409         for_each_mem_region(region) {
 410                 res = &standard_resources[i++];
 411                 if (!memblock_is_nomap(region)) {
 412                         res->name  = "System RAM";
 413                         res->flags = IORESOURCE_SYSTEM_RAM | IORESOURCE_BUSY;
 414                         res->start = __pfn_to_phys(memblock_region_memory_base_pfn(region));
 415                         res->end = __pfn_to_phys(memblock_region_memory_end_pfn(region)) - 1;
 416                 } else {
 417                         res->name  = "Reserved";
 418                         res->flags = IORESOURCE_MEM;
 419                         res->start = __pfn_to_phys(memblock_region_reserved_base_pfn(region));
 420                         res->end = __pfn_to_phys(memblock_region_reserved_end_pfn(region)) - 1;
 421                 }
 422
 423                 request_resource(&iomem_resource, res);
 424
 425                 /*
 426                  *  We don't know which RAM region contains kernel data,
 427                  *  so we try it repeatedly and let the resource manager
 428                  *  test it.
 429                  */
 430                 request_resource(res, &code_resource);
 431                 request_resource(res, &data_resource);
 432                 request_resource(res, &bss_resource);
 433         }
 434
 435 #ifdef CONFIG_KEXEC
 436         if (crashk_res.start < crashk_res.end) {
 437                 insert_resource(&iomem_resource, &crashk_res);
 438                 pr_info("Reserving %ldMB of memory at %ldMB for crashkernel\n",
 439                         (unsigned long)((crashk_res.end - crashk_res.start + 1) >> 20),
 440                         (unsigned long)(crashk_res.start  >> 20));
 441         }
 442 #endif
 443 }
 444
 445 static int __init add_legacy_isa_io(struct fwnode_handle *fwnode,
 446                                 resource_size_t hw_start, resource_size_t size)
 447 {
 448         int ret = 0;
 449         unsigned long vaddr;
 450         struct logic_pio_hwaddr *range;
 451
 452         range = kzalloc(sizeof(*range), GFP_ATOMIC);
 453         if (!range)
 454                 return -ENOMEM;
 455
 456         range->fwnode = fwnode;
 457         range->size = size = round_up(size, PAGE_SIZE);
 458         range->hw_start = hw_start;
 459         range->flags = LOGIC_PIO_CPU_MMIO;
 460
 461         ret = logic_pio_register_range(range);
 462         if (ret) {
 463                 kfree(range);
 464                 return ret;
 465         }
 466
 467         /* Legacy ISA must placed at the start of PCI_IOBASE */
 468         if (range->io_start != 0) {
 469                 logic_pio_unregister_range(range);
 470                 kfree(range);
 471                 return -EINVAL;
 472         }
 473
 474         vaddr = (unsigned long)(PCI_IOBASE + range->io_start);
 475         ioremap_page_range(vaddr, vaddr + size, hw_start, pgprot_device(PAGE_KERNEL));
 476
 477         return 0;
 478 }
 479
 480 static __init int arch_reserve_pio_range(void)
 481 {
 482         struct device_node *np;
 483
 484         for_each_node_by_name(np, "isa") {
 485                 struct of_range range;
 486                 struct of_range_parser parser;
 487
 488                 pr_info("ISA Bridge: %pOF\n", np);
 489
 490                 if (of_range_parser_init(&parser, np)) {
 491                         pr_info("Failed to parse resources.\n");
 492                         of_node_put(np);
 493                         break;
 494                 }
 495
 496                 for_each_of_range(&parser, &range) {
 497                         switch (range.flags & IORESOURCE_TYPE_BITS) {
 498                         case IORESOURCE_IO:
 499                                 pr_info(" IO 0x%016llx..0x%016llx  ->  0x%016llx\n",
 500                                         range.cpu_addr,
 501                                         range.cpu_addr + range.size - 1,
 502                                         range.bus_addr);
 503                                 if (add_legacy_isa_io(&np->fwnode, range.cpu_addr, range.size))
 504                                         pr_warn("Failed to reserve legacy IO in Logic PIO\n");
 505                                 break;
 506                         case IORESOURCE_MEM:
 507                                 pr_info(" MEM 0x%016llx..0x%016llx  ->  0x%016llx\n",
 508                                         range.cpu_addr,
 509                                         range.cpu_addr + range.size - 1,
 510                                         range.bus_addr);
 511                                 break;
 512                         }
 513                 }
 514         }
 515
 516         return 0;
 517 }
 518 arch_initcall(arch_reserve_pio_range);
 519
 520 static int __init reserve_memblock_reserved_regions(void)
 521 {
 522         u64 i, j;
 523
 524         for (i = 0; i < num_standard_resources; ++i) {
 525                 struct resource *mem = &standard_resources[i];
 526                 phys_addr_t r_start, r_end, mem_size = resource_size(mem);
 527
 528                 if (!memblock_is_region_reserved(mem->start, mem_size))
 529                         continue;
 530
 531                 for_each_reserved_mem_range(j, &r_start, &r_end) {
 532                         resource_size_t start, end;
 533
 534                         start = max(PFN_PHYS(PFN_DOWN(r_start)), mem->start);
 535                         end = min(PFN_PHYS(PFN_UP(r_end)) - 1, mem->end);
 536
 537                         if (start > mem->end || end < mem->start)
 538                                 continue;
 539
 540                         reserve_region_with_split(mem, start, end, "Reserved");
 541                 }
 542         }
 543
 544         return 0;
 545 }
 546 arch_initcall(reserve_memblock_reserved_regions);
 547
 548 #ifdef CONFIG_SMP
 549 static void __init prefill_possible_map(void)
 550 {
 551         int i, possible;
 552
 553         possible = num_processors + disabled_cpus;
 554         if (possible > nr_cpu_ids)
 555                 possible = nr_cpu_ids;
 556
 557         pr_info("SMP: Allowing %d CPUs, %d hotplug CPUs\n",
 558                         possible, max((possible - num_processors), 0));
 559
 560         for (i = 0; i < possible; i++)
 561                 set_cpu_possible(i, true);
 562         for (; i < NR_CPUS; i++)
 563                 set_cpu_possible(i, false);
 564
 565         set_nr_cpu_ids(possible);
 566 }
 567 #endif
 568
 569 void __init setup_arch(char **cmdline_p)
 570 {
 571         cpu_probe();
 572
 573         init_environ();
 574         efi_init();
 575         fdt_setup();
 576         memblock_init();
 577         pagetable_init();
 578         bootcmdline_init(cmdline_p);
 579         parse_early_param();
 580         reserve_initrd_mem();
 581
 582         platform_init();
 583         arch_mem_init(cmdline_p);
 584
 585         resource_init();
 586 #ifdef CONFIG_SMP
 587         plat_smp_setup();
 588         prefill_possible_map();
 589 #endif
 590
 591         paging_init();
 592 }