1 /*
2 * (C) Copyright 2011 Freescale Semiconductor, Inc
3 * Andy Fleming
4 *
5 * SPDX-License-Identifier: GPL-2.0+
6 */
7
8 /*
9 * MDIO Commands
10 */
11
12 #include <common.h>
13 #include <command.h>
14 #include <miiphy.h>
15 #include <phy.h>
16
17
18 static char last_op[2];
19 static uint last_data;
20 static uint last_addr_lo;
21 static uint last_addr_hi;
22 static uint last_devad_lo;
23 static uint last_devad_hi;
24 static uint last_reg_lo;
25 static uint last_reg_hi;
26
extract_range(char * input,int * plo,int * phi)27 static int extract_range(char *input, int *plo, int *phi)
28 {
29 char *end;
30 *plo = simple_strtol(input, &end, 0);
31 if (end == input)
32 return -1;
33
34 if ((*end == '-') && *(++end))
35 *phi = simple_strtol(end, NULL, 0);
36 else if (*end == '\0')
37 *phi = *plo;
38 else
39 return -1;
40
41 return 0;
42 }
43
mdio_write_ranges(struct phy_device * phydev,struct mii_dev * bus,int addrlo,int addrhi,int devadlo,int devadhi,int reglo,int reghi,unsigned short data,int extended)44 static int mdio_write_ranges(struct phy_device *phydev, struct mii_dev *bus,
45 int addrlo,
46 int addrhi, int devadlo, int devadhi,
47 int reglo, int reghi, unsigned short data,
48 int extended)
49 {
50 int addr, devad, reg;
51 int err = 0;
52
53 for (addr = addrlo; addr <= addrhi; addr++) {
54 for (devad = devadlo; devad <= devadhi; devad++) {
55 for (reg = reglo; reg <= reghi; reg++) {
56 if (!extended)
57 err = bus->write(bus, addr, devad,
58 reg, data);
59 else
60 err = phydev->drv->writeext(phydev,
61 addr, devad, reg, data);
62
63 if (err)
64 goto err_out;
65 }
66 }
67 }
68
69 err_out:
70 return err;
71 }
72
mdio_read_ranges(struct phy_device * phydev,struct mii_dev * bus,int addrlo,int addrhi,int devadlo,int devadhi,int reglo,int reghi,int extended)73 static int mdio_read_ranges(struct phy_device *phydev, struct mii_dev *bus,
74 int addrlo,
75 int addrhi, int devadlo, int devadhi,
76 int reglo, int reghi, int extended)
77 {
78 int addr, devad, reg;
79
80 printf("Reading from bus %s\n", bus->name);
81 for (addr = addrlo; addr <= addrhi; addr++) {
82 printf("PHY at address %d:\n", addr);
83
84 for (devad = devadlo; devad <= devadhi; devad++) {
85 for (reg = reglo; reg <= reghi; reg++) {
86 int val;
87
88 if (!extended)
89 val = bus->read(bus, addr, devad, reg);
90 else
91 val = phydev->drv->readext(phydev, addr,
92 devad, reg);
93
94 if (val < 0) {
95 printf("Error\n");
96
97 return val;
98 }
99
100 if (devad >= 0)
101 printf("%d.", devad);
102
103 printf("%d - 0x%x\n", reg, val & 0xffff);
104 }
105 }
106 }
107
108 return 0;
109 }
110
111 /* The register will be in the form [a[-b].]x[-y] */
extract_reg_range(char * input,int * devadlo,int * devadhi,int * reglo,int * reghi)112 static int extract_reg_range(char *input, int *devadlo, int *devadhi,
113 int *reglo, int *reghi)
114 {
115 char *regstr;
116
117 /* use strrchr to find the last string after a '.' */
118 regstr = strrchr(input, '.');
119
120 /* If it exists, extract the devad(s) */
121 if (regstr) {
122 char devadstr[32];
123
124 strncpy(devadstr, input, regstr - input);
125 devadstr[regstr - input] = '\0';
126
127 if (extract_range(devadstr, devadlo, devadhi))
128 return -1;
129
130 regstr++;
131 } else {
132 /* Otherwise, we have no devad, and we just got regs */
133 *devadlo = *devadhi = MDIO_DEVAD_NONE;
134
135 regstr = input;
136 }
137
138 return extract_range(regstr, reglo, reghi);
139 }
140
extract_phy_range(char * const argv[],int argc,struct mii_dev ** bus,struct phy_device ** phydev,int * addrlo,int * addrhi)141 static int extract_phy_range(char *const argv[], int argc, struct mii_dev **bus,
142 struct phy_device **phydev,
143 int *addrlo, int *addrhi)
144 {
145 struct phy_device *dev = *phydev;
146
147 if ((argc < 1) || (argc > 2))
148 return -1;
149
150 /* If there are two arguments, it's busname addr */
151 if (argc == 2) {
152 *bus = miiphy_get_dev_by_name(argv[0]);
153
154 if (!*bus)
155 return -1;
156
157 return extract_range(argv[1], addrlo, addrhi);
158 }
159
160 /* It must be one argument, here */
161
162 /*
163 * This argument can be one of two things:
164 * 1) Ethernet device name
165 * 2) Just an address (use the previously-used bus)
166 *
167 * We check all buses for a PHY which is connected to an ethernet
168 * device by the given name. If none are found, we call
169 * extract_range() on the string, and see if it's an address range.
170 */
171 dev = mdio_phydev_for_ethname(argv[0]);
172
173 if (dev) {
174 *addrlo = *addrhi = dev->addr;
175 *bus = dev->bus;
176
177 return 0;
178 }
179
180 /* It's an address or nothing useful */
181 return extract_range(argv[0], addrlo, addrhi);
182 }
183
184 /* ---------------------------------------------------------------- */
do_mdio(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])185 static int do_mdio(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
186 {
187 char op[2];
188 int addrlo, addrhi, reglo, reghi, devadlo, devadhi;
189 unsigned short data;
190 int pos = argc - 1;
191 struct mii_dev *bus;
192 struct phy_device *phydev = NULL;
193 int extended = 0;
194
195 if (argc < 2)
196 return CMD_RET_USAGE;
197
198 /*
199 * We use the last specified parameters, unless new ones are
200 * entered.
201 */
202 op[0] = argv[1][0];
203 addrlo = last_addr_lo;
204 addrhi = last_addr_hi;
205 devadlo = last_devad_lo;
206 devadhi = last_devad_hi;
207 reglo = last_reg_lo;
208 reghi = last_reg_hi;
209 data = last_data;
210
211 bus = mdio_get_current_dev();
212
213 if (flag & CMD_FLAG_REPEAT)
214 op[0] = last_op[0];
215
216 if (strlen(argv[1]) > 1) {
217 op[1] = argv[1][1];
218 if (op[1] == 'x') {
219 phydev = mdio_phydev_for_ethname(argv[2]);
220
221 if (phydev) {
222 addrlo = phydev->addr;
223 addrhi = addrlo;
224 bus = phydev->bus;
225 extended = 1;
226 } else {
227 return -1;
228 }
229
230 if (!phydev->drv ||
231 (!phydev->drv->writeext && (op[0] == 'w')) ||
232 (!phydev->drv->readext && (op[0] == 'r'))) {
233 puts("PHY does not have extended functions\n");
234 return -1;
235 }
236 }
237 }
238
239 switch (op[0]) {
240 case 'w':
241 if (pos > 1)
242 data = simple_strtoul(argv[pos--], NULL, 16);
243 case 'r':
244 if (pos > 1)
245 if (extract_reg_range(argv[pos--], &devadlo, &devadhi,
246 ®lo, ®hi))
247 return -1;
248
249 default:
250 if (pos > 1)
251 if (extract_phy_range(&(argv[2]), pos - 1, &bus,
252 &phydev, &addrlo, &addrhi))
253 return -1;
254
255 break;
256 }
257
258 if (op[0] == 'l') {
259 mdio_list_devices();
260
261 return 0;
262 }
263
264 /* Save the chosen bus */
265 miiphy_set_current_dev(bus->name);
266
267 switch (op[0]) {
268 case 'w':
269 mdio_write_ranges(phydev, bus, addrlo, addrhi, devadlo, devadhi,
270 reglo, reghi, data, extended);
271 break;
272
273 case 'r':
274 mdio_read_ranges(phydev, bus, addrlo, addrhi, devadlo, devadhi,
275 reglo, reghi, extended);
276 break;
277 }
278
279 /*
280 * Save the parameters for repeats.
281 */
282 last_op[0] = op[0];
283 last_addr_lo = addrlo;
284 last_addr_hi = addrhi;
285 last_devad_lo = devadlo;
286 last_devad_hi = devadhi;
287 last_reg_lo = reglo;
288 last_reg_hi = reghi;
289 last_data = data;
290
291 return 0;
292 }
293
294 /***************************************************/
295
296 U_BOOT_CMD(
297 mdio, 6, 1, do_mdio,
298 "MDIO utility commands",
299 "list - List MDIO buses\n"
300 "mdio read <phydev> [<devad>.]<reg> - "
301 "read PHY's register at <devad>.<reg>\n"
302 "mdio write <phydev> [<devad>.]<reg> <data> - "
303 "write PHY's register at <devad>.<reg>\n"
304 "mdio rx <phydev> [<devad>.]<reg> - "
305 "read PHY's extended register at <devad>.<reg>\n"
306 "mdio wx <phydev> [<devad>.]<reg> <data> - "
307 "write PHY's extended register at <devad>.<reg>\n"
308 "<phydev> may be:\n"
309 " <busname> <addr>\n"
310 " <addr>\n"
311 " <eth name>\n"
312 "<addr> <devad>, and <reg> may be ranges, e.g. 1-5.4-0x1f.\n"
313 );
314