blob: 69089f92cec913b1ab6d0c33f94273d8cc10badf [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>
25
26#ifdef CONFIG_NETCONSOLE
27
28#include <command.h>
29#include <devices.h>
30#include <net.h>
31
Wolfgang Denkd87080b2006-03-31 18:32:53 +020032DECLARE_GLOBAL_DATA_PTR;
33
wdenkeedcd072004-09-08 22:03:11 +000034static char input_buffer[512];
35static int input_size = 0; /* char count in input buffer */
36static int input_offset = 0; /* offset to valid chars in input buffer */
wdenk68ceb292004-08-02 21:11:11 +000037static int input_recursion = 0;
38static int output_recursion = 0;
39static int net_timeout;
wdenkeedcd072004-09-08 22:03:11 +000040static uchar nc_ether[6]; /* server enet address */
41static IPaddr_t nc_ip; /* server ip */
42static short nc_port; /* source/target port */
43static const char *output_packet; /* used by first send udp */
44static int output_packet_len = 0;
wdenk68ceb292004-08-02 21:11:11 +000045
46static void nc_wait_arp_handler (uchar * pkt, unsigned dest, unsigned src,
47 unsigned len)
48{
49 NetState = NETLOOP_SUCCESS; /* got arp reply - quit net loop */
50}
51
52static void nc_handler (uchar * pkt, unsigned dest, unsigned src,
53 unsigned len)
54{
wdenkeedcd072004-09-08 22:03:11 +000055 if (input_size)
wdenk68ceb292004-08-02 21:11:11 +000056 NetState = NETLOOP_SUCCESS; /* got input - quit net loop */
57}
58
59static void nc_timeout (void)
60{
61 NetState = NETLOOP_SUCCESS;
62}
63
64void NcStart (void)
65{
wdenkeedcd072004-09-08 22:03:11 +000066 if (!output_packet_len || memcmp (nc_ether, NetEtherNullAddr, 6)) {
wdenk68ceb292004-08-02 21:11:11 +000067 /* going to check for input packet */
68 NetSetHandler (nc_handler);
69 NetSetTimeout (net_timeout, nc_timeout);
70 } else {
71 /* send arp request */
wdenkeedcd072004-09-08 22:03:11 +000072 uchar *pkt;
wdenk68ceb292004-08-02 21:11:11 +000073 NetSetHandler (nc_wait_arp_handler);
wdenkeedcd072004-09-08 22:03:11 +000074 pkt = (uchar *) NetTxPacket + NetEthHdrSize () + IP_HDR_SIZE;
75 memcpy (pkt, output_packet, output_packet_len);
76 NetSendUDPPacket (nc_ether, nc_ip, nc_port, nc_port, output_packet_len);
wdenk68ceb292004-08-02 21:11:11 +000077 }
78}
79
80int nc_input_packet (uchar * pkt, unsigned dest, unsigned src, unsigned len)
81{
wdenkeedcd072004-09-08 22:03:11 +000082 int end, chunk;
83
84 if (dest != nc_port || !len)
wdenk68ceb292004-08-02 21:11:11 +000085 return 0; /* not for us */
86
wdenkeedcd072004-09-08 22:03:11 +000087 if (input_size == sizeof input_buffer)
88 return 1; /* no space */
89 if (len > sizeof input_buffer - input_size)
90 len = sizeof input_buffer - input_size;
91
92 end = input_offset + input_size;
93 if (end > sizeof input_buffer)
94 end -= sizeof input_buffer;
95
96 chunk = len;
97 if (end + len > sizeof input_buffer) {
98 chunk = sizeof input_buffer - end;
99 memcpy(input_buffer, pkt + chunk, len - chunk);
100 }
101 memcpy (input_buffer + end, pkt, chunk);
102
103 input_size += len;
104
wdenk68ceb292004-08-02 21:11:11 +0000105 return 1;
106}
107
108static void nc_send_packet (const char *buf, int len)
109{
wdenk68ceb292004-08-02 21:11:11 +0000110 struct eth_device *eth;
111 int inited = 0;
112 uchar *pkt;
wdenkeedcd072004-09-08 22:03:11 +0000113 uchar *ether;
114 IPaddr_t ip;
wdenk68ceb292004-08-02 21:11:11 +0000115
116 if ((eth = eth_get_dev ()) == NULL) {
117 return;
118 }
119
wdenkeedcd072004-09-08 22:03:11 +0000120 if (!memcmp (nc_ether, NetEtherNullAddr, 6)) {
121 if (eth->state == ETH_STATE_ACTIVE)
122 return; /* inside net loop */
123 output_packet = buf;
124 output_packet_len = len;
125 NetLoop (NETCONS); /* wait for arp reply and send packet */
126 output_packet_len = 0;
127 return;
128 }
129
wdenk68ceb292004-08-02 21:11:11 +0000130 if (eth->state != ETH_STATE_ACTIVE) {
131 if (eth_init (gd->bd) < 0)
132 return;
133 inited = 1;
134 }
135 pkt = (uchar *) NetTxPacket + NetEthHdrSize () + IP_HDR_SIZE;
136 memcpy (pkt, buf, len);
wdenkeedcd072004-09-08 22:03:11 +0000137 ether = nc_ether;
138 ip = nc_ip;
139 NetSendUDPPacket (ether, ip, nc_port, nc_port, len);
wdenk68ceb292004-08-02 21:11:11 +0000140
141 if (inited)
142 eth_halt ();
143}
144
145int nc_start (void)
146{
wdenkeedcd072004-09-08 22:03:11 +0000147 int netmask, our_ip;
wdenk68ceb292004-08-02 21:11:11 +0000148
wdenkeedcd072004-09-08 22:03:11 +0000149 nc_port = 6666; /* default port */
150
151 if (getenv ("ncip")) {
wdenkb2323ea2005-04-20 09:28:54 +0000152 char *p;
153
wdenkeedcd072004-09-08 22:03:11 +0000154 nc_ip = getenv_IPaddr ("ncip");
155 if (!nc_ip)
156 return -1; /* ncip is 0.0.0.0 */
wdenkb2323ea2005-04-20 09:28:54 +0000157 if ((p = strchr (getenv ("ncip"), ':')) != NULL)
wdenkeedcd072004-09-08 22:03:11 +0000158 nc_port = simple_strtoul (p + 1, NULL, 10);
159 } else
160 nc_ip = ~0; /* ncip is not set */
161
162 our_ip = getenv_IPaddr ("ipaddr");
163 netmask = getenv_IPaddr ("netmask");
164
165 if (nc_ip == ~0 || /* 255.255.255.255 */
166 ((netmask & our_ip) == (netmask & nc_ip) && /* on the same net */
167 (netmask | nc_ip) == ~0)) /* broadcast to our net */
168 memset (nc_ether, 0xff, sizeof nc_ether);
169 else
170 memset (nc_ether, 0, sizeof nc_ether); /* force arp request */
171
172 return 0;
wdenk68ceb292004-08-02 21:11:11 +0000173}
174
175void nc_putc (char c)
176{
177 if (output_recursion)
178 return;
179 output_recursion = 1;
180
181 nc_send_packet (&c, 1);
182
183 output_recursion = 0;
184}
185
186void nc_puts (const char *s)
187{
wdenkb2323ea2005-04-20 09:28:54 +0000188 int len;
189
wdenk68ceb292004-08-02 21:11:11 +0000190 if (output_recursion)
191 return;
192 output_recursion = 1;
193
wdenkb2323ea2005-04-20 09:28:54 +0000194 if ((len = strlen (s)) > 512)
wdenk68ceb292004-08-02 21:11:11 +0000195 len = 512;
196
197 nc_send_packet (s, len);
198
199 output_recursion = 0;
200}
201
202int nc_getc (void)
203{
wdenkb2323ea2005-04-20 09:28:54 +0000204 uchar c;
205
wdenk68ceb292004-08-02 21:11:11 +0000206 input_recursion = 1;
207
208 net_timeout = 0; /* no timeout */
wdenkeedcd072004-09-08 22:03:11 +0000209 while (!input_size)
wdenk68ceb292004-08-02 21:11:11 +0000210 NetLoop (NETCONS);
211
212 input_recursion = 0;
213
wdenkb2323ea2005-04-20 09:28:54 +0000214 c = input_buffer[input_offset++];
215
wdenkeedcd072004-09-08 22:03:11 +0000216 if (input_offset >= sizeof input_buffer)
217 input_offset -= sizeof input_buffer;
218 input_size--;
wdenk68ceb292004-08-02 21:11:11 +0000219
wdenkeedcd072004-09-08 22:03:11 +0000220 return c;
wdenk68ceb292004-08-02 21:11:11 +0000221}
222
223int nc_tstc (void)
224{
225 struct eth_device *eth;
226
227 if (input_recursion)
228 return 0;
229
wdenkeedcd072004-09-08 22:03:11 +0000230 if (input_size)
wdenk68ceb292004-08-02 21:11:11 +0000231 return 1;
232
233 eth = eth_get_dev ();
234 if (eth && eth->state == ETH_STATE_ACTIVE)
235 return 0; /* inside net loop */
236
237 input_recursion = 1;
238
239 net_timeout = 1;
wdenkeedcd072004-09-08 22:03:11 +0000240 NetLoop (NETCONS); /* kind of poll */
wdenk68ceb292004-08-02 21:11:11 +0000241
242 input_recursion = 0;
243
wdenkeedcd072004-09-08 22:03:11 +0000244 return input_size != 0;
wdenk68ceb292004-08-02 21:11:11 +0000245}
246
247int drv_nc_init (void)
248{
249 device_t dev;
250 int rc;
251
252 memset (&dev, 0, sizeof (dev));
253
254 strcpy (dev.name, "nc");
255 dev.flags = DEV_FLAGS_OUTPUT | DEV_FLAGS_INPUT | DEV_FLAGS_SYSTEM;
256 dev.start = nc_start;
257 dev.putc = nc_putc;
258 dev.puts = nc_puts;
259 dev.getc = nc_getc;
260 dev.tstc = nc_tstc;
261
262 rc = device_register (&dev);
263
264 return (rc == 0) ? 1 : rc;
265}
266
267#endif /* CONFIG_NETCONSOLE */