?? tcp.lst
字號(hào):
C51 COMPILER V7.07 TCP 11/25/2003 15:47:51 PAGE 1
C51 COMPILER V7.07, COMPILATION OF MODULE TCP
OBJECT MODULE PLACED IN TCP.OBJ
COMPILER INVOKED BY: D:\KEIL707\C51\BIN\C51.EXE TCP.C OPTIMIZE(9,SPEED) BROWSE DEBUG OBJECTEXTEND
stmt level source
1 //-----------------------------------------------------------------------------
2 // Copyright (c) 2002 Jim Brady
3 // Do not use commercially without author's permission
4 // Last revised August 2002
5 // Net TCP.C
6 //
7 // This module handles TCP segments
8 // Refer to RFC 793, 896, 1122, 1323, 2018, 2581
9 //
10 // A "connection" is a unique combination of 4 items: His IP address,
11 // his port number, my IP address, and my port number.
12 //
13 // Note that a SYN and a FIN count as a byte of data, but a RST does
14 // not count. Neither do any of the other flags.
15 // See "TCP/IP Illustrated, Volume 1" Sect 17.3 for info on flags
16 //-----------------------------------------------------------------------------
17 #include <string.h>
18 #include <stdlib.h>
19 #include <ctype.h> // toupper
20 #include "C8051f.h"
21 #include "net.h"
22 #include "cksum.h"
23 #include "serial.h"
24 #include "ip.h"
25 #include "http.h"
26 #include "tcp.h"
27
28
29 // These structures keep track of connection information
30 CONNECTION xdata conxn[5];
31
32 ULONG idata initial_sequence_nr;
33 UINT xdata sender_tcpport;
34 static ULONG xdata sender_ipaddr;
35 UCHAR idata just_closed; // Keeps track of when a conxn closed
36
37 extern ULONG code my_ipaddr;
38 extern UCHAR idata debug;
39 extern char xdata text[];
40
41 // Options: MSS (4 bytes), NOPS (2 bytes), Selective ACK (2 bytes)
42 UCHAR code opt[10] = {
43 0x02, 0x04, 0x05, 0xB4,
44 0x01, 0x01,
45 0x04, 0x02};
46
47
48
49 //------------------------------------------------------------------------
50 // Initialize variables declared in this module
51 //
52 //------------------------------------------------------------------------
53 void init_tcp(void)
54 {
55 1 memset(conxn, 0, sizeof(conxn));
C51 COMPILER V7.07 TCP 11/25/2003 15:47:51 PAGE 2
56 1 just_closed = FALSE;
57 1 initial_sequence_nr = 1;
58 1 }
59
60
61
62 //------------------------------------------------------------------------
63 // This sends a TCP segments that do not include any data.
64 // http_send() in the HTTP module is used to send data.
65 // See "TCP/IP Illustrated, Volume 1" Sect 17.3
66 //------------------------------------------------------------------------
67 void tcp_send(UINT flags, UINT hdr_len, UCHAR nr)
68 {
69 1 ULONG idata sum, dest;
70 1 UINT idata result;
71 1 UCHAR xdata * outbuf;
72 1 TCP_HEADER xdata * tcp;
73 1 IP_HEADER xdata * ip;
74 1
75 1
76 1 // Allocate memory for entire outgoing message including
77 1 // eth & IP headers
78 1 outbuf = (UCHAR xdata *)malloc(34 + hdr_len);
79 1 if (outbuf == NULL)
80 1 {
81 2 if (debug) serial_send("TCP: Oops, out of memory\r");
82 2 return;
83 2 }
84 1
85 1
86 1 tcp = (TCP_HEADER xdata *)(outbuf + 34);
87 1 ip = (IP_HEADER xdata *)(outbuf + 14);
88 1
89 1 // If no connection, then message is probably a reset
90 1 // message which goes back to the sender
91 1 // Otherwise, use information from the connection.
92 1 if (nr == NO_CONNECTION)
93 1 {
94 2 tcp->source_port = HTTP_PORT;
95 2 tcp->dest_port = sender_tcpport;
96 2 tcp->sequence = 0;
97 2 tcp->ack_number = 0;
98 2 dest = sender_ipaddr;
99 2 }
100 1 else if (nr < 5)
101 1 {
102 2 // This message is to connected port
103 2 tcp->source_port = HTTP_PORT;
104 2 tcp->dest_port = conxn[nr].port;
105 2 tcp->sequence = conxn[nr].my_sequence;
106 2 tcp->ack_number = conxn[nr].his_sequence;
107 2 dest = conxn[nr].ipaddr;
108 2 }
109 1 else
110 1 {
111 2 if (debug) serial_send("TCP: Oops, sock nr out of range\r");
112 2 free(outbuf);
113 2 return;
114 2 }
115 1
116 1 // Total segment length = header length
117 1
C51 COMPILER V7.07 TCP 11/25/2003 15:47:51 PAGE 3
118 1 // Insert header len
119 1 tcp->flags = (hdr_len << 10) | flags;
120 1 tcp->window = 1024;
121 1 tcp->checksum = 0;
122 1 tcp->urgent_ptr = 0;
123 1
124 1 // Sending SYN with header options
125 1 if (hdr_len == 28)
126 1 {
127 2 memcpy(&tcp->options, opt, 8);
128 2 }
129 1
130 1 // Compute checksum including 12 bytes of pseudoheader
131 1 // Must pre-fill 2 items in ip header to do this
132 1 ip->dest_ipaddr = dest;
133 1 ip->source_ipaddr = my_ipaddr;
134 1
135 1 // Sum source_ipaddr, dest_ipaddr, and entire TCP message
136 1 sum = (ULONG)cksum(outbuf + 26, 8 + hdr_len);
137 1
138 1 // Add in the rest of pseudoheader which is
139 1 // protocol id and TCP segment length
140 1 sum += (ULONG)0x0006;
141 1 sum += (ULONG)hdr_len;
142 1
143 1 // In case there was a carry, add it back around
144 1 result = (UINT)(sum + (sum >> 16));
145 1 tcp->checksum = ~result;
146 1
147 1 if (debug) serial_send("TCP: Sending msg to IP layer\r");
148 1 ip_send(outbuf, dest, TCP_TYPE, hdr_len);
149 1
150 1 // (Re)start TCP retransmit timer
151 1 conxn[nr].timer = TCP_TIMEOUT;
152 1 }
153
154
155
156
157 //------------------------------------------------------------------------
158 // This runs every 0.5 seconds. If the other end has not ACK'd
159 // everyting we have sent, it re-sends it. To save RAM space, we
160 // regenerate a segment rather than keeping a bunch of segments
161 // hanging around eating up RAM. A connection should not be in an
162 // opening or closing state when this timer expires, so we simply
163 // send a reset.
164 //
165 // If a connection is in the ESTABLISHED state when the timer expires
166 // then we have just sent a web page so re-send the page
167 //------------------------------------------------------------------------
168 void tcp_retransmit(void)
169 {
170 1 static UCHAR idata retries = 0;
171 1 UCHAR idata nr;
172 1
173 1 // Scan through all active connections
174 1 for (nr = 0; nr < 5; nr++)
175 1 {
176 2 if ((conxn[nr].ipaddr != 0) && (conxn[nr].timer))
177 2 {
178 3 // Decrement the timer and see if it hit 0
179 3 conxn[nr].timer--;
C51 COMPILER V7.07 TCP 11/25/2003 15:47:51 PAGE 4
180 3 if (conxn[nr].timer == 0)
181 3 {
182 4 // Socket just timed out. If we are not in ESTABLISHED state
183 4 // something is amiss so send reset and close connection
184 4 if (conxn[nr].state != STATE_ESTABLISHED)
185 4 {
186 5 // Send reset and close connection
187 5 if (debug) serial_send("TCP: Timeout, sending reset\r");
188 5 tcp_send(FLG_RST, 20, nr);
189 5 conxn[nr].ipaddr = 0;
190 5 return;
191 5 }
192 4 else
193 4 {
194 5 // Socket is in ESTABLISHED state. First make sure his
195 5 // ack number is not bogus.
196 5 if (conxn[nr].his_ack > conxn[nr].my_sequence)
197 5 {
198 6 // Send reset and close connection
199 6 if (debug) serial_send("TCP: Timeout, sending reset\r");
200 6 tcp_send(FLG_RST, 20, nr);
201 6 conxn[nr].ipaddr = 0;
202 6 return;
203 6 }
204 5
205 5 // We always increment our sequence number immediately
206 5 // after sending, so the ack number from the other end
207 5 // should be equal to our sequence number. If it is less,
208 5 // it means he lost some of our data.
209 5 if (conxn[nr].his_ack < conxn[nr].my_sequence)
210 5 {
211 6 retries++;
212 6 if (retries <= 2)
213 6 {
214 7 // The only thing we send is a web page, and it looks
215 7 // like other end did not get it, so resend
216 7 // but do not increase my sequence number
217 7 if (debug) serial_send("TCP: Timeout, resending data\r");
218 7 http_server(conxn[nr].query, 0, nr, 1);
219 7 conxn[nr].inactivity = INACTIVITY_TIME;
220 7 }
221 6 else
222 6 {
223 7 if (debug) serial_send("TCP: Giving up, sending reset\r");
224 7 // Send reset and close connection
225 7 tcp_send(FLG_RST, 20, nr);
226 7 conxn[nr].ipaddr = 0;
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -