aboutsummaryrefslogtreecommitdiff
path: root/firmwares/wifishield/wifiHD/src/ping.c
diff options
context:
space:
mode:
Diffstat (limited to 'firmwares/wifishield/wifiHD/src/ping.c')
-rw-r--r--firmwares/wifishield/wifiHD/src/ping.c340
1 files changed, 0 insertions, 340 deletions
diff --git a/firmwares/wifishield/wifiHD/src/ping.c b/firmwares/wifishield/wifiHD/src/ping.c
deleted file mode 100644
index aba97db..0000000
--- a/firmwares/wifishield/wifiHD/src/ping.c
+++ /dev/null
@@ -1,340 +0,0 @@
-/* This source file is part of the ATMEL AVR-UC3-SoftwareFramework-1.7.0 Release */
-
-/*
- * Copyright (c) 2001-2003 Swedish Institute of Computer Science.
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without modification,
- * are permitted provided that the following conditions are met:
- *
- * 1. Redistributions of source code must retain the above copyright notice,
- * this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright notice,
- * this list of conditions and the following disclaimer in the documentation
- * and/or other materials provided with the distribution.
- * 3. The name of the author may not be used to endorse or promote products
- * derived from this software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
- * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
- * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
- * SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
- * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
- * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
- * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
- * OF SUCH DAMAGE.
- *
- * This file is derived from a part of the lwIP TCP/IP stack.
- *
- */
-#ifdef PING_CMD
-#include "lwip/opt.h"
-
-#include "lwip/mem.h"
-#include "lwip/raw.h"
-#include "lwip/icmp.h"
-#include "lwip/netif.h"
-#include "lwip/sys.h"
-#include "lwip/sockets.h"
-#include "lwip/inet.h"
-#include "lwip/inet_chksum.h"
-
-#include "ping.h"
-#include "timer.h"
-#include "util.h"
-
-#include "getopt.h"
-
-#define PING_ID 0xAFAF
-
-struct ping_info_t {
- struct ip_addr destination;
- uint32_t deadline; /* -w (in seconds) */
- uint32_t interval; /* -i (in ms) */
- uint32_t timeout; /* ms */
- uint32_t data_size; /* -s */
- uint32_t count; /* -c, 0 means continous ping */
- uint32_t size;
- uint32_t first_tx_tm;
- uint32_t last_tx_tm;
- uint32_t last_rx_tm;
- uint32_t num_tx;
- uint32_t num_rx;
- uint32_t flags;
- uint16_t seq_num;
- Bool quiet; /* -q */
- ping_complete_cb_t complete_cb;
- void *ctx;
-#define PING_REPLY (1 << 0)
-};
-
-static struct ping_info_t INFO;
-
-/** Prepare a echo ICMP request */
-static void ping_prepare_echo(struct icmp_echo_hdr *iecho,
- struct ping_info_t* ping_info)
-{
- int i;
-
- ICMPH_TYPE_SET(iecho,ICMP_ECHO);
- ICMPH_CODE_SET(iecho, 0);
- iecho->chksum = 0;
- iecho->id = PING_ID;
- iecho->seqno = htons(++ping_info->seq_num);
- iecho->chksum = 0;
-
- /* fill the additional data buffer with some data */
- for(i = 0; i < ping_info->data_size; i++) {
- ((char*)iecho)[sizeof(struct icmp_echo_hdr) + i] = i;
- }
-
- iecho->chksum = inet_chksum(iecho, ping_info->size);
-}
-
-/* Ping using the raw ip */
-static u8_t ping_recv(void *arg, struct raw_pcb *pcb, struct pbuf *p,
- struct ip_addr *addr)
-{
- struct icmp_echo_hdr *iecho;
- struct ip_hdr *ip = p->payload;
- struct ping_info_t* ping_info = (struct ping_info_t*) arg;
- uint32_t us;
-
- if (pbuf_header( p, -PBUF_IP_HLEN)==0) {
- iecho = p->payload;
-
- if ((iecho->id == PING_ID) &&
- (iecho->seqno == htons(ping_info->seq_num))) {
- ping_info->last_rx_tm = timer_get_ms();
- ping_info->num_rx++;
- us = 1000 *
- (ping_info->last_rx_tm - ping_info->last_tx_tm);
-
- if (!ping_info->quiet)
- printk("%d bytes from %s: icmp_seq=%d ttl=%d " \
- "time=%d.%03d ms\n",
- p->tot_len, ip2str(ip->src),
- iecho->seqno,
- IPH_TTL(ip),
- us / 1000, us % 1000);
-
- /* do some ping result processing */
- ping_info->flags |= PING_REPLY;
- }
- }
-
- pbuf_free(p);
- return 1; /* eat the event */
-}
-
-static void ping_send(struct raw_pcb *raw, struct ping_info_t* ping_info)
-{
- struct pbuf *p;
- struct icmp_echo_hdr *iecho;
-
- if (!(p = pbuf_alloc(PBUF_IP, ping_info->size, PBUF_RAM))) {
- return;
- }
- if ((p->len == p->tot_len) && (p->next == NULL)) {
- iecho = p->payload;
-
- ping_prepare_echo(iecho, ping_info);
- raw_sendto(raw, p, &ping_info->destination);
-
- if (!ping_info->first_tx_tm)
- ping_info->first_tx_tm = timer_get_ms();
- ping_info->last_tx_tm = timer_get_ms();
- ping_info->num_tx++;
- }
- pbuf_free(p);
-}
-
-void ping_set_callback(ping_complete_cb_t cb, void *ctx) {
- INFO.complete_cb = cb;
- INFO.ctx = ctx;
-}
-
-void ping_stop(uint32_t *tx_cnt, uint32_t *rx_cnt) {
- struct ping_info_t *ping_info = &INFO;
-
- *tx_cnt = ping_info->num_tx;
- *rx_cnt = ping_info->num_rx;
- ping_info->count = ping_info->num_tx;
- if ( 0 == ping_info->count ) {
- ping_info->count = 1;
- }
-}
-
-static int init_ping_info(int argc, char* argv[], struct ping_info_t* ping_info)
-{
- int c;
- ping_complete_cb_t cb;
- void *ctx;
-
- cb = ping_info->complete_cb;
- ctx = ping_info->ctx;
- memset(ping_info, 0, sizeof(struct ping_info_t));
- ping_info->complete_cb = cb;
- ping_info->ctx = ctx;
-
- ping_info->deadline = 0;
- ping_info->interval = 1000;
- ping_info->timeout = 3000;
- ping_info->data_size = 32;
- ping_info->count = 3;
- ping_info->destination =
- netif_default ? netif_default->gw : ip_addr_any;
-
- optind = 1;
- while ((c = getopt(argc, argv, "c:i:s:w:q")) != -1) {
- switch (c) {
- case 'c':
- ping_info->count = atoi(optarg);
- break;
-
- case 'i':
- ping_info->interval = atoi(optarg);
- break;
-
- case 's':
- ping_info->data_size = atoi(optarg);
- break;
-
- case 'q':
- ping_info->quiet = TRUE;
- break;
-
- case 'w':
- ping_info->deadline = atoi(optarg);
- break;
- }
- }
-
- ping_info->size = sizeof(struct icmp_echo_hdr) + ping_info->data_size;
-
- if (optind >= argc)
- return -1;
-
- ping_info->destination = str2ip(argv[optind]);
- if (!ping_info->destination.addr)
- return -1;
-
-
- ping_info->last_rx_tm = timer_get_ms();
-
- return 0;
-}
-
-static void print_stats(struct ping_info_t* ping_info)
-{
- printk("\n--- %s ping statistics ---\n",
- ip2str(ping_info->destination));
- printk("%d packets transmitted, %d received, %d%% packet loss, "\
- "time %dms\n\n",
- ping_info->num_tx, ping_info->num_rx,
- 100 * (ping_info->num_tx - ping_info->num_rx) /
- ping_info->num_tx,
- timer_get_ms() - ping_info->first_tx_tm);
-}
-
-static void ping_finalize(struct ping_info_t* ping_info) {
- print_stats(ping_info);
- if (ping_info->complete_cb) {
- ping_info->complete_cb(ping_info->num_tx, ping_info->num_rx, ping_info->ctx);
- }
-}
-
-cmd_state_t cmd_ping(int argc, char* argv[], void* ctx)
-{
- static enum {
- INIT,
- PING,
- WAIT_REPLY
- } state = INIT;
-
- struct ping_info_t *ping_info = &INFO;
- static struct raw_pcb *pcb;
-
- switch (state) {
- case INIT:
- if (init_ping_info(argc, argv, ping_info) != 0) {
- printk("Usage: ping [-c count] [-i interval] " \
- "[-s packetsize]\n " \
- "[-w deadline] [-q] destination\n");
- return CMD_DONE;
- }
-
- if (!(pcb = raw_new(IP_PROTO_ICMP))) {
- printk("could not allocate pcb\n");
- state = INIT;
- return CMD_DONE;
- }
- raw_recv(pcb, ping_recv, ping_info);
- raw_bind(pcb, IP_ADDR_ANY);
-
- printk("PING %s %d(%d) bytes of data\n",
- ip2str(ping_info->destination),
- ping_info->data_size,
- ping_info->size);
- state = PING;
- /* fall through */
-
- case PING:
- if (!netif_is_up(netif_default)) {
- printk("netif is down\n");
- raw_remove(pcb);
- state = INIT;
- return CMD_DONE;
- }
-
- if (ping_info->count && ping_info->num_tx == ping_info->count) {
- ping_finalize(ping_info);
- raw_remove(pcb);
- state = INIT;
- return CMD_DONE;
- }
-
-
- if (timer_get_ms() < ping_info->last_rx_tm + ping_info->interval) {
- return CMD_INPROGRESS;
- }
- ping_send(pcb, ping_info);
-
- state = WAIT_REPLY;
- return CMD_INPROGRESS;
-
- case WAIT_REPLY:
- if (ping_info->flags & PING_REPLY) {
- ping_info->flags &= (~PING_REPLY);
- state = PING;
- return CMD_INPROGRESS;
- }
-
- if (timer_get_ms() >
- ping_info->last_tx_tm + ping_info->timeout) {
- if (!ping_info->quiet)
- printk("timeout from %s\n",
- ip2str(ping_info->destination));
- state = PING;
- return CMD_INPROGRESS;
- }
-
- if (ping_info->deadline &&
- timer_get_ms() >
- ping_info->first_tx_tm + ping_info->deadline * 1000) {
- ping_finalize(ping_info);
- raw_remove(pcb);
- state = INIT;
- return CMD_DONE;
- }
-
- return CMD_INPROGRESS;
- }
-
- /* unreachable */
- Assert(0);
- return CMD_DONE;
-}
-#endif