git.sur5r.net Git - u-boot/blob - drivers/netconsole.c

   1 /*
   2  * (C) Copyright 2004
   3  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
   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
  24 #include <common.h>
  25
  26 #ifdef CONFIG_NETCONSOLE
  27
  28 #include <command.h>
  29 #include <devices.h>
  30 #include <net.h>
  31
  32 #ifndef CONFIG_NET_MULTI
  33 #error define CONFIG_NET_MULTI to use netconsole
  34 #endif
  35
  36 static char input_buffer[512];
  37 static int input_size = 0;              /* char count in input buffer */
  38 static int input_offset = 0;            /* offset to valid chars in input buffer */
  39 static int input_recursion = 0;
  40 static int output_recursion = 0;
  41 static int net_timeout;
  42 static uchar nc_ether[6];               /* server enet address */
  43 static IPaddr_t nc_ip;                  /* server ip */
  44 static short nc_port;                   /* source/target port */
  45 static const char *output_packet;       /* used by first send udp */
  46 static int output_packet_len = 0;
  47
  48 static void nc_wait_arp_handler (uchar * pkt, unsigned dest, unsigned src,
  49                                  unsigned len)
  50 {
  51         NetState = NETLOOP_SUCCESS;     /* got arp reply - quit net loop */
  52 }
  53
  54 static void nc_handler (uchar * pkt, unsigned dest, unsigned src,
  55                         unsigned len)
  56 {
  57         if (input_size)
  58                 NetState = NETLOOP_SUCCESS;     /* got input - quit net loop */
  59 }
  60
  61 static void nc_timeout (void)
  62 {
  63         NetState = NETLOOP_SUCCESS;
  64 }
  65
  66 void NcStart (void)
  67 {
  68         if (!output_packet_len || memcmp (nc_ether, NetEtherNullAddr, 6)) {
  69                 /* going to check for input packet */
  70                 NetSetHandler (nc_handler);
  71                 NetSetTimeout (net_timeout, nc_timeout);
  72         } else {
  73                 /* send arp request */
  74                 uchar *pkt;
  75                 NetSetHandler (nc_wait_arp_handler);
  76                 pkt = (uchar *) NetTxPacket + NetEthHdrSize () + IP_HDR_SIZE;
  77                 memcpy (pkt, output_packet, output_packet_len);
  78                 NetSendUDPPacket (nc_ether, nc_ip, nc_port, nc_port, output_packet_len);
  79         }
  80 }
  81
  82 int nc_input_packet (uchar * pkt, unsigned dest, unsigned src, unsigned len)
  83 {
  84         int end, chunk;
  85
  86         if (dest != nc_port || !len)
  87                 return 0;               /* not for us */
  88
  89         if (input_size == sizeof input_buffer)
  90                 return 1;               /* no space */
  91         if (len > sizeof input_buffer - input_size)
  92                 len = sizeof input_buffer - input_size;
  93
  94         end = input_offset + input_size;
  95         if (end > sizeof input_buffer)
  96                 end -= sizeof input_buffer;
  97
  98         chunk = len;
  99         if (end + len > sizeof input_buffer) {
 100                 chunk = sizeof input_buffer - end;
 101                 memcpy(input_buffer, pkt + chunk, len - chunk);
 102         }
 103         memcpy (input_buffer + end, pkt, chunk);
 104
 105         input_size += len;
 106
 107         return 1;
 108 }
 109
 110 static void nc_send_packet (const char *buf, int len)
 111 {
 112         DECLARE_GLOBAL_DATA_PTR;
 113
 114         struct eth_device *eth;
 115         int inited = 0;
 116         uchar *pkt;
 117         uchar *ether;
 118         IPaddr_t ip;
 119
 120         if ((eth = eth_get_dev ()) == NULL) {
 121                 return;
 122         }
 123
 124         if (!memcmp (nc_ether, NetEtherNullAddr, 6)) {
 125                 if (eth->state == ETH_STATE_ACTIVE)
 126                         return; /* inside net loop */
 127                 output_packet = buf;
 128                 output_packet_len = len;
 129                 NetLoop (NETCONS);      /* wait for arp reply and send packet */
 130                 output_packet_len = 0;
 131                 return;
 132         }
 133
 134         if (eth->state != ETH_STATE_ACTIVE) {
 135                 if (eth_init (gd->bd) < 0)
 136                         return;
 137                 inited = 1;
 138         }
 139         pkt = (uchar *) NetTxPacket + NetEthHdrSize () + IP_HDR_SIZE;
 140         memcpy (pkt, buf, len);
 141         ether = nc_ether;
 142         ip = nc_ip;
 143         NetSendUDPPacket (ether, ip, nc_port, nc_port, len);
 144
 145         if (inited)
 146                 eth_halt ();
 147 }
 148
 149 int nc_start (void)
 150 {
 151         int netmask, our_ip;
 152
 153         nc_port = 6666;         /* default port */
 154
 155         if (getenv ("ncip")) {
 156                 char *p;
 157
 158                 nc_ip = getenv_IPaddr ("ncip");
 159                 if (!nc_ip)
 160                         return -1;      /* ncip is 0.0.0.0 */
 161                 if ((p = strchr (getenv ("ncip"), ':')) != NULL)
 162                         nc_port = simple_strtoul (p + 1, NULL, 10);
 163         } else
 164                 nc_ip = ~0;             /* ncip is not set */
 165
 166         our_ip = getenv_IPaddr ("ipaddr");
 167         netmask = getenv_IPaddr ("netmask");
 168
 169         if (nc_ip == ~0 ||                              /* 255.255.255.255 */
 170             ((netmask & our_ip) == (netmask & nc_ip) && /* on the same net */
 171             (netmask | nc_ip) == ~0))                   /* broadcast to our net */
 172                 memset (nc_ether, 0xff, sizeof nc_ether);
 173         else
 174                 memset (nc_ether, 0, sizeof nc_ether);  /* force arp request */
 175
 176         return 0;
 177 }
 178
 179 void nc_putc (char c)
 180 {
 181         if (output_recursion)
 182                 return;
 183         output_recursion = 1;
 184
 185         nc_send_packet (&c, 1);
 186
 187         output_recursion = 0;
 188 }
 189
 190 void nc_puts (const char *s)
 191 {
 192         int len;
 193
 194         if (output_recursion)
 195                 return;
 196         output_recursion = 1;
 197
 198         if ((len = strlen (s)) > 512)
 199                 len = 512;
 200
 201         nc_send_packet (s, len);
 202
 203         output_recursion = 0;
 204 }
 205
 206 int nc_getc (void)
 207 {
 208         uchar c;
 209
 210         input_recursion = 1;
 211
 212         net_timeout = 0;        /* no timeout */
 213         while (!input_size)
 214                 NetLoop (NETCONS);
 215
 216         input_recursion = 0;
 217
 218         c = input_buffer[input_offset++];
 219
 220         if (input_offset >= sizeof input_buffer)
 221                 input_offset -= sizeof input_buffer;
 222         input_size--;
 223
 224         return c;
 225 }
 226
 227 int nc_tstc (void)
 228 {
 229         struct eth_device *eth;
 230
 231         if (input_recursion)
 232                 return 0;
 233
 234         if (input_size)
 235                 return 1;
 236
 237         eth = eth_get_dev ();
 238         if (eth && eth->state == ETH_STATE_ACTIVE)
 239                 return 0;       /* inside net loop */
 240
 241         input_recursion = 1;
 242
 243         net_timeout = 1;
 244         NetLoop (NETCONS);      /* kind of poll */
 245
 246         input_recursion = 0;
 247
 248         return input_size != 0;
 249 }
 250
 251 int drv_nc_init (void)
 252 {
 253         device_t dev;
 254         int rc;
 255
 256         memset (&dev, 0, sizeof (dev));
 257
 258         strcpy (dev.name, "nc");
 259         dev.flags = DEV_FLAGS_OUTPUT | DEV_FLAGS_INPUT | DEV_FLAGS_SYSTEM;
 260         dev.start = nc_start;
 261         dev.putc = nc_putc;
 262         dev.puts = nc_puts;
 263         dev.getc = nc_getc;
 264         dev.tstc = nc_tstc;
 265
 266         rc = device_register (&dev);
 267
 268         return (rc == 0) ? 1 : rc;
 269 }
 270
 271 #endif  /* CONFIG_NETCONSOLE */