1 /* 2 * Initial setup-routines for HP 9000 based hardware. 3 * 4 * Copyright (C) 1991, 1992, 1995 Linus Torvalds 5 * Modifications for PA-RISC (C) 1999 Helge Deller <deller@gmx.de> 6 * Modifications copyright 1999 SuSE GmbH (Philipp Rumpf) 7 * Modifications copyright 2000 Martin K. Petersen <mkp@mkp.net> 8 * Modifications copyright 2000 Philipp Rumpf <prumpf@tux.org> 9 * Modifications copyright 2001 Ryan Bradetich <rbradetich@uswest.net> 10 * 11 * Initial PA-RISC Version: 04-23-1999 by Helge Deller 12 * 13 * This program is free software; you can redistribute it and/or modify 14 * it under the terms of the GNU General Public License as published by 15 * the Free Software Foundation; either version 2, or (at your option) 16 * any later version. 17 * 18 * This program is distributed in the hope that it will be useful, 19 * but WITHOUT ANY WARRANTY; without even the implied warranty of 20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 21 * GNU General Public License for more details. 22 * 23 * You should have received a copy of the GNU General Public License 24 * along with this program; if not, write to the Free Software 25 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 26 * 27 */ 28 29 #include <linux/kernel.h> 30 #include <linux/initrd.h> 31 #include <linux/init.h> 32 #include <linux/console.h> 33 #include <linux/seq_file.h> 34 #define PCI_DEBUG 35 #include <linux/pci.h> 36 #undef PCI_DEBUG 37 #include <linux/proc_fs.h> 38 #include <linux/export.h> 39 40 #include <asm/processor.h> 41 #include <asm/pdc.h> 42 #include <asm/led.h> 43 #include <asm/machdep.h> /* for pa7300lc_init() proto */ 44 #include <asm/pdc_chassis.h> 45 #include <asm/io.h> 46 #include <asm/setup.h> 47 #include <asm/unwind.h> 48 49 static char __initdata command_line[COMMAND_LINE_SIZE]; 50 51 /* Intended for ccio/sba/cpu statistics under /proc/bus/{runway|gsc} */ 52 struct proc_dir_entry * proc_runway_root __read_mostly = NULL; 53 struct proc_dir_entry * proc_gsc_root __read_mostly = NULL; 54 struct proc_dir_entry * proc_mckinley_root __read_mostly = NULL; 55 56 #if !defined(CONFIG_PA20) && (defined(CONFIG_IOMMU_CCIO) || defined(CONFIG_IOMMU_SBA)) 57 int parisc_bus_is_phys __read_mostly = 1; /* Assume no IOMMU is present */ 58 EXPORT_SYMBOL(parisc_bus_is_phys); 59 #endif 60 61 void __init setup_cmdline(char **cmdline_p) 62 { 63 extern unsigned int boot_args[]; 64 65 /* Collect stuff passed in from the boot loader */ 66 67 /* boot_args[0] is free-mem start, boot_args[1] is ptr to command line */ 68 if (boot_args[0] < 64) { 69 /* called from hpux boot loader */ 70 boot_command_line[0] = '\0'; 71 } else { 72 strlcpy(boot_command_line, (char *)__va(boot_args[1]), 73 COMMAND_LINE_SIZE); 74 75 #ifdef CONFIG_BLK_DEV_INITRD 76 if (boot_args[2] != 0) /* did palo pass us a ramdisk? */ 77 { 78 initrd_start = (unsigned long)__va(boot_args[2]); 79 initrd_end = (unsigned long)__va(boot_args[3]); 80 } 81 #endif 82 } 83 84 strcpy(command_line, boot_command_line); 85 *cmdline_p = command_line; 86 } 87 88 #ifdef CONFIG_PA11 89 void __init dma_ops_init(void) 90 { 91 switch (boot_cpu_data.cpu_type) { 92 case pcx: 93 /* 94 * We've got way too many dependencies on 1.1 semantics 95 * to support 1.0 boxes at this point. 96 */ 97 panic( "PA-RISC Linux currently only supports machines that conform to\n" 98 "the PA-RISC 1.1 or 2.0 architecture specification.\n"); 99 100 case pcxs: 101 case pcxt: 102 hppa_dma_ops = &pcx_dma_ops; 103 break; 104 case pcxl2: 105 pa7300lc_init(); 106 case pcxl: /* falls through */ 107 hppa_dma_ops = &pcxl_dma_ops; 108 break; 109 default: 110 break; 111 } 112 } 113 #endif 114 115 extern int init_per_cpu(int cpuid); 116 extern void collect_boot_cpu_data(void); 117 118 void __init setup_arch(char **cmdline_p) 119 { 120 #ifdef CONFIG_64BIT 121 extern int parisc_narrow_firmware; 122 #endif 123 unwind_init(); 124 125 init_per_cpu(smp_processor_id()); /* Set Modes & Enable FP */ 126 127 #ifdef CONFIG_64BIT 128 printk(KERN_INFO "The 64-bit Kernel has started...\n"); 129 #else 130 printk(KERN_INFO "The 32-bit Kernel has started...\n"); 131 #endif 132 133 printk(KERN_INFO "Default page size is %dKB.\n", (int)(PAGE_SIZE / 1024)); 134 135 pdc_console_init(); 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 #if defined(CONFIG_VT) && defined(CONFIG_DUMMY_CONSOLE) 159 conswitchp = &dummy_con; /* we use do_take_over_console() later ! */ 160 #endif 161 162 } 163 164 /* 165 * Display CPU info for all CPUs. 166 * for parisc this is in processor.c 167 */ 168 extern int show_cpuinfo (struct seq_file *m, void *v); 169 170 static void * 171 c_start (struct seq_file *m, loff_t *pos) 172 { 173 /* Looks like the caller will call repeatedly until we return 174 * 0, signaling EOF perhaps. This could be used to sequence 175 * through CPUs for example. Since we print all cpu info in our 176 * show_cpuinfo() disregarding 'pos' (which I assume is 'v' above) 177 * we only allow for one "position". */ 178 return ((long)*pos < 1) ? (void *)1 : NULL; 179 } 180 181 static void * 182 c_next (struct seq_file *m, void *v, loff_t *pos) 183 { 184 ++*pos; 185 return c_start(m, pos); 186 } 187 188 static void 189 c_stop (struct seq_file *m, void *v) 190 { 191 } 192 193 const struct seq_operations cpuinfo_op = { 194 .start = c_start, 195 .next = c_next, 196 .stop = c_stop, 197 .show = show_cpuinfo 198 }; 199 200 static void __init parisc_proc_mkdir(void) 201 { 202 /* 203 ** Can't call proc_mkdir() until after proc_root_init() has been 204 ** called by start_kernel(). In other words, this code can't 205 ** live in arch/.../setup.c because start_parisc() calls 206 ** start_kernel(). 207 */ 208 switch (boot_cpu_data.cpu_type) { 209 case pcxl: 210 case pcxl2: 211 if (NULL == proc_gsc_root) 212 { 213 proc_gsc_root = proc_mkdir("bus/gsc", NULL); 214 } 215 break; 216 case pcxt_: 217 case pcxu: 218 case pcxu_: 219 case pcxw: 220 case pcxw_: 221 case pcxw2: 222 if (NULL == proc_runway_root) 223 { 224 proc_runway_root = proc_mkdir("bus/runway", NULL); 225 } 226 break; 227 case mako: 228 case mako2: 229 if (NULL == proc_mckinley_root) 230 { 231 proc_mckinley_root = proc_mkdir("bus/mckinley", NULL); 232 } 233 break; 234 default: 235 /* FIXME: this was added to prevent the compiler 236 * complaining about missing pcx, pcxs and pcxt 237 * I'm assuming they have neither gsc nor runway */ 238 break; 239 } 240 } 241 242 static struct resource central_bus = { 243 .name = "Central Bus", 244 .start = F_EXTEND(0xfff80000), 245 .end = F_EXTEND(0xfffaffff), 246 .flags = IORESOURCE_MEM, 247 }; 248 249 static struct resource local_broadcast = { 250 .name = "Local Broadcast", 251 .start = F_EXTEND(0xfffb0000), 252 .end = F_EXTEND(0xfffdffff), 253 .flags = IORESOURCE_MEM, 254 }; 255 256 static struct resource global_broadcast = { 257 .name = "Global Broadcast", 258 .start = F_EXTEND(0xfffe0000), 259 .end = F_EXTEND(0xffffffff), 260 .flags = IORESOURCE_MEM, 261 }; 262 263 static int __init parisc_init_resources(void) 264 { 265 int result; 266 267 result = request_resource(&iomem_resource, ¢ral_bus); 268 if (result < 0) { 269 printk(KERN_ERR 270 "%s: failed to claim %s address space!\n", 271 __FILE__, central_bus.name); 272 return result; 273 } 274 275 result = request_resource(&iomem_resource, &local_broadcast); 276 if (result < 0) { 277 printk(KERN_ERR 278 "%s: failed to claim %saddress space!\n", 279 __FILE__, local_broadcast.name); 280 return result; 281 } 282 283 result = request_resource(&iomem_resource, &global_broadcast); 284 if (result < 0) { 285 printk(KERN_ERR 286 "%s: failed to claim %s address space!\n", 287 __FILE__, global_broadcast.name); 288 return result; 289 } 290 291 return 0; 292 } 293 294 extern void gsc_init(void); 295 extern void processor_init(void); 296 extern void ccio_init(void); 297 extern void hppb_init(void); 298 extern void dino_init(void); 299 extern void iosapic_init(void); 300 extern void lba_init(void); 301 extern void sba_init(void); 302 extern void eisa_init(void); 303 304 static int __init parisc_init(void) 305 { 306 u32 osid = (OS_ID_LINUX << 16); 307 308 parisc_proc_mkdir(); 309 parisc_init_resources(); 310 do_device_inventory(); /* probe for hardware */ 311 312 parisc_pdc_chassis_init(); 313 314 /* set up a new led state on systems shipped LED State panel */ 315 pdc_chassis_send_status(PDC_CHASSIS_DIRECT_BSTART); 316 317 /* tell PDC we're Linux. Nevermind failure. */ 318 pdc_stable_write(0x40, &osid, sizeof(osid)); 319 320 processor_init(); 321 #ifdef CONFIG_SMP 322 pr_info("CPU(s): %d out of %d %s at %d.%06d MHz online\n", 323 num_online_cpus(), num_present_cpus(), 324 #else 325 pr_info("CPU(s): 1 x %s at %d.%06d MHz\n", 326 #endif 327 boot_cpu_data.cpu_name, 328 boot_cpu_data.cpu_hz / 1000000, 329 boot_cpu_data.cpu_hz % 1000000 ); 330 331 parisc_setup_cache_timing(); 332 333 /* These are in a non-obvious order, will fix when we have an iotree */ 334 #if defined(CONFIG_IOSAPIC) 335 iosapic_init(); 336 #endif 337 #if defined(CONFIG_IOMMU_SBA) 338 sba_init(); 339 #endif 340 #if defined(CONFIG_PCI_LBA) 341 lba_init(); 342 #endif 343 344 /* CCIO before any potential subdevices */ 345 #if defined(CONFIG_IOMMU_CCIO) 346 ccio_init(); 347 #endif 348 349 /* 350 * Need to register Asp & Wax before the EISA adapters for the IRQ 351 * regions. EISA must come before PCI to be sure it gets IRQ region 352 * 0. 353 */ 354 #if defined(CONFIG_GSC_LASI) || defined(CONFIG_GSC_WAX) 355 gsc_init(); 356 #endif 357 #ifdef CONFIG_EISA 358 eisa_init(); 359 #endif 360 361 #if defined(CONFIG_HPPB) 362 hppb_init(); 363 #endif 364 365 #if defined(CONFIG_GSC_DINO) 366 dino_init(); 367 #endif 368 369 #ifdef CONFIG_CHASSIS_LCD_LED 370 register_led_regions(); /* register LED port info in procfs */ 371 #endif 372 373 return 0; 374 } 375 arch_initcall(parisc_init); 376 377 void start_parisc(void) 378 { 379 extern void start_kernel(void); 380 381 int ret, cpunum; 382 struct pdc_coproc_cfg coproc_cfg; 383 384 cpunum = smp_processor_id(); 385 386 set_firmware_width_unlocked(); 387 388 ret = pdc_coproc_cfg_unlocked(&coproc_cfg); 389 if (ret >= 0 && coproc_cfg.ccr_functional) { 390 mtctl(coproc_cfg.ccr_functional, 10); 391 392 per_cpu(cpu_data, cpunum).fp_rev = coproc_cfg.revision; 393 per_cpu(cpu_data, cpunum).fp_model = coproc_cfg.model; 394 395 asm volatile ("fstd %fr0,8(%sp)"); 396 } else { 397 panic("must have an fpu to boot linux"); 398 } 399 400 start_kernel(); 401 // not reached 402 } 403