1 /* $NetBSD: idprom.c,v 1.5 2008/04/28 20:23:39 martin Exp $ */ 2 3 /*- 4 * Copyright (c) 1998 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Adam Glass and Gordon W. Ross. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 /* 33 * Machine ID PROM - system type and serial number 34 */ 35 36 #include <sys/types.h> 37 #include <machine/idprom.h> 38 #include <machine/mon.h> 39 40 #include "libsa.h" 41 42 /* 43 * This driver provides a soft copy of the IDPROM. 44 * It is copied from the device early in startup. 45 * Allow these to be patched (helps with poor old 46 * Sun3/80 boxes with dead NVRAM). 47 */ 48 u_char cpu_machine_id = 0; 49 struct idprom identity_prom = { 0 }; 50 51 int idprom_cksum(u_char *); 52 void idprom_init2(void); 53 void idprom_init3(void); 54 void idprom_init3x(void); 55 56 int 57 idprom_cksum(u_char *p) 58 { 59 int len, x; 60 61 len = IDPROM_CKSUM_SIZE; 62 x = 0; /* xor of data */ 63 do x ^= *p++; 64 while (--len > 0); 65 return (x); 66 } 67 68 /* Copy the ethernet address into the passed space. */ 69 void 70 idprom_etheraddr(u_char *eaddrp) 71 { 72 73 idprom_init(); 74 memcpy(eaddrp, identity_prom.idp_etheraddr, 6); 75 } 76 77 /* Fetch a copy of the idprom. */ 78 void 79 idprom_init(void) 80 { 81 82 if (identity_prom.idp_format == 1) 83 return; 84 85 /* Copy the IDPROM contents and do the checksum. */ 86 if (_is3x) 87 idprom_init3x(); 88 else if (_is2) 89 idprom_init2(); 90 else 91 idprom_init3(); 92 93 if (identity_prom.idp_format != 1) 94 panic("idprom: bad version"); 95 cpu_machine_id = identity_prom.idp_machtype; 96 } 97 98 /* 99 * Sun2 version: 100 * Just copy it from control space. 101 */ 102 void 103 idprom_init2(void) 104 { 105 106 /* Copy the IDPROM contents and do the checksum. */ 107 sun2_getidprom((u_char *) &identity_prom); 108 if (idprom_cksum((u_char *) &identity_prom)) 109 printf("idprom: bad checksum\n"); 110 } 111 112 /* 113 * Sun3 version: 114 * Just copy it from control space. 115 */ 116 void 117 idprom_init3(void) 118 { 119 120 /* Copy the IDPROM contents and do the checksum. */ 121 sun3_getidprom((u_char *) &identity_prom); 122 if (idprom_cksum((u_char *) &identity_prom)) 123 printf("idprom: bad checksum\n"); 124 } 125 126 /* 127 * Sun3X version: 128 * Rather than do all the map-in/probe work to find the idprom, 129 * we can cheat! We _know_ the monitor already made a copy of 130 * the IDPROM in its data page. All we have to do is find it. 131 * 132 * Yeah, this is sorta gross... Only used on old PROMs that 133 * do not have a sif_macaddr function (rev < 3.0). The area 134 * to search was determined from some "insider" info. about 135 * the layout of the PROM data area. 136 */ 137 void 138 idprom_init3x(void) 139 { 140 u_char *p; 141 142 printf("idprom: Sun3X search for soft copy...\n"); 143 144 for (p = (u_char *)(SUN3X_MONDATA + 0x0400); 145 p < (u_char *)(SUN3X_MONDATA + 0x1c00); p++) 146 { 147 /* first check for some constants */ 148 if (p[0] != 0x01) /* format */ 149 continue; 150 if (p[2] != 0x08) /* ether[0] */ 151 continue; 152 if (p[3] != 0x00) /* ether[1] */ 153 continue; 154 if (p[4] != 0x20) /* ether[2] */ 155 continue; 156 if ((p[1] & 0xfc) != IDM_ARCH_SUN3X) 157 continue; 158 /* Looks plausible. Try the checksum. */ 159 if (idprom_cksum(p) == 0) 160 goto found; 161 } 162 panic("idprom: not found in monitor data"); 163 164 found: 165 printf("idprom: copy found at 0x%x\n", (int)p); 166 memcpy(&identity_prom, p, sizeof(struct idprom)); 167 } 168