1 /* 2 * Copyright (C) 2007-2009 Michal Simek <monstr@monstr.eu> 3 * Copyright (C) 2007-2009 PetaLogix 4 * Copyright (C) 2006 Atmark Techno, Inc. 5 * 6 * This file is subject to the terms and conditions of the GNU General Public 7 * License. See the file "COPYING" in the main directory of this archive 8 * for more details. 9 */ 10 11 #include <linux/init.h> 12 #include <linux/string.h> 13 #include <linux/seq_file.h> 14 #include <linux/cpu.h> 15 #include <linux/initrd.h> 16 #include <linux/console.h> 17 #include <linux/debugfs.h> 18 19 #include <asm/setup.h> 20 #include <asm/sections.h> 21 #include <asm/page.h> 22 #include <linux/io.h> 23 #include <linux/bug.h> 24 #include <linux/param.h> 25 #include <linux/pci.h> 26 #include <linux/cache.h> 27 #include <linux/of_platform.h> 28 #include <linux/dma-mapping.h> 29 #include <asm/cacheflush.h> 30 #include <asm/entry.h> 31 #include <asm/cpuinfo.h> 32 33 #include <asm/system.h> 34 #include <asm/prom.h> 35 #include <asm/pgtable.h> 36 37 DEFINE_PER_CPU(unsigned int, KSP); /* Saved kernel stack pointer */ 38 DEFINE_PER_CPU(unsigned int, KM); /* Kernel/user mode */ 39 DEFINE_PER_CPU(unsigned int, ENTRY_SP); /* Saved SP on kernel entry */ 40 DEFINE_PER_CPU(unsigned int, R11_SAVE); /* Temp variable for entry */ 41 DEFINE_PER_CPU(unsigned int, CURRENT_SAVE); /* Saved current pointer */ 42 43 unsigned int boot_cpuid; 44 char cmd_line[COMMAND_LINE_SIZE]; 45 46 void __init setup_arch(char **cmdline_p) 47 { 48 *cmdline_p = cmd_line; 49 50 console_verbose(); 51 52 unflatten_device_tree(); 53 54 /* NOTE I think that this function is not necessary to call */ 55 /* irq_early_init(); */ 56 setup_cpuinfo(); 57 58 microblaze_cache_init(); 59 60 setup_memory(); 61 62 #ifdef CONFIG_EARLY_PRINTK 63 /* remap early console to virtual address */ 64 remap_early_printk(); 65 #endif 66 67 xilinx_pci_init(); 68 69 #if defined(CONFIG_SELFMOD_INTC) || defined(CONFIG_SELFMOD_TIMER) 70 printk(KERN_NOTICE "Self modified code enable\n"); 71 #endif 72 73 #ifdef CONFIG_VT 74 #if defined(CONFIG_XILINX_CONSOLE) 75 conswitchp = &xil_con; 76 #elif defined(CONFIG_DUMMY_CONSOLE) 77 conswitchp = &dummy_con; 78 #endif 79 #endif 80 } 81 82 #ifdef CONFIG_MTD_UCLINUX 83 /* Handle both romfs and cramfs types, without generating unnecessary 84 code (ie no point checking for CRAMFS if it's not even enabled) */ 85 inline unsigned get_romfs_len(unsigned *addr) 86 { 87 #ifdef CONFIG_ROMFS_FS 88 if (memcmp(&addr[0], "-rom1fs-", 8) == 0) /* romfs */ 89 return be32_to_cpu(addr[2]); 90 #endif 91 92 #ifdef CONFIG_CRAMFS 93 if (addr[0] == le32_to_cpu(0x28cd3d45)) /* cramfs */ 94 return le32_to_cpu(addr[1]); 95 #endif 96 return 0; 97 } 98 #endif /* CONFIG_MTD_UCLINUX_EBSS */ 99 100 unsigned long kernel_tlb; 101 102 void __init machine_early_init(const char *cmdline, unsigned int ram, 103 unsigned int fdt, unsigned int msr, unsigned int tlb0, 104 unsigned int tlb1) 105 { 106 unsigned long *src, *dst; 107 unsigned int offset = 0; 108 109 /* If CONFIG_MTD_UCLINUX is defined, assume ROMFS is at the 110 * end of kernel. There are two position which we want to check. 111 * The first is __init_end and the second __bss_start. 112 */ 113 #ifdef CONFIG_MTD_UCLINUX 114 int romfs_size; 115 unsigned int romfs_base; 116 char *old_klimit = klimit; 117 118 romfs_base = (ram ? ram : (unsigned int)&__init_end); 119 romfs_size = PAGE_ALIGN(get_romfs_len((unsigned *)romfs_base)); 120 if (!romfs_size) { 121 romfs_base = (unsigned int)&__bss_start; 122 romfs_size = PAGE_ALIGN(get_romfs_len((unsigned *)romfs_base)); 123 } 124 125 /* Move ROMFS out of BSS before clearing it */ 126 if (romfs_size > 0) { 127 memmove(&_ebss, (int *)romfs_base, romfs_size); 128 klimit += romfs_size; 129 } 130 #endif 131 132 /* clearing bss section */ 133 memset(__bss_start, 0, __bss_stop-__bss_start); 134 memset(_ssbss, 0, _esbss-_ssbss); 135 136 /* Copy command line passed from bootloader */ 137 #ifndef CONFIG_CMDLINE_BOOL 138 if (cmdline && cmdline[0] != '\0') 139 strlcpy(cmd_line, cmdline, COMMAND_LINE_SIZE); 140 #endif 141 142 lockdep_init(); 143 144 /* initialize device tree for usage in early_printk */ 145 early_init_devtree((void *)_fdt_start); 146 147 #ifdef CONFIG_EARLY_PRINTK 148 setup_early_printk(NULL); 149 #endif 150 151 /* setup kernel_tlb after BSS cleaning 152 * Maybe worth to move to asm code */ 153 kernel_tlb = tlb0 + tlb1; 154 /* printk("TLB1 0x%08x, TLB0 0x%08x, tlb 0x%x\n", tlb0, 155 tlb1, kernel_tlb); */ 156 157 printk("Ramdisk addr 0x%08x, ", ram); 158 if (fdt) 159 printk("FDT at 0x%08x\n", fdt); 160 else 161 printk("Compiled-in FDT at 0x%08x\n", 162 (unsigned int)_fdt_start); 163 164 #ifdef CONFIG_MTD_UCLINUX 165 printk("Found romfs @ 0x%08x (0x%08x)\n", 166 romfs_base, romfs_size); 167 printk("#### klimit %p ####\n", old_klimit); 168 BUG_ON(romfs_size < 0); /* What else can we do? */ 169 170 printk("Moved 0x%08x bytes from 0x%08x to 0x%08x\n", 171 romfs_size, romfs_base, (unsigned)&_ebss); 172 173 printk("New klimit: 0x%08x\n", (unsigned)klimit); 174 #endif 175 176 #if CONFIG_XILINX_MICROBLAZE0_USE_MSR_INSTR 177 if (msr) 178 printk("!!!Your kernel has setup MSR instruction but " 179 "CPU don't have it %x\n", msr); 180 #else 181 if (!msr) 182 printk("!!!Your kernel not setup MSR instruction but " 183 "CPU have it %x\n", msr); 184 #endif 185 186 /* Do not copy reset vectors. offset = 0x2 means skip the first 187 * two instructions. dst is pointer to MB vectors which are placed 188 * in block ram. If you want to copy reset vector setup offset to 0x0 */ 189 #if !CONFIG_MANUAL_RESET_VECTOR 190 offset = 0x2; 191 #endif 192 dst = (unsigned long *) (offset * sizeof(u32)); 193 for (src = __ivt_start + offset; src < __ivt_end; src++, dst++) 194 *dst = *src; 195 196 /* Initialize global data */ 197 per_cpu(KM, 0) = 0x1; /* We start in kernel mode */ 198 per_cpu(CURRENT_SAVE, 0) = (unsigned long)current; 199 } 200 201 #ifdef CONFIG_DEBUG_FS 202 struct dentry *of_debugfs_root; 203 204 static int microblaze_debugfs_init(void) 205 { 206 of_debugfs_root = debugfs_create_dir("microblaze", NULL); 207 208 return of_debugfs_root == NULL; 209 } 210 arch_initcall(microblaze_debugfs_init); 211 212 # ifdef CONFIG_MMU 213 static int __init debugfs_tlb(void) 214 { 215 struct dentry *d; 216 217 if (!of_debugfs_root) 218 return -ENODEV; 219 220 d = debugfs_create_u32("tlb_skip", S_IRUGO, of_debugfs_root, &tlb_skip); 221 if (!d) 222 return -ENOMEM; 223 } 224 device_initcall(debugfs_tlb); 225 # endif 226 #endif 227 228 static int dflt_bus_notify(struct notifier_block *nb, 229 unsigned long action, void *data) 230 { 231 struct device *dev = data; 232 233 /* We are only intereted in device addition */ 234 if (action != BUS_NOTIFY_ADD_DEVICE) 235 return 0; 236 237 set_dma_ops(dev, &dma_direct_ops); 238 239 return NOTIFY_DONE; 240 } 241 242 static struct notifier_block dflt_plat_bus_notifier = { 243 .notifier_call = dflt_bus_notify, 244 .priority = INT_MAX, 245 }; 246 247 static int __init setup_bus_notifier(void) 248 { 249 bus_register_notifier(&platform_bus_type, &dflt_plat_bus_notifier); 250 251 return 0; 252 } 253 254 arch_initcall(setup_bus_notifier); 255