idprom.c revision 1.2 1 1.2 gwr /* $NetBSD: idprom.c,v 1.2 1997/01/27 22:16:37 gwr Exp $ */
2 1.1 gwr
3 1.1 gwr /*-
4 1.1 gwr * Copyright (c) 1996 The NetBSD Foundation, Inc.
5 1.1 gwr * All rights reserved.
6 1.1 gwr *
7 1.1 gwr * This code is derived from software contributed to The NetBSD Foundation
8 1.1 gwr * by Adam Glass and Gordon W. Ross.
9 1.1 gwr *
10 1.1 gwr * Redistribution and use in source and binary forms, with or without
11 1.1 gwr * modification, are permitted provided that the following conditions
12 1.1 gwr * are met:
13 1.1 gwr * 1. Redistributions of source code must retain the above copyright
14 1.1 gwr * notice, this list of conditions and the following disclaimer.
15 1.1 gwr * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 gwr * notice, this list of conditions and the following disclaimer in the
17 1.1 gwr * documentation and/or other materials provided with the distribution.
18 1.1 gwr * 3. All advertising materials mentioning features or use of this software
19 1.1 gwr * must display the following acknowledgement:
20 1.1 gwr * This product includes software developed by the NetBSD
21 1.1 gwr * Foundation, Inc. and its contributors.
22 1.1 gwr * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.1 gwr * contributors may be used to endorse or promote products derived
24 1.1 gwr * from this software without specific prior written permission.
25 1.1 gwr *
26 1.1 gwr * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.1 gwr * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.1 gwr * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.1 gwr * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.1 gwr * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.1 gwr * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.1 gwr * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.1 gwr * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.1 gwr * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.1 gwr * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.1 gwr * POSSIBILITY OF SUCH DAMAGE.
37 1.1 gwr */
38 1.1 gwr
39 1.1 gwr /*
40 1.1 gwr * Machine ID PROM - system type and serial number
41 1.1 gwr */
42 1.1 gwr
43 1.1 gwr #include <sys/param.h>
44 1.1 gwr #include <sys/systm.h>
45 1.1 gwr #include <sys/device.h>
46 1.1 gwr #include <sys/kernel.h>
47 1.1 gwr
48 1.1 gwr #include <machine/autoconf.h>
49 1.1 gwr #include <machine/idprom.h>
50 1.1 gwr #include <machine/obio.h>
51 1.2 gwr #include <machine/machdep.h>
52 1.1 gwr #include <machine/mon.h>
53 1.1 gwr
54 1.1 gwr /*
55 1.1 gwr * This structure is what this driver is all about.
56 1.1 gwr * It is copied from the device early in startup.
57 1.1 gwr */
58 1.1 gwr struct idprom identity_prom;
59 1.1 gwr static char *idprom_va;
60 1.1 gwr
61 1.1 gwr /*
62 1.1 gwr * This is called very early during startup to
63 1.1 gwr * get a copy of the idprom from control space.
64 1.1 gwr */
65 1.1 gwr void
66 1.1 gwr idprom_init()
67 1.1 gwr {
68 1.1 gwr struct idprom *idp;
69 1.1 gwr char *src, *dst;
70 1.1 gwr int len, x, xorsum;
71 1.1 gwr union {
72 1.1 gwr long l;
73 1.1 gwr char c[4];
74 1.1 gwr } hid;
75 1.1 gwr
76 1.1 gwr idprom_va = obio_find_mapping(OBIO_IDPROM2, sizeof(struct idprom));
77 1.1 gwr
78 1.1 gwr idp = &identity_prom;
79 1.1 gwr dst = (char*)idp;
80 1.1 gwr src = (char*)idprom_va;
81 1.1 gwr len = IDPROM_SIZE;
82 1.1 gwr xorsum = 0; /* calculated as xor of data */
83 1.1 gwr
84 1.1 gwr do {
85 1.1 gwr x = *src++;
86 1.1 gwr *dst++ = x;
87 1.1 gwr xorsum ^= x;
88 1.1 gwr } while (--len > 0);
89 1.1 gwr
90 1.1 gwr if (xorsum != 0) {
91 1.1 gwr mon_printf("idprom_fetch: bad checksum=%d\n", xorsum);
92 1.2 gwr sunmon_abort();
93 1.1 gwr }
94 1.1 gwr if (idp->idp_format < 1) {
95 1.1 gwr mon_printf("idprom_fetch: bad version=%d\n", idp->idp_format);
96 1.2 gwr sunmon_abort();
97 1.1 gwr }
98 1.1 gwr
99 1.1 gwr /*
100 1.1 gwr * Construct the hostid from the idprom contents.
101 1.1 gwr * This appears to be the way SunOS does it.
102 1.1 gwr */
103 1.1 gwr hid.c[0] = idp->idp_machtype;
104 1.1 gwr hid.c[1] = idp->idp_serialnum[0];
105 1.1 gwr hid.c[2] = idp->idp_serialnum[1];
106 1.1 gwr hid.c[3] = idp->idp_serialnum[2];
107 1.1 gwr hostid = hid.l;
108 1.1 gwr }
109 1.1 gwr
110 1.1 gwr void idprom_etheraddr(eaddrp)
111 1.1 gwr u_char *eaddrp;
112 1.1 gwr {
113 1.1 gwr u_char *src, *dst;
114 1.1 gwr int len = 6;
115 1.1 gwr
116 1.1 gwr src = identity_prom.idp_etheraddr;
117 1.1 gwr dst = eaddrp;
118 1.1 gwr
119 1.1 gwr do *dst++ = *src++;
120 1.1 gwr while (--len > 0);
121 1.1 gwr }
122