Merge git://git.kernel.org/pub/scm/linux/kernel/git/davem/sparc-2.6
[linux-2.6.git] / arch / mips / mti-malta / malta-init.c
1 /*
2  * Copyright (C) 1999, 2000, 2004, 2005  MIPS Technologies, Inc.
3  *      All rights reserved.
4  *      Authors: Carsten Langgaard <carstenl@mips.com>
5  *               Maciej W. Rozycki <macro@mips.com>
6  *
7  *  This program is free software; you can distribute it and/or modify it
8  *  under the terms of the GNU General Public License (Version 2) as
9  *  published by the Free Software Foundation.
10  *
11  *  This program is distributed in the hope it will be useful, but WITHOUT
12  *  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13  *  FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
14  *  for more details.
15  *
16  *  You should have received a copy of the GNU General Public License along
17  *  with this program; if not, write to the Free Software Foundation, Inc.,
18  *  59 Temple Place - Suite 330, Boston MA 02111-1307, USA.
19  *
20  * PROM library initialisation code.
21  */
22 #include <linux/init.h>
23 #include <linux/string.h>
24 #include <linux/kernel.h>
25
26 #include <asm/bootinfo.h>
27 #include <asm/gt64120.h>
28 #include <asm/io.h>
29 #include <asm/system.h>
30 #include <asm/cacheflush.h>
31 #include <asm/traps.h>
32
33 #include <asm/gcmpregs.h>
34 #include <asm/mips-boards/prom.h>
35 #include <asm/mips-boards/generic.h>
36 #include <asm/mips-boards/bonito64.h>
37 #include <asm/mips-boards/msc01_pci.h>
38
39 #include <asm/mips-boards/malta.h>
40
41 int prom_argc;
42 int *_prom_argv, *_prom_envp;
43
44 /*
45  * YAMON (32-bit PROM) pass arguments and environment as 32-bit pointer.
46  * This macro take care of sign extension, if running in 64-bit mode.
47  */
48 #define prom_envp(index) ((char *)(long)_prom_envp[(index)])
49
50 int init_debug;
51
52 static int mips_revision_corid;
53 int mips_revision_sconid;
54
55 /* Bonito64 system controller register base. */
56 unsigned long _pcictrl_bonito;
57 unsigned long _pcictrl_bonito_pcicfg;
58
59 /* GT64120 system controller register base */
60 unsigned long _pcictrl_gt64120;
61
62 /* MIPS System controller register base */
63 unsigned long _pcictrl_msc;
64
65 char *prom_getenv(char *envname)
66 {
67         /*
68          * Return a pointer to the given environment variable.
69          * In 64-bit mode: we're using 64-bit pointers, but all pointers
70          * in the PROM structures are only 32-bit, so we need some
71          * workarounds, if we are running in 64-bit mode.
72          */
73         int i, index=0;
74
75         i = strlen(envname);
76
77         while (prom_envp(index)) {
78                 if(strncmp(envname, prom_envp(index), i) == 0) {
79                         return(prom_envp(index+1));
80                 }
81                 index += 2;
82         }
83
84         return NULL;
85 }
86
87 static inline unsigned char str2hexnum(unsigned char c)
88 {
89         if (c >= '0' && c <= '9')
90                 return c - '0';
91         if (c >= 'a' && c <= 'f')
92                 return c - 'a' + 10;
93         return 0; /* foo */
94 }
95
96 static inline void str2eaddr(unsigned char *ea, unsigned char *str)
97 {
98         int i;
99
100         for (i = 0; i < 6; i++) {
101                 unsigned char num;
102
103                 if((*str == '.') || (*str == ':'))
104                         str++;
105                 num = str2hexnum(*str++) << 4;
106                 num |= (str2hexnum(*str++));
107                 ea[i] = num;
108         }
109 }
110
111 int get_ethernet_addr(char *ethernet_addr)
112 {
113         char *ethaddr_str;
114
115         ethaddr_str = prom_getenv("ethaddr");
116         if (!ethaddr_str) {
117                 printk("ethaddr not set in boot prom\n");
118                 return -1;
119         }
120         str2eaddr(ethernet_addr, ethaddr_str);
121
122         if (init_debug > 1) {
123                 int i;
124                 printk("get_ethernet_addr: ");
125                 for (i=0; i<5; i++)
126                         printk("%02x:", (unsigned char)*(ethernet_addr+i));
127                 printk("%02x\n", *(ethernet_addr+i));
128         }
129
130         return 0;
131 }
132
133 #ifdef CONFIG_SERIAL_8250_CONSOLE
134 static void __init console_config(void)
135 {
136         char console_string[40];
137         int baud = 0;
138         char parity = '\0', bits = '\0', flow = '\0';
139         char *s;
140
141         if ((strstr(prom_getcmdline(), "console=")) == NULL) {
142                 s = prom_getenv("modetty0");
143                 if (s) {
144                         while (*s >= '0' && *s <= '9')
145                                 baud = baud*10 + *s++ - '0';
146                         if (*s == ',') s++;
147                         if (*s) parity = *s++;
148                         if (*s == ',') s++;
149                         if (*s) bits = *s++;
150                         if (*s == ',') s++;
151                         if (*s == 'h') flow = 'r';
152                 }
153                 if (baud == 0)
154                         baud = 38400;
155                 if (parity != 'n' && parity != 'o' && parity != 'e')
156                         parity = 'n';
157                 if (bits != '7' && bits != '8')
158                         bits = '8';
159                 if (flow == '\0')
160                         flow = 'r';
161                 sprintf(console_string, " console=ttyS0,%d%c%c%c", baud, parity, bits, flow);
162                 strcat(prom_getcmdline(), console_string);
163                 pr_info("Config serial console:%s\n", console_string);
164         }
165 }
166 #endif
167
168 static void __init mips_nmi_setup(void)
169 {
170         void *base;
171         extern char except_vec_nmi;
172
173         base = cpu_has_veic ?
174                 (void *)(CAC_BASE + 0xa80) :
175                 (void *)(CAC_BASE + 0x380);
176         memcpy(base, &except_vec_nmi, 0x80);
177         flush_icache_range((unsigned long)base, (unsigned long)base + 0x80);
178 }
179
180 static void __init mips_ejtag_setup(void)
181 {
182         void *base;
183         extern char except_vec_ejtag_debug;
184
185         base = cpu_has_veic ?
186                 (void *)(CAC_BASE + 0xa00) :
187                 (void *)(CAC_BASE + 0x300);
188         memcpy(base, &except_vec_ejtag_debug, 0x80);
189         flush_icache_range((unsigned long)base, (unsigned long)base + 0x80);
190 }
191
192 extern struct plat_smp_ops msmtc_smp_ops;
193
194 void __init prom_init(void)
195 {
196         int result;
197
198         prom_argc = fw_arg0;
199         _prom_argv = (int *) fw_arg1;
200         _prom_envp = (int *) fw_arg2;
201
202         mips_display_message("LINUX");
203
204         /*
205          * early setup of _pcictrl_bonito so that we can determine
206          * the system controller on a CORE_EMUL board
207          */
208         _pcictrl_bonito = (unsigned long)ioremap(BONITO_REG_BASE, BONITO_REG_SIZE);
209
210         mips_revision_corid = MIPS_REVISION_CORID;
211
212         if (mips_revision_corid == MIPS_REVISION_CORID_CORE_EMUL) {
213                 if (BONITO_PCIDID == 0x0001df53 ||
214                     BONITO_PCIDID == 0x0003df53)
215                         mips_revision_corid = MIPS_REVISION_CORID_CORE_EMUL_BON;
216                 else
217                         mips_revision_corid = MIPS_REVISION_CORID_CORE_EMUL_MSC;
218         }
219
220         mips_revision_sconid = MIPS_REVISION_SCONID;
221         if (mips_revision_sconid == MIPS_REVISION_SCON_OTHER) {
222                 switch (mips_revision_corid) {
223                 case MIPS_REVISION_CORID_QED_RM5261:
224                 case MIPS_REVISION_CORID_CORE_LV:
225                 case MIPS_REVISION_CORID_CORE_FPGA:
226                 case MIPS_REVISION_CORID_CORE_FPGAR2:
227                         mips_revision_sconid = MIPS_REVISION_SCON_GT64120;
228                         break;
229                 case MIPS_REVISION_CORID_CORE_EMUL_BON:
230                 case MIPS_REVISION_CORID_BONITO64:
231                 case MIPS_REVISION_CORID_CORE_20K:
232                         mips_revision_sconid = MIPS_REVISION_SCON_BONITO;
233                         break;
234                 case MIPS_REVISION_CORID_CORE_MSC:
235                 case MIPS_REVISION_CORID_CORE_FPGA2:
236                 case MIPS_REVISION_CORID_CORE_24K:
237                         /*
238                          * SOCit/ROCit support is essentially identical
239                          * but make an attempt to distinguish them
240                          */
241                         mips_revision_sconid = MIPS_REVISION_SCON_SOCIT;
242                         break;
243                 case MIPS_REVISION_CORID_CORE_FPGA3:
244                 case MIPS_REVISION_CORID_CORE_FPGA4:
245                 case MIPS_REVISION_CORID_CORE_FPGA5:
246                 case MIPS_REVISION_CORID_CORE_EMUL_MSC:
247                 default:
248                         /* See above */
249                         mips_revision_sconid = MIPS_REVISION_SCON_ROCIT;
250                         break;
251                 }
252         }
253
254         switch (mips_revision_sconid) {
255                 u32 start, map, mask, data;
256
257         case MIPS_REVISION_SCON_GT64120:
258                 /*
259                  * Setup the North bridge to do Master byte-lane swapping
260                  * when running in bigendian.
261                  */
262                 _pcictrl_gt64120 = (unsigned long)ioremap(MIPS_GT_BASE, 0x2000);
263
264 #ifdef CONFIG_CPU_LITTLE_ENDIAN
265                 GT_WRITE(GT_PCI0_CMD_OFS, GT_PCI0_CMD_MBYTESWAP_BIT |
266                          GT_PCI0_CMD_SBYTESWAP_BIT);
267 #else
268                 GT_WRITE(GT_PCI0_CMD_OFS, 0);
269 #endif
270                 /* Fix up PCI I/O mapping if necessary (for Atlas).  */
271                 start = GT_READ(GT_PCI0IOLD_OFS);
272                 map = GT_READ(GT_PCI0IOREMAP_OFS);
273                 if ((start & map) != 0) {
274                         map &= ~start;
275                         GT_WRITE(GT_PCI0IOREMAP_OFS, map);
276                 }
277
278                 set_io_port_base(MALTA_GT_PORT_BASE);
279                 break;
280
281         case MIPS_REVISION_SCON_BONITO:
282                 _pcictrl_bonito_pcicfg = (unsigned long)ioremap(BONITO_PCICFG_BASE, BONITO_PCICFG_SIZE);
283
284                 /*
285                  * Disable Bonito IOBC.
286                  */
287                 BONITO_PCIMEMBASECFG = BONITO_PCIMEMBASECFG &
288                         ~(BONITO_PCIMEMBASECFG_MEMBASE0_CACHED |
289                           BONITO_PCIMEMBASECFG_MEMBASE1_CACHED);
290
291                 /*
292                  * Setup the North bridge to do Master byte-lane swapping
293                  * when running in bigendian.
294                  */
295 #ifdef CONFIG_CPU_LITTLE_ENDIAN
296                 BONITO_BONGENCFG = BONITO_BONGENCFG &
297                         ~(BONITO_BONGENCFG_MSTRBYTESWAP |
298                           BONITO_BONGENCFG_BYTESWAP);
299 #else
300                 BONITO_BONGENCFG = BONITO_BONGENCFG |
301                         BONITO_BONGENCFG_MSTRBYTESWAP |
302                         BONITO_BONGENCFG_BYTESWAP;
303 #endif
304
305                 set_io_port_base(MALTA_BONITO_PORT_BASE);
306                 break;
307
308         case MIPS_REVISION_SCON_SOCIT:
309         case MIPS_REVISION_SCON_ROCIT:
310                 _pcictrl_msc = (unsigned long)ioremap(MIPS_MSC01_PCI_REG_BASE, 0x2000);
311         mips_pci_controller:
312                 mb();
313                 MSC_READ(MSC01_PCI_CFG, data);
314                 MSC_WRITE(MSC01_PCI_CFG, data & ~MSC01_PCI_CFG_EN_BIT);
315                 wmb();
316
317                 /* Fix up lane swapping.  */
318 #ifdef CONFIG_CPU_LITTLE_ENDIAN
319                 MSC_WRITE(MSC01_PCI_SWAP, MSC01_PCI_SWAP_NOSWAP);
320 #else
321                 MSC_WRITE(MSC01_PCI_SWAP,
322                           MSC01_PCI_SWAP_BYTESWAP << MSC01_PCI_SWAP_IO_SHF |
323                           MSC01_PCI_SWAP_BYTESWAP << MSC01_PCI_SWAP_MEM_SHF |
324                           MSC01_PCI_SWAP_BYTESWAP << MSC01_PCI_SWAP_BAR0_SHF);
325 #endif
326                 /* Fix up target memory mapping.  */
327                 MSC_READ(MSC01_PCI_BAR0, mask);
328                 MSC_WRITE(MSC01_PCI_P2SCMSKL, mask & MSC01_PCI_BAR0_SIZE_MSK);
329
330                 /* Don't handle target retries indefinitely.  */
331                 if ((data & MSC01_PCI_CFG_MAXRTRY_MSK) ==
332                     MSC01_PCI_CFG_MAXRTRY_MSK)
333                         data = (data & ~(MSC01_PCI_CFG_MAXRTRY_MSK <<
334                                          MSC01_PCI_CFG_MAXRTRY_SHF)) |
335                                ((MSC01_PCI_CFG_MAXRTRY_MSK - 1) <<
336                                 MSC01_PCI_CFG_MAXRTRY_SHF);
337
338                 wmb();
339                 MSC_WRITE(MSC01_PCI_CFG, data);
340                 mb();
341
342                 set_io_port_base(MALTA_MSC_PORT_BASE);
343                 break;
344
345         case MIPS_REVISION_SCON_SOCITSC:
346         case MIPS_REVISION_SCON_SOCITSCP:
347                 _pcictrl_msc = (unsigned long)ioremap(MIPS_SOCITSC_PCI_REG_BASE, 0x2000);
348                 goto mips_pci_controller;
349
350         default:
351                 /* Unknown system controller */
352                 mips_display_message("SC Error");
353                 while (1);   /* We die here... */
354         }
355         board_nmi_handler_setup = mips_nmi_setup;
356         board_ejtag_handler_setup = mips_ejtag_setup;
357
358         prom_init_cmdline();
359         prom_meminit();
360 #ifdef CONFIG_SERIAL_8250_CONSOLE
361         console_config();
362 #endif
363         /* Early detection of CMP support */
364         result = gcmp_probe(GCMP_BASE_ADDR, GCMP_ADDRSPACE_SZ);
365
366 #ifdef CONFIG_MIPS_CMP
367         if (result)
368                 register_smp_ops(&cmp_smp_ops);
369 #endif
370 #ifdef CONFIG_MIPS_MT_SMP
371 #ifdef CONFIG_MIPS_CMP
372         if (!result)
373                 register_smp_ops(&vsmp_smp_ops);
374 #else
375         register_smp_ops(&vsmp_smp_ops);
376 #endif
377 #endif
378 #ifdef CONFIG_MIPS_MT_SMTC
379         register_smp_ops(&msmtc_smp_ops);
380 #endif
381 }