2 * BRIEF MODULE DESCRIPTION
3 * PROM library initialisation code, assuming a version of
4 * pmon is the boot code.
6 * Copyright 2000,2001 MontaVista Software Inc.
7 * Author: MontaVista Software, Inc.
8 * ppopov@mvista.com or source@mvista.com
10 * This file was derived from Carsten Langgaard's
11 * arch/mips/mips-boards/xx files.
13 * Carsten Langgaard, carstenl@mips.com
14 * Copyright (C) 1999,2000 MIPS Technologies, Inc. All rights reserved.
16 * This program is free software; you can redistribute it and/or modify it
17 * under the terms of the GNU General Public License as published by the
18 * Free Software Foundation; either version 2 of the License, or (at your
19 * option) any later version.
21 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
22 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
23 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN
24 * NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
27 * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
28 * ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 * You should have received a copy of the GNU General Public License along
33 * with this program; if not, write to the Free Software Foundation, Inc.,
34 * 675 Mass Ave, Cambridge, MA 02139, USA.
37 #include <linux/module.h>
38 #include <linux/kernel.h>
39 #include <linux/init.h>
40 #include <linux/string.h>
41 #include <linux/interrupt.h>
43 #include <linux/slab.h>
45 #include <asm/addrspace.h>
46 #include <asm/bootinfo.h>
47 #include <asm-generic/sections.h>
53 /* global PROM environment variables and pointers */
55 char **prom_argv
, **prom_envp
;
62 struct prom_pmemblock mdesc
[PROM_MAX_PMEMBLOCKS
];
64 /* default feature sets */
65 static char msp_default_features
[] =
66 #if defined(CONFIG_PMC_MSP4200_EVAL) || defined(CONFIG_PMC_MSP4200_GW)
68 #elif defined(CONFIG_PMC_MSP7120_EVAL) \
69 || defined(CONFIG_PMC_MSP7120_GW)
71 #elif defined(CONFIG_PMC_MSP7120_FPGA)
75 /* conversion functions */
76 static inline unsigned char str2hexnum(unsigned char c
)
78 if (c
>= '0' && c
<= '9')
80 if (c
>= 'a' && c
<= 'f')
85 static inline int str2eaddr(unsigned char *ea
, unsigned char *str
)
88 unsigned char num
= 0;
90 while (*str
!= '\0') {
91 if ((*str
== '.') || (*str
== ':')) {
97 num
|= str2hexnum(*str
++);
107 EXPORT_SYMBOL(str2eaddr
);
109 static inline unsigned long str2hex(unsigned char *str
)
115 value
|= str2hexnum(*str
++);
121 /* function to query the system information */
122 const char *get_system_type(void)
124 #if defined(CONFIG_PMC_MSP4200_EVAL)
125 return "PMC-Sierra MSP4200 Eval Board";
126 #elif defined(CONFIG_PMC_MSP4200_GW)
127 return "PMC-Sierra MSP4200 VoIP Gateway";
128 #elif defined(CONFIG_PMC_MSP7120_EVAL)
129 return "PMC-Sierra MSP7120 Eval Board";
130 #elif defined(CONFIG_PMC_MSP7120_GW)
131 return "PMC-Sierra MSP7120 Residential Gateway";
132 #elif defined(CONFIG_PMC_MSP7120_FPGA)
133 return "PMC-Sierra MSP7120 FPGA";
135 #error "What is the type of *your* MSP?"
139 int get_ethernet_addr(char *ethaddr_name
, char *ethernet_addr
)
143 ethaddr_str
= prom_getenv(ethaddr_name
);
145 printk(KERN_WARNING
"%s not set in boot prom\n", ethaddr_name
);
149 if (str2eaddr(ethernet_addr
, ethaddr_str
) == -1) {
150 printk(KERN_WARNING
"%s badly formatted-<%s>\n",
151 ethaddr_name
, ethaddr_str
);
155 if (init_debug
> 1) {
157 printk(KERN_DEBUG
"get_ethernet_addr: for %s ", ethaddr_name
);
158 for (i
= 0; i
< 5; i
++)
159 printk(KERN_DEBUG
"%02x:",
160 (unsigned char)*(ethernet_addr
+i
));
161 printk(KERN_DEBUG
"%02x\n", *(ethernet_addr
+i
));
166 EXPORT_SYMBOL(get_ethernet_addr
);
168 static char *get_features(void)
170 char *feature
= prom_getenv(FEATURES
);
172 if (feature
== NULL
) {
173 /* default features based on MACHINE_TYPE */
174 feature
= msp_default_features
;
180 static char test_feature(char c
)
182 char *feature
= get_features();
190 return FEATURE_NOEXIST
;
193 unsigned long get_deviceid(void)
195 char *deviceid
= prom_getenv(DEVICEID
);
197 if (deviceid
== NULL
)
200 return str2hex(deviceid
);
203 char identify_pci(void)
205 return test_feature(PCI_KEY
);
207 EXPORT_SYMBOL(identify_pci
);
209 char identify_pcimux(void)
211 return test_feature(PCIMUX_KEY
);
214 char identify_sec(void)
216 return test_feature(SEC_KEY
);
218 EXPORT_SYMBOL(identify_sec
);
220 char identify_spad(void)
222 return test_feature(SPAD_KEY
);
224 EXPORT_SYMBOL(identify_spad
);
226 char identify_tdm(void)
228 return test_feature(TDM_KEY
);
230 EXPORT_SYMBOL(identify_tdm
);
232 char identify_zsp(void)
234 return test_feature(ZSP_KEY
);
236 EXPORT_SYMBOL(identify_zsp
);
238 static char identify_enetfeature(char key
, unsigned long interface_num
)
240 char *feature
= get_features();
243 if (*feature
++ == key
&& interface_num
-- == 0)
248 return FEATURE_NOEXIST
;
251 char identify_enet(unsigned long interface_num
)
253 return identify_enetfeature(ENET_KEY
, interface_num
);
255 EXPORT_SYMBOL(identify_enet
);
257 char identify_enetTxD(unsigned long interface_num
)
259 return identify_enetfeature(ENETTXD_KEY
, interface_num
);
261 EXPORT_SYMBOL(identify_enetTxD
);
263 unsigned long identify_family(void)
265 unsigned long deviceid
;
267 deviceid
= get_deviceid();
269 return deviceid
& CPU_DEVID_FAMILY
;
271 EXPORT_SYMBOL(identify_family
);
273 unsigned long identify_revision(void)
275 unsigned long deviceid
;
277 deviceid
= get_deviceid();
279 return deviceid
& CPU_DEVID_REVISION
;
281 EXPORT_SYMBOL(identify_revision
);
283 /* PROM environment functions */
284 char *prom_getenv(char *env_name
)
287 * Return a pointer to the given environment variable. prom_envp
288 * points to a null terminated array of pointers to variables.
289 * Environment variables are stored in the form of "memsize=64"
292 char **var
= prom_envp
;
293 int i
= strlen(env_name
);
296 if (strncmp(env_name
, *var
, i
) == 0) {
297 return (*var
+ strlen(env_name
) + 1);
305 /* PROM commandline functions */
306 void __init
prom_init_cmdline(void)
311 actr
= 1; /* Always ignore argv[0] */
313 cp
= &(arcs_cmdline
[0]);
314 while (actr
< prom_argc
) {
315 strcpy(cp
, prom_argv
[actr
]);
316 cp
+= strlen(prom_argv
[actr
]);
320 if (cp
!= &(arcs_cmdline
[0])) /* get rid of trailing space */
325 /* memory allocation functions */
326 static int __init
prom_memtype_classify(unsigned int type
)
332 return BOOT_MEM_ROM_DATA
;
334 return BOOT_MEM_RESERVED
;
338 void __init
prom_meminit(void)
340 struct prom_pmemblock
*p
;
346 unsigned long base
, size
;
348 type
= prom_memtype_classify(p
->type
);
352 add_memory_region(base
, size
, type
);
357 void __init
prom_free_prom_memory(void)
368 * preserve environment variables and command line from pmon/bbload
369 * first preserve the command line
371 for (argc
= 0; argc
< prom_argc
; argc
++) {
372 len
+= sizeof(char *); /* length of pointer */
373 len
+= strlen(prom_argv
[argc
]) + 1; /* length of string */
375 len
+= sizeof(char *); /* plus length of null pointer */
377 argv
= kmalloc(len
, GFP_KERNEL
);
378 ptr
= (char *) &argv
[prom_argc
+ 1]; /* strings follow array */
380 for (argc
= 0; argc
< prom_argc
; argc
++) {
382 strcpy(ptr
, prom_argv
[argc
]);
383 ptr
+= strlen(prom_argv
[argc
]) + 1;
385 argv
[prom_argc
] = NULL
; /* end array with null pointer */
388 /* next preserve the environment variables */
391 for (envp
= prom_envp
; *envp
!= NULL
; envp
++) {
392 i
++; /* count number of environment variables */
393 len
+= sizeof(char *); /* length of pointer */
394 len
+= strlen(*envp
) + 1; /* length of string */
396 len
+= sizeof(char *); /* plus length of null pointer */
398 envp
= kmalloc(len
, GFP_KERNEL
);
399 ptr
= (char *) &envp
[i
+1];
401 for (argc
= 0; argc
< i
; argc
++) {
403 strcpy(ptr
, prom_envp
[argc
]);
404 ptr
+= strlen(prom_envp
[argc
]) + 1;
406 envp
[i
] = NULL
; /* end array with null pointer */
409 for (i
= 0; i
< boot_mem_map
.nr_map
; i
++) {
410 if (boot_mem_map
.map
[i
].type
!= BOOT_MEM_ROM_DATA
)
413 addr
= boot_mem_map
.map
[i
].addr
;
414 free_init_pages("prom memory",
415 addr
, addr
+ boot_mem_map
.map
[i
].size
);
419 struct prom_pmemblock
*__init
prom_getmdesc(void)
421 static char memsz_env
[] __initdata
= "memsize";
422 static char heaptop_env
[] __initdata
= "heaptop";
424 unsigned int memsize
;
425 unsigned int heaptop
;
428 str
= prom_getenv(memsz_env
);
430 ppfinit("memsize not set in boot prom, "
431 "set to default (32Mb)\n");
432 memsize
= 0x02000000;
434 memsize
= simple_strtol(str
, NULL
, 0);
437 /* if memsize is a bad size, use reasonable default */
438 memsize
= 0x02000000;
441 /* convert to physical address (removing caching bits, etc) */
442 memsize
= CPHYSADDR(memsize
);
445 str
= prom_getenv(heaptop_env
);
447 heaptop
= CPHYSADDR((u32
)&_text
);
448 ppfinit("heaptop not set in boot prom, "
449 "set to default 0x%08x\n", heaptop
);
451 heaptop
= simple_strtol(str
, NULL
, 16);
453 /* heaptop conversion bad, might have 0xValue */
454 heaptop
= simple_strtol(str
, NULL
, 0);
457 /* heaptop still bad, use reasonable default */
458 heaptop
= CPHYSADDR((u32
)&_text
);
462 /* convert to physical address (removing caching bits, etc) */
463 heaptop
= CPHYSADDR((u32
)heaptop
);
466 /* the base region */
468 mdesc
[i
].type
= BOOT_MEM_RESERVED
;
469 mdesc
[i
].base
= 0x00000000;
470 mdesc
[i
].size
= PAGE_ALIGN(0x300 + 0x80);
471 /* jtag interrupt vector + sizeof vector */
474 if (heaptop
> mdesc
[i
].base
+ mdesc
[i
].size
) {
476 mdesc
[i
].type
= BOOT_MEM_ROM_DATA
;
477 mdesc
[i
].base
= mdesc
[i
-1].base
+ mdesc
[i
-1].size
;
478 mdesc
[i
].size
= heaptop
- mdesc
[i
].base
;
481 /* end of PMON data to start of kernel -- probably zero .. */
482 if (heaptop
!= CPHYSADDR((u32
)_text
)) {
484 mdesc
[i
].type
= BOOT_MEM_RAM
;
485 mdesc
[i
].base
= heaptop
;
486 mdesc
[i
].size
= CPHYSADDR((u32
)_text
) - mdesc
[i
].base
;
491 mdesc
[i
].type
= BOOT_MEM_RESERVED
;
492 mdesc
[i
].base
= CPHYSADDR((u32
)_text
);
493 mdesc
[i
].size
= CPHYSADDR(PAGE_ALIGN((u32
)_end
)) - mdesc
[i
].base
;
495 /* Remainder of RAM -- under memsize */
497 mdesc
[i
].type
= yamon_free
;
498 mdesc
[i
].base
= mdesc
[i
-1].base
+ mdesc
[i
-1].size
;
499 mdesc
[i
].size
= memsize
- mdesc
[i
].base
;