Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
ruanhaishen
Nodemcu Firmware
Commits
c674d191
Commit
c674d191
authored
Oct 01, 2015
by
Johny Mattsson
Browse files
Upgraded open-source LWIP.
From Espressif's lwip_open_src_template_proj_for_v1.3.0.zip
parent
c1cd58e0
Changes
51
Show whitespace changes
Inline
Side-by-side
app/lwip/core/pbuf.c
View file @
c674d191
...
@@ -80,7 +80,7 @@
...
@@ -80,7 +80,7 @@
#include <string.h>
#include <string.h>
#ifdef EBUF_LWIP
#ifdef EBUF_LWIP
#
include "pp/esf_buf.h"
#
define EP_OFFSET 36
#else
#else
#define EP_OFFSET 0
#define EP_OFFSET 0
#endif
/* ESF_LWIP */
#endif
/* ESF_LWIP */
...
@@ -329,6 +329,7 @@ pbuf_alloc(pbuf_layer layer, u16_t length, pbuf_type type)
...
@@ -329,6 +329,7 @@ pbuf_alloc(pbuf_layer layer, u16_t length, pbuf_type type)
p
->
len
=
p
->
tot_len
=
length
;
p
->
len
=
p
->
tot_len
=
length
;
p
->
next
=
NULL
;
p
->
next
=
NULL
;
p
->
type
=
type
;
p
->
type
=
type
;
p
->
eb
=
NULL
;
LWIP_ASSERT
(
"pbuf_alloc: pbuf->payload properly aligned"
,
LWIP_ASSERT
(
"pbuf_alloc: pbuf->payload properly aligned"
,
((
mem_ptr_t
)
p
->
payload
%
MEM_ALIGNMENT
)
==
0
);
((
mem_ptr_t
)
p
->
payload
%
MEM_ALIGNMENT
)
==
0
);
...
@@ -363,6 +364,7 @@ pbuf_alloc(pbuf_layer layer, u16_t length, pbuf_type type)
...
@@ -363,6 +364,7 @@ pbuf_alloc(pbuf_layer layer, u16_t length, pbuf_type type)
/* set flags */
/* set flags */
p
->
flags
=
0
;
p
->
flags
=
0
;
LWIP_DEBUGF
(
PBUF_DEBUG
|
LWIP_DBG_TRACE
,
(
"pbuf_alloc(length=%"
U16_F
") == %p
\n
"
,
length
,
(
void
*
)
p
));
LWIP_DEBUGF
(
PBUF_DEBUG
|
LWIP_DBG_TRACE
,
(
"pbuf_alloc(length=%"
U16_F
") == %p
\n
"
,
length
,
(
void
*
)
p
));
return
p
;
return
p
;
}
}
...
@@ -1204,7 +1206,7 @@ pbuf_strstr(struct pbuf* p, const char* substr)
...
@@ -1204,7 +1206,7 @@ pbuf_strstr(struct pbuf* p, const char* substr)
if
((
substr
==
NULL
)
||
(
substr
[
0
]
==
0
)
||
(
p
->
tot_len
==
0xFFFF
))
{
if
((
substr
==
NULL
)
||
(
substr
[
0
]
==
0
)
||
(
p
->
tot_len
==
0xFFFF
))
{
return
0xFFFF
;
return
0xFFFF
;
}
}
substr_len
=
strlen
(
substr
);
substr_len
=
os_
strlen
(
substr
);
if
(
substr_len
>=
0xFFFF
)
{
if
(
substr_len
>=
0xFFFF
)
{
return
0xFFFF
;
return
0xFFFF
;
}
}
...
...
app/lwip/core/raw.c
View file @
c674d191
...
@@ -342,7 +342,7 @@ raw_new(u8_t proto)
...
@@ -342,7 +342,7 @@ raw_new(u8_t proto)
/* could allocate RAW PCB? */
/* could allocate RAW PCB? */
if
(
pcb
!=
NULL
)
{
if
(
pcb
!=
NULL
)
{
/* initialize PCB to all zeroes */
/* initialize PCB to all zeroes */
memset
(
pcb
,
0
,
sizeof
(
struct
raw_pcb
));
os_
memset
(
pcb
,
0
,
sizeof
(
struct
raw_pcb
));
pcb
->
protocol
=
proto
;
pcb
->
protocol
=
proto
;
pcb
->
ttl
=
RAW_TTL
;
pcb
->
ttl
=
RAW_TTL
;
pcb
->
next
=
raw_pcbs
;
pcb
->
next
=
raw_pcbs
;
...
...
app/lwip/core/sntp.c
0 → 100644
View file @
c674d191
/**
* @file
* SNTP client module
*
* This is simple "SNTP" client for the lwIP raw API.
* It is a minimal implementation of SNTPv4 as specified in RFC 4330.
*
* For a list of some public NTP servers, see this link :
* http://support.ntp.org/bin/view/Servers/NTPPoolServers
*
* @todo:
* - set/change servers at runtime
* - complete SNTP_CHECK_RESPONSE checks 3 and 4
* - support broadcast/multicast mode?
*/
/*
* 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 part of the lwIP TCP/IP stack.
*
* Author: Simon Goldschmidt (lwIP raw API part)
*/
#include "lwip/sntp.h"
#include "osapi.h"
#include "os_type.h"
#include "lwip/opt.h"
#include "lwip/timers.h"
#include "lwip/udp.h"
#include "lwip/dns.h"
#include "lwip/ip_addr.h"
#include "lwip/pbuf.h"
//#include <string.h>
#if LWIP_UDP
/**
* SNTP_DEBUG: Enable debugging for SNTP.
*/
#ifndef SNTP_DEBUG
#define SNTP_DEBUG LWIP_DBG_ON
#endif
/** SNTP server port */
#ifndef SNTP_PORT
#define SNTP_PORT 123
#endif
/** Set this to 1 to allow config of SNTP server(s) by DNS name */
#ifndef SNTP_SERVER_DNS
#define SNTP_SERVER_DNS 0
#endif
/** Handle support for more than one server via NTP_MAX_SERVERS,
* but catch legacy style of setting SNTP_SUPPORT_MULTIPLE_SERVERS, probably outside of this file
*/
#ifndef SNTP_SUPPORT_MULTIPLE_SERVERS
#if SNTP_MAX_SERVERS > 1
#define SNTP_SUPPORT_MULTIPLE_SERVERS 1
#else
/* NTP_MAX_SERVERS > 1 */
#define SNTP_SUPPORT_MULTIPLE_SERVERS 0
#endif
/* NTP_MAX_SERVERS > 1 */
#else
/* SNTP_SUPPORT_MULTIPLE_SERVERS */
/* The developer has defined SNTP_SUPPORT_MULTIPLE_SERVERS, probably from old code */
#if SNTP_MAX_SERVERS <= 1
#error "SNTP_MAX_SERVERS needs to be defined to the max amount of servers if SNTP_SUPPORT_MULTIPLE_SERVERS is defined"
#endif
/* SNTP_MAX_SERVERS <= 1 */
#endif
/* SNTP_SUPPORT_MULTIPLE_SERVERS */
/** Sanity check:
* Define this to
* - 0 to turn off sanity checks (default; smaller code)
* - >= 1 to check address and port of the response packet to ensure the
* response comes from the server we sent the request to.
* - >= 2 to check returned Originate Timestamp against Transmit Timestamp
* sent to the server (to ensure response to older request).
* - >= 3 @todo: discard reply if any of the LI, Stratum, or Transmit Timestamp
* fields is 0 or the Mode field is not 4 (unicast) or 5 (broadcast).
* - >= 4 @todo: to check that the Root Delay and Root Dispersion fields are each
* greater than or equal to 0 and less than infinity, where infinity is
* currently a cozy number like one second. This check avoids using a
* server whose synchronization source has expired for a very long time.
*/
#ifndef SNTP_CHECK_RESPONSE
#define SNTP_CHECK_RESPONSE 0
#endif
/** According to the RFC, this shall be a random delay
* between 1 and 5 minutes (in milliseconds) to prevent load peaks.
* This can be defined to a random generation function,
* which must return the delay in milliseconds as u32_t.
* Turned off by default.
*/
#ifndef SNTP_STARTUP_DELAY
#define SNTP_STARTUP_DELAY 0
#endif
/** If you want the startup delay to be a function, define this
* to a function (including the brackets) and define SNTP_STARTUP_DELAY to 1.
*/
#ifndef SNTP_STARTUP_DELAY_FUNC
#define SNTP_STARTUP_DELAY_FUNC SNTP_STARTUP_DELAY
#endif
/** SNTP receive timeout - in milliseconds
* Also used as retry timeout - this shouldn't be too low.
* Default is 3 seconds.
*/
#ifndef SNTP_RECV_TIMEOUT
#define SNTP_RECV_TIMEOUT 3000
#endif
/** SNTP update delay - in milliseconds
* Default is 1 hour.
*/
#ifndef SNTP_UPDATE_DELAY
#define SNTP_UPDATE_DELAY 3600000
#endif
#if (SNTP_UPDATE_DELAY < 15000) && !SNTP_SUPPRESS_DELAY_CHECK
#error "SNTPv4 RFC 4330 enforces a minimum update time of 15 seconds!"
#endif
/** SNTP macro to change system time and/or the update the RTC clock */
#ifndef SNTP_SET_SYSTEM_TIME
#define SNTP_SET_SYSTEM_TIME(sec) ((void)sec)
#endif
/** SNTP macro to change system time including microseconds */
#ifdef SNTP_SET_SYSTEM_TIME_US
#define SNTP_CALC_TIME_US 1
#define SNTP_RECEIVE_TIME_SIZE 2
#else
#define SNTP_SET_SYSTEM_TIME_US(sec, us)
#define SNTP_CALC_TIME_US 0
#define SNTP_RECEIVE_TIME_SIZE 1
#endif
/** SNTP macro to get system time, used with SNTP_CHECK_RESPONSE >= 2
* to send in request and compare in response.
*/
#ifndef SNTP_GET_SYSTEM_TIME
#define SNTP_GET_SYSTEM_TIME(sec, us) do { (sec) = 0; (us) = 0; } while(0)
#endif
/** Default retry timeout (in milliseconds) if the response
* received is invalid.
* This is doubled with each retry until SNTP_RETRY_TIMEOUT_MAX is reached.
*/
#ifndef SNTP_RETRY_TIMEOUT
#define SNTP_RETRY_TIMEOUT SNTP_RECV_TIMEOUT
#endif
/** Maximum retry timeout (in milliseconds). */
#ifndef SNTP_RETRY_TIMEOUT_MAX
#define SNTP_RETRY_TIMEOUT_MAX (SNTP_RETRY_TIMEOUT * 10)
#endif
/** Increase retry timeout with every retry sent
* Default is on to conform to RFC.
*/
#ifndef SNTP_RETRY_TIMEOUT_EXP
#define SNTP_RETRY_TIMEOUT_EXP 1
#endif
/* the various debug levels for this file */
#define SNTP_DEBUG_TRACE (SNTP_DEBUG | LWIP_DBG_TRACE)
#define SNTP_DEBUG_STATE (SNTP_DEBUG | LWIP_DBG_STATE)
#define SNTP_DEBUG_WARN (SNTP_DEBUG | LWIP_DBG_LEVEL_WARNING)
#define SNTP_DEBUG_WARN_STATE (SNTP_DEBUG | LWIP_DBG_LEVEL_WARNING | LWIP_DBG_STATE)
#define SNTP_DEBUG_SERIOUS (SNTP_DEBUG | LWIP_DBG_LEVEL_SERIOUS)
#define SNTP_ERR_KOD 1
/* SNTP protocol defines */
#define SNTP_MSG_LEN 48
#define SNTP_OFFSET_LI_VN_MODE 0
#define SNTP_LI_MASK 0xC0
#define SNTP_LI_NO_WARNING 0x00
#define SNTP_LI_LAST_MINUTE_61_SEC 0x01
#define SNTP_LI_LAST_MINUTE_59_SEC 0x02
#define SNTP_LI_ALARM_CONDITION 0x03
/* (clock not synchronized) */
#define SNTP_VERSION_MASK 0x38
#define SNTP_VERSION (4
/* NTP Version 4*/
<<3)
#define SNTP_MODE_MASK 0x07
#define SNTP_MODE_CLIENT 0x03
#define SNTP_MODE_SERVER 0x04
#define SNTP_MODE_BROADCAST 0x05
#define SNTP_OFFSET_STRATUM 1
#define SNTP_STRATUM_KOD 0x00
#define SNTP_OFFSET_ORIGINATE_TIME 24
#define SNTP_OFFSET_RECEIVE_TIME 32
#define SNTP_OFFSET_TRANSMIT_TIME 40
/* number of seconds between 1900 and 1970 */
#define DIFF_SEC_1900_1970 (2208988800UL)
/**
* SNTP packet format (without optional fields)
* Timestamps are coded as 64 bits:
* - 32 bits seconds since Jan 01, 1970, 00:00
* - 32 bits seconds fraction (0-padded)
* For future use, if the MSB in the seconds part is set, seconds are based
* on Feb 07, 2036, 06:28:16.
*/
#ifdef PACK_STRUCT_USE_INCLUDES
# include "arch/bpstruct.h"
#endif
PACK_STRUCT_BEGIN
#define PACK_STRUCT_FLD_8 PACK_STRUCT_FIELD
struct
sntp_msg
{
PACK_STRUCT_FLD_8
(
u8_t
li_vn_mode
);
PACK_STRUCT_FLD_8
(
u8_t
stratum
);
PACK_STRUCT_FLD_8
(
u8_t
poll
);
PACK_STRUCT_FLD_8
(
u8_t
precision
);
PACK_STRUCT_FIELD
(
u32_t
root_delay
);
PACK_STRUCT_FIELD
(
u32_t
root_dispersion
);
PACK_STRUCT_FIELD
(
u32_t
reference_identifier
);
PACK_STRUCT_FIELD
(
u32_t
reference_timestamp
[
2
]);
PACK_STRUCT_FIELD
(
u32_t
originate_timestamp
[
2
]);
PACK_STRUCT_FIELD
(
u32_t
receive_timestamp
[
2
]);
PACK_STRUCT_FIELD
(
u32_t
transmit_timestamp
[
2
]);
}
PACK_STRUCT_STRUCT
;
PACK_STRUCT_END
#ifdef PACK_STRUCT_USE_INCLUDES
# include "arch/epstruct.h"
#endif
/* function prototypes */
static
void
sntp_request
(
void
*
arg
);
/** The UDP pcb used by the SNTP client */
static
struct
udp_pcb
*
sntp_pcb
;
sint8
time_zone
=
8
;
/** Names/Addresses of servers */
struct
sntp_server
{
#if SNTP_SERVER_DNS
char
*
name
;
#endif
/* SNTP_SERVER_DNS */
ip_addr_t
addr
;
};
static
struct
sntp_server
sntp_servers
[
SNTP_MAX_SERVERS
];
static
u8_t
sntp_set_servers_from_dhcp
;
#if SNTP_SUPPORT_MULTIPLE_SERVERS
/** The currently used server (initialized to 0) */
static
u8_t
sntp_current_server
;
#else
/* SNTP_SUPPORT_MULTIPLE_SERVERS */
#define sntp_current_server 0
#endif
/* SNTP_SUPPORT_MULTIPLE_SERVERS */
#if SNTP_RETRY_TIMEOUT_EXP
#define SNTP_RESET_RETRY_TIMEOUT() sntp_retry_timeout = SNTP_RETRY_TIMEOUT
/** Retry time, initialized with SNTP_RETRY_TIMEOUT and doubled with each retry. */
static
u32_t
sntp_retry_timeout
;
#else
/* SNTP_RETRY_TIMEOUT_EXP */
#define SNTP_RESET_RETRY_TIMEOUT()
#define sntp_retry_timeout SNTP_RETRY_TIMEOUT
#endif
/* SNTP_RETRY_TIMEOUT_EXP */
#if SNTP_CHECK_RESPONSE >= 1
/** Saves the last server address to compare with response */
static
ip_addr_t
sntp_last_server_address
;
#endif
/* SNTP_CHECK_RESPONSE >= 1 */
#if SNTP_CHECK_RESPONSE >= 2
/** Saves the last timestamp sent (which is sent back by the server)
* to compare against in response */
static
u32_t
sntp_last_timestamp_sent
[
2
];
#endif
/* SNTP_CHECK_RESPONSE >= 2 */
typedef
long
time_t
;
//uint32 current_stamp_1 = 0;
//uint32 current_stamp_2 = 0;
uint32
realtime_stamp
=
0
;
LOCAL
os_timer_t
sntp_timer
;
/*****************************************/
#define SECSPERMIN 60L
#define MINSPERHOUR 60L
#define HOURSPERDAY 24L
#define SECSPERHOUR (SECSPERMIN * MINSPERHOUR)
#define SECSPERDAY (SECSPERHOUR * HOURSPERDAY)
#define DAYSPERWEEK 7
#define MONSPERYEAR 12
#define YEAR_BASE 1900
#define EPOCH_YEAR 1970
#define EPOCH_WDAY 4
#define EPOCH_YEARS_SINCE_LEAP 2
#define EPOCH_YEARS_SINCE_CENTURY 70
#define EPOCH_YEARS_SINCE_LEAP_CENTURY 370
#define isleap(y) ((((y) % 4) == 0 && ((y) % 100) != 0) || ((y) % 400) == 0)
int
__tznorth
;
int
__tzyear
;
char
reult
[
100
];
static
const
int
mon_lengths
[
2
][
12
]
=
{
{
31
,
28
,
31
,
30
,
31
,
30
,
31
,
31
,
30
,
31
,
30
,
31
},
{
31
,
29
,
31
,
30
,
31
,
30
,
31
,
31
,
30
,
31
,
30
,
31
}
}
;
static
const
int
year_lengths
[
2
]
=
{
365
,
366
}
;
struct
tm
{
int
tm_sec
;
int
tm_min
;
int
tm_hour
;
int
tm_mday
;
int
tm_mon
;
int
tm_year
;
int
tm_wday
;
int
tm_yday
;
int
tm_isdst
;
};
struct
tm
res_buf
;
typedef
struct
__tzrule_struct
{
char
ch
;
int
m
;
int
n
;
int
d
;
int
s
;
time_t
change
;
int
offset
;
}
__tzrule_type
;
__tzrule_type
sntp__tzrule
[
2
];
struct
tm
*
ICACHE_FLASH_ATTR
sntp_mktm_r
(
const
time_t
*
tim_p
,
struct
tm
*
res
,
int
is_gmtime
)
{
long
days
,
rem
;
time_t
lcltime
;
int
i
;
int
y
;
int
yleap
;
const
int
*
ip
;
/* base decision about std/dst time on current time */
lcltime
=
*
tim_p
;
days
=
((
long
)
lcltime
)
/
SECSPERDAY
;
rem
=
((
long
)
lcltime
)
%
SECSPERDAY
;
while
(
rem
<
0
)
{
rem
+=
SECSPERDAY
;
--
days
;
}
while
(
rem
>=
SECSPERDAY
)
{
rem
-=
SECSPERDAY
;
++
days
;
}
/* compute hour, min, and sec */
res
->
tm_hour
=
(
int
)
(
rem
/
SECSPERHOUR
);
rem
%=
SECSPERHOUR
;
res
->
tm_min
=
(
int
)
(
rem
/
SECSPERMIN
);
res
->
tm_sec
=
(
int
)
(
rem
%
SECSPERMIN
);
/* compute day of week */
if
((
res
->
tm_wday
=
((
EPOCH_WDAY
+
days
)
%
DAYSPERWEEK
))
<
0
)
res
->
tm_wday
+=
DAYSPERWEEK
;
/* compute year & day of year */
y
=
EPOCH_YEAR
;
if
(
days
>=
0
)
{
for
(;;)
{
yleap
=
isleap
(
y
);
if
(
days
<
year_lengths
[
yleap
])
break
;
y
++
;
days
-=
year_lengths
[
yleap
];
}
}
else
{
do
{
--
y
;
yleap
=
isleap
(
y
);
days
+=
year_lengths
[
yleap
];
}
while
(
days
<
0
);
}
res
->
tm_year
=
y
-
YEAR_BASE
;
res
->
tm_yday
=
days
;
ip
=
mon_lengths
[
yleap
];
for
(
res
->
tm_mon
=
0
;
days
>=
ip
[
res
->
tm_mon
];
++
res
->
tm_mon
)
days
-=
ip
[
res
->
tm_mon
];
res
->
tm_mday
=
days
+
1
;
if
(
!
is_gmtime
)
{
int
offset
;
int
hours
,
mins
,
secs
;
// TZ_LOCK;
// if (_daylight)
// {
// if (y == __tzyear || __tzcalc_limits (y))
// res->tm_isdst = (__tznorth
// ? (*tim_p >= __tzrule[0].change && *tim_p < __tzrule[1].change)
// : (*tim_p >= __tzrule[0].change || *tim_p < __tzrule[1].change));
// else
// res->tm_isdst = -1;
// }
// else
res
->
tm_isdst
=
0
;
offset
=
(
res
->
tm_isdst
==
1
?
sntp__tzrule
[
1
].
offset
:
sntp__tzrule
[
0
].
offset
);
hours
=
offset
/
SECSPERHOUR
;
offset
=
offset
%
SECSPERHOUR
;
mins
=
offset
/
SECSPERMIN
;
secs
=
offset
%
SECSPERMIN
;
res
->
tm_sec
-=
secs
;
res
->
tm_min
-=
mins
;
res
->
tm_hour
-=
hours
;
if
(
res
->
tm_sec
>=
SECSPERMIN
)
{
res
->
tm_min
+=
1
;
res
->
tm_sec
-=
SECSPERMIN
;
}
else
if
(
res
->
tm_sec
<
0
)
{
res
->
tm_min
-=
1
;
res
->
tm_sec
+=
SECSPERMIN
;
}
if
(
res
->
tm_min
>=
MINSPERHOUR
)
{
res
->
tm_hour
+=
1
;
res
->
tm_min
-=
MINSPERHOUR
;
}
else
if
(
res
->
tm_min
<
0
)
{
res
->
tm_hour
-=
1
;
res
->
tm_min
+=
MINSPERHOUR
;
}
if
(
res
->
tm_hour
>=
HOURSPERDAY
)
{
++
res
->
tm_yday
;
++
res
->
tm_wday
;
if
(
res
->
tm_wday
>
6
)
res
->
tm_wday
=
0
;
++
res
->
tm_mday
;
res
->
tm_hour
-=
HOURSPERDAY
;
if
(
res
->
tm_mday
>
ip
[
res
->
tm_mon
])
{
res
->
tm_mday
-=
ip
[
res
->
tm_mon
];
res
->
tm_mon
+=
1
;
if
(
res
->
tm_mon
==
12
)
{
res
->
tm_mon
=
0
;
res
->
tm_year
+=
1
;
res
->
tm_yday
=
0
;
}
}
}
else
if
(
res
->
tm_hour
<
0
)
{
res
->
tm_yday
-=
1
;
res
->
tm_wday
-=
1
;
if
(
res
->
tm_wday
<
0
)
res
->
tm_wday
=
6
;
res
->
tm_mday
-=
1
;
res
->
tm_hour
+=
24
;
if
(
res
->
tm_mday
==
0
)
{
res
->
tm_mon
-=
1
;
if
(
res
->
tm_mon
<
0
)
{
res
->
tm_mon
=
11
;
res
->
tm_year
-=
1
;
res
->
tm_yday
=
365
+
isleap
(
res
->
tm_year
);
}
res
->
tm_mday
=
ip
[
res
->
tm_mon
];
}
}
// TZ_UNLOCK;
}
else
res
->
tm_isdst
=
0
;
// os_printf("res %d %d %d %d %d\n",res->tm_year,res->tm_mon,res->tm_mday,res->tm_yday,res->tm_hour);
return
(
res
);
}
struct
tm
*
ICACHE_FLASH_ATTR
sntp_localtime_r
(
const
time_t
*
tim_p
,
struct
tm
*
res
)
{
return
sntp_mktm_r
(
tim_p
,
res
,
0
);
}
struct
tm
*
ICACHE_FLASH_ATTR
sntp_localtime
(
const
time_t
*
tim_p
)
{
return
sntp_localtime_r
(
tim_p
,
&
res_buf
);
}
int
ICACHE_FLASH_ATTR
sntp__tzcalc_limits
(
int
year
)
{
int
days
,
year_days
,
years
;
int
i
,
j
;
if
(
year
<
EPOCH_YEAR
)
return
0
;
__tzyear
=
year
;
years
=
(
year
-
EPOCH_YEAR
);
year_days
=
years
*
365
+
(
years
-
1
+
EPOCH_YEARS_SINCE_LEAP
)
/
4
-
(
years
-
1
+
EPOCH_YEARS_SINCE_CENTURY
)
/
100
+
(
years
-
1
+
EPOCH_YEARS_SINCE_LEAP_CENTURY
)
/
400
;
for
(
i
=
0
;
i
<
2
;
++
i
)
{
if
(
sntp__tzrule
[
i
].
ch
==
'J'
)
days
=
year_days
+
sntp__tzrule
[
i
].
d
+
(
isleap
(
year
)
&&
sntp__tzrule
[
i
].
d
>=
60
);
else
if
(
sntp__tzrule
[
i
].
ch
==
'D'
)
days
=
year_days
+
sntp__tzrule
[
i
].
d
;
else
{
int
yleap
=
isleap
(
year
);
int
m_day
,
m_wday
,
wday_diff
;
const
int
*
ip
=
mon_lengths
[
yleap
];
days
=
year_days
;
for
(
j
=
1
;
j
<
sntp__tzrule
[
i
].
m
;
++
j
)
days
+=
ip
[
j
-
1
];
m_wday
=
(
EPOCH_WDAY
+
days
)
%
DAYSPERWEEK
;
wday_diff
=
sntp__tzrule
[
i
].
d
-
m_wday
;
if
(
wday_diff
<
0
)
wday_diff
+=
DAYSPERWEEK
;
m_day
=
(
sntp__tzrule
[
i
].
n
-
1
)
*
DAYSPERWEEK
+
wday_diff
;
while
(
m_day
>=
ip
[
j
-
1
])
m_day
-=
DAYSPERWEEK
;
days
+=
m_day
;
}
/* store the change-over time in GMT form by adding offset */
sntp__tzrule
[
i
].
change
=
days
*
SECSPERDAY
+
sntp__tzrule
[
i
].
s
+
sntp__tzrule
[
i
].
offset
;
}
__tznorth
=
(
sntp__tzrule
[
0
].
change
<
sntp__tzrule
[
1
].
change
);
return
1
;
}
char
*
ICACHE_FLASH_ATTR
sntp_asctime_r
(
struct
tm
*
tim_p
,
char
*
result
)
{
static
const
char
day_name
[
7
][
4
]
=
{
"Sun"
,
"Mon"
,
"Tue"
,
"Wed"
,
"Thu"
,
"Fri"
,
"Sat"
};
static
const
char
mon_name
[
12
][
4
]
=
{
"Jan"
,
"Feb"
,
"Mar"
,
"Apr"
,
"May"
,
"Jun"
,
"Jul"
,
"Aug"
,
"Sep"
,
"Oct"
,
"Nov"
,
"Dec"
};
os_sprintf
(
result
,
"%s %s %02d %02d:%02d:%02d %02d
\n
"
,
day_name
[
tim_p
->
tm_wday
],
mon_name
[
tim_p
->
tm_mon
],
tim_p
->
tm_mday
,
tim_p
->
tm_hour
,
tim_p
->
tm_min
,
tim_p
->
tm_sec
,
1900
+
tim_p
->
tm_year
);
return
result
;
}
char
*
ICACHE_FLASH_ATTR
sntp_asctime
(
struct
tm
*
tim_p
)
{
return
sntp_asctime_r
(
tim_p
,
reult
);
}
uint32
sntp_get_current_timestamp
()
{
if
(
realtime_stamp
==
0
){
os_printf
(
"please start sntp first !
\n
"
);
return
0
;
}
else
{
return
realtime_stamp
;
}
}
char
*
sntp_get_real_time
(
time_t
t
)
{
return
sntp_asctime
(
sntp_localtime
(
&
t
));
}
/**
* SNTP get time_zone default GMT + 8
*/
sint8
ICACHE_FLASH_ATTR
sntp_get_timezone
(
void
)
{
return
time_zone
;
}
/**
* SNTP set time_zone default GMT + 8
*/
bool
ICACHE_FLASH_ATTR
sntp_set_timezone
(
sint8
timezone
)
{
if
(
timezone
>=
-
11
||
timezone
<=
13
)
{
time_zone
=
timezone
;
return
true
;
}
else
{
return
false
;
}
}
void
ICACHE_FLASH_ATTR
sntp_time_inc
(
void
)
{
realtime_stamp
++
;
}
/**
* SNTP processing of received timestamp
*/
static
void
ICACHE_FLASH_ATTR
sntp_process
(
u32_t
*
receive_timestamp
)
{
/* convert SNTP time (1900-based) to unix GMT time (1970-based)
* @todo: if MSB is 1, SNTP time is 2036-based!
*/
time_t
t
=
(
ntohl
(
receive_timestamp
[
0
])
-
DIFF_SEC_1900_1970
);
#if SNTP_CALC_TIME_US
u32_t
us
=
ntohl
(
receive_timestamp
[
1
])
/
4295
;
SNTP_SET_SYSTEM_TIME_US
(
t
,
us
);
/* display local time from GMT time */
LWIP_DEBUGF
(
SNTP_DEBUG_TRACE
,
(
"sntp_process: %s, %"
U32_F
" us"
,
ctime
(
&
t
),
us
));
#else
/* SNTP_CALC_TIME_US */
/* change system time and/or the update the RTC clock */
SNTP_SET_SYSTEM_TIME
(
t
);
/* display local time from GMT time */
t
+=
time_zone
*
60
*
60
;
// format GMT + time_zone TIME ZONE
realtime_stamp
=
t
;
os_timer_disarm
(
&
sntp_timer
);
os_timer_setfn
(
&
sntp_timer
,
(
os_timer_func_t
*
)
sntp_time_inc
,
NULL
);
os_timer_arm
(
&
sntp_timer
,
1000
,
1
);
os_printf
(
"%s
\n
"
,
sntp_asctime
(
sntp_localtime
(
&
t
)));
// os_printf("%s\n",ctime(&t));
// LWIP_DEBUGF(SNTP_DEBUG_TRACE, ("sntp_process: %s", ctime(&t)));
#endif
/* SNTP_CALC_TIME_US */
}
/**
* Initialize request struct to be sent to server.
*/
static
void
ICACHE_FLASH_ATTR
sntp_initialize_request
(
struct
sntp_msg
*
req
)
{
os_memset
(
req
,
0
,
SNTP_MSG_LEN
);
req
->
li_vn_mode
=
SNTP_LI_NO_WARNING
|
SNTP_VERSION
|
SNTP_MODE_CLIENT
;
#if SNTP_CHECK_RESPONSE >= 2
{
u32_t
sntp_time_sec
,
sntp_time_us
;
/* fill in transmit timestamp and save it in 'sntp_last_timestamp_sent' */
SNTP_GET_SYSTEM_TIME
(
sntp_time_sec
,
sntp_time_us
);
sntp_last_timestamp_sent
[
0
]
=
htonl
(
sntp_time_sec
+
DIFF_SEC_1900_1970
);
req
->
transmit_timestamp
[
0
]
=
sntp_last_timestamp_sent
[
0
];
/* we send/save us instead of fraction to be faster... */
sntp_last_timestamp_sent
[
1
]
=
htonl
(
sntp_time_us
);
req
->
transmit_timestamp
[
1
]
=
sntp_last_timestamp_sent
[
1
];
}
#endif
/* SNTP_CHECK_RESPONSE >= 2 */
}
/**
* Retry: send a new request (and increase retry timeout).
*
* @param arg is unused (only necessary to conform to sys_timeout)
*/
static
void
ICACHE_FLASH_ATTR
sntp_retry
(
void
*
arg
)
{
LWIP_UNUSED_ARG
(
arg
);
LWIP_DEBUGF
(
SNTP_DEBUG_STATE
,
(
"sntp_retry: Next request will be sent in %"
U32_F
" ms
\n
"
,
sntp_retry_timeout
));
/* set up a timer to send a retry and increase the retry delay */
sys_timeout
(
sntp_retry_timeout
,
sntp_request
,
NULL
);
#if SNTP_RETRY_TIMEOUT_EXP
{
u32_t
new_retry_timeout
;
/* increase the timeout for next retry */
new_retry_timeout
=
sntp_retry_timeout
<<
1
;
/* limit to maximum timeout and prevent overflow */
if
((
new_retry_timeout
<=
SNTP_RETRY_TIMEOUT_MAX
)
&&
(
new_retry_timeout
>
sntp_retry_timeout
))
{
sntp_retry_timeout
=
new_retry_timeout
;
}
}
#endif
/* SNTP_RETRY_TIMEOUT_EXP */
}
#if SNTP_SUPPORT_MULTIPLE_SERVERS
/**
* If Kiss-of-Death is received (or another packet parsing error),
* try the next server or retry the current server and increase the retry
* timeout if only one server is available.
* (implicitly, SNTP_MAX_SERVERS > 1)
*
* @param arg is unused (only necessary to conform to sys_timeout)
*/
static
void
sntp_try_next_server
(
void
*
arg
)
{
u8_t
old_server
,
i
;
LWIP_UNUSED_ARG
(
arg
);
old_server
=
sntp_current_server
;
for
(
i
=
0
;
i
<
SNTP_MAX_SERVERS
-
1
;
i
++
)
{
sntp_current_server
++
;
if
(
sntp_current_server
>=
SNTP_MAX_SERVERS
)
{
sntp_current_server
=
0
;
}
if
(
!
ip_addr_isany
(
&
sntp_servers
[
sntp_current_server
].
addr
)
#if SNTP_SERVER_DNS
||
(
sntp_servers
[
sntp_current_server
].
name
!=
NULL
)
#endif
)
{
LWIP_DEBUGF
(
SNTP_DEBUG_STATE
,
(
"sntp_try_next_server: Sending request to server %"
U16_F
"
\n
"
,
(
u16_t
)
sntp_current_server
));
/* new server: reset retry timeout */
SNTP_RESET_RETRY_TIMEOUT
();
/* instantly send a request to the next server */
sntp_request
(
NULL
);
return
;
}
}
/* no other valid server found */
sntp_current_server
=
old_server
;
sntp_retry
(
NULL
);
}
#else
/* SNTP_SUPPORT_MULTIPLE_SERVERS */
/* Always retry on error if only one server is supported */
#define sntp_try_next_server sntp_retry
#endif
/* SNTP_SUPPORT_MULTIPLE_SERVERS */
/** UDP recv callback for the sntp pcb */
static
void
ICACHE_FLASH_ATTR
sntp_recv
(
void
*
arg
,
struct
udp_pcb
*
pcb
,
struct
pbuf
*
p
,
ip_addr_t
*
addr
,
u16_t
port
)
{
u8_t
mode
;
u8_t
stratum
;
u32_t
receive_timestamp
[
SNTP_RECEIVE_TIME_SIZE
];
err_t
err
;
//os_printf("sntp_recv\n");
LWIP_UNUSED_ARG
(
arg
);
LWIP_UNUSED_ARG
(
pcb
);
/* packet received: stop retry timeout */
sys_untimeout
(
sntp_try_next_server
,
NULL
);
sys_untimeout
(
sntp_request
,
NULL
);
err
=
ERR_ARG
;
#if SNTP_CHECK_RESPONSE >= 1
/* check server address and port */
if
(
ip_addr_cmp
(
addr
,
&
sntp_last_server_address
)
&&
(
port
==
SNTP_PORT
))
#else
/* SNTP_CHECK_RESPONSE >= 1 */
LWIP_UNUSED_ARG
(
addr
);
LWIP_UNUSED_ARG
(
port
);
#endif
/* SNTP_CHECK_RESPONSE >= 1 */
{
/* process the response */
if
(
p
->
tot_len
==
SNTP_MSG_LEN
)
{
pbuf_copy_partial
(
p
,
&
mode
,
1
,
SNTP_OFFSET_LI_VN_MODE
);
mode
&=
SNTP_MODE_MASK
;
/* if this is a SNTP response... */
if
((
mode
==
SNTP_MODE_SERVER
)
||
(
mode
==
SNTP_MODE_BROADCAST
))
{
pbuf_copy_partial
(
p
,
&
stratum
,
1
,
SNTP_OFFSET_STRATUM
);
if
(
stratum
==
SNTP_STRATUM_KOD
)
{
/* Kiss-of-death packet. Use another server or increase UPDATE_DELAY. */
err
=
SNTP_ERR_KOD
;
LWIP_DEBUGF
(
SNTP_DEBUG_STATE
,
(
"sntp_recv: Received Kiss-of-Death
\n
"
));
}
else
{
#if SNTP_CHECK_RESPONSE >= 2
/* check originate_timetamp against sntp_last_timestamp_sent */
u32_t
originate_timestamp
[
2
];
pbuf_copy_partial
(
p
,
&
originate_timestamp
,
8
,
SNTP_OFFSET_ORIGINATE_TIME
);
if
((
originate_timestamp
[
0
]
!=
sntp_last_timestamp_sent
[
0
])
||
(
originate_timestamp
[
1
]
!=
sntp_last_timestamp_sent
[
1
]))
{
LWIP_DEBUGF
(
SNTP_DEBUG_WARN
,
(
"sntp_recv: Invalid originate timestamp in response
\n
"
));
}
else
#endif
/* SNTP_CHECK_RESPONSE >= 2 */
/* @todo: add code for SNTP_CHECK_RESPONSE >= 3 and >= 4 here */
{
/* correct answer */
err
=
ERR_OK
;
pbuf_copy_partial
(
p
,
&
receive_timestamp
,
SNTP_RECEIVE_TIME_SIZE
*
4
,
SNTP_OFFSET_RECEIVE_TIME
);
}
}
}
else
{
LWIP_DEBUGF
(
SNTP_DEBUG_WARN
,
(
"sntp_recv: Invalid mode in response: %"
U16_F
"
\n
"
,
(
u16_t
)
mode
));
}
}
else
{
LWIP_DEBUGF
(
SNTP_DEBUG_WARN
,
(
"sntp_recv: Invalid packet length: %"
U16_F
"
\n
"
,
p
->
tot_len
));
}
}
pbuf_free
(
p
);
if
(
err
==
ERR_OK
)
{
/* Correct response, reset retry timeout */
SNTP_RESET_RETRY_TIMEOUT
();
sntp_process
(
receive_timestamp
);
/* Set up timeout for next request */
sys_timeout
((
u32_t
)
SNTP_UPDATE_DELAY
,
sntp_request
,
NULL
);
LWIP_DEBUGF
(
SNTP_DEBUG_STATE
,
(
"sntp_recv: Scheduled next time request: %"
U32_F
" ms
\n
"
,
(
u32_t
)
SNTP_UPDATE_DELAY
));
}
else
if
(
err
==
SNTP_ERR_KOD
)
{
/* Kiss-of-death packet. Use another server or increase UPDATE_DELAY. */
sntp_try_next_server
(
NULL
);
}
else
{
/* another error, try the same server again */
sntp_retry
(
NULL
);
}
}
/** Actually send an sntp request to a server.
*
* @param server_addr resolved IP address of the SNTP server
*/
static
void
ICACHE_FLASH_ATTR
sntp_send_request
(
ip_addr_t
*
server_addr
)
{
struct
pbuf
*
p
;
// os_printf("sntp_send_request\n");
p
=
pbuf_alloc
(
PBUF_TRANSPORT
,
SNTP_MSG_LEN
,
PBUF_RAM
);
if
(
p
!=
NULL
)
{
struct
sntp_msg
*
sntpmsg
=
(
struct
sntp_msg
*
)
p
->
payload
;
LWIP_DEBUGF
(
SNTP_DEBUG_STATE
,
(
"sntp_send_request: Sending request to server
\n
"
));
/* initialize request message */
sntp_initialize_request
(
sntpmsg
);
/* send request */
udp_sendto
(
sntp_pcb
,
p
,
server_addr
,
SNTP_PORT
);
/* free the pbuf after sending it */
pbuf_free
(
p
);
/* set up receive timeout: try next server or retry on timeout */
sys_timeout
((
u32_t
)
SNTP_RECV_TIMEOUT
,
sntp_try_next_server
,
NULL
);
#if SNTP_CHECK_RESPONSE >= 1
/* save server address to verify it in sntp_recv */
ip_addr_set
(
&
sntp_last_server_address
,
server_addr
);
#endif
/* SNTP_CHECK_RESPONSE >= 1 */
}
else
{
LWIP_DEBUGF
(
SNTP_DEBUG_SERIOUS
,
(
"sntp_send_request: Out of memory, trying again in %"
U32_F
" ms
\n
"
,
(
u32_t
)
SNTP_RETRY_TIMEOUT
));
/* out of memory: set up a timer to send a retry */
sys_timeout
((
u32_t
)
SNTP_RETRY_TIMEOUT
,
sntp_request
,
NULL
);
}
}
#if SNTP_SERVER_DNS
/**
* DNS found callback when using DNS names as server address.
*/
static
void
sntp_dns_found
(
const
char
*
hostname
,
ip_addr_t
*
ipaddr
,
void
*
arg
)
{
LWIP_UNUSED_ARG
(
hostname
);
LWIP_UNUSED_ARG
(
arg
);
if
(
ipaddr
!=
NULL
)
{
/* Address resolved, send request */
LWIP_DEBUGF
(
SNTP_DEBUG_STATE
,
(
"sntp_dns_found: Server address resolved, sending request
\n
"
));
sntp_send_request
(
ipaddr
);
}
else
{
/* DNS resolving failed -> try another server */
LWIP_DEBUGF
(
SNTP_DEBUG_WARN_STATE
,
(
"sntp_dns_found: Failed to resolve server address resolved, trying next server
\n
"
));
sntp_try_next_server
(
NULL
);
}
}
#endif
/* SNTP_SERVER_DNS */
/**
* Send out an sntp request.
*
* @param arg is unused (only necessary to conform to sys_timeout)
*/
static
void
ICACHE_FLASH_ATTR
sntp_request
(
void
*
arg
)
{
ip_addr_t
sntp_server_address
;
err_t
err
;
LWIP_UNUSED_ARG
(
arg
);
/* initialize SNTP server address */
#if SNTP_SERVER_DNS
if
(
sntp_servers
[
sntp_current_server
].
name
)
{
/* always resolve the name and rely on dns-internal caching & timeout */
ip_addr_set_any
(
&
sntp_servers
[
sntp_current_server
].
addr
);
err
=
dns_gethostbyname
(
sntp_servers
[
sntp_current_server
].
name
,
&
sntp_server_address
,
sntp_dns_found
,
NULL
);
if
(
err
==
ERR_INPROGRESS
)
{
/* DNS request sent, wait for sntp_dns_found being called */
LWIP_DEBUGF
(
SNTP_DEBUG_STATE
,
(
"sntp_request: Waiting for server address to be resolved.
\n
"
));
return
;
}
else
if
(
err
==
ERR_OK
)
{
sntp_servers
[
sntp_current_server
].
addr
=
sntp_server_address
;
}
}
else
#endif
/* SNTP_SERVER_DNS */
{
sntp_server_address
=
sntp_servers
[
sntp_current_server
].
addr
;
// os_printf("sntp_server_address ip %d\n",sntp_server_address.addr);
err
=
(
ip_addr_isany
(
&
sntp_server_address
))
?
ERR_ARG
:
ERR_OK
;
}
if
(
err
==
ERR_OK
)
{
LWIP_DEBUGF
(
SNTP_DEBUG_TRACE
,
(
"sntp_request: current server address is %u.%u.%u.%u
\n
"
,
ip4_addr1
(
&
sntp_server_address
),
ip4_addr2
(
&
sntp_server_address
),
ip4_addr3
(
&
sntp_server_address
),
ip4_addr4
(
&
sntp_server_address
)));
sntp_send_request
(
&
sntp_server_address
);
}
else
{
/* address conversion failed, try another server */
LWIP_DEBUGF
(
SNTP_DEBUG_WARN_STATE
,
(
"sntp_request: Invalid server address, trying next server.
\n
"
));
sys_timeout
((
u32_t
)
SNTP_RETRY_TIMEOUT
,
sntp_try_next_server
,
NULL
);
}
}
/**
* Initialize this module.
* Send out request instantly or after SNTP_STARTUP_DELAY(_FUNC).
*/
void
ICACHE_FLASH_ATTR
sntp_init
(
void
)
{
#ifdef SNTP_SERVER_ADDRESS
#if SNTP_SERVER_DNS
sntp_setservername
(
0
,
SNTP_SERVER_ADDRESS
);
#else
#error SNTP_SERVER_ADDRESS string not supported SNTP_SERVER_DNS==0
#endif
#endif
/* SNTP_SERVER_ADDRESS */
if
(
sntp_pcb
==
NULL
)
{
SNTP_RESET_RETRY_TIMEOUT
();
sntp_pcb
=
udp_new
();
LWIP_ASSERT
(
"Failed to allocate udp pcb for sntp client"
,
sntp_pcb
!=
NULL
);
if
(
sntp_pcb
!=
NULL
)
{
udp_recv
(
sntp_pcb
,
sntp_recv
,
NULL
);
#if SNTP_STARTUP_DELAY
sys_timeout
((
u32_t
)
SNTP_STARTUP_DELAY_FUNC
,
sntp_request
,
NULL
);
#else
sntp_request
(
NULL
);
#endif
}
}
}
/**
* Stop this module.
*/
void
ICACHE_FLASH_ATTR
sntp_stop
(
void
)
{
if
(
sntp_pcb
!=
NULL
)
{
sys_untimeout
(
sntp_request
,
NULL
);
udp_remove
(
sntp_pcb
);
sntp_pcb
=
NULL
;
}
os_timer_disarm
(
&
sntp_timer
);
realtime_stamp
=
0
;
}
#if SNTP_GET_SERVERS_FROM_DHCP
/**
* Config SNTP server handling by IP address, name, or DHCP; clear table
* @param set_servers_from_dhcp enable or disable getting server addresses from dhcp
*/
void
sntp_servermode_dhcp
(
int
set_servers_from_dhcp
)
{
u8_t
new_mode
=
set_servers_from_dhcp
?
1
:
0
;
if
(
sntp_set_servers_from_dhcp
!=
new_mode
)
{
sntp_set_servers_from_dhcp
=
new_mode
;
}
}
#endif
/* SNTP_GET_SERVERS_FROM_DHCP */
/**
* Initialize one of the NTP servers by IP address
*
* @param numdns the index of the NTP server to set must be < SNTP_MAX_SERVERS
* @param dnsserver IP address of the NTP server to set
*/
void
ICACHE_FLASH_ATTR
sntp_setserver
(
u8_t
idx
,
ip_addr_t
*
server
)
{
if
(
idx
<
SNTP_MAX_SERVERS
)
{
if
(
server
!=
NULL
)
{
sntp_servers
[
idx
].
addr
=
(
*
server
);
// os_printf("server ip %d\n",server->addr);
}
else
{
ip_addr_set_any
(
&
sntp_servers
[
idx
].
addr
);
}
#if SNTP_SERVER_DNS
sntp_servers
[
idx
].
name
=
NULL
;
#endif
}
}
#if LWIP_DHCP && SNTP_GET_SERVERS_FROM_DHCP
/**
* Initialize one of the NTP servers by IP address, required by DHCP
*
* @param numdns the index of the NTP server to set must be < SNTP_MAX_SERVERS
* @param dnsserver IP address of the NTP server to set
*/
void
dhcp_set_ntp_servers
(
u8_t
num
,
ip_addr_t
*
server
)
{
LWIP_DEBUGF
(
SNTP_DEBUG_TRACE
,
(
"sntp: %s %u.%u.%u.%u as NTP server #%u via DHCP
\n
"
,
(
sntp_set_servers_from_dhcp
?
"Got"
:
"Rejected"
),
ip4_addr1
(
server
),
ip4_addr2
(
server
),
ip4_addr3
(
server
),
ip4_addr4
(
server
),
num
));
if
(
sntp_set_servers_from_dhcp
&&
num
)
{
u8_t
i
;
for
(
i
=
0
;
(
i
<
num
)
&&
(
i
<
SNTP_MAX_SERVERS
);
i
++
)
{
sntp_setserver
(
i
,
&
server
[
i
]);
}
for
(
i
=
num
;
i
<
SNTP_MAX_SERVERS
;
i
++
)
{
sntp_setserver
(
i
,
NULL
);
}
}
}
#endif
/* LWIP_DHCP && SNTP_GET_SERVERS_FROM_DHCP */
/**
* Obtain one of the currently configured by IP address (or DHCP) NTP servers
*
* @param numdns the index of the NTP server
* @return IP address of the indexed NTP server or "ip_addr_any" if the NTP
* server has not been configured by address (or at all).
*/
ip_addr_t
ICACHE_FLASH_ATTR
sntp_getserver
(
u8_t
idx
)
{
if
(
idx
<
SNTP_MAX_SERVERS
)
{
return
sntp_servers
[
idx
].
addr
;
}
return
*
IP_ADDR_ANY
;
}
#if SNTP_SERVER_DNS
/**
* Initialize one of the NTP servers by name
*
* @param numdns the index of the NTP server to set must be < SNTP_MAX_SERVERS
* @param dnsserver DNS name of the NTP server to set, to be resolved at contact time
*/
void
ICACHE_FLASH_ATTR
sntp_setservername
(
u8_t
idx
,
char
*
server
)
{
if
(
idx
<
SNTP_MAX_SERVERS
)
{
sntp_servers
[
idx
].
name
=
server
;
}
}
/**
* Obtain one of the currently configured by name NTP servers.
*
* @param numdns the index of the NTP server
* @return IP address of the indexed NTP server or NULL if the NTP
* server has not been configured by name (or at all)
*/
char
*
ICACHE_FLASH_ATTR
sntp_getservername
(
u8_t
idx
)
{
if
(
idx
<
SNTP_MAX_SERVERS
)
{
return
sntp_servers
[
idx
].
name
;
}
return
NULL
;
}
#endif
/* SNTP_SERVER_DNS */
#endif
/* LWIP_UDP */
app/lwip/core/sys_arch.c
View file @
c674d191
app/lwip/core/tcp.c
View file @
c674d191
...
@@ -55,7 +55,8 @@
...
@@ -55,7 +55,8 @@
#include <string.h>
#include <string.h>
const
char
*
const
tcp_state_str
[]
=
{
#if TCP_DEBUG
const
char
tcp_state_str_rodata
[][
12
]
ICACHE_RODATA_ATTR
=
{
"CLOSED"
,
"CLOSED"
,
"LISTEN"
,
"LISTEN"
,
"SYN_SENT"
,
"SYN_SENT"
,
...
@@ -69,12 +70,15 @@ const char * const tcp_state_str[] = {
...
@@ -69,12 +70,15 @@ const char * const tcp_state_str[] = {
"TIME_WAIT"
"TIME_WAIT"
};
};
char
tcp_state_str
[
12
];
#endif
/* Incremented every coarse grained timer shot (typically every 500 ms). */
/* Incremented every coarse grained timer shot (typically every 500 ms). */
u32_t
tcp_ticks
;
u32_t
tcp_ticks
;
const
u8_t
tcp_backoff
[
13
]
=
const
u8_t
tcp_backoff
[
13
]
ICACHE_RODATA_ATTR
=
{
1
,
2
,
3
,
4
,
5
,
6
,
7
,
7
,
7
,
7
,
7
,
7
,
7
};
{
1
,
2
,
3
,
4
,
5
,
6
,
7
,
7
,
7
,
7
,
7
,
7
,
7
};
/* Times per slowtmr hits */
/* Times per slowtmr hits */
const
u8_t
tcp_persist_backoff
[
7
]
=
{
3
,
6
,
12
,
24
,
48
,
96
,
120
};
const
u8_t
tcp_persist_backoff
[
7
]
ICACHE_RODATA_ATTR
=
{
3
,
6
,
12
,
24
,
48
,
96
,
120
};
/* The TCP PCB lists. */
/* The TCP PCB lists. */
...
@@ -91,7 +95,7 @@ struct tcp_pcb *tcp_tw_pcbs;
...
@@ -91,7 +95,7 @@ struct tcp_pcb *tcp_tw_pcbs;
#define NUM_TCP_PCB_LISTS 4
#define NUM_TCP_PCB_LISTS 4
#define NUM_TCP_PCB_LISTS_NO_TIME_WAIT 3
#define NUM_TCP_PCB_LISTS_NO_TIME_WAIT 3
/** An array with all (non-temporary) PCB lists, mainly used for smaller code size */
/** An array with all (non-temporary) PCB lists, mainly used for smaller code size */
struct
tcp_pcb
**
const
tcp_pcb_lists
[]
=
{
&
tcp_listen_pcbs
.
pcbs
,
&
tcp_bound_pcbs
,
struct
tcp_pcb
**
const
tcp_pcb_lists
[]
ICACHE_RODATA_ATTR
=
{
&
tcp_listen_pcbs
.
pcbs
,
&
tcp_bound_pcbs
,
&
tcp_active_pcbs
,
&
tcp_tw_pcbs
};
&
tcp_active_pcbs
,
&
tcp_tw_pcbs
};
/** Only used for temporary storage. */
/** Only used for temporary storage. */
...
@@ -798,7 +802,7 @@ tcp_slowtmr(void)
...
@@ -798,7 +802,7 @@ tcp_slowtmr(void)
/* If snd_wnd is zero, use persist timer to send 1 byte probes
/* If snd_wnd is zero, use persist timer to send 1 byte probes
* instead of using the standard retransmission mechanism. */
* instead of using the standard retransmission mechanism. */
pcb
->
persist_cnt
++
;
pcb
->
persist_cnt
++
;
if
(
pcb
->
persist_cnt
>=
tcp_persist_backoff
[
pcb
->
persist_backoff
-
1
]
)
{
if
(
pcb
->
persist_cnt
>=
system_get_data_of_array_8
(
tcp_persist_backoff
,
pcb
->
persist_backoff
-
1
)
)
{
pcb
->
persist_cnt
=
0
;
pcb
->
persist_cnt
=
0
;
if
(
pcb
->
persist_backoff
<
sizeof
(
tcp_persist_backoff
))
{
if
(
pcb
->
persist_backoff
<
sizeof
(
tcp_persist_backoff
))
{
pcb
->
persist_backoff
++
;
pcb
->
persist_backoff
++
;
...
@@ -819,7 +823,7 @@ tcp_slowtmr(void)
...
@@ -819,7 +823,7 @@ tcp_slowtmr(void)
/* Double retransmission time-out unless we are trying to
/* Double retransmission time-out unless we are trying to
* connect to somebody (i.e., we are in SYN_SENT). */
* connect to somebody (i.e., we are in SYN_SENT). */
if
(
pcb
->
state
!=
SYN_SENT
)
{
if
(
pcb
->
state
!=
SYN_SENT
)
{
pcb
->
rto
=
((
pcb
->
sa
>>
3
)
+
pcb
->
sv
)
<<
tcp_backoff
[
pcb
->
nrtx
]
;
pcb
->
rto
=
((
pcb
->
sa
>>
3
)
+
pcb
->
sv
)
<<
system_get_data_of_array_8
(
tcp_backoff
,
pcb
->
nrtx
)
;
// if (pcb->rto >= TCP_MAXRTO)
// if (pcb->rto >= TCP_MAXRTO)
// pcb->rto >>= 1;
// pcb->rto >>= 1;
}
}
...
@@ -1221,7 +1225,7 @@ tcp_alloc(u8_t prio)
...
@@ -1221,7 +1225,7 @@ tcp_alloc(u8_t prio)
}
}
}
}
if
(
pcb
!=
NULL
)
{
if
(
pcb
!=
NULL
)
{
memset
(
pcb
,
0
,
sizeof
(
struct
tcp_pcb
));
//��0
os_
memset
(
pcb
,
0
,
sizeof
(
struct
tcp_pcb
));
//��0
pcb
->
prio
=
prio
;
//�������ȼ�
pcb
->
prio
=
prio
;
//�������ȼ�
pcb
->
snd_buf
=
TCP_SND_BUF
;
//��ʹ�õķ��ͻ������С
pcb
->
snd_buf
=
TCP_SND_BUF
;
//��ʹ�õķ��ͻ������С
pcb
->
snd_queuelen
=
0
;
//��������ռ�õ�pbuf����
pcb
->
snd_queuelen
=
0
;
//��������ռ�õ�pbuf����
...
@@ -1259,7 +1263,6 @@ tcp_alloc(u8_t prio)
...
@@ -1259,7 +1263,6 @@ tcp_alloc(u8_t prio)
#endif
/* LWIP_TCP_KEEPALIVE */
#endif
/* LWIP_TCP_KEEPALIVE */
pcb
->
keep_cnt_sent
=
0
;
//���ķ��ʹ���
pcb
->
keep_cnt_sent
=
0
;
//���ķ��ʹ���
pcb
->
hold
=
0
;
}
}
return
pcb
;
return
pcb
;
}
}
...
@@ -1482,7 +1485,11 @@ tcp_next_iss(void)
...
@@ -1482,7 +1485,11 @@ tcp_next_iss(void)
{
{
static
u32_t
iss
=
6510
;
static
u32_t
iss
=
6510
;
again:
iss
+=
tcp_ticks
;
/* XXX */
iss
+=
tcp_ticks
;
/* XXX */
if
(
iss
==
0
)
goto
again
;
return
iss
;
return
iss
;
}
}
...
@@ -1511,11 +1518,15 @@ tcp_eff_send_mss(u16_t sendmss, ip_addr_t *addr)
...
@@ -1511,11 +1518,15 @@ tcp_eff_send_mss(u16_t sendmss, ip_addr_t *addr)
}
}
#endif
/* TCP_CALCULATE_EFF_SEND_MSS */
#endif
/* TCP_CALCULATE_EFF_SEND_MSS */
#if TCP_DEBUG
const
char
*
const
char
*
tcp_debug_state_str
(
enum
tcp_state
s
)
tcp_debug_state_str
(
enum
tcp_state
s
)
{
{
return
tcp_state_str
[
s
];
system_get_string_from_flash
(
tcp_state_str_rodata
[
s
],
tcp_state_str
,
12
);
return
tcp_state_str
;
}
}
#endif
#if TCP_DEBUG || TCP_INPUT_DEBUG || TCP_OUTPUT_DEBUG
#if TCP_DEBUG || TCP_INPUT_DEBUG || TCP_OUTPUT_DEBUG
/**
/**
...
...
app/lwip/core/tcp_in.c
View file @
c674d191
...
@@ -59,17 +59,17 @@
...
@@ -59,17 +59,17 @@
/* These variables are global to all functions involved in the input
/* These variables are global to all functions involved in the input
processing of TCP segments. They are set by the tcp_input()
processing of TCP segments. They are set by the tcp_input()
function. */
function. */
static
struct
tcp_seg
inseg
;
//tcp_seg结构
,描述输入的报文段
static
struct
tcp_seg
inseg
;
//tcp_seg
�
ṹ�
���������ı��Ķ�
static
struct
tcp_hdr
*
tcphdr
;
//
报文段中TCP首部
static
struct
tcp_hdr
*
tcphdr
;
//
���Ķ���TCP�ײ�
static
struct
ip_hdr
*
iphdr
;
//IP
数据包首部
static
struct
ip_hdr
*
iphdr
;
//IP
��ݰ��ײ�
static
u32_t
seqno
,
ackno
;
//TCP
首部中序号字段与确认号字段
static
u32_t
seqno
,
ackno
;
//TCP
�ײ�������ֶ���ȷ�Ϻ��ֶ�
static
u8_t
flags
;
//
首部标志字段
static
u8_t
flags
;
//
�ײ���־�ֶ�
static
u16_t
tcplen
;
//TCP
报文长度
static
u16_t
tcplen
;
//TCP
���ij���
static
u8_t
recv_flags
;
//
当前报文处理结果
static
u8_t
recv_flags
;
//
��ǰ���Ĵ�����
static
struct
pbuf
*
recv_data
;
//
报文段数据p
buf
static
struct
pbuf
*
recv_data
;
//
�������pbuf
struct
tcp_pcb
*
tcp_input_pcb
;
//
当前报文控制块
struct
tcp_pcb
*
tcp_input_pcb
;
//
��ǰ���Ŀ��ƿ�
/* Forward declarations. */
/* Forward declarations. */
static
err_t
tcp_process
(
struct
tcp_pcb
*
pcb
)
ICACHE_FLASH_ATTR
;
static
err_t
tcp_process
(
struct
tcp_pcb
*
pcb
)
ICACHE_FLASH_ATTR
;
...
@@ -89,10 +89,10 @@ static err_t tcp_timewait_input(struct tcp_pcb *pcb)ICACHE_FLASH_ATTR;
...
@@ -89,10 +89,10 @@ static err_t tcp_timewait_input(struct tcp_pcb *pcb)ICACHE_FLASH_ATTR;
* @param inp network interface on which this segment was received
* @param inp network interface on which this segment was received
*/
*/
/**
/**
* TCP
初始化输入处理,验证了TCP头,这个函数被IP层调用
* TCP
��ʼ�����봦�?��֤��TCPͷ���������IP�����
* @
参数p:处理接收的TCP段(指向IP头的负载
)
* @
����p:������յ�TCP��(ָ��IPͷ�ĸ���)
* @
参数inp:接收段的网络接口
* @
����inp:���նε�����ӿ�
*/
*/
void
void
tcp_input
(
struct
pbuf
*
p
,
struct
netif
*
inp
)
tcp_input
(
struct
pbuf
*
p
,
struct
netif
*
inp
)
...
@@ -108,15 +108,15 @@ tcp_input(struct pbuf *p, struct netif *inp)
...
@@ -108,15 +108,15 @@ tcp_input(struct pbuf *p, struct netif *inp)
PERF_START
;
PERF_START
;
TCP_STATS_INC
(
tcp
.
recv
);
//状态
加
1
TCP_STATS_INC
(
tcp
.
recv
);
//״̬
��1
snmp_inc_tcpinsegs
();
//tcp
输入段加1
snmp_inc_tcpinsegs
();
//tcp
����μ�1
iphdr
=
(
struct
ip_hdr
*
)
p
->
payload
;
// pointer to the actual data in the buffer
iphdr
=
(
struct
ip_hdr
*
)
p
->
payload
;
// pointer to the actual data in the buffer
/*
/*
*
包头长度(IHL):4位,IP协议包头的长度,指明IPv4协议包头长度的字节数包含多少个32位。
*
��ͷ����(IHL)��4λ��IPЭ���ͷ�ij��ȣ�ָ��IPv4Э���ͷ���ȵ��ֽ������ٸ�32λ��
*
由于IPv4的包头可能包含可变数量的可选 项,所以这个字段可以用来确定IPv4数据报中数据部分的偏移量。
*
����IPv4�İ�ͷ���ܰ�ɱ������Ŀ�ѡ ���������ֶο�������ȷ��IPv4��ݱ�����ݲ��ֵ�ƫ������
*IPv4
包头的最小长度是20个字节,因此IHL这个字段的最小值用十进制表示就是5
(5x4 = 20
字节)。
*
就是说,它表示的包头的总字节数是4字节的倍数
*
����˵�����ʾ�İ�ͷ�����ֽ�����4�ֽڵı���
*/
*/
tcphdr
=
(
struct
tcp_hdr
*
)((
u8_t
*
)
p
->
payload
+
IPH_HL
(
iphdr
)
*
4
);
tcphdr
=
(
struct
tcp_hdr
*
)((
u8_t
*
)
p
->
payload
+
IPH_HL
(
iphdr
)
*
4
);
...
@@ -128,17 +128,17 @@ tcp_input(struct pbuf *p, struct netif *inp)
...
@@ -128,17 +128,17 @@ tcp_input(struct pbuf *p, struct netif *inp)
if
(
pbuf_header
(
p
,
-
((
s16_t
)(
IPH_HL
(
iphdr
)
*
4
)))
||
(
p
->
tot_len
<
sizeof
(
struct
tcp_hdr
)))
{
if
(
pbuf_header
(
p
,
-
((
s16_t
)(
IPH_HL
(
iphdr
)
*
4
)))
||
(
p
->
tot_len
<
sizeof
(
struct
tcp_hdr
)))
{
/* drop short packets */
/* drop short packets */
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_input: short packet (%"
U16_F
" bytes) discarded
\n
"
,
p
->
tot_len
));
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_input: short packet (%"
U16_F
" bytes) discarded
\n
"
,
p
->
tot_len
));
TCP_STATS_INC
(
tcp
.
lenerr
);
//
错误长度计数
TCP_STATS_INC
(
tcp
.
lenerr
);
//
���ȼ���
TCP_STATS_INC
(
tcp
.
drop
);
//
终止计数
TCP_STATS_INC
(
tcp
.
drop
);
//
��ֹ����
snmp_inc_tcpinerrs
();
snmp_inc_tcpinerrs
();
pbuf_free
(
p
);
//
释放
buffer
pbuf_free
(
p
);
//
�ͷ�b
uffer
return
;
return
;
}
}
/* Don't even process incoming broadcasts/multicasts. */
/* Don't even process incoming broadcasts/multicasts. */
if
(
ip_addr_isbroadcast
(
&
current_iphdr_dest
,
inp
)
||
if
(
ip_addr_isbroadcast
(
&
current_iphdr_dest
,
inp
)
||
ip_addr_ismulticast
(
&
current_iphdr_dest
))
{
ip_addr_ismulticast
(
&
current_iphdr_dest
))
{
TCP_STATS_INC
(
tcp
.
proterr
);
//协
议错误计数
TCP_STATS_INC
(
tcp
.
proterr
);
//Э
��������
TCP_STATS_INC
(
tcp
.
drop
);
TCP_STATS_INC
(
tcp
.
drop
);
snmp_inc_tcpinerrs
();
snmp_inc_tcpinerrs
();
pbuf_free
(
p
);
pbuf_free
(
p
);
...
@@ -155,7 +155,7 @@ tcp_input(struct pbuf *p, struct netif *inp)
...
@@ -155,7 +155,7 @@ tcp_input(struct pbuf *p, struct netif *inp)
#if TCP_DEBUG
#if TCP_DEBUG
tcp_debug_print
(
tcphdr
);
tcp_debug_print
(
tcphdr
);
#endif
/* TCP_DEBUG */
#endif
/* TCP_DEBUG */
TCP_STATS_INC
(
tcp
.
chkerr
);
//校
验错误计数
TCP_STATS_INC
(
tcp
.
chkerr
);
//У
��������
TCP_STATS_INC
(
tcp
.
drop
);
TCP_STATS_INC
(
tcp
.
drop
);
snmp_inc_tcpinerrs
();
snmp_inc_tcpinerrs
();
pbuf_free
(
p
);
pbuf_free
(
p
);
...
@@ -165,11 +165,11 @@ tcp_input(struct pbuf *p, struct netif *inp)
...
@@ -165,11 +165,11 @@ tcp_input(struct pbuf *p, struct netif *inp)
/* Move the payload pointer in the pbuf so that it points to the
/* Move the payload pointer in the pbuf so that it points to the
TCP data instead of the TCP header. */
TCP data instead of the TCP header. */
hdrlen
=
TCPH_HDRLEN
(
tcphdr
);
//
计算头的长度
hdrlen
=
TCPH_HDRLEN
(
tcphdr
);
//
����ͷ�ij���
if
(
pbuf_header
(
p
,
-
(
hdrlen
*
4
))){
//
跨过TCP头,返回0为成功,否则
if
(
pbuf_header
(
p
,
-
(
hdrlen
*
4
))){
//
���TCPͷ������0Ϊ�ɹ�������
/* drop short packets */
/* drop short packets */
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_input: short packet
\n
"
));
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_input: short packet
\n
"
));
TCP_STATS_INC
(
tcp
.
lenerr
);
//tcp
长度错误计数
TCP_STATS_INC
(
tcp
.
lenerr
);
//tcp
���ȴ������
TCP_STATS_INC
(
tcp
.
drop
);
TCP_STATS_INC
(
tcp
.
drop
);
snmp_inc_tcpinerrs
();
snmp_inc_tcpinerrs
();
pbuf_free
(
p
);
pbuf_free
(
p
);
...
@@ -177,53 +177,53 @@ tcp_input(struct pbuf *p, struct netif *inp)
...
@@ -177,53 +177,53 @@ tcp_input(struct pbuf *p, struct netif *inp)
}
}
/* Convert fields in TCP header to host byte order. */
/* Convert fields in TCP header to host byte order. */
tcphdr
->
src
=
ntohs
(
tcphdr
->
src
);
//转
换源地
址
tcphdr
->
src
=
ntohs
(
tcphdr
->
src
);
//ת
��Դ��ַ
tcphdr
->
dest
=
ntohs
(
tcphdr
->
dest
);
//转
换目的地
址
tcphdr
->
dest
=
ntohs
(
tcphdr
->
dest
);
//ת
��Ŀ�ĵ�ַ
seqno
=
tcphdr
->
seqno
=
ntohl
(
tcphdr
->
seqno
);
//转
换序列号
seqno
=
tcphdr
->
seqno
=
ntohl
(
tcphdr
->
seqno
);
//ת
�����к�
ackno
=
tcphdr
->
ackno
=
ntohl
(
tcphdr
->
ackno
);
//转
换应答号
ackno
=
tcphdr
->
ackno
=
ntohl
(
tcphdr
->
ackno
);
//ת
��Ӧ���
tcphdr
->
wnd
=
ntohs
(
tcphdr
->
wnd
);
//转
换tcp窗口
tcphdr
->
wnd
=
ntohs
(
tcphdr
->
wnd
);
//ת
��tcp����
flags
=
TCPH_FLAGS
(
tcphdr
);
//
得到
tcp header
的标
志
flags
=
TCPH_FLAGS
(
tcphdr
);
//
�õ�t
cp header�
ı�־
/*
/*
*
标志:3位控制字段,包含:
*
��־��3λ�����ֶΣ���
*
保留位:
1位
*
����λ��1λ
*
不分段位:1位,取值:0(允许数据报分段)、1(数据报不能分段)
*
���ֶ�λ��1λ��ȡֵ��0��������ݱ��ֶΣ���1����ݱ����ֶܷΣ�
*
更多段位:1位,取值:0(数据包后面没有包)、1(数据包后面有更多的包)
*
����λ��1λ��ȡֵ��0����ݰ����û�а�1����ݰ�����и��İ�
*/
*/
tcplen
=
p
->
tot_len
+
((
flags
&
(
TCP_FIN
|
TCP_SYN
))
?
1
:
0
);
//TCP_FIN
和
TCP_SYN
置位加1;否则加0
tcplen
=
p
->
tot_len
+
((
flags
&
(
TCP_FIN
|
TCP_SYN
))
?
1
:
0
);
//TCP_FIN
��
TCP_SYN �
��1�������0
/* Demultiplex an incoming segment. First, we check if it is destined
/* Demultiplex an incoming segment. First, we check if it is destined
for an active connection.
首先,检查是否一定要激活一个连接
*/
for an active connection.
���ȣ�����Ƿ�һ��Ҫ����һ������*/
////////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////////
prev
=
NULL
;
prev
=
NULL
;
for
(
pcb
=
tcp_active_pcbs
;
pcb
!=
NULL
;
pcb
=
pcb
->
next
)
{
//
遍历激活列表
for
(
pcb
=
tcp_active_pcbs
;
pcb
!=
NULL
;
pcb
=
pcb
->
next
)
{
//
������б�
LWIP_ASSERT
(
"tcp_input: active pcb->state != CLOSED"
,
pcb
->
state
!=
CLOSED
);
LWIP_ASSERT
(
"tcp_input: active pcb->state != CLOSED"
,
pcb
->
state
!=
CLOSED
);
LWIP_ASSERT
(
"tcp_input: active pcb->state != TIME-WAIT"
,
pcb
->
state
!=
TIME_WAIT
);
LWIP_ASSERT
(
"tcp_input: active pcb->state != TIME-WAIT"
,
pcb
->
state
!=
TIME_WAIT
);
LWIP_ASSERT
(
"tcp_input: active pcb->state != LISTEN"
,
pcb
->
state
!=
LISTEN
);
LWIP_ASSERT
(
"tcp_input: active pcb->state != LISTEN"
,
pcb
->
state
!=
LISTEN
);
if
(
pcb
->
remote_port
==
tcphdr
->
src
&&
if
(
pcb
->
remote_port
==
tcphdr
->
src
&&
pcb
->
local_port
==
tcphdr
->
dest
&&
pcb
->
local_port
==
tcphdr
->
dest
&&
ip_addr_cmp
(
&
(
pcb
->
remote_ip
),
&
current_iphdr_src
)
&&
ip_addr_cmp
(
&
(
pcb
->
remote_ip
),
&
current_iphdr_src
)
&&
ip_addr_cmp
(
&
(
pcb
->
local_ip
),
&
current_iphdr_dest
))
{
//
检查相关的地
址
ip_addr_cmp
(
&
(
pcb
->
local_ip
),
&
current_iphdr_dest
))
{
//
�����صĵ�ַ
/* Move this PCB to the front of the list so that subsequent
/* Move this PCB to the front of the list so that subsequent
lookups will be faster (we exploit locality in TCP segment
lookups will be faster (we exploit locality in TCP segment
arrivals). */
arrivals). */
LWIP_ASSERT
(
"tcp_input: pcb->next != pcb (before cache)"
,
pcb
->
next
!=
pcb
);
LWIP_ASSERT
(
"tcp_input: pcb->next != pcb (before cache)"
,
pcb
->
next
!=
pcb
);
if
(
prev
!=
NULL
)
{
//
如果前一个节点不为空
if
(
prev
!=
NULL
)
{
//
���ǰһ���ڵ㲻Ϊ��
prev
->
next
=
pcb
->
next
;
prev
->
next
=
pcb
->
next
;
pcb
->
next
=
tcp_active_pcbs
;
pcb
->
next
=
tcp_active_pcbs
;
tcp_active_pcbs
=
pcb
;
//pcb
插入最前面
tcp_active_pcbs
=
pcb
;
//pcb
������ǰ��
}
}
LWIP_ASSERT
(
"tcp_input: pcb->next != pcb (after cache)"
,
pcb
->
next
!=
pcb
);
LWIP_ASSERT
(
"tcp_input: pcb->next != pcb (after cache)"
,
pcb
->
next
!=
pcb
);
break
;
break
;
}
}
prev
=
pcb
;
//prev指
向
pcb
prev
=
pcb
;
//prevָ
��p
cb
}
}
if
(
pcb
==
NULL
)
{
if
(
pcb
==
NULL
)
{
/* If it did not go to an active connection, we check the connections
/* If it did not go to an active connection, we check the connections
in the TIME-WAIT state. */
in the TIME-WAIT state. */
for
(
pcb
=
tcp_tw_pcbs
;
pcb
!=
NULL
;
pcb
=
pcb
->
next
)
{
//
遍历等待状态下的p
cb
for
(
pcb
=
tcp_tw_pcbs
;
pcb
!=
NULL
;
pcb
=
pcb
->
next
)
{
//
����ȴ�״̬�µ�pcb
LWIP_ASSERT
(
"tcp_input: TIME-WAIT pcb->state == TIME-WAIT"
,
pcb
->
state
==
TIME_WAIT
);
LWIP_ASSERT
(
"tcp_input: TIME-WAIT pcb->state == TIME-WAIT"
,
pcb
->
state
==
TIME_WAIT
);
if
(
pcb
->
remote_port
==
tcphdr
->
src
&&
if
(
pcb
->
remote_port
==
tcphdr
->
src
&&
pcb
->
local_port
==
tcphdr
->
dest
&&
pcb
->
local_port
==
tcphdr
->
dest
&&
...
@@ -233,7 +233,7 @@ tcp_input(struct pbuf *p, struct netif *inp)
...
@@ -233,7 +233,7 @@ tcp_input(struct pbuf *p, struct netif *inp)
of the list since we are not very likely to receive that
of the list since we are not very likely to receive that
many segments for connections in TIME-WAIT. */
many segments for connections in TIME-WAIT. */
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_input: packed for TIME_WAITing connection.
\n
"
));
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_input: packed for TIME_WAITing connection.
\n
"
));
tcp_timewait_input
(
pcb
);
//
发送
tcp timewait
的包
tcp_timewait_input
(
pcb
);
//
����tc
p timewait �İ
�
pbuf_free
(
p
);
pbuf_free
(
p
);
return
;
return
;
}
}
...
@@ -242,7 +242,7 @@ tcp_input(struct pbuf *p, struct netif *inp)
...
@@ -242,7 +242,7 @@ tcp_input(struct pbuf *p, struct netif *inp)
/* Finally, if we still did not get a match, we check all PCBs that
/* Finally, if we still did not get a match, we check all PCBs that
are LISTENing for incoming connections. */
are LISTENing for incoming connections. */
prev
=
NULL
;
prev
=
NULL
;
for
(
lpcb
=
tcp_listen_pcbs
.
listen_pcbs
;
lpcb
!=
NULL
;
lpcb
=
lpcb
->
next
)
{
//
遍历监听状态下所有的p
cb
for
(
lpcb
=
tcp_listen_pcbs
.
listen_pcbs
;
lpcb
!=
NULL
;
lpcb
=
lpcb
->
next
)
{
//
�������״̬�����е�pcb
if
(
lpcb
->
local_port
==
tcphdr
->
dest
)
{
if
(
lpcb
->
local_port
==
tcphdr
->
dest
)
{
#if SO_REUSE
#if SO_REUSE
if
(
ip_addr_cmp
(
&
(
lpcb
->
local_ip
),
&
current_iphdr_dest
))
{
if
(
ip_addr_cmp
(
&
(
lpcb
->
local_ip
),
&
current_iphdr_dest
))
{
...
@@ -284,7 +284,7 @@ tcp_input(struct pbuf *p, struct netif *inp)
...
@@ -284,7 +284,7 @@ tcp_input(struct pbuf *p, struct netif *inp)
}
}
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_input: packed for LISTENing connection.
\n
"
));
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_input: packed for LISTENing connection.
\n
"
));
tcp_listen_input
(
lpcb
);
//
发出tcp监听数据包
tcp_listen_input
(
lpcb
);
//
����tcp������ݰ�
pbuf_free
(
p
);
pbuf_free
(
p
);
return
;
return
;
}
}
...
@@ -318,7 +318,7 @@ tcp_input(struct pbuf *p, struct netif *inp)
...
@@ -318,7 +318,7 @@ tcp_input(struct pbuf *p, struct netif *inp)
if
(
pcb
->
refused_data
!=
NULL
)
{
if
(
pcb
->
refused_data
!=
NULL
)
{
/* Notify again application with data previously received. */
/* Notify again application with data previously received. */
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_input: notify kept packet
\n
"
));
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_input: notify kept packet
\n
"
));
TCP_EVENT_RECV
(
pcb
,
pcb
->
refused_data
,
ERR_OK
,
err
);
//pcb
接收数据
TCP_EVENT_RECV
(
pcb
,
pcb
->
refused_data
,
ERR_OK
,
err
);
//pcb
�������
if
(
err
==
ERR_OK
)
{
if
(
err
==
ERR_OK
)
{
pcb
->
refused_data
=
NULL
;
pcb
->
refused_data
=
NULL
;
}
else
if
((
err
==
ERR_ABRT
)
||
(
tcplen
>
0
))
{
}
else
if
((
err
==
ERR_ABRT
)
||
(
tcplen
>
0
))
{
...
@@ -326,14 +326,14 @@ tcp_input(struct pbuf *p, struct netif *inp)
...
@@ -326,14 +326,14 @@ tcp_input(struct pbuf *p, struct netif *inp)
/* Drop incoming packets because pcb is "full" (only if the incoming
/* Drop incoming packets because pcb is "full" (only if the incoming
segment contains data). */
segment contains data). */
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_input: drop incoming packets, because pcb is
\"
full
\"\n
"
));
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_input: drop incoming packets, because pcb is
\"
full
\"\n
"
));
TCP_STATS_INC
(
tcp
.
drop
);
//tcp
丢弃计数
TCP_STATS_INC
(
tcp
.
drop
);
//tcp
�������
snmp_inc_tcpinerrs
();
snmp_inc_tcpinerrs
();
pbuf_free
(
p
);
pbuf_free
(
p
);
return
;
return
;
}
}
}
}
tcp_input_pcb
=
pcb
;
//
记录当前报文处理的控制块
tcp_input_pcb
=
pcb
;
//
��¼��ǰ���Ĵ���Ŀ��ƿ�
err
=
tcp_process
(
pcb
);
//
处理报文
err
=
tcp_process
(
pcb
);
//
���?��
/* A return value of ERR_ABRT means that tcp_abort() was called
/* A return value of ERR_ABRT means that tcp_abort() was called
and that the pcb has been freed. If so, we don't do anything. */
and that the pcb has been freed. If so, we don't do anything. */
if
(
err
!=
ERR_ABRT
)
{
if
(
err
!=
ERR_ABRT
)
{
...
@@ -343,7 +343,7 @@ tcp_input(struct pbuf *p, struct netif *inp)
...
@@ -343,7 +343,7 @@ tcp_input(struct pbuf *p, struct netif *inp)
application that the connection is dead before we
application that the connection is dead before we
deallocate the PCB. */
deallocate the PCB. */
TCP_EVENT_ERR
(
pcb
->
errf
,
pcb
->
callback_arg
,
ERR_RST
);
TCP_EVENT_ERR
(
pcb
->
errf
,
pcb
->
callback_arg
,
ERR_RST
);
tcp_pcb_remove
(
&
tcp_active_pcbs
,
pcb
);
//删
除激活pcb列表中的
pcb
tcp_pcb_remove
(
&
tcp_active_pcbs
,
pcb
);
//ɾ
���pcb�б��е�pcb
memp_free
(
MEMP_TCP_PCB
,
pcb
);
memp_free
(
MEMP_TCP_PCB
,
pcb
);
}
else
if
(
recv_flags
&
TF_CLOSED
)
{
}
else
if
(
recv_flags
&
TF_CLOSED
)
{
/* The connection has been closed and we will deallocate the
/* The connection has been closed and we will deallocate the
...
@@ -362,13 +362,13 @@ tcp_input(struct pbuf *p, struct netif *inp)
...
@@ -362,13 +362,13 @@ tcp_input(struct pbuf *p, struct netif *inp)
called when new send buffer space is available, we call it
called when new send buffer space is available, we call it
now. */
now. */
if
(
pcb
->
acked
>
0
)
{
if
(
pcb
->
acked
>
0
)
{
TCP_EVENT_SENT
(
pcb
,
pcb
->
acked
,
err
);
//
有数据被确认,回调用户的send函数
TCP_EVENT_SENT
(
pcb
,
pcb
->
acked
,
err
);
//
����ݱ�ȷ�ϣ��ص��û���send����
if
(
err
==
ERR_ABRT
)
{
if
(
err
==
ERR_ABRT
)
{
goto
aborted
;
goto
aborted
;
}
}
}
}
if
(
recv_data
!=
NULL
)
{
//
有数据接收到
if
(
recv_data
!=
NULL
)
{
//
����ݽ��յ�
LWIP_ASSERT
(
"pcb->refused_data == NULL"
,
pcb
->
refused_data
==
NULL
);
LWIP_ASSERT
(
"pcb->refused_data == NULL"
,
pcb
->
refused_data
==
NULL
);
if
(
pcb
->
flags
&
TF_RXCLOSED
)
{
if
(
pcb
->
flags
&
TF_RXCLOSED
)
{
/* received data although already closed -> abort (send RST) to
/* received data although already closed -> abort (send RST) to
...
@@ -378,12 +378,12 @@ tcp_input(struct pbuf *p, struct netif *inp)
...
@@ -378,12 +378,12 @@ tcp_input(struct pbuf *p, struct netif *inp)
goto
aborted
;
goto
aborted
;
}
}
//PSH
标
志 PSH
紧急位。
//PSH
��־
PSH �
����
//
当
PSH=1时
,要求发送方马上发送
该分段
,
//
而接收方尽快的将报文交给应用层,不做队列处理。
//
����շ�����Ľ����Ľ���Ӧ�ò㣬�������д��?
if
(
flags
&
TCP_PSH
)
{
if
(
flags
&
TCP_PSH
)
{
recv_data
->
flags
|=
PBUF_FLAG_PUSH
;
//
这段b
uffer应
该立即存起来
recv_data
->
flags
|=
PBUF_FLAG_PUSH
;
//
���bu
fferӦ�
�����������
}
}
/* Notify application that data has been received. */
/* Notify application that data has been received. */
...
@@ -414,9 +414,9 @@ tcp_input(struct pbuf *p, struct netif *inp)
...
@@ -414,9 +414,9 @@ tcp_input(struct pbuf *p, struct netif *inp)
}
}
}
}
tcp_input_pcb
=
NULL
;
//
清空全局变量
tcp_input_pcb
=
NULL
;
//
���ȫ�ֱ���
/* Try to send something out. */
/* Try to send something out. */
tcp_output
(
pcb
);
//
尝试输出报文
tcp_output
(
pcb
);
//
�����������
#if TCP_INPUT_DEBUG
#if TCP_INPUT_DEBUG
#if TCP_DEBUG
#if TCP_DEBUG
tcp_debug_print_state
(
pcb
->
state
);
tcp_debug_print_state
(
pcb
->
state
);
...
@@ -433,7 +433,7 @@ aborted:
...
@@ -433,7 +433,7 @@ aborted:
/* give up our reference to inseg.p */
/* give up our reference to inseg.p */
if
(
inseg
.
p
!=
NULL
)
if
(
inseg
.
p
!=
NULL
)
{
{
pbuf_free
(
inseg
.
p
);
//
释放
buffer
pbuf_free
(
inseg
.
p
);
//
�ͷ�b
uffer
inseg
.
p
=
NULL
;
inseg
.
p
=
NULL
;
}
}
}
else
{
}
else
{
...
@@ -442,11 +442,11 @@ aborted:
...
@@ -442,11 +442,11 @@ aborted:
sender. */
sender. */
LWIP_DEBUGF
(
TCP_RST_DEBUG
,
(
"tcp_input: no PCB match found, resetting.
\n
"
));
LWIP_DEBUGF
(
TCP_RST_DEBUG
,
(
"tcp_input: no PCB match found, resetting.
\n
"
));
if
(
!
(
TCPH_FLAGS
(
tcphdr
)
&
TCP_RST
))
{
if
(
!
(
TCPH_FLAGS
(
tcphdr
)
&
TCP_RST
))
{
TCP_STATS_INC
(
tcp
.
proterr
);
//协
议错误计数
TCP_STATS_INC
(
tcp
.
proterr
);
//Э
��������
TCP_STATS_INC
(
tcp
.
drop
);
//tcp
丢弃计数
TCP_STATS_INC
(
tcp
.
drop
);
//tcp
�������
tcp_rst
(
ackno
,
seqno
+
tcplen
,
tcp_rst
(
ackno
,
seqno
+
tcplen
,
ip_current_dest_addr
(),
ip_current_src_addr
(),
ip_current_dest_addr
(),
ip_current_src_addr
(),
tcphdr
->
dest
,
tcphdr
->
src
);
//
发送TCP复
位
tcphdr
->
dest
,
tcphdr
->
src
);
//
����TCP��λ
}
}
pbuf_free
(
p
);
pbuf_free
(
p
);
}
}
...
@@ -468,8 +468,8 @@ aborted:
...
@@ -468,8 +468,8 @@ aborted:
* involved is passed as a parameter to this function
* involved is passed as a parameter to this function
*/
*/
/*
/*
*
处于
LISTEN状态
的控制块调用该函数,
*
����LI
STEN״̬�Ŀ
��ƿ���øú���
*通
常是服务器端主动打开一个端口并侦听客户端SYN连接请求
*ͨ
���Ƿ�������������һ���˿ڲ�����ͻ���SYN��������
*
*
*/
*/
static
err_t
static
err_t
...
@@ -489,7 +489,7 @@ tcp_listen_input(struct tcp_pcb_listen *pcb)
...
@@ -489,7 +489,7 @@ tcp_listen_input(struct tcp_pcb_listen *pcb)
tcp_rst
(
ackno
+
1
,
seqno
+
tcplen
,
tcp_rst
(
ackno
+
1
,
seqno
+
tcplen
,
ip_current_dest_addr
(),
ip_current_src_addr
(),
ip_current_dest_addr
(),
ip_current_src_addr
(),
tcphdr
->
dest
,
tcphdr
->
src
);
tcphdr
->
dest
,
tcphdr
->
src
);
}
else
if
(
flags
&
TCP_SYN
)
{
//
收到SYN报文
}
else
if
(
flags
&
TCP_SYN
)
{
//
�յ�SYN����
LWIP_DEBUGF
(
TCP_DEBUG
,
(
"TCP connection request %"
U16_F
" -> %"
U16_F
".
\n
"
,
tcphdr
->
src
,
tcphdr
->
dest
));
LWIP_DEBUGF
(
TCP_DEBUG
,
(
"TCP connection request %"
U16_F
" -> %"
U16_F
".
\n
"
,
tcphdr
->
src
,
tcphdr
->
dest
));
#if TCP_LISTEN_BACKLOG
#if TCP_LISTEN_BACKLOG
if
(
pcb
->
accepts_pending
>=
pcb
->
backlog
)
{
if
(
pcb
->
accepts_pending
>=
pcb
->
backlog
)
{
...
@@ -504,30 +504,31 @@ tcp_listen_input(struct tcp_pcb_listen *pcb)
...
@@ -504,30 +504,31 @@ tcp_listen_input(struct tcp_pcb_listen *pcb)
TCP_STATS_INC
(
tcp
.
memerr
);
TCP_STATS_INC
(
tcp
.
memerr
);
return
ERR_MEM
;
return
ERR_MEM
;
}
}
npcb
=
tcp_alloc
(
pcb
->
prio
);
//
创建控制块
npcb
=
tcp_alloc
(
pcb
->
prio
);
//
�������ƿ�
/* If a new PCB could not be created (probably due to lack of memory),
/* If a new PCB could not be created (probably due to lack of memory),
we don't do anything, but rely on the sender will retransmit the
we don't do anything, but rely on the sender will retransmit the
SYN at a time when we have more memory available. */
SYN at a time when we have more memory available. */
if
(
npcb
==
NULL
)
{
if
(
npcb
==
NULL
)
{
LWIP_DEBUGF
(
TCP_DEBUG
,
(
"tcp_listen_input: could not allocate PCB
\n
"
));
LWIP_DEBUGF
(
TCP_DEBUG
,
(
"tcp_listen_input: could not allocate PCB
\n
"
));
TCP_STATS_INC
(
tcp
.
memerr
);
//TCP
内存错误计数
TCP_STATS_INC
(
tcp
.
memerr
);
//TCP
�ڴ�������
return
ERR_MEM
;
return
ERR_MEM
;
}
}
#if TCP_LISTEN_BACKLOG
#if TCP_LISTEN_BACKLOG
pcb
->
accepts_pending
++
;
pcb
->
accepts_pending
++
;
#endif
/* TCP_LISTEN_BACKLOG */
#endif
/* TCP_LISTEN_BACKLOG */
/* Set up the new PCB. */
/* Set up the new PCB. */
//
控制块与连接相关的4个字段
//
���ƿ���������ص�4���ֶ�
ip_addr_copy
(
npcb
->
local_ip
,
current_iphdr_dest
);
ip_addr_copy
(
npcb
->
local_ip
,
current_iphdr_dest
);
npcb
->
local_port
=
pcb
->
local_port
;
npcb
->
local_port
=
pcb
->
local_port
;
ip_addr_copy
(
npcb
->
remote_ip
,
current_iphdr_src
);
ip_addr_copy
(
npcb
->
remote_ip
,
current_iphdr_src
);
npcb
->
remote_port
=
tcphdr
->
src
;
npcb
->
remote_port
=
tcphdr
->
src
;
//
控制块中其余字段
//
���ƿ��������ֶ�
npcb
->
state
=
SYN_RCVD
;
//
设置连接
状态
npcb
->
state
=
SYN_RCVD
;
//
��������״̬
npcb
->
rcv_nxt
=
seqno
+
1
;
//
设置下一个接收数据序号
npcb
->
rcv_nxt
=
seqno
+
1
;
//
������һ������������
npcb
->
rcv_ann_right_edge
=
npcb
->
rcv_nxt
;
npcb
->
rcv_ann_right_edge
=
npcb
->
rcv_nxt
;
npcb
->
snd_wnd
=
tcphdr
->
wnd
;
//
设置发送窗口
npcb
->
snd_wnd
=
tcphdr
->
wnd
;
//
���÷��ʹ���
npcb
->
ssthresh
=
npcb
->
snd_wnd
;
npcb
->
ssthresh
=
npcb
->
snd_wnd
;
npcb
->
snd_wl1
=
seqno
-
1
;
/* initialise to seqno-1 to force window update */
npcb
->
snd_wl1
=
seqno
-
1
;
/* initialise to seqno-1 to force window update */
npcb
->
callback_arg
=
pcb
->
callback_arg
;
npcb
->
callback_arg
=
pcb
->
callback_arg
;
...
@@ -550,11 +551,11 @@ tcp_listen_input(struct tcp_pcb_listen *pcb)
...
@@ -550,11 +551,11 @@ tcp_listen_input(struct tcp_pcb_listen *pcb)
/* Send a SYN|ACK together with the MSS option. */
/* Send a SYN|ACK together with the MSS option. */
rc
=
tcp_enqueue_flags
(
npcb
,
TCP_SYN
|
TCP_ACK
);
rc
=
tcp_enqueue_flags
(
npcb
,
TCP_SYN
|
TCP_ACK
);
if
(
rc
!=
ERR_OK
)
{
//
发生错误,释放新控制块
if
(
rc
!=
ERR_OK
)
{
//
��������ͷ��¿��ƿ�
tcp_abandon
(
npcb
,
0
);
tcp_abandon
(
npcb
,
0
);
return
rc
;
return
rc
;
}
}
return
tcp_output
(
npcb
);
//
发送报文
return
tcp_output
(
npcb
);
//
���ͱ���
}
}
return
ERR_OK
;
return
ERR_OK
;
}
}
...
@@ -569,20 +570,20 @@ tcp_listen_input(struct tcp_pcb_listen *pcb)
...
@@ -569,20 +570,20 @@ tcp_listen_input(struct tcp_pcb_listen *pcb)
* involved is passed as a parameter to this function
* involved is passed as a parameter to this function
*/
*/
/*
/*
*
处于
TIME_WAIT状态
的控制块调用该函数处理收到的报文段,
*
����TI
ME_WAIT״̬�Ŀ
��ƿ���øú������յ��ı��ĶΣ�
*
该状态下,关闭连接的握手过程已经结束,正处于等待2MSL超时,
*
��״̬�£��ر����ӵ����ֹ���Ѿ��������ڵȴ�2MSL��ʱ��
*
该状态下的报文多数是连接中的旧数据,直接删除即可。
*
��״̬�µı��Ķ����������еľ���ݣ�ֱ��ɾ��ɡ�
*
但需要向发送方返回ACK报文
*
����Ҫ���ͷ�����ACK����
*/
*/
static
err_t
static
err_t
tcp_timewait_input
(
struct
tcp_pcb
*
pcb
)
tcp_timewait_input
(
struct
tcp_pcb
*
pcb
)
{
{
if
(
flags
&
TCP_RST
)
{
//RST
置位,直接返回
if
(
flags
&
TCP_RST
)
{
//RST
��λ��ֱ�ӷ���
return
ERR_OK
;
return
ERR_OK
;
}
}
if
(
flags
&
TCP_SYN
)
{
//
包含SYN握手信息,且握手数据编号在接收窗口内,向发送方发送RST报文
if
(
flags
&
TCP_SYN
)
{
//
��SYN������Ϣ����������ݱ���ڽ��մ����ڣ����ͷ�����RST����
if
(
TCP_SEQ_BETWEEN
(
seqno
,
pcb
->
rcv_nxt
,
pcb
->
rcv_nxt
+
pcb
->
rcv_wnd
))
{
if
(
TCP_SEQ_BETWEEN
(
seqno
,
pcb
->
rcv_nxt
,
pcb
->
rcv_nxt
+
pcb
->
rcv_wnd
))
{
...
@@ -590,13 +591,13 @@ tcp_timewait_input(struct tcp_pcb *pcb)
...
@@ -590,13 +591,13 @@ tcp_timewait_input(struct tcp_pcb *pcb)
tcphdr
->
dest
,
tcphdr
->
src
);
tcphdr
->
dest
,
tcphdr
->
src
);
return
ERR_OK
;
return
ERR_OK
;
}
}
}
else
if
(
flags
&
TCP_FIN
)
{
//
报文包含FIN握手信
息
}
else
if
(
flags
&
TCP_FIN
)
{
//
���İ�FIN������Ϣ
pcb
->
tmr
=
tcp_ticks
;
//
复位等待2MSL时间,控制块重新等待
2MSL
pcb
->
tmr
=
tcp_ticks
;
//
��λ�ȴ�2MSLʱ�䣬���ƿ����µȴ�2MSL
}
}
if
((
tcplen
>
0
))
{
//
对于有数据的报文或者在接收窗口外的SYN报文
if
((
tcplen
>
0
))
{
//
��������ݵı��Ļ����ڽ��մ������SYN����
pcb
->
flags
|=
TF_ACK_NOW
;
//
发送一个ACK报文
pcb
->
flags
|=
TF_ACK_NOW
;
//
����һ��ACK����
return
tcp_output
(
pcb
);
return
tcp_output
(
pcb
);
}
}
return
ERR_OK
;
return
ERR_OK
;
...
@@ -899,13 +900,13 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -899,13 +900,13 @@ tcp_receive(struct tcp_pcb *pcb)
u16_t
new_tot_len
;
u16_t
new_tot_len
;
int
found_dupack
=
0
;
int
found_dupack
=
0
;
if
(
flags
&
TCP_ACK
)
{
//
报文包含
ACK
if
(
flags
&
TCP_ACK
)
{
//
����AC
K
right_wnd_edge
=
pcb
->
snd_wnd
+
pcb
->
snd_wl2
;
//
发送窗口 + 序列应答最后窗口更新
right_wnd_edge
=
pcb
->
snd_wnd
+
pcb
->
snd_wl2
;
//
���ʹ��� + ����Ӧ����ڸ���
// first /* Update window. */
// first /* Update window. */
/*seqno > snd_wl1
;建立握手过程采用此种更新
;
/*seqno > snd_wl1
���������ֹ�̲��ô��ָ���;
*seqno = snd_wl1
并且
ackno > snd_wl2;
此时,对方没有发送数据,只是收到数据的确认
;
*seqno = snd_wl1
����ac
kno > snd_wl2;��
ʱ���Է�û�з�����ݣ�ֻ���յ���ݵ�ȷ��;
*ackno = snd_wl2
且报文首部有比snd_wnd更大的窗口.重新设置相
应值
*ackno = snd_wl2
�ұ����ײ��б�snd_wnd���Ĵ���.����������Ӧֵ
*/
*/
if
(
TCP_SEQ_LT
(
pcb
->
snd_wl1
,
seqno
)
||
if
(
TCP_SEQ_LT
(
pcb
->
snd_wl1
,
seqno
)
||
(
pcb
->
snd_wl1
==
seqno
&&
TCP_SEQ_LT
(
pcb
->
snd_wl2
,
ackno
))
||
(
pcb
->
snd_wl1
==
seqno
&&
TCP_SEQ_LT
(
pcb
->
snd_wl2
,
ackno
))
||
...
@@ -914,7 +915,7 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -914,7 +915,7 @@ tcp_receive(struct tcp_pcb *pcb)
pcb
->
snd_wl1
=
seqno
;
pcb
->
snd_wl1
=
seqno
;
pcb
->
snd_wl2
=
ackno
;
pcb
->
snd_wl2
=
ackno
;
if
(
pcb
->
snd_wnd
>
0
&&
pcb
->
persist_backoff
>
0
)
{
if
(
pcb
->
snd_wnd
>
0
&&
pcb
->
persist_backoff
>
0
)
{
pcb
->
persist_backoff
=
0
;
//
持续计时器退出
pcb
->
persist_backoff
=
0
;
//
�����ʱ���˳�
}
}
LWIP_DEBUGF
(
TCP_WND_DEBUG
,
(
"tcp_receive: window update %"
U16_F
"
\n
"
,
pcb
->
snd_wnd
));
LWIP_DEBUGF
(
TCP_WND_DEBUG
,
(
"tcp_receive: window update %"
U16_F
"
\n
"
,
pcb
->
snd_wnd
));
#if TCP_WND_DEBUG
#if TCP_WND_DEBUG
...
@@ -930,10 +931,10 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -930,10 +931,10 @@ tcp_receive(struct tcp_pcb *pcb)
/* (From Stevens TCP/IP Illustrated Vol II, p970.) Its only a
/* (From Stevens TCP/IP Illustrated Vol II, p970.) Its only a
* duplicate ack if:
* duplicate ack if:
* 1) It doesn't ACK new data 没
有确认新数据
* 1) It doesn't ACK new data û
��ȷ�������
* 2) length of received packet is zero (i.e. no payload)
报文段巫任何数据
* 2) length of received packet is zero (i.e. no payload)
���Ķ����κ����
* 3) the advertised window hasn't changed
本地窗口没有更新
* 3) the advertised window hasn't changed
���ش���û�и���
* 4) There is outstanding unacknowledged data (retransmission timer running)
正有数据等待确认
* 4) There is outstanding unacknowledged data (retransmission timer running)
������ݵȴ�ȷ��
* 5) The ACK is == biggest ACK sequence number so far seen (snd_una) ackno = lastack
* 5) The ACK is == biggest ACK sequence number so far seen (snd_una) ackno = lastack
*
*
* If it passes all five, should process as a dupack:
* If it passes all five, should process as a dupack:
...
@@ -949,7 +950,7 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -949,7 +950,7 @@ tcp_receive(struct tcp_pcb *pcb)
*/
*/
/* Clause 1 */
/* Clause 1 */
if
(
TCP_SEQ_LEQ
(
ackno
,
pcb
->
lastack
))
{
//
是重复
ACK?
if
(
TCP_SEQ_LEQ
(
ackno
,
pcb
->
lastack
))
{
//
���ظ�AC
K?
pcb
->
acked
=
0
;
pcb
->
acked
=
0
;
/* Clause 2 */
/* Clause 2 */
if
(
tcplen
==
0
)
{
if
(
tcplen
==
0
)
{
...
@@ -968,7 +969,7 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -968,7 +969,7 @@ tcp_receive(struct tcp_pcb *pcb)
if
((
u16_t
)(
pcb
->
cwnd
+
pcb
->
mss
)
>
pcb
->
cwnd
)
{
if
((
u16_t
)(
pcb
->
cwnd
+
pcb
->
mss
)
>
pcb
->
cwnd
)
{
pcb
->
cwnd
+=
pcb
->
mss
;
pcb
->
cwnd
+=
pcb
->
mss
;
}
}
}
else
if
(
pcb
->
dupacks
==
3
)
{
//
是重复
ACK
}
else
if
(
pcb
->
dupacks
==
3
)
{
//
���ظ�AC
K
/* Do fast retransmit */
/* Do fast retransmit */
tcp_rexmit_fast
(
pcb
);
tcp_rexmit_fast
(
pcb
);
}
}
...
@@ -981,7 +982,7 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -981,7 +982,7 @@ tcp_receive(struct tcp_pcb *pcb)
if
(
!
found_dupack
)
{
if
(
!
found_dupack
)
{
pcb
->
dupacks
=
0
;
pcb
->
dupacks
=
0
;
}
}
}
else
if
(
TCP_SEQ_BETWEEN
(
ackno
,
pcb
->
lastack
+
1
,
pcb
->
snd_nxt
)){
//ackno
在
lastack+1
和
snd_nxt之
间,判断发送窗口内数据
}
else
if
(
TCP_SEQ_BETWEEN
(
ackno
,
pcb
->
lastack
+
1
,
pcb
->
snd_nxt
)){
//ackno
��l
astack+1�
�sn
d_nxt֮�䣬
�жϷ��ʹ��������
/* We come here when the ACK acknowledges new data. */
/* We come here when the ACK acknowledges new data. */
if
(
pcb
->
flags
&
TF_INFR
)
{
if
(
pcb
->
flags
&
TF_INFR
)
{
...
@@ -1006,7 +1007,7 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -1006,7 +1007,7 @@ tcp_receive(struct tcp_pcb *pcb)
/* Update the congestion control variables (cwnd and
/* Update the congestion control variables (cwnd and
ssthresh). */
ssthresh). */
if
(
pcb
->
state
>=
ESTABLISHED
)
{
//状态为
建立连接标
志
if
(
pcb
->
state
>=
ESTABLISHED
)
{
//״̬Ϊ
�������ӱ�־
if
(
pcb
->
cwnd
<
pcb
->
ssthresh
)
{
if
(
pcb
->
cwnd
<
pcb
->
ssthresh
)
{
if
((
u16_t
)(
pcb
->
cwnd
+
pcb
->
mss
)
>
pcb
->
cwnd
)
{
if
((
u16_t
)(
pcb
->
cwnd
+
pcb
->
mss
)
>
pcb
->
cwnd
)
{
pcb
->
cwnd
+=
pcb
->
mss
;
pcb
->
cwnd
+=
pcb
->
mss
;
...
@@ -1029,8 +1030,8 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -1029,8 +1030,8 @@ tcp_receive(struct tcp_pcb *pcb)
/* Remove segment from the unacknowledged list if the incoming
/* Remove segment from the unacknowledged list if the incoming
ACK acknowlegdes them.
ACK acknowlegdes them.
*
释放
unacked
队列上被确认的报文段,
*
�ͷ�u
nacked�
����ϱ�ȷ�ϵı��ĶΣ�
*直
到
unacked
队列为空
停止*/
*ֱ
��u
nacked�
���Ϊ��ֹͣ*/
while
(
pcb
->
unacked
!=
NULL
&&
while
(
pcb
->
unacked
!=
NULL
&&
TCP_SEQ_LEQ
(
ntohl
(
pcb
->
unacked
->
tcphdr
->
seqno
)
+
TCP_SEQ_LEQ
(
ntohl
(
pcb
->
unacked
->
tcphdr
->
seqno
)
+
TCP_TCPLEN
(
pcb
->
unacked
),
ackno
))
{
TCP_TCPLEN
(
pcb
->
unacked
),
ackno
))
{
...
@@ -1039,8 +1040,8 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -1039,8 +1040,8 @@ tcp_receive(struct tcp_pcb *pcb)
ntohl
(
pcb
->
unacked
->
tcphdr
->
seqno
)
+
ntohl
(
pcb
->
unacked
->
tcphdr
->
seqno
)
+
TCP_TCPLEN
(
pcb
->
unacked
)));
TCP_TCPLEN
(
pcb
->
unacked
)));
next
=
pcb
->
unacked
;
//pcb unacked
标
志
next
=
pcb
->
unacked
;
//pcb unacked
��־
pcb
->
unacked
=
pcb
->
unacked
->
next
;
//pcb unacked
下一个标
志
pcb
->
unacked
=
pcb
->
unacked
->
next
;
//pcb unacked
��һ����־
LWIP_DEBUGF
(
TCP_QLEN_DEBUG
,
(
"tcp_receive: queuelen %"
U16_F
" ... "
,
(
u16_t
)
pcb
->
snd_queuelen
));
LWIP_DEBUGF
(
TCP_QLEN_DEBUG
,
(
"tcp_receive: queuelen %"
U16_F
" ... "
,
(
u16_t
)
pcb
->
snd_queuelen
));
LWIP_ASSERT
(
"pcb->snd_queuelen >= pbuf_clen(next->p)"
,
(
pcb
->
snd_queuelen
>=
pbuf_clen
(
next
->
p
)));
LWIP_ASSERT
(
"pcb->snd_queuelen >= pbuf_clen(next->p)"
,
(
pcb
->
snd_queuelen
>=
pbuf_clen
(
next
->
p
)));
...
@@ -1049,8 +1050,8 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -1049,8 +1050,8 @@ tcp_receive(struct tcp_pcb *pcb)
pcb
->
acked
--
;
pcb
->
acked
--
;
}
}
pcb
->
snd_queuelen
-=
pbuf_clen
(
next
->
p
);
//
计算链表里面的pbufs数量
pcb
->
snd_queuelen
-=
pbuf_clen
(
next
->
p
);
//
�������������pbufs����
tcp_seg_free
(
next
);
//
释放tcp段
tcp_seg_free
(
next
);
//
�ͷ�tcp��
LWIP_DEBUGF
(
TCP_QLEN_DEBUG
,
(
"%"
U16_F
" (after freeing unacked)
\n
"
,
(
u16_t
)
pcb
->
snd_queuelen
));
LWIP_DEBUGF
(
TCP_QLEN_DEBUG
,
(
"%"
U16_F
" (after freeing unacked)
\n
"
,
(
u16_t
)
pcb
->
snd_queuelen
));
if
(
pcb
->
snd_queuelen
!=
0
)
{
if
(
pcb
->
snd_queuelen
!=
0
)
{
...
@@ -1061,10 +1062,10 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -1061,10 +1062,10 @@ tcp_receive(struct tcp_pcb *pcb)
/* If there's nothing left to acknowledge, stop the retransmit
/* If there's nothing left to acknowledge, stop the retransmit
timer, otherwise reset it to start again */
timer, otherwise reset it to start again */
if
(
pcb
->
unacked
==
NULL
)
//
无数据等待确认
if
(
pcb
->
unacked
==
NULL
)
//
����ݵȴ�ȷ��
pcb
->
rtime
=
-
1
;
//停止
重传定时器
pcb
->
rtime
=
-
1
;
//ֹͣ
�ش���ʱ��
else
else
pcb
->
rtime
=
0
;
//
复位重传定时器
pcb
->
rtime
=
0
;
//
��λ�ش���ʱ��
pcb
->
polltmr
=
0
;
pcb
->
polltmr
=
0
;
}
else
{
}
else
{
...
@@ -1078,7 +1079,7 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -1078,7 +1079,7 @@ tcp_receive(struct tcp_pcb *pcb)
rationale is that lwIP puts all outstanding segments on the
rationale is that lwIP puts all outstanding segments on the
->unsent list after a retransmission, so these segments may
->unsent list after a retransmission, so these segments may
in fact have been sent once. */
in fact have been sent once. */
/** unsent
队列上是否能被ackno确认的报文段,有则释放
**/
/** unsent
�������Ƿ��ܱ�acknoȷ�ϵı��ĶΣ������ͷ�**/
while
(
pcb
->
unsent
!=
NULL
&&
while
(
pcb
->
unsent
!=
NULL
&&
TCP_SEQ_BETWEEN
(
ackno
,
ntohl
(
pcb
->
unsent
->
tcphdr
->
seqno
)
+
TCP_SEQ_BETWEEN
(
ackno
,
ntohl
(
pcb
->
unsent
->
tcphdr
->
seqno
)
+
TCP_TCPLEN
(
pcb
->
unsent
),
pcb
->
snd_nxt
))
{
TCP_TCPLEN
(
pcb
->
unsent
),
pcb
->
snd_nxt
))
{
...
@@ -1086,18 +1087,18 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -1086,18 +1087,18 @@ tcp_receive(struct tcp_pcb *pcb)
ntohl
(
pcb
->
unsent
->
tcphdr
->
seqno
),
ntohl
(
pcb
->
unsent
->
tcphdr
->
seqno
)
+
ntohl
(
pcb
->
unsent
->
tcphdr
->
seqno
),
ntohl
(
pcb
->
unsent
->
tcphdr
->
seqno
)
+
TCP_TCPLEN
(
pcb
->
unsent
)));
TCP_TCPLEN
(
pcb
->
unsent
)));
next
=
pcb
->
unsent
;
//pcb未
发送标
志
next
=
pcb
->
unsent
;
//pcbδ
���ͱ�־
pcb
->
unsent
=
pcb
->
unsent
->
next
;
//未
发送的下一个
pcb
->
unsent
=
pcb
->
unsent
->
next
;
//δ
���͵���һ��
LWIP_DEBUGF
(
TCP_QLEN_DEBUG
,
(
"tcp_receive: queuelen %"
U16_F
" ... "
,
(
u16_t
)
pcb
->
snd_queuelen
));
LWIP_DEBUGF
(
TCP_QLEN_DEBUG
,
(
"tcp_receive: queuelen %"
U16_F
" ... "
,
(
u16_t
)
pcb
->
snd_queuelen
));
LWIP_ASSERT
(
"pcb->snd_queuelen >= pbuf_clen(next->p)"
,
(
pcb
->
snd_queuelen
>=
pbuf_clen
(
next
->
p
)));
LWIP_ASSERT
(
"pcb->snd_queuelen >= pbuf_clen(next->p)"
,
(
pcb
->
snd_queuelen
>=
pbuf_clen
(
next
->
p
)));
/* Prevent ACK for FIN to generate a sent event */
/* Prevent ACK for FIN to generate a sent event */
if
((
pcb
->
acked
!=
0
)
&&
((
TCPH_FLAGS
(
next
->
tcphdr
)
&
TCP_FIN
)
!=
0
))
{
if
((
pcb
->
acked
!=
0
)
&&
((
TCPH_FLAGS
(
next
->
tcphdr
)
&
TCP_FIN
)
!=
0
))
{
pcb
->
acked
--
;
pcb
->
acked
--
;
}
}
pcb
->
snd_queuelen
-=
pbuf_clen
(
next
->
p
);
//
链表中pbuf的个数
pcb
->
snd_queuelen
-=
pbuf_clen
(
next
->
p
);
//
������pbuf�ĸ���
tcp_seg_free
(
next
);
//
释放段
tcp_seg_free
(
next
);
//
�ͷŶ�
LWIP_DEBUGF
(
TCP_QLEN_DEBUG
,
(
"%"
U16_F
" (after freeing unsent)
\n
"
,
(
u16_t
)
pcb
->
snd_queuelen
));
LWIP_DEBUGF
(
TCP_QLEN_DEBUG
,
(
"%"
U16_F
" (after freeing unsent)
\n
"
,
(
u16_t
)
pcb
->
snd_queuelen
));
if
(
pcb
->
snd_queuelen
!=
0
)
{
//
发送序列长度
if
(
pcb
->
snd_queuelen
!=
0
)
{
//
���������
LWIP_ASSERT
(
"tcp_receive: valid queue length"
,
LWIP_ASSERT
(
"tcp_receive: valid queue length"
,
pcb
->
unacked
!=
NULL
||
pcb
->
unsent
!=
NULL
);
pcb
->
unacked
!=
NULL
||
pcb
->
unsent
!=
NULL
);
}
}
...
@@ -1110,15 +1111,15 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -1110,15 +1111,15 @@ tcp_receive(struct tcp_pcb *pcb)
/* RTT estimation calculations. This is done by checking if the
/* RTT estimation calculations. This is done by checking if the
incoming segment acknowledges the segment we use to take a
incoming segment acknowledges the segment we use to take a
round-trip time measurement. */
round-trip time measurement. */
if
(
pcb
->
rttest
&&
TCP_SEQ_LT
(
pcb
->
rtseq
,
ackno
))
{
//RTT
正在进行且该报文段被确认
if
(
pcb
->
rttest
&&
TCP_SEQ_LT
(
pcb
->
rtseq
,
ackno
))
{
//RTT
���ڽ����Ҹñ��Ķα�ȷ��
/* diff between this shouldn't exceed 32K since this are tcp timer ticks
/* diff between this shouldn't exceed 32K since this are tcp timer ticks
and a round-trip shouldn't be that long... */
and a round-trip shouldn't be that long... */
m
=
(
s16_t
)(
tcp_ticks
-
pcb
->
rttest
);
//
计算
M值
m
=
(
s16_t
)(
tcp_ticks
-
pcb
->
rttest
);
//
����Mֵ
LWIP_DEBUGF
(
TCP_RTO_DEBUG
,
(
"tcp_receive: experienced rtt %"
U16_F
" ticks (%"
U16_F
" msec).
\n
"
,
LWIP_DEBUGF
(
TCP_RTO_DEBUG
,
(
"tcp_receive: experienced rtt %"
U16_F
" ticks (%"
U16_F
" msec).
\n
"
,
m
,
m
*
TCP_SLOW_INTERVAL
));
m
,
m
*
TCP_SLOW_INTERVAL
));
/* This is taken directly from VJs original code in his paper
具体见RTT计算
公式*/
/* This is taken directly from VJs original code in his paper
�����RTT���㹫ʽ*/
m
=
m
-
(
pcb
->
sa
>>
3
);
m
=
m
-
(
pcb
->
sa
>>
3
);
pcb
->
sa
+=
m
;
pcb
->
sa
+=
m
;
if
(
m
<
0
)
{
if
(
m
<
0
)
{
...
@@ -1137,7 +1138,7 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -1137,7 +1138,7 @@ tcp_receive(struct tcp_pcb *pcb)
/* If the incoming segment contains data, we must process it
/* If the incoming segment contains data, we must process it
further. */
further. */
if
(
(
tcplen
>
0
)
&&
(
!
pcb
->
hold
))
{
if
(
tcplen
>
0
)
{
/* This code basically does three things:
/* This code basically does three things:
+) If the incoming segment contains data that is the next
+) If the incoming segment contains data that is the next
...
@@ -1188,7 +1189,7 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -1188,7 +1189,7 @@ tcp_receive(struct tcp_pcb *pcb)
After we are done with adjusting the pbuf pointers we must
After we are done with adjusting the pbuf pointers we must
adjust the ->data pointer in the seg and the segment
adjust the ->data pointer in the seg and the segment
length.*/
length.*/
//去
掉报文段中数据编号低于rcv_nxt的数据
//ȥ
�����Ķ�����ݱ�ŵ���rcv_nxt�����
off
=
pcb
->
rcv_nxt
-
seqno
;
off
=
pcb
->
rcv_nxt
-
seqno
;
p
=
inseg
.
p
;
p
=
inseg
.
p
;
LWIP_ASSERT
(
"inseg.p != NULL"
,
inseg
.
p
);
LWIP_ASSERT
(
"inseg.p != NULL"
,
inseg
.
p
);
...
@@ -1222,8 +1223,8 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -1222,8 +1223,8 @@ tcp_receive(struct tcp_pcb *pcb)
if
(
TCP_SEQ_LT
(
seqno
,
pcb
->
rcv_nxt
)){
//seqno < rcv_nxt
if
(
TCP_SEQ_LT
(
seqno
,
pcb
->
rcv_nxt
)){
//seqno < rcv_nxt
/* the whole segment is < rcv_nxt */
/* the whole segment is < rcv_nxt */
/* must be a duplicate of a packet that has already been correctly handled */
/* must be a duplicate of a packet that has already been correctly handled */
//
报文段中所有数据编号均小于rcv_nxt,则此报文是重复报文,
//
���Ķ���������ݱ�ž�С��rcv_nxt����˱������ظ����ģ�
//直
接向源端响应ACK报文处理
//ֱ
����Դ����ӦACK���Ĵ���
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_receive: duplicate seqno %"
U32_F
"
\n
"
,
seqno
));
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_receive: duplicate seqno %"
U32_F
"
\n
"
,
seqno
));
tcp_ack_now
(
pcb
);
tcp_ack_now
(
pcb
);
...
@@ -1234,14 +1235,14 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -1234,14 +1235,14 @@ tcp_receive(struct tcp_pcb *pcb)
and below rcv_nxt + rcv_wnd) in order to be further
and below rcv_nxt + rcv_wnd) in order to be further
processed. */
processed. */
if
(
TCP_SEQ_BETWEEN
(
seqno
,
pcb
->
rcv_nxt
,
if
(
TCP_SEQ_BETWEEN
(
seqno
,
pcb
->
rcv_nxt
,
pcb
->
rcv_nxt
+
pcb
->
rcv_wnd
-
1
)){
//rcv_nxt < seqno < rcv_nxt + rcv_wnd - 1,
即数据在接收范围内
pcb
->
rcv_nxt
+
pcb
->
rcv_wnd
-
1
)){
//rcv_nxt < seqno < rcv_nxt + rcv_wnd - 1,
������ڽ��շ�Χ��
if
(
pcb
->
rcv_nxt
==
seqno
)
{
if
(
pcb
->
rcv_nxt
==
seqno
)
{
/* The incoming segment is the next in sequence. We check if
/* The incoming segment is the next in sequence. We check if
we have to trim the end of the segment and update rcv_nxt
we have to trim the end of the segment and update rcv_nxt
and pass the data to the application. */
and pass the data to the application. */
tcplen
=
TCP_TCPLEN
(
&
inseg
);
//
计算报文段长度
tcplen
=
TCP_TCPLEN
(
&
inseg
);
//
���㱨�Ķγ���
if
(
tcplen
>
pcb
->
rcv_wnd
)
{
//
超过接收窗口大小,将报文尾部截断
if
(
tcplen
>
pcb
->
rcv_wnd
)
{
//
������մ��ڴ�С��������β���ض�
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
LWIP_DEBUGF
(
TCP_INPUT_DEBUG
,
(
"tcp_receive: other end overran receive window"
(
"tcp_receive: other end overran receive window"
"seqno %"
U32_F
" len %"
U16_F
" right edge %"
U32_F
"
\n
"
,
"seqno %"
U32_F
" len %"
U16_F
" right edge %"
U32_F
"
\n
"
,
...
@@ -1408,17 +1409,17 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -1408,17 +1409,17 @@ tcp_receive(struct tcp_pcb *pcb)
contains less data. */
contains less data. */
prev
=
NULL
;
prev
=
NULL
;
for
(
next
=
pcb
->
ooseq
;
next
!=
NULL
;
next
=
next
->
next
)
{
//
从
ooseq取
下第M个报文段,该报文
段非空
,
M++
if
(
seqno
==
next
->
tcphdr
->
seqno
)
{
//
该报文段起始编号== 要插入的报文段编号
if
(
seqno
==
next
->
tcphdr
->
seqno
)
{
//
�ñ��Ķ���ʼ���== Ҫ����ı��Ķα��
/* The sequence number of the incoming segment is the
/* The sequence number of the incoming segment is the
same as the sequence number of the segment on
same as the sequence number of the segment on
->ooseq. We check the lengths to see which one to
->ooseq. We check the lengths to see which one to
discard. */
discard. */
if
(
inseg
.
len
>
next
->
len
)
{
//要
插入的报文段编号更长
if
(
inseg
.
len
>
next
->
len
)
{
//Ҫ
����ı��Ķα�Ÿ�
/* The incoming segment is larger than the old
/* The incoming segment is larger than the old
segment. We replace some segments with the new
segment. We replace some segments with the new
one. */
one. */
cseg
=
tcp_seg_copy
(
&
inseg
);
//要
插入的报文段代替第M个报文段
cseg
=
tcp_seg_copy
(
&
inseg
);
//Ҫ
����ı��Ķδ����M�����Ķ�
if
(
cseg
!=
NULL
)
{
if
(
cseg
!=
NULL
)
{
if
(
prev
!=
NULL
)
{
if
(
prev
!=
NULL
)
{
prev
->
next
=
cseg
;
prev
->
next
=
cseg
;
...
@@ -1524,7 +1525,7 @@ tcp_receive(struct tcp_pcb *pcb)
...
@@ -1524,7 +1525,7 @@ tcp_receive(struct tcp_pcb *pcb)
/*if (TCP_SEQ_GT(pcb->rcv_nxt, seqno) ||
/*if (TCP_SEQ_GT(pcb->rcv_nxt, seqno) ||
TCP_SEQ_GEQ(seqno, pcb->rcv_nxt + pcb->rcv_wnd)) {*/
TCP_SEQ_GEQ(seqno, pcb->rcv_nxt + pcb->rcv_wnd)) {*/
if
(
!
TCP_SEQ_BETWEEN
(
seqno
,
pcb
->
rcv_nxt
,
pcb
->
rcv_nxt
+
pcb
->
rcv_wnd
-
1
)){
if
(
!
TCP_SEQ_BETWEEN
(
seqno
,
pcb
->
rcv_nxt
,
pcb
->
rcv_nxt
+
pcb
->
rcv_wnd
-
1
)){
tcp_ack_now
(
pcb
);
//
向源端返回一个立即确认报文
tcp_ack_now
(
pcb
);
//
��Դ�˷���һ������ȷ�ϱ���
}
}
}
}
}
}
...
...
app/lwip/core/tcp_out.c
View file @
c674d191
...
@@ -226,7 +226,16 @@ tcp_pbuf_prealloc(pbuf_layer layer, u16_t length, u16_t max_length,
...
@@ -226,7 +226,16 @@ tcp_pbuf_prealloc(pbuf_layer layer, u16_t length, u16_t max_length,
LWIP_UNUSED_ARG
(
apiflags
);
LWIP_UNUSED_ARG
(
apiflags
);
LWIP_UNUSED_ARG
(
first_seg
);
LWIP_UNUSED_ARG
(
first_seg
);
/* always create MSS-sized pbufs */
/* always create MSS-sized pbufs */
#ifdef ESP_MESH_SUPPORT
if
(
espconn_mesh_is_on
())
{
if
(
alloc
>
TCP_MSS
)
alloc
=
TCP_MSS
;
alloc
=
TCP_MSS
;
}
else
{
alloc
=
TCP_MSS
;
}
#else
alloc
=
TCP_MSS
;
#endif
#else
/* LWIP_NETIF_TX_SINGLE_PBUF */
#else
/* LWIP_NETIF_TX_SINGLE_PBUF */
if
(
length
<
max_length
)
{
if
(
length
<
max_length
)
{
/* Should we allocate an oversized pbuf, or just the minimum
/* Should we allocate an oversized pbuf, or just the minimum
...
@@ -333,16 +342,16 @@ tcp_write_checks(struct tcp_pcb *pcb, u16_t len)
...
@@ -333,16 +342,16 @@ tcp_write_checks(struct tcp_pcb *pcb, u16_t len)
/**
/**
* Write data for sending (but does not send it immediately).
* Write data for sending (but does not send it immediately).
*
连接向另一方发送数据,该函数构造一个报文段并放在控制块缓冲队列中
*
��������һ��������ݣ��ú�����һ�����Ķβ����ڿ��ƿ黺�������
* It waits in the expectation of more data being sent soon (as
* It waits in the expectation of more data being sent soon (as
* it can send them more efficiently by combining them together).
* it can send them more efficiently by combining them together).
* To prompt the system to send data now, call tcp_output() after
* To prompt the system to send data now, call tcp_output() after
* calling tcp_write().
* calling tcp_write().
*
*
* @param pcb Protocol control block for the TCP connection to enqueue data for.
相应连接控制块
* @param pcb Protocol control block for the TCP connection to enqueue data for.
��Ӧ���ӿ��ƿ�
* @param arg Pointer to the data to be enqueued for sending.
待发送数据起始地址
* @param arg Pointer to the data to be enqueued for sending.
���������ʼ��ַ
* @param len Data length in bytes
待发送数据长度
* @param len Data length in bytes
������ݳ���
* @param apiflags combination of following flags :
数据是否进行拷贝,以及报文段首部是否好设置PSH标
志
* @param apiflags combination of following flags :
����Ƿ���п������Լ����Ķ��ײ��Ƿ������PSH��־
* - TCP_WRITE_FLAG_COPY (0x01) data will be copied into memory belonging to the stack
* - TCP_WRITE_FLAG_COPY (0x01) data will be copied into memory belonging to the stack
* - TCP_WRITE_FLAG_MORE (0x02) for TCP connection, PSH flag will be set on last segment sent,
* - TCP_WRITE_FLAG_MORE (0x02) for TCP connection, PSH flag will be set on last segment sent,
* @return ERR_OK if enqueued, another err_t on error
* @return ERR_OK if enqueued, another err_t on error
...
@@ -883,7 +892,7 @@ tcp_send_empty_ack(struct tcp_pcb *pcb)
...
@@ -883,7 +892,7 @@ tcp_send_empty_ack(struct tcp_pcb *pcb)
/**
/**
* Find out what we can send and send it
* Find out what we can send and send it
*
发送控制块缓冲队列的报文段
*
���Ϳ��ƿ黺����еı��Ķ�
* @param pcb Protocol control block for the TCP connection to send data
* @param pcb Protocol control block for the TCP connection to send data
* @return ERR_OK if data has been sent or nothing to send
* @return ERR_OK if data has been sent or nothing to send
* another err_t on error
* another err_t on error
...
@@ -899,12 +908,12 @@ tcp_output(struct tcp_pcb *pcb)
...
@@ -899,12 +908,12 @@ tcp_output(struct tcp_pcb *pcb)
/* First, check if we are invoked by the TCP input processing
/* First, check if we are invoked by the TCP input processing
code. If so, we do not output anything. Instead, we rely on the
code. If so, we do not output anything. Instead, we rely on the
input processing code to call us when input processing is done
input processing code to call us when input processing is done
with.
如果控制块当前正有数据被处理,直接返回
*/
with.
�����ƿ鵱ǰ������ݱ����?ֱ�ӷ���*/
if
(
tcp_input_pcb
==
pcb
)
{
if
(
tcp_input_pcb
==
pcb
)
{
return
ERR_OK
;
return
ERR_OK
;
}
}
wnd
=
LWIP_MIN
(
pcb
->
snd_wnd
,
pcb
->
cwnd
);
//
从发送窗口和阻塞窗口取小者得到有效发送窗口
wnd
=
LWIP_MIN
(
pcb
->
snd_wnd
,
pcb
->
cwnd
);
//
�ӷ��ʹ��ں������ȡС�ߵõ���Ч���ʹ���
seg
=
pcb
->
unsent
;
seg
=
pcb
->
unsent
;
...
@@ -917,13 +926,13 @@ tcp_output(struct tcp_pcb *pcb)
...
@@ -917,13 +926,13 @@ tcp_output(struct tcp_pcb *pcb)
if
(
pcb
->
flags
&
TF_ACK_NOW
&&
if
(
pcb
->
flags
&
TF_ACK_NOW
&&
(
seg
==
NULL
||
(
seg
==
NULL
||
ntohl
(
seg
->
tcphdr
->
seqno
)
-
pcb
->
lastack
+
seg
->
len
>
wnd
))
{
ntohl
(
seg
->
tcphdr
->
seqno
)
-
pcb
->
lastack
+
seg
->
len
>
wnd
))
{
return
tcp_send_empty_ack
(
pcb
);
//
发送只带ACK的报文段
return
tcp_send_empty_ack
(
pcb
);
//
����ֻ��ACK�ı��Ķ�
}
}
/* useg should point to last segment on unacked queue */
/* useg should point to last segment on unacked queue */
useg
=
pcb
->
unacked
;
useg
=
pcb
->
unacked
;
if
(
useg
!=
NULL
)
{
if
(
useg
!=
NULL
)
{
for
(;
useg
->
next
!=
NULL
;
useg
=
useg
->
next
);
//
得到尾部
for
(;
useg
->
next
!=
NULL
;
useg
=
useg
->
next
);
//
�õ�β��
}
}
#if TCP_OUTPUT_DEBUG
#if TCP_OUTPUT_DEBUG
...
@@ -948,7 +957,7 @@ tcp_output(struct tcp_pcb *pcb)
...
@@ -948,7 +957,7 @@ tcp_output(struct tcp_pcb *pcb)
}
}
#endif
/* TCP_CWND_DEBUG */
#endif
/* TCP_CWND_DEBUG */
/* data available and window allows it to be sent?
/* data available and window allows it to be sent?
*
当前有效窗口允许报文发送,循环发送报文,直至填满窗口
*/
*
��ǰ��Ч�������?�ķ��ͣ�ѭ�����ͱ��ģ�ֱ�������*/
while
(
seg
!=
NULL
&&
while
(
seg
!=
NULL
&&
ntohl
(
seg
->
tcphdr
->
seqno
)
-
pcb
->
lastack
+
seg
->
len
<=
wnd
)
{
ntohl
(
seg
->
tcphdr
->
seqno
)
-
pcb
->
lastack
+
seg
->
len
<=
wnd
)
{
LWIP_ASSERT
(
"RST not expected here!"
,
LWIP_ASSERT
(
"RST not expected here!"
,
...
@@ -976,30 +985,30 @@ tcp_output(struct tcp_pcb *pcb)
...
@@ -976,30 +985,30 @@ tcp_output(struct tcp_pcb *pcb)
pcb
->
unsent
=
seg
->
next
;
pcb
->
unsent
=
seg
->
next
;
if
(
pcb
->
state
!=
SYN_SENT
)
{
if
(
pcb
->
state
!=
SYN_SENT
)
{
TCPH_SET_FLAG
(
seg
->
tcphdr
,
TCP_ACK
);
//
填写首部ACK标
志
TCPH_SET_FLAG
(
seg
->
tcphdr
,
TCP_ACK
);
//
��д�ײ�ACK��־
pcb
->
flags
&=
~
(
TF_ACK_DELAY
|
TF_ACK_NOW
);
//
清除标
志位
pcb
->
flags
&=
~
(
TF_ACK_DELAY
|
TF_ACK_NOW
);
//
����־λ
}
}
tcp_output_segment
(
seg
,
pcb
);
//
调用函数发送报文段
tcp_output_segment
(
seg
,
pcb
);
//
���ú����ͱ��Ķ�
snd_nxt
=
ntohl
(
seg
->
tcphdr
->
seqno
)
+
TCP_TCPLEN
(
seg
);
//
计算
snd_nxt
snd_nxt
=
ntohl
(
seg
->
tcphdr
->
seqno
)
+
TCP_TCPLEN
(
seg
);
//
����sn
d_nxt
if
(
TCP_SEQ_LT
(
pcb
->
snd_nxt
,
snd_nxt
))
{
if
(
TCP_SEQ_LT
(
pcb
->
snd_nxt
,
snd_nxt
))
{
pcb
->
snd_nxt
=
snd_nxt
;
//
更新要发送的数据编号
pcb
->
snd_nxt
=
snd_nxt
;
//
����Ҫ���͵���ݱ��
}
}
/* put segment on unacknowledged list if length > 0
发出去的报文段数据长度不为0,或者带有
/* put segment on unacknowledged list if length > 0
* 有SYN、FIN标志,则将该报文段加入到未确认队列,以便超时重传
*/
*/
if
(
TCP_TCPLEN
(
seg
)
>
0
)
{
if
(
TCP_TCPLEN
(
seg
)
>
0
)
{
seg
->
next
=
NULL
;
seg
->
next
=
NULL
;
/* unacked list is empty? 直接挂
接
*/
/* unacked list is empty? ֱ
�
ӹҽ
�*
/
if
(
pcb
->
unacked
==
NULL
)
{
if
(
pcb
->
unacked
==
NULL
)
{
pcb
->
unacked
=
seg
;
pcb
->
unacked
=
seg
;
useg
=
seg
;
useg
=
seg
;
/* unacked list is not empty?
将当前报文按顺序组织在队列中
*/
/* unacked list is not empty?
����ǰ���İ�˳����֯�ڶ����� */
}
else
{
}
else
{
/* In the case of fast retransmit, the packet should not go to the tail
/* In the case of fast retransmit, the packet should not go to the tail
* of the unacked queue, but rather somewhere before it. We need to check for
* of the unacked queue, but rather somewhere before it. We need to check for
* this case. -STJ Jul 27, 2004 */
//
如果当前报文的序列号低于队列尾部报文序列号,
* this case. -STJ Jul 27, 2004 */
//
���ǰ���ĵ����кŵ��ڶ���β���������кţ�
//
从队列首部开
始
//
�Ӷ����ײ���ʼ
if
(
TCP_SEQ_LT
(
ntohl
(
seg
->
tcphdr
->
seqno
),
ntohl
(
useg
->
tcphdr
->
seqno
)))
{
if
(
TCP_SEQ_LT
(
ntohl
(
seg
->
tcphdr
->
seqno
),
ntohl
(
useg
->
tcphdr
->
seqno
)))
{
/* add segment to before tail of unacked list, keeping the list sorted */
/* add segment to before tail of unacked list, keeping the list sorted */
struct
tcp_seg
**
cur_seg
=
&
(
pcb
->
unacked
);
struct
tcp_seg
**
cur_seg
=
&
(
pcb
->
unacked
);
...
@@ -1009,17 +1018,17 @@ tcp_output(struct tcp_pcb *pcb)
...
@@ -1009,17 +1018,17 @@ tcp_output(struct tcp_pcb *pcb)
}
}
seg
->
next
=
(
*
cur_seg
);
seg
->
next
=
(
*
cur_seg
);
(
*
cur_seg
)
=
seg
;
(
*
cur_seg
)
=
seg
;
}
else
{
//
报文序号最高,则放在未确认队列末尾
}
else
{
//
���������ߣ������δȷ�϶���ĩβ
/* add segment to tail of unacked list */
/* add segment to tail of unacked list */
useg
->
next
=
seg
;
useg
->
next
=
seg
;
useg
=
useg
->
next
;
useg
=
useg
->
next
;
}
}
}
}
/* do not queue empty segments on the unacked list */
/* do not queue empty segments on the unacked list */
}
else
{
//
报文段长度为0,直接删除,无需重传
}
else
{
//
���Ķγ���Ϊ0��ֱ��ɾ�������ش�
tcp_seg_free
(
seg
);
tcp_seg_free
(
seg
);
}
}
seg
=
pcb
->
unsent
;
//
发送下一个报文段
seg
=
pcb
->
unsent
;
//
������һ�����Ķ�
}
}
#if TCP_OVERSIZE
#if TCP_OVERSIZE
if
(
pcb
->
unsent
==
NULL
)
{
if
(
pcb
->
unsent
==
NULL
)
{
...
@@ -1028,7 +1037,7 @@ tcp_output(struct tcp_pcb *pcb)
...
@@ -1028,7 +1037,7 @@ tcp_output(struct tcp_pcb *pcb)
}
}
#endif
/* TCP_OVERSIZE */
#endif
/* TCP_OVERSIZE */
//
发送窗口填满导致报文不能发送,启动清零窗口探测
。
//
���ʹ��������±��IJ��ܷ��ͣ��������㴰��̽�⡣
if
(
seg
!=
NULL
&&
pcb
->
persist_backoff
==
0
&&
if
(
seg
!=
NULL
&&
pcb
->
persist_backoff
==
0
&&
ntohl
(
seg
->
tcphdr
->
seqno
)
-
pcb
->
lastack
+
seg
->
len
>
pcb
->
snd_wnd
)
{
ntohl
(
seg
->
tcphdr
->
seqno
)
-
pcb
->
lastack
+
seg
->
len
>
pcb
->
snd_wnd
)
{
/* prepare for persist timer */
/* prepare for persist timer */
...
@@ -1036,7 +1045,7 @@ tcp_output(struct tcp_pcb *pcb)
...
@@ -1036,7 +1045,7 @@ tcp_output(struct tcp_pcb *pcb)
pcb
->
persist_backoff
=
1
;
pcb
->
persist_backoff
=
1
;
}
}
pcb
->
flags
&=
~
TF_NAGLEMEMERR
;
//
清内存错误标
志
pcb
->
flags
&=
~
TF_NAGLEMEMERR
;
//
���ڴ�����־
return
ERR_OK
;
return
ERR_OK
;
}
}
...
@@ -1235,11 +1244,47 @@ void
...
@@ -1235,11 +1244,47 @@ void
tcp_rexmit_rto
(
struct
tcp_pcb
*
pcb
)
tcp_rexmit_rto
(
struct
tcp_pcb
*
pcb
)
{
{
struct
tcp_seg
*
seg
;
struct
tcp_seg
*
seg
;
struct
tcp_seg
*
t0_head
=
NULL
,
*
t0_tail
=
NULL
;
/* keep in unacked */
struct
tcp_seg
*
t1_head
=
NULL
,
*
t1_tail
=
NULL
;
/* link to unsent */
bool
t0_1st
=
true
,
t1_1st
=
true
;
if
(
pcb
->
unacked
==
NULL
)
{
if
(
pcb
->
unacked
==
NULL
)
{
return
;
return
;
}
}
#if 1
/* by Snake: resolve the bug of pbuf reuse */
seg
=
pcb
->
unacked
;
while
(
seg
!=
NULL
)
{
if
(
seg
->
p
->
eb
)
{
if
(
t0_1st
)
{
t0_head
=
t0_tail
=
seg
;
t0_1st
=
false
;
}
else
{
t0_tail
->
next
=
seg
;
t0_tail
=
seg
;
}
seg
=
seg
->
next
;
t0_tail
->
next
=
NULL
;
}
else
{
if
(
t1_1st
)
{
t1_head
=
t1_tail
=
seg
;
t1_1st
=
false
;
}
else
{
t1_tail
->
next
=
seg
;
t1_tail
=
seg
;
}
seg
=
seg
->
next
;
t1_tail
->
next
=
NULL
;
}
}
if
(
t1_head
&&
t1_tail
)
{
t1_tail
->
next
=
pcb
->
unsent
;
pcb
->
unsent
=
t1_head
;
}
pcb
->
unacked
=
t0_head
;
#else
/* Move all unacked segments to the head of the unsent queue */
/* Move all unacked segments to the head of the unsent queue */
for
(
seg
=
pcb
->
unacked
;
seg
->
next
!=
NULL
;
seg
=
seg
->
next
);
for
(
seg
=
pcb
->
unacked
;
seg
->
next
!=
NULL
;
seg
=
seg
->
next
);
/* concatenate unsent queue after unacked queue */
/* concatenate unsent queue after unacked queue */
...
@@ -1248,6 +1293,7 @@ tcp_rexmit_rto(struct tcp_pcb *pcb)
...
@@ -1248,6 +1293,7 @@ tcp_rexmit_rto(struct tcp_pcb *pcb)
pcb
->
unsent
=
pcb
->
unacked
;
pcb
->
unsent
=
pcb
->
unacked
;
/* unacked queue is now empty */
/* unacked queue is now empty */
pcb
->
unacked
=
NULL
;
pcb
->
unacked
=
NULL
;
#endif
/* increment number of retransmissions */
/* increment number of retransmissions */
++
pcb
->
nrtx
;
++
pcb
->
nrtx
;
...
...
app/lwip/core/timers.c
View file @
c674d191
...
@@ -389,9 +389,9 @@ sys_check_timeouts(void)
...
@@ -389,9 +389,9 @@ sys_check_timeouts(void)
if
(
next_timeout
)
{
if
(
next_timeout
)
{
/* this cares for wraparounds */
/* this cares for wraparounds */
if
(
timer2_ms_flag
==
0
)
{
if
(
timer2_ms_flag
==
0
)
{
diff
=
LWIP_U32_DIFF
(
now
,
timeouts_last_time
)
/
((
CPU
_CLK_FREQ
>>
4
)
/
1000
);
diff
=
LWIP_U32_DIFF
(
now
,
timeouts_last_time
)
/
((
APB
_CLK_FREQ
>>
4
)
/
1000
);
}
else
{
}
else
{
diff
=
LWIP_U32_DIFF
(
now
,
timeouts_last_time
)
/
((
CPU
_CLK_FREQ
>>
8
)
/
1000
);
diff
=
LWIP_U32_DIFF
(
now
,
timeouts_last_time
)
/
((
APB
_CLK_FREQ
>>
8
)
/
1000
);
}
}
do
do
{
{
...
...
app/lwip/core/udp.c
View file @
c674d191
...
@@ -148,6 +148,15 @@ udp_input(struct pbuf *p, struct netif *inp)
...
@@ -148,6 +148,15 @@ udp_input(struct pbuf *p, struct netif *inp)
pcb
=
inp
->
dhcp
->
pcb
;
pcb
=
inp
->
dhcp
->
pcb
;
}
}
}
}
}
else
if
(
dest
==
DHCP_SERVER_PORT
)
{
if
(
src
==
DHCP_CLIENT_PORT
)
{
if
(
inp
->
dhcps_pcb
!=
NULL
)
{
if
((
ip_addr_isany
(
&
inp
->
dhcps_pcb
->
local_ip
)
||
ip_addr_cmp
(
&
(
inp
->
dhcps_pcb
->
local_ip
),
&
current_iphdr_dest
)))
{
pcb
=
inp
->
dhcps_pcb
;
}
}
}
}
}
}
else
}
else
#endif
/* LWIP_DHCP */
#endif
/* LWIP_DHCP */
...
@@ -935,7 +944,7 @@ udp_new(void)
...
@@ -935,7 +944,7 @@ udp_new(void)
* which means checksum is generated over the whole datagram per default
* which means checksum is generated over the whole datagram per default
* (recommended as default by RFC 3828). */
* (recommended as default by RFC 3828). */
/* initialize PCB to all zeroes */
/* initialize PCB to all zeroes */
memset
(
pcb
,
0
,
sizeof
(
struct
udp_pcb
));
os_
memset
(
pcb
,
0
,
sizeof
(
struct
udp_pcb
));
pcb
->
ttl
=
UDP_TTL
;
pcb
->
ttl
=
UDP_TTL
;
}
}
return
pcb
;
return
pcb
;
...
...
app/lwip/netif/Makefile
View file @
c674d191
app/lwip/netif/etharp.c
View file @
c674d191
...
@@ -72,6 +72,9 @@ const struct eth_addr ethzero = {{0,0,0,0,0,0}};
...
@@ -72,6 +72,9 @@ const struct eth_addr ethzero = {{0,0,0,0,0,0}};
* (240 * 5) seconds = 20 minutes.
* (240 * 5) seconds = 20 minutes.
*/
*/
#define ARP_MAXAGE 240
#define ARP_MAXAGE 240
/** Re-request a used ARP entry 1 minute before it would expire to prevent
* breaking a steadily used connection because the ARP entry timed out. */
#define ARP_AGE_REREQUEST_USED (ARP_MAXAGE - 12)
/** the time an ARP entry stays pending after first request,
/** the time an ARP entry stays pending after first request,
* for ARP_TMR_INTERVAL = 5000, this is
* for ARP_TMR_INTERVAL = 5000, this is
* (2 * 5) seconds = 10 seconds.
* (2 * 5) seconds = 10 seconds.
...
@@ -86,7 +89,8 @@ const struct eth_addr ethzero = {{0,0,0,0,0,0}};
...
@@ -86,7 +89,8 @@ const struct eth_addr ethzero = {{0,0,0,0,0,0}};
enum
etharp_state
{
enum
etharp_state
{
ETHARP_STATE_EMPTY
=
0
,
ETHARP_STATE_EMPTY
=
0
,
ETHARP_STATE_PENDING
,
ETHARP_STATE_PENDING
,
ETHARP_STATE_STABLE
ETHARP_STATE_STABLE
,
ETHARP_STATE_STABLE_REREQUESTING
};
};
struct
etharp_entry
{
struct
etharp_entry
{
...
@@ -219,10 +223,15 @@ etharp_tmr(void)
...
@@ -219,10 +223,15 @@ etharp_tmr(void)
(
arp_table
[
i
].
ctime
>=
ARP_MAXPENDING
)))
{
(
arp_table
[
i
].
ctime
>=
ARP_MAXPENDING
)))
{
/* pending or stable entry has become old! */
/* pending or stable entry has become old! */
LWIP_DEBUGF
(
ETHARP_DEBUG
,
(
"etharp_timer: expired %s entry %"
U16_F
".
\n
"
,
LWIP_DEBUGF
(
ETHARP_DEBUG
,
(
"etharp_timer: expired %s entry %"
U16_F
".
\n
"
,
arp_table
[
i
].
state
=
=
ETHARP_STATE_STABLE
?
"stable"
:
"pending"
,
(
u16_t
)
i
));
arp_table
[
i
].
state
>
=
ETHARP_STATE_STABLE
?
"stable"
:
"pending"
,
(
u16_t
)
i
));
/* clean up entries that have just been expired */
/* clean up entries that have just been expired */
free_entry
(
i
);
free_entry
(
i
);
}
}
else
if
(
arp_table
[
i
].
state
==
ETHARP_STATE_STABLE_REREQUESTING
)
{
/* Reset state to stable, so that the next transmitted packet will
re-send an ARP request. */
arp_table
[
i
].
state
=
ETHARP_STATE_STABLE
;
}
#if ARP_QUEUEING
#if ARP_QUEUEING
/* still pending entry? (not expired) */
/* still pending entry? (not expired) */
if
(
arp_table
[
i
].
state
==
ETHARP_STATE_PENDING
)
{
if
(
arp_table
[
i
].
state
==
ETHARP_STATE_PENDING
)
{
...
@@ -288,8 +297,8 @@ find_entry(ip_addr_t *ipaddr, u8_t flags)
...
@@ -288,8 +297,8 @@ find_entry(ip_addr_t *ipaddr, u8_t flags)
/* remember first empty entry */
/* remember first empty entry */
empty
=
i
;
empty
=
i
;
}
else
if
(
state
!=
ETHARP_STATE_EMPTY
)
{
}
else
if
(
state
!=
ETHARP_STATE_EMPTY
)
{
LWIP_ASSERT
(
"state == ETHARP_STATE_PENDING || state
=
= ETHARP_STATE_STABLE"
,
LWIP_ASSERT
(
"state == ETHARP_STATE_PENDING || state
>
= ETHARP_STATE_STABLE"
,
state
==
ETHARP_STATE_PENDING
||
state
=
=
ETHARP_STATE_STABLE
);
state
==
ETHARP_STATE_PENDING
||
state
>
=
ETHARP_STATE_STABLE
);
/* if given, does IP address match IP address in ARP entry? */
/* if given, does IP address match IP address in ARP entry? */
if
(
ipaddr
&&
ip_addr_cmp
(
ipaddr
,
&
arp_table
[
i
].
ipaddr
))
{
if
(
ipaddr
&&
ip_addr_cmp
(
ipaddr
,
&
arp_table
[
i
].
ipaddr
))
{
LWIP_DEBUGF
(
ETHARP_DEBUG
|
LWIP_DBG_TRACE
,
(
"find_entry: found matching entry %"
U16_F
"
\n
"
,
(
u16_t
)
i
));
LWIP_DEBUGF
(
ETHARP_DEBUG
|
LWIP_DBG_TRACE
,
(
"find_entry: found matching entry %"
U16_F
"
\n
"
,
(
u16_t
)
i
));
...
@@ -313,7 +322,7 @@ find_entry(ip_addr_t *ipaddr, u8_t flags)
...
@@ -313,7 +322,7 @@ find_entry(ip_addr_t *ipaddr, u8_t flags)
}
}
}
}
/* stable entry? */
/* stable entry? */
}
else
if
(
state
=
=
ETHARP_STATE_STABLE
)
{
}
else
if
(
state
>
=
ETHARP_STATE_STABLE
)
{
#if ETHARP_SUPPORT_STATIC_ENTRIES
#if ETHARP_SUPPORT_STATIC_ENTRIES
/* don't record old_stable for static entries since they never expire */
/* don't record old_stable for static entries since they never expire */
if
(
arp_table
[
i
].
static_entry
==
0
)
if
(
arp_table
[
i
].
static_entry
==
0
)
...
@@ -608,7 +617,7 @@ etharp_find_addr(struct netif *netif, ip_addr_t *ipaddr,
...
@@ -608,7 +617,7 @@ etharp_find_addr(struct netif *netif, ip_addr_t *ipaddr,
LWIP_UNUSED_ARG
(
netif
);
LWIP_UNUSED_ARG
(
netif
);
i
=
find_entry
(
ipaddr
,
ETHARP_FLAG_FIND_ONLY
);
i
=
find_entry
(
ipaddr
,
ETHARP_FLAG_FIND_ONLY
);
if
((
i
>=
0
)
&&
arp_table
[
i
].
state
=
=
ETHARP_STATE_STABLE
)
{
if
((
i
>=
0
)
&&
(
arp_table
[
i
].
state
>
=
ETHARP_STATE_STABLE
)
)
{
*
eth_ret
=
&
arp_table
[
i
].
ethaddr
;
*
eth_ret
=
&
arp_table
[
i
].
ethaddr
;
*
ip_ret
=
&
arp_table
[
i
].
ipaddr
;
*
ip_ret
=
&
arp_table
[
i
].
ipaddr
;
return
i
;
return
i
;
...
@@ -854,6 +863,28 @@ etharp_arp_input(struct netif *netif, struct eth_addr *ethaddr, struct pbuf *p)
...
@@ -854,6 +863,28 @@ etharp_arp_input(struct netif *netif, struct eth_addr *ethaddr, struct pbuf *p)
pbuf_free
(
p
);
pbuf_free
(
p
);
}
}
/** Just a small helper function that sends a pbuf to an ethernet address
* in the arp_table specified by the index 'arp_idx'.
*/
static
err_t
ICACHE_FLASH_ATTR
etharp_output_to_arp_index
(
struct
netif
*
netif
,
struct
pbuf
*
q
,
u8_t
arp_idx
)
{
LWIP_ASSERT
(
"arp_table[arp_idx].state >= ETHARP_STATE_STABLE"
,
arp_table
[
arp_idx
].
state
>=
ETHARP_STATE_STABLE
);
/* if arp table entry is about to expire: re-request it,
but only if its state is ETHARP_STATE_STABLE to prevent flooding the
network with ARP requests if this address is used frequently. */
if
((
arp_table
[
arp_idx
].
state
==
ETHARP_STATE_STABLE
)
&&
(
arp_table
[
arp_idx
].
ctime
>=
ARP_AGE_REREQUEST_USED
))
{
if
(
etharp_request
(
netif
,
&
arp_table
[
arp_idx
].
ipaddr
)
==
ERR_OK
)
{
arp_table
[
arp_idx
].
state
=
ETHARP_STATE_STABLE_REREQUESTING
;
}
}
return
etharp_send_ip
(
netif
,
q
,
(
struct
eth_addr
*
)(
netif
->
hwaddr
),
&
arp_table
[
arp_idx
].
ethaddr
);
}
/**
/**
* Resolve and fill-in Ethernet address header for outgoing IP packet.
* Resolve and fill-in Ethernet address header for outgoing IP packet.
*
*
...
@@ -908,7 +939,9 @@ etharp_output(struct netif *netif, struct pbuf *q, ip_addr_t *ipaddr)
...
@@ -908,7 +939,9 @@ etharp_output(struct netif *netif, struct pbuf *q, ip_addr_t *ipaddr)
dest
=
&
mcastaddr
;
dest
=
&
mcastaddr
;
/* unicast destination IP address? */
/* unicast destination IP address? */
}
else
{
}
else
{
/* outside local network? */
s8_t
i
;
/* outside local network? if so, this can neither be a global broadcast nor
a subnet broadcast. */
if
(
!
ip_addr_netcmp
(
ipaddr
,
&
(
netif
->
ip_addr
),
&
(
netif
->
netmask
))
&&
if
(
!
ip_addr_netcmp
(
ipaddr
,
&
(
netif
->
ip_addr
),
&
(
netif
->
netmask
))
&&
!
ip_addr_islinklocal
(
ipaddr
))
{
!
ip_addr_islinklocal
(
ipaddr
))
{
#if LWIP_AUTOIP
#if LWIP_AUTOIP
...
@@ -938,17 +971,26 @@ etharp_output(struct netif *netif, struct pbuf *q, ip_addr_t *ipaddr)
...
@@ -938,17 +971,26 @@ etharp_output(struct netif *netif, struct pbuf *q, ip_addr_t *ipaddr)
u8_t
etharp_cached_entry
=
*
(
netif
->
addr_hint
);
u8_t
etharp_cached_entry
=
*
(
netif
->
addr_hint
);
if
(
etharp_cached_entry
<
ARP_TABLE_SIZE
)
{
if
(
etharp_cached_entry
<
ARP_TABLE_SIZE
)
{
#endif
/* LWIP_NETIF_HWADDRHINT */
#endif
/* LWIP_NETIF_HWADDRHINT */
if
((
arp_table
[
etharp_cached_entry
].
state
=
=
ETHARP_STATE_STABLE
)
&&
if
((
arp_table
[
etharp_cached_entry
].
state
>
=
ETHARP_STATE_STABLE
)
&&
(
ip_addr_cmp
(
ipaddr
,
&
arp_table
[
etharp_cached_entry
].
ipaddr
)))
{
(
ip_addr_cmp
(
ipaddr
,
&
arp_table
[
etharp_cached_entry
].
ipaddr
)))
{
/* the per-pcb-cached entry is stable and the right one! */
/* the per-pcb-cached entry is stable and the right one! */
ETHARP_STATS_INC
(
etharp
.
cachehit
);
ETHARP_STATS_INC
(
etharp
.
cachehit
);
return
etharp_send_ip
(
netif
,
q
,
(
struct
eth_addr
*
)(
netif
->
hwaddr
),
return
etharp_output_to_arp_index
(
netif
,
q
,
etharp_cached_entry
);
&
arp_table
[
etharp_cached_entry
].
ethaddr
);
}
}
#if LWIP_NETIF_HWADDRHINT
#if LWIP_NETIF_HWADDRHINT
}
}
}
}
#endif
/* LWIP_NETIF_HWADDRHINT */
#endif
/* LWIP_NETIF_HWADDRHINT */
/* find stable entry: do this here since this is a critical path for
throughput and etharp_find_entry() is kind of slow */
for
(
i
=
0
;
i
<
ARP_TABLE_SIZE
;
i
++
)
{
if
((
arp_table
[
i
].
state
>=
ETHARP_STATE_STABLE
)
&&
(
ip_addr_cmp
(
ipaddr
,
&
arp_table
[
i
].
ipaddr
)))
{
/* found an existing, stable entry */
ETHARP_SET_HINT
(
netif
,
i
);
return
etharp_output_to_arp_index
(
netif
,
q
,
i
);
}
}
/* queue on destination Ethernet address belonging to ipaddr */
/* queue on destination Ethernet address belonging to ipaddr */
return
etharp_query
(
netif
,
ipaddr
,
q
);
return
etharp_query
(
netif
,
ipaddr
,
q
);
}
}
...
@@ -1028,7 +1070,7 @@ etharp_query(struct netif *netif, ip_addr_t *ipaddr, struct pbuf *q)
...
@@ -1028,7 +1070,7 @@ etharp_query(struct netif *netif, ip_addr_t *ipaddr, struct pbuf *q)
/* { i is either a STABLE or (new or existing) PENDING entry } */
/* { i is either a STABLE or (new or existing) PENDING entry } */
LWIP_ASSERT
(
"arp_table[i].state == PENDING or STABLE"
,
LWIP_ASSERT
(
"arp_table[i].state == PENDING or STABLE"
,
((
arp_table
[
i
].
state
==
ETHARP_STATE_PENDING
)
||
((
arp_table
[
i
].
state
==
ETHARP_STATE_PENDING
)
||
(
arp_table
[
i
].
state
=
=
ETHARP_STATE_STABLE
)));
(
arp_table
[
i
].
state
>
=
ETHARP_STATE_STABLE
)));
/* do we have a pending entry? or an implicit query request? */
/* do we have a pending entry? or an implicit query request? */
if
((
arp_table
[
i
].
state
==
ETHARP_STATE_PENDING
)
||
(
q
==
NULL
))
{
if
((
arp_table
[
i
].
state
==
ETHARP_STATE_PENDING
)
||
(
q
==
NULL
))
{
...
@@ -1048,7 +1090,7 @@ etharp_query(struct netif *netif, ip_addr_t *ipaddr, struct pbuf *q)
...
@@ -1048,7 +1090,7 @@ etharp_query(struct netif *netif, ip_addr_t *ipaddr, struct pbuf *q)
/* packet given? */
/* packet given? */
LWIP_ASSERT
(
"q != NULL"
,
q
!=
NULL
);
LWIP_ASSERT
(
"q != NULL"
,
q
!=
NULL
);
/* stable entry? */
/* stable entry? */
if
(
arp_table
[
i
].
state
=
=
ETHARP_STATE_STABLE
)
{
if
(
arp_table
[
i
].
state
>
=
ETHARP_STATE_STABLE
)
{
/* we have a valid IP->Ethernet address mapping */
/* we have a valid IP->Ethernet address mapping */
ETHARP_SET_HINT
(
netif
,
i
);
ETHARP_SET_HINT
(
netif
,
i
);
/* send the packet */
/* send the packet */
...
@@ -1092,20 +1134,30 @@ etharp_query(struct netif *netif, ip_addr_t *ipaddr, struct pbuf *q)
...
@@ -1092,20 +1134,30 @@ etharp_query(struct netif *netif, ip_addr_t *ipaddr, struct pbuf *q)
/* allocate a new arp queue entry */
/* allocate a new arp queue entry */
new_entry
=
(
struct
etharp_q_entry
*
)
memp_malloc
(
MEMP_ARP_QUEUE
);
new_entry
=
(
struct
etharp_q_entry
*
)
memp_malloc
(
MEMP_ARP_QUEUE
);
if
(
new_entry
!=
NULL
)
{
if
(
new_entry
!=
NULL
)
{
unsigned
int
qlen
=
0
;
new_entry
->
next
=
0
;
new_entry
->
next
=
0
;
new_entry
->
p
=
p
;
new_entry
->
p
=
p
;
if
(
arp_table
[
i
].
q
!=
NULL
)
{
if
(
arp_table
[
i
].
q
!=
NULL
)
{
/* queue was already existent, append the new entry to the end */
/* queue was already existent, append the new entry to the end */
struct
etharp_q_entry
*
r
;
struct
etharp_q_entry
*
r
;
r
=
arp_table
[
i
].
q
;
r
=
arp_table
[
i
].
q
;
qlen
++
;
while
(
r
->
next
!=
NULL
)
{
while
(
r
->
next
!=
NULL
)
{
r
=
r
->
next
;
r
=
r
->
next
;
qlen
++
;
}
}
r
->
next
=
new_entry
;
r
->
next
=
new_entry
;
}
else
{
}
else
{
/* queue did not exist, first item in queue */
/* queue did not exist, first item in queue */
arp_table
[
i
].
q
=
new_entry
;
arp_table
[
i
].
q
=
new_entry
;
}
}
if
(
qlen
>=
3
)
{
struct
etharp_q_entry
*
old
;
old
=
arp_table
[
i
].
q
;
arp_table
[
i
].
q
=
arp_table
[
i
].
q
->
next
;
pbuf_free
(
old
->
p
);
memp_free
(
MEM_ARP_QUEUE
,
old
);
}
LWIP_DEBUGF
(
ETHARP_DEBUG
|
LWIP_DBG_TRACE
,
(
"etharp_query: queued packet %p on ARP entry %"
S16_F
"
\n
"
,
(
void
*
)
q
,
(
s16_t
)
i
));
LWIP_DEBUGF
(
ETHARP_DEBUG
|
LWIP_DBG_TRACE
,
(
"etharp_query: queued packet %p on ARP entry %"
S16_F
"
\n
"
,
(
void
*
)
q
,
(
s16_t
)
i
));
result
=
ERR_OK
;
result
=
ERR_OK
;
}
else
{
}
else
{
...
...
Prev
1
2
3
Next
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment