1/*
2 *  linux/arch/m68k/kernel/setup.c
3 *
4 *  Copyright (C) 1995  Hamish Macdonald
5 */
6
7/*
8 * This file handles the architecture-dependent parts of system setup
9 */
10
11#include <linux/kernel.h>
12#include <linux/mm.h>
13#include <linux/sched.h>
14#include <linux/delay.h>
15#include <linux/interrupt.h>
16#include <linux/fs.h>
17#include <linux/console.h>
18#include <linux/genhd.h>
19#include <linux/errno.h>
20#include <linux/string.h>
21#include <linux/init.h>
22#include <linux/bootmem.h>
23#include <linux/proc_fs.h>
24#include <linux/seq_file.h>
25#include <linux/module.h>
26#include <linux/initrd.h>
27
28#include <asm/bootinfo.h>
29#include <asm/byteorder.h>
30#include <asm/sections.h>
31#include <asm/setup.h>
32#include <asm/fpu.h>
33#include <asm/irq.h>
34#include <asm/io.h>
35#include <asm/machdep.h>
36#ifdef CONFIG_AMIGA
37#include <asm/amigahw.h>
38#endif
39#ifdef CONFIG_ATARI
40#include <asm/atarihw.h>
41#include <asm/atari_stram.h>
42#endif
43#ifdef CONFIG_SUN3X
44#include <asm/dvma.h>
45#endif
46#include <asm/natfeat.h>
47
48#if !FPSTATESIZE || !NR_IRQS
49#warning No CPU/platform type selected, your kernel will not work!
50#warning Are you building an allnoconfig kernel?
51#endif
52
53unsigned long m68k_machtype;
54EXPORT_SYMBOL(m68k_machtype);
55unsigned long m68k_cputype;
56EXPORT_SYMBOL(m68k_cputype);
57unsigned long m68k_fputype;
58unsigned long m68k_mmutype;
59EXPORT_SYMBOL(m68k_mmutype);
60#ifdef CONFIG_VME
61unsigned long vme_brdtype;
62EXPORT_SYMBOL(vme_brdtype);
63#endif
64
65int m68k_is040or060;
66EXPORT_SYMBOL(m68k_is040or060);
67
68extern unsigned long availmem;
69
70int m68k_num_memory;
71EXPORT_SYMBOL(m68k_num_memory);
72int m68k_realnum_memory;
73EXPORT_SYMBOL(m68k_realnum_memory);
74unsigned long m68k_memoffset;
75struct m68k_mem_info m68k_memory[NUM_MEMINFO];
76EXPORT_SYMBOL(m68k_memory);
77
78static struct m68k_mem_info m68k_ramdisk __initdata;
79
80static char m68k_command_line[CL_SIZE] __initdata;
81
82void (*mach_sched_init) (irq_handler_t handler) __initdata = NULL;
83/* machine dependent irq functions */
84void (*mach_init_IRQ) (void) __initdata = NULL;
85void (*mach_get_model) (char *model);
86void (*mach_get_hardware_list) (struct seq_file *m);
87/* machine dependent timer functions */
88int (*mach_hwclk) (int, struct rtc_time*);
89EXPORT_SYMBOL(mach_hwclk);
90int (*mach_set_clock_mmss) (unsigned long);
91unsigned int (*mach_get_ss)(void);
92int (*mach_get_rtc_pll)(struct rtc_pll_info *);
93int (*mach_set_rtc_pll)(struct rtc_pll_info *);
94EXPORT_SYMBOL(mach_get_ss);
95EXPORT_SYMBOL(mach_get_rtc_pll);
96EXPORT_SYMBOL(mach_set_rtc_pll);
97void (*mach_reset)( void );
98void (*mach_halt)( void );
99void (*mach_power_off)( void );
100long mach_max_dma_address = 0x00ffffff; /* default set to the lower 16MB */
101#ifdef CONFIG_HEARTBEAT
102void (*mach_heartbeat) (int);
103EXPORT_SYMBOL(mach_heartbeat);
104#endif
105#ifdef CONFIG_M68K_L2_CACHE
106void (*mach_l2_flush) (int);
107#endif
108#if defined(CONFIG_INPUT_M68K_BEEP) || defined(CONFIG_INPUT_M68K_BEEP_MODULE)
109void (*mach_beep)(unsigned int, unsigned int);
110EXPORT_SYMBOL(mach_beep);
111#endif
112#if defined(CONFIG_ISA) && defined(MULTI_ISA)
113int isa_type;
114int isa_sex;
115EXPORT_SYMBOL(isa_type);
116EXPORT_SYMBOL(isa_sex);
117#endif
118
119extern int amiga_parse_bootinfo(const struct bi_record *);
120extern int atari_parse_bootinfo(const struct bi_record *);
121extern int mac_parse_bootinfo(const struct bi_record *);
122extern int q40_parse_bootinfo(const struct bi_record *);
123extern int bvme6000_parse_bootinfo(const struct bi_record *);
124extern int mvme16x_parse_bootinfo(const struct bi_record *);
125extern int mvme147_parse_bootinfo(const struct bi_record *);
126extern int hp300_parse_bootinfo(const struct bi_record *);
127extern int apollo_parse_bootinfo(const struct bi_record *);
128
129extern void config_amiga(void);
130extern void config_atari(void);
131extern void config_mac(void);
132extern void config_sun3(void);
133extern void config_apollo(void);
134extern void config_mvme147(void);
135extern void config_mvme16x(void);
136extern void config_bvme6000(void);
137extern void config_hp300(void);
138extern void config_q40(void);
139extern void config_sun3x(void);
140
141#define MASK_256K 0xfffc0000
142
143extern void paging_init(void);
144
145static void __init m68k_parse_bootinfo(const struct bi_record *record)
146{
147	uint16_t tag;
148
149	save_bootinfo(record);
150
151	while ((tag = be16_to_cpu(record->tag)) != BI_LAST) {
152		int unknown = 0;
153		const void *data = record->data;
154		uint16_t size = be16_to_cpu(record->size);
155
156		switch (tag) {
157		case BI_MACHTYPE:
158		case BI_CPUTYPE:
159		case BI_FPUTYPE:
160		case BI_MMUTYPE:
161			/* Already set up by head.S */
162			break;
163
164		case BI_MEMCHUNK:
165			if (m68k_num_memory < NUM_MEMINFO) {
166				const struct mem_info *m = data;
167				m68k_memory[m68k_num_memory].addr =
168					be32_to_cpu(m->addr);
169				m68k_memory[m68k_num_memory].size =
170					be32_to_cpu(m->size);
171				m68k_num_memory++;
172			} else
173				pr_warn("%s: too many memory chunks\n",
174					__func__);
175			break;
176
177		case BI_RAMDISK:
178			{
179				const struct mem_info *m = data;
180				m68k_ramdisk.addr = be32_to_cpu(m->addr);
181				m68k_ramdisk.size = be32_to_cpu(m->size);
182			}
183			break;
184
185		case BI_COMMAND_LINE:
186			strlcpy(m68k_command_line, data,
187				sizeof(m68k_command_line));
188			break;
189
190		default:
191			if (MACH_IS_AMIGA)
192				unknown = amiga_parse_bootinfo(record);
193			else if (MACH_IS_ATARI)
194				unknown = atari_parse_bootinfo(record);
195			else if (MACH_IS_MAC)
196				unknown = mac_parse_bootinfo(record);
197			else if (MACH_IS_Q40)
198				unknown = q40_parse_bootinfo(record);
199			else if (MACH_IS_BVME6000)
200				unknown = bvme6000_parse_bootinfo(record);
201			else if (MACH_IS_MVME16x)
202				unknown = mvme16x_parse_bootinfo(record);
203			else if (MACH_IS_MVME147)
204				unknown = mvme147_parse_bootinfo(record);
205			else if (MACH_IS_HP300)
206				unknown = hp300_parse_bootinfo(record);
207			else if (MACH_IS_APOLLO)
208				unknown = apollo_parse_bootinfo(record);
209			else
210				unknown = 1;
211		}
212		if (unknown)
213			pr_warn("%s: unknown tag 0x%04x ignored\n", __func__,
214				tag);
215		record = (struct bi_record *)((unsigned long)record + size);
216	}
217
218	m68k_realnum_memory = m68k_num_memory;
219#ifdef CONFIG_SINGLE_MEMORY_CHUNK
220	if (m68k_num_memory > 1) {
221		pr_warn("%s: ignoring last %i chunks of physical memory\n",
222			__func__, (m68k_num_memory - 1));
223		m68k_num_memory = 1;
224	}
225#endif
226}
227
228void __init setup_arch(char **cmdline_p)
229{
230#ifndef CONFIG_SUN3
231	int i;
232#endif
233
234	/* The bootinfo is located right after the kernel */
235	if (!CPU_IS_COLDFIRE)
236		m68k_parse_bootinfo((const struct bi_record *)_end);
237
238	if (CPU_IS_040)
239		m68k_is040or060 = 4;
240	else if (CPU_IS_060)
241		m68k_is040or060 = 6;
242
243	/* FIXME: m68k_fputype is passed in by Penguin booter, which can
244	 * be confused by software FPU emulation. BEWARE.
245	 * We should really do our own FPU check at startup.
246	 * [what do we do with buggy 68LC040s? if we have problems
247	 *  with them, we should add a test to check_bugs() below] */
248#ifndef CONFIG_M68KFPU_EMU_ONLY
249	/* clear the fpu if we have one */
250	if (m68k_fputype & (FPU_68881|FPU_68882|FPU_68040|FPU_68060|FPU_COLDFIRE)) {
251		volatile int zero = 0;
252		asm volatile ("frestore %0" : : "m" (zero));
253	}
254#endif
255
256	if (CPU_IS_060) {
257		u32 pcr;
258
259		asm (".chip 68060; movec %%pcr,%0; .chip 68k"
260		     : "=d" (pcr));
261		if (((pcr >> 8) & 0xff) <= 5) {
262			pr_warn("Enabling workaround for errata I14\n");
263			asm (".chip 68060; movec %0,%%pcr; .chip 68k"
264			     : : "d" (pcr | 0x20));
265		}
266	}
267
268	init_mm.start_code = PAGE_OFFSET;
269	init_mm.end_code = (unsigned long)_etext;
270	init_mm.end_data = (unsigned long)_edata;
271	init_mm.brk = (unsigned long)_end;
272
273#if defined(CONFIG_BOOTPARAM)
274	strncpy(m68k_command_line, CONFIG_BOOTPARAM_STRING, CL_SIZE);
275	m68k_command_line[CL_SIZE - 1] = 0;
276#endif /* CONFIG_BOOTPARAM */
277	*cmdline_p = m68k_command_line;
278	memcpy(boot_command_line, *cmdline_p, CL_SIZE);
279
280	parse_early_param();
281
282#ifdef CONFIG_DUMMY_CONSOLE
283	conswitchp = &dummy_con;
284#endif
285
286	switch (m68k_machtype) {
287#ifdef CONFIG_AMIGA
288	case MACH_AMIGA:
289		config_amiga();
290		break;
291#endif
292#ifdef CONFIG_ATARI
293	case MACH_ATARI:
294		config_atari();
295		break;
296#endif
297#ifdef CONFIG_MAC
298	case MACH_MAC:
299		config_mac();
300		break;
301#endif
302#ifdef CONFIG_SUN3
303	case MACH_SUN3:
304		config_sun3();
305		break;
306#endif
307#ifdef CONFIG_APOLLO
308	case MACH_APOLLO:
309		config_apollo();
310		break;
311#endif
312#ifdef CONFIG_MVME147
313	case MACH_MVME147:
314		config_mvme147();
315		break;
316#endif
317#ifdef CONFIG_MVME16x
318	case MACH_MVME16x:
319		config_mvme16x();
320		break;
321#endif
322#ifdef CONFIG_BVME6000
323	case MACH_BVME6000:
324		config_bvme6000();
325		break;
326#endif
327#ifdef CONFIG_HP300
328	case MACH_HP300:
329		config_hp300();
330		break;
331#endif
332#ifdef CONFIG_Q40
333	case MACH_Q40:
334		config_q40();
335		break;
336#endif
337#ifdef CONFIG_SUN3X
338	case MACH_SUN3X:
339		config_sun3x();
340		break;
341#endif
342#ifdef CONFIG_COLDFIRE
343	case MACH_M54XX:
344		config_BSP(NULL, 0);
345		break;
346#endif
347	default:
348		panic("No configuration setup");
349	}
350
351	paging_init();
352
353#ifdef CONFIG_NATFEAT
354	nf_init();
355#endif
356
357#ifndef CONFIG_SUN3
358	for (i = 1; i < m68k_num_memory; i++)
359		free_bootmem_node(NODE_DATA(i), m68k_memory[i].addr,
360				  m68k_memory[i].size);
361#ifdef CONFIG_BLK_DEV_INITRD
362	if (m68k_ramdisk.size) {
363		reserve_bootmem_node(__virt_to_node(phys_to_virt(m68k_ramdisk.addr)),
364				     m68k_ramdisk.addr, m68k_ramdisk.size,
365				     BOOTMEM_DEFAULT);
366		initrd_start = (unsigned long)phys_to_virt(m68k_ramdisk.addr);
367		initrd_end = initrd_start + m68k_ramdisk.size;
368		pr_info("initrd: %08lx - %08lx\n", initrd_start, initrd_end);
369	}
370#endif
371
372#ifdef CONFIG_ATARI
373	if (MACH_IS_ATARI)
374		atari_stram_reserve_pages((void *)availmem);
375#endif
376#ifdef CONFIG_SUN3X
377	if (MACH_IS_SUN3X) {
378		dvma_init();
379	}
380#endif
381
382#endif /* !CONFIG_SUN3 */
383
384/* set ISA defs early as possible */
385#if defined(CONFIG_ISA) && defined(MULTI_ISA)
386	if (MACH_IS_Q40) {
387		isa_type = ISA_TYPE_Q40;
388		isa_sex = 0;
389	}
390#ifdef CONFIG_AMIGA_PCMCIA
391	if (MACH_IS_AMIGA && AMIGAHW_PRESENT(PCMCIA)) {
392		isa_type = ISA_TYPE_AG;
393		isa_sex = 1;
394	}
395#endif
396#ifdef CONFIG_ATARI_ROM_ISA
397	if (MACH_IS_ATARI) {
398		isa_type = ISA_TYPE_ENEC;
399		isa_sex = 0;
400	}
401#endif
402#endif
403}
404
405static int show_cpuinfo(struct seq_file *m, void *v)
406{
407	const char *cpu, *mmu, *fpu;
408	unsigned long clockfreq, clockfactor;
409
410#define LOOP_CYCLES_68020	(8)
411#define LOOP_CYCLES_68030	(8)
412#define LOOP_CYCLES_68040	(3)
413#define LOOP_CYCLES_68060	(1)
414#define LOOP_CYCLES_COLDFIRE	(2)
415
416	if (CPU_IS_020) {
417		cpu = "68020";
418		clockfactor = LOOP_CYCLES_68020;
419	} else if (CPU_IS_030) {
420		cpu = "68030";
421		clockfactor = LOOP_CYCLES_68030;
422	} else if (CPU_IS_040) {
423		cpu = "68040";
424		clockfactor = LOOP_CYCLES_68040;
425	} else if (CPU_IS_060) {
426		cpu = "68060";
427		clockfactor = LOOP_CYCLES_68060;
428	} else if (CPU_IS_COLDFIRE) {
429		cpu = "ColdFire";
430		clockfactor = LOOP_CYCLES_COLDFIRE;
431	} else {
432		cpu = "680x0";
433		clockfactor = 0;
434	}
435
436#ifdef CONFIG_M68KFPU_EMU_ONLY
437	fpu = "none(soft float)";
438#else
439	if (m68k_fputype & FPU_68881)
440		fpu = "68881";
441	else if (m68k_fputype & FPU_68882)
442		fpu = "68882";
443	else if (m68k_fputype & FPU_68040)
444		fpu = "68040";
445	else if (m68k_fputype & FPU_68060)
446		fpu = "68060";
447	else if (m68k_fputype & FPU_SUNFPA)
448		fpu = "Sun FPA";
449	else if (m68k_fputype & FPU_COLDFIRE)
450		fpu = "ColdFire";
451	else
452		fpu = "none";
453#endif
454
455	if (m68k_mmutype & MMU_68851)
456		mmu = "68851";
457	else if (m68k_mmutype & MMU_68030)
458		mmu = "68030";
459	else if (m68k_mmutype & MMU_68040)
460		mmu = "68040";
461	else if (m68k_mmutype & MMU_68060)
462		mmu = "68060";
463	else if (m68k_mmutype & MMU_SUN3)
464		mmu = "Sun-3";
465	else if (m68k_mmutype & MMU_APOLLO)
466		mmu = "Apollo";
467	else if (m68k_mmutype & MMU_COLDFIRE)
468		mmu = "ColdFire";
469	else
470		mmu = "unknown";
471
472	clockfreq = loops_per_jiffy * HZ * clockfactor;
473
474	seq_printf(m, "CPU:\t\t%s\n"
475		   "MMU:\t\t%s\n"
476		   "FPU:\t\t%s\n"
477		   "Clocking:\t%lu.%1luMHz\n"
478		   "BogoMips:\t%lu.%02lu\n"
479		   "Calibration:\t%lu loops\n",
480		   cpu, mmu, fpu,
481		   clockfreq/1000000,(clockfreq/100000)%10,
482		   loops_per_jiffy/(500000/HZ),(loops_per_jiffy/(5000/HZ))%100,
483		   loops_per_jiffy);
484	return 0;
485}
486
487static void *c_start(struct seq_file *m, loff_t *pos)
488{
489	return *pos < 1 ? (void *)1 : NULL;
490}
491static void *c_next(struct seq_file *m, void *v, loff_t *pos)
492{
493	++*pos;
494	return NULL;
495}
496static void c_stop(struct seq_file *m, void *v)
497{
498}
499const struct seq_operations cpuinfo_op = {
500	.start	= c_start,
501	.next	= c_next,
502	.stop	= c_stop,
503	.show	= show_cpuinfo,
504};
505
506#ifdef CONFIG_PROC_HARDWARE
507static int hardware_proc_show(struct seq_file *m, void *v)
508{
509	char model[80];
510	unsigned long mem;
511	int i;
512
513	if (mach_get_model)
514		mach_get_model(model);
515	else
516		strcpy(model, "Unknown m68k");
517
518	seq_printf(m, "Model:\t\t%s\n", model);
519	for (mem = 0, i = 0; i < m68k_num_memory; i++)
520		mem += m68k_memory[i].size;
521	seq_printf(m, "System Memory:\t%ldK\n", mem >> 10);
522
523	if (mach_get_hardware_list)
524		mach_get_hardware_list(m);
525
526	return 0;
527}
528
529static int hardware_proc_open(struct inode *inode, struct file *file)
530{
531	return single_open(file, hardware_proc_show, NULL);
532}
533
534static const struct file_operations hardware_proc_fops = {
535	.open		= hardware_proc_open,
536	.read		= seq_read,
537	.llseek		= seq_lseek,
538	.release	= single_release,
539};
540
541static int __init proc_hardware_init(void)
542{
543	proc_create("hardware", 0, NULL, &hardware_proc_fops);
544	return 0;
545}
546module_init(proc_hardware_init);
547#endif
548
549void check_bugs(void)
550{
551#ifndef CONFIG_M68KFPU_EMU
552	if (m68k_fputype == 0) {
553		pr_emerg("*** YOU DO NOT HAVE A FLOATING POINT UNIT, "
554			"WHICH IS REQUIRED BY LINUX/M68K ***\n");
555		pr_emerg("Upgrade your hardware or join the FPU "
556			"emulation project\n");
557		panic("no FPU");
558	}
559#endif /* !CONFIG_M68KFPU_EMU */
560}
561
562#ifdef CONFIG_ADB
563static int __init adb_probe_sync_enable (char *str) {
564	extern int __adb_probe_sync;
565	__adb_probe_sync = 1;
566	return 1;
567}
568
569__setup("adb_sync", adb_probe_sync_enable);
570#endif /* CONFIG_ADB */
571