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