[linux.git] / arch / m68k / sun3 / idprom.c

/*
 * idprom.c: Routines to load the idprom into kernel addresses and
 *           interpret the data contained within.
 *
 * Copyright (C) 1995 David S. Miller ([email protected])
 * Sun3/3x models added by David Monro ([email protected])
 */

#include <linux/module.h>
#include <linux/kernel.h>
#include <linux/types.h>
#include <linux/init.h>
#include <linux/string.h>

#include <asm/oplib.h>
#include <asm/idprom.h>
#include <asm/machines.h>  /* Fun with Sun released architectures. */

struct idprom *idprom;
EXPORT_SYMBOL(idprom);

static struct idprom idprom_buffer;

/* Here is the master table of Sun machines which use some implementation
 * of the Sparc CPU and have a meaningful IDPROM machtype value that we
 * know about.  See asm-sparc/machines.h for empirical constants.
 */
static struct Sun_Machine_Models Sun_Machines[NUM_SUN_MACHINES] = {
/* First, Sun3's */
    { .name = "Sun 3/160 Series",	.id_machtype = (SM_SUN3 | SM_3_160) },
    { .name = "Sun 3/50",		.id_machtype = (SM_SUN3 | SM_3_50) },
    { .name = "Sun 3/260 Series",	.id_machtype = (SM_SUN3 | SM_3_260) },
    { .name = "Sun 3/110 Series",	.id_machtype = (SM_SUN3 | SM_3_110) },
    { .name = "Sun 3/60",		.id_machtype = (SM_SUN3 | SM_3_60) },
    { .name = "Sun 3/E",		.id_machtype = (SM_SUN3 | SM_3_E) },
/* Now, Sun3x's */
    { .name = "Sun 3/460 Series",	.id_machtype = (SM_SUN3X | SM_3_460) },
    { .name = "Sun 3/80",		.id_machtype = (SM_SUN3X | SM_3_80) },
/* Then, Sun4's */
// { .name = "Sun 4/100 Series",	.id_machtype = (SM_SUN4 | SM_4_110) },
// { .name = "Sun 4/200 Series",	.id_machtype = (SM_SUN4 | SM_4_260) },
// { .name = "Sun 4/300 Series",	.id_machtype = (SM_SUN4 | SM_4_330) },
// { .name = "Sun 4/400 Series",	.id_machtype = (SM_SUN4 | SM_4_470) },
/* And now, Sun4c's */
// { .name = "Sun4c SparcStation 1",	.id_machtype = (SM_SUN4C | SM_4C_SS1) },
// { .name = "Sun4c SparcStation IPC",	.id_machtype = (SM_SUN4C | SM_4C_IPC) },
// { .name = "Sun4c SparcStation 1+",	.id_machtype = (SM_SUN4C | SM_4C_SS1PLUS) },
// { .name = "Sun4c SparcStation SLC",	.id_machtype = (SM_SUN4C | SM_4C_SLC) },
// { .name = "Sun4c SparcStation 2",	.id_machtype = (SM_SUN4C | SM_4C_SS2) },
// { .name = "Sun4c SparcStation ELC",	.id_machtype = (SM_SUN4C | SM_4C_ELC) },
// { .name = "Sun4c SparcStation IPX",	.id_machtype = (SM_SUN4C | SM_4C_IPX) },
/* Finally, early Sun4m's */
// { .name = "Sun4m SparcSystem600",	.id_machtype = (SM_SUN4M | SM_4M_SS60) },
// { .name = "Sun4m SparcStation10/20",	.id_machtype = (SM_SUN4M | SM_4M_SS50) },
// { .name = "Sun4m SparcStation5",	.id_machtype = (SM_SUN4M | SM_4M_SS40) },
/* One entry for the OBP arch's which are sun4d, sun4e, and newer sun4m's */
// { .name = "Sun4M OBP based system",	.id_machtype = (SM_SUN4M_OBP | 0x0) }
};

static void __init display_system_type(unsigned char machtype)
{
	register int i;

	for (i = 0; i < NUM_SUN_MACHINES; i++) {
		if(Sun_Machines[i].id_machtype == machtype) {
			if (machtype != (SM_SUN4M_OBP | 0x00))
				printk("TYPE: %s\n", Sun_Machines[i].name);
			else {
#if 0
				prom_getproperty(prom_root_node, "banner-name",
						 sysname, sizeof(sysname));
				printk("TYPE: %s\n", sysname);
#endif
			}
			return;
		}
	}

	prom_printf("IDPROM: Bogus id_machtype value, 0x%x\n", machtype);
	prom_halt();
}

void sun3_get_model(unsigned char* model)
{
	register int i;

	for (i = 0; i < NUM_SUN_MACHINES; i++) {
		if(Sun_Machines[i].id_machtype == idprom->id_machtype) {
		        strcpy(model, Sun_Machines[i].name);
			return;
		}
	}
}


/* Calculate the IDPROM checksum (xor of the data bytes). */
static unsigned char __init calc_idprom_cksum(struct idprom *idprom)
{
	unsigned char cksum, i, *ptr = (unsigned char *)idprom;

	for (i = cksum = 0; i <= 0x0E; i++)
		cksum ^= *ptr++;

	return cksum;
}

/* Create a local IDPROM copy, verify integrity, and display information. */
void __init idprom_init(void)
{
	prom_get_idprom((char *) &idprom_buffer, sizeof(idprom_buffer));

	idprom = &idprom_buffer;

	if (idprom->id_format != 0x01)  {
		prom_printf("IDPROM: Unknown format type!\n");
		prom_halt();
	}

	if (idprom->id_cksum != calc_idprom_cksum(idprom)) {
		prom_printf("IDPROM: Checksum failure (nvram=%x, calc=%x)!\n",
			    idprom->id_cksum, calc_idprom_cksum(idprom));
		prom_halt();
	}

	display_system_type(idprom->id_machtype);

	printk("Ethernet address: %x:%x:%x:%x:%x:%x\n",
		    idprom->id_ethaddr[0], idprom->id_ethaddr[1],
		    idprom->id_ethaddr[2], idprom->id_ethaddr[3],
		    idprom->id_ethaddr[4], idprom->id_ethaddr[5]);
}
Commit	Line	Data
f30828a6	1	/*
1da177e4 LT	2	* idprom.c: Routines to load the idprom into kernel addresses and
	3	* interpret the data contained within.
	4	*
	5	* Copyright (C) 1995 David S. Miller ([email protected])
	6	* Sun3/3x models added by David Monro ([email protected])
	7	*/
	8
2e811488	9	#include <linux/module.h>
1da177e4 LT	10	#include <linux/kernel.h>
	11	#include <linux/types.h>
	12	#include <linux/init.h>
	13	#include <linux/string.h>
	14
	15	#include <asm/oplib.h>
	16	#include <asm/idprom.h>
	17	#include <asm/machines.h> /* Fun with Sun released architectures. */
	18
	19	struct idprom *idprom;
2e811488 AV	20	EXPORT_SYMBOL(idprom);
2e811488 AV	21
1da177e4 LT	22	static struct idprom idprom_buffer;
	23
	24	/* Here is the master table of Sun machines which use some implementation
	25	* of the Sparc CPU and have a meaningful IDPROM machtype value that we
	26	* know about. See asm-sparc/machines.h for empirical constants.
	27	*/
07b81259	28	static struct Sun_Machine_Models Sun_Machines[NUM_SUN_MACHINES] = {
1da177e4 LT	29	/* First, Sun3's */
	30	{ .name = "Sun 3/160 Series", .id_machtype = (SM_SUN3 \| SM_3_160) },
	31	{ .name = "Sun 3/50", .id_machtype = (SM_SUN3 \| SM_3_50) },
	32	{ .name = "Sun 3/260 Series", .id_machtype = (SM_SUN3 \| SM_3_260) },
	33	{ .name = "Sun 3/110 Series", .id_machtype = (SM_SUN3 \| SM_3_110) },
	34	{ .name = "Sun 3/60", .id_machtype = (SM_SUN3 \| SM_3_60) },
	35	{ .name = "Sun 3/E", .id_machtype = (SM_SUN3 \| SM_3_E) },
	36	/* Now, Sun3x's */
	37	{ .name = "Sun 3/460 Series", .id_machtype = (SM_SUN3X \| SM_3_460) },
	38	{ .name = "Sun 3/80", .id_machtype = (SM_SUN3X \| SM_3_80) },
	39	/* Then, Sun4's */
	40	// { .name = "Sun 4/100 Series", .id_machtype = (SM_SUN4 \| SM_4_110) },
	41	// { .name = "Sun 4/200 Series", .id_machtype = (SM_SUN4 \| SM_4_260) },
	42	// { .name = "Sun 4/300 Series", .id_machtype = (SM_SUN4 \| SM_4_330) },
	43	// { .name = "Sun 4/400 Series", .id_machtype = (SM_SUN4 \| SM_4_470) },
	44	/* And now, Sun4c's */
	45	// { .name = "Sun4c SparcStation 1", .id_machtype = (SM_SUN4C \| SM_4C_SS1) },
	46	// { .name = "Sun4c SparcStation IPC", .id_machtype = (SM_SUN4C \| SM_4C_IPC) },
	47	// { .name = "Sun4c SparcStation 1+", .id_machtype = (SM_SUN4C \| SM_4C_SS1PLUS) },
	48	// { .name = "Sun4c SparcStation SLC", .id_machtype = (SM_SUN4C \| SM_4C_SLC) },
	49	// { .name = "Sun4c SparcStation 2", .id_machtype = (SM_SUN4C \| SM_4C_SS2) },
	50	// { .name = "Sun4c SparcStation ELC", .id_machtype = (SM_SUN4C \| SM_4C_ELC) },
	51	// { .name = "Sun4c SparcStation IPX", .id_machtype = (SM_SUN4C \| SM_4C_IPX) },
	52	/* Finally, early Sun4m's */
	53	// { .name = "Sun4m SparcSystem600", .id_machtype = (SM_SUN4M \| SM_4M_SS60) },
	54	// { .name = "Sun4m SparcStation10/20", .id_machtype = (SM_SUN4M \| SM_4M_SS50) },
	55	// { .name = "Sun4m SparcStation5", .id_machtype = (SM_SUN4M \| SM_4M_SS40) },
	56	/* One entry for the OBP arch's which are sun4d, sun4e, and newer sun4m's */
	57	// { .name = "Sun4M OBP based system", .id_machtype = (SM_SUN4M_OBP \| 0x0) }
	58	};
	59
	60	static void __init display_system_type(unsigned char machtype)
	61	{
	62	register int i;
	63
	64	for (i = 0; i < NUM_SUN_MACHINES; i++) {
	65	if(Sun_Machines[i].id_machtype == machtype) {
	66	if (machtype != (SM_SUN4M_OBP \| 0x00))
	67	printk("TYPE: %s\n", Sun_Machines[i].name);
	68	else {
	69	#if 0
	70	prom_getproperty(prom_root_node, "banner-name",
	71	sysname, sizeof(sysname));
	72	printk("TYPE: %s\n", sysname);
	73	#endif
	74	}
	75	return;
	76	}
	77	}
	78
	79	prom_printf("IDPROM: Bogus id_machtype value, 0x%x\n", machtype);
	80	prom_halt();
	81	}
	82
	83	void sun3_get_model(unsigned char* model)
	84	{
	85	register int i;
	86
	87	for (i = 0; i < NUM_SUN_MACHINES; i++) {
	88	if(Sun_Machines[i].id_machtype == idprom->id_machtype) {
	89	strcpy(model, Sun_Machines[i].name);
	90	return;
	91	}
	92	}
93	}
94
95
96
97	/* Calculate the IDPROM checksum (xor of the data bytes). */
98	static unsigned char __init calc_idprom_cksum(struct idprom *idprom)
99	{
100	unsigned char cksum, i, ptr = (unsigned char )idprom;
101
102	for (i = cksum = 0; i <= 0x0E; i++)
103	cksum ^= *ptr++;
104
105	return cksum;
106	}
107
108	/* Create a local IDPROM copy, verify integrity, and display information. */
109	void __init idprom_init(void)
110	{
111	prom_get_idprom((char *) &idprom_buffer, sizeof(idprom_buffer));
112
113	idprom = &idprom_buffer;
114
115	if (idprom->id_format != 0x01) {
116	prom_printf("IDPROM: Unknown format type!\n");
117	prom_halt();
118	}
119
120	if (idprom->id_cksum != calc_idprom_cksum(idprom)) {
121	prom_printf("IDPROM: Checksum failure (nvram=%x, calc=%x)!\n",
122	idprom->id_cksum, calc_idprom_cksum(idprom));
123	prom_halt();
124	}
125
126	display_system_type(idprom->id_machtype);
127
128	printk("Ethernet address: %x:%x:%x:%x:%x:%x\n",
129	idprom->id_ethaddr[0], idprom->id_ethaddr[1],
130	idprom->id_ethaddr[2], idprom->id_ethaddr[3],
131	idprom->id_ethaddr[4], idprom->id_ethaddr[5]);
132	}