[mirror_ubuntu-focal-kernel.git] / arch / mips / dec / prom / identify.c

/*
 * identify.c: machine identification code.
 *
 * Copyright (C) 1998 Harald Koerfgen and Paul M. Antoine
 * Copyright (C) 2002, 2003, 2004, 2005  Maciej W. Rozycki
 */
#include <linux/init.h>
#include <linux/kernel.h>
#include <linux/mc146818rtc.h>
#include <linux/module.h>
#include <linux/string.h>
#include <linux/types.h>

#include <asm/bootinfo.h>

#include <asm/dec/ioasic.h>
#include <asm/dec/ioasic_addrs.h>
#include <asm/dec/kn01.h>
#include <asm/dec/kn02.h>
#include <asm/dec/kn02ba.h>
#include <asm/dec/kn02ca.h>
#include <asm/dec/kn03.h>
#include <asm/dec/kn230.h>
#include <asm/dec/prom.h>
#include <asm/dec/system.h>

#include "dectypes.h"

static const char *dec_system_strings[] = {
	[MACH_DSUNKNOWN]	"unknown DECstation",
	[MACH_DS23100]		"DECstation 2100/3100",
	[MACH_DS5100]		"DECsystem 5100",
	[MACH_DS5000_200]	"DECstation 5000/200",
	[MACH_DS5000_1XX]	"DECstation 5000/1xx",
	[MACH_DS5000_XX]	"Personal DECstation 5000/xx",
	[MACH_DS5000_2X0]	"DECstation 5000/2x0",
	[MACH_DS5400]		"DECsystem 5400",
	[MACH_DS5500]		"DECsystem 5500",
	[MACH_DS5800]		"DECsystem 5800",
	[MACH_DS5900]		"DECsystem 5900",
};

const char *get_system_type(void)
{
#define STR_BUF_LEN	64
	static char system[STR_BUF_LEN];
	static int called = 0;

	if (called == 0) {
		called = 1;
		snprintf(system, STR_BUF_LEN, "Digital %s",
			 dec_system_strings[mips_machtype]);
	}

	return system;
}


/*
 * Setup essential system-specific memory addresses.  We need them
 * early.  Semantically the functions belong to prom/init.c, but they
 * are compact enough we want them inlined. --macro
 */
volatile u8 *dec_rtc_base;

EXPORT_SYMBOL(dec_rtc_base);

static inline void prom_init_kn01(void)
{
	dec_kn_slot_base = KN01_SLOT_BASE;
	dec_kn_slot_size = KN01_SLOT_SIZE;

	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + KN01_RTC);
}

static inline void prom_init_kn230(void)
{
	dec_kn_slot_base = KN01_SLOT_BASE;
	dec_kn_slot_size = KN01_SLOT_SIZE;

	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + KN01_RTC);
}

static inline void prom_init_kn02(void)
{
	dec_kn_slot_base = KN02_SLOT_BASE;
	dec_kn_slot_size = KN02_SLOT_SIZE;
	dec_tc_bus = 1;

	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + KN02_RTC);
}

static inline void prom_init_kn02xa(void)
{
	dec_kn_slot_base = KN02XA_SLOT_BASE;
	dec_kn_slot_size = IOASIC_SLOT_SIZE;
	dec_tc_bus = 1;

	ioasic_base = (void *)CKSEG1ADDR(dec_kn_slot_base + IOASIC_IOCTL);
	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + IOASIC_TOY);
}

static inline void prom_init_kn03(void)
{
	dec_kn_slot_base = KN03_SLOT_BASE;
	dec_kn_slot_size = IOASIC_SLOT_SIZE;
	dec_tc_bus = 1;

	ioasic_base = (void *)CKSEG1ADDR(dec_kn_slot_base + IOASIC_IOCTL);
	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + IOASIC_TOY);
}


void __init prom_identify_arch(u32 magic)
{
	unsigned char dec_cpunum, dec_firmrev, dec_etc, dec_systype;
	u32 dec_sysid;

	if (!prom_is_rex(magic)) {
		dec_sysid = simple_strtoul(prom_getenv("systype"),
					   (char **)0, 0);
	} else {
		dec_sysid = rex_getsysid();
		if (dec_sysid == 0) {
			printk("Zero sysid returned from PROM! "
			       "Assuming a PMAX-like machine.\n");
			dec_sysid = 1;
		}
	}

	dec_cpunum = (dec_sysid & 0xff000000) >> 24;
	dec_systype = (dec_sysid & 0xff0000) >> 16;
	dec_firmrev = (dec_sysid & 0xff00) >> 8;
	dec_etc = dec_sysid & 0xff;

	/*
	 * FIXME: This may not be an exhaustive list of DECStations/Servers!
	 * Put all model-specific initialisation calls here.
	 */
	switch (dec_systype) {
	case DS2100_3100:
		mips_machtype = MACH_DS23100;
		prom_init_kn01();
		break;
	case DS5100:		/* DS5100 MIPSMATE */
		mips_machtype = MACH_DS5100;
		prom_init_kn230();
		break;
	case DS5000_200:	/* DS5000 3max */
		mips_machtype = MACH_DS5000_200;
		prom_init_kn02();
		break;
	case DS5000_1XX:	/* DS5000/100 3min */
		mips_machtype = MACH_DS5000_1XX;
		prom_init_kn02xa();
		break;
	case DS5000_2X0:	/* DS5000/240 3max+ or DS5900 bigmax */
		mips_machtype = MACH_DS5000_2X0;
		prom_init_kn03();
		if (!(ioasic_read(IO_REG_SIR) & KN03_IO_INR_3MAXP))
			mips_machtype = MACH_DS5900;
		break;
	case DS5000_XX:		/* Personal DS5000/xx maxine */
		mips_machtype = MACH_DS5000_XX;
		prom_init_kn02xa();
		break;
	case DS5800:		/* DS5800 Isis */
		mips_machtype = MACH_DS5800;
		break;
	case DS5400:		/* DS5400 MIPSfair */
		mips_machtype = MACH_DS5400;
		break;
	case DS5500:		/* DS5500 MIPSfair-2 */
		mips_machtype = MACH_DS5500;
		break;
	default:
		mips_machtype = MACH_DSUNKNOWN;
		break;
	}

	if (mips_machtype == MACH_DSUNKNOWN)
		printk("This is an %s, id is %x\n",
		       dec_system_strings[mips_machtype], dec_systype);
	else
		printk("This is a %s\n", dec_system_strings[mips_machtype]);
}
Commit	Line	Data
1da177e4 LT	1	/*
	2	* identify.c: machine identification code.
	3	*
	4	* Copyright (C) 1998 Harald Koerfgen and Paul M. Antoine
a5fc9c0b	5	* Copyright (C) 2002, 2003, 2004, 2005 Maciej W. Rozycki
1da177e4 LT	6	*/
	7	#include <linux/init.h>
	8	#include <linux/kernel.h>
	9	#include <linux/mc146818rtc.h>
	10	#include <linux/module.h>
	11	#include <linux/string.h>
	12	#include <linux/types.h>
	13
	14	#include <asm/bootinfo.h>
a5fc9c0b	15
1da177e4 LT	16	#include <asm/dec/ioasic.h>
	17	#include <asm/dec/ioasic_addrs.h>
	18	#include <asm/dec/kn01.h>
	19	#include <asm/dec/kn02.h>
	20	#include <asm/dec/kn02ba.h>
	21	#include <asm/dec/kn02ca.h>
	22	#include <asm/dec/kn03.h>
	23	#include <asm/dec/kn230.h>
	24	#include <asm/dec/prom.h>
a5fc9c0b	25	#include <asm/dec/system.h>
1da177e4 LT	26
	27	#include "dectypes.h"
	28
1da177e4 LT	29	static const char *dec_system_strings[] = {
	30	[MACH_DSUNKNOWN] "unknown DECstation",
	31	[MACH_DS23100] "DECstation 2100/3100",
	32	[MACH_DS5100] "DECsystem 5100",
	33	[MACH_DS5000_200] "DECstation 5000/200",
	34	[MACH_DS5000_1XX] "DECstation 5000/1xx",
	35	[MACH_DS5000_XX] "Personal DECstation 5000/xx",
	36	[MACH_DS5000_2X0] "DECstation 5000/2x0",
	37	[MACH_DS5400] "DECsystem 5400",
	38	[MACH_DS5500] "DECsystem 5500",
	39	[MACH_DS5800] "DECsystem 5800",
	40	[MACH_DS5900] "DECsystem 5900",
	41	};
	42
	43	const char *get_system_type(void)
	44	{
	45	#define STR_BUF_LEN 64
	46	static char system[STR_BUF_LEN];
	47	static int called = 0;
	48
	49	if (called == 0) {
	50	called = 1;
	51	snprintf(system, STR_BUF_LEN, "Digital %s",
	52	dec_system_strings[mips_machtype]);
	53	}
	54
	55	return system;
	56	}
	57
	58
	59	/*
	60	* Setup essential system-specific memory addresses. We need them
	61	* early. Semantically the functions belong to prom/init.c, but they
	62	* are compact enough we want them inlined. --macro
	63	*/
	64	volatile u8 *dec_rtc_base;
	65
	66	EXPORT_SYMBOL(dec_rtc_base);
	67
	68	static inline void prom_init_kn01(void)
	69	{
a5fc9c0b	70	dec_kn_slot_base = KN01_SLOT_BASE;
1da177e4	71	dec_kn_slot_size = KN01_SLOT_SIZE;
a5fc9c0b MR	72
a5fc9c0b MR	73	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + KN01_RTC);
1da177e4 LT	74	}
	75
	76	static inline void prom_init_kn230(void)
	77	{
a5fc9c0b	78	dec_kn_slot_base = KN01_SLOT_BASE;
1da177e4	79	dec_kn_slot_size = KN01_SLOT_SIZE;
a5fc9c0b MR	80
a5fc9c0b MR	81	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + KN01_RTC);
1da177e4 LT	82	}
	83
	84	static inline void prom_init_kn02(void)
	85	{
a5fc9c0b	86	dec_kn_slot_base = KN02_SLOT_BASE;
1da177e4	87	dec_kn_slot_size = KN02_SLOT_SIZE;
33cf45b9	88	dec_tc_bus = 1;
a5fc9c0b MR	89
a5fc9c0b MR	90	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + KN02_RTC);
1da177e4 LT	91	}
	92
	93	static inline void prom_init_kn02xa(void)
	94	{
a5fc9c0b	95	dec_kn_slot_base = KN02XA_SLOT_BASE;
1da177e4	96	dec_kn_slot_size = IOASIC_SLOT_SIZE;
33cf45b9	97	dec_tc_bus = 1;
a5fc9c0b MR	98
	99	ioasic_base = (void *)CKSEG1ADDR(dec_kn_slot_base + IOASIC_IOCTL);
	100	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + IOASIC_TOY);
1da177e4 LT	101	}
	102
	103	static inline void prom_init_kn03(void)
	104	{
a5fc9c0b	105	dec_kn_slot_base = KN03_SLOT_BASE;
1da177e4	106	dec_kn_slot_size = IOASIC_SLOT_SIZE;
33cf45b9	107	dec_tc_bus = 1;
a5fc9c0b MR	108
	109	ioasic_base = (void *)CKSEG1ADDR(dec_kn_slot_base + IOASIC_IOCTL);
	110	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + IOASIC_TOY);
1da177e4 LT	111	}
	112
	113
	114	void __init prom_identify_arch(u32 magic)
	115	{
	116	unsigned char dec_cpunum, dec_firmrev, dec_etc, dec_systype;
	117	u32 dec_sysid;
	118
	119	if (!prom_is_rex(magic)) {
	120	dec_sysid = simple_strtoul(prom_getenv("systype"),
	121	(char **)0, 0);
	122	} else {
	123	dec_sysid = rex_getsysid();
	124	if (dec_sysid == 0) {
	125	printk("Zero sysid returned from PROM! "
	126	"Assuming a PMAX-like machine.\n");
	127	dec_sysid = 1;
	128	}
	129	}
	130
	131	dec_cpunum = (dec_sysid & 0xff000000) >> 24;
	132	dec_systype = (dec_sysid & 0xff0000) >> 16;
	133	dec_firmrev = (dec_sysid & 0xff00) >> 8;
	134	dec_etc = dec_sysid & 0xff;
	135
1da177e4 LT	136	/*
	137	* FIXME: This may not be an exhaustive list of DECStations/Servers!
	138	* Put all model-specific initialisation calls here.
	139	*/
	140	switch (dec_systype) {
	141	case DS2100_3100:
	142	mips_machtype = MACH_DS23100;
	143	prom_init_kn01();
	144	break;
	145	case DS5100: /* DS5100 MIPSMATE */
	146	mips_machtype = MACH_DS5100;
	147	prom_init_kn230();
	148	break;
	149	case DS5000_200: /* DS5000 3max */
	150	mips_machtype = MACH_DS5000_200;
	151	prom_init_kn02();
	152	break;
	153	case DS5000_1XX: /* DS5000/100 3min */
	154	mips_machtype = MACH_DS5000_1XX;
	155	prom_init_kn02xa();
	156	break;
	157	case DS5000_2X0: /* DS5000/240 3max+ or DS5900 bigmax */
	158	mips_machtype = MACH_DS5000_2X0;
	159	prom_init_kn03();
	160	if (!(ioasic_read(IO_REG_SIR) & KN03_IO_INR_3MAXP))
	161	mips_machtype = MACH_DS5900;
	162	break;
	163	case DS5000_XX: /* Personal DS5000/xx maxine */
	164	mips_machtype = MACH_DS5000_XX;
	165	prom_init_kn02xa();
	166	break;
	167	case DS5800: /* DS5800 Isis */
	168	mips_machtype = MACH_DS5800;
	169	break;
	170	case DS5400: /* DS5400 MIPSfair */
	171	mips_machtype = MACH_DS5400;
	172	break;
	173	case DS5500: /* DS5500 MIPSfair-2 */
	174	mips_machtype = MACH_DS5500;
	175	break;
	176	default:
	177	mips_machtype = MACH_DSUNKNOWN;
	178	break;
	179	}
	180
	181	if (mips_machtype == MACH_DSUNKNOWN)
	182	printk("This is an %s, id is %x\n",
	183	dec_system_strings[mips_machtype], dec_systype);
	184	else
	185	printk("This is a %s\n", dec_system_strings[mips_machtype]);
	186	}