arch/parisc/kernel/setup.c

   1 // SPDX-License-Identifier: GPL-2.0-or-later
   2 /*
   3  *    Initial setup-routines for HP 9000 based hardware.
   4  *
   5  *    Copyright (C) 1991, 1992, 1995  Linus Torvalds
   6  *    Modifications for PA-RISC (C) 1999 Helge Deller <deller@gmx.de>
   7  *    Modifications copyright 1999 SuSE GmbH (Philipp Rumpf)
   8  *    Modifications copyright 2000 Martin K. Petersen <mkp@mkp.net>
   9  *    Modifications copyright 2000 Philipp Rumpf <prumpf@tux.org>
  10  *    Modifications copyright 2001 Ryan Bradetich <rbradetich@uswest.net>
  11  *
  12  *    Initial PA-RISC Version: 04-23-1999 by Helge Deller
  13  */
  14
  15 #include <linux/kernel.h>
  16 #include <linux/initrd.h>
  17 #include <linux/init.h>
  18 #include <linux/console.h>
  19 #include <linux/seq_file.h>
  20 #define PCI_DEBUG
  21 #include <linux/pci.h>
  22 #undef PCI_DEBUG
  23 #include <linux/proc_fs.h>
  24 #include <linux/export.h>
  25 #include <linux/sched.h>
  26 #include <linux/sched/clock.h>
  27 #include <linux/start_kernel.h>
  28
  29 #include <asm/cacheflush.h>
  30 #include <asm/processor.h>
  31 #include <asm/sections.h>
  32 #include <asm/pdc.h>
  33 #include <asm/led.h>
  34 #include <asm/machdep.h>        /* for pa7300lc_init() proto */
  35 #include <asm/pdc_chassis.h>
  36 #include <asm/io.h>
  37 #include <asm/setup.h>
  38 #include <asm/unwind.h>
  39 #include <asm/smp.h>
  40
  41 static char __initdata command_line[COMMAND_LINE_SIZE];
  42
  43 static void __init setup_cmdline(char **cmdline_p)
  44 {
  45         extern unsigned int boot_args[];
  46         char *p;
  47
  48         *cmdline_p = command_line;
  49
  50         /* boot_args[0] is free-mem start, boot_args[1] is ptr to command line */
  51         if (boot_args[0] < 64)
  52                 return; /* return if called from hpux boot loader */
  53
  54         /* Collect stuff passed in from the boot loader */
  55         strscpy(boot_command_line, (char *)__va(boot_args[1]),
  56                 COMMAND_LINE_SIZE);
  57
  58         /* autodetect console type (if not done by palo yet) */
  59         p = boot_command_line;
  60         if (!str_has_prefix(p, "console=") && !strstr(p, " console=")) {
  61                 strlcat(p, " console=", COMMAND_LINE_SIZE);
  62                 if (PAGE0->mem_cons.cl_class == CL_DUPLEX)
  63                         strlcat(p, "ttyS0", COMMAND_LINE_SIZE);
  64                 else
  65                         strlcat(p, "tty0", COMMAND_LINE_SIZE);
  66         }
  67
  68         /* default to use early console */
  69         if (!strstr(p, "earlycon"))
  70                 strlcat(p, " earlycon=pdc", COMMAND_LINE_SIZE);
  71
  72 #ifdef CONFIG_BLK_DEV_INITRD
  73         /* did palo pass us a ramdisk? */
  74         if (boot_args[2] != 0) {
  75                 initrd_start = (unsigned long)__va(boot_args[2]);
  76                 initrd_end = (unsigned long)__va(boot_args[3]);
  77         }
  78 #endif
  79
  80         strscpy(command_line, boot_command_line, COMMAND_LINE_SIZE);
  81 }
  82
  83 #ifdef CONFIG_PA11
  84 static void __init dma_ops_init(void)
  85 {
  86         switch (boot_cpu_data.cpu_type) {
  87         case pcx:
  88                 /*
  89                  * We've got way too many dependencies on 1.1 semantics
  90                  * to support 1.0 boxes at this point.
  91                  */
  92                 panic(  "PA-RISC Linux currently only supports machines that conform to\n"
  93                         "the PA-RISC 1.1 or 2.0 architecture specification.\n");
  94
  95         case pcxl2:
  96                 pa7300lc_init();
  97                 break;
  98         default:
  99                 break;
 100         }
 101 }
 102 #endif
 103
 104 void __init setup_arch(char **cmdline_p)
 105 {
 106 #ifdef CONFIG_64BIT
 107         extern int parisc_narrow_firmware;
 108 #endif
 109         unwind_init();
 110
 111         init_per_cpu(smp_processor_id());       /* Set Modes & Enable FP */
 112
 113 #ifdef CONFIG_64BIT
 114         printk(KERN_INFO "The 64-bit Kernel has started...\n");
 115 #else
 116         printk(KERN_INFO "The 32-bit Kernel has started...\n");
 117 #endif
 118
 119         printk(KERN_INFO "Kernel default page size is %d KB. Huge pages ",
 120                 (int)(PAGE_SIZE / 1024));
 121 #ifdef CONFIG_HUGETLB_PAGE
 122         printk(KERN_CONT "enabled with %d MB physical and %d MB virtual size",
 123                  1 << (REAL_HPAGE_SHIFT - 20), 1 << (HPAGE_SHIFT - 20));
 124 #else
 125         printk(KERN_CONT "disabled");
 126 #endif
 127         printk(KERN_CONT ".\n");
 128
 129         /*
 130          * Check if initial kernel page mappings are sufficient.
 131          * panic early if not, else we may access kernel functions
 132          * and variables which can't be reached.
 133          */
 134         if (__pa((unsigned long) &_end) >= KERNEL_INITIAL_SIZE)
 135                 panic("KERNEL_INITIAL_ORDER too small!");
 136
 137 #ifdef CONFIG_64BIT
 138         if(parisc_narrow_firmware) {
 139                 printk(KERN_INFO "Kernel is using PDC in 32-bit mode.\n");
 140         }
 141 #endif
 142         setup_pdc();
 143         setup_cmdline(cmdline_p);
 144         collect_boot_cpu_data();
 145         do_memory_inventory();  /* probe for physical memory */
 146         parisc_cache_init();
 147         paging_init();
 148
 149 #ifdef CONFIG_CHASSIS_LCD_LED
 150         /* initialize the LCD/LED after boot_cpu_data is available ! */
 151         led_init();             /* LCD/LED initialization */
 152 #endif
 153
 154 #ifdef CONFIG_PA11
 155         dma_ops_init();
 156 #endif
 157
 158         clear_sched_clock_stable();
 159 }
 160
 161 /*
 162  * Display CPU info for all CPUs.
 163  */
 164 static void *
 165 c_start (struct seq_file *m, loff_t *pos)
 166 {
 167         /* Looks like the caller will call repeatedly until we return
 168          * 0, signaling EOF perhaps.  This could be used to sequence
 169          * through CPUs for example.  Since we print all cpu info in our
 170          * show_cpuinfo() disregarding 'pos' (which I assume is 'v' above)
 171          * we only allow for one "position".  */
 172         return ((long)*pos < 1) ? (void *)1 : NULL;
 173 }
 174
 175 static void *
 176 c_next (struct seq_file *m, void *v, loff_t *pos)
 177 {
 178         ++*pos;
 179         return c_start(m, pos);
 180 }
 181
 182 static void
 183 c_stop (struct seq_file *m, void *v)
 184 {
 185 }
 186
 187 const struct seq_operations cpuinfo_op = {
 188         .start  = c_start,
 189         .next   = c_next,
 190         .stop   = c_stop,
 191         .show   = show_cpuinfo
 192 };
 193
 194 static struct resource central_bus = {
 195         .name   = "Central Bus",
 196         .start  = F_EXTEND(0xfff80000),
 197         .end    = F_EXTEND(0xfffaffff),
 198         .flags  = IORESOURCE_MEM,
 199 };
 200
 201 static struct resource local_broadcast = {
 202         .name   = "Local Broadcast",
 203         .start  = F_EXTEND(0xfffb0000),
 204         .end    = F_EXTEND(0xfffdffff),
 205         .flags  = IORESOURCE_MEM,
 206 };
 207
 208 static struct resource global_broadcast = {
 209         .name   = "Global Broadcast",
 210         .start  = F_EXTEND(0xfffe0000),
 211         .end    = F_EXTEND(0xffffffff),
 212         .flags  = IORESOURCE_MEM,
 213 };
 214
 215 static int __init parisc_init_resources(void)
 216 {
 217         int result;
 218
 219         result = request_resource(&iomem_resource, &central_bus);
 220         if (result < 0) {
 221                 printk(KERN_ERR
 222                        "%s: failed to claim %s address space!\n",
 223                        __FILE__, central_bus.name);
 224                 return result;
 225         }
 226
 227         result = request_resource(&iomem_resource, &local_broadcast);
 228         if (result < 0) {
 229                 printk(KERN_ERR
 230                        "%s: failed to claim %s address space!\n",
 231                        __FILE__, local_broadcast.name);
 232                 return result;
 233         }
 234
 235         result = request_resource(&iomem_resource, &global_broadcast);
 236         if (result < 0) {
 237                 printk(KERN_ERR
 238                        "%s: failed to claim %s address space!\n",
 239                        __FILE__, global_broadcast.name);
 240                 return result;
 241         }
 242
 243         return 0;
 244 }
 245
 246 static int __init parisc_init(void)
 247 {
 248         u32 osid = (OS_ID_LINUX << 16);
 249
 250         parisc_init_resources();
 251         do_device_inventory();                  /* probe for hardware */
 252
 253         parisc_pdc_chassis_init();
 254
 255         /* set up a new led state on systems shipped LED State panel */
 256         pdc_chassis_send_status(PDC_CHASSIS_DIRECT_BSTART);
 257
 258         /* tell PDC we're Linux. Nevermind failure. */
 259         pdc_stable_write(0x40, &osid, sizeof(osid));
 260
 261         /* start with known state */
 262         flush_cache_all_local();
 263         flush_tlb_all_local(NULL);
 264
 265         processor_init();
 266 #ifdef CONFIG_SMP
 267         pr_info("CPU(s): %d out of %d %s at %d.%06d MHz online\n",
 268                 num_online_cpus(), num_present_cpus(),
 269 #else
 270         pr_info("CPU(s): 1 x %s at %d.%06d MHz\n",
 271 #endif
 272                         boot_cpu_data.cpu_name,
 273                         boot_cpu_data.cpu_hz / 1000000,
 274                         boot_cpu_data.cpu_hz % 1000000  );
 275
 276 #if defined(CONFIG_64BIT) && defined(CONFIG_SMP)
 277         /* Don't serialize TLB flushes if we run on one CPU only. */
 278         if (num_online_cpus() == 1)
 279                 pa_serialize_tlb_flushes = 0;
 280 #endif
 281
 282         apply_alternatives_all();
 283         parisc_setup_cache_timing();
 284
 285         /* These are in a non-obvious order, will fix when we have an iotree */
 286 #if defined(CONFIG_IOSAPIC)
 287         iosapic_init();
 288 #endif
 289 #if defined(CONFIG_IOMMU_SBA)
 290         sba_init();
 291 #endif
 292 #if defined(CONFIG_PCI_LBA)
 293         lba_init();
 294 #endif
 295
 296         /* CCIO before any potential subdevices */
 297 #if defined(CONFIG_IOMMU_CCIO)
 298         ccio_init();
 299 #endif
 300
 301         /*
 302          * Need to register Asp & Wax before the EISA adapters for the IRQ
 303          * regions.  EISA must come before PCI to be sure it gets IRQ region
 304          * 0.
 305          */
 306 #if defined(CONFIG_GSC_LASI) || defined(CONFIG_GSC_WAX)
 307         gsc_init();
 308 #endif
 309 #ifdef CONFIG_EISA
 310         parisc_eisa_init();
 311 #endif
 312
 313 #if defined(CONFIG_HPPB)
 314         hppb_init();
 315 #endif
 316
 317 #if defined(CONFIG_GSC_DINO)
 318         dino_init();
 319 #endif
 320
 321 #ifdef CONFIG_CHASSIS_LCD_LED
 322         register_led_regions(); /* register LED port info in procfs */
 323 #endif
 324
 325         return 0;
 326 }
 327 arch_initcall(parisc_init);
 328
 329 void __init start_parisc(void)
 330 {
 331         int ret, cpunum;
 332         struct pdc_coproc_cfg coproc_cfg;
 333
 334         /* check QEMU/SeaBIOS marker in PAGE0 */
 335         running_on_qemu = (memcmp(&PAGE0->pad0, "SeaBIOS", 8) == 0);
 336
 337         cpunum = smp_processor_id();
 338
 339         init_cpu_topology();
 340
 341         set_firmware_width_unlocked();
 342
 343         ret = pdc_coproc_cfg_unlocked(&coproc_cfg);
 344         if (ret >= 0 && coproc_cfg.ccr_functional) {
 345                 mtctl(coproc_cfg.ccr_functional, 10);
 346
 347                 per_cpu(cpu_data, cpunum).fp_rev = coproc_cfg.revision;
 348                 per_cpu(cpu_data, cpunum).fp_model = coproc_cfg.model;
 349
 350                 asm volatile ("fstd     %fr0,8(%sp)");
 351         } else {
 352                 panic("must have an fpu to boot linux");
 353         }
 354
 355         early_trap_init(); /* initialize checksum of fault_vector */
 356
 357         start_kernel();
 358         // not reached
 359 }