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