1 // SPDX-License-Identifier: GPL-2.0-or-later 2 /* 3 * Powermac setup and early boot code plus other random bits. 4 * 5 * PowerPC version 6 * Copyright (C) 1995-1996 Gary Thomas (gdt@linuxppc.org) 7 * 8 * Adapted for Power Macintosh by Paul Mackerras 9 * Copyright (C) 1996 Paul Mackerras (paulus@samba.org) 10 * 11 * Derived from "arch/alpha/kernel/setup.c" 12 * Copyright (C) 1995 Linus Torvalds 13 * 14 * Maintained by Benjamin Herrenschmidt (benh@kernel.crashing.org) 15 */ 16 17 /* 18 * bootup setup stuff.. 19 */ 20 21 #include <linux/init.h> 22 #include <linux/errno.h> 23 #include <linux/sched.h> 24 #include <linux/kernel.h> 25 #include <linux/mm.h> 26 #include <linux/stddef.h> 27 #include <linux/unistd.h> 28 #include <linux/ptrace.h> 29 #include <linux/export.h> 30 #include <linux/user.h> 31 #include <linux/tty.h> 32 #include <linux/string.h> 33 #include <linux/delay.h> 34 #include <linux/ioport.h> 35 #include <linux/major.h> 36 #include <linux/initrd.h> 37 #include <linux/vt_kern.h> 38 #include <linux/console.h> 39 #include <linux/pci.h> 40 #include <linux/adb.h> 41 #include <linux/cuda.h> 42 #include <linux/pmu.h> 43 #include <linux/irq.h> 44 #include <linux/seq_file.h> 45 #include <linux/root_dev.h> 46 #include <linux/bitops.h> 47 #include <linux/suspend.h> 48 #include <linux/of_device.h> 49 #include <linux/of_platform.h> 50 51 #include <asm/reg.h> 52 #include <asm/sections.h> 53 #include <asm/io.h> 54 #include <asm/pci-bridge.h> 55 #include <asm/ohare.h> 56 #include <asm/mediabay.h> 57 #include <asm/machdep.h> 58 #include <asm/dma.h> 59 #include <asm/cputable.h> 60 #include <asm/btext.h> 61 #include <asm/pmac_feature.h> 62 #include <asm/time.h> 63 #include <asm/mmu_context.h> 64 #include <asm/iommu.h> 65 #include <asm/smu.h> 66 #include <asm/pmc.h> 67 #include <asm/udbg.h> 68 69 #include "pmac.h" 70 71 #undef SHOW_GATWICK_IRQS 72 73 int ppc_override_l2cr = 0; 74 int ppc_override_l2cr_value; 75 int has_l2cache = 0; 76 77 int pmac_newworld; 78 79 static int current_root_goodness = -1; 80 81 #define DEFAULT_ROOT_DEVICE Root_SDA1 /* sda1 - slightly silly choice */ 82 83 sys_ctrler_t sys_ctrler = SYS_CTRLER_UNKNOWN; 84 EXPORT_SYMBOL(sys_ctrler); 85 86 static void pmac_show_cpuinfo(struct seq_file *m) 87 { 88 struct device_node *np; 89 const char *pp; 90 int plen; 91 int mbmodel; 92 unsigned int mbflags; 93 char* mbname; 94 95 mbmodel = pmac_call_feature(PMAC_FTR_GET_MB_INFO, NULL, 96 PMAC_MB_INFO_MODEL, 0); 97 mbflags = pmac_call_feature(PMAC_FTR_GET_MB_INFO, NULL, 98 PMAC_MB_INFO_FLAGS, 0); 99 if (pmac_call_feature(PMAC_FTR_GET_MB_INFO, NULL, PMAC_MB_INFO_NAME, 100 (long) &mbname) != 0) 101 mbname = "Unknown"; 102 103 /* find motherboard type */ 104 seq_printf(m, "machine\t\t: "); 105 np = of_find_node_by_path("/"); 106 if (np != NULL) { 107 pp = of_get_property(np, "model", NULL); 108 if (pp != NULL) 109 seq_printf(m, "%s\n", pp); 110 else 111 seq_printf(m, "PowerMac\n"); 112 pp = of_get_property(np, "compatible", &plen); 113 if (pp != NULL) { 114 seq_printf(m, "motherboard\t:"); 115 while (plen > 0) { 116 int l = strlen(pp) + 1; 117 seq_printf(m, " %s", pp); 118 plen -= l; 119 pp += l; 120 } 121 seq_printf(m, "\n"); 122 } 123 of_node_put(np); 124 } else 125 seq_printf(m, "PowerMac\n"); 126 127 /* print parsed model */ 128 seq_printf(m, "detected as\t: %d (%s)\n", mbmodel, mbname); 129 seq_printf(m, "pmac flags\t: %08x\n", mbflags); 130 131 /* find l2 cache info */ 132 np = of_find_node_by_name(NULL, "l2-cache"); 133 if (np == NULL) 134 np = of_find_node_by_type(NULL, "cache"); 135 if (np != NULL) { 136 const unsigned int *ic = 137 of_get_property(np, "i-cache-size", NULL); 138 const unsigned int *dc = 139 of_get_property(np, "d-cache-size", NULL); 140 seq_printf(m, "L2 cache\t:"); 141 has_l2cache = 1; 142 if (of_get_property(np, "cache-unified", NULL) && dc) { 143 seq_printf(m, " %dK unified", *dc / 1024); 144 } else { 145 if (ic) 146 seq_printf(m, " %dK instruction", *ic / 1024); 147 if (dc) 148 seq_printf(m, "%s %dK data", 149 (ic? " +": ""), *dc / 1024); 150 } 151 pp = of_get_property(np, "ram-type", NULL); 152 if (pp) 153 seq_printf(m, " %s", pp); 154 seq_printf(m, "\n"); 155 of_node_put(np); 156 } 157 158 /* Indicate newworld/oldworld */ 159 seq_printf(m, "pmac-generation\t: %s\n", 160 pmac_newworld ? "NewWorld" : "OldWorld"); 161 } 162 163 #ifndef CONFIG_ADB_CUDA 164 int __init find_via_cuda(void) 165 { 166 struct device_node *dn = of_find_node_by_name(NULL, "via-cuda"); 167 168 if (!dn) 169 return 0; 170 of_node_put(dn); 171 printk("WARNING ! Your machine is CUDA-based but your kernel\n"); 172 printk(" wasn't compiled with CONFIG_ADB_CUDA option !\n"); 173 return 0; 174 } 175 #endif 176 177 #ifndef CONFIG_ADB_PMU 178 int __init find_via_pmu(void) 179 { 180 struct device_node *dn = of_find_node_by_name(NULL, "via-pmu"); 181 182 if (!dn) 183 return 0; 184 of_node_put(dn); 185 printk("WARNING ! Your machine is PMU-based but your kernel\n"); 186 printk(" wasn't compiled with CONFIG_ADB_PMU option !\n"); 187 return 0; 188 } 189 #endif 190 191 #ifndef CONFIG_PMAC_SMU 192 int __init smu_init(void) 193 { 194 /* should check and warn if SMU is present */ 195 return 0; 196 } 197 #endif 198 199 #ifdef CONFIG_PPC32 200 static volatile u32 *sysctrl_regs; 201 202 static void __init ohare_init(void) 203 { 204 struct device_node *dn; 205 206 /* this area has the CPU identification register 207 and some registers used by smp boards */ 208 sysctrl_regs = (volatile u32 *) ioremap(0xf8000000, 0x1000); 209 210 /* 211 * Turn on the L2 cache. 212 * We assume that we have a PSX memory controller iff 213 * we have an ohare I/O controller. 214 */ 215 dn = of_find_node_by_name(NULL, "ohare"); 216 if (dn) { 217 of_node_put(dn); 218 if (((sysctrl_regs[2] >> 24) & 0xf) >= 3) { 219 if (sysctrl_regs[4] & 0x10) 220 sysctrl_regs[4] |= 0x04000020; 221 else 222 sysctrl_regs[4] |= 0x04000000; 223 if(has_l2cache) 224 printk(KERN_INFO "Level 2 cache enabled\n"); 225 } 226 } 227 } 228 229 static void __init l2cr_init(void) 230 { 231 /* Checks "l2cr-value" property in the registry */ 232 if (cpu_has_feature(CPU_FTR_L2CR)) { 233 struct device_node *np; 234 235 for_each_of_cpu_node(np) { 236 const unsigned int *l2cr = 237 of_get_property(np, "l2cr-value", NULL); 238 if (l2cr) { 239 ppc_override_l2cr = 1; 240 ppc_override_l2cr_value = *l2cr; 241 _set_L2CR(0); 242 _set_L2CR(ppc_override_l2cr_value); 243 } 244 of_node_put(np); 245 break; 246 } 247 } 248 249 if (ppc_override_l2cr) 250 printk(KERN_INFO "L2CR overridden (0x%x), " 251 "backside cache is %s\n", 252 ppc_override_l2cr_value, 253 (ppc_override_l2cr_value & 0x80000000) 254 ? "enabled" : "disabled"); 255 } 256 #endif 257 258 static void __init pmac_setup_arch(void) 259 { 260 struct device_node *cpu, *ic; 261 const int *fp; 262 unsigned long pvr; 263 264 pvr = PVR_VER(mfspr(SPRN_PVR)); 265 266 /* Set loops_per_jiffy to a half-way reasonable value, 267 for use until calibrate_delay gets called. */ 268 loops_per_jiffy = 50000000 / HZ; 269 270 for_each_of_cpu_node(cpu) { 271 fp = of_get_property(cpu, "clock-frequency", NULL); 272 if (fp != NULL) { 273 if (pvr >= 0x30 && pvr < 0x80) 274 /* PPC970 etc. */ 275 loops_per_jiffy = *fp / (3 * HZ); 276 else if (pvr == 4 || pvr >= 8) 277 /* 604, G3, G4 etc. */ 278 loops_per_jiffy = *fp / HZ; 279 else 280 /* 603, etc. */ 281 loops_per_jiffy = *fp / (2 * HZ); 282 of_node_put(cpu); 283 break; 284 } 285 } 286 287 /* See if newworld or oldworld */ 288 ic = of_find_node_with_property(NULL, "interrupt-controller"); 289 if (ic) { 290 pmac_newworld = 1; 291 of_node_put(ic); 292 } 293 294 #ifdef CONFIG_PPC32 295 ohare_init(); 296 l2cr_init(); 297 #endif /* CONFIG_PPC32 */ 298 299 find_via_cuda(); 300 find_via_pmu(); 301 smu_init(); 302 303 #if IS_ENABLED(CONFIG_NVRAM) 304 pmac_nvram_init(); 305 #endif 306 #ifdef CONFIG_PPC32 307 #ifdef CONFIG_BLK_DEV_INITRD 308 if (initrd_start) 309 ROOT_DEV = Root_RAM0; 310 else 311 #endif 312 ROOT_DEV = DEFAULT_ROOT_DEVICE; 313 #endif 314 315 #ifdef CONFIG_ADB 316 if (strstr(boot_command_line, "adb_sync")) { 317 extern int __adb_probe_sync; 318 __adb_probe_sync = 1; 319 } 320 #endif /* CONFIG_ADB */ 321 } 322 323 static int initializing = 1; 324 325 static int pmac_late_init(void) 326 { 327 initializing = 0; 328 return 0; 329 } 330 machine_late_initcall(powermac, pmac_late_init); 331 332 void note_bootable_part(dev_t dev, int part, int goodness); 333 /* 334 * This is __ref because we check for "initializing" before 335 * touching any of the __init sensitive things and "initializing" 336 * will be false after __init time. This can't be __init because it 337 * can be called whenever a disk is first accessed. 338 */ 339 void __ref note_bootable_part(dev_t dev, int part, int goodness) 340 { 341 char *p; 342 343 if (!initializing) 344 return; 345 if ((goodness <= current_root_goodness) && 346 ROOT_DEV != DEFAULT_ROOT_DEVICE) 347 return; 348 p = strstr(boot_command_line, "root="); 349 if (p != NULL && (p == boot_command_line || p[-1] == ' ')) 350 return; 351 352 ROOT_DEV = dev + part; 353 current_root_goodness = goodness; 354 } 355 356 #ifdef CONFIG_ADB_CUDA 357 static void __noreturn cuda_restart(void) 358 { 359 struct adb_request req; 360 361 cuda_request(&req, NULL, 2, CUDA_PACKET, CUDA_RESET_SYSTEM); 362 for (;;) 363 cuda_poll(); 364 } 365 366 static void __noreturn cuda_shutdown(void) 367 { 368 struct adb_request req; 369 370 cuda_request(&req, NULL, 2, CUDA_PACKET, CUDA_POWERDOWN); 371 for (;;) 372 cuda_poll(); 373 } 374 375 #else 376 #define cuda_restart() 377 #define cuda_shutdown() 378 #endif 379 380 #ifndef CONFIG_ADB_PMU 381 #define pmu_restart() 382 #define pmu_shutdown() 383 #endif 384 385 #ifndef CONFIG_PMAC_SMU 386 #define smu_restart() 387 #define smu_shutdown() 388 #endif 389 390 static void __noreturn pmac_restart(char *cmd) 391 { 392 switch (sys_ctrler) { 393 case SYS_CTRLER_CUDA: 394 cuda_restart(); 395 break; 396 case SYS_CTRLER_PMU: 397 pmu_restart(); 398 break; 399 case SYS_CTRLER_SMU: 400 smu_restart(); 401 break; 402 default: ; 403 } 404 while (1) ; 405 } 406 407 static void __noreturn pmac_power_off(void) 408 { 409 switch (sys_ctrler) { 410 case SYS_CTRLER_CUDA: 411 cuda_shutdown(); 412 break; 413 case SYS_CTRLER_PMU: 414 pmu_shutdown(); 415 break; 416 case SYS_CTRLER_SMU: 417 smu_shutdown(); 418 break; 419 default: ; 420 } 421 while (1) ; 422 } 423 424 static void __noreturn 425 pmac_halt(void) 426 { 427 pmac_power_off(); 428 } 429 430 /* 431 * Early initialization. 432 */ 433 static void __init pmac_init(void) 434 { 435 /* Enable early btext debug if requested */ 436 if (strstr(boot_command_line, "btextdbg")) { 437 udbg_adb_init_early(); 438 register_early_udbg_console(); 439 } 440 441 /* Probe motherboard chipset */ 442 pmac_feature_init(); 443 444 /* Initialize debug stuff */ 445 udbg_scc_init(!!strstr(boot_command_line, "sccdbg")); 446 udbg_adb_init(!!strstr(boot_command_line, "btextdbg")); 447 448 #ifdef CONFIG_PPC64 449 iommu_init_early_dart(&pmac_pci_controller_ops); 450 #endif 451 452 /* SMP Init has to be done early as we need to patch up 453 * cpu_possible_mask before interrupt stacks are allocated 454 * or kaboom... 455 */ 456 #ifdef CONFIG_SMP 457 pmac_setup_smp(); 458 #endif 459 } 460 461 static int __init pmac_declare_of_platform_devices(void) 462 { 463 struct device_node *np; 464 465 np = of_find_node_by_name(NULL, "valkyrie"); 466 if (np) { 467 of_platform_device_create(np, "valkyrie", NULL); 468 of_node_put(np); 469 } 470 np = of_find_node_by_name(NULL, "platinum"); 471 if (np) { 472 of_platform_device_create(np, "platinum", NULL); 473 of_node_put(np); 474 } 475 np = of_find_node_by_type(NULL, "smu"); 476 if (np) { 477 of_platform_device_create(np, "smu", NULL); 478 of_node_put(np); 479 } 480 np = of_find_node_by_type(NULL, "fcu"); 481 if (np == NULL) { 482 /* Some machines have strangely broken device-tree */ 483 np = of_find_node_by_path("/u3@0,f8000000/i2c@f8001000/fan@15e"); 484 } 485 if (np) { 486 of_platform_device_create(np, "temperature", NULL); 487 of_node_put(np); 488 } 489 490 return 0; 491 } 492 machine_device_initcall(powermac, pmac_declare_of_platform_devices); 493 494 #ifdef CONFIG_SERIAL_PMACZILOG_CONSOLE 495 /* 496 * This is called very early, as part of console_init() (typically just after 497 * time_init()). This function is respondible for trying to find a good 498 * default console on serial ports. It tries to match the open firmware 499 * default output with one of the available serial console drivers. 500 */ 501 static int __init check_pmac_serial_console(void) 502 { 503 struct device_node *prom_stdout = NULL; 504 int offset = 0; 505 const char *name; 506 #ifdef CONFIG_SERIAL_PMACZILOG_TTYS 507 char *devname = "ttyS"; 508 #else 509 char *devname = "ttyPZ"; 510 #endif 511 512 pr_debug(" -> check_pmac_serial_console()\n"); 513 514 /* The user has requested a console so this is already set up. */ 515 if (strstr(boot_command_line, "console=")) { 516 pr_debug(" console was specified !\n"); 517 return -EBUSY; 518 } 519 520 if (!of_chosen) { 521 pr_debug(" of_chosen is NULL !\n"); 522 return -ENODEV; 523 } 524 525 /* We are getting a weird phandle from OF ... */ 526 /* ... So use the full path instead */ 527 name = of_get_property(of_chosen, "linux,stdout-path", NULL); 528 if (name == NULL) { 529 pr_debug(" no linux,stdout-path !\n"); 530 return -ENODEV; 531 } 532 prom_stdout = of_find_node_by_path(name); 533 if (!prom_stdout) { 534 pr_debug(" can't find stdout package %s !\n", name); 535 return -ENODEV; 536 } 537 pr_debug("stdout is %pOF\n", prom_stdout); 538 539 if (of_node_name_eq(prom_stdout, "ch-a")) 540 offset = 0; 541 else if (of_node_name_eq(prom_stdout, "ch-b")) 542 offset = 1; 543 else 544 goto not_found; 545 of_node_put(prom_stdout); 546 547 pr_debug("Found serial console at %s%d\n", devname, offset); 548 549 return add_preferred_console(devname, offset, NULL); 550 551 not_found: 552 pr_debug("No preferred console found !\n"); 553 of_node_put(prom_stdout); 554 return -ENODEV; 555 } 556 console_initcall(check_pmac_serial_console); 557 558 #endif /* CONFIG_SERIAL_PMACZILOG_CONSOLE */ 559 560 /* 561 * Called very early, MMU is off, device-tree isn't unflattened 562 */ 563 static int __init pmac_probe(void) 564 { 565 if (!of_machine_is_compatible("Power Macintosh") && 566 !of_machine_is_compatible("MacRISC")) 567 return 0; 568 569 #ifdef CONFIG_PPC32 570 /* isa_io_base gets set in pmac_pci_init */ 571 DMA_MODE_READ = 1; 572 DMA_MODE_WRITE = 2; 573 #endif /* CONFIG_PPC32 */ 574 575 pm_power_off = pmac_power_off; 576 577 pmac_init(); 578 579 return 1; 580 } 581 582 define_machine(powermac) { 583 .name = "PowerMac", 584 .probe = pmac_probe, 585 .setup_arch = pmac_setup_arch, 586 .discover_phbs = pmac_pci_init, 587 .show_cpuinfo = pmac_show_cpuinfo, 588 .init_IRQ = pmac_pic_init, 589 .get_irq = NULL, /* changed later */ 590 .pci_irq_fixup = pmac_pci_irq_fixup, 591 .restart = pmac_restart, 592 .halt = pmac_halt, 593 .time_init = pmac_time_init, 594 .get_boot_time = pmac_get_boot_time, 595 .set_rtc_time = pmac_set_rtc_time, 596 .get_rtc_time = pmac_get_rtc_time, 597 .calibrate_decr = pmac_calibrate_decr, 598 .feature_call = pmac_do_feature_call, 599 .progress = udbg_progress, 600 #ifdef CONFIG_PPC64 601 .power_save = power4_idle, 602 .enable_pmcs = power4_enable_pmcs, 603 #endif /* CONFIG_PPC64 */ 604 #ifdef CONFIG_PPC32 605 .pcibios_after_init = pmac_pcibios_after_init, 606 .phys_mem_access_prot = pci_phys_mem_access_prot, 607 #endif 608 }; 609