xref: /openbmc/u-boot/net/ping.c (revision b0e6ef46)
1 /*
2  *	Copied from Linux Monitor (LiMon) - Networking.
3  *
4  *	Copyright 1994 - 2000 Neil Russell.
5  *	(See License)
6  *	Copyright 2000 Roland Borde
7  *	Copyright 2000 Paolo Scaffardi
8  *	Copyright 2000-2002 Wolfgang Denk, wd@denx.de
9  *	SPDX-License-Identifier:	GPL-2.0
10  */
11 
12 #include "ping.h"
13 #include "arp.h"
14 
15 static ushort PingSeqNo;
16 
17 /* The ip address to ping */
18 IPaddr_t NetPingIP;
19 
20 static void set_icmp_header(uchar *pkt, IPaddr_t dest)
21 {
22 	/*
23 	 *	Construct an IP and ICMP header.
24 	 */
25 	struct ip_hdr *ip = (struct ip_hdr *)pkt;
26 	struct icmp_hdr *icmp = (struct icmp_hdr *)(pkt + IP_HDR_SIZE);
27 
28 	net_set_ip_header(pkt, dest, NetOurIP);
29 
30 	ip->ip_len   = htons(IP_ICMP_HDR_SIZE);
31 	ip->ip_p     = IPPROTO_ICMP;
32 	ip->ip_sum   = ~NetCksum((uchar *)ip, IP_HDR_SIZE >> 1);
33 
34 	icmp->type = ICMP_ECHO_REQUEST;
35 	icmp->code = 0;
36 	icmp->checksum = 0;
37 	icmp->un.echo.id = 0;
38 	icmp->un.echo.sequence = htons(PingSeqNo++);
39 	icmp->checksum = ~NetCksum((uchar *)icmp, ICMP_HDR_SIZE	>> 1);
40 }
41 
42 static int ping_send(void)
43 {
44 	uchar *pkt;
45 	int eth_hdr_size;
46 
47 	/* XXX always send arp request */
48 
49 	debug_cond(DEBUG_DEV_PKT, "sending ARP for %pI4\n", &NetPingIP);
50 
51 	NetArpWaitPacketIP = NetPingIP;
52 
53 	eth_hdr_size = NetSetEther(NetTxPacket, NetEtherNullAddr, PROT_IP);
54 	pkt = (uchar *)NetTxPacket + eth_hdr_size;
55 
56 	set_icmp_header(pkt, NetPingIP);
57 
58 	/* size of the waiting packet */
59 	NetArpWaitTxPacketSize = eth_hdr_size + IP_ICMP_HDR_SIZE;
60 
61 	/* and do the ARP request */
62 	NetArpWaitTry = 1;
63 	NetArpWaitTimerStart = get_timer(0);
64 	ArpRequest();
65 	return 1;	/* waiting */
66 }
67 
68 static void ping_timeout(void)
69 {
70 	eth_halt();
71 	net_set_state(NETLOOP_FAIL);	/* we did not get the reply */
72 }
73 
74 void ping_start(void)
75 {
76 	printf("Using %s device\n", eth_get_name());
77 	NetSetTimeout(10000UL, ping_timeout);
78 
79 	ping_send();
80 }
81 
82 void ping_receive(struct ethernet_hdr *et, struct ip_udp_hdr *ip, int len)
83 {
84 	struct icmp_hdr *icmph = (struct icmp_hdr *)&ip->udp_src;
85 	IPaddr_t src_ip;
86 	int eth_hdr_size;
87 
88 	switch (icmph->type) {
89 	case ICMP_ECHO_REPLY:
90 		src_ip = NetReadIP((void *)&ip->ip_src);
91 		if (src_ip == NetPingIP)
92 			net_set_state(NETLOOP_SUCCESS);
93 		return;
94 	case ICMP_ECHO_REQUEST:
95 		eth_hdr_size = net_update_ether(et, et->et_src, PROT_IP);
96 
97 		debug_cond(DEBUG_DEV_PKT, "Got ICMP ECHO REQUEST, return "
98 			"%d bytes\n", eth_hdr_size + len);
99 
100 		ip->ip_sum = 0;
101 		ip->ip_off = 0;
102 		NetCopyIP((void *)&ip->ip_dst, &ip->ip_src);
103 		NetCopyIP((void *)&ip->ip_src, &NetOurIP);
104 		ip->ip_sum = ~NetCksum((uchar *)ip,
105 				       IP_HDR_SIZE >> 1);
106 
107 		icmph->type = ICMP_ECHO_REPLY;
108 		icmph->checksum = 0;
109 		icmph->checksum = ~NetCksum((uchar *)icmph,
110 			(len - IP_HDR_SIZE) >> 1);
111 		NetSendPacket((uchar *)et, eth_hdr_size + len);
112 		return;
113 /*	default:
114 		return;*/
115 	}
116 }
117