dd5aaa286a68d708fda6814e6d107adba4d70231
[karo-tx-uboot.git] / arch / arm / cpu / armv7 / mx6 / soc.c
1 /*
2  * (C) Copyright 2007
3  * Sascha Hauer, Pengutronix
4  *
5  * (C) Copyright 2009 Freescale Semiconductor, Inc.
6  *
7  * SPDX-License-Identifier:     GPL-2.0+
8  */
9
10 #include <common.h>
11 #include <asm/armv7.h>
12 #include <asm/bootm.h>
13 #include <asm/pl310.h>
14 #include <asm/errno.h>
15 #include <asm/io.h>
16 #include <asm/arch/imx-regs.h>
17 #include <asm/arch/clock.h>
18 #include <asm/arch/sys_proto.h>
19 #include <asm/imx-common/boot_mode.h>
20 #include <asm/imx-common/dma.h>
21 #include <stdbool.h>
22 #include <asm/arch/mxc_hdmi.h>
23 #include <asm/arch/crm_regs.h>
24 #include <asm/bootm.h>
25
26 enum ldo_reg {
27         LDO_ARM,
28         LDO_SOC,
29         LDO_PU,
30 };
31
32 struct scu_regs {
33         u32     ctrl;
34         u32     config;
35         u32     status;
36         u32     invalidate;
37         u32     fpga_rev;
38 };
39
40 u32 get_nr_cpus(void)
41 {
42         struct scu_regs *scu = (struct scu_regs *)SCU_BASE_ADDR;
43         return readl(&scu->config) & 3;
44 }
45
46 u32 get_cpu_rev(void)
47 {
48         struct anatop_regs *anatop = (struct anatop_regs *)ANATOP_BASE_ADDR;
49         u32 reg = readl(&anatop->digprog_sololite);
50         u32 type = ((reg >> 16) & 0xff);
51
52         if (type != MXC_CPU_MX6SL) {
53                 reg = readl(&anatop->digprog);
54                 struct scu_regs *scu = (struct scu_regs *)SCU_BASE_ADDR;
55                 u32 cfg = readl(&scu->config) & 3;
56                 type = ((reg >> 16) & 0xff);
57                 if (type == MXC_CPU_MX6DL) {
58                         if (!cfg)
59                                 type = MXC_CPU_MX6SOLO;
60                 }
61
62                 if (type == MXC_CPU_MX6Q) {
63                         if (cfg == 1)
64                                 type = MXC_CPU_MX6D;
65                 }
66
67         }
68         reg &= 0xff;            /* mx6 silicon revision */
69         return (type << 12) | (reg + 0x10);
70 }
71
72 #ifdef CONFIG_REVISION_TAG
73 u32 __weak get_board_rev(void)
74 {
75         u32 cpurev = get_cpu_rev();
76         u32 type = ((cpurev >> 12) & 0xff);
77         if (type == MXC_CPU_MX6SOLO)
78                 cpurev = (MXC_CPU_MX6DL) << 12 | (cpurev & 0xFFF);
79
80         if (type == MXC_CPU_MX6D)
81                 cpurev = (MXC_CPU_MX6Q) << 12 | (cpurev & 0xFFF);
82
83         return cpurev;
84 }
85 #endif
86
87 void init_aips(void)
88 {
89         struct aipstz_regs *aips1, *aips2;
90 #ifdef CONFIG_MX6SX
91         struct aipstz_regs *aips3;
92 #endif
93
94         aips1 = (struct aipstz_regs *)AIPS1_BASE_ADDR;
95         aips2 = (struct aipstz_regs *)AIPS2_BASE_ADDR;
96 #ifdef CONFIG_MX6SX
97         aips3 = (struct aipstz_regs *)AIPS3_BASE_ADDR;
98 #endif
99
100         /*
101          * Set all MPROTx to be non-bufferable, trusted for R/W,
102          * not forced to user-mode.
103          */
104         writel(0x77777777, &aips1->mprot0);
105         writel(0x77777777, &aips1->mprot1);
106         writel(0x77777777, &aips2->mprot0);
107         writel(0x77777777, &aips2->mprot1);
108
109         /*
110          * Set all OPACRx to be non-bufferable, not require
111          * supervisor privilege level for access,allow for
112          * write access and untrusted master access.
113          */
114         writel(0x00000000, &aips1->opacr0);
115         writel(0x00000000, &aips1->opacr1);
116         writel(0x00000000, &aips1->opacr2);
117         writel(0x00000000, &aips1->opacr3);
118         writel(0x00000000, &aips1->opacr4);
119         writel(0x00000000, &aips2->opacr0);
120         writel(0x00000000, &aips2->opacr1);
121         writel(0x00000000, &aips2->opacr2);
122         writel(0x00000000, &aips2->opacr3);
123         writel(0x00000000, &aips2->opacr4);
124
125 #ifdef CONFIG_MX6SX
126         /*
127          * Set all MPROTx to be non-bufferable, trusted for R/W,
128          * not forced to user-mode.
129          */
130         writel(0x77777777, &aips3->mprot0);
131         writel(0x77777777, &aips3->mprot1);
132
133         /*
134          * Set all OPACRx to be non-bufferable, not require
135          * supervisor privilege level for access,allow for
136          * write access and untrusted master access.
137          */
138         writel(0x00000000, &aips3->opacr0);
139         writel(0x00000000, &aips3->opacr1);
140         writel(0x00000000, &aips3->opacr2);
141         writel(0x00000000, &aips3->opacr3);
142         writel(0x00000000, &aips3->opacr4);
143 #endif
144 }
145
146 static void clear_ldo_ramp(void)
147 {
148         struct anatop_regs *anatop = (struct anatop_regs *)ANATOP_BASE_ADDR;
149         int reg;
150
151         /* ROM may modify LDO ramp up time according to fuse setting, so in
152          * order to be in the safe side we neeed to reset these settings to
153          * match the reset value: 0'b00
154          */
155         reg = readl(&anatop->ana_misc2);
156         reg &= ~(0x3f << 24);
157         writel(reg, &anatop->ana_misc2);
158 }
159
160 /*
161  * Set the PMU_REG_CORE register
162  *
163  * Set LDO_SOC/PU/ARM regulators to the specified millivolt level.
164  * Possible values are from 0.725V to 1.450V in steps of
165  * 0.025V (25mV).
166  */
167 static int set_ldo_voltage(enum ldo_reg ldo, u32 mv)
168 {
169         struct anatop_regs *anatop = (struct anatop_regs *)ANATOP_BASE_ADDR;
170         u32 val, step, old, reg = readl(&anatop->reg_core);
171         u8 shift;
172
173         if (mv < 725)
174                 val = 0x00;     /* Power gated off */
175         else if (mv > 1450)
176                 val = 0x1F;     /* Power FET switched full on. No regulation */
177         else
178                 val = (mv - 700) / 25;
179
180         clear_ldo_ramp();
181
182         switch (ldo) {
183         case LDO_SOC:
184                 shift = 18;
185                 break;
186         case LDO_PU:
187                 shift = 9;
188                 break;
189         case LDO_ARM:
190                 shift = 0;
191                 break;
192         default:
193                 return -EINVAL;
194         }
195
196         old = (reg & (0x1F << shift)) >> shift;
197         step = abs(val - old);
198         if (step == 0)
199                 return 0;
200
201         reg = (reg & ~(0x1F << shift)) | (val << shift);
202         writel(reg, &anatop->reg_core);
203
204         /*
205          * The LDO ramp-up is based on 64 clock cycles of 24 MHz = 2.6 us per
206          * step
207          */
208         udelay(3 * step);
209
210         return 0;
211 }
212
213 static void imx_set_wdog_powerdown(bool enable)
214 {
215         struct wdog_regs *wdog1 = (struct wdog_regs *)WDOG1_BASE_ADDR;
216         struct wdog_regs *wdog2 = (struct wdog_regs *)WDOG2_BASE_ADDR;
217
218         /* Write to the PDE (Power Down Enable) bit */
219         writew(enable, &wdog1->wmcr);
220         writew(enable, &wdog2->wmcr);
221 }
222
223 static void set_ahb_rate(u32 val)
224 {
225         struct mxc_ccm_reg *mxc_ccm = (struct mxc_ccm_reg *)CCM_BASE_ADDR;
226         u32 reg, div;
227
228         div = get_periph_clk() / val - 1;
229         reg = readl(&mxc_ccm->cbcdr);
230
231         writel((reg & (~MXC_CCM_CBCDR_AHB_PODF_MASK)) |
232                 (div << MXC_CCM_CBCDR_AHB_PODF_OFFSET), &mxc_ccm->cbcdr);
233 }
234
235 static void clear_mmdc_ch_mask(void)
236 {
237         struct mxc_ccm_reg *mxc_ccm = (struct mxc_ccm_reg *)CCM_BASE_ADDR;
238
239         /* Clear MMDC channel mask */
240         writel(0, &mxc_ccm->ccdr);
241 }
242
243 int arch_cpu_init(void)
244 {
245         init_aips();
246
247         /* Need to clear MMDC_CHx_MASK to make warm reset work. */
248         clear_mmdc_ch_mask();
249
250         /*
251          * When low freq boot is enabled, ROM will not set AHB
252          * freq, so we need to ensure AHB freq is 132MHz in such
253          * scenario.
254          */
255         if (mxc_get_clock(MXC_ARM_CLK) == 396000000)
256                 set_ahb_rate(132000000);
257
258         imx_set_wdog_powerdown(false); /* Disable PDE bit of WMCR register */
259
260 #ifdef CONFIG_APBH_DMA
261         /* Start APBH DMA */
262         mxs_dma_init();
263 #endif
264
265         return 0;
266 }
267
268 int board_postclk_init(void)
269 {
270         set_ldo_voltage(LDO_SOC, 1175); /* Set VDDSOC to 1.175V */
271
272         return 0;
273 }
274
275 #ifndef CONFIG_SYS_DCACHE_OFF
276 void enable_caches(void)
277 {
278 #if defined(CONFIG_SYS_ARM_CACHE_WRITETHROUGH)
279         enum dcache_option option = DCACHE_WRITETHROUGH;
280 #else
281         enum dcache_option option = DCACHE_WRITEBACK;
282 #endif
283
284         /* Avoid random hang when download by usb */
285         invalidate_dcache_all();
286
287         /* Enable D-cache. I-cache is already enabled in start.S */
288         dcache_enable();
289
290         /* Enable caching on OCRAM and ROM */
291         mmu_set_region_dcache_behaviour(ROMCP_ARB_BASE_ADDR,
292                                         ROMCP_ARB_END_ADDR,
293                                         option);
294         mmu_set_region_dcache_behaviour(IRAM_BASE_ADDR,
295                                         IRAM_SIZE,
296                                         option);
297 }
298 #endif
299
300 #if defined(CONFIG_FEC_MXC)
301 void imx_get_mac_from_fuse(int dev_id, unsigned char *mac)
302 {
303         struct ocotp_regs *ocotp = (struct ocotp_regs *)OCOTP_BASE_ADDR;
304         struct fuse_bank *bank = &ocotp->bank[4];
305         struct fuse_bank4_regs *fuse =
306                         (struct fuse_bank4_regs *)bank->fuse_regs;
307
308         u32 value = readl(&fuse->mac_addr_high);
309         mac[0] = (value >> 8);
310         mac[1] = value ;
311
312         value = readl(&fuse->mac_addr_low);
313         mac[2] = value >> 24 ;
314         mac[3] = value >> 16 ;
315         mac[4] = value >> 8 ;
316         mac[5] = value ;
317
318 }
319 #endif
320
321 void boot_mode_apply(unsigned cfg_val)
322 {
323         unsigned reg;
324         struct src *psrc = (struct src *)SRC_BASE_ADDR;
325         writel(cfg_val, &psrc->gpr9);
326         reg = readl(&psrc->gpr10);
327         if (cfg_val)
328                 reg |= 1 << 28;
329         else
330                 reg &= ~(1 << 28);
331         writel(reg, &psrc->gpr10);
332 }
333 /*
334  * cfg_val will be used for
335  * Boot_cfg4[7:0]:Boot_cfg3[7:0]:Boot_cfg2[7:0]:Boot_cfg1[7:0]
336  * After reset, if GPR10[28] is 1, ROM will copy GPR9[25:0]
337  * to SBMR1, which will determine the boot device.
338  */
339 const struct boot_mode soc_boot_modes[] = {
340         {"normal",      MAKE_CFGVAL(0x00, 0x00, 0x00, 0x00)},
341         /* reserved value should start rom usb */
342         {"usb",         MAKE_CFGVAL(0x01, 0x00, 0x00, 0x00)},
343         {"sata",        MAKE_CFGVAL(0x20, 0x00, 0x00, 0x00)},
344         {"ecspi1:0",    MAKE_CFGVAL(0x30, 0x00, 0x00, 0x08)},
345         {"ecspi1:1",    MAKE_CFGVAL(0x30, 0x00, 0x00, 0x18)},
346         {"ecspi1:2",    MAKE_CFGVAL(0x30, 0x00, 0x00, 0x28)},
347         {"ecspi1:3",    MAKE_CFGVAL(0x30, 0x00, 0x00, 0x38)},
348         /* 4 bit bus width */
349         {"esdhc1",      MAKE_CFGVAL(0x40, 0x20, 0x00, 0x00)},
350         {"esdhc2",      MAKE_CFGVAL(0x40, 0x28, 0x00, 0x00)},
351         {"esdhc3",      MAKE_CFGVAL(0x40, 0x30, 0x00, 0x00)},
352         {"esdhc4",      MAKE_CFGVAL(0x40, 0x38, 0x00, 0x00)},
353         {NULL,          0},
354 };
355
356 void s_init(void)
357 {
358         struct anatop_regs *anatop = (struct anatop_regs *)ANATOP_BASE_ADDR;
359         struct mxc_ccm_reg *ccm = (struct mxc_ccm_reg *)CCM_BASE_ADDR;
360         u32 mask480;
361         u32 mask528;
362         u32 reg, periph1, periph2;
363
364         if (is_cpu_type(MXC_CPU_MX6SX))
365                 return;
366
367         /* Due to hardware limitation, on MX6Q we need to gate/ungate all PFDs
368          * to make sure PFD is working right, otherwise, PFDs may
369          * not output clock after reset, MX6DL and MX6SL have added 396M pfd
370          * workaround in ROM code, as bus clock need it
371          */
372
373         mask480 = ANATOP_PFD_CLKGATE_MASK(0) |
374                 ANATOP_PFD_CLKGATE_MASK(1) |
375                 ANATOP_PFD_CLKGATE_MASK(2) |
376                 ANATOP_PFD_CLKGATE_MASK(3);
377         mask528 = ANATOP_PFD_CLKGATE_MASK(1) |
378                 ANATOP_PFD_CLKGATE_MASK(3);
379
380         reg = readl(&ccm->cbcmr);
381         periph2 = ((reg & MXC_CCM_CBCMR_PRE_PERIPH2_CLK_SEL_MASK)
382                 >> MXC_CCM_CBCMR_PRE_PERIPH2_CLK_SEL_OFFSET);
383         periph1 = ((reg & MXC_CCM_CBCMR_PRE_PERIPH_CLK_SEL_MASK)
384                 >> MXC_CCM_CBCMR_PRE_PERIPH_CLK_SEL_OFFSET);
385
386         /* Checking if PLL2 PFD0 or PLL2 PFD2 is using for periph clock */
387         if ((periph2 != 0x2) && (periph1 != 0x2))
388                 mask528 |= ANATOP_PFD_CLKGATE_MASK(0);
389
390         if ((periph2 != 0x1) && (periph1 != 0x1) &&
391                 (periph2 != 0x3) && (periph1 != 0x3))
392                 mask528 |= ANATOP_PFD_CLKGATE_MASK(2);
393
394         writel(mask480, &anatop->pfd_480_set);
395         writel(mask528, &anatop->pfd_528_set);
396         writel(mask480, &anatop->pfd_480_clr);
397         writel(mask528, &anatop->pfd_528_clr);
398 }
399
400 #ifdef CONFIG_IMX_HDMI
401 void imx_enable_hdmi_phy(void)
402 {
403         struct hdmi_regs *hdmi = (struct hdmi_regs *)HDMI_ARB_BASE_ADDR;
404         u8 reg;
405         reg = readb(&hdmi->phy_conf0);
406         reg |= HDMI_PHY_CONF0_PDZ_MASK;
407         writeb(reg, &hdmi->phy_conf0);
408         udelay(3000);
409         reg |= HDMI_PHY_CONF0_ENTMDS_MASK;
410         writeb(reg, &hdmi->phy_conf0);
411         udelay(3000);
412         reg |= HDMI_PHY_CONF0_GEN2_TXPWRON_MASK;
413         writeb(reg, &hdmi->phy_conf0);
414         writeb(HDMI_MC_PHYRSTZ_ASSERT, &hdmi->mc_phyrstz);
415 }
416
417 void imx_setup_hdmi(void)
418 {
419         struct mxc_ccm_reg *mxc_ccm = (struct mxc_ccm_reg *)CCM_BASE_ADDR;
420         struct hdmi_regs *hdmi  = (struct hdmi_regs *)HDMI_ARB_BASE_ADDR;
421         int reg;
422
423         /* Turn on HDMI PHY clock */
424         reg = readl(&mxc_ccm->CCGR2);
425         reg |=  MXC_CCM_CCGR2_HDMI_TX_IAHBCLK_MASK|
426                  MXC_CCM_CCGR2_HDMI_TX_ISFRCLK_MASK;
427         writel(reg, &mxc_ccm->CCGR2);
428         writeb(HDMI_MC_PHYRSTZ_DEASSERT, &hdmi->mc_phyrstz);
429         reg = readl(&mxc_ccm->chsccdr);
430         reg &= ~(MXC_CCM_CHSCCDR_IPU1_DI0_PRE_CLK_SEL_MASK|
431                  MXC_CCM_CHSCCDR_IPU1_DI0_PODF_MASK|
432                  MXC_CCM_CHSCCDR_IPU1_DI0_CLK_SEL_MASK);
433         reg |= (CHSCCDR_PODF_DIVIDE_BY_3
434                  << MXC_CCM_CHSCCDR_IPU1_DI0_PODF_OFFSET)
435                  |(CHSCCDR_IPU_PRE_CLK_540M_PFD
436                  << MXC_CCM_CHSCCDR_IPU1_DI0_PRE_CLK_SEL_OFFSET);
437         writel(reg, &mxc_ccm->chsccdr);
438 }
439 #endif
440
441 #ifndef CONFIG_SYS_L2CACHE_OFF
442 #define IOMUXC_GPR11_L2CACHE_AS_OCRAM 0x00000002
443 void v7_outer_cache_enable(void)
444 {
445         struct pl310_regs *const pl310 = (struct pl310_regs *)L2_PL310_BASE;
446         unsigned int val;
447
448 #if defined CONFIG_MX6SL
449         struct iomuxc *iomux = (struct iomuxc *)IOMUXC_BASE_ADDR;
450         val = readl(&iomux->gpr[11]);
451         if (val & IOMUXC_GPR11_L2CACHE_AS_OCRAM) {
452                 /* L2 cache configured as OCRAM, reset it */
453                 val &= ~IOMUXC_GPR11_L2CACHE_AS_OCRAM;
454                 writel(val, &iomux->gpr[11]);
455         }
456 #endif
457
458         /* Must disable the L2 before changing the latency parameters */
459         clrbits_le32(&pl310->pl310_ctrl, L2X0_CTRL_EN);
460
461         writel(0x132, &pl310->pl310_tag_latency_ctrl);
462         writel(0x132, &pl310->pl310_data_latency_ctrl);
463
464         val = readl(&pl310->pl310_prefetch_ctrl);
465
466         /* Turn on the L2 I/D prefetch */
467         val |= 0x30000000;
468
469         /*
470          * The L2 cache controller(PL310) version on the i.MX6D/Q is r3p1-50rel0
471          * The L2 cache controller(PL310) version on the i.MX6DL/SOLO/SL is r3p2
472          * But according to ARM PL310 errata: 752271
473          * ID: 752271: Double linefill feature can cause data corruption
474          * Fault Status: Present in: r3p0, r3p1, r3p1-50rel0. Fixed in r3p2
475          * Workaround: The only workaround to this erratum is to disable the
476          * double linefill feature. This is the default behavior.
477          */
478
479 #ifndef CONFIG_MX6Q
480         val |= 0x40800000;
481 #endif
482         writel(val, &pl310->pl310_prefetch_ctrl);
483
484         val = readl(&pl310->pl310_power_ctrl);
485         val |= L2X0_DYNAMIC_CLK_GATING_EN;
486         val |= L2X0_STNDBY_MODE_EN;
487         writel(val, &pl310->pl310_power_ctrl);
488
489         setbits_le32(&pl310->pl310_ctrl, L2X0_CTRL_EN);
490 }
491
492 void v7_outer_cache_disable(void)
493 {
494         struct pl310_regs *const pl310 = (struct pl310_regs *)L2_PL310_BASE;
495
496         clrbits_le32(&pl310->pl310_ctrl, L2X0_CTRL_EN);
497 }
498 #endif /* !CONFIG_SYS_L2CACHE_OFF */