GNU Linux-libre 4.9.333-gnu1
[releases.git] / arch / h8300 / kernel / setup.c
1 /*
2  *  linux/arch/h8300/kernel/setup.c
3  *
4  *  Copyright (C) 2001-2014 Yoshinori Sato <ysato@users.sourceforge.jp>
5  */
6
7 /*
8  * This file handles the architecture-dependent parts of system setup
9  */
10
11 #include <linux/kernel.h>
12 #include <linux/sched.h>
13 #include <linux/delay.h>
14 #include <linux/interrupt.h>
15 #include <linux/mm.h>
16 #include <linux/fs.h>
17 #include <linux/console.h>
18 #include <linux/errno.h>
19 #include <linux/string.h>
20 #include <linux/bootmem.h>
21 #include <linux/seq_file.h>
22 #include <linux/init.h>
23 #include <linux/of.h>
24 #include <linux/of_fdt.h>
25 #include <linux/of_platform.h>
26 #include <linux/of_address.h>
27 #include <linux/clk-provider.h>
28 #include <linux/memblock.h>
29 #include <linux/screen_info.h>
30 #include <linux/clocksource.h>
31
32 #include <asm/setup.h>
33 #include <asm/irq.h>
34 #include <asm/pgtable.h>
35 #include <asm/sections.h>
36 #include <asm/page.h>
37
38 #if defined(CONFIG_CPU_H8300H)
39 #define CPU "H8/300H"
40 #elif defined(CONFIG_CPU_H8S)
41 #define CPU "H8S"
42 #else
43 #define CPU "Unknown"
44 #endif
45
46 unsigned long memory_start;
47 unsigned long memory_end;
48 EXPORT_SYMBOL(memory_end);
49 static unsigned long freq;
50 extern char __dtb_start[];
51
52 #ifdef CONFIG_VT
53 struct screen_info screen_info;
54 #endif
55
56 char __initdata command_line[COMMAND_LINE_SIZE];
57
58 void sim_console_register(void);
59
60 void __init h8300_fdt_init(void *fdt, char *bootargs)
61 {
62         if (!fdt)
63                 fdt = __dtb_start;
64         else
65                 strcpy(command_line, bootargs);
66
67         early_init_dt_scan(fdt);
68         memblock_allow_resize();
69 }
70
71 static void __init bootmem_init(void)
72 {
73         int bootmap_size;
74         unsigned long ram_start_pfn;
75         unsigned long free_ram_start_pfn;
76         unsigned long ram_end_pfn;
77         struct memblock_region *region;
78
79         memory_end = memory_start = 0;
80
81         /* Find main memory where is the kernel */
82         for_each_memblock(memory, region) {
83                 memory_start = region->base;
84                 memory_end = region->base + region->size;
85         }
86
87         if (!memory_end)
88                 panic("No memory!");
89
90         ram_start_pfn = PFN_UP(memory_start);
91         /* free_ram_start_pfn is first page after kernel */
92         free_ram_start_pfn = PFN_UP(__pa(_end));
93         ram_end_pfn = PFN_DOWN(memblock_end_of_DRAM());
94
95         max_pfn = ram_end_pfn;
96
97         /*
98          * give all the memory to the bootmap allocator,  tell it to put the
99          * boot mem_map at the start of memory
100          */
101         bootmap_size = init_bootmem_node(NODE_DATA(0),
102                                          free_ram_start_pfn,
103                                          0,
104                                          ram_end_pfn);
105         /*
106          * free the usable memory,  we have to make sure we do not free
107          * the bootmem bitmap so we then reserve it after freeing it :-)
108          */
109         free_bootmem(PFN_PHYS(free_ram_start_pfn),
110                      (ram_end_pfn - free_ram_start_pfn) << PAGE_SHIFT);
111         reserve_bootmem(PFN_PHYS(free_ram_start_pfn), bootmap_size,
112                         BOOTMEM_DEFAULT);
113
114         for_each_memblock(reserved, region) {
115                 reserve_bootmem(region->base, region->size, BOOTMEM_DEFAULT);
116         }
117 }
118
119 void __init setup_arch(char **cmdline_p)
120 {
121         unflatten_and_copy_device_tree();
122
123         init_mm.start_code = (unsigned long) _stext;
124         init_mm.end_code = (unsigned long) _etext;
125         init_mm.end_data = (unsigned long) _edata;
126         init_mm.brk = (unsigned long) 0;
127
128         pr_notice("\r\n\nuClinux " CPU "\n");
129         pr_notice("Flat model support (C) 1998,1999 Kenneth Albanowski, D. Jeff Dionne\n");
130
131         if (*command_line)
132                 strcpy(boot_command_line, command_line);
133         *cmdline_p = boot_command_line;
134
135         parse_early_param();
136
137         bootmem_init();
138         /*
139          * get kmalloc into gear
140          */
141         paging_init();
142 }
143
144 /*
145  *      Get CPU information for use by the procfs.
146  */
147
148 static int show_cpuinfo(struct seq_file *m, void *v)
149 {
150         char *cpu;
151
152         cpu = CPU;
153
154         seq_printf(m,  "CPU:\t\t%s\n"
155                    "Clock:\t\t%lu.%1luMHz\n"
156                    "BogoMips:\t%lu.%02lu\n"
157                    "Calibration:\t%lu loops\n",
158                    cpu,
159                    freq/1000, freq%1000,
160                    (loops_per_jiffy*HZ)/500000,
161                    ((loops_per_jiffy*HZ)/5000)%100,
162                    (loops_per_jiffy*HZ));
163
164         return 0;
165 }
166
167 static void *c_start(struct seq_file *m, loff_t *pos)
168 {
169         return *pos < num_possible_cpus() ?
170                 ((void *) 0x12345678) : NULL;
171 }
172
173 static void *c_next(struct seq_file *m, void *v, loff_t *pos)
174 {
175         ++*pos;
176         return c_start(m, pos);
177 }
178
179 static void c_stop(struct seq_file *m, void *v)
180 {
181 }
182
183 const struct seq_operations cpuinfo_op = {
184         .start  = c_start,
185         .next   = c_next,
186         .stop   = c_stop,
187         .show   = show_cpuinfo,
188 };
189
190 static int __init device_probe(void)
191 {
192         of_platform_populate(NULL, NULL, NULL, NULL);
193
194         return 0;
195 }
196
197 device_initcall(device_probe);
198
199 #if defined(CONFIG_CPU_H8300H)
200 #define get_wait(base, addr) ({         \
201         int baddr;                      \
202         baddr = ((addr) / 0x200000 * 2);                             \
203         w *= (readw((base) + 2) & (3 << baddr)) + 1;                 \
204         })
205 #endif
206 #if defined(CONFIG_CPU_H8S)
207 #define get_wait(base, addr) ({         \
208         int baddr;                      \
209         baddr = ((addr) / 0x200000 * 16);                            \
210         w *= (readl((base) + 2) & (7 << baddr)) + 1;    \
211         })
212 #endif
213
214 static __init int access_timing(void)
215 {
216         struct device_node *bsc;
217         void __iomem *base;
218         unsigned long addr = (unsigned long)&__delay;
219         int bit = 1 << (addr / 0x200000);
220         int w;
221
222         bsc = of_find_compatible_node(NULL, NULL, "renesas,h8300-bsc");
223         base = of_iomap(bsc, 0);
224         w = (readb(base + 0) & bit)?2:1;
225         if (readb(base + 1) & bit)
226                 w *= get_wait(base, addr);
227         else
228                 w *= 2;
229         return w * 3 / 2;
230 }
231
232 void __init calibrate_delay(void)
233 {
234         struct device_node *cpu;
235         int freq;
236
237         cpu = of_find_compatible_node(NULL, NULL, "renesas,h8300");
238         of_property_read_s32(cpu, "clock-frequency", &freq);
239         loops_per_jiffy = freq / HZ / (access_timing() * 2);
240         pr_cont("%lu.%02lu BogoMIPS (lpj=%lu)\n",
241                 loops_per_jiffy / (500000 / HZ),
242                 (loops_per_jiffy / (5000 / HZ)) % 100, loops_per_jiffy);
243 }
244
245
246 void __init time_init(void)
247 {
248         of_clk_init(NULL);
249         clocksource_probe();
250 }