1 /*
2  * Copyright (C) 2014      Panasonic Corporation
3  * Copyright (C) 2015-2016 Socionext Inc.
4  *   Author: Masahiro Yamada <yamada.masahiro@socionext.com>
5  *
6  * SPDX-License-Identifier:	GPL-2.0+
7  */
8 
9 #include <common.h>
10 #include <linux/io.h>
11 #include <linux/sizes.h>
12 
13 #include "../soc-info.h"
14 #include "ddrphy-regs.h"
15 
16 /* Select either decimal or hexadecimal */
17 #if 1
18 #define PRINTF_FORMAT "%2d"
19 #else
20 #define PRINTF_FORMAT "%02x"
21 #endif
22 /* field separator */
23 #define FS "   "
24 
25 static unsigned long uniphier_ld4_base[] = {
26 	0x5bc01000,
27 	0x5be01000,
28 	0 /* sentinel */
29 };
30 
31 static unsigned long uniphier_pro4_base[] = {
32 	0x5bc01000,
33 	0x5be01000,
34 	0 /* sentinel */
35 };
36 
37 static unsigned long uniphier_sld8_base[] = {
38 	0x5bc01000,
39 	0x5be01000,
40 	0 /* sentinel */
41 };
42 
43 static u32 read_bdl(struct ddrphy_datx8 __iomem *dx, int index)
44 {
45 	return (readl(&dx->bdlr[index / 5]) >> (index % 5 * 6)) & 0x3f;
46 }
47 
48 static void dump_loop(unsigned long *base,
49 		      void (*callback)(struct ddrphy_datx8 __iomem *))
50 {
51 	struct ddrphy __iomem *phy;
52 	int p, dx;
53 
54 	for (p = 0; *base; base++, p++) {
55 		phy = ioremap(*base, SZ_4K);
56 
57 		for (dx = 0; dx < NR_DATX8_PER_DDRPHY; dx++) {
58 			printf("PHY%dDX%d:", p, dx);
59 			(*callback)(&phy->dx[dx]);
60 			printf("\n");
61 		}
62 
63 		iounmap(phy);
64 	}
65 }
66 
67 static void __wbdl_dump(struct ddrphy_datx8 __iomem *dx)
68 {
69 	int i;
70 
71 	for (i = 0; i < 10; i++)
72 		printf(FS PRINTF_FORMAT, read_bdl(dx, i));
73 
74 	printf(FS "(+" PRINTF_FORMAT ")", readl(&dx->lcdlr[1]) & 0xff);
75 }
76 
77 static void wbdl_dump(unsigned long *base)
78 {
79 	printf("\n--- Write Bit Delay Line ---\n");
80 	printf("           DQ0  DQ1  DQ2  DQ3  DQ4  DQ5  DQ6  DQ7   DM  DQS  (WDQD)\n");
81 
82 	dump_loop(base, &__wbdl_dump);
83 }
84 
85 static void __rbdl_dump(struct ddrphy_datx8 __iomem *dx)
86 {
87 	int i;
88 
89 	for (i = 15; i < 24; i++)
90 		printf(FS PRINTF_FORMAT, read_bdl(dx, i));
91 
92 	printf(FS "(+" PRINTF_FORMAT ")", (readl(&dx->lcdlr[1]) >> 8) & 0xff);
93 }
94 
95 static void rbdl_dump(unsigned long *base)
96 {
97 	printf("\n--- Read Bit Delay Line ---\n");
98 	printf("           DQ0  DQ1  DQ2  DQ3  DQ4  DQ5  DQ6  DQ7   DM  (RDQSD)\n");
99 
100 	dump_loop(base, &__rbdl_dump);
101 }
102 
103 static void __wld_dump(struct ddrphy_datx8 __iomem *dx)
104 {
105 	int rank;
106 	u32 lcdlr0 = readl(&dx->lcdlr[0]);
107 	u32 gtr = readl(&dx->gtr);
108 
109 	for (rank = 0; rank < 4; rank++) {
110 		u32 wld = (lcdlr0 >> (8 * rank)) & 0xff; /* Delay */
111 		u32 wlsl = (gtr >> (12 + 2 * rank)) & 0x3; /* System Latency */
112 
113 		printf(FS PRINTF_FORMAT "%sT", wld,
114 		       wlsl == 0 ? "-1" : wlsl == 1 ? "+0" : "+1");
115 	}
116 }
117 
118 static void wld_dump(unsigned long *base)
119 {
120 	printf("\n--- Write Leveling Delay ---\n");
121 	printf("            Rank0   Rank1   Rank2   Rank3\n");
122 
123 	dump_loop(base, &__wld_dump);
124 }
125 
126 static void __dqsgd_dump(struct ddrphy_datx8 __iomem *dx)
127 {
128 	int rank;
129 	u32 lcdlr2 = readl(&dx->lcdlr[2]);
130 	u32 gtr = readl(&dx->gtr);
131 
132 	for (rank = 0; rank < 4; rank++) {
133 		u32 dqsgd = (lcdlr2 >> (8 * rank)) & 0xff; /* Delay */
134 		u32 dgsl = (gtr >> (3 * rank)) & 0x7; /* System Latency */
135 
136 		printf(FS PRINTF_FORMAT "+%dT", dqsgd, dgsl);
137 	}
138 }
139 
140 static void dqsgd_dump(unsigned long *base)
141 {
142 	printf("\n--- DQS Gating Delay ---\n");
143 	printf("            Rank0   Rank1   Rank2   Rank3\n");
144 
145 	dump_loop(base, &__dqsgd_dump);
146 }
147 
148 static void __mdl_dump(struct ddrphy_datx8 __iomem *dx)
149 {
150 	int i;
151 	u32 mdl = readl(&dx->mdlr);
152 	for (i = 0; i < 3; i++)
153 		printf(FS PRINTF_FORMAT, (mdl >> (8 * i)) & 0xff);
154 }
155 
156 static void mdl_dump(unsigned long *base)
157 {
158 	printf("\n--- Master Delay Line ---\n");
159 	printf("          IPRD TPRD MDLD\n");
160 
161 	dump_loop(base, &__mdl_dump);
162 }
163 
164 #define REG_DUMP(x) \
165 	{ u32 __iomem *p = &phy->x; printf("%3d: %-10s: %p : %08x\n", \
166 					p - (u32 *)phy, #x, p, readl(p)); }
167 
168 static void reg_dump(unsigned long *base)
169 {
170 	struct ddrphy __iomem *phy;
171 	int p;
172 
173 	printf("\n--- DDR PHY registers ---\n");
174 
175 	for (p = 0; *base; base++, p++) {
176 		phy = ioremap(*base, SZ_4K);
177 
178 		printf("== PHY%d (base: %p) ==\n", p, phy);
179 		printf(" No: Name      : Address  : Data\n");
180 
181 		REG_DUMP(ridr);
182 		REG_DUMP(pir);
183 		REG_DUMP(pgcr[0]);
184 		REG_DUMP(pgcr[1]);
185 		REG_DUMP(pgsr[0]);
186 		REG_DUMP(pgsr[1]);
187 		REG_DUMP(pllcr);
188 		REG_DUMP(ptr[0]);
189 		REG_DUMP(ptr[1]);
190 		REG_DUMP(ptr[2]);
191 		REG_DUMP(ptr[3]);
192 		REG_DUMP(ptr[4]);
193 		REG_DUMP(acmdlr);
194 		REG_DUMP(acbdlr);
195 		REG_DUMP(dxccr);
196 		REG_DUMP(dsgcr);
197 		REG_DUMP(dcr);
198 		REG_DUMP(dtpr[0]);
199 		REG_DUMP(dtpr[1]);
200 		REG_DUMP(dtpr[2]);
201 		REG_DUMP(mr0);
202 		REG_DUMP(mr1);
203 		REG_DUMP(mr2);
204 		REG_DUMP(mr3);
205 		REG_DUMP(dx[0].gcr);
206 		REG_DUMP(dx[0].gtr);
207 		REG_DUMP(dx[1].gcr);
208 		REG_DUMP(dx[1].gtr);
209 
210 		iounmap(phy);
211 	}
212 }
213 
214 static int do_ddr(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
215 {
216 	char *cmd = argv[1];
217 	unsigned long *base;
218 
219 	switch (uniphier_get_soc_type()) {
220 	case SOC_UNIPHIER_LD4:
221 		base = uniphier_ld4_base;
222 		break;
223 	case SOC_UNIPHIER_PRO4:
224 		base = uniphier_pro4_base;
225 		break;
226 	case SOC_UNIPHIER_SLD8:
227 		base = uniphier_sld8_base;
228 		break;
229 	default:
230 		printf("unsupported SoC\n");
231 		return CMD_RET_FAILURE;
232 	}
233 
234 	if (argc == 1)
235 		cmd = "all";
236 
237 	if (!strcmp(cmd, "wbdl") || !strcmp(cmd, "all"))
238 		wbdl_dump(base);
239 
240 	if (!strcmp(cmd, "rbdl") || !strcmp(cmd, "all"))
241 		rbdl_dump(base);
242 
243 	if (!strcmp(cmd, "wld") || !strcmp(cmd, "all"))
244 		wld_dump(base);
245 
246 	if (!strcmp(cmd, "dqsgd") || !strcmp(cmd, "all"))
247 		dqsgd_dump(base);
248 
249 	if (!strcmp(cmd, "mdl") || !strcmp(cmd, "all"))
250 		mdl_dump(base);
251 
252 	if (!strcmp(cmd, "reg") || !strcmp(cmd, "all"))
253 		reg_dump(base);
254 
255 	return CMD_RET_SUCCESS;
256 }
257 
258 U_BOOT_CMD(
259 	ddr,	2,	1,	do_ddr,
260 	"UniPhier DDR PHY parameters dumper",
261 	"- dump all of the following\n"
262 	"ddr wbdl - dump Write Bit Delay\n"
263 	"ddr rbdl - dump Read Bit Delay\n"
264 	"ddr wld - dump Write Leveling\n"
265 	"ddr dqsgd - dump DQS Gating Delay\n"
266 	"ddr mdl - dump Master Delay Line\n"
267 	"ddr reg - dump registers\n"
268 );
269