Home | History | Annotate | Line # | Download | only in boot 
      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