1/*
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 (davem@caip.rutgers.edu)
6 * Sun3/3x models added by David Monro (davidm@psrg.cs.usyd.edu.au)
7 */
8
9#include <linux/module.h>
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
19struct idprom *idprom;
20EXPORT_SYMBOL(idprom);
21
22static 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 */
28static struct Sun_Machine_Models Sun_Machines[NUM_SUN_MACHINES] = {
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
60static 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
83void 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). */
98static 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. */
109void __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}
133