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 strcpy(boot_command_line, (char *)__va(boot_args[1])); 73 74 #ifdef CONFIG_BLK_DEV_INITRD 75 if (boot_args[2] != 0) /* did palo pass us a ramdisk? */ 76 { 77 initrd_start = (unsigned long)__va(boot_args[2]); 78 initrd_end = (unsigned long)__va(boot_args[3]); 79 } 80 #endif 81 } 82 83 strcpy(command_line, boot_command_line); 84 *cmdline_p = command_line; 85 } 86 87 #ifdef CONFIG_PA11 88 void __init dma_ops_init(void) 89 { 90 switch (boot_cpu_data.cpu_type) { 91 case pcx: 92 /* 93 * We've got way too many dependencies on 1.1 semantics 94 * to support 1.0 boxes at this point. 95 */ 96 panic( "PA-RISC Linux currently only supports machines that conform to\n" 97 "the PA-RISC 1.1 or 2.0 architecture specification.\n"); 98 99 case pcxs: 100 case pcxt: 101 hppa_dma_ops = &pcx_dma_ops; 102 break; 103 case pcxl2: 104 pa7300lc_init(); 105 case pcxl: /* falls through */ 106 hppa_dma_ops = &pcxl_dma_ops; 107 break; 108 default: 109 break; 110 } 111 } 112 #endif 113 114 extern int init_per_cpu(int cpuid); 115 extern void collect_boot_cpu_data(void); 116 117 void __init setup_arch(char **cmdline_p) 118 { 119 #ifdef CONFIG_64BIT 120 extern int parisc_narrow_firmware; 121 #endif 122 unwind_init(); 123 124 init_per_cpu(smp_processor_id()); /* Set Modes & Enable FP */ 125 126 #ifdef CONFIG_64BIT 127 printk(KERN_INFO "The 64-bit Kernel has started...\n"); 128 #else 129 printk(KERN_INFO "The 32-bit Kernel has started...\n"); 130 #endif 131 132 pdc_console_init(); 133 134 #ifdef CONFIG_64BIT 135 if(parisc_narrow_firmware) { 136 printk(KERN_INFO "Kernel is using PDC in 32-bit mode.\n"); 137 } 138 #endif 139 setup_pdc(); 140 setup_cmdline(cmdline_p); 141 collect_boot_cpu_data(); 142 do_memory_inventory(); /* probe for physical memory */ 143 parisc_cache_init(); 144 paging_init(); 145 146 #ifdef CONFIG_CHASSIS_LCD_LED 147 /* initialize the LCD/LED after boot_cpu_data is available ! */ 148 led_init(); /* LCD/LED initialization */ 149 #endif 150 151 #ifdef CONFIG_PA11 152 dma_ops_init(); 153 #endif 154 155 #if defined(CONFIG_VT) && defined(CONFIG_DUMMY_CONSOLE) 156 conswitchp = &dummy_con; /* we use take_over_console() later ! */ 157 #endif 158 159 } 160 161 /* 162 * Display CPU info for all CPUs. 163 * for parisc this is in processor.c 164 */ 165 extern int show_cpuinfo (struct seq_file *m, void *v); 166 167 static void * 168 c_start (struct seq_file *m, loff_t *pos) 169 { 170 /* Looks like the caller will call repeatedly until we return 171 * 0, signaling EOF perhaps. This could be used to sequence 172 * through CPUs for example. Since we print all cpu info in our 173 * show_cpuinfo() disregarding 'pos' (which I assume is 'v' above) 174 * we only allow for one "position". */ 175 return ((long)*pos < 1) ? (void *)1 : NULL; 176 } 177 178 static void * 179 c_next (struct seq_file *m, void *v, loff_t *pos) 180 { 181 ++*pos; 182 return c_start(m, pos); 183 } 184 185 static void 186 c_stop (struct seq_file *m, void *v) 187 { 188 } 189 190 const struct seq_operations cpuinfo_op = { 191 .start = c_start, 192 .next = c_next, 193 .stop = c_stop, 194 .show = show_cpuinfo 195 }; 196 197 static void __init parisc_proc_mkdir(void) 198 { 199 /* 200 ** Can't call proc_mkdir() until after proc_root_init() has been 201 ** called by start_kernel(). In other words, this code can't 202 ** live in arch/.../setup.c because start_parisc() calls 203 ** start_kernel(). 204 */ 205 switch (boot_cpu_data.cpu_type) { 206 case pcxl: 207 case pcxl2: 208 if (NULL == proc_gsc_root) 209 { 210 proc_gsc_root = proc_mkdir("bus/gsc", NULL); 211 } 212 break; 213 case pcxt_: 214 case pcxu: 215 case pcxu_: 216 case pcxw: 217 case pcxw_: 218 case pcxw2: 219 if (NULL == proc_runway_root) 220 { 221 proc_runway_root = proc_mkdir("bus/runway", NULL); 222 } 223 break; 224 case mako: 225 case mako2: 226 if (NULL == proc_mckinley_root) 227 { 228 proc_mckinley_root = proc_mkdir("bus/mckinley", NULL); 229 } 230 break; 231 default: 232 /* FIXME: this was added to prevent the compiler 233 * complaining about missing pcx, pcxs and pcxt 234 * I'm assuming they have neither gsc nor runway */ 235 break; 236 } 237 } 238 239 static struct resource central_bus = { 240 .name = "Central Bus", 241 .start = F_EXTEND(0xfff80000), 242 .end = F_EXTEND(0xfffaffff), 243 .flags = IORESOURCE_MEM, 244 }; 245 246 static struct resource local_broadcast = { 247 .name = "Local Broadcast", 248 .start = F_EXTEND(0xfffb0000), 249 .end = F_EXTEND(0xfffdffff), 250 .flags = IORESOURCE_MEM, 251 }; 252 253 static struct resource global_broadcast = { 254 .name = "Global Broadcast", 255 .start = F_EXTEND(0xfffe0000), 256 .end = F_EXTEND(0xffffffff), 257 .flags = IORESOURCE_MEM, 258 }; 259 260 static int __init parisc_init_resources(void) 261 { 262 int result; 263 264 result = request_resource(&iomem_resource, ¢ral_bus); 265 if (result < 0) { 266 printk(KERN_ERR 267 "%s: failed to claim %s address space!\n", 268 __FILE__, central_bus.name); 269 return result; 270 } 271 272 result = request_resource(&iomem_resource, &local_broadcast); 273 if (result < 0) { 274 printk(KERN_ERR 275 "%s: failed to claim %saddress space!\n", 276 __FILE__, local_broadcast.name); 277 return result; 278 } 279 280 result = request_resource(&iomem_resource, &global_broadcast); 281 if (result < 0) { 282 printk(KERN_ERR 283 "%s: failed to claim %s address space!\n", 284 __FILE__, global_broadcast.name); 285 return result; 286 } 287 288 return 0; 289 } 290 291 extern void gsc_init(void); 292 extern void processor_init(void); 293 extern void ccio_init(void); 294 extern void hppb_init(void); 295 extern void dino_init(void); 296 extern void iosapic_init(void); 297 extern void lba_init(void); 298 extern void sba_init(void); 299 extern void eisa_init(void); 300 301 static int __init parisc_init(void) 302 { 303 u32 osid = (OS_ID_LINUX << 16); 304 305 parisc_proc_mkdir(); 306 parisc_init_resources(); 307 do_device_inventory(); /* probe for hardware */ 308 309 parisc_pdc_chassis_init(); 310 311 /* set up a new led state on systems shipped LED State panel */ 312 pdc_chassis_send_status(PDC_CHASSIS_DIRECT_BSTART); 313 314 /* tell PDC we're Linux. Nevermind failure. */ 315 pdc_stable_write(0x40, &osid, sizeof(osid)); 316 317 processor_init(); 318 printk(KERN_INFO "CPU(s): %d x %s at %d.%06d MHz\n", 319 num_present_cpus(), 320 boot_cpu_data.cpu_name, 321 boot_cpu_data.cpu_hz / 1000000, 322 boot_cpu_data.cpu_hz % 1000000 ); 323 324 parisc_setup_cache_timing(); 325 326 /* These are in a non-obvious order, will fix when we have an iotree */ 327 #if defined(CONFIG_IOSAPIC) 328 iosapic_init(); 329 #endif 330 #if defined(CONFIG_IOMMU_SBA) 331 sba_init(); 332 #endif 333 #if defined(CONFIG_PCI_LBA) 334 lba_init(); 335 #endif 336 337 /* CCIO before any potential subdevices */ 338 #if defined(CONFIG_IOMMU_CCIO) 339 ccio_init(); 340 #endif 341 342 /* 343 * Need to register Asp & Wax before the EISA adapters for the IRQ 344 * regions. EISA must come before PCI to be sure it gets IRQ region 345 * 0. 346 */ 347 #if defined(CONFIG_GSC_LASI) || defined(CONFIG_GSC_WAX) 348 gsc_init(); 349 #endif 350 #ifdef CONFIG_EISA 351 eisa_init(); 352 #endif 353 354 #if defined(CONFIG_HPPB) 355 hppb_init(); 356 #endif 357 358 #if defined(CONFIG_GSC_DINO) 359 dino_init(); 360 #endif 361 362 #ifdef CONFIG_CHASSIS_LCD_LED 363 register_led_regions(); /* register LED port info in procfs */ 364 #endif 365 366 return 0; 367 } 368 arch_initcall(parisc_init); 369 370 void start_parisc(void) 371 { 372 extern void start_kernel(void); 373 374 int ret, cpunum; 375 struct pdc_coproc_cfg coproc_cfg; 376 377 cpunum = smp_processor_id(); 378 379 set_firmware_width_unlocked(); 380 381 ret = pdc_coproc_cfg_unlocked(&coproc_cfg); 382 if (ret >= 0 && coproc_cfg.ccr_functional) { 383 mtctl(coproc_cfg.ccr_functional, 10); 384 385 per_cpu(cpu_data, cpunum).fp_rev = coproc_cfg.revision; 386 per_cpu(cpu_data, cpunum).fp_model = coproc_cfg.model; 387 388 asm volatile ("fstd %fr0,8(%sp)"); 389 } else { 390 panic("must have an fpu to boot linux"); 391 } 392 393 start_kernel(); 394 // not reached 395 } 396