xref: /netbsd/sys/arch/sparc/stand/boot/prompatch.c (revision 6550d01e)
1 /*	$NetBSD: prompatch.c,v 1.12 2005/12/11 12:19:08 christos Exp $ */
2 
3 /*
4  * Copyright (c) 2001 Valeriy E. Ushakov
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. The name of the author may not be used to endorse or promote products
16  *    derived from this software without specific prior written permission
17  *
18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28  */
29 
30 #include <sys/param.h>
31 #include <lib/libsa/stand.h>
32 #include <lib/libkern/libkern.h>
33 #include <machine/promlib.h>
34 
35 
36 void prom_patch(void);
37 
38 static const char *match_c5ip(void);
39 
40 
41 /*
42  * Each patch entry is processed by:
43  * printf(message);  prom_interpret(patch);  printf("\n");
44  */
45 struct patch_entry {
46 	const char *message;
47 	const char *patch;
48 };
49 
50 
51 /*
52  * PROM patches to apply to machine matching name/promvers.
53  */
54 struct prom_patch {
55 	const char *name;		/* "name" of the root node */
56 	int promvers;			/* prom_version() */
57 	const char *(*submatch)(void);	/* Additional matches to test */
58 	const struct patch_entry *patches;	/* The patches themselves */
59 };
60 
61 
62 /*
63  * Patches for JavaStation 1 with OBP 2.30.
64  * NB: its romvec is version 3, so this is PROM_OBP_V3.
65  */
66 static const struct patch_entry patch_js1_obp[] = {
67 
68 /*
69  * Can not remove a node, so just rename bogus /obio/zs so that it
70  * does not get matched.
71  */
72 { "zs: renaming out of the way",
73 	"\" /obio/zs@0,0\" find-device \" fakezs\" name"
74 	" \" /obio/zs@0,100000\" find-device \" fakezs\" name "
75 	" device-end"
76 },
77 
78 /*
79  * Give "su" (com port) "interrupts" property.
80  */
81 { "su: adding \"interrupts\"",
82 	"\" /obio/su\" find-device"
83 	" d# 13 \" interrupts\" integer-attribute"
84 	" device-end"
85 },
86 
87 /*
88  * Create a bare-bones "8042" (pckbc) node - just enough to attach it.
89  */
90 { "8042: creating node",
91 	"0 0 0 0 \" /obio\" begin-package"
92 	" \" 8042\" name"
93 	" 300060 0 8 reg"
94 	" d# 13 \" interrupts\" integer-attribute"
95 	" end-package"
96 },
97 
98 { NULL, NULL }
99 }; /* patch_js1_obp */
100 
101 
102 /*
103  * Patches for JavaStation 1 with OpenFirmware.
104  * PROM in these machines is crippled in many ways.
105  */
106 static const struct patch_entry patch_js1_ofw[] = {
107 
108 /*
109  * JS1/OFW has no CPU node in the device tree.  Create one to save us a
110  * _lot_ of headache in cpu.c and mainbus_attach.  Mostly copied from
111  * OBP2.  While clock-frequency is usually at the root node, add it
112  * here for brevity as kernel checks CPU node for this property anyway.
113  */
114 { "cpu: creating node ", /* NB: space at the end is intentional */
115 	"0 0 0 0 \" /\" begin-package"
116 	" \" FMI,MB86904\" device-name" /* NB: will print the name */
117 	" \" cpu\" device-type"
118 	" 0 \" mid\" integer-property"
119 
120 	" 8 \" sparc-version\" integer-property"
121 	" 4 \" version\" integer-property"
122 	" 0 \" implementation\" integer-property"
123 	" 4 \" psr-version\" integer-property"
124  	" 0 \" psr-implementation\" integer-property"
125 
126 	" d# 100000000 \" clock-frequency\" integer-property"
127 
128 	" d# 4096 \" page-size\" integer-property"
129 	" d# 256 \" mmu-nctx\" integer-property"
130 
131 	" 2 \" ncaches\" integer-property"
132 
133 	" d# 512 \" icache-nlines\" integer-property"
134 	" d# 32 \" icache-line-size\" integer-property"
135 	" 1 \" icache-associativity\" integer-property"
136 
137 	" d# 512 \" dcache-nlines\" integer-property"
138 	" d# 16 \" dcache-line-size\" integer-property"
139 	" 1 \" dcache-associativity\" integer-property"
140 
141 	" 0 0 \" cache-physical?\" property"
142 	" 0 0 \" cache-coherence?\" property"
143 
144 	" end-package"
145 },
146 
147 /*
148  * mk48txx_attach needs a model name, spare clockattach from guesswork.
149  */
150 { "eeprom: adding \"model\"",
151 	"dev /obio/eeprom \" mk48t08\" model device-end"
152 },
153 
154 /*
155  * "interrupts" property is bogusly zero, delete it and let
156  * sbus_get_intr fallback to correct "intr" property.
157  */
158 { "le: deleting bogus \"interrupts\"",
159 	"dev /sbus/ledma/le \" interrupts\" delete-property device-end"
160 },
161 
162 /*
163  * Give "su" (com port) "interrupts" property.
164  */
165 { "su: adding \"interrupts\"",
166 	"dev /obio/su d# 13 \" interrupts\" integer-property device-end"
167 },
168 
169 /*
170  * Give "8042" (pckbc) "interrupts" property.
171  */
172 { "8042: adding \"interrupts\"",
173 	"dev /obio/8042 d# 13 \" interrupts\" integer-property device-end"
174 },
175 
176 { NULL, NULL }
177 }; /* patch_js1_ofw */
178 
179 
180 /*
181  * Patches for Cycle 5 IP.
182  */
183 static const struct patch_entry patch_c5ip[] = {
184 
185 /*
186  * Can not remove a node, so just rename bogus /iommu/sbus/SUNW,CS4231
187  * so that it does not get matched.
188  */
189 { "SUNW,CS4231: renaming out of the way",
190 	"\" /iommu/sbus/SUNW,CS4231@3,c000000\" find-device \" fakeCS4231\" name"
191 	" device-end"
192 },
193 
194 { NULL, NULL }
195 }; /* patch_c5ip */
196 
197 
198 /*
199  * Patches for JavaStation NC, aka Krups.
200  */
201 static const struct patch_entry patch_krups[] = {
202 
203 /*
204  * Check if there's a node for the audio chip, if not create it.
205  */
206 { "sound device node: ",
207 	"\" /pci/ebus/sound\" ' find-device catch"
208 	" 0= if"
209 		" device-end"
210 		" \" ok\""
211 	" else"
212 		" 0 0 0 0 \" /pci/ebus\" begin-package"
213 			" \" sound\" name"
214 			" 200000 1 600 reg"
215 		" end-package"
216 		" \" created\""
217 	" then type"
218 },
219 
220 { NULL, NULL }
221 }; /* patch_krups */
222 
223 
224 static const struct prom_patch prom_patch_tab[] = {
225 	{ "SUNW,JavaStation-1",  PROM_OBP_V3,   NULL,	    patch_js1_obp },
226 	{ "SUNW,JDM1",		 PROM_OPENFIRM, NULL,	    patch_js1_ofw },
227 	{ "SUNW,SPARCstation-5", PROM_OBP_V3,   match_c5ip, patch_c5ip	  },
228 	{ "SUNW,JSIIep",	 PROM_OPENFIRM,	NULL,	    patch_krups   },
229 	{ NULL, 0, NULL }
230 };
231 
232 
233 /*
234  * Additional match routine for Cycle 5 IP.
235  * This uses the SPARCstation 5 PROM almost unchanged, so we check the
236  * "banner-name" attribute of the root node.
237  */
238 static const char *
239 match_c5ip(void)
240 {
241 	if (strcmp(prom_getpropstring(prom_findroot(), "banner-name"),
242 	    "Cycle Computer Corporation") == 0)
243 		 return "Cycle 5 IP";
244 
245 	return NULL;
246 }
247 
248 
249 /*
250  * Check if this machine needs tweaks to its PROM.  It's simpler to fix
251  * the PROM than to invent workarounds in the kernel code.  We do this
252  * patching in the secondary boot to avoid wasting space in the kernel.
253  */
254 void
255 prom_patch(void)
256 {
257 	char namebuf[32];
258 	char *propval;
259 	const struct prom_patch *p;
260 
261 	if (prom_version() == PROM_OLDMON)
262 		return;		/* don't bother - no forth in this */
263 
264 	propval = prom_getpropstringA(prom_findroot(), "name",
265 				 namebuf, sizeof(namebuf));
266 	if (propval == NULL)
267 		return;
268 
269 	for (p = prom_patch_tab; p->name != NULL; ++p) {
270 		if (p->promvers == prom_version()
271 		    && strcmp(p->name, namebuf) == 0) {
272 			const struct patch_entry *e;
273 			const char *promstr = "???";
274 			const char *submatch_info = NULL;
275 
276 			switch (prom_version()) {
277 			case PROM_OBP_V0:
278 				promstr = "OBP0";
279 				break;
280 			case PROM_OBP_V2:
281 				promstr = "OBP2";
282 				break;
283 			case PROM_OBP_V3:
284 				promstr = "OBP3";
285 				break;
286 			case PROM_OPENFIRM:
287 				promstr = "OFW";
288 				break;
289 			}
290 
291 
292 			if (p->submatch != NULL) {
293 				submatch_info = (*p->submatch)();
294 				if (submatch_info == NULL)
295 					continue;
296 			}
297 
298 			if (submatch_info != NULL)
299 				printf("Patching %s for %s (%s)\n",
300 				    promstr, p->name, submatch_info);
301 			else
302 				printf("Patching %s for %s\n",
303 				    promstr, p->name);
304 			for (e = p->patches; e->message != NULL; ++e) {
305 				printf("%s", e->message);
306 				prom_interpret(e->patch);
307 				printf("\n");
308 			}
309 			return;
310 		}
311 	}
312 }
313