tcp_in.c
上传用户:yyhongfa
上传日期:2013-01-18
资源大小:267k
文件大小:43k
开发平台:

C/C++

  1. /**
  2.  * @file
  3.  *
  4.  * Transmission Control Protocol, incoming traffic
  5.  *
  6.  * The input processing functions of TCP.
  7.  *
  8.  * These functions are generally called in the order (ip_input() ->) tcp_input() ->
  9.  * tcp_process() -> tcp_receive() (-> application).
  10.  * 
  11.  */
  12. /*
  13.  * Copyright (c) 2001-2004 Swedish Institute of Computer Science.
  14.  * All rights reserved.
  15.  *
  16.  * Redistribution and use in source and binary forms, with or without modification,
  17.  * are permitted provided that the following conditions are met:
  18.  *
  19.  * 1. Redistributions of source code must retain the above copyright notice,
  20.  *    this list of conditions and the following disclaimer.
  21.  * 2. Redistributions in binary form must reproduce the above copyright notice,
  22.  *    this list of conditions and the following disclaimer in the documentation
  23.  *    and/or other materials provided with the distribution.
  24.  * 3. The name of the author may not be used to endorse or promote products
  25.  *    derived from this software without specific prior written permission.
  26.  *
  27.  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
  28.  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
  29.  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
  30.  * SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
  31.  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
  32.  * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  33.  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  34.  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
  35.  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
  36.  * OF SUCH DAMAGE.
  37.  *
  38.  * This file is part of the lwIP TCP/IP stack.
  39.  *
  40.  * Author: Adam Dunkels <adam@sics.se>
  41.  *
  42.  */
  43. #include "lwip/def.h"
  44. #include "lwip/opt.h"
  45. #include "lwip/ip_addr.h"
  46. #include "lwip/netif.h"
  47. #include "lwip/mem.h"
  48. #include "lwip/memp.h"
  49. #include "lwip/inet.h"
  50. #include "lwip/tcp.h"
  51. #include "lwip/stats.h"
  52. #include "arch/perf.h"
  53. #include "uart.h"
  54. #if LWIP_TCP
  55. /* These variables are global to all functions involved in the input
  56.    processing of TCP segments. They are set by the tcp_input()
  57.    function. */
  58. static struct tcp_seg inseg;
  59. static struct tcp_hdr *tcphdr;
  60. static struct ip_hdr *iphdr;
  61. static u32_t seqno, ackno;
  62. static u8_t flags;
  63. static u16_t tcplen;
  64. static u8_t recv_flags;
  65. static struct pbuf *recv_data;
  66. struct tcp_pcb *tcp_input_pcb;
  67. /* Forward declarations. */
  68. static err_t tcp_process(struct tcp_pcb *pcb);
  69. static void tcp_receive(struct tcp_pcb *pcb);
  70. static void tcp_parseopt(struct tcp_pcb *pcb);
  71. static err_t tcp_listen_input(struct tcp_pcb_listen *pcb);
  72. static err_t tcp_timewait_input(struct tcp_pcb *pcb);
  73. /* tcp_input:
  74.  *
  75.  * The initial input processing of TCP. It verifies the TCP header, demultiplexes
  76.  * the segment between the PCBs and passes it on to tcp_process(), which implements
  77.  * the TCP finite state machine. This function is called by the IP layer (in
  78.  * ip_input()).
  79.  */
  80. void
  81. tcp_input(struct pbuf *p, struct netif *inp)
  82. {
  83.   struct tcp_pcb *pcb, *prev;
  84.   struct tcp_pcb_listen *lpcb;
  85.   u8_t hdrlen;
  86.   err_t err;
  87. #if SO_REUSE
  88.   struct tcp_pcb *pcb_temp;
  89.   int reuse = 0;
  90.   int reuse_port = 0;
  91. #endif /* SO_REUSE */
  92.   PERF_START;
  93.   DEBUG_FUNCTION("tcp_input()")
  94.   TCP_STATS_INC(tcp.recv);
  95.   iphdr = p->payload;
  96.   tcphdr = (struct tcp_hdr *)((u8_t *)p->payload + IPH_HL(iphdr) * 4);
  97. #if TCP_INPUT_DEBUG
  98.   tcp_debug_print(tcphdr);
  99. #endif
  100.   /* remove header from payload */
  101.   if (pbuf_header(p, -((s16_t)(IPH_HL(iphdr) * 4))) || (p->tot_len < sizeof(struct tcp_hdr))) {
  102.     /* drop short packets */
  103.     LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_input: short packet (%u bytes) discardedn", p->tot_len));
  104.     TCP_STATS_INC(tcp.lenerr);
  105.     TCP_STATS_INC(tcp.drop);
  106.     pbuf_free(p);
  107.     return;
  108.   }
  109.   /* Don't even process incoming broadcasts/multicasts. */
  110.   if (ip_addr_isbroadcast(&(iphdr->dest), inp) ||
  111.       ip_addr_ismulticast(&(iphdr->dest))) {
  112.     pbuf_free(p);
  113.     return;
  114.   }
  115. #if CHECKSUM_CHECK_TCP
  116.   /* Verify TCP checksum. */
  117.   if (inet_chksum_pseudo(p, (struct ip_addr *)&(iphdr->src),
  118.       (struct ip_addr *)&(iphdr->dest),
  119.       IP_PROTO_TCP, p->tot_len) != 0) {
  120.       LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_input: packet discarded due to failing checksum 0x%04xn",
  121.         inet_chksum_pseudo(p, (struct ip_addr *)&(iphdr->src), (struct ip_addr *)&(iphdr->dest),
  122.       IP_PROTO_TCP, p->tot_len)));
  123. #if TCP_DEBUG
  124.     tcp_debug_print(tcphdr);
  125. #endif /* TCP_DEBUG */
  126.     TCP_STATS_INC(tcp.chkerr);
  127.     TCP_STATS_INC(tcp.drop);
  128.     pbuf_free(p);
  129.     return;
  130.   }
  131. #endif
  132.   /* Move the payload pointer in the pbuf so that it points to the
  133.      TCP data instead of the TCP header. */
  134.   hdrlen = TCPH_HDRLEN(tcphdr);
  135.   pbuf_header(p, -(hdrlen * 4));
  136.   /* Convert fields in TCP header to host byte order. */
  137.   tcphdr->src = ntohs(tcphdr->src);
  138.   tcphdr->dest = ntohs(tcphdr->dest);
  139.   seqno = tcphdr->seqno = ntohl(tcphdr->seqno);
  140.   ackno = tcphdr->ackno = ntohl(tcphdr->ackno);
  141.   tcphdr->wnd = ntohs(tcphdr->wnd);
  142.   flags = TCPH_FLAGS(tcphdr) & TCP_FLAGS;
  143.   tcplen = p->tot_len + ((flags & TCP_FIN || flags & TCP_SYN)? 1: 0);
  144.   /* Demultiplex an incoming segment. First, we check if it is destined
  145.      for an active connection. */
  146.   prev = NULL;
  147. #if SO_REUSE
  148.   pcb_temp = tcp_active_pcbs;
  149.   
  150.  again_1:
  151.   
  152.   /* Iterate through the TCP pcb list for a fully matching pcb */
  153.   for(pcb = pcb_temp; pcb != NULL; pcb = pcb->next) {
  154. #else  /* SO_REUSE */
  155.   for(pcb = tcp_active_pcbs; pcb != NULL; pcb = pcb->next) {
  156. #endif  /* SO_REUSE */
  157.     LWIP_ASSERT("tcp_input: active pcb->state != CLOSED", pcb->state != CLOSED);
  158.     LWIP_ASSERT("tcp_input: active pcb->state != TIME-WAIT", pcb->state != TIME_WAIT);
  159.     LWIP_ASSERT("tcp_input: active pcb->state != LISTEN", pcb->state != LISTEN);
  160.     if (pcb->remote_port == tcphdr->src &&
  161.        pcb->local_port == tcphdr->dest &&
  162.        ip_addr_cmp(&(pcb->remote_ip), &(iphdr->src)) &&
  163.        ip_addr_cmp(&(pcb->local_ip), &(iphdr->dest))) {
  164. #if SO_REUSE
  165.       if(pcb->so_options & SOF_REUSEPORT) {
  166.         if(reuse) {
  167.           /* We processed one PCB already */
  168.           LWIP_DEBUGF(TCP_INPUT_DEBUG,("tcp_input: second or later PCB and SOF_REUSEPORT set.n"));
  169.         } else {
  170.           /* First PCB with this address */
  171.           LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_input: first PCB and SOF_REUSEPORT set.n"));
  172.           reuse = 1;
  173.         }
  174.         
  175.         reuse_port = 1; 
  176.         p->ref++;
  177.         
  178.         /* We want to search on next socket after receiving */
  179.         pcb_temp = pcb->next;
  180.         
  181.         LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_input: reference counter on PBUF set to %in", p->ref));
  182.       } else  {
  183.         if(reuse) {
  184.           /* We processed one PCB already */
  185.           LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_input: second or later PCB but SOF_REUSEPORT not set !n"));
  186.         }
  187.       }
  188. #endif /* SO_REUSE */
  189.       /* Move this PCB to the front of the list so that subsequent
  190.    lookups will be faster (we exploit locality in TCP segment
  191.    arrivals). */
  192.       LWIP_ASSERT("tcp_input: pcb->next != pcb (before cache)", pcb->next != pcb);
  193.       if (prev != NULL) {
  194.   prev->next = pcb->next;
  195.   pcb->next = tcp_active_pcbs;
  196.   tcp_active_pcbs = pcb;
  197.       }
  198.       LWIP_ASSERT("tcp_input: pcb->next != pcb (after cache)", pcb->next != pcb);
  199.       break;
  200.     }
  201.     prev = pcb;
  202.   }
  203.   if (pcb == NULL) {
  204.     /* If it did not go to an active connection, we check the connections
  205.        in the TIME-WAIT state. */
  206.     for(pcb = tcp_tw_pcbs; pcb != NULL; pcb = pcb->next) {
  207.       LWIP_ASSERT("tcp_input: TIME-WAIT pcb->state == TIME-WAIT", pcb->state == TIME_WAIT);
  208.       if (pcb->remote_port == tcphdr->src &&
  209.    pcb->local_port == tcphdr->dest &&
  210.    ip_addr_cmp(&(pcb->remote_ip), &(iphdr->src)) &&
  211.          ip_addr_cmp(&(pcb->local_ip), &(iphdr->dest))) {
  212.   /* We don't really care enough to move this PCB to the front
  213.      of the list since we are not very likely to receive that
  214.      many segments for connections in TIME-WAIT. */
  215.   LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_input: packed for TIME_WAITing connection.n"));
  216.   tcp_timewait_input(pcb);
  217.   pbuf_free(p);
  218.   return;
  219.       }
  220.     }
  221.   /* Finally, if we still did not get a match, we check all PCBs that
  222.      are LISTENing for incoming connections. */
  223.     prev = NULL;
  224.     for(lpcb = tcp_listen_pcbs.listen_pcbs; lpcb != NULL; lpcb = lpcb->next) {
  225.       if ((ip_addr_isany(&(lpcb->local_ip)) ||
  226.     ip_addr_cmp(&(lpcb->local_ip), &(iphdr->dest))) &&
  227.    lpcb->local_port == tcphdr->dest) {
  228.   /* Move this PCB to the front of the list so that subsequent
  229.      lookups will be faster (we exploit locality in TCP segment
  230.      arrivals). */
  231.   if (prev != NULL) {
  232.     ((struct tcp_pcb_listen *)prev)->next = lpcb->next;
  233.           /* our successor is the remainder of the listening list */
  234.     lpcb->next = tcp_listen_pcbs.listen_pcbs;
  235.           /* put this listening pcb at the head of the listening list */
  236.     tcp_listen_pcbs.listen_pcbs = lpcb;
  237.   }
  238.   LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_input: packed for LISTENing connection.n"));
  239.   tcp_listen_input(lpcb);
  240.   pbuf_free(p);
  241.   return;
  242.       }
  243.       prev = (struct tcp_pcb *)lpcb;
  244.     }
  245.   }
  246. #if TCP_INPUT_DEBUG
  247.   LWIP_DEBUGF(TCP_INPUT_DEBUG, ("+-+-+-+-+-+-+-+-+-+-+-+-+-+- tcp_input: flags "));
  248.   tcp_debug_print_flags(TCPH_FLAGS(tcphdr));
  249.   LWIP_DEBUGF(TCP_INPUT_DEBUG, ("-+-+-+-+-+-+-+-+-+-+-+-+-+-+n"));
  250. #endif /* TCP_INPUT_DEBUG */
  251.   if (pcb != NULL) {
  252.     /* The incoming segment belongs to a connection. */
  253. #if TCP_INPUT_DEBUG
  254. #if TCP_DEBUG
  255.     tcp_debug_print_state(pcb->state);
  256. #endif /* TCP_DEBUG */
  257. #endif /* TCP_INPUT_DEBUG */
  258.     /* Set up a tcp_seg structure. */
  259.     inseg.next = NULL;
  260.     inseg.len = p->tot_len;
  261.     inseg.dataptr = p->payload;
  262.     inseg.p = p;
  263.     inseg.tcphdr = tcphdr;
  264.     recv_data = NULL;
  265.     recv_flags = 0;
  266.     tcp_input_pcb = pcb;
  267.     err = tcp_process(pcb);
  268.     tcp_input_pcb = NULL;
  269.     /* A return value of ERR_ABRT means that tcp_abort() was called
  270.        and that the pcb has been freed. If so, we don't do anything. */
  271.     if (err != ERR_ABRT) {
  272.       if (recv_flags & TF_RESET) {
  273.   /* TF_RESET means that the connection was reset by the other
  274.      end. We then call the error callback to inform the
  275.      application that the connection is dead before we
  276.      deallocate the PCB. */
  277.   TCP_EVENT_ERR(pcb->errf, pcb->callback_arg, ERR_RST);
  278.   tcp_pcb_remove(&tcp_active_pcbs, pcb);
  279.   memp_free(MEMP_TCP_PCB, pcb);
  280.       } else if (recv_flags & TF_CLOSED) {
  281.   /* The connection has been closed and we will deallocate the
  282.      PCB. */
  283.   tcp_pcb_remove(&tcp_active_pcbs, pcb);
  284.   memp_free(MEMP_TCP_PCB, pcb);
  285.       } else {
  286.   err = ERR_OK;
  287.   /* If the application has registered a "sent" function to be
  288.      called when new send buffer space is available, we call it
  289.      now. */
  290.   if (pcb->acked > 0) {
  291.     TCP_EVENT_SENT(pcb, pcb->acked, err);
  292.   }
  293.   if (recv_data != NULL) {
  294.     /* Notify application that data has been received. */
  295.     TCP_EVENT_RECV(pcb, recv_data, ERR_OK, err);
  296.   }
  297.   /* If a FIN segment was received, we call the callback
  298.      function with a NULL buffer to indicate EOF. */
  299.   if (recv_flags & TF_GOT_FIN) {
  300.     TCP_EVENT_RECV(pcb, NULL, ERR_OK, err);
  301.   }
  302.   /* If there were no errors, we try to send something out. */
  303.   if (err == ERR_OK) {
  304.     tcp_output(pcb);
  305.   }
  306.       }
  307.     }
  308.     /* We deallocate the incoming pbuf. If it was buffered by the
  309.        application, the application should have called pbuf_ref() to
  310.        increase the reference counter in the pbuf. If so, the buffer
  311.        isn't actually deallocated by the call to pbuf_free(), only the
  312.        reference count is decreased. */
  313.     if (inseg.p != NULL) pbuf_free(inseg.p);
  314. #if TCP_INPUT_DEBUG
  315. #if TCP_DEBUG
  316.     tcp_debug_print_state(pcb->state);
  317. #endif /* TCP_DEBUG */
  318. #endif /* TCP_INPUT_DEBUG */
  319. #if SO_REUSE
  320.     /* First socket should receive now */
  321.     if(reuse_port) {
  322.       LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_input: searching next PCB.n"));
  323.       reuse_port = 0;
  324.       
  325.       /* We are searching connected sockets */
  326.       goto again_1;
  327.     }
  328. #endif /* SO_REUSE */
  329.   } else {
  330. #if SO_REUSE
  331.     if(reuse) {
  332.       LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_input: freeing PBUF with reference counter set to %in", p->ref));
  333.       pbuf_free(p);
  334.       goto end;
  335.     }
  336. #endif /* SO_REUSE */
  337.     /* If no matching PCB was found, send a TCP RST (reset) to the
  338.        sender. */
  339.     LWIP_DEBUGF(TCP_RST_DEBUG, ("tcp_input: no PCB match found, resetting.n"));
  340.     if (!(TCPH_FLAGS(tcphdr) & TCP_RST)) {
  341.       TCP_STATS_INC(tcp.proterr);
  342.       TCP_STATS_INC(tcp.drop);
  343.       tcp_rst(ackno, seqno + tcplen,
  344.         &(iphdr->dest), &(iphdr->src),
  345.         tcphdr->dest, tcphdr->src);
  346.     }
  347.     pbuf_free(p);
  348.   }
  349. #if SO_REUSE
  350.  end:
  351. #endif /* SO_REUSE */
  352.   LWIP_ASSERT("tcp_input: tcp_pcbs_sane()", tcp_pcbs_sane());
  353.   //PERF_STOP("tcp_input");
  354. }
  355. /* tcp_listen_input():
  356.  *
  357.  * Called by tcp_input() when a segment arrives for a listening
  358.  * connection.
  359.  */
  360. static err_t
  361. tcp_listen_input(struct tcp_pcb_listen *pcb)
  362. {
  363.   struct tcp_pcb *npcb;
  364.   u32_t optdata;
  365.   /* In the LISTEN state, we check for incoming SYN segments,
  366.      creates a new PCB, and responds with a SYN|ACK. */
  367.   if (flags & TCP_ACK) {
  368.     /* For incoming segments with the ACK flag set, respond with a
  369.        RST. */
  370.     LWIP_DEBUGF(TCP_RST_DEBUG, ("tcp_listen_input: ACK in LISTEN, sending resetn"));
  371.     tcp_rst(ackno + 1, seqno + tcplen,
  372.       &(iphdr->dest), &(iphdr->src),
  373.       tcphdr->dest, tcphdr->src);
  374.   } else if (flags & TCP_SYN) {
  375.     LWIP_DEBUGF(TCP_DEBUG, ("TCP connection request %u -> %u.n", tcphdr->src, tcphdr->dest));
  376.     npcb = tcp_alloc(pcb->prio);
  377.     /* If a new PCB could not be created (probably due to lack of memory),
  378.        we don't do anything, but rely on the sender will retransmit the
  379.        SYN at a time when we have more memory available. */
  380.     if (npcb == NULL) {
  381.       LWIP_DEBUGF(TCP_DEBUG, ("tcp_listen_input: could not allocate PCBn"));
  382.       TCP_STATS_INC(tcp.memerr);
  383.       return ERR_MEM;
  384.     }
  385.     /* Set up the new PCB. */
  386.     ip_addr_set(&(npcb->local_ip), &(iphdr->dest));
  387.     npcb->local_port = pcb->local_port;
  388.     ip_addr_set(&(npcb->remote_ip), &(iphdr->src));
  389.     npcb->remote_port = tcphdr->src;
  390.     npcb->state = SYN_RCVD;
  391.     npcb->rcv_nxt = seqno + 1;
  392.     npcb->snd_wnd = tcphdr->wnd;
  393.     npcb->ssthresh = npcb->snd_wnd;
  394.     npcb->snd_wl1 = seqno - 1;/* initialise to seqno-1 to force window update */
  395.     npcb->callback_arg = pcb->callback_arg;
  396. #if LWIP_CALLBACK_API
  397.     npcb->accept = pcb->accept;
  398. #endif /* LWIP_CALLBACK_API */
  399.     /* inherit socket options */
  400.     npcb->so_options = pcb->so_options & (SOF_DEBUG|SOF_DONTROUTE|SOF_KEEPALIVE|SOF_OOBINLINE|SOF_LINGER);
  401.     /* Register the new PCB so that we can begin receiving segments
  402.        for it. */
  403.     TCP_REG(&tcp_active_pcbs, npcb);
  404.     /* Parse any options in the SYN. */
  405.     tcp_parseopt(npcb);
  406.     /* Build an MSS option. */
  407.     optdata = htonl(((u32_t)2 << 24) |
  408.         ((u32_t)4 << 16) |
  409.         (((u32_t)npcb->mss / 256) << 8) |
  410.         (npcb->mss & 255));
  411.     /* Send a SYN|ACK together with the MSS option. */
  412.     tcp_enqueue(npcb, NULL, 0, TCP_SYN | TCP_ACK, 0, (u8_t *)&optdata, 4);
  413.     return tcp_output(npcb);
  414.   }
  415.   return ERR_OK;
  416. }
  417. /* tcp_timewait_input():
  418.  *
  419.  * Called by tcp_input() when a segment arrives for a connection in
  420.  * TIME_WAIT.
  421.  */
  422. static err_t
  423. tcp_timewait_input(struct tcp_pcb *pcb)
  424. {
  425.   if (TCP_SEQ_GT(seqno + tcplen, pcb->rcv_nxt)) {
  426.     pcb->rcv_nxt = seqno + tcplen;
  427.   }
  428.   if (tcplen > 0) {
  429.     tcp_ack_now(pcb);
  430.   }
  431.   return tcp_output(pcb);
  432. }
  433. /* tcp_process
  434.  *
  435.  * Implements the TCP state machine. Called by tcp_input. In some
  436.  * states tcp_receive() is called to receive data. The tcp_seg
  437.  * argument will be freed by the caller (tcp_input()) unless the
  438.  * recv_data pointer in the pcb is set.
  439.  */
  440. static err_t
  441. tcp_process(struct tcp_pcb *pcb)
  442. {
  443.   struct tcp_seg *rseg;
  444.   u8_t acceptable = 0;
  445.   err_t err;
  446.   err = ERR_OK;
  447.   /* Process incoming RST segments. */
  448.   if (flags & TCP_RST) {
  449.     /* First, determine if the reset is acceptable. */
  450.     if (pcb->state == SYN_SENT) {
  451.       if (ackno == pcb->snd_nxt) {
  452.         acceptable = 1;
  453.       }
  454.     } else {
  455.       /*if (TCP_SEQ_GEQ(seqno, pcb->rcv_nxt) &&
  456.           TCP_SEQ_LEQ(seqno, pcb->rcv_nxt + pcb->rcv_wnd)) {
  457.       */
  458.       if(TCP_SEQ_BETWEEN(seqno, pcb->rcv_nxt, pcb->rcv_nxt+pcb->rcv_wnd)){
  459.         acceptable = 1;
  460.       }
  461.     }
  462.     if (acceptable) {
  463.       LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_process: Connection RESETn"));
  464.       LWIP_ASSERT("tcp_input: pcb->state != CLOSED", pcb->state != CLOSED);
  465.       recv_flags = TF_RESET;
  466.       pcb->flags &= ~TF_ACK_DELAY;
  467.       return ERR_RST;
  468.     } else {
  469.       LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_process: unacceptable reset seqno %lu rcv_nxt %lun",
  470.        seqno, pcb->rcv_nxt));
  471.       LWIP_DEBUGF(TCP_DEBUG, ("tcp_process: unacceptable reset seqno %lu rcv_nxt %lun",
  472.        seqno, pcb->rcv_nxt));
  473.       return ERR_OK;
  474.     }
  475.   }
  476.   /* Update the PCB (in)activity timer. */
  477.   pcb->tmr = tcp_ticks;
  478.   pcb->keep_cnt = 0;
  479.   /* Do different things depending on the TCP state. */
  480.   switch (pcb->state) {
  481.   case SYN_SENT:
  482.     LWIP_DEBUGF(TCP_INPUT_DEBUG, ("SYN-SENT: ackno %lu pcb->snd_nxt %lu unacked %lun", ackno,
  483.      pcb->snd_nxt, ntohl(pcb->unacked->tcphdr->seqno)));
  484.     if ((flags & TCP_ACK) && (flags & TCP_SYN)
  485.         && ackno == ntohl(pcb->unacked->tcphdr->seqno) + 1) {
  486.       pcb->snd_buf ++;
  487.       pcb->rcv_nxt = seqno + 1;
  488.       pcb->lastack = ackno;
  489.       pcb->snd_wnd = tcphdr->wnd;
  490.       pcb->snd_wl1 = seqno - 1; /* initialise to seqno - 1 to force window update */
  491.       pcb->state = ESTABLISHED;
  492.       pcb->cwnd = pcb->mss;
  493.       --pcb->snd_queuelen;
  494.       LWIP_DEBUGF(TCP_QLEN_DEBUG, ("tcp_process: SYN-SENT --queuelen %un", (unsigned int)pcb->snd_queuelen));
  495.       rseg = pcb->unacked;
  496.       pcb->unacked = rseg->next;
  497.       tcp_seg_free(rseg);
  498.       /* Parse any options in the SYNACK. */
  499.       tcp_parseopt(pcb);
  500.       /* Call the user specified function to call when sucessfully
  501.        * connected. */
  502.       TCP_EVENT_CONNECTED(pcb, ERR_OK, err);
  503.       tcp_ack(pcb);
  504.     }
  505.     break;
  506.   case SYN_RCVD:
  507.     if (flags & TCP_ACK &&
  508.        !(flags & TCP_RST)) {
  509.       /*if (TCP_SEQ_LT(pcb->lastack, ackno) &&
  510.         TCP_SEQ_LEQ(ackno, pcb->snd_nxt)) { */
  511.       if(TCP_SEQ_BETWEEN(ackno, pcb->lastack+1, pcb->snd_nxt)){
  512.         pcb->state = ESTABLISHED;
  513.         LWIP_DEBUGF(TCP_DEBUG, ("TCP connection established %u -> %u.n", inseg.tcphdr->src, inseg.tcphdr->dest));
  514. #if LWIP_CALLBACK_API
  515.         LWIP_ASSERT("pcb->accept != NULL", pcb->accept != NULL);
  516. #endif
  517.         /* Call the accept function. */
  518.         TCP_EVENT_ACCEPT(pcb, ERR_OK, err);
  519.         if (err != ERR_OK) {
  520.           /* If the accept function returns with an error, we abort
  521.            * the connection. */
  522.           tcp_abort(pcb);
  523.           return ERR_ABRT;
  524.         }
  525.         /* If there was any data contained within this ACK,
  526.          * we'd better pass it on to the application as well. */
  527.         tcp_receive(pcb);
  528.         pcb->cwnd = pcb->mss;
  529.       }
  530.     }
  531.     break;
  532.   case CLOSE_WAIT:
  533.     /* FALLTHROUGH */
  534.   case ESTABLISHED:
  535.     tcp_receive(pcb);
  536.     if (flags & TCP_FIN) {
  537.       tcp_ack_now(pcb);
  538.       pcb->state = CLOSE_WAIT;
  539.     }
  540.     break;
  541.   case FIN_WAIT_1:
  542.     tcp_receive(pcb);
  543.     if (flags & TCP_FIN) {
  544.       if (flags & TCP_ACK && ackno == pcb->snd_nxt) {
  545.         LWIP_DEBUGF(TCP_DEBUG,
  546.          ("TCP connection closed %d -> %d.n", inseg.tcphdr->src, inseg.tcphdr->dest));
  547.   tcp_ack_now(pcb);
  548.   tcp_pcb_purge(pcb);
  549.   TCP_RMV(&tcp_active_pcbs, pcb);
  550.   pcb->state = TIME_WAIT;
  551.   TCP_REG(&tcp_tw_pcbs, pcb);
  552.       } else {
  553.   tcp_ack_now(pcb);
  554.   pcb->state = CLOSING;
  555.       }
  556.     } else if (flags & TCP_ACK && ackno == pcb->snd_nxt) {
  557.       pcb->state = FIN_WAIT_2;
  558.     }
  559.     break;
  560.   case FIN_WAIT_2:
  561.     tcp_receive(pcb);
  562.     if (flags & TCP_FIN) {
  563.       LWIP_DEBUGF(TCP_DEBUG, ("TCP connection closed %u -> %u.n", inseg.tcphdr->src, inseg.tcphdr->dest));
  564.       tcp_ack_now(pcb);
  565.       tcp_pcb_purge(pcb);
  566.       TCP_RMV(&tcp_active_pcbs, pcb);
  567.       pcb->state = TIME_WAIT;
  568.       TCP_REG(&tcp_tw_pcbs, pcb);
  569.     }
  570.     break;
  571.   case CLOSING:
  572.     tcp_receive(pcb);
  573.     if (flags & TCP_ACK && ackno == pcb->snd_nxt) {
  574.       LWIP_DEBUGF(TCP_DEBUG, ("TCP connection closed %u -> %u.n", inseg.tcphdr->src, inseg.tcphdr->dest));
  575.       tcp_ack_now(pcb);
  576.       tcp_pcb_purge(pcb);
  577.       TCP_RMV(&tcp_active_pcbs, pcb);
  578.       pcb->state = TIME_WAIT;
  579.       TCP_REG(&tcp_tw_pcbs, pcb);
  580.     }
  581.     break;
  582.   case LAST_ACK:
  583.     tcp_receive(pcb);
  584.     if (flags & TCP_ACK && ackno == pcb->snd_nxt) {
  585.       LWIP_DEBUGF(TCP_DEBUG, ("TCP connection closed %u -> %u.n", inseg.tcphdr->src, inseg.tcphdr->dest));
  586.       pcb->state = CLOSED;
  587.       recv_flags = TF_CLOSED;
  588.     }
  589.     break;
  590.   default:
  591.     break;
  592.   }
  593.   return ERR_OK;
  594. }
  595. /* tcp_receive:
  596.  *
  597.  * Called by tcp_process. Checks if the given segment is an ACK for outstanding
  598.  * data, and if so frees the memory of the buffered data. Next, is places the
  599.  * segment on any of the receive queues (pcb->recved or pcb->ooseq). If the segment
  600.  * is buffered, the pbuf is referenced by pbuf_ref so that it will not be freed until
  601.  * i it has been removed from the buffer.
  602.  *
  603.  * If the incoming segment constitutes an ACK for a segment that was used for RTT
  604.  * estimation, the RTT is estimated here as well.
  605.  */
  606. static void
  607. tcp_receive(struct tcp_pcb *pcb)
  608. {
  609.   struct tcp_seg *next;
  610. #if TCP_QUEUE_OOSEQ
  611.   struct tcp_seg *prev, *cseg;
  612. #endif
  613.   struct pbuf *p;
  614.   s32_t off;
  615.   int m;
  616.   u32_t right_wnd_edge;
  617.   u16_t new_tot_len;
  618.   if (flags & TCP_ACK) {
  619.     right_wnd_edge = pcb->snd_wnd + pcb->snd_wl1;
  620.     /* Update window. */
  621.     if (TCP_SEQ_LT(pcb->snd_wl1, seqno) ||
  622.        (pcb->snd_wl1 == seqno && TCP_SEQ_LT(pcb->snd_wl2, ackno)) ||
  623.        (pcb->snd_wl2 == ackno && tcphdr->wnd > pcb->snd_wnd)) {
  624.       pcb->snd_wnd = tcphdr->wnd;
  625.       pcb->snd_wl1 = seqno;
  626.       pcb->snd_wl2 = ackno;
  627.       LWIP_DEBUGF(TCP_WND_DEBUG, ("tcp_receive: window update %lun", pcb->snd_wnd));
  628. #if TCP_WND_DEBUG
  629.     } else {
  630.       if (pcb->snd_wnd != tcphdr->wnd) {
  631.         LWIP_DEBUGF(TCP_WND_DEBUG, ("tcp_receive: no window update lastack %lu snd_max %lu ackno %lu wl1 %lu seqno %lu wl2 %lun",
  632.                                pcb->lastack, pcb->snd_max, ackno, pcb->snd_wl1, seqno, pcb->snd_wl2));
  633.       }
  634. #endif /* TCP_WND_DEBUG */
  635.     }
  636.     if (pcb->lastack == ackno) {
  637.       pcb->acked = 0;
  638.       if (pcb->snd_wl1 + pcb->snd_wnd == right_wnd_edge){
  639.         ++pcb->dupacks;
  640.         if (pcb->dupacks >= 3 && pcb->unacked != NULL) {
  641.           if (!(pcb->flags & TF_INFR)) {
  642.             /* This is fast retransmit. Retransmit the first unacked segment. */
  643.             LWIP_DEBUGF(TCP_FR_DEBUG, ("tcp_receive: dupacks %u (%lu), fast retransmit %lun",
  644.                                        (unsigned int)pcb->dupacks, pcb->lastack,
  645.                                        ntohl(pcb->unacked->tcphdr->seqno)));
  646.             tcp_rexmit(pcb);
  647.             /* Set ssthresh to max (FlightSize / 2, 2*SMSS) */
  648.             /*pcb->ssthresh = LWIP_MAX((pcb->snd_max -
  649.                                       pcb->lastack) / 2,
  650.                                       2 * pcb->mss);*/
  651.             /* Set ssthresh to half of the minimum of the currenct cwnd and the advertised window */
  652.             if(pcb->cwnd > pcb->snd_wnd)
  653.               pcb->ssthresh = pcb->snd_wnd / 2;
  654.             else
  655.               pcb->ssthresh = pcb->cwnd / 2;
  656.             pcb->cwnd = pcb->ssthresh + 3 * pcb->mss;
  657.             pcb->flags |= TF_INFR;
  658.           } else {
  659.             /* Inflate the congestion window, but not if it means that
  660.                the value overflows. */
  661.             if ((u16_t)(pcb->cwnd + pcb->mss) > pcb->cwnd) {
  662.               pcb->cwnd += pcb->mss;
  663.             }
  664.           }
  665.         }
  666.       } else {
  667.         LWIP_DEBUGF(TCP_FR_DEBUG, ("tcp_receive: dupack averted %lu %lun",
  668.                                    pcb->snd_wl1 + pcb->snd_wnd, right_wnd_edge));
  669.       }
  670.     } else
  671.       /*if (TCP_SEQ_LT(pcb->lastack, ackno) &&
  672.         TCP_SEQ_LEQ(ackno, pcb->snd_max)) { */
  673.       if(TCP_SEQ_BETWEEN(ackno, pcb->lastack+1, pcb->snd_max)){
  674.       /* We come here when the ACK acknowledges new data. */
  675.       
  676.       /* Reset the "IN Fast Retransmit" flag, since we are no longer
  677.          in fast retransmit. Also reset the congestion window to the
  678.          slow start threshold. */
  679.       if (pcb->flags & TF_INFR) {
  680.         pcb->flags &= ~TF_INFR;
  681.         pcb->cwnd = pcb->ssthresh;
  682.       }
  683.       /* Reset the number of retransmissions. */
  684.       pcb->nrtx = 0;
  685.       /* Reset the retransmission time-out. */
  686.       pcb->rto = (pcb->sa >> 3) + pcb->sv;
  687.       /* Update the send buffer space. */
  688.       pcb->acked = ackno - pcb->lastack;
  689.       pcb->snd_buf += pcb->acked;
  690.       /* Reset the fast retransmit variables. */
  691.       pcb->dupacks = 0;
  692.       pcb->lastack = ackno;
  693.       /* Update the congestion control variables (cwnd and
  694.          ssthresh). */
  695.       if (pcb->state >= ESTABLISHED) {
  696.         if (pcb->cwnd < pcb->ssthresh) {
  697.           if ((u16_t)(pcb->cwnd + pcb->mss) > pcb->cwnd) {
  698.             pcb->cwnd += pcb->mss;
  699.           }
  700.           LWIP_DEBUGF(TCP_CWND_DEBUG, ("tcp_receive: slow start cwnd %un", pcb->cwnd));
  701.         } else {
  702.           u16_t new_cwnd = (pcb->cwnd + pcb->mss * pcb->mss / pcb->cwnd);
  703.           if (new_cwnd > pcb->cwnd) {
  704.             pcb->cwnd = new_cwnd;
  705.           }
  706.           LWIP_DEBUGF(TCP_CWND_DEBUG, ("tcp_receive: congestion avoidance cwnd %un", pcb->cwnd));
  707.         }
  708.       }
  709.       LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_receive: ACK for %lu, unacked->seqno %lu:%lun",
  710.                                     ackno,
  711.                                     pcb->unacked != NULL?
  712.                                     ntohl(pcb->unacked->tcphdr->seqno): 0,
  713.                                     pcb->unacked != NULL?
  714.                                     ntohl(pcb->unacked->tcphdr->seqno) + TCP_TCPLEN(pcb->unacked): 0));
  715.       /* Remove segment from the unacknowledged list if the incoming
  716.          ACK acknowlegdes them. */
  717.       while (pcb->unacked != NULL &&
  718.              TCP_SEQ_LEQ(ntohl(pcb->unacked->tcphdr->seqno) +
  719.                          TCP_TCPLEN(pcb->unacked), ackno)) {
  720.         LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_receive: removing %lu:%lu from pcb->unackedn",
  721.                                       ntohl(pcb->unacked->tcphdr->seqno),
  722.                                       ntohl(pcb->unacked->tcphdr->seqno) +
  723.                                       TCP_TCPLEN(pcb->unacked)));
  724.         next = pcb->unacked;
  725.         pcb->unacked = pcb->unacked->next;
  726.         LWIP_DEBUGF(TCP_QLEN_DEBUG, ("tcp_receive: queuelen %u ... ", (unsigned int)pcb->snd_queuelen));
  727.         pcb->snd_queuelen -= pbuf_clen(next->p);
  728.         tcp_seg_free(next);
  729.         LWIP_DEBUGF(TCP_QLEN_DEBUG, ("%u (after freeing unacked)n", (unsigned int)pcb->snd_queuelen));
  730.         if (pcb->snd_queuelen != 0) {
  731.           LWIP_ASSERT("tcp_receive: valid queue length", pcb->unacked != NULL ||
  732.                       pcb->unsent != NULL);
  733.         }
  734.       }
  735.       pcb->polltmr = 0;
  736.     }
  737.     /* We go through the ->unsent list to see if any of the segments
  738.        on the list are acknowledged by the ACK. This may seem
  739.        strange since an "unsent" segment shouldn't be acked. The
  740.        rationale is that lwIP puts all outstanding segments on the
  741.        ->unsent list after a retransmission, so these segments may
  742.        in fact have been sent once. */
  743.     while (pcb->unsent != NULL &&
  744.            /*TCP_SEQ_LEQ(ntohl(pcb->unsent->tcphdr->seqno) + TCP_TCPLEN(pcb->unsent), ackno) &&
  745.              TCP_SEQ_LEQ(ackno, pcb->snd_max)*/
  746.            TCP_SEQ_BETWEEN(ackno, ntohl(pcb->unsent->tcphdr->seqno) + TCP_TCPLEN(pcb->unsent), pcb->snd_max)
  747.            ) {
  748.       LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_receive: removing %lu:%lu from pcb->unsentn",
  749.                                     ntohl(pcb->unsent->tcphdr->seqno), ntohl(pcb->unsent->tcphdr->seqno) +
  750.                                     TCP_TCPLEN(pcb->unsent)));
  751.       next = pcb->unsent;
  752.       pcb->unsent = pcb->unsent->next;
  753.       LWIP_DEBUGF(TCP_QLEN_DEBUG, ("tcp_receive: queuelen %u ... ", (unsigned int)pcb->snd_queuelen));
  754.       pcb->snd_queuelen -= pbuf_clen(next->p);
  755.       tcp_seg_free(next);
  756.       LWIP_DEBUGF(TCP_QLEN_DEBUG, ("%u (after freeing unsent)n", (unsigned int)pcb->snd_queuelen));
  757.       if (pcb->snd_queuelen != 0) {
  758.         LWIP_ASSERT("tcp_receive: valid queue length",
  759.           pcb->unacked != NULL || pcb->unsent != NULL);
  760.       }
  761.       if (pcb->unsent != NULL) {
  762.         pcb->snd_nxt = htonl(pcb->unsent->tcphdr->seqno);
  763.       }
  764.     }
  765.     /* End of ACK for new data processing. */
  766.     LWIP_DEBUGF(TCP_RTO_DEBUG, ("tcp_receive: pcb->rttest %u rtseq %lu ackno %lun",
  767.                                 pcb->rttest, pcb->rtseq, ackno));
  768.     /* RTT estimation calculations. This is done by checking if the
  769.        incoming segment acknowledges the segment we use to take a
  770.        round-trip time measurement. */
  771.     if (pcb->rttest && TCP_SEQ_LT(pcb->rtseq, ackno)) {
  772.       m = tcp_ticks - pcb->rttest;
  773.       LWIP_DEBUGF(TCP_RTO_DEBUG, ("tcp_receive: experienced rtt %u ticks (%u msec).n",
  774.                                   m, m * TCP_SLOW_INTERVAL));
  775.       /* This is taken directly from VJs original code in his paper */
  776.       m = m - (pcb->sa >> 3);
  777.       pcb->sa += m;
  778.       if (m < 0) {
  779.         m = -m;
  780.       }
  781.       m = m - (pcb->sv >> 2);
  782.       pcb->sv += m;
  783.       pcb->rto = (pcb->sa >> 3) + pcb->sv;
  784.       LWIP_DEBUGF(TCP_RTO_DEBUG, ("tcp_receive: RTO %u (%u miliseconds)n",
  785.                                   pcb->rto, pcb->rto * TCP_SLOW_INTERVAL));
  786.       pcb->rttest = 0;
  787.     }
  788.   }
  789.   /* If the incoming segment contains data, we must process it
  790.      further. */
  791.   if (tcplen > 0) {
  792.     /* This code basically does three things:
  793.     +) If the incoming segment contains data that is the next
  794.     in-sequence data, this data is passed to the application. This
  795.     might involve trimming the first edge of the data. The rcv_nxt
  796.     variable and the advertised window are adjusted.
  797.     +) If the incoming segment has data that is above the next
  798.     sequence number expected (->rcv_nxt), the segment is placed on
  799.     the ->ooseq queue. This is done by finding the appropriate
  800.     place in the ->ooseq queue (which is ordered by sequence
  801.     number) and trim the segment in both ends if needed. An
  802.     immediate ACK is sent to indicate that we received an
  803.     out-of-sequence segment.
  804.     +) Finally, we check if the first segment on the ->ooseq queue
  805.     now is in sequence (i.e., if rcv_nxt >= ooseq->seqno). If
  806.     rcv_nxt > ooseq->seqno, we must trim the first edge of the
  807.     segment on ->ooseq before we adjust rcv_nxt. The data in the
  808.     segments that are now on sequence are chained onto the
  809.     incoming segment so that we only need to call the application
  810.     once.
  811.     */
  812.     /* First, we check if we must trim the first edge. We have to do
  813.        this if the sequence number of the incoming segment is less
  814.        than rcv_nxt, and the sequence number plus the length of the
  815.        segment is larger than rcv_nxt. */
  816.     /*    if (TCP_SEQ_LT(seqno, pcb->rcv_nxt)){
  817.           if (TCP_SEQ_LT(pcb->rcv_nxt, seqno + tcplen)) {*/
  818.     if(TCP_SEQ_BETWEEN(pcb->rcv_nxt, seqno+1, seqno+tcplen-1)){
  819.       /* Trimming the first edge is done by pushing the payload
  820.          pointer in the pbuf downwards. This is somewhat tricky since
  821.          we do not want to discard the full contents of the pbuf up to
  822.          the new starting point of the data since we have to keep the
  823.          TCP header which is present in the first pbuf in the chain.
  824.          
  825.          What is done is really quite a nasty hack: the first pbuf in
  826.          the pbuf chain is pointed to by inseg.p. Since we need to be
  827.          able to deallocate the whole pbuf, we cannot change this
  828.          inseg.p pointer to point to any of the later pbufs in the
  829.          chain. Instead, we point the ->payload pointer in the first
  830.          pbuf to data in one of the later pbufs. We also set the
  831.          inseg.data pointer to point to the right place. This way, the
  832.          ->p pointer will still point to the first pbuf, but the
  833.          ->p->payload pointer will point to data in another pbuf.
  834.          
  835.          After we are done with adjusting the pbuf pointers we must
  836.          adjust the ->data pointer in the seg and the segment
  837.          length.*/
  838.       
  839.       off = pcb->rcv_nxt - seqno;
  840.       p = inseg.p;
  841.       if (inseg.p->len < off) {
  842.         new_tot_len = inseg.p->tot_len - off;
  843.         while (p->len < off) {
  844.           off -= p->len;
  845.           /* KJM following line changed (with addition of new_tot_len var)
  846.              to fix bug #9076
  847.              inseg.p->tot_len -= p->len; */
  848.           p->tot_len = new_tot_len;
  849.           p->len = 0;
  850.           p = p->next;
  851.         }
  852.         pbuf_header(p, -off);
  853.       } else {
  854.         pbuf_header(inseg.p, -off);
  855.       }
  856.       /* KJM following line changed to use p->payload rather than inseg->p->payload
  857.          to fix bug #9076 */
  858.       inseg.dataptr = p->payload;
  859.       inseg.len -= pcb->rcv_nxt - seqno;
  860.       inseg.tcphdr->seqno = seqno = pcb->rcv_nxt;
  861.     }
  862.     else{
  863.       if(TCP_SEQ_LT(seqno, pcb->rcv_nxt)){
  864.         /* the whole segment is < rcv_nxt */
  865.         /* must be a duplicate of a packet that has already been correctly handled */
  866.         
  867.         LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_receive: duplicate seqno %lun", seqno));
  868.         tcp_ack_now(pcb);
  869.       }
  870.     }
  871.     /* The sequence number must be within the window (above rcv_nxt
  872.        and below rcv_nxt + rcv_wnd) in order to be further
  873.        processed. */
  874.     /*if (TCP_SEQ_GEQ(seqno, pcb->rcv_nxt) &&
  875.       TCP_SEQ_LT(seqno, pcb->rcv_nxt + pcb->rcv_wnd)) {*/
  876.     if(TCP_SEQ_BETWEEN(seqno, pcb->rcv_nxt, pcb->rcv_nxt + pcb->rcv_wnd - 1)){
  877.       if (pcb->rcv_nxt == seqno) {
  878.         /* The incoming segment is the next in sequence. We check if
  879.            we have to trim the end of the segment and update rcv_nxt
  880.            and pass the data to the application. */
  881. #if TCP_QUEUE_OOSEQ
  882.         if (pcb->ooseq != NULL &&
  883.             TCP_SEQ_LEQ(pcb->ooseq->tcphdr->seqno, seqno + inseg.len)) {
  884.           /* We have to trim the second edge of the incoming
  885.              segment. */
  886.           inseg.len = pcb->ooseq->tcphdr->seqno - seqno;
  887.           pbuf_realloc(inseg.p, inseg.len);
  888.         }
  889. #endif /* TCP_QUEUE_OOSEQ */
  890.         tcplen = TCP_TCPLEN(&inseg);
  891.         pcb->rcv_nxt += tcplen;
  892.         /* Update the receiver's (our) window. */
  893.         if (pcb->rcv_wnd < tcplen) {
  894.           pcb->rcv_wnd = 0;
  895.         } else {
  896.           pcb->rcv_wnd -= tcplen;
  897.         }
  898.         /* If there is data in the segment, we make preparations to
  899.            pass this up to the application. The ->recv_data variable
  900.            is used for holding the pbuf that goes to the
  901.            application. The code for reassembling out-of-sequence data
  902.            chains its data on this pbuf as well.
  903.            If the segment was a FIN, we set the TF_GOT_FIN flag that will
  904.            be used to indicate to the application that the remote side has
  905.            closed its end of the connection. */
  906.         if (inseg.p->tot_len > 0) {
  907.           recv_data = inseg.p;
  908.           /* Since this pbuf now is the responsibility of the
  909.              application, we delete our reference to it so that we won't
  910.              (mistakingly) deallocate it. */
  911.           inseg.p = NULL;
  912.         }
  913.         if (TCPH_FLAGS(inseg.tcphdr) & TCP_FIN) {
  914.           LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_receive: received FIN.n"));
  915.           recv_flags = TF_GOT_FIN;
  916.         }
  917. #if TCP_QUEUE_OOSEQ
  918.         /* We now check if we have segments on the ->ooseq queue that
  919.            is now in sequence. */
  920.         while (pcb->ooseq != NULL &&
  921.                pcb->ooseq->tcphdr->seqno == pcb->rcv_nxt) {
  922.           cseg = pcb->ooseq;
  923.           seqno = pcb->ooseq->tcphdr->seqno;
  924.           pcb->rcv_nxt += TCP_TCPLEN(cseg);
  925.           if (pcb->rcv_wnd < TCP_TCPLEN(cseg)) {
  926.             pcb->rcv_wnd = 0;
  927.           } else {
  928.             pcb->rcv_wnd -= TCP_TCPLEN(cseg);
  929.           }
  930.           if (cseg->p->tot_len > 0) {
  931.             /* Chain this pbuf onto the pbuf that we will pass to
  932.                the application. */
  933.             if (recv_data) {
  934.               pbuf_cat(recv_data, cseg->p);
  935.             } else {
  936.               recv_data = cseg->p;
  937.             }
  938.             cseg->p = NULL;
  939.           }
  940.           if (TCPH_FLAGS(cseg->tcphdr) & TCP_FIN) {
  941.             LWIP_DEBUGF(TCP_INPUT_DEBUG, ("tcp_receive: dequeued FIN.n"));
  942.             recv_flags = TF_GOT_FIN;
  943.           }
  944.           pcb->ooseq = cseg->next;
  945.           tcp_seg_free(cseg);
  946.         }
  947. #endif /* TCP_QUEUE_OOSEQ */
  948.         /* Acknowledge the segment(s). */
  949.         tcp_ack(pcb);
  950.       } else {
  951.         /* We get here if the incoming segment is out-of-sequence. */
  952.         tcp_ack_now(pcb);
  953. #if TCP_QUEUE_OOSEQ
  954.         /* We queue the segment on the ->ooseq queue. */
  955.         if (pcb->ooseq == NULL) {
  956.           pcb->ooseq = tcp_seg_copy(&inseg);
  957.         } else {
  958.           /* If the queue is not empty, we walk through the queue and
  959.              try to find a place where the sequence number of the
  960.              incoming segment is between the sequence numbers of the
  961.              previous and the next segment on the ->ooseq queue. That is
  962.              the place where we put the incoming segment. If needed, we
  963.              trim the second edges of the previous and the incoming
  964.              segment so that it will fit into the sequence.
  965.              If the incoming segment has the same sequence number as a
  966.              segment on the ->ooseq queue, we discard the segment that
  967.              contains less data. */
  968.           prev = NULL;
  969.           for(next = pcb->ooseq; next != NULL; next = next->next) {
  970.             if (seqno == next->tcphdr->seqno) {
  971.               /* The sequence number of the incoming segment is the
  972.                  same as the sequence number of the segment on
  973.                  ->ooseq. We check the lengths to see which one to
  974.                  discard. */
  975.               if (inseg.len > next->len) {
  976.                 /* The incoming segment is larger than the old
  977.                    segment. We replace the old segment with the new
  978.                    one. */
  979.                 cseg = tcp_seg_copy(&inseg);
  980.                 if (cseg != NULL) {
  981.                   cseg->next = next->next;
  982.                   if (prev != NULL) {
  983.                     prev->next = cseg;
  984.                   } else {
  985.                     pcb->ooseq = cseg;
  986.                   }
  987.                 }
  988.                 break;
  989.               } else {
  990.                 /* Either the lenghts are the same or the incoming
  991.                    segment was smaller than the old one; in either
  992.                    case, we ditch the incoming segment. */
  993.                 break;
  994.               }
  995.             } else {
  996.               if (prev == NULL) {
  997.                 if (TCP_SEQ_LT(seqno, next->tcphdr->seqno)) {
  998.                   /* The sequence number of the incoming segment is lower
  999.                      than the sequence number of the first segment on the
  1000.                      queue. We put the incoming segment first on the
  1001.                      queue. */
  1002.                   if (TCP_SEQ_GT(seqno + inseg.len, next->tcphdr->seqno)) {
  1003.                     /* We need to trim the incoming segment. */
  1004.                     inseg.len = next->tcphdr->seqno - seqno;
  1005.                     pbuf_realloc(inseg.p, inseg.len);
  1006.                   }
  1007.                   cseg = tcp_seg_copy(&inseg);
  1008.                   if (cseg != NULL) {
  1009.                     cseg->next = next;
  1010.                     pcb->ooseq = cseg;
  1011.                   }
  1012.                   break;
  1013.                 }
  1014.               } else 
  1015.                 /*if (TCP_SEQ_LT(prev->tcphdr->seqno, seqno) &&
  1016.                   TCP_SEQ_LT(seqno, next->tcphdr->seqno)) {*/
  1017.                 if(TCP_SEQ_BETWEEN(seqno, prev->tcphdr->seqno+1, next->tcphdr->seqno-1)){
  1018.                 /* The sequence number of the incoming segment is in
  1019.                    between the sequence numbers of the previous and
  1020.                    the next segment on ->ooseq. We trim and insert the
  1021.                    incoming segment and trim the previous segment, if
  1022.                    needed. */
  1023.                 if (TCP_SEQ_GT(seqno + inseg.len, next->tcphdr->seqno)) {
  1024.                   /* We need to trim the incoming segment. */
  1025.                   inseg.len = next->tcphdr->seqno - seqno;
  1026.                   pbuf_realloc(inseg.p, inseg.len);
  1027.                 }
  1028.                 cseg = tcp_seg_copy(&inseg);
  1029.                 if (cseg != NULL) {
  1030.                   cseg->next = next;
  1031.                   prev->next = cseg;
  1032.                   if (TCP_SEQ_GT(prev->tcphdr->seqno + prev->len, seqno)) {
  1033.                     /* We need to trim the prev segment. */
  1034.                     prev->len = seqno - prev->tcphdr->seqno;
  1035.                     pbuf_realloc(prev->p, prev->len);
  1036.                   }
  1037.                 }
  1038.                 break;
  1039.               }
  1040.               /* If the "next" segment is the last segment on the
  1041.                  ooseq queue, we add the incoming segment to the end
  1042.                  of the list. */
  1043.               if (next->next == NULL &&
  1044.                   TCP_SEQ_GT(seqno, next->tcphdr->seqno)) {
  1045.                 next->next = tcp_seg_copy(&inseg);
  1046.                 if (next->next != NULL) {
  1047.                   if (TCP_SEQ_GT(next->tcphdr->seqno + next->len, seqno)) {
  1048.                     /* We need to trim the last segment. */
  1049.                     next->len = seqno - next->tcphdr->seqno;
  1050.                     pbuf_realloc(next->p, next->len);
  1051.                   }
  1052.                 }
  1053.                 break;
  1054.               }
  1055.             }
  1056.             prev = next;
  1057.           }
  1058.         }
  1059. #endif /* TCP_QUEUE_OOSEQ */
  1060.       }
  1061.     } else {
  1062.       /*if (TCP_SEQ_GT(pcb->rcv_nxt, seqno) ||
  1063.         TCP_SEQ_GEQ(seqno, pcb->rcv_nxt + pcb->rcv_wnd)) {*/
  1064.       if(!TCP_SEQ_BETWEEN(seqno, pcb->rcv_nxt, pcb->rcv_nxt + pcb->rcv_wnd-1)){
  1065.         tcp_ack_now(pcb);
  1066.       }
  1067.     }
  1068.   } else {
  1069.     /* Segments with length 0 is taken care of here. Segments that
  1070.        fall out of the window are ACKed. */
  1071.     /*if (TCP_SEQ_GT(pcb->rcv_nxt, seqno) ||
  1072.       TCP_SEQ_GEQ(seqno, pcb->rcv_nxt + pcb->rcv_wnd)) {*/
  1073.     if(!TCP_SEQ_BETWEEN(seqno, pcb->rcv_nxt, pcb->rcv_nxt + pcb->rcv_wnd-1)){
  1074.       tcp_ack_now(pcb);
  1075.     }
  1076.   }
  1077. }
  1078. /*
  1079.  * tcp_parseopt:
  1080.  *
  1081.  * Parses the options contained in the incoming segment. (Code taken
  1082.  * from uIP with only small changes.)
  1083.  *
  1084.  */
  1085. static void
  1086. tcp_parseopt(struct tcp_pcb *pcb)
  1087. {
  1088.   u8_t c;
  1089.   u8_t *opts, opt;
  1090.   u16_t mss;
  1091.   opts = (u8_t *)tcphdr + TCP_HLEN;
  1092.   /* Parse the TCP MSS option, if present. */
  1093.   if(TCPH_HDRLEN(tcphdr) > 0x5) {
  1094.     for(c = 0; c < (TCPH_HDRLEN(tcphdr) - 5) << 2 ;) {
  1095.       opt = opts[c];
  1096.       if (opt == 0x00) {
  1097.         /* End of options. */
  1098.   break;
  1099.       } else if (opt == 0x01) {
  1100.         ++c;
  1101.         /* NOP option. */
  1102.       } else if (opt == 0x02 &&
  1103.         opts[c + 1] == 0x04) {
  1104.         /* An MSS option with the right option length. */
  1105.         mss = (opts[c + 2] << 8) | opts[c + 3];
  1106.         pcb->mss = mss > TCP_MSS? TCP_MSS: mss;
  1107.         /* And we are done processing options. */
  1108.         break;
  1109.       } else {
  1110.   if (opts[c + 1] == 0) {
  1111.           /* If the length field is zero, the options are malformed
  1112.              and we don't process them further. */
  1113.           break;
  1114.         }
  1115.         /* All other options have a length field, so that we easily
  1116.            can skip past them. */
  1117.         c += opts[c + 1];
  1118.       }
  1119.     }
  1120.   }
  1121. }
  1122. #endif /* LWIP_TCP */