2004-08-02 21:11:11 +00:00
|
|
|
/*
|
|
|
|
* (C) Copyright 2004
|
|
|
|
* Wolfgang Denk, DENX Software Engineering, wd@denx.de.
|
|
|
|
*
|
|
|
|
* 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
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include <common.h>
|
|
|
|
#include <command.h>
|
2009-05-16 10:14:54 +00:00
|
|
|
#include <stdio_dev.h>
|
2004-08-02 21:11:11 +00:00
|
|
|
#include <net.h>
|
|
|
|
|
2006-03-31 16:32:53 +00:00
|
|
|
DECLARE_GLOBAL_DATA_PTR;
|
|
|
|
|
2004-09-08 22:03:11 +00:00
|
|
|
static char input_buffer[512];
|
|
|
|
static int input_size = 0; /* char count in input buffer */
|
|
|
|
static int input_offset = 0; /* offset to valid chars in input buffer */
|
2004-08-02 21:11:11 +00:00
|
|
|
static int input_recursion = 0;
|
|
|
|
static int output_recursion = 0;
|
|
|
|
static int net_timeout;
|
2004-09-08 22:03:11 +00:00
|
|
|
static uchar nc_ether[6]; /* server enet address */
|
|
|
|
static IPaddr_t nc_ip; /* server ip */
|
|
|
|
static short nc_port; /* source/target port */
|
|
|
|
static const char *output_packet; /* used by first send udp */
|
|
|
|
static int output_packet_len = 0;
|
2004-08-02 21:11:11 +00:00
|
|
|
|
|
|
|
static void nc_wait_arp_handler (uchar * pkt, unsigned dest, unsigned src,
|
|
|
|
unsigned len)
|
|
|
|
{
|
|
|
|
NetState = NETLOOP_SUCCESS; /* got arp reply - quit net loop */
|
|
|
|
}
|
|
|
|
|
|
|
|
static void nc_handler (uchar * pkt, unsigned dest, unsigned src,
|
|
|
|
unsigned len)
|
|
|
|
{
|
2004-09-08 22:03:11 +00:00
|
|
|
if (input_size)
|
2004-08-02 21:11:11 +00:00
|
|
|
NetState = NETLOOP_SUCCESS; /* got input - quit net loop */
|
|
|
|
}
|
|
|
|
|
|
|
|
static void nc_timeout (void)
|
|
|
|
{
|
|
|
|
NetState = NETLOOP_SUCCESS;
|
|
|
|
}
|
|
|
|
|
|
|
|
void NcStart (void)
|
|
|
|
{
|
2004-09-08 22:03:11 +00:00
|
|
|
if (!output_packet_len || memcmp (nc_ether, NetEtherNullAddr, 6)) {
|
2004-08-02 21:11:11 +00:00
|
|
|
/* going to check for input packet */
|
|
|
|
NetSetHandler (nc_handler);
|
|
|
|
NetSetTimeout (net_timeout, nc_timeout);
|
|
|
|
} else {
|
|
|
|
/* send arp request */
|
2004-09-08 22:03:11 +00:00
|
|
|
uchar *pkt;
|
2004-08-02 21:11:11 +00:00
|
|
|
NetSetHandler (nc_wait_arp_handler);
|
2004-09-08 22:03:11 +00:00
|
|
|
pkt = (uchar *) NetTxPacket + NetEthHdrSize () + IP_HDR_SIZE;
|
|
|
|
memcpy (pkt, output_packet, output_packet_len);
|
|
|
|
NetSendUDPPacket (nc_ether, nc_ip, nc_port, nc_port, output_packet_len);
|
2004-08-02 21:11:11 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
int nc_input_packet (uchar * pkt, unsigned dest, unsigned src, unsigned len)
|
|
|
|
{
|
2004-09-08 22:03:11 +00:00
|
|
|
int end, chunk;
|
|
|
|
|
|
|
|
if (dest != nc_port || !len)
|
2004-08-02 21:11:11 +00:00
|
|
|
return 0; /* not for us */
|
|
|
|
|
2004-09-08 22:03:11 +00:00
|
|
|
if (input_size == sizeof input_buffer)
|
|
|
|
return 1; /* no space */
|
|
|
|
if (len > sizeof input_buffer - input_size)
|
|
|
|
len = sizeof input_buffer - input_size;
|
|
|
|
|
|
|
|
end = input_offset + input_size;
|
|
|
|
if (end > sizeof input_buffer)
|
|
|
|
end -= sizeof input_buffer;
|
|
|
|
|
|
|
|
chunk = len;
|
|
|
|
if (end + len > sizeof input_buffer) {
|
|
|
|
chunk = sizeof input_buffer - end;
|
|
|
|
memcpy(input_buffer, pkt + chunk, len - chunk);
|
|
|
|
}
|
|
|
|
memcpy (input_buffer + end, pkt, chunk);
|
|
|
|
|
|
|
|
input_size += len;
|
|
|
|
|
2004-08-02 21:11:11 +00:00
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
static void nc_send_packet (const char *buf, int len)
|
|
|
|
{
|
|
|
|
struct eth_device *eth;
|
|
|
|
int inited = 0;
|
|
|
|
uchar *pkt;
|
2004-09-08 22:03:11 +00:00
|
|
|
uchar *ether;
|
|
|
|
IPaddr_t ip;
|
2004-08-02 21:11:11 +00:00
|
|
|
|
2004-09-08 22:03:11 +00:00
|
|
|
if ((eth = eth_get_dev ()) == NULL) {
|
2004-08-02 21:11:11 +00:00
|
|
|
return;
|
2004-09-08 22:03:11 +00:00
|
|
|
}
|
2004-08-02 21:11:11 +00:00
|
|
|
|
2004-09-08 22:03:11 +00:00
|
|
|
if (!memcmp (nc_ether, NetEtherNullAddr, 6)) {
|
|
|
|
if (eth->state == ETH_STATE_ACTIVE)
|
|
|
|
return; /* inside net loop */
|
|
|
|
output_packet = buf;
|
|
|
|
output_packet_len = len;
|
|
|
|
NetLoop (NETCONS); /* wait for arp reply and send packet */
|
|
|
|
output_packet_len = 0;
|
2004-08-02 21:11:11 +00:00
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (eth->state != ETH_STATE_ACTIVE) {
|
|
|
|
if (eth_init (gd->bd) < 0)
|
|
|
|
return;
|
|
|
|
inited = 1;
|
|
|
|
}
|
|
|
|
pkt = (uchar *) NetTxPacket + NetEthHdrSize () + IP_HDR_SIZE;
|
|
|
|
memcpy (pkt, buf, len);
|
2004-09-08 22:03:11 +00:00
|
|
|
ether = nc_ether;
|
|
|
|
ip = nc_ip;
|
|
|
|
NetSendUDPPacket (ether, ip, nc_port, nc_port, len);
|
2004-08-02 21:11:11 +00:00
|
|
|
|
|
|
|
if (inited)
|
|
|
|
eth_halt ();
|
|
|
|
}
|
|
|
|
|
2009-12-21 19:19:12 +00:00
|
|
|
static int nc_start(void)
|
2004-08-02 21:11:11 +00:00
|
|
|
{
|
2004-09-08 22:03:11 +00:00
|
|
|
int netmask, our_ip;
|
|
|
|
|
|
|
|
nc_port = 6666; /* default port */
|
|
|
|
|
|
|
|
if (getenv ("ncip")) {
|
2005-04-20 09:28:54 +00:00
|
|
|
char *p;
|
|
|
|
|
2004-09-08 22:03:11 +00:00
|
|
|
nc_ip = getenv_IPaddr ("ncip");
|
|
|
|
if (!nc_ip)
|
|
|
|
return -1; /* ncip is 0.0.0.0 */
|
2005-04-20 09:28:54 +00:00
|
|
|
if ((p = strchr (getenv ("ncip"), ':')) != NULL)
|
2004-09-08 22:03:11 +00:00
|
|
|
nc_port = simple_strtoul (p + 1, NULL, 10);
|
|
|
|
} else
|
|
|
|
nc_ip = ~0; /* ncip is not set */
|
|
|
|
|
|
|
|
our_ip = getenv_IPaddr ("ipaddr");
|
|
|
|
netmask = getenv_IPaddr ("netmask");
|
|
|
|
|
|
|
|
if (nc_ip == ~0 || /* 255.255.255.255 */
|
|
|
|
((netmask & our_ip) == (netmask & nc_ip) && /* on the same net */
|
|
|
|
(netmask | nc_ip) == ~0)) /* broadcast to our net */
|
|
|
|
memset (nc_ether, 0xff, sizeof nc_ether);
|
|
|
|
else
|
|
|
|
memset (nc_ether, 0, sizeof nc_ether); /* force arp request */
|
|
|
|
|
|
|
|
return 0;
|
2004-08-02 21:11:11 +00:00
|
|
|
}
|
|
|
|
|
2009-12-21 19:19:12 +00:00
|
|
|
static void nc_putc(char c)
|
2004-08-02 21:11:11 +00:00
|
|
|
{
|
|
|
|
if (output_recursion)
|
|
|
|
return;
|
|
|
|
output_recursion = 1;
|
|
|
|
|
|
|
|
nc_send_packet (&c, 1);
|
|
|
|
|
|
|
|
output_recursion = 0;
|
|
|
|
}
|
|
|
|
|
2009-12-21 19:19:12 +00:00
|
|
|
static void nc_puts(const char *s)
|
2004-08-02 21:11:11 +00:00
|
|
|
{
|
2005-04-20 09:28:54 +00:00
|
|
|
int len;
|
|
|
|
|
2004-08-02 21:11:11 +00:00
|
|
|
if (output_recursion)
|
|
|
|
return;
|
|
|
|
output_recursion = 1;
|
|
|
|
|
2005-04-20 09:28:54 +00:00
|
|
|
if ((len = strlen (s)) > 512)
|
2004-08-02 21:11:11 +00:00
|
|
|
len = 512;
|
|
|
|
|
|
|
|
nc_send_packet (s, len);
|
|
|
|
|
|
|
|
output_recursion = 0;
|
|
|
|
}
|
|
|
|
|
2009-12-21 19:19:12 +00:00
|
|
|
static int nc_getc(void)
|
2004-08-02 21:11:11 +00:00
|
|
|
{
|
2005-04-20 09:28:54 +00:00
|
|
|
uchar c;
|
|
|
|
|
2004-08-02 21:11:11 +00:00
|
|
|
input_recursion = 1;
|
|
|
|
|
|
|
|
net_timeout = 0; /* no timeout */
|
2004-09-08 22:03:11 +00:00
|
|
|
while (!input_size)
|
2004-08-02 21:11:11 +00:00
|
|
|
NetLoop (NETCONS);
|
|
|
|
|
|
|
|
input_recursion = 0;
|
|
|
|
|
2005-04-20 09:28:54 +00:00
|
|
|
c = input_buffer[input_offset++];
|
|
|
|
|
2004-09-08 22:03:11 +00:00
|
|
|
if (input_offset >= sizeof input_buffer)
|
|
|
|
input_offset -= sizeof input_buffer;
|
|
|
|
input_size--;
|
2004-08-02 21:11:11 +00:00
|
|
|
|
2004-09-08 22:03:11 +00:00
|
|
|
return c;
|
2004-08-02 21:11:11 +00:00
|
|
|
}
|
|
|
|
|
2009-12-21 19:19:12 +00:00
|
|
|
static int nc_tstc(void)
|
2004-08-02 21:11:11 +00:00
|
|
|
{
|
|
|
|
struct eth_device *eth;
|
|
|
|
|
|
|
|
if (input_recursion)
|
|
|
|
return 0;
|
|
|
|
|
2004-09-08 22:03:11 +00:00
|
|
|
if (input_size)
|
2004-08-02 21:11:11 +00:00
|
|
|
return 1;
|
|
|
|
|
|
|
|
eth = eth_get_dev ();
|
|
|
|
if (eth && eth->state == ETH_STATE_ACTIVE)
|
|
|
|
return 0; /* inside net loop */
|
|
|
|
|
|
|
|
input_recursion = 1;
|
|
|
|
|
|
|
|
net_timeout = 1;
|
2004-09-08 22:03:11 +00:00
|
|
|
NetLoop (NETCONS); /* kind of poll */
|
2004-08-02 21:11:11 +00:00
|
|
|
|
|
|
|
input_recursion = 0;
|
|
|
|
|
2004-09-08 22:03:11 +00:00
|
|
|
return input_size != 0;
|
2004-08-02 21:11:11 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
int drv_nc_init (void)
|
|
|
|
{
|
2009-05-16 10:14:54 +00:00
|
|
|
struct stdio_dev dev;
|
2004-08-02 21:11:11 +00:00
|
|
|
int rc;
|
|
|
|
|
|
|
|
memset (&dev, 0, sizeof (dev));
|
|
|
|
|
|
|
|
strcpy (dev.name, "nc");
|
|
|
|
dev.flags = DEV_FLAGS_OUTPUT | DEV_FLAGS_INPUT | DEV_FLAGS_SYSTEM;
|
|
|
|
dev.start = nc_start;
|
|
|
|
dev.putc = nc_putc;
|
|
|
|
dev.puts = nc_puts;
|
|
|
|
dev.getc = nc_getc;
|
|
|
|
dev.tstc = nc_tstc;
|
|
|
|
|
2009-05-16 10:14:54 +00:00
|
|
|
rc = stdio_register (&dev);
|
2004-08-02 21:11:11 +00:00
|
|
|
|
|
|
|
return (rc == 0) ? 1 : rc;
|
|
|
|
}
|