a3bf1f73d93efbd62c699d04acfffeb716ad1fc1
[oweals/u-boot.git] / board / mbx8xx / mbx8xx.c
1 /*
2  * (C) Copyright 2000
3  * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
4  * Marius Groeger <mgroeger@sysgo.de>
5  *
6  * Board specific routines for the MBX
7  *
8  * - initialisation
9  * - interface to VPD data (mac address, clock speeds)
10  * - memory controller
11  * - serial io initialisation
12  * - ethernet io initialisation
13  *
14  * -----------------------------------------------------------------
15  * See file CREDITS for list of people who contributed to this
16  * project.
17  *
18  * This program is free software; you can redistribute it and/or
19  * modify it under the terms of the GNU General Public License as
20  * published by the Free Software Foundation; either version 2 of
21  * the License, or (at your option) any later version.
22  *
23  * This program is distributed in the hope that it will be useful,
24  * but WITHOUT ANY WARRANTY; without even the implied warranty of
25  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
26  * GNU General Public License for more details.
27  *
28  * You should have received a copy of the GNU General Public License
29  * along with this program; if not, write to the Free Software
30  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
31  * MA 02111-1307 USA
32  */
33
34 #include <common.h>
35 #include <commproc.h>
36 #include <mpc8xx.h>
37 #include "dimm.h"
38 #include "vpd.h"
39 #include "csr.h"
40
41 /* ------------------------------------------------------------------------- */
42
43 static const uint sdram_table_40[] = {
44         /* DRAM - single read. (offset 0 in upm RAM)
45          */
46         0xCFAFC004, 0x0FAFC404, 0x0CAF0C04, 0x30AF0C00,
47         0xF1BF4805, 0xFFFFC005, 0xFFFFC005, 0xFFFFC005,
48
49         /* DRAM - burst read. (offset 8 in upm RAM)
50          */
51         0xCFAFC004, 0x0FAFC404, 0x0CAF0C04, 0x03AF0C08,
52         0x0CAF0C04, 0x03AF0C08, 0x0CAF0C04, 0x03AF0C08,
53         0x0CAF0C04, 0x30AF0C00, 0xF3BF4805, 0xFFFFC005,
54         0xFFFFC005, 0xFFFFC005, 0xFFFFC005, 0xFFFFC005,
55
56         /* DRAM - single write. (offset 18 in upm RAM)
57          */
58         0xCFFF0004, 0x0FFF0404, 0x0CFF0C00, 0x33FF4804,
59         0xFFFFC005, 0xFFFFC005, 0xFFFFC005, 0xFFFFC005,
60
61         /* DRAM - burst write. (offset 20 in upm RAM)
62          */
63         0xCFFF0004, 0x0FFF0404, 0x0CFF0C00, 0x03FF0C0C,
64         0x0CFF0C00, 0x03FF0C0C, 0x0CFF0C00, 0x03FF0C0C,
65         0x0CFF0C00, 0x33FF4804, 0xFFFFC005, 0xFFFFC005,
66         0xFFFFC005, 0xFFFFC005, 0xFFFFC005, 0xFFFFC005,
67
68         /* refresh  (offset 30 in upm RAM)
69          */
70         0xFCFFC004, 0xC0FFC004, 0x01FFC004, 0x0FFFC004,
71         0x3FFFC004, 0xFFFFC005, 0xFFFFC005, 0xFFFFC005,
72         0xFFFFC005, 0xFFFFC005, 0xFFFFC005, 0xFFFFC005,
73
74         /* exception. (offset 3c in upm RAM)
75          */
76         0xFFFFC007, 0xFFFFC007, 0xFFFFC007, 0xFFFFC007,
77 };
78
79 static const uint sdram_table_50[] = {
80         /* DRAM - single read. (offset 0 in upm RAM)
81          */
82         0xCFAFC004, 0x0FAFC404, 0x0CAF8C04, 0x10AF0C04,
83         0xF0AF0C00, 0xF3BF4805, 0xFFFFC005, 0xFFFFC005,
84
85         /* DRAM - burst read. (offset 8 in upm RAM)
86          */
87         0xCFAFC004, 0X0FAFC404, 0X0CAF8C04, 0X00AF0C04,
88   /*    0X07AF0C08, 0X0CAF0C04, 0X01AF0C04, 0X0FAF0C04, */
89         0X07AF0C08, 0X0CAF0C04, 0X01AF0C04, 0X0FAF0C08,
90         0X0CAF0C04, 0X01AF0C04, 0X0FAF0C08, 0X0CAF0C04,
91   /*    0X10AF0C04, 0XF0AFC000, 0XF3FF4805, 0XFFFFC005, */
92         0X10AF0C04, 0XF0AFC000, 0XF3BF4805, 0XFFFFC005,
93
94         /* DRAM - single write. (offset 18 in upm RAM)
95          */
96         0xCFFF0004, 0x0FFF0404, 0x0CFF0C00, 0x13FF4804,
97         0xFFFFC004, 0xFFFFC005, 0xFFFFC005, 0xFFFFC005,
98
99         /* DRAM - burst write. (offset 20 in upm RAM)
100          */
101         0xCFFF0004, 0x0FFF0404, 0x0CFF0C00, 0x03FF0C0C,
102         0x0CFF0C00, 0x03FF0C0C, 0x0CFF0C00, 0x03FF0C0C,
103         0x0CFF0C00, 0x13FF4804, 0xFFFFC004, 0xFFFFC005,
104         0xFFFFC005, 0xFFFFC005, 0xFFFFC005, 0xFFFFC005,
105
106         /* refresh  (offset 30 in upm RAM)
107          */
108         0xFCFFC004, 0xC0FFC004, 0x01FFC004, 0x0FFFC004,
109         0x1FFFC004, 0xFFFFC004, 0xFFFFC005, 0xFFFFC005,
110         0xFFFFC005, 0xFFFFC005, 0xFFFFC005, 0xFFFFC005,
111
112         /* exception. (offset 3c in upm RAM)
113          */
114         0xFFFFC007, 0xFFFFC007, 0xFFFFC007, 0xFFFFC007,
115 };
116
117 /* ------------------------------------------------------------------------- */
118
119 static unsigned int get_reffreq(void);
120 static unsigned int board_get_cpufreq(void);
121
122 void mbx_init (void)
123 {
124         volatile immap_t *immr = (immap_t *) CONFIG_SYS_IMMR;
125         volatile memctl8xx_t *memctl = &immr->im_memctl;
126         ulong speed, refclock, plprcr, sccr;
127         ulong br0_32 = memctl->memc_br0 & 0x400;
128
129         /* real-time clock status and control register */
130         immr->im_sitk.sitk_rtcsck = KAPWR_KEY;
131         immr->im_sit.sit_rtcsc = 0x00C3;
132
133         /* SIEL and SIMASK Registers (see MBX PRG 2-3) */
134         immr->im_siu_conf.sc_simask = 0x00000000;
135         immr->im_siu_conf.sc_siel = 0xAAAA0000;
136         immr->im_siu_conf.sc_tesr = 0xFFFFFFFF;
137
138         /*
139          * Prepare access to i2c bus. The MBX offers 3 devices on the i2c bus:
140          * 1. Vital Product Data (contains clock speeds, MAC address etc, see vpd.h)
141          * 2. RAM  Specs (see dimm.h)
142          * 2. DIMM Specs (see dimm.h)
143          */
144         vpd_init ();
145
146         /* system clock and reset control register */
147         immr->im_clkrstk.cark_sccrk = KAPWR_KEY;
148         sccr = immr->im_clkrst.car_sccr;
149         sccr &= SCCR_MASK;
150         sccr |= CONFIG_SYS_SCCR;
151         immr->im_clkrst.car_sccr = sccr;
152
153         speed = board_get_cpufreq ();
154         refclock = get_reffreq ();
155
156 #if ((CONFIG_SYS_PLPRCR & PLPRCR_MF_MSK) != 0)
157         plprcr = CONFIG_SYS_PLPRCR;
158 #else
159         plprcr = immr->im_clkrst.car_plprcr;
160         plprcr &= PLPRCR_MF_MSK;        /* isolate MF field */
161         plprcr |= CONFIG_SYS_PLPRCR;            /* reset control bits   */
162 #endif
163
164 #ifdef CONFIG_SYS_USE_OSCCLK                    /* See doc/README.MBX ! */
165         plprcr |= ((speed + refclock / 2) / refclock - 1) << 20;
166 #endif
167
168         immr->im_clkrstk.cark_plprcrk = KAPWR_KEY;
169         immr->im_clkrst.car_plprcr = plprcr;
170
171         /*
172          * preliminary setup of memory controller:
173          * - map Flash, otherwise configuration/status
174          *    registers won't be accessible when read
175          *    by board_init_f.
176          * - map NVRAM and configuation/status registers.
177          * - map pci registers.
178          * - DON'T map ram yet, this is done in initdram().
179          */
180         switch (speed / 1000000) {
181         case 40:
182                 memctl->memc_br0 = 0xFE000000 | br0_32 | 1;
183                 memctl->memc_or0 = 0xFF800930;
184                 memctl->memc_or4 = CONFIG_SYS_NVRAM_OR | 0x920;
185                 memctl->memc_br4 = CONFIG_SYS_NVRAM_BASE | 0x401;
186                 break;
187         case 50:
188                 memctl->memc_br0 = 0xFE000000 | br0_32 | 1;
189                 memctl->memc_or0 = 0xFF800940;
190                 memctl->memc_or4 = CONFIG_SYS_NVRAM_OR | 0x930;
191                 memctl->memc_br4 = CONFIG_SYS_NVRAM_BASE | 0x401;
192                 break;
193         default:
194                 hang ();
195                 break;
196         }
197 #ifdef CONFIG_USE_PCI
198         memctl->memc_or5 = CONFIG_SYS_PCIMEM_OR;
199         memctl->memc_br5 = CONFIG_SYS_PCIMEM_BASE | 0x001;
200         memctl->memc_or6 = CONFIG_SYS_PCIBRIDGE_OR;
201         memctl->memc_br6 = CONFIG_SYS_PCIBRIDGE_BASE | 0x001;
202 #endif
203         /*
204          * FIXME: I do not understand why I have to call this to
205          * initialise the control register here before booting from
206          * the PCMCIA card but if I do not the Linux kernel falls
207          * over in a big heap. If you can answer this question I
208          * would like to know about it.
209          */
210         board_ether_init();
211 }
212
213 void board_serial_init (void)
214 {
215         MBX_CSR1 &= ~(CSR1_COM1EN | CSR1_XCVRDIS);
216 }
217
218 void board_ether_init (void)
219 {
220         MBX_CSR1 &= ~(CSR1_EAEN | CSR1_ELEN);
221         MBX_CSR1 |= CSR1_ETEN | CSR1_TPEN | CSR1_FDDIS;
222 }
223
224 static unsigned int board_get_cpufreq (void)
225 {
226 #ifndef CONFIG_8xx_GCLK_FREQ
227         vpd_packet_t *packet;
228
229         packet = vpd_find_packet (VPD_PID_ICS);
230         return *((ulong *) packet->data);
231 #else
232         return((unsigned int)CONFIG_8xx_GCLK_FREQ );
233 #endif /* CONFIG_8xx_GCLK_FREQ */
234 }
235
236 static unsigned int get_reffreq (void)
237 {
238         vpd_packet_t *packet;
239
240         packet = vpd_find_packet (VPD_PID_RCS);
241         return *((ulong *) packet->data);
242 }
243
244 static void board_get_enetaddr(uchar *addr)
245 {
246         int i;
247         vpd_packet_t *packet;
248
249         packet = vpd_find_packet (VPD_PID_EA);
250         for (i = 0; i < 6; i++)
251                 addr[i] = packet->data[i];
252 }
253
254 int misc_init_r(void)
255 {
256         uchar enetaddr[6];
257
258         if (!eth_getenv_enetaddr("ethaddr", enetaddr)) {
259                 board_get_enetaddr(enetaddr);
260                 eth_putenv_enetaddr("ethaddr", enetaddr);
261         }
262
263         return 0;
264 }
265
266 /*
267  * Check Board Identity:
268  */
269
270 int checkboard (void)
271 {
272         vpd_packet_t *packet;
273         int i;
274         const char *const fmt =
275                 "\n      *** Warning: Low Battery Status - %s Battery ***";
276
277         puts ("Board: ");
278
279         packet = vpd_find_packet (VPD_PID_PID);
280         for (i = 0; i < packet->size; i++) {
281                 serial_putc (packet->data[i]);
282         }
283         packet = vpd_find_packet (VPD_PID_MT);
284         for (i = 0; i < packet->size; i++) {
285                 serial_putc (packet->data[i]);
286         }
287         serial_putc ('(');
288         packet = vpd_find_packet (VPD_PID_FAN);
289         for (i = 0; i < packet->size; i++) {
290                 serial_putc (packet->data[i]);
291         }
292         serial_putc (')');
293
294         if (!(MBX_CSR2 & SR2_BATGD))
295                 printf (fmt, "On-Board");
296         if (!(MBX_CSR2 & SR2_NVBATGD))
297                 printf (fmt, "NVRAM");
298
299         serial_putc ('\n');
300
301         return (0);
302 }
303
304 /* ------------------------------------------------------------------------- */
305
306 static ulong get_ramsize (dimm_t * dimm)
307 {
308         ulong size = 0;
309
310         if (dimm->fmt == 1 || dimm->fmt == 2 || dimm->fmt == 3
311                 || dimm->fmt == 4) {
312                 size = (1 << (dimm->n_row + dimm->n_col)) * dimm->n_banks *
313                         ((dimm->data_w_hi << 8 | dimm->data_w_lo) / 8);
314         }
315
316         return size;
317 }
318
319 phys_size_t initdram (int board_type)
320 {
321         volatile immap_t *immap = (immap_t *) CONFIG_SYS_IMMR;
322         volatile memctl8xx_t *memctl = &immap->im_memctl;
323         unsigned long ram_sz = 0;
324         unsigned long dimm_sz = 0;
325         dimm_t vpd_dimm, vpd_dram;
326         unsigned int speed = board_get_cpufreq () / 1000000;
327
328         if (vpd_read (0xa2, (uchar *) & vpd_dimm, sizeof (vpd_dimm), 0) > 0) {
329                 dimm_sz = get_ramsize (&vpd_dimm);
330         }
331         if (vpd_read (0xa6, (uchar *) & vpd_dram, sizeof (vpd_dram), 0) > 0) {
332                 ram_sz = get_ramsize (&vpd_dram);
333         }
334
335         /*
336          * Only initialize memory controller when running from FLASH.
337          * When running from RAM, don't touch it.
338          */
339         if ((ulong) initdram & 0xff000000) {
340                 ulong dimm_bank;
341                 ulong br0_32 = memctl->memc_br0 & 0x400;
342
343                 switch (speed) {
344                 case 40:
345                         upmconfig (UPMA, (uint *) sdram_table_40,
346                                            sizeof (sdram_table_40) / sizeof (uint));
347                         memctl->memc_mptpr = 0x0200;
348                         memctl->memc_mamr = dimm_sz ? 0x06801000 : 0x13801000;
349                         memctl->memc_or7 = 0xff800930;
350                         memctl->memc_br7 = 0xfc000000 | (br0_32 ^ br0_32) | 1;
351                         break;
352                 case 50:
353                         upmconfig (UPMA, (uint *) sdram_table_50,
354                                            sizeof (sdram_table_50) / sizeof (uint));
355                         memctl->memc_mptpr = 0x0200;
356                         memctl->memc_mamr = dimm_sz ? 0x08801000 : 0x1880100;
357                         memctl->memc_or7 = 0xff800940;
358                         memctl->memc_br7 = 0xfc000000 | (br0_32 ^ br0_32) | 1;
359                         break;
360                 default:
361                         hang ();
362                         break;
363                 }
364
365                 /* now map ram and dimm, largest one first */
366                 dimm_bank = dimm_sz / 2;
367                 if (!dimm_sz) {
368                         memctl->memc_or1 = ~(ram_sz - 1) | 0x400;
369                         memctl->memc_br1 = CONFIG_SYS_SDRAM_BASE | 0x81;
370                         memctl->memc_br2 = 0;
371                         memctl->memc_br3 = 0;
372                 } else if (ram_sz > dimm_bank) {
373                         memctl->memc_or1 = ~(ram_sz - 1) | 0x400;
374                         memctl->memc_br1 = CONFIG_SYS_SDRAM_BASE | 0x81;
375                         memctl->memc_or2 = ~(dimm_bank - 1) | 0x400;
376                         memctl->memc_br2 = (CONFIG_SYS_SDRAM_BASE + ram_sz) | 0x81;
377                         memctl->memc_or3 = ~(dimm_bank - 1) | 0x400;
378                         memctl->memc_br3 = (CONFIG_SYS_SDRAM_BASE + ram_sz + dimm_bank) \
379                                                                      | 0x81;
380                 } else {
381                         memctl->memc_or2 = ~(dimm_bank - 1) | 0x400;
382                         memctl->memc_br2 = CONFIG_SYS_SDRAM_BASE | 0x81;
383                         memctl->memc_or3 = ~(dimm_bank - 1) | 0x400;
384                         memctl->memc_br3 = (CONFIG_SYS_SDRAM_BASE + dimm_bank) | 0x81;
385                         memctl->memc_or1 = ~(ram_sz - 1) | 0x400;
386                         memctl->memc_br1 = (CONFIG_SYS_SDRAM_BASE + dimm_sz) | 0x81;
387                 }
388         }
389
390         return ram_sz + dimm_sz;
391 }