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
 36DEFINE_PER_CPU(unsigned int, KSP);	/* Saved kernel stack pointer */
 37DEFINE_PER_CPU(unsigned int, KM);	/* Kernel/user mode */
 38DEFINE_PER_CPU(unsigned int, ENTRY_SP);	/* Saved SP on kernel entry */
 39DEFINE_PER_CPU(unsigned int, R11_SAVE);	/* Temp variable for entry */
 40DEFINE_PER_CPU(unsigned int, CURRENT_SAVE);	/* Saved current pointer */
 41
 42unsigned int boot_cpuid;
 43char cmd_line[COMMAND_LINE_SIZE];
 44
 45void __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) */
 82inline 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
 97unsigned long kernel_tlb;
 98
 99void __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
199struct dentry *of_debugfs_root;
200
201static int microblaze_debugfs_init(void)
202{
203	of_debugfs_root = debugfs_create_dir("microblaze", NULL);
204
205	return of_debugfs_root == NULL;
206}
207arch_initcall(microblaze_debugfs_init);
208
209# ifdef CONFIG_MMU
210static 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}
221device_initcall(debugfs_tlb);
222# endif
223#endif
224
225static 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
239static struct notifier_block dflt_plat_bus_notifier = {
240	.notifier_call = dflt_bus_notify,
241	.priority = INT_MAX,
242};
243
244static int __init setup_bus_notifier(void)
245{
246	bus_register_notifier(&platform_bus_type, &dflt_plat_bus_notifier);
247
248	return 0;
249}
250
251arch_initcall(setup_bus_notifier);