ping.c 2.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119
  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. #include "ping.h"
  12. #include "arp.h"
  13. static ushort ping_seq_number;
  14. /* The ip address to ping */
  15. struct in_addr net_ping_ip;
  16. static void set_icmp_header(uchar *pkt, struct in_addr dest)
  17. {
  18. /*
  19. * Construct an IP and ICMP header.
  20. */
  21. struct ip_hdr *ip = (struct ip_hdr *)pkt;
  22. struct icmp_hdr *icmp = (struct icmp_hdr *)(pkt + IP_HDR_SIZE);
  23. net_set_ip_header(pkt, dest, net_ip);
  24. ip->ip_len = htons(IP_ICMP_HDR_SIZE);
  25. ip->ip_p = IPPROTO_ICMP;
  26. ip->ip_sum = compute_ip_checksum(ip, IP_HDR_SIZE);
  27. icmp->type = ICMP_ECHO_REQUEST;
  28. icmp->code = 0;
  29. icmp->checksum = 0;
  30. icmp->un.echo.id = 0;
  31. icmp->un.echo.sequence = htons(ping_seq_number++);
  32. icmp->checksum = compute_ip_checksum(icmp, ICMP_HDR_SIZE);
  33. }
  34. static int ping_send(void)
  35. {
  36. uchar *pkt;
  37. int eth_hdr_size;
  38. /* XXX always send arp request */
  39. debug_cond(DEBUG_DEV_PKT, "sending ARP for %pI4\n", &net_ping_ip);
  40. net_arp_wait_packet_ip = net_ping_ip;
  41. eth_hdr_size = net_set_ether(net_tx_packet, net_null_ethaddr, PROT_IP);
  42. pkt = (uchar *)net_tx_packet + eth_hdr_size;
  43. set_icmp_header(pkt, net_ping_ip);
  44. /* size of the waiting packet */
  45. arp_wait_tx_packet_size = eth_hdr_size + IP_ICMP_HDR_SIZE;
  46. /* and do the ARP request */
  47. arp_wait_try = 1;
  48. arp_wait_timer_start = get_timer(0);
  49. arp_request();
  50. return 1; /* waiting */
  51. }
  52. static void ping_timeout_handler(void)
  53. {
  54. eth_halt();
  55. net_set_state(NETLOOP_FAIL); /* we did not get the reply */
  56. }
  57. void ping_start(void)
  58. {
  59. printf("Using %s device\n", eth_get_name());
  60. net_set_timeout_handler(10000UL, ping_timeout_handler);
  61. ping_send();
  62. }
  63. void ping_receive(struct ethernet_hdr *et, struct ip_udp_hdr *ip, int len)
  64. {
  65. struct icmp_hdr *icmph = (struct icmp_hdr *)&ip->udp_src;
  66. struct in_addr src_ip;
  67. int eth_hdr_size;
  68. uchar *tx_packet;
  69. switch (icmph->type) {
  70. case ICMP_ECHO_REPLY:
  71. src_ip = net_read_ip((void *)&ip->ip_src);
  72. if (src_ip.s_addr == net_ping_ip.s_addr)
  73. net_set_state(NETLOOP_SUCCESS);
  74. return;
  75. case ICMP_ECHO_REQUEST:
  76. eth_hdr_size = net_update_ether(et, et->et_src, PROT_IP);
  77. debug_cond(DEBUG_DEV_PKT,
  78. "Got ICMP ECHO REQUEST, return %d bytes\n",
  79. eth_hdr_size + len);
  80. ip->ip_sum = 0;
  81. ip->ip_off = 0;
  82. net_copy_ip((void *)&ip->ip_dst, &ip->ip_src);
  83. net_copy_ip((void *)&ip->ip_src, &net_ip);
  84. ip->ip_sum = compute_ip_checksum(ip, IP_HDR_SIZE);
  85. icmph->type = ICMP_ECHO_REPLY;
  86. icmph->checksum = 0;
  87. icmph->checksum = compute_ip_checksum(icmph, len - IP_HDR_SIZE);
  88. tx_packet = net_get_async_tx_pkt_buf();
  89. memcpy(tx_packet, et, eth_hdr_size + len);
  90. net_send_packet(tx_packet, eth_hdr_size + len);
  91. return;
  92. /* default:
  93. return;*/
  94. }
  95. }