1d55328aad024ce41b7b97b8d3656e0e6d49e545
[openwrt/svn-archive/archive.git] / target / linux / ar71xx / files / arch / mips / ar71xx / prom.c
1 /*
2 * Atheros AR71xx SoC specific prom routines
3 *
4 * Copyright (C) 2008 Gabor Juhos <juhosg@openwrt.org>
5 * Copyright (C) 2008 Imre Kaloz <kaloz@openwrt.org>
6 *
7 * This program is free software; you can redistribute it and/or modify it
8 * under the terms of the GNU General Public License version 2 as published
9 * by the Free Software Foundation.
10 */
11
12 #include <linux/kernel.h>
13 #include <linux/init.h>
14 #include <linux/io.h>
15 #include <linux/serial_reg.h>
16
17 #include <asm/bootinfo.h>
18 #include <asm/addrspace.h>
19 #include <asm/fw/myloader/myloader.h>
20
21 #include <asm/mach-ar71xx/ar71xx.h>
22 #include <asm/mach-ar71xx/platform.h>
23
24 struct board_rec {
25 char *name;
26 unsigned long mach_type;
27 };
28
29 static int ar71xx_prom_argc __initdata;
30 static char **ar71xx_prom_argv __initdata;
31 static char **ar71xx_prom_envp __initdata;
32
33 static struct board_rec boards[] __initdata = {
34 {
35 .name = "411",
36 .mach_type = MACH_AR71XX_RB_411,
37 }, {
38 .name = "433",
39 .mach_type = MACH_AR71XX_RB_433,
40 }, {
41 .name = "450",
42 .mach_type = MACH_AR71XX_RB_450,
43 }, {
44 .name = "493",
45 .mach_type = MACH_AR71XX_RB_493,
46 }
47 };
48
49 static __init char *ar71xx_prom_getargv(const char *name)
50 {
51 int len = strlen(name);
52 int i;
53
54 if (!ar71xx_prom_argv)
55 return NULL;
56
57 for (i = 0; i < ar71xx_prom_argc; i++) {
58 char *argv = ar71xx_prom_argv[i];
59 if (strncmp(name, argv, len) == 0 && (argv)[len] == '=')
60 return argv + len + 1;
61 }
62
63 return NULL;
64 }
65
66 static __init char *ar71xx_prom_getenv(const char *envname)
67 {
68 int len = strlen(envname);
69 char **env;
70
71 if (!ar71xx_prom_envp)
72 return NULL;
73
74 for (env = ar71xx_prom_envp; *env != NULL; env++)
75 if (strncmp(envname, *env, len) == 0 && (*env)[len] == '=')
76 return *env + len + 1;
77
78 return NULL;
79 }
80
81 static __init unsigned long find_board_byname(char *name)
82 {
83 int i;
84
85 for (i = 0; i < ARRAY_SIZE(boards); i++)
86 if (strcmp(name, boards[i].name) == 0)
87 return boards[i].mach_type;
88
89 return MACH_AR71XX_GENERIC;
90 }
91
92 static int ar71xx_prom_init_myloader(void)
93 {
94 struct myloader_info *mylo;
95
96 mylo = myloader_get_info();
97 if (!mylo)
98 return 0;
99
100 switch (mylo->did) {
101 case DEVID_COMPEX_WP543:
102 mips_machtype = MACH_AR71XX_WP543;
103 break;
104 default:
105 printk(KERN_WARNING "prom: unknown device id: %x\n",
106 mylo->did);
107 }
108 ar71xx_set_mac_base(mylo->macs[0]);
109
110 return 1;
111 }
112
113 static void ar71xx_prom_init_generic(void)
114 {
115 char *p;
116
117 ar71xx_prom_argc = fw_arg0;
118 ar71xx_prom_argv = (char **)fw_arg1;
119 ar71xx_prom_envp = (char **)fw_arg2;
120
121 p = ar71xx_prom_getenv("board");
122 if (!p)
123 p = ar71xx_prom_getargv("board");
124 if (p)
125 mips_machtype = find_board_byname(p);
126
127 p = ar71xx_prom_getenv("ethaddr");
128 if (!p)
129 p = ar71xx_prom_getargv("kmac");
130 if (p)
131 ar71xx_parse_mac_addr(p);
132 }
133
134 void __init prom_init(void)
135 {
136 printk(KERN_DEBUG "prom: fw_arg0=%08x, fw_arg1=%08x, "
137 "fw_arg2=%08x, fw_arg3=%08x\n",
138 (unsigned int)fw_arg0, (unsigned int)fw_arg1,
139 (unsigned int)fw_arg2, (unsigned int)fw_arg3);
140
141 mips_machtype = MACH_AR71XX_GENERIC;
142
143 if (ar71xx_prom_init_myloader())
144 return;
145
146 ar71xx_prom_init_generic();
147 }
148
149 void __init prom_free_prom_memory(void)
150 {
151 /* We do not have to prom memory to free */
152 }
153
154 #define UART_READ(r) \
155 __raw_readl((void __iomem *)(KSEG1ADDR(AR71XX_UART_BASE) + 4 * (r)))
156
157 #define UART_WRITE(r, v) \
158 __raw_writel((v), (void __iomem *)(KSEG1ADDR(AR71XX_UART_BASE) + 4*(r)))
159
160 void prom_putchar(unsigned char ch)
161 {
162 while (((UART_READ(UART_LSR)) & UART_LSR_THRE) == 0);
163 UART_WRITE(UART_TX, ch);
164 while (((UART_READ(UART_LSR)) & UART_LSR_THRE) == 0);
165 }