efd8fc614a641f7abb1cc61dd213b7dfc278d73a
[oweals/u-boot.git] / arch / arm / mach-imx / cpu.c
1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3  * (C) Copyright 2007
4  * Sascha Hauer, Pengutronix
5  *
6  * (C) Copyright 2009 Freescale Semiconductor, Inc.
7  */
8
9 #include <bootm.h>
10 #include <common.h>
11 #include <netdev.h>
12 #include <linux/errno.h>
13 #include <asm/io.h>
14 #include <asm/arch/imx-regs.h>
15 #include <asm/arch/clock.h>
16 #include <asm/arch/sys_proto.h>
17 #include <asm/arch/crm_regs.h>
18 #include <asm/mach-imx/boot_mode.h>
19 #include <imx_thermal.h>
20 #include <ipu_pixfmt.h>
21 #include <thermal.h>
22 #include <sata.h>
23
24 #ifdef CONFIG_FSL_ESDHC_IMX
25 #include <fsl_esdhc_imx.h>
26 #endif
27
28 static u32 reset_cause = -1;
29
30 u32 get_imx_reset_cause(void)
31 {
32         struct src *src_regs = (struct src *)SRC_BASE_ADDR;
33
34         if (reset_cause == -1) {
35                 reset_cause = readl(&src_regs->srsr);
36 /* preserve the value for U-Boot proper */
37 #if !defined(CONFIG_SPL_BUILD)
38                 writel(reset_cause, &src_regs->srsr);
39 #endif
40         }
41
42         return reset_cause;
43 }
44
45 #if defined(CONFIG_DISPLAY_CPUINFO) && !defined(CONFIG_SPL_BUILD)
46 static char *get_reset_cause(void)
47 {
48         switch (get_imx_reset_cause()) {
49         case 0x00001:
50         case 0x00011:
51                 return "POR";
52         case 0x00004:
53                 return "CSU";
54         case 0x00008:
55                 return "IPP USER";
56         case 0x00010:
57 #ifdef  CONFIG_MX7
58                 return "WDOG1";
59 #else
60                 return "WDOG";
61 #endif
62         case 0x00020:
63                 return "JTAG HIGH-Z";
64         case 0x00040:
65                 return "JTAG SW";
66         case 0x00080:
67                 return "WDOG3";
68 #ifdef CONFIG_MX7
69         case 0x00100:
70                 return "WDOG4";
71         case 0x00200:
72                 return "TEMPSENSE";
73 #elif defined(CONFIG_IMX8M)
74         case 0x00100:
75                 return "WDOG2";
76         case 0x00200:
77                 return "TEMPSENSE";
78 #else
79         case 0x00100:
80                 return "TEMPSENSE";
81         case 0x10000:
82                 return "WARM BOOT";
83 #endif
84         default:
85                 return "unknown reset";
86         }
87 }
88 #endif
89
90 #if defined(CONFIG_MX53) || defined(CONFIG_MX6)
91 #if defined(CONFIG_MX53)
92 #define MEMCTL_BASE     ESDCTL_BASE_ADDR
93 #else
94 #define MEMCTL_BASE     MMDC_P0_BASE_ADDR
95 #endif
96 static const unsigned char col_lookup[] = {9, 10, 11, 8, 12, 9, 9, 9};
97 static const unsigned char bank_lookup[] = {3, 2};
98
99 /* these MMDC registers are common to the IMX53 and IMX6 */
100 struct esd_mmdc_regs {
101         uint32_t        ctl;
102         uint32_t        pdc;
103         uint32_t        otc;
104         uint32_t        cfg0;
105         uint32_t        cfg1;
106         uint32_t        cfg2;
107         uint32_t        misc;
108 };
109
110 #define ESD_MMDC_CTL_GET_ROW(mdctl)     ((ctl >> 24) & 7)
111 #define ESD_MMDC_CTL_GET_COLUMN(mdctl)  ((ctl >> 20) & 7)
112 #define ESD_MMDC_CTL_GET_WIDTH(mdctl)   ((ctl >> 16) & 3)
113 #define ESD_MMDC_CTL_GET_CS1(mdctl)     ((ctl >> 30) & 1)
114 #define ESD_MMDC_MISC_GET_BANK(mdmisc)  ((misc >> 5) & 1)
115
116 /*
117  * imx_ddr_size - return size in bytes of DRAM according MMDC config
118  * The MMDC MDCTL register holds the number of bits for row, col, and data
119  * width and the MMDC MDMISC register holds the number of banks. Combine
120  * all these bits to determine the meme size the MMDC has been configured for
121  */
122 unsigned imx_ddr_size(void)
123 {
124         struct esd_mmdc_regs *mem = (struct esd_mmdc_regs *)MEMCTL_BASE;
125         unsigned ctl = readl(&mem->ctl);
126         unsigned misc = readl(&mem->misc);
127         int bits = 11 + 0 + 0 + 1;      /* row + col + bank + width */
128
129         bits += ESD_MMDC_CTL_GET_ROW(ctl);
130         bits += col_lookup[ESD_MMDC_CTL_GET_COLUMN(ctl)];
131         bits += bank_lookup[ESD_MMDC_MISC_GET_BANK(misc)];
132         bits += ESD_MMDC_CTL_GET_WIDTH(ctl);
133         bits += ESD_MMDC_CTL_GET_CS1(ctl);
134
135         /* The MX6 can do only 3840 MiB of DRAM */
136         if (bits == 32)
137                 return 0xf0000000;
138
139         return 1 << bits;
140 }
141 #endif
142
143 #if defined(CONFIG_DISPLAY_CPUINFO) && !defined(CONFIG_SPL_BUILD)
144
145 const char *get_imx_type(u32 imxtype)
146 {
147         switch (imxtype) {
148         case MXC_CPU_IMX8MM:
149                 return "8MMQ";  /* Quad-core version of the imx8mm */
150         case MXC_CPU_IMX8MML:
151                 return "8MMQL"; /* Quad-core Lite version of the imx8mm */
152         case MXC_CPU_IMX8MMD:
153                 return "8MMD";  /* Dual-core version of the imx8mm */
154         case MXC_CPU_IMX8MMDL:
155                 return "8MMDL"; /* Dual-core Lite version of the imx8mm */
156         case MXC_CPU_IMX8MMS:
157                 return "8MMS";  /* Single-core version of the imx8mm */
158         case MXC_CPU_IMX8MMSL:
159                 return "8MMSL"; /* Single-core Lite version of the imx8mm */
160         case MXC_CPU_IMX8MQ:
161                 return "8MQ";   /* Quad-core version of the imx8m */
162         case MXC_CPU_MX7S:
163                 return "7S";    /* Single-core version of the mx7 */
164         case MXC_CPU_MX7D:
165                 return "7D";    /* Dual-core version of the mx7 */
166         case MXC_CPU_MX6QP:
167                 return "6QP";   /* Quad-Plus version of the mx6 */
168         case MXC_CPU_MX6DP:
169                 return "6DP";   /* Dual-Plus version of the mx6 */
170         case MXC_CPU_MX6Q:
171                 return "6Q";    /* Quad-core version of the mx6 */
172         case MXC_CPU_MX6D:
173                 return "6D";    /* Dual-core version of the mx6 */
174         case MXC_CPU_MX6DL:
175                 return "6DL";   /* Dual Lite version of the mx6 */
176         case MXC_CPU_MX6SOLO:
177                 return "6SOLO"; /* Solo version of the mx6 */
178         case MXC_CPU_MX6SL:
179                 return "6SL";   /* Solo-Lite version of the mx6 */
180         case MXC_CPU_MX6SLL:
181                 return "6SLL";  /* SLL version of the mx6 */
182         case MXC_CPU_MX6SX:
183                 return "6SX";   /* SoloX version of the mx6 */
184         case MXC_CPU_MX6UL:
185                 return "6UL";   /* Ultra-Lite version of the mx6 */
186         case MXC_CPU_MX6ULL:
187                 return "6ULL";  /* ULL version of the mx6 */
188         case MXC_CPU_MX6ULZ:
189                 return "6ULZ";  /* ULZ version of the mx6 */
190         case MXC_CPU_MX51:
191                 return "51";
192         case MXC_CPU_MX53:
193                 return "53";
194         default:
195                 return "??";
196         }
197 }
198
199 int print_cpuinfo(void)
200 {
201         u32 cpurev;
202         __maybe_unused u32 max_freq;
203
204         cpurev = get_cpu_rev();
205
206 #if defined(CONFIG_IMX_THERMAL)
207         struct udevice *thermal_dev;
208         int cpu_tmp, minc, maxc, ret;
209
210         printf("CPU:   Freescale i.MX%s rev%d.%d",
211                get_imx_type((cpurev & 0xFF000) >> 12),
212                (cpurev & 0x000F0) >> 4,
213                (cpurev & 0x0000F) >> 0);
214         max_freq = get_cpu_speed_grade_hz();
215         if (!max_freq || max_freq == mxc_get_clock(MXC_ARM_CLK)) {
216                 printf(" at %dMHz\n", mxc_get_clock(MXC_ARM_CLK) / 1000000);
217         } else {
218                 printf(" %d MHz (running at %d MHz)\n", max_freq / 1000000,
219                        mxc_get_clock(MXC_ARM_CLK) / 1000000);
220         }
221 #else
222         printf("CPU:   Freescale i.MX%s rev%d.%d at %d MHz\n",
223                 get_imx_type((cpurev & 0xFF000) >> 12),
224                 (cpurev & 0x000F0) >> 4,
225                 (cpurev & 0x0000F) >> 0,
226                 mxc_get_clock(MXC_ARM_CLK) / 1000000);
227 #endif
228
229 #if defined(CONFIG_IMX_THERMAL)
230         puts("CPU:   ");
231         switch (get_cpu_temp_grade(&minc, &maxc)) {
232         case TEMP_AUTOMOTIVE:
233                 puts("Automotive temperature grade ");
234                 break;
235         case TEMP_INDUSTRIAL:
236                 puts("Industrial temperature grade ");
237                 break;
238         case TEMP_EXTCOMMERCIAL:
239                 puts("Extended Commercial temperature grade ");
240                 break;
241         default:
242                 puts("Commercial temperature grade ");
243                 break;
244         }
245         printf("(%dC to %dC)", minc, maxc);
246         ret = uclass_get_device(UCLASS_THERMAL, 0, &thermal_dev);
247         if (!ret) {
248                 ret = thermal_get_temp(thermal_dev, &cpu_tmp);
249
250                 if (!ret)
251                         printf(" at %dC\n", cpu_tmp);
252                 else
253                         debug(" - invalid sensor data\n");
254         } else {
255                 debug(" - invalid sensor device\n");
256         }
257 #endif
258
259         printf("Reset cause: %s\n", get_reset_cause());
260         return 0;
261 }
262 #endif
263
264 int cpu_eth_init(bd_t *bis)
265 {
266         int rc = -ENODEV;
267
268 #if defined(CONFIG_FEC_MXC)
269         rc = fecmxc_initialize(bis);
270 #endif
271
272         return rc;
273 }
274
275 #ifdef CONFIG_FSL_ESDHC_IMX
276 /*
277  * Initializes on-chip MMC controllers.
278  * to override, implement board_mmc_init()
279  */
280 int cpu_mmc_init(bd_t *bis)
281 {
282         return fsl_esdhc_mmc_init(bis);
283 }
284 #endif
285
286 #if !(defined(CONFIG_MX7) || defined(CONFIG_IMX8M))
287 u32 get_ahb_clk(void)
288 {
289         struct mxc_ccm_reg *imx_ccm = (struct mxc_ccm_reg *)CCM_BASE_ADDR;
290         u32 reg, ahb_podf;
291
292         reg = __raw_readl(&imx_ccm->cbcdr);
293         reg &= MXC_CCM_CBCDR_AHB_PODF_MASK;
294         ahb_podf = reg >> MXC_CCM_CBCDR_AHB_PODF_OFFSET;
295
296         return get_periph_clk() / (ahb_podf + 1);
297 }
298 #endif
299
300 void arch_preboot_os(void)
301 {
302 #if defined(CONFIG_PCIE_IMX) && !CONFIG_IS_ENABLED(DM_PCI)
303         imx_pcie_remove();
304 #endif
305 #if defined(CONFIG_SATA)
306         if (!is_mx6sdl()) {
307                 sata_remove(0);
308 #if defined(CONFIG_MX6)
309                 disable_sata_clock();
310 #endif
311         }
312 #endif
313 #if defined(CONFIG_VIDEO_IPUV3)
314         /* disable video before launching O/S */
315         ipuv3_fb_shutdown();
316 #endif
317 #if defined(CONFIG_VIDEO_MXS) && !defined(CONFIG_DM_VIDEO)
318         lcdif_power_down();
319 #endif
320 }
321
322 #ifndef CONFIG_IMX8M
323 void set_chipselect_size(int const cs_size)
324 {
325         unsigned int reg;
326         struct iomuxc *iomuxc_regs = (struct iomuxc *)IOMUXC_BASE_ADDR;
327         reg = readl(&iomuxc_regs->gpr[1]);
328
329         switch (cs_size) {
330         case CS0_128:
331                 reg &= ~0x7;    /* CS0=128MB, CS1=0, CS2=0, CS3=0 */
332                 reg |= 0x5;
333                 break;
334         case CS0_64M_CS1_64M:
335                 reg &= ~0x3F;   /* CS0=64MB, CS1=64MB, CS2=0, CS3=0 */
336                 reg |= 0x1B;
337                 break;
338         case CS0_64M_CS1_32M_CS2_32M:
339                 reg &= ~0x1FF;  /* CS0=64MB, CS1=32MB, CS2=32MB, CS3=0 */
340                 reg |= 0x4B;
341                 break;
342         case CS0_32M_CS1_32M_CS2_32M_CS3_32M:
343                 reg &= ~0xFFF;  /* CS0=32MB, CS1=32MB, CS2=32MB, CS3=32MB */
344                 reg |= 0x249;
345                 break;
346         default:
347                 printf("Unknown chip select size: %d\n", cs_size);
348                 break;
349         }
350
351         writel(reg, &iomuxc_regs->gpr[1]);
352 }
353 #endif
354
355 #if defined(CONFIG_MX7) || defined(CONFIG_IMX8M)
356 /*
357  * OCOTP_TESTER3[9:8] (see Fusemap Description Table offset 0x440)
358  * defines a 2-bit SPEED_GRADING
359  */
360 #define OCOTP_TESTER3_SPEED_SHIFT       8
361 enum cpu_speed {
362         OCOTP_TESTER3_SPEED_GRADE0,
363         OCOTP_TESTER3_SPEED_GRADE1,
364         OCOTP_TESTER3_SPEED_GRADE2,
365         OCOTP_TESTER3_SPEED_GRADE3,
366 };
367
368 u32 get_cpu_speed_grade_hz(void)
369 {
370         struct ocotp_regs *ocotp = (struct ocotp_regs *)OCOTP_BASE_ADDR;
371         struct fuse_bank *bank = &ocotp->bank[1];
372         struct fuse_bank1_regs *fuse =
373                 (struct fuse_bank1_regs *)bank->fuse_regs;
374         uint32_t val;
375
376         val = readl(&fuse->tester3);
377         val >>= OCOTP_TESTER3_SPEED_SHIFT;
378         val &= 0x3;
379
380         switch(val) {
381         case OCOTP_TESTER3_SPEED_GRADE0:
382                 return 800000000;
383         case OCOTP_TESTER3_SPEED_GRADE1:
384                 return is_mx7() ? 500000000 : 1000000000;
385         case OCOTP_TESTER3_SPEED_GRADE2:
386                 return is_mx7() ? 1000000000 : 1300000000;
387         case OCOTP_TESTER3_SPEED_GRADE3:
388                 return is_mx7() ? 1200000000 : 1500000000;
389         }
390
391         return 0;
392 }
393
394 /*
395  * OCOTP_TESTER3[7:6] (see Fusemap Description Table offset 0x440)
396  * defines a 2-bit SPEED_GRADING
397  */
398 #define OCOTP_TESTER3_TEMP_SHIFT        6
399
400 u32 get_cpu_temp_grade(int *minc, int *maxc)
401 {
402         struct ocotp_regs *ocotp = (struct ocotp_regs *)OCOTP_BASE_ADDR;
403         struct fuse_bank *bank = &ocotp->bank[1];
404         struct fuse_bank1_regs *fuse =
405                 (struct fuse_bank1_regs *)bank->fuse_regs;
406         uint32_t val;
407
408         val = readl(&fuse->tester3);
409         val >>= OCOTP_TESTER3_TEMP_SHIFT;
410         val &= 0x3;
411
412         if (minc && maxc) {
413                 if (val == TEMP_AUTOMOTIVE) {
414                         *minc = -40;
415                         *maxc = 125;
416                 } else if (val == TEMP_INDUSTRIAL) {
417                         *minc = -40;
418                         *maxc = 105;
419                 } else if (val == TEMP_EXTCOMMERCIAL) {
420                         *minc = -20;
421                         *maxc = 105;
422                 } else {
423                         *minc = 0;
424                         *maxc = 95;
425                 }
426         }
427         return val;
428 }
429 #endif
430
431 #if defined(CONFIG_MX7) || defined(CONFIG_IMX8M)
432 enum boot_device get_boot_device(void)
433 {
434         struct bootrom_sw_info **p =
435                 (struct bootrom_sw_info **)(ulong)ROM_SW_INFO_ADDR;
436
437         enum boot_device boot_dev = SD1_BOOT;
438         u8 boot_type = (*p)->boot_dev_type;
439         u8 boot_instance = (*p)->boot_dev_instance;
440
441         switch (boot_type) {
442         case BOOT_TYPE_SD:
443                 boot_dev = boot_instance + SD1_BOOT;
444                 break;
445         case BOOT_TYPE_MMC:
446                 boot_dev = boot_instance + MMC1_BOOT;
447                 break;
448         case BOOT_TYPE_NAND:
449                 boot_dev = NAND_BOOT;
450                 break;
451         case BOOT_TYPE_QSPI:
452                 boot_dev = QSPI_BOOT;
453                 break;
454         case BOOT_TYPE_WEIM:
455                 boot_dev = WEIM_NOR_BOOT;
456                 break;
457         case BOOT_TYPE_SPINOR:
458                 boot_dev = SPI_NOR_BOOT;
459                 break;
460 #ifdef CONFIG_IMX8M
461         case BOOT_TYPE_USB:
462                 boot_dev = USB_BOOT;
463                 break;
464 #endif
465         default:
466                 break;
467         }
468
469         return boot_dev;
470 }
471 #endif
472
473 #ifdef CONFIG_NXP_BOARD_REVISION
474 int nxp_board_rev(void)
475 {
476         /*
477          * Get Board ID information from OCOTP_GP1[15:8]
478          * RevA: 0x1
479          * RevB: 0x2
480          * RevC: 0x3
481          */
482         struct ocotp_regs *ocotp = (struct ocotp_regs *)OCOTP_BASE_ADDR;
483         struct fuse_bank *bank = &ocotp->bank[4];
484         struct fuse_bank4_regs *fuse =
485                         (struct fuse_bank4_regs *)bank->fuse_regs;
486
487         return (readl(&fuse->gp1) >> 8 & 0x0F);
488 }
489
490 char nxp_board_rev_string(void)
491 {
492         const char *rev = "A";
493
494         return (*rev + nxp_board_rev() - 1);
495 }
496 #endif