1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3  * Copyright (C) 2014-2019, Toradex AG
4  */
5 
6 /*
7  * Helpers for Freescale PMIC PF0100
8 */
9 
10 #include <common.h>
11 #include <command.h>
12 #include <i2c.h>
13 #include <asm/arch/imx-regs.h>
14 #include <asm/arch/iomux.h>
15 #include <asm/arch/mx6-pins.h>
16 #include <asm/gpio.h>
17 #include <asm/mach-imx/iomux-v3.h>
18 #include <linux/delay.h>
19 
20 #include "pf0100_otp.inc"
21 #include "pf0100.h"
22 
23 /* define for PMIC register dump */
24 /*#define DEBUG */
25 
26 #define WARNBAR "@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@\n"
27 
28 /* use GPIO: EXT_IO1 to switch on VPGM, ON: 1 */
29 static __maybe_unused iomux_v3_cfg_t const pmic_prog_pads[] = {
30 	MX6_PAD_NANDF_D3__GPIO2_IO03 | MUX_PAD_CTRL(NO_PAD_CTRL),
31 #	define PMIC_PROG_VOLTAGE IMX_GPIO_NR(2, 3)
32 };
33 
pmic_init(void)34 unsigned pmic_init(void)
35 {
36 	int rc;
37 	struct udevice *dev = NULL;
38 	unsigned programmed = 0;
39 	uchar bus = 1;
40 	uchar devid, revid, val;
41 
42 	puts("PMIC:  ");
43 	rc = i2c_get_chip_for_busnum(bus, PFUZE100_I2C_ADDR, 1, &dev);
44 	if (rc) {
45 		printf("failed to get device for PMIC at address 0x%x\n",
46 		       PFUZE100_I2C_ADDR);
47 		return 0;
48 	}
49 
50 	/* check for errors in PMIC fuses */
51 	if (dm_i2c_read(dev, PFUZE100_INTSTAT3, &val, 1) < 0) {
52 		puts("i2c pmic INTSTAT3 register read failed\n");
53 		return 0;
54 	}
55 	if (val & PFUZE100_BIT_OTP_ECCI) {
56 		puts("\n" WARNBAR);
57 		puts("WARNING: ecc errors found in pmic fuse banks\n");
58 		puts(WARNBAR);
59 	}
60 	if (dm_i2c_read(dev, PFUZE100_OTP_ECC_SE1, &val, 1) < 0) {
61 		puts("i2c pmic ECC_SE1 register read failed\n");
62 		return 0;
63 	}
64 	if (val & PFUZE100_BITS_ECC_SE1) {
65 		puts(WARNBAR);
66 		puts("WARNING: ecc has made bit corrections in banks 1 to 5\n");
67 		puts(WARNBAR);
68 	}
69 	if (dm_i2c_read(dev, PFUZE100_OTP_ECC_SE2, &val, 1) < 0) {
70 		puts("i2c pmic ECC_SE2 register read failed\n");
71 		return 0;
72 	}
73 	if (val & PFUZE100_BITS_ECC_SE2) {
74 		puts(WARNBAR);
75 		puts("WARNING: ecc has made bit corrections in banks 6 to 10\n"
76 		    );
77 		puts(WARNBAR);
78 	}
79 	if (dm_i2c_read(dev, PFUZE100_OTP_ECC_DE1, &val, 1) < 0) {
80 		puts("i2c pmic ECC_DE register read failed\n");
81 		return 0;
82 	}
83 	if (val & PFUZE100_BITS_ECC_DE1) {
84 		puts(WARNBAR);
85 		puts("ERROR: banks 1 to 5 have uncorrectable bits\n");
86 		puts(WARNBAR);
87 	}
88 	if (dm_i2c_read(dev, PFUZE100_OTP_ECC_DE2, &val, 1) < 0) {
89 		puts("i2c pmic ECC_DE register read failed\n");
90 		return 0;
91 	}
92 	if (val & PFUZE100_BITS_ECC_DE2) {
93 		puts(WARNBAR);
94 		puts("ERROR: banks 6 to 10 have uncorrectable bits\n");
95 		puts(WARNBAR);
96 	}
97 
98 	/* get device ident */
99 	if (dm_i2c_read(dev, PFUZE100_DEVICEID, &devid, 1) < 0) {
100 		puts("i2c pmic devid read failed\n");
101 		return 0;
102 	}
103 	if (dm_i2c_read(dev, PFUZE100_REVID, &revid, 1) < 0) {
104 		puts("i2c pmic revid read failed\n");
105 		return 0;
106 	}
107 	printf("device id: 0x%.2x, revision id: 0x%.2x, ", devid, revid);
108 
109 	/* get device programmed state */
110 	val = PFUZE100_PAGE_REGISTER_PAGE1;
111 	if (dm_i2c_write(dev, PFUZE100_PAGE_REGISTER, &val, 1)) {
112 		puts("i2c write failed\n");
113 		return 0;
114 	}
115 	if (dm_i2c_read(dev, PFUZE100_FUSE_POR1, &val, 1) < 0) {
116 		puts("i2c fuse_por read failed\n");
117 		return 0;
118 	}
119 	if (val & PFUZE100_FUSE_POR_M)
120 		programmed++;
121 
122 	if (dm_i2c_read(dev, PFUZE100_FUSE_POR2, &val, 1) < 0) {
123 		puts("i2c fuse_por read failed\n");
124 		return programmed;
125 	}
126 	if (val & PFUZE100_FUSE_POR_M)
127 		programmed++;
128 
129 	if (dm_i2c_read(dev, PFUZE100_FUSE_POR3, &val, 1) < 0) {
130 		puts("i2c fuse_por read failed\n");
131 		return programmed;
132 	}
133 	if (val & PFUZE100_FUSE_POR_M)
134 		programmed++;
135 
136 	switch (programmed) {
137 	case 0:
138 		puts("not programmed\n");
139 		break;
140 	case 3:
141 		puts("programmed\n");
142 		break;
143 	default:
144 		puts("undefined programming state\n");
145 		break;
146 	}
147 
148 #ifdef DEBUG
149 	{
150 		unsigned int i, j;
151 
152 		for (i = 0; i < 16; i++)
153 			printf("\t%x", i);
154 		for (j = 0; j < 0x80; ) {
155 			printf("\n%2x", j);
156 			for (i = 0; i < 16; i++) {
157 				dm_i2c_read(dev, j + i, &val, 1);
158 				printf("\t%2x", val);
159 			}
160 			j += 0x10;
161 		}
162 		printf("\nEXT Page 1");
163 
164 		val = PFUZE100_PAGE_REGISTER_PAGE1;
165 		if (dm_i2c_write(dev, PFUZE100_PAGE_REGISTER, &val, 1)) {
166 			puts("i2c write failed\n");
167 			return 0;
168 		}
169 
170 		for (j = 0x80; j < 0x100; ) {
171 			printf("\n%2x", j);
172 			for (i = 0; i < 16; i++) {
173 				dm_i2c_read(dev, j + i, &val, 1);
174 				printf("\t%2x", val);
175 			}
176 			j += 0x10;
177 		}
178 		printf("\nEXT Page 2");
179 
180 		val = PFUZE100_PAGE_REGISTER_PAGE2;
181 		if (dm_i2c_write(dev, PFUZE100_PAGE_REGISTER, &val, 1)) {
182 			puts("i2c write failed\n");
183 			return 0;
184 		}
185 
186 		for (j = 0x80; j < 0x100; ) {
187 			printf("\n%2x", j);
188 			for (i = 0; i < 16; i++) {
189 				dm_i2c_read(dev, j + i, &val, 1);
190 				printf("\t%2x", val);
191 			}
192 			j += 0x10;
193 		}
194 		printf("\n");
195 	}
196 #endif /* DEBUG */
197 
198 	return programmed;
199 }
200 
201 #ifndef CONFIG_SPL_BUILD
pf0100_prog(void)202 static int pf0100_prog(void)
203 {
204 	int rc;
205 	struct udevice *dev = NULL;
206 	unsigned char bus = 1;
207 	unsigned char val;
208 	unsigned int i;
209 
210 	if (pmic_init() == 3) {
211 		puts("PMIC already programmed, exiting\n");
212 		return CMD_RET_FAILURE;
213 	}
214 	/* set up gpio to manipulate vprog, initially off */
215 	imx_iomux_v3_setup_multiple_pads(pmic_prog_pads,
216 					 ARRAY_SIZE(pmic_prog_pads));
217 	gpio_direction_output(PMIC_PROG_VOLTAGE, 0);
218 
219 	rc = i2c_get_chip_for_busnum(bus, PFUZE100_I2C_ADDR, 1, &dev);
220 	if (rc) {
221 		printf("failed to get device for PMIC at address 0x%x\n",
222 		       PFUZE100_I2C_ADDR);
223 		return CMD_RET_FAILURE;
224 	}
225 
226 	for (i = 0; i < ARRAY_SIZE(pmic_otp_prog); i++) {
227 		switch (pmic_otp_prog[i].cmd) {
228 		case pmic_i2c:
229 			val = (unsigned char) (pmic_otp_prog[i].value & 0xff);
230 			if (dm_i2c_write(dev, pmic_otp_prog[i].reg, &val, 1)) {
231 				printf("i2c write failed, reg 0x%2x, value 0x%2x\n",
232 				       pmic_otp_prog[i].reg, val);
233 				return CMD_RET_FAILURE;
234 			}
235 			break;
236 		case pmic_delay:
237 			udelay(pmic_otp_prog[i].value * 1000);
238 			break;
239 		case pmic_vpgm:
240 			gpio_direction_output(PMIC_PROG_VOLTAGE,
241 					      pmic_otp_prog[i].value);
242 			break;
243 		case pmic_pwr:
244 			/* TODO */
245 			break;
246 		}
247 	}
248 	return CMD_RET_SUCCESS;
249 }
250 
do_pf0100_prog(struct cmd_tbl * cmdtp,int flag,int argc,char * const argv[])251 static int do_pf0100_prog(struct cmd_tbl *cmdtp, int flag, int argc,
252 			  char *const argv[])
253 {
254 	int ret;
255 	puts("Programming PMIC OTP...");
256 	ret = pf0100_prog();
257 	if (ret == CMD_RET_SUCCESS)
258 		puts("done.\n");
259 	else
260 		puts("failed.\n");
261 	return ret;
262 }
263 
264 U_BOOT_CMD(
265 	pf0100_otp_prog, 1, 0, do_pf0100_prog,
266 	"Program the OTP fuses on the PMIC PF0100",
267 	""
268 );
269 #endif /* CONFIG_SPL_BUILD */
270