Merge branch 'master' of /home/wd/git/u-boot/custodians
[oweals/u-boot.git] / cpu / 74xx_7xx / cpu.c
1 /*
2  * (C) Copyright 2001
3  * Josh Huber <huber@mclx.com>, Mission Critical Linux, Inc.
4  *
5  * See file CREDITS for list of people who contributed to this
6  * project.
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License as
10  * published by the Free Software Foundation; either version 2 of
11  * the License, or (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
21  * MA 02111-1307 USA
22  */
23
24 /*
25  * cpu.c
26  *
27  * CPU specific code
28  *
29  * written or collected and sometimes rewritten by
30  * Magnus Damm <damm@bitsmart.com>
31  *
32  * minor modifications by
33  * Wolfgang Denk <wd@denx.de>
34  *
35  * more modifications by
36  * Josh Huber <huber@mclx.com>
37  * added support for the 74xx series of cpus
38  * added support for the 7xx series of cpus
39  * made the code a little less hard-coded, and more auto-detectish
40  */
41
42 #include <common.h>
43 #include <command.h>
44 #include <74xx_7xx.h>
45 #include <asm/cache.h>
46
47 #if defined(CONFIG_OF_LIBFDT)
48 #include <libfdt.h>
49 #include <fdt_support.h>
50 #endif
51
52 #ifdef CONFIG_AMIGAONEG3SE
53 #include "../board/MAI/AmigaOneG3SE/via686.h"
54 #include "../board/MAI/AmigaOneG3SE/memio.h"
55 #endif
56
57 DECLARE_GLOBAL_DATA_PTR;
58
59 cpu_t
60 get_cpu_type(void)
61 {
62         uint pvr = get_pvr();
63         cpu_t type;
64
65         type = CPU_UNKNOWN;
66
67         switch (PVR_VER(pvr)) {
68         case 0x000c:
69                 type = CPU_7400;
70                 break;
71         case 0x0008:
72                 type = CPU_750;
73
74                 if (((pvr >> 8) & 0xff) == 0x01) {
75                         type = CPU_750CX;       /* old CX (80100 and 8010x?)*/
76                 } else if (((pvr >> 8) & 0xff) == 0x22) {
77                         type = CPU_750CX;       /* CX (82201,82202) and CXe (82214) */
78                 } else if (((pvr >> 8) & 0xff) == 0x33) {
79                         type = CPU_750CX;       /* CXe (83311) */
80                 } else if (((pvr >> 12) & 0xF) == 0x3) {
81                         type = CPU_755;
82                 }
83                 break;
84
85         case 0x7000:
86                 type = CPU_750FX;
87                 break;
88
89         case 0x7002:
90                 type = CPU_750GX;
91                 break;
92
93         case 0x800C:
94                 type = CPU_7410;
95                 break;
96
97         case 0x8000:
98                 type = CPU_7450;
99                 break;
100
101         case 0x8001:
102                 type = CPU_7455;
103                 break;
104
105         case 0x8002:
106                 type = CPU_7457;
107                 break;
108
109         case 0x8003:
110                 type = CPU_7447A;
111                 break;
112
113         case 0x8004:
114                 type = CPU_7448;
115                 break;
116
117         default:
118                 break;
119         }
120
121         return type;
122 }
123
124 /* ------------------------------------------------------------------------- */
125
126 #if !defined(CONFIG_BAB7xx)
127 int checkcpu (void)
128 {
129         uint type   = get_cpu_type();
130         uint pvr    = get_pvr();
131         ulong clock = gd->cpu_clk;
132         char buf[32];
133         char *str;
134
135         puts ("CPU:   ");
136
137         switch (type) {
138         case CPU_750CX:
139                 printf ("750CX%s v%d.%d", (pvr&0xf0)?"e":"",
140                         (pvr>>8) & 0xf,
141                         pvr & 0xf);
142                 goto    PR_CLK;
143
144         case CPU_750:
145                 str = "750";
146                 break;
147
148         case CPU_750FX:
149                 str = "750FX";
150                 break;
151
152         case CPU_750GX:
153                 str = "750GX";
154                 break;
155
156         case CPU_755:
157                 str = "755";
158                 break;
159
160         case CPU_7400:
161                 str = "MPC7400";
162                 break;
163
164         case CPU_7410:
165                 str = "MPC7410";
166                 break;
167
168         case CPU_7447A:
169                 str = "MPC7447A";
170                 break;
171
172         case CPU_7448:
173                 str = "MPC7448";
174                 break;
175
176         case CPU_7450:
177                 str = "MPC7450";
178                 break;
179
180         case CPU_7455:
181                 str = "MPC7455";
182                 break;
183
184         case CPU_7457:
185                 str = "MPC7457";
186                 break;
187
188         default:
189                 printf("Unknown CPU -- PVR: 0x%08x\n", pvr);
190                 return -1;
191         }
192
193         printf ("%s v%d.%d", str, (pvr >> 8) & 0xFF, pvr & 0xFF);
194 PR_CLK:
195         printf (" @ %s MHz\n", strmhz(buf, clock));
196
197         return (0);
198 }
199 #endif
200 /* these two functions are unimplemented currently [josh] */
201
202 /* -------------------------------------------------------------------- */
203 /* L1 i-cache                                                           */
204
205 int
206 checkicache(void)
207 {
208         return 0; /* XXX */
209 }
210
211 /* -------------------------------------------------------------------- */
212 /* L1 d-cache                                                           */
213
214 int
215 checkdcache(void)
216 {
217         return 0; /* XXX */
218 }
219
220 /* -------------------------------------------------------------------- */
221
222 static inline void
223 soft_restart(unsigned long addr)
224 {
225         /* SRR0 has system reset vector, SRR1 has default MSR value */
226         /* rfi restores MSR from SRR1 and sets the PC to the SRR0 value */
227
228         __asm__ __volatile__ ("mtspr    26, %0"         :: "r" (addr));
229         __asm__ __volatile__ ("li       4, (1 << 6)"    ::: "r4");
230         __asm__ __volatile__ ("mtspr    27, 4");
231         __asm__ __volatile__ ("rfi");
232
233         while(1);       /* not reached */
234 }
235
236
237 #if !defined(CONFIG_PCIPPC2) && \
238     !defined(CONFIG_BAB7xx)  && \
239     !defined(CONFIG_ELPPC)   && \
240     !defined(CONFIG_PPMC7XX)
241 /* no generic way to do board reset. simply call soft_reset. */
242 void
243 do_reset (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
244 {
245         ulong addr;
246         /* flush and disable I/D cache */
247         __asm__ __volatile__ ("mfspr    3, 1008"        ::: "r3");
248         __asm__ __volatile__ ("ori      5, 5, 0xcc00"   ::: "r5");
249         __asm__ __volatile__ ("ori      4, 3, 0xc00"    ::: "r4");
250         __asm__ __volatile__ ("andc     5, 3, 5"        ::: "r5");
251         __asm__ __volatile__ ("sync");
252         __asm__ __volatile__ ("mtspr    1008, 4");
253         __asm__ __volatile__ ("isync");
254         __asm__ __volatile__ ("sync");
255         __asm__ __volatile__ ("mtspr    1008, 5");
256         __asm__ __volatile__ ("isync");
257         __asm__ __volatile__ ("sync");
258
259 #ifdef CONFIG_SYS_RESET_ADDRESS
260         addr = CONFIG_SYS_RESET_ADDRESS;
261 #else
262         /*
263          * note: when CONFIG_SYS_MONITOR_BASE points to a RAM address,
264          * CONFIG_SYS_MONITOR_BASE - sizeof (ulong) is usually a valid
265          * address. Better pick an address known to be invalid on your
266          * system and assign it to CONFIG_SYS_RESET_ADDRESS.
267          */
268         addr = CONFIG_SYS_MONITOR_BASE - sizeof (ulong);
269 #endif
270         soft_restart(addr);
271         while(1);       /* not reached */
272 }
273 #endif
274
275 /* ------------------------------------------------------------------------- */
276
277 /*
278  * For the 7400 the TB clock runs at 1/4 the cpu bus speed.
279  */
280 #if defined(CONFIG_AMIGAONEG3SE) || defined(CONFIG_SYS_CONFIG_BUS_CLK)
281 unsigned long get_tbclk(void)
282 {
283         return (gd->bus_clk / 4);
284 }
285 #else   /* ! CONFIG_AMIGAONEG3SE and !CONFIG_SYS_CONFIG_BUS_CLK*/
286
287 unsigned long get_tbclk (void)
288 {
289         return CONFIG_SYS_BUS_HZ / 4;
290 }
291 #endif  /* CONFIG_AMIGAONEG3SE or CONFIG_SYS_CONFIG_BUS_CLK*/
292 /* ------------------------------------------------------------------------- */
293 #if defined(CONFIG_WATCHDOG)
294 #if !defined(CONFIG_PCIPPC2) && !defined(CONFIG_BAB7xx)
295 void
296 watchdog_reset(void)
297 {
298
299 }
300 #endif  /* !CONFIG_PCIPPC2 && !CONFIG_BAB7xx */
301 #endif  /* CONFIG_WATCHDOG */
302
303 /* ------------------------------------------------------------------------- */
304
305 #ifdef CONFIG_OF_LIBFDT
306 void ft_cpu_setup(void *blob, bd_t *bd)
307 {
308         do_fixup_by_prop_u32(blob, "device_type", "cpu", 4,
309                              "timebase-frequency", bd->bi_busfreq / 4, 1);
310         do_fixup_by_prop_u32(blob, "device_type", "cpu", 4,
311                              "bus-frequency", bd->bi_busfreq, 1);
312         do_fixup_by_prop_u32(blob, "device_type", "cpu", 4,
313                              "clock-frequency", bd->bi_intfreq, 1);
314
315         fdt_fixup_memory(blob, (u64)bd->bi_memstart, (u64)bd->bi_memsize);
316
317         fdt_fixup_ethernet(blob);
318 }
319 #endif
320 /* ------------------------------------------------------------------------- */