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

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