/* * (C) Copyright 2001 * Gerald Van Baren, Custom IDEAS, vanbaren@cideas.com * * See file CREDITS for list of people who contributed to this * project. * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License as * published by the Free Software Foundation; either version 2 of * the License, or (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, * MA 02111-1307 USA */ /* * MII Utilities */ #include <common.h> #include <command.h> #if (CONFIG_COMMANDS & CFG_CMD_MII) #include <miiphy.h> #ifdef CONFIG_TERSE_MII /* * Display values from last command. */ uint last_op; uint last_addr; uint last_data; uint last_reg; /* * MII device/info/read/write * * Syntax: * mii device {devname} * mii info {addr} * mii read {addr} {reg} * mii write {addr} {reg} {data} */ int do_mii (cmd_tbl_t * cmdtp, int flag, int argc, char *argv[]) { char op; unsigned char addr, reg; unsigned short data; int rcode = 0; char *devname; #if defined(CONFIG_8xx) || defined(CONFIG_MCF52x2) mii_init (); #endif /* * We use the last specified parameters, unless new ones are * entered. */ op = last_op; addr = last_addr; data = last_data; reg = last_reg; if ((flag & CMD_FLAG_REPEAT) == 0) { op = argv[1][0]; if (argc >= 3) addr = simple_strtoul (argv[2], NULL, 16); if (argc >= 4) reg = simple_strtoul (argv[3], NULL, 16); if (argc >= 5) data = simple_strtoul (argv[4], NULL, 16); } /* use current device */ devname = miiphy_get_current_dev(); /* * check device/read/write/list. */ if (op == 'i') { unsigned char j, start, end; unsigned int oui; unsigned char model; unsigned char rev; /* * Look for any and all PHYs. Valid addresses are 0..31. */ if (argc >= 3) { start = addr; end = addr + 1; } else { start = 0; end = 31; } for (j = start; j < end; j++) { if (miiphy_info (devname, j, &oui, &model, &rev) == 0) { printf ("PHY 0x%02X: " "OUI = 0x%04X, " "Model = 0x%02X, " "Rev = 0x%02X, " "%3dbaseT, %s\n", j, oui, model, rev, miiphy_speed (devname, j), (miiphy_duplex (devname, j) == FULL) ? "FDX" : "HDX"); } else { puts ("Error reading info from the PHY\n"); } } } else if (op == 'r') { if (miiphy_read (devname, addr, reg, &data) != 0) { puts ("Error reading from the PHY\n"); rcode = 1; } else { printf ("%04X\n", data & 0x0000FFFF); } } else if (op == 'w') { if (miiphy_write (devname, addr, reg, data) != 0) { puts ("Error writing to the PHY\n"); rcode = 1; } } else if (op == 'd') { if (argc == 2) miiphy_listdev (); else miiphy_set_current_dev (argv[2]); } else { printf ("Usage:\n%s\n", cmdtp->usage); return 1; } /* * Save the parameters for repeats. */ last_op = op; last_addr = addr; last_data = data; last_reg = reg; return rcode; } /***************************************************/ U_BOOT_CMD( mii, 5, 1, do_mii, "mii - MII utility commands\n", "device - list available devices\n" "mii device <devname> - set current device\n" "mii info <addr> - display MII PHY info\n" "mii read <addr> <reg> - read MII PHY <addr> register <reg>\n" "mii write <addr> <reg> <data> - write MII PHY <addr> register <reg>\n" ); #else /* ! CONFIG_TERSE_MII ================================================= */ typedef struct _MII_reg_desc_t { ushort regno; char * name; } MII_reg_desc_t; MII_reg_desc_t reg_0_5_desc_tbl[] = { { 0, "PHY control register" }, { 1, "PHY status register" }, { 2, "PHY ID 1 register" }, { 3, "PHY ID 2 register" }, { 4, "Autonegotiation advertisement register" }, { 5, "Autonegotiation partner abilities register" }, }; typedef struct _MII_field_desc_t { ushort hi; ushort lo; ushort mask; char * name; } MII_field_desc_t; MII_field_desc_t reg_0_desc_tbl[] = { { 15, 15, 0x01, "reset" }, { 14, 14, 0x01, "loopback" }, { 13, 6, 0x81, "speed selection" }, /* special */ { 12, 12, 0x01, "A/N enable" }, { 11, 11, 0x01, "power-down" }, { 10, 10, 0x01, "isolate" }, { 9, 9, 0x01, "restart A/N" }, { 8, 8, 0x01, "duplex" }, /* special */ { 7, 7, 0x01, "collision test enable" }, { 5, 0, 0x3f, "(reserved)" } }; MII_field_desc_t reg_1_desc_tbl[] = { { 15, 15, 0x01, "100BASE-T4 able" }, { 14, 14, 0x01, "100BASE-X full duplex able" }, { 13, 13, 0x01, "100BASE-X half duplex able" }, { 12, 12, 0x01, "10 Mbps full duplex able" }, { 11, 11, 0x01, "10 Mbps half duplex able" }, { 10, 10, 0x01, "100BASE-T2 full duplex able" }, { 9, 9, 0x01, "100BASE-T2 half duplex able" }, { 8, 8, 0x01, "extended status" }, { 7, 7, 0x01, "(reserved)" }, { 6, 6, 0x01, "MF preamble suppression" }, { 5, 5, 0x01, "A/N complete" }, { 4, 4, 0x01, "remote fault" }, { 3, 3, 0x01, "A/N able" }, { 2, 2, 0x01, "link status" }, { 1, 1, 0x01, "jabber detect" }, { 0, 0, 0x01, "extended capabilities" }, }; MII_field_desc_t reg_2_desc_tbl[] = { { 15, 0, 0xffff, "OUI portion" }, }; MII_field_desc_t reg_3_desc_tbl[] = { { 15, 10, 0x3f, "OUI portion" }, { 9, 4, 0x3f, "manufacturer part number" }, { 3, 0, 0x0f, "manufacturer rev. number" }, }; MII_field_desc_t reg_4_desc_tbl[] = { { 15, 15, 0x01, "next page able" }, { 14, 14, 0x01, "reserved" }, { 13, 13, 0x01, "remote fault" }, { 12, 12, 0x01, "reserved" }, { 11, 11, 0x01, "asymmetric pause" }, { 10, 10, 0x01, "pause enable" }, { 9, 9, 0x01, "100BASE-T4 able" }, { 8, 8, 0x01, "100BASE-TX full duplex able" }, { 7, 7, 0x01, "100BASE-TX able" }, { 6, 6, 0x01, "10BASE-T full duplex able" }, { 5, 5, 0x01, "10BASE-T able" }, { 4, 0, 0x1f, "xxx to do" }, }; MII_field_desc_t reg_5_desc_tbl[] = { { 15, 15, 0x01, "next page able" }, { 14, 14, 0x01, "acknowledge" }, { 13, 13, 0x01, "remote fault" }, { 12, 12, 0x01, "(reserved)" }, { 11, 11, 0x01, "asymmetric pause able" }, { 10, 10, 0x01, "pause able" }, { 9, 9, 0x01, "100BASE-T4 able" }, { 8, 8, 0x01, "100BASE-X full duplex able" }, { 7, 7, 0x01, "100BASE-TX able" }, { 6, 6, 0x01, "10BASE-T full duplex able" }, { 5, 5, 0x01, "10BASE-T able" }, { 4, 0, 0x1f, "xxx to do" }, }; #define DESC0LEN (sizeof(reg_0_desc_tbl)/sizeof(reg_0_desc_tbl[0])) #define DESC1LEN (sizeof(reg_1_desc_tbl)/sizeof(reg_1_desc_tbl[0])) #define DESC2LEN (sizeof(reg_2_desc_tbl)/sizeof(reg_2_desc_tbl[0])) #define DESC3LEN (sizeof(reg_3_desc_tbl)/sizeof(reg_3_desc_tbl[0])) #define DESC4LEN (sizeof(reg_4_desc_tbl)/sizeof(reg_4_desc_tbl[0])) #define DESC5LEN (sizeof(reg_5_desc_tbl)/sizeof(reg_5_desc_tbl[0])) typedef struct _MII_field_desc_and_len_t { MII_field_desc_t * pdesc; ushort len; } MII_field_desc_and_len_t; MII_field_desc_and_len_t desc_and_len_tbl[] = { { reg_0_desc_tbl, DESC0LEN }, { reg_1_desc_tbl, DESC1LEN }, { reg_2_desc_tbl, DESC2LEN }, { reg_3_desc_tbl, DESC3LEN }, { reg_4_desc_tbl, DESC4LEN }, { reg_5_desc_tbl, DESC5LEN }, }; static void dump_reg( ushort regval, MII_reg_desc_t * prd, MII_field_desc_and_len_t * pdl); static int special_field( ushort regno, MII_field_desc_t * pdesc, ushort regval); void MII_dump_0_to_5( ushort regvals[6], uchar reglo, uchar reghi) { ulong i; for (i = 0; i < 6; i++) { if ((reglo <= i) && (i <= reghi)) dump_reg(regvals[i], ®_0_5_desc_tbl[i], &desc_and_len_tbl[i]); } } static void dump_reg( ushort regval, MII_reg_desc_t * prd, MII_field_desc_and_len_t * pdl) { ulong i; ushort mask_in_place; MII_field_desc_t * pdesc; printf("%u. (%04hx) -- %s --\n", prd->regno, regval, prd->name); for (i = 0; i < pdl->len; i++) { pdesc = &pdl->pdesc[i]; mask_in_place = pdesc->mask << pdesc->lo; printf(" (%04hx:%04hx) %u.", mask_in_place, regval & mask_in_place, prd->regno); if (special_field(prd->regno, pdesc, regval)) { } else { if (pdesc->hi == pdesc->lo) printf("%2u ", pdesc->lo); else printf("%2u-%2u", pdesc->hi, pdesc->lo); printf(" = %5u %s", (regval & mask_in_place) >> pdesc->lo, pdesc->name); } printf("\n"); } printf("\n"); } /* Special fields: ** 0.6,13 ** 0.8 ** 2.15-0 ** 3.15-0 ** 4.4-0 ** 5.4-0 */ static int special_field( ushort regno, MII_field_desc_t * pdesc, ushort regval) { if ((regno == 0) && (pdesc->lo == 6)) { ushort speed_bits = regval & PHY_BMCR_SPEED_MASK; printf("%2u,%2u = b%u%u speed selection = %s Mbps", 6, 13, (regval >> 6) & 1, (regval >> 13) & 1, speed_bits == PHY_BMCR_1000_MBPS ? "1000" : speed_bits == PHY_BMCR_100_MBPS ? "100" : speed_bits == PHY_BMCR_10_MBPS ? "10" : "???"); return 1; } else if ((regno == 0) && (pdesc->lo == 8)) { printf("%2u = %5u duplex = %s", pdesc->lo, (regval >> pdesc->lo) & 1, ((regval >> pdesc->lo) & 1) ? "full" : "half"); return 1; } else if ((regno == 4) && (pdesc->lo == 0)) { ushort sel_bits = (regval >> pdesc->lo) & pdesc->mask; printf("%2u-%2u = %5u selector = %s", pdesc->hi, pdesc->lo, sel_bits, sel_bits == PHY_ANLPAR_PSB_802_3 ? "IEEE 802.3" : sel_bits == PHY_ANLPAR_PSB_802_9 ? "IEEE 802.9 ISLAN-16T" : "???"); return 1; } else if ((regno == 5) && (pdesc->lo == 0)) { ushort sel_bits = (regval >> pdesc->lo) & pdesc->mask; printf("%2u-%2u = %u selector = %s", pdesc->hi, pdesc->lo, sel_bits, sel_bits == PHY_ANLPAR_PSB_802_3 ? "IEEE 802.3" : sel_bits == PHY_ANLPAR_PSB_802_9 ? "IEEE 802.9 ISLAN-16T" : "???"); return 1; } return 0; } char last_op[2]; uint last_data; uint last_addr_lo; uint last_addr_hi; uint last_reg_lo; uint last_reg_hi; static void extract_range( char * input, unsigned char * plo, unsigned char * phi) { char * end; *plo = simple_strtoul(input, &end, 16); if (*end == '-') { end++; *phi = simple_strtoul(end, NULL, 16); } else { *phi = *plo; } } /* ---------------------------------------------------------------- */ int do_mii (cmd_tbl_t * cmdtp, int flag, int argc, char *argv[]) { char op[2]; unsigned char addrlo, addrhi, reglo, reghi; unsigned char addr, reg; unsigned short data; int rcode = 0; char *devname; #ifdef CONFIG_8xx mii_init (); #endif /* * We use the last specified parameters, unless new ones are * entered. */ op[0] = last_op[0]; op[1] = last_op[1]; addrlo = last_addr_lo; addrhi = last_addr_hi; reglo = last_reg_lo; reghi = last_reg_hi; data = last_data; if ((flag & CMD_FLAG_REPEAT) == 0) { op[0] = argv[1][0]; if (strlen(argv[1]) > 1) op[1] = argv[1][1]; else op[1] = '\0'; if (argc >= 3) extract_range(argv[2], &addrlo, &addrhi); if (argc >= 4) extract_range(argv[3], ®lo, ®hi); if (argc >= 5) data = simple_strtoul (argv[4], NULL, 16); } /* use current device */ devname = miiphy_get_current_dev(); /* * check info/read/write. */ if (op[0] == 'i') { unsigned char j, start, end; unsigned int oui; unsigned char model; unsigned char rev; /* * Look for any and all PHYs. Valid addresses are 0..31. */ if (argc >= 3) { start = addrlo; end = addrhi; } else { start = 0; end = 31; } for (j = start; j <= end; j++) { if (miiphy_info (devname, j, &oui, &model, &rev) == 0) { printf("PHY 0x%02X: " "OUI = 0x%04X, " "Model = 0x%02X, " "Rev = 0x%02X, " "%3dbaseT, %s\n", j, oui, model, rev, miiphy_speed (devname, j), (miiphy_duplex (devname, j) == FULL) ? "FDX" : "HDX"); } else { puts ("Error reading info from the PHY\n"); } } } else if (op[0] == 'r') { for (addr = addrlo; addr <= addrhi; addr++) { for (reg = reglo; reg <= reghi; reg++) { data = 0xffff; if (miiphy_read (devname, addr, reg, &data) != 0) { printf( "Error reading from the PHY addr=%02x reg=%02x\n", addr, reg); rcode = 1; } else { if ((addrlo != addrhi) || (reglo != reghi)) printf("addr=%02x reg=%02x data=", (uint)addr, (uint)reg); printf("%04X\n", data & 0x0000FFFF); } } if ((addrlo != addrhi) && (reglo != reghi)) printf("\n"); } } else if (op[0] == 'w') { for (addr = addrlo; addr <= addrhi; addr++) { for (reg = reglo; reg <= reghi; reg++) { if (miiphy_write (devname, addr, reg, data) != 0) { printf("Error writing to the PHY addr=%02x reg=%02x\n", addr, reg); rcode = 1; } } } } else if (strncmp(op, "du", 2) == 0) { ushort regs[6]; int ok = 1; if ((reglo > 5) || (reghi > 5)) { printf( "The MII dump command only formats the " "standard MII registers, 0-5.\n"); return 1; } for (addr = addrlo; addr <= addrhi; addr++) { for (reg = reglo; reg < reghi + 1; reg++) { if (miiphy_read(devname, addr, reg, ®s[reg]) != 0) { ok = 0; printf( "Error reading from the PHY addr=%02x reg=%02x\n", addr, reg); rcode = 1; } } if (ok) MII_dump_0_to_5(regs, reglo, reghi); printf("\n"); } } else if (strncmp(op, "de", 2) == 0) { if (argc == 2) miiphy_listdev (); else miiphy_set_current_dev (argv[2]); } else { printf("Usage:\n%s\n", cmdtp->usage); return 1; } /* * Save the parameters for repeats. */ last_op[0] = op[0]; last_op[1] = op[1]; last_addr_lo = addrlo; last_addr_hi = addrhi; last_reg_lo = reglo; last_reg_hi = reghi; last_data = data; return rcode; } /***************************************************/ U_BOOT_CMD( mii, 5, 1, do_mii, "mii - MII utility commands\n", "device - list available devices\n" "mii device <devname> - set current device\n" "mii info <addr> - display MII PHY info\n" "mii read <addr> <reg> - read MII PHY <addr> register <reg>\n" "mii write <addr> <reg> <data> - write MII PHY <addr> register <reg>\n" "mii dump <addr> <reg> - pretty-print <addr> <reg> (0-5 only)\n" "Addr and/or reg may be ranges, e.g. 2-7.\n" ); #endif /* CONFIG_TERSE_MII */ #endif /* CFG_CMD_MII */