1 // SPDX-License-Identifier: GPL-2.0-only 2 /* 3 * Carsten Langgaard, carstenl@mips.com 4 * Copyright (C) 1999,2000 MIPS Technologies, Inc. All rights reserved. 5 * 6 * Putting things on the screen/serial line using YAMONs facilities. 7 */ 8 #include <linux/init.h> 9 #include <linux/kernel.h> 10 #include <linux/serial_reg.h> 11 #include <linux/spinlock.h> 12 #include <linux/export.h> 13 #include <linux/string.h> 14 #include <linux/io.h> 15 #include <asm/bootinfo.h> 16 #include <asm/setup.h> 17 18 #include <asm/mach-ar7/ar7.h> 19 #include <asm/mach-ar7/prom.h> 20 21 #define MAX_ENTRY 80 22 23 struct env_var { 24 char *name; 25 char *value; 26 }; 27 28 static struct env_var adam2_env[MAX_ENTRY]; 29 30 char *prom_getenv(const char *name) 31 { 32 int i; 33 34 for (i = 0; (i < MAX_ENTRY) && adam2_env[i].name; i++) 35 if (!strcmp(name, adam2_env[i].name)) 36 return adam2_env[i].value; 37 38 return NULL; 39 } 40 EXPORT_SYMBOL(prom_getenv); 41 42 static void __init ar7_init_cmdline(int argc, char *argv[]) 43 { 44 int i; 45 46 for (i = 1; i < argc; i++) { 47 strlcat(arcs_cmdline, argv[i], COMMAND_LINE_SIZE); 48 if (i < (argc - 1)) 49 strlcat(arcs_cmdline, " ", COMMAND_LINE_SIZE); 50 } 51 } 52 53 struct psbl_rec { 54 u32 psbl_size; 55 u32 env_base; 56 u32 env_size; 57 u32 ffs_base; 58 u32 ffs_size; 59 }; 60 61 static const char psp_env_version[] __initconst = "TIENV0.8"; 62 63 struct psp_env_chunk { 64 u8 num; 65 u8 ctrl; 66 u16 csum; 67 u8 len; 68 char data[11]; 69 } __packed; 70 71 struct psp_var_map_entry { 72 u8 num; 73 char *value; 74 }; 75 76 static const struct psp_var_map_entry psp_var_map[] = { 77 { 1, "cpufrequency" }, 78 { 2, "memsize" }, 79 { 3, "flashsize" }, 80 { 4, "modetty0" }, 81 { 5, "modetty1" }, 82 { 8, "maca" }, 83 { 9, "macb" }, 84 { 28, "sysfrequency" }, 85 { 38, "mipsfrequency" }, 86 }; 87 88 /* 89 90 Well-known variable (num is looked up in table above for matching variable name) 91 Example: cpufrequency=211968000 92 +----+----+----+----+----+----+----+----+----+----+----+----+----+----+----+--- 93 | 01 |CTRL|CHECKSUM | 01 | _2 | _1 | _1 | _9 | _6 | _8 | _0 | _0 | _0 | \0 | FF 94 +----+----+----+----+----+----+----+----+----+----+----+----+----+----+----+--- 95 96 Name=Value pair in a single chunk 97 Example: NAME=VALUE 98 +----+----+----+----+----+----+----+----+----+----+----+----+----+----+----+--- 99 | 00 |CTRL|CHECKSUM | 01 | _N | _A | _M | _E | _0 | _V | _A | _L | _U | _E | \0 100 +----+----+----+----+----+----+----+----+----+----+----+----+----+----+----+--- 101 102 Name=Value pair in 2 chunks (len is the number of chunks) 103 Example: bootloaderVersion=1.3.7.15 104 +----+----+----+----+----+----+----+----+----+----+----+----+----+----+----+--- 105 | 00 |CTRL|CHECKSUM | 02 | _b | _o | _o | _t | _l | _o | _a | _d | _e | _r | _V 106 +----+----+----+----+----+----+----+----+----+----+----+----+----+----+----+--- 107 | _e | _r | _s | _i | _o | _n | \0 | _1 | _. | _3 | _. | _7 | _. | _1 | _5 | \0 108 +----+----+----+----+----+----+----+----+----+----+----+----+----+----+----+--- 109 110 Data is padded with 0xFF 111 112 */ 113 114 #define PSP_ENV_SIZE 4096 115 116 static char psp_env_data[PSP_ENV_SIZE] = { 0, }; 117 118 static char * __init lookup_psp_var_map(u8 num) 119 { 120 int i; 121 122 for (i = 0; i < ARRAY_SIZE(psp_var_map); i++) 123 if (psp_var_map[i].num == num) 124 return psp_var_map[i].value; 125 126 return NULL; 127 } 128 129 static void __init add_adam2_var(char *name, char *value) 130 { 131 int i; 132 133 for (i = 0; i < MAX_ENTRY; i++) { 134 if (!adam2_env[i].name) { 135 adam2_env[i].name = name; 136 adam2_env[i].value = value; 137 return; 138 } else if (!strcmp(adam2_env[i].name, name)) { 139 adam2_env[i].value = value; 140 return; 141 } 142 } 143 } 144 145 static int __init parse_psp_env(void *psp_env_base) 146 { 147 int i, n; 148 char *name, *value; 149 struct psp_env_chunk *chunks = (struct psp_env_chunk *)psp_env_data; 150 151 memcpy_fromio(chunks, psp_env_base, PSP_ENV_SIZE); 152 153 i = 1; 154 n = PSP_ENV_SIZE / sizeof(struct psp_env_chunk); 155 while (i < n) { 156 if ((chunks[i].num == 0xff) || ((i + chunks[i].len) > n)) 157 break; 158 value = chunks[i].data; 159 if (chunks[i].num) { 160 name = lookup_psp_var_map(chunks[i].num); 161 } else { 162 name = value; 163 value += strlen(name) + 1; 164 } 165 if (name) 166 add_adam2_var(name, value); 167 i += chunks[i].len; 168 } 169 return 0; 170 } 171 172 static void __init ar7_init_env(struct env_var *env) 173 { 174 int i; 175 struct psbl_rec *psbl = (struct psbl_rec *)(KSEG1ADDR(0x14000300)); 176 void *psp_env = (void *)KSEG1ADDR(psbl->env_base); 177 178 if (strcmp(psp_env, psp_env_version) == 0) { 179 parse_psp_env(psp_env); 180 } else { 181 for (i = 0; i < MAX_ENTRY; i++, env++) 182 if (env->name) 183 add_adam2_var(env->name, env->value); 184 } 185 } 186 187 static void __init console_config(void) 188 { 189 #ifdef CONFIG_SERIAL_8250_CONSOLE 190 char console_string[40]; 191 int baud = 0; 192 char parity = '\0', bits = '\0', flow = '\0'; 193 char *s, *p; 194 195 if (strstr(arcs_cmdline, "console=")) 196 return; 197 198 s = prom_getenv("modetty0"); 199 if (s) { 200 baud = simple_strtoul(s, &p, 10); 201 s = p; 202 if (*s == ',') 203 s++; 204 if (*s) 205 parity = *s++; 206 if (*s == ',') 207 s++; 208 if (*s) 209 bits = *s++; 210 if (*s == ',') 211 s++; 212 if (*s == 'h') 213 flow = 'r'; 214 } 215 216 if (baud == 0) 217 baud = 38400; 218 if (parity != 'n' && parity != 'o' && parity != 'e') 219 parity = 'n'; 220 if (bits != '7' && bits != '8') 221 bits = '8'; 222 223 if (flow == 'r') 224 sprintf(console_string, " console=ttyS0,%d%c%c%c", baud, 225 parity, bits, flow); 226 else 227 sprintf(console_string, " console=ttyS0,%d%c%c", baud, parity, 228 bits); 229 strlcat(arcs_cmdline, console_string, COMMAND_LINE_SIZE); 230 #endif 231 } 232 233 void __init prom_init(void) 234 { 235 ar7_init_cmdline(fw_arg0, (char **)fw_arg1); 236 ar7_init_env((struct env_var *)fw_arg2); 237 console_config(); 238 } 239 240 #define PORT(offset) (KSEG1ADDR(AR7_REGS_UART0 + (offset * 4))) 241 static inline unsigned int serial_in(int offset) 242 { 243 return readl((void *)PORT(offset)); 244 } 245 246 static inline void serial_out(int offset, int value) 247 { 248 writel(value, (void *)PORT(offset)); 249 } 250 251 void prom_putchar(char c) 252 { 253 while ((serial_in(UART_LSR) & UART_LSR_TEMT) == 0) 254 ; 255 serial_out(UART_TX, c); 256 } 257