board/netstal/common/nm_bsp.c

   1 /*
   2  *(C) Copyright 2005-2008 Netstal Maschinen AG
   3  *    Niklaus Giger (Niklaus.Giger@netstal.com)
   4  *
   5  *    This source code is free software; you can redistribute it
   6  *    and/or modify it in source code form under the terms of the GNU
   7  *    General Public License as published by the Free Software
   8  *    Foundation; either version 2 of the License, or (at your option)
   9  *    any later version.
  10  *
  11  *    This program is distributed in the hope that it will be useful,
  12  *    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *    GNU General Public License for more details.
  15  *
  16  *    You should have received a copy of the GNU General Public License
  17  *    along with this program; if not, write to the Free Software
  18  *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  19  */
  20
  21 #include <common.h>
  22 #include <command.h>
  23 #include <net.h>
  24 #include "nm.h"
  25
  26 DECLARE_GLOBAL_DATA_PTR;
  27
  28 #define DEFAULT_ETH_ADDR  "ethaddr"
  29
  30 typedef struct {u8      id;     char *name;} generation_info;
  31
  32 generation_info generations[6] = {
  33         {HW_GENERATION_HCU3,    "HCU3"},
  34         {HW_GENERATION_HCU4,    "HCU4"},
  35         {HW_GENERATION_HCU5,    "HCU5"},
  36         {HW_GENERATION_MCU,     "MCU"},
  37         {HW_GENERATION_MCU20,   "MCU20"},
  38         {HW_GENERATION_MCU25,   "MCU25"},
  39 };
  40
  41 void nm_show_print(int generation, int index, int hw_capabilities)
  42 {
  43         int j;
  44         char *generationName=0;
  45
  46         /* reset ANSI terminal color mode */
  47         printf("\x1B""[0m""Netstal Maschinen AG: ");
  48         for (j=0; j < (sizeof(generations)/sizeof(generations[0])); j++) {
  49                 if (generations[j].id == generation) {
  50                         generationName = generations[j].name;
  51                         break;
  52                 }
  53         }
  54         printf("%s: index %d HW 0x%x\n", generationName, index, hw_capabilities);
  55         for (j = 0;j < 6; j++) {
  56                 hcu_led_set(1 << j);
  57                 udelay(200 * 1000);
  58         }
  59 }
  60
  61 void set_params_for_sw_install(int install_requested, char *board_name )
  62 {
  63         if (install_requested) {
  64                 char string[128];
  65
  66                 printf("\n\n%s SW-Installation: %d patching boot parameters\n",
  67                        board_name, install_requested);
  68                 setenv("bootdelay", "0");
  69                 setenv("loadaddr", "0x01000000");
  70                 setenv("serverip", "172.25.1.1");
  71                 setenv("bootcmd", "run install");
  72                 sprintf(string, "tftp ${loadaddr} admin/sw_on_hd; "
  73                         "tftp ${loadaddr} installer/%s_sw_inst; "
  74                         "run boot_sw_inst", board_name);
  75                 setenv("install", string);
  76                 sprintf(string, "setenv bootargs emac(0,0)c:%s/%s_sw_inst "
  77                         "e=${ipaddr} h=${serverip} f=0x1000; "
  78                         "bootvx ${loadaddr}\0",
  79                         board_name, board_name);
  80                 setenv("boot_sw_inst", string);
  81         }
  82 }
  83
  84 void common_misc_init_r(void)
  85 {
  86         char *s = getenv(DEFAULT_ETH_ADDR);
  87         char *e;
  88         int i;
  89         u32 serial = get_serial_number();
  90         IPaddr_t ipaddr;
  91         char *ipstring;
  92
  93         for (i = 0; i < 6; ++i) {
  94                 gd->bd->bi_enetaddr[i] = s ? simple_strtoul(s, &e, 16) : 0;
  95                 if (s)
  96                         s = (*e) ? e + 1 : e;
  97         }
  98
  99         if (gd->bd->bi_enetaddr[3] == 0 &&
 100             gd->bd->bi_enetaddr[4] == 0 &&
 101             gd->bd->bi_enetaddr[5] == 0) {
 102                 char ethaddr[22];
 103
 104                 /* Must be in sync with CONFIG_ETHADDR */
 105                 gd->bd->bi_enetaddr[0] = 0x00;
 106                 gd->bd->bi_enetaddr[1] = 0x60;
 107                 gd->bd->bi_enetaddr[2] = 0x13;
 108                 gd->bd->bi_enetaddr[3] = (serial >> 16) & 0xff;
 109                 gd->bd->bi_enetaddr[4] = (serial >>  8) & 0xff;
 110                 gd->bd->bi_enetaddr[5] = hcu_get_slot();
 111                 sprintf(ethaddr, "%02X:%02X:%02X:%02X:%02X:%02X\0",
 112                         gd->bd->bi_enetaddr[0], gd->bd->bi_enetaddr[1],
 113                         gd->bd->bi_enetaddr[2], gd->bd->bi_enetaddr[3],
 114                         gd->bd->bi_enetaddr[4], gd->bd->bi_enetaddr[5]) ;
 115                 printf("%s: Setting eth %s serial 0x%x\n",  __FUNCTION__,
 116                        ethaddr, serial);
 117                 setenv(DEFAULT_ETH_ADDR, ethaddr);
 118         }
 119
 120         /* IP-Adress update */
 121         ipstring = getenv("ipaddr");
 122         if (ipstring == 0)
 123                 ipaddr = string_to_ip("172.25.1.99");
 124         else
 125                 ipaddr = string_to_ip(ipstring);
 126         if ((ipaddr & 0xff) != (32 + hcu_get_slot())) {
 127                 char tmp[22];
 128
 129                 ipaddr = (ipaddr & 0xffffff00) + 32 + hcu_get_slot();
 130                 ip_to_string (ipaddr, tmp);
 131                 printf("%s: enforce %s\n",  __FUNCTION__, tmp);
 132                 setenv("ipaddr", tmp);
 133                 saveenv();
 134         }
 135 }