examples/standalone/smc91111_eeprom.c

   1 /*
   2  * (C) Copyright 2004
   3  * Robin Getz rgetz@blacfin.uclinux.org
   4  *
   5  * See file CREDITS for list of people who contributed to this
   6  * project.
   7  *
   8  * This program is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU General Public License as
  10  * published by the Free Software Foundation; either version 2 of
  11  * the License, or (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  21  * MA 02111-1307 USA
  22  *
  23  * Heavily borrowed from the following peoples GPL'ed software:
  24  *  - Wolfgang Denk, DENX Software Engineering, wd@denx.de
  25  *       Das U-boot
  26  *  - Ladislav Michl ladis@linux-mips.org
  27  *       A rejected patch on the U-Boot mailing list
  28  */
  29
  30 #include <common.h>
  31 #include <exports.h>
  32 /* the smc91111.h gets base addr through eth_device' iobase */
  33 struct eth_device { unsigned long iobase; };
  34 #include "../drivers/net/smc91111.h"
  35
  36 #ifdef CONFIG_SMC91111
  37
  38 #ifndef SMC91111_EEPROM_INIT
  39 # define SMC91111_EEPROM_INIT()
  40 #endif
  41
  42 #define SMC_BASE_ADDRESS CONFIG_SMC91111_BASE
  43 #define EEPROM          0x1
  44 #define MAC             0x2
  45 #define UNKNOWN         0x4
  46
  47 void dump_reg (struct eth_device *dev);
  48 void dump_eeprom (struct eth_device *dev);
  49 int write_eeprom_reg (struct eth_device *dev, int value, int reg);
  50 void copy_from_eeprom (struct eth_device *dev);
  51 void print_MAC (struct eth_device *dev);
  52 int read_eeprom_reg (struct eth_device *dev, int reg);
  53 void print_macaddr (struct eth_device *dev);
  54
  55 int smc91111_eeprom (int argc, char *argv[])
  56 {
  57         int c, i, j, done, line, reg, value, start, what;
  58         char input[50];
  59
  60         struct eth_device dev = {
  61                 .iobase = CONFIG_SMC91111_BASE
  62         };
  63
  64         /* Print the ABI version */
  65         app_startup (argv);
  66         if (XF_VERSION != (int) get_version ()) {
  67                 printf ("Expects ABI version %d\n", XF_VERSION);
  68                 printf ("Actual U-Boot ABI version %d\n",
  69                         (int) get_version ());
  70                 printf ("Can't run\n\n");
  71                 return (0);
  72         }
  73
  74         SMC91111_EEPROM_INIT();
  75
  76         if ((SMC_inw (&dev, BANK_SELECT) & 0xFF00) != 0x3300) {
  77                 printf ("Can't find SMSC91111\n");
  78                 return (0);
  79         }
  80
  81         done = 0;
  82         what = UNKNOWN;
  83         printf ("\n");
  84         while (!done) {
  85                 /* print the prompt */
  86                 printf ("SMC91111> ");
  87                 line = 0;
  88                 i = 0;
  89                 start = 1;
  90                 while (!line) {
  91                         /* Wait for a keystroke */
  92                         while (!tstc ());
  93
  94                         c = getc ();
  95                         /* Make Uppercase */
  96                         if (c >= 'Z')
  97                                 c -= ('a' - 'A');
  98                         /* printf(" |%02x| ",c); */
  99
 100                         switch (c) {
 101                         case '\r':      /* Enter                */
 102                         case '\n':
 103                                 input[i] = 0;
 104                                 puts ("\r\n");
 105                                 line = 1;
 106                                 break;
 107                         case '\0':      /* nul                  */
 108                                 continue;
 109
 110                         case 0x03:      /* ^C - break           */
 111                                 input[0] = 0;
 112                                 i = 0;
 113                                 line = 1;
 114                                 done = 1;
 115                                 break;
 116
 117                         case 0x5F:
 118                         case 0x08:      /* ^H  - backspace      */
 119                         case 0x7F:      /* DEL - backspace      */
 120                                 if (i > 0) {
 121                                         puts ("\b \b");
 122                                         i--;
 123                                 }
 124                                 break;
 125                         default:
 126                                 if (start) {
 127                                         if ((c == 'W') || (c == 'D')
 128                                             || (c == 'M') || (c == 'C')
 129                                             || (c == 'P')) {
 130                                                 putc (c);
 131                                                 input[i] = c;
 132                                                 if (i <= 45)
 133                                                         i++;
 134                                                 start = 0;
 135                                         }
 136                                 } else {
 137                                         if ((c >= '0' && c <= '9')
 138                                             || (c >= 'A' && c <= 'F')
 139                                             || (c == 'E') || (c == 'M')
 140                                             || (c == ' ')) {
 141                                                 putc (c);
 142                                                 input[i] = c;
 143                                                 if (i <= 45)
 144                                                         i++;
 145                                                 break;
 146                                         }
 147                                 }
 148                                 break;
 149                         }
 150                 }
 151
 152                 for (; i < 49; i++)
 153                         input[i] = 0;
 154
 155                 switch (input[0]) {
 156                 case ('W'):
 157                         /* Line should be w reg value */
 158                         i = 0;
 159                         reg = 0;
 160                         value = 0;
 161                         /* Skip to the next space or end) */
 162                         while ((input[i] != ' ') && (input[i] != 0))
 163                                 i++;
 164
 165                         if (input[i] != 0)
 166                                 i++;
 167
 168                         /* Are we writing to EEPROM or MAC */
 169                         switch (input[i]) {
 170                         case ('E'):
 171                                 what = EEPROM;
 172                                 break;
 173                         case ('M'):
 174                                 what = MAC;
 175                                 break;
 176                         default:
 177                                 what = UNKNOWN;
 178                                 break;
 179                         }
 180
 181                         /* skip to the next space or end */
 182                         while ((input[i] != ' ') && (input[i] != 0))
 183                                 i++;
 184                         if (input[i] != 0)
 185                                 i++;
 186
 187                         /* Find register to write into */
 188                         j = 0;
 189                         while ((input[i] != ' ') && (input[i] != 0)) {
 190                                 j = input[i] - 0x30;
 191                                 if (j >= 0xA) {
 192                                         j -= 0x07;
 193                                 }
 194                                 reg = (reg * 0x10) + j;
 195                                 i++;
 196                         }
 197
 198                         while ((input[i] != ' ') && (input[i] != 0))
 199                                 i++;
 200
 201                         if (input[i] != 0)
 202                                 i++;
 203                         else
 204                                 what = UNKNOWN;
 205
 206                         /* Get the value to write */
 207                         j = 0;
 208                         while ((input[i] != ' ') && (input[i] != 0)) {
 209                                 j = input[i] - 0x30;
 210                                 if (j >= 0xA) {
 211                                         j -= 0x07;
 212                                 }
 213                                 value = (value * 0x10) + j;
 214                                 i++;
 215                         }
 216
 217                         switch (what) {
 218                         case 1:
 219                                 printf ("Writing EEPROM register %02x with %04x\n", reg, value);
 220                                 write_eeprom_reg (&dev, value, reg);
 221                                 break;
 222                         case 2:
 223                                 printf ("Writing MAC register bank %i, reg %02x with %04x\n", reg >> 4, reg & 0xE, value);
 224                                 SMC_SELECT_BANK (&dev, reg >> 4);
 225                                 SMC_outw (&dev, value, reg & 0xE);
 226                                 break;
 227                         default:
 228                                 printf ("Wrong\n");
 229                                 break;
 230                         }
 231                         break;
 232                 case ('D'):
 233                         dump_eeprom (&dev);
 234                         break;
 235                 case ('M'):
 236                         dump_reg (&dev);
 237                         break;
 238                 case ('C'):
 239                         copy_from_eeprom (&dev);
 240                         break;
 241                 case ('P'):
 242                         print_macaddr (&dev);
 243                         break;
 244                 default:
 245                         break;
 246                 }
 247
 248         }
 249
 250         return (0);
 251 }
 252
 253 void copy_from_eeprom (struct eth_device *dev)
 254 {
 255         int i;
 256
 257         SMC_SELECT_BANK (dev, 1);
 258         SMC_outw (dev, (SMC_inw (dev, CTL_REG) & !CTL_EEPROM_SELECT) |
 259                 CTL_RELOAD, CTL_REG);
 260         i = 100;
 261         while ((SMC_inw (dev, CTL_REG) & CTL_RELOAD) && --i)
 262                 udelay (100);
 263         if (i == 0) {
 264                 printf ("Timeout Refreshing EEPROM registers\n");
 265         } else {
 266                 printf ("EEPROM contents copied to MAC\n");
 267         }
 268
 269 }
 270
 271 void print_macaddr (struct eth_device *dev)
 272 {
 273         int i, j, k, mac[6];
 274
 275         printf ("Current MAC Address in SMSC91111 ");
 276         SMC_SELECT_BANK (dev, 1);
 277         for (i = 0; i < 5; i++) {
 278                 printf ("%02x:", SMC_inb (dev, ADDR0_REG + i));
 279         }
 280
 281         printf ("%02x\n", SMC_inb (dev, ADDR0_REG + 5));
 282
 283         i = 0;
 284         for (j = 0x20; j < 0x23; j++) {
 285                 k = read_eeprom_reg (dev, j);
 286                 mac[i] = k & 0xFF;
 287                 i++;
 288                 mac[i] = k >> 8;
 289                 i++;
 290         }
 291
 292         printf ("Current MAC Address in EEPROM    ");
 293         for (i = 0; i < 5; i++)
 294                 printf ("%02x:", mac[i]);
 295         printf ("%02x\n", mac[5]);
 296
 297 }
 298 void dump_eeprom (struct eth_device *dev)
 299 {
 300         int j, k;
 301
 302         printf ("IOS2-0    ");
 303         for (j = 0; j < 8; j++) {
 304                 printf ("%03x     ", j);
 305         }
 306         printf ("\n");
 307
 308         for (k = 0; k < 4; k++) {
 309                 if (k == 0)
 310                         printf ("CONFIG ");
 311                 if (k == 1)
 312                         printf ("BASE   ");
 313                 if ((k == 2) || (k == 3))
 314                         printf ("       ");
 315                 for (j = 0; j < 0x20; j += 4) {
 316                         printf ("%02x:%04x ", j + k,
 317                                 read_eeprom_reg (dev, j + k));
 318                 }
 319                 printf ("\n");
 320         }
 321
 322         for (j = 0x20; j < 0x40; j++) {
 323                 if ((j & 0x07) == 0)
 324                         printf ("\n");
 325                 printf ("%02x:%04x ", j, read_eeprom_reg (dev, j));
 326         }
 327         printf ("\n");
 328
 329 }
 330
 331 int read_eeprom_reg (struct eth_device *dev, int reg)
 332 {
 333         int timeout;
 334
 335         SMC_SELECT_BANK (dev, 2);
 336         SMC_outw (dev, reg, PTR_REG);
 337
 338         SMC_SELECT_BANK (dev, 1);
 339         SMC_outw (dev, SMC_inw (dev, CTL_REG) | CTL_EEPROM_SELECT |
 340                 CTL_RELOAD, CTL_REG);
 341         timeout = 100;
 342         while ((SMC_inw (dev, CTL_REG) & CTL_RELOAD) && --timeout)
 343                 udelay (100);
 344         if (timeout == 0) {
 345                 printf ("Timeout Reading EEPROM register %02x\n", reg);
 346                 return 0;
 347         }
 348
 349         return SMC_inw (dev, GP_REG);
 350
 351 }
 352
 353 int write_eeprom_reg (struct eth_device *dev, int value, int reg)
 354 {
 355         int timeout;
 356
 357         SMC_SELECT_BANK (dev, 2);
 358         SMC_outw (dev, reg, PTR_REG);
 359
 360         SMC_SELECT_BANK (dev, 1);
 361         SMC_outw (dev, value, GP_REG);
 362         SMC_outw (dev, SMC_inw (dev, CTL_REG) | CTL_EEPROM_SELECT |
 363                 CTL_STORE, CTL_REG);
 364         timeout = 100;
 365         while ((SMC_inw (dev, CTL_REG) & CTL_STORE) && --timeout)
 366                 udelay (100);
 367         if (timeout == 0) {
 368                 printf ("Timeout Writing EEPROM register %02x\n", reg);
 369                 return 0;
 370         }
 371
 372         return 1;
 373
 374 }
 375
 376 void dump_reg (struct eth_device *dev)
 377 {
 378         int i, j;
 379
 380         printf ("    ");
 381         for (j = 0; j < 4; j++) {
 382                 printf ("Bank%i ", j);
 383         }
 384         printf ("\n");
 385         for (i = 0; i < 0xF; i += 2) {
 386                 printf ("%02x  ", i);
 387                 for (j = 0; j < 4; j++) {
 388                         SMC_SELECT_BANK (dev, j);
 389                         printf ("%04x  ", SMC_inw (dev, i));
 390                 }
 391                 printf ("\n");
 392         }
 393 }
 394
 395 #else
 396
 397 int smc91111_eeprom (int argc, char *argv[])
 398 {
 399         printf("Not supported for this board\n");
 400         return 1;
 401 }
 402
 403 #endif