blob: f5329a594e8c2d7367ddf37ab30ae230e42dff3a [file] [log] [blame]
wdenk68ceb292004-08-02 21:11:11 +00001/*
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>
wdenk68ceb292004-08-02 21:11:11 +000025#include <command.h>
Jean-Christophe PLAGNIOL-VILLARD52cb4d42009-05-16 12:14:54 +020026#include <stdio_dev.h>
wdenk68ceb292004-08-02 21:11:11 +000027#include <net.h>
28
Wolfgang Denkd87080b2006-03-31 18:32:53 +020029DECLARE_GLOBAL_DATA_PTR;
30
wdenkeedcd072004-09-08 22:03:11 +000031static char input_buffer[512];
32static int input_size = 0; /* char count in input buffer */
33static int input_offset = 0; /* offset to valid chars in input buffer */
wdenk68ceb292004-08-02 21:11:11 +000034static int input_recursion = 0;
35static int output_recursion = 0;
36static int net_timeout;
wdenkeedcd072004-09-08 22:03:11 +000037static uchar nc_ether[6]; /* server enet address */
38static IPaddr_t nc_ip; /* server ip */
39static short nc_port; /* source/target port */
40static const char *output_packet; /* used by first send udp */
41static int output_packet_len = 0;
wdenk68ceb292004-08-02 21:11:11 +000042
43static void nc_wait_arp_handler (uchar * pkt, unsigned dest, unsigned src,
44 unsigned len)
45{
46 NetState = NETLOOP_SUCCESS; /* got arp reply - quit net loop */
47}
48
49static void nc_handler (uchar * pkt, unsigned dest, unsigned src,
50 unsigned len)
51{
wdenkeedcd072004-09-08 22:03:11 +000052 if (input_size)
wdenk68ceb292004-08-02 21:11:11 +000053 NetState = NETLOOP_SUCCESS; /* got input - quit net loop */
54}
55
56static void nc_timeout (void)
57{
58 NetState = NETLOOP_SUCCESS;
59}
60
61void NcStart (void)
62{
wdenkeedcd072004-09-08 22:03:11 +000063 if (!output_packet_len || memcmp (nc_ether, NetEtherNullAddr, 6)) {
wdenk68ceb292004-08-02 21:11:11 +000064 /* going to check for input packet */
65 NetSetHandler (nc_handler);
66 NetSetTimeout (net_timeout, nc_timeout);
67 } else {
68 /* send arp request */
wdenkeedcd072004-09-08 22:03:11 +000069 uchar *pkt;
wdenk68ceb292004-08-02 21:11:11 +000070 NetSetHandler (nc_wait_arp_handler);
wdenkeedcd072004-09-08 22:03:11 +000071 pkt = (uchar *) NetTxPacket + NetEthHdrSize () + IP_HDR_SIZE;
72 memcpy (pkt, output_packet, output_packet_len);
73 NetSendUDPPacket (nc_ether, nc_ip, nc_port, nc_port, output_packet_len);
wdenk68ceb292004-08-02 21:11:11 +000074 }
75}
76
77int nc_input_packet (uchar * pkt, unsigned dest, unsigned src, unsigned len)
78{
wdenkeedcd072004-09-08 22:03:11 +000079 int end, chunk;
80
81 if (dest != nc_port || !len)
wdenk68ceb292004-08-02 21:11:11 +000082 return 0; /* not for us */
83
wdenkeedcd072004-09-08 22:03:11 +000084 if (input_size == sizeof input_buffer)
85 return 1; /* no space */
86 if (len > sizeof input_buffer - input_size)
87 len = sizeof input_buffer - input_size;
88
89 end = input_offset + input_size;
90 if (end > sizeof input_buffer)
91 end -= sizeof input_buffer;
92
93 chunk = len;
94 if (end + len > sizeof input_buffer) {
95 chunk = sizeof input_buffer - end;
96 memcpy(input_buffer, pkt + chunk, len - chunk);
97 }
98 memcpy (input_buffer + end, pkt, chunk);
99
100 input_size += len;
101
wdenk68ceb292004-08-02 21:11:11 +0000102 return 1;
103}
104
105static void nc_send_packet (const char *buf, int len)
106{
wdenk68ceb292004-08-02 21:11:11 +0000107 struct eth_device *eth;
108 int inited = 0;
109 uchar *pkt;
wdenkeedcd072004-09-08 22:03:11 +0000110 uchar *ether;
111 IPaddr_t ip;
wdenk68ceb292004-08-02 21:11:11 +0000112
113 if ((eth = eth_get_dev ()) == NULL) {
114 return;
115 }
116
wdenkeedcd072004-09-08 22:03:11 +0000117 if (!memcmp (nc_ether, NetEtherNullAddr, 6)) {
118 if (eth->state == ETH_STATE_ACTIVE)
119 return; /* inside net loop */
120 output_packet = buf;
121 output_packet_len = len;
122 NetLoop (NETCONS); /* wait for arp reply and send packet */
123 output_packet_len = 0;
124 return;
125 }
126
wdenk68ceb292004-08-02 21:11:11 +0000127 if (eth->state != ETH_STATE_ACTIVE) {
128 if (eth_init (gd->bd) < 0)
129 return;
130 inited = 1;
131 }
132 pkt = (uchar *) NetTxPacket + NetEthHdrSize () + IP_HDR_SIZE;
133 memcpy (pkt, buf, len);
wdenkeedcd072004-09-08 22:03:11 +0000134 ether = nc_ether;
135 ip = nc_ip;
136 NetSendUDPPacket (ether, ip, nc_port, nc_port, len);
wdenk68ceb292004-08-02 21:11:11 +0000137
138 if (inited)
139 eth_halt ();
140}
141
142int nc_start (void)
143{
wdenkeedcd072004-09-08 22:03:11 +0000144 int netmask, our_ip;
wdenk68ceb292004-08-02 21:11:11 +0000145
wdenkeedcd072004-09-08 22:03:11 +0000146 nc_port = 6666; /* default port */
147
148 if (getenv ("ncip")) {
wdenkb2323ea2005-04-20 09:28:54 +0000149 char *p;
150
wdenkeedcd072004-09-08 22:03:11 +0000151 nc_ip = getenv_IPaddr ("ncip");
152 if (!nc_ip)
153 return -1; /* ncip is 0.0.0.0 */
wdenkb2323ea2005-04-20 09:28:54 +0000154 if ((p = strchr (getenv ("ncip"), ':')) != NULL)
wdenkeedcd072004-09-08 22:03:11 +0000155 nc_port = simple_strtoul (p + 1, NULL, 10);
156 } else
157 nc_ip = ~0; /* ncip is not set */
158
159 our_ip = getenv_IPaddr ("ipaddr");
160 netmask = getenv_IPaddr ("netmask");
161
162 if (nc_ip == ~0 || /* 255.255.255.255 */
163 ((netmask & our_ip) == (netmask & nc_ip) && /* on the same net */
164 (netmask | nc_ip) == ~0)) /* broadcast to our net */
165 memset (nc_ether, 0xff, sizeof nc_ether);
166 else
167 memset (nc_ether, 0, sizeof nc_ether); /* force arp request */
168
169 return 0;
wdenk68ceb292004-08-02 21:11:11 +0000170}
171
172void nc_putc (char c)
173{
174 if (output_recursion)
175 return;
176 output_recursion = 1;
177
178 nc_send_packet (&c, 1);
179
180 output_recursion = 0;
181}
182
183void nc_puts (const char *s)
184{
wdenkb2323ea2005-04-20 09:28:54 +0000185 int len;
186
wdenk68ceb292004-08-02 21:11:11 +0000187 if (output_recursion)
188 return;
189 output_recursion = 1;
190
wdenkb2323ea2005-04-20 09:28:54 +0000191 if ((len = strlen (s)) > 512)
wdenk68ceb292004-08-02 21:11:11 +0000192 len = 512;
193
194 nc_send_packet (s, len);
195
196 output_recursion = 0;
197}
198
199int nc_getc (void)
200{
wdenkb2323ea2005-04-20 09:28:54 +0000201 uchar c;
202
wdenk68ceb292004-08-02 21:11:11 +0000203 input_recursion = 1;
204
205 net_timeout = 0; /* no timeout */
wdenkeedcd072004-09-08 22:03:11 +0000206 while (!input_size)
wdenk68ceb292004-08-02 21:11:11 +0000207 NetLoop (NETCONS);
208
209 input_recursion = 0;
210
wdenkb2323ea2005-04-20 09:28:54 +0000211 c = input_buffer[input_offset++];
212
wdenkeedcd072004-09-08 22:03:11 +0000213 if (input_offset >= sizeof input_buffer)
214 input_offset -= sizeof input_buffer;
215 input_size--;
wdenk68ceb292004-08-02 21:11:11 +0000216
wdenkeedcd072004-09-08 22:03:11 +0000217 return c;
wdenk68ceb292004-08-02 21:11:11 +0000218}
219
220int nc_tstc (void)
221{
222 struct eth_device *eth;
223
224 if (input_recursion)
225 return 0;
226
wdenkeedcd072004-09-08 22:03:11 +0000227 if (input_size)
wdenk68ceb292004-08-02 21:11:11 +0000228 return 1;
229
230 eth = eth_get_dev ();
231 if (eth && eth->state == ETH_STATE_ACTIVE)
232 return 0; /* inside net loop */
233
234 input_recursion = 1;
235
236 net_timeout = 1;
wdenkeedcd072004-09-08 22:03:11 +0000237 NetLoop (NETCONS); /* kind of poll */
wdenk68ceb292004-08-02 21:11:11 +0000238
239 input_recursion = 0;
240
wdenkeedcd072004-09-08 22:03:11 +0000241 return input_size != 0;
wdenk68ceb292004-08-02 21:11:11 +0000242}
243
244int drv_nc_init (void)
245{
Jean-Christophe PLAGNIOL-VILLARD52cb4d42009-05-16 12:14:54 +0200246 struct stdio_dev dev;
wdenk68ceb292004-08-02 21:11:11 +0000247 int rc;
248
249 memset (&dev, 0, sizeof (dev));
250
251 strcpy (dev.name, "nc");
252 dev.flags = DEV_FLAGS_OUTPUT | DEV_FLAGS_INPUT | DEV_FLAGS_SYSTEM;
253 dev.start = nc_start;
254 dev.putc = nc_putc;
255 dev.puts = nc_puts;
256 dev.getc = nc_getc;
257 dev.tstc = nc_tstc;
258
Jean-Christophe PLAGNIOL-VILLARD52cb4d42009-05-16 12:14:54 +0200259 rc = stdio_register (&dev);
wdenk68ceb292004-08-02 21:11:11 +0000260
261 return (rc == 0) ? 1 : rc;
262}