ppc/85xx: Clean up mpc8572DS PCI setup code
[platform/kernel/u-boot.git] / board / freescale / mpc8572ds / mpc8572ds.c
1 /*
2  * Copyright 2007-2008 Freescale Semiconductor, Inc.
3  *
4  * See file CREDITS for list of people who contributed to this
5  * project.
6  *
7  * This program is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU General Public License as
9  * published by the Free Software Foundation; either version 2 of
10  * the License, or (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; if not, write to the Free Software
19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
20  * MA 02111-1307 USA
21  */
22
23 #include <common.h>
24 #include <command.h>
25 #include <pci.h>
26 #include <asm/processor.h>
27 #include <asm/mmu.h>
28 #include <asm/cache.h>
29 #include <asm/immap_85xx.h>
30 #include <asm/fsl_pci.h>
31 #include <asm/fsl_ddr_sdram.h>
32 #include <asm/io.h>
33 #include <miiphy.h>
34 #include <libfdt.h>
35 #include <fdt_support.h>
36 #include <tsec.h>
37 #include <netdev.h>
38
39 #include "../common/pixis.h"
40 #include "../common/sgmii_riser.h"
41
42 long int fixed_sdram(void);
43
44 int checkboard (void)
45 {
46         u8 vboot;
47         u8 *pixis_base = (u8 *)PIXIS_BASE;
48
49         puts ("Board: MPC8572DS ");
50 #ifdef CONFIG_PHYS_64BIT
51         puts ("(36-bit addrmap) ");
52 #endif
53         printf ("Sys ID: 0x%02x, "
54                 "Sys Ver: 0x%02x, FPGA Ver: 0x%02x, ",
55                 in_8(pixis_base + PIXIS_ID), in_8(pixis_base + PIXIS_VER),
56                 in_8(pixis_base + PIXIS_PVER));
57
58         vboot = in_8(pixis_base + PIXIS_VBOOT);
59         switch ((vboot & PIXIS_VBOOT_LBMAP) >> 6) {
60                 case PIXIS_VBOOT_LBMAP_NOR0:
61                         puts ("vBank: 0\n");
62                         break;
63                 case PIXIS_VBOOT_LBMAP_PJET:
64                         puts ("Promjet\n");
65                         break;
66                 case PIXIS_VBOOT_LBMAP_NAND:
67                         puts ("NAND\n");
68                         break;
69                 case PIXIS_VBOOT_LBMAP_NOR1:
70                         puts ("vBank: 1\n");
71                         break;
72         }
73
74         return 0;
75 }
76
77 phys_size_t initdram(int board_type)
78 {
79         phys_size_t dram_size = 0;
80
81         puts("Initializing....");
82
83 #ifdef CONFIG_SPD_EEPROM
84         dram_size = fsl_ddr_sdram();
85 #else
86         dram_size = fixed_sdram();
87 #endif
88         dram_size = setup_ddr_tlbs(dram_size / 0x100000);
89         dram_size *= 0x100000;
90
91         puts("    DDR: ");
92         return dram_size;
93 }
94
95 #if !defined(CONFIG_SPD_EEPROM)
96 /*
97  * Fixed sdram init -- doesn't use serial presence detect.
98  */
99
100 phys_size_t fixed_sdram (void)
101 {
102         volatile immap_t *immap = (immap_t *)CONFIG_SYS_IMMR;
103         volatile ccsr_ddr_t *ddr= &immap->im_ddr;
104         uint d_init;
105
106         ddr->cs0_bnds = CONFIG_SYS_DDR_CS0_BNDS;
107         ddr->cs0_config = CONFIG_SYS_DDR_CS0_CONFIG;
108
109         ddr->timing_cfg_3 = CONFIG_SYS_DDR_TIMING_3;
110         ddr->timing_cfg_0 = CONFIG_SYS_DDR_TIMING_0;
111         ddr->timing_cfg_1 = CONFIG_SYS_DDR_TIMING_1;
112         ddr->timing_cfg_2 = CONFIG_SYS_DDR_TIMING_2;
113         ddr->sdram_mode = CONFIG_SYS_DDR_MODE_1;
114         ddr->sdram_mode_2 = CONFIG_SYS_DDR_MODE_2;
115         ddr->sdram_interval = CONFIG_SYS_DDR_INTERVAL;
116         ddr->sdram_data_init = CONFIG_SYS_DDR_DATA_INIT;
117         ddr->sdram_clk_cntl = CONFIG_SYS_DDR_CLK_CTRL;
118         ddr->sdram_cfg_2 = CONFIG_SYS_DDR_CONTROL2;
119
120 #if defined (CONFIG_DDR_ECC)
121         ddr->err_int_en = CONFIG_SYS_DDR_ERR_INT_EN;
122         ddr->err_disable = CONFIG_SYS_DDR_ERR_DIS;
123         ddr->err_sbe = CONFIG_SYS_DDR_SBE;
124 #endif
125         asm("sync;isync");
126
127         udelay(500);
128
129         ddr->sdram_cfg = CONFIG_SYS_DDR_CONTROL;
130
131 #if defined(CONFIG_ECC_INIT_VIA_DDRCONTROLLER)
132         d_init = 1;
133         debug("DDR - 1st controller: memory initializing\n");
134         /*
135          * Poll until memory is initialized.
136          * 512 Meg at 400 might hit this 200 times or so.
137          */
138         while ((ddr->sdram_cfg_2 & (d_init << 4)) != 0) {
139                 udelay(1000);
140         }
141         debug("DDR: memory initialized\n\n");
142         asm("sync; isync");
143         udelay(500);
144 #endif
145
146         return 512 * 1024 * 1024;
147 }
148
149 #endif
150
151 #ifdef CONFIG_PCIE1
152 static struct pci_controller pcie1_hose;
153 #endif
154
155 #ifdef CONFIG_PCIE2
156 static struct pci_controller pcie2_hose;
157 #endif
158
159 #ifdef CONFIG_PCIE3
160 static struct pci_controller pcie3_hose;
161 #endif
162
163 #ifdef CONFIG_PCI
164 void pci_init_board(void)
165 {
166         volatile ccsr_gur_t *gur = (void *)(CONFIG_SYS_MPC85xx_GUTS_ADDR);
167         struct fsl_pci_info pci_info[3];
168         u32 devdisr, pordevsr, io_sel, host_agent, temp32;
169         int first_free_busno = 0;
170         int num = 0;
171
172         int pcie_ep, pcie_configured;
173
174         devdisr = in_be32(&gur->devdisr);
175         pordevsr = in_be32(&gur->pordevsr);
176         io_sel = (pordevsr & MPC85xx_PORDEVSR_IO_SEL) >> 19;
177         host_agent = (in_be32(&gur->porbmsr) & MPC85xx_PORBMSR_HA) >> 16;
178
179         debug ("   pci_init_board: devdisr=%x, io_sel=%x, host_agent=%x\n",
180                         devdisr, io_sel, host_agent);
181
182         if (!(pordevsr & MPC85xx_PORDEVSR_SGMII1_DIS))
183                 printf ("    eTSEC1 is in sgmii mode.\n");
184         if (!(pordevsr & MPC85xx_PORDEVSR_SGMII2_DIS))
185                 printf ("    eTSEC2 is in sgmii mode.\n");
186         if (!(pordevsr & MPC85xx_PORDEVSR_SGMII3_DIS))
187                 printf ("    eTSEC3 is in sgmii mode.\n");
188         if (!(pordevsr & MPC85xx_PORDEVSR_SGMII4_DIS))
189                 printf ("    eTSEC4 is in sgmii mode.\n");
190
191         puts("\n");
192 #ifdef CONFIG_PCIE3
193         pcie_ep = is_fsl_pci_agent(LAW_TRGT_IF_PCIE_3, host_agent);
194         pcie_configured = is_fsl_pci_cfg(LAW_TRGT_IF_PCIE_3, io_sel);
195
196         if (pcie_configured && !(devdisr & MPC85xx_DEVDISR_PCIE3)){
197                 SET_STD_PCIE_INFO(pci_info[num], 3);
198                 printf ("    PCIE3 connected to ULI as %s (base addr %lx)\n",
199                                 pcie_ep ? "End Point" : "Root Complex",
200                                 pci_info[num].regs);
201                 first_free_busno = fsl_pci_init_port(&pci_info[num++],
202                                         &pcie3_hose, first_free_busno);
203                 /*
204                  * Activate ULI1575 legacy chip by performing a fake
205                  * memory access.  Needed to make ULI RTC work.
206                  * Device 1d has the first on-board memory BAR.
207                  */
208                 pci_hose_read_config_dword(&pcie3_hose, PCI_BDF(2, 0x1d, 0),
209                                 PCI_BASE_ADDRESS_1, &temp32);
210                 if (temp32 >= CONFIG_SYS_PCIE3_MEM_BUS) {
211                         void *p = pci_mem_to_virt(PCI_BDF(2, 0x1d, 0),
212                                         temp32, 4, 0);
213                         debug(" uli1572 read to %p\n", p);
214                         in_be32(p);
215                 }
216         } else {
217                 printf ("    PCIE3: disabled\n");
218         }
219         puts("\n");
220 #else
221         setbits_be32(&gur->devdisr, MPC85xx_DEVDISR_PCIE3); /* disable */
222 #endif
223
224 #ifdef CONFIG_PCIE2
225         pcie_ep = is_fsl_pci_agent(LAW_TRGT_IF_PCIE_2, host_agent);
226         pcie_configured = is_fsl_pci_cfg(LAW_TRGT_IF_PCIE_2, io_sel);
227
228         if (pcie_configured && !(devdisr & MPC85xx_DEVDISR_PCIE2)){
229                 SET_STD_PCIE_INFO(pci_info[num], 2);
230                 printf ("    PCIE2 connected to Slot 1 as %s (base addr %lx)\n",
231                                 pcie_ep ? "End Point" : "Root Complex",
232                                 pci_info[num].regs);
233                 first_free_busno = fsl_pci_init_port(&pci_info[num++],
234                                         &pcie2_hose, first_free_busno);
235         } else {
236                 printf ("    PCIE2: disabled\n");
237         }
238
239         puts("\n");
240 #else
241         setbits_be32(&gur->devdisr, MPC85xx_DEVDISR_PCIE2); /* disable */
242 #endif
243
244 #ifdef CONFIG_PCIE1
245         pcie_ep = is_fsl_pci_agent(LAW_TRGT_IF_PCIE_1, host_agent);
246         pcie_configured = is_fsl_pci_cfg(LAW_TRGT_IF_PCIE_1, io_sel);
247
248         if (pcie_configured && !(devdisr & MPC85xx_DEVDISR_PCIE)){
249                 SET_STD_PCIE_INFO(pci_info[num], 1);
250                 printf ("    PCIE1 connected to Slot 2 as %s (base addr %lx)\n",
251                                 pcie_ep ? "End Point" : "Root Complex",
252                                 pci_info[num].regs);
253                 first_free_busno = fsl_pci_init_port(&pci_info[num++],
254                                         &pcie1_hose, first_free_busno);
255         } else {
256                 printf ("    PCIE1: disabled\n");
257         }
258
259         puts("\n");
260 #else
261         setbits_be32(&gur->devdisr, MPC85xx_DEVDISR_PCIE); /* disable */
262 #endif
263 }
264 #endif
265
266 int board_early_init_r(void)
267 {
268         const unsigned int flashbase = CONFIG_SYS_FLASH_BASE;
269         const u8 flash_esel = 2;
270
271         /*
272          * Remap Boot flash + PROMJET region to caching-inhibited
273          * so that flash can be erased properly.
274          */
275
276         /* Flush d-cache and invalidate i-cache of any FLASH data */
277         flush_dcache();
278         invalidate_icache();
279
280         /* invalidate existing TLB entry for flash + promjet */
281         disable_tlb(flash_esel);
282
283         set_tlb(1, flashbase, CONFIG_SYS_FLASH_BASE_PHYS,       /* tlb, epn, rpn */
284                         MAS3_SX|MAS3_SW|MAS3_SR, MAS2_I|MAS2_G, /* perms, wimge */
285                         0, flash_esel, BOOKE_PAGESZ_256M, 1);   /* ts, esel, tsize, iprot */
286
287         return 0;
288 }
289
290 #ifdef CONFIG_GET_CLK_FROM_ICS307
291 /* decode S[0-2] to Output Divider (OD) */
292 static unsigned char ics307_S_to_OD[] = {
293         10, 2, 8, 4, 5, 7, 3, 6
294 };
295
296 /* Calculate frequency being generated by ICS307-02 clock chip based upon
297  * the control bytes being programmed into it. */
298 /* XXX: This function should probably go into a common library */
299 static unsigned long
300 ics307_clk_freq (unsigned char cw0, unsigned char cw1, unsigned char cw2)
301 {
302         const unsigned long InputFrequency = CONFIG_ICS307_REFCLK_HZ;
303         unsigned long VDW = ((cw1 << 1) & 0x1FE) + ((cw2 >> 7) & 1);
304         unsigned long RDW = cw2 & 0x7F;
305         unsigned long OD = ics307_S_to_OD[cw0 & 0x7];
306         unsigned long freq;
307
308         /* CLK1Frequency = InputFrequency * 2 * (VDW + 8) / ((RDW + 2) * OD) */
309
310         /* cw0:  C1 C0 TTL F1 F0 S2 S1 S0
311          * cw1:  V8 V7 V6 V5 V4 V3 V2 V1
312          * cw2:  V0 R6 R5 R4 R3 R2 R1 R0
313          *
314          * R6:R0 = Reference Divider Word (RDW)
315          * V8:V0 = VCO Divider Word (VDW)
316          * S2:S0 = Output Divider Select (OD)
317          * F1:F0 = Function of CLK2 Output
318          * TTL = duty cycle
319          * C1:C0 = internal load capacitance for cyrstal
320          */
321
322         /* Adding 1 to get a "nicely" rounded number, but this needs
323          * more tweaking to get a "properly" rounded number. */
324
325         freq = 1 + (InputFrequency * 2 * (VDW + 8) / ((RDW + 2) * OD));
326
327         debug("ICS307: CW[0-2]: %02X %02X %02X => %u Hz\n", cw0, cw1, cw2,
328                         freq);
329         return freq;
330 }
331
332 unsigned long get_board_sys_clk(ulong dummy)
333 {
334         u8 *pixis_base = (u8 *)PIXIS_BASE;
335
336         return ics307_clk_freq (
337                         in_8(pixis_base + PIXIS_VSYSCLK0),
338                         in_8(pixis_base + PIXIS_VSYSCLK1),
339                         in_8(pixis_base + PIXIS_VSYSCLK2)
340                         );
341 }
342
343 unsigned long get_board_ddr_clk(ulong dummy)
344 {
345         u8 *pixis_base = (u8 *)PIXIS_BASE;
346
347         return ics307_clk_freq (
348                         in_8(pixis_base + PIXIS_VDDRCLK0),
349                         in_8(pixis_base + PIXIS_VDDRCLK1),
350                         in_8(pixis_base + PIXIS_VDDRCLK2)
351                         );
352 }
353 #else
354 unsigned long get_board_sys_clk(ulong dummy)
355 {
356         u8 i;
357         ulong val = 0;
358         u8 *pixis_base = (u8 *)PIXIS_BASE;
359
360         i = in_8(pixis_base + PIXIS_SPD);
361         i &= 0x07;
362
363         switch (i) {
364                 case 0:
365                         val = 33333333;
366                         break;
367                 case 1:
368                         val = 40000000;
369                         break;
370                 case 2:
371                         val = 50000000;
372                         break;
373                 case 3:
374                         val = 66666666;
375                         break;
376                 case 4:
377                         val = 83333333;
378                         break;
379                 case 5:
380                         val = 100000000;
381                         break;
382                 case 6:
383                         val = 133333333;
384                         break;
385                 case 7:
386                         val = 166666666;
387                         break;
388         }
389
390         return val;
391 }
392
393 unsigned long get_board_ddr_clk(ulong dummy)
394 {
395         u8 i;
396         ulong val = 0;
397         u8 *pixis_base = (u8 *)PIXIS_BASE;
398
399         i = in_8(pixis_base + PIXIS_SPD);
400         i &= 0x38;
401         i >>= 3;
402
403         switch (i) {
404                 case 0:
405                         val = 33333333;
406                         break;
407                 case 1:
408                         val = 40000000;
409                         break;
410                 case 2:
411                         val = 50000000;
412                         break;
413                 case 3:
414                         val = 66666666;
415                         break;
416                 case 4:
417                         val = 83333333;
418                         break;
419                 case 5:
420                         val = 100000000;
421                         break;
422                 case 6:
423                         val = 133333333;
424                         break;
425                 case 7:
426                         val = 166666666;
427                         break;
428         }
429         return val;
430 }
431 #endif
432
433 #ifdef CONFIG_TSEC_ENET
434 int board_eth_init(bd_t *bis)
435 {
436         struct tsec_info_struct tsec_info[4];
437         volatile ccsr_gur_t *gur = (void *)(CONFIG_SYS_MPC85xx_GUTS_ADDR);
438         int num = 0;
439
440 #ifdef CONFIG_TSEC1
441         SET_STD_TSEC_INFO(tsec_info[num], 1);
442         if (!(gur->pordevsr & MPC85xx_PORDEVSR_SGMII1_DIS))
443                 tsec_info[num].flags |= TSEC_SGMII;
444         num++;
445 #endif
446 #ifdef CONFIG_TSEC2
447         SET_STD_TSEC_INFO(tsec_info[num], 2);
448         if (!(gur->pordevsr & MPC85xx_PORDEVSR_SGMII2_DIS))
449                 tsec_info[num].flags |= TSEC_SGMII;
450         num++;
451 #endif
452 #ifdef CONFIG_TSEC3
453         SET_STD_TSEC_INFO(tsec_info[num], 3);
454         if (!(gur->pordevsr & MPC85xx_PORDEVSR_SGMII3_DIS))
455                 tsec_info[num].flags |= TSEC_SGMII;
456         num++;
457 #endif
458 #ifdef CONFIG_TSEC4
459         SET_STD_TSEC_INFO(tsec_info[num], 4);
460         if (!(gur->pordevsr & MPC85xx_PORDEVSR_SGMII4_DIS))
461                 tsec_info[num].flags |= TSEC_SGMII;
462         num++;
463 #endif
464
465         if (!num) {
466                 printf("No TSECs initialized\n");
467
468                 return 0;
469         }
470
471 #ifdef CONFIG_FSL_SGMII_RISER
472         fsl_sgmii_riser_init(tsec_info, num);
473 #endif
474
475         tsec_eth_init(bis, tsec_info, num);
476
477         return pci_eth_init(bis);
478 }
479 #endif
480
481 #if defined(CONFIG_OF_BOARD_SETUP)
482 void ft_board_setup(void *blob, bd_t *bd)
483 {
484         phys_addr_t base;
485         phys_size_t size;
486
487         ft_cpu_setup(blob, bd);
488
489         base = getenv_bootm_low();
490         size = getenv_bootm_size();
491
492         fdt_fixup_memory(blob, (u64)base, (u64)size);
493
494 #ifdef CONFIG_PCIE3
495         ft_fsl_pci_setup(blob, "pci0", &pcie3_hose);
496 #endif
497 #ifdef CONFIG_PCIE2
498         ft_fsl_pci_setup(blob, "pci1", &pcie2_hose);
499 #endif
500 #ifdef CONFIG_PCIE1
501         ft_fsl_pci_setup(blob, "pci2", &pcie1_hose);
502 #endif
503 #ifdef CONFIG_FSL_SGMII_RISER
504         fsl_sgmii_riser_fdt_fixup(blob);
505 #endif
506 }
507 #endif
508
509 #ifdef CONFIG_MP
510 extern void cpu_mp_lmb_reserve(struct lmb *lmb);
511
512 void board_lmb_reserve(struct lmb *lmb)
513 {
514         cpu_mp_lmb_reserve(lmb);
515 }
516 #endif