Commit | Line | Data |
---|---|---|
fcfe450e | 1 | /* tcp_subr.c 4.30 82/10/09 */ |
ecaa4e6f BJ |
2 | |
3 | #include "../h/param.h" | |
4 | #include "../h/systm.h" | |
5 | #include "../h/mbuf.h" | |
6 | #include "../h/socket.h" | |
7 | #include "../h/socketvar.h" | |
8 | #include "../h/protosw.h" | |
fcfe450e | 9 | #include "../netinet/in.h" |
c124e997 | 10 | #include "../net/route.h" |
fcfe450e BJ |
11 | #include "../netinet/in_pcb.h" |
12 | #include "../netinet/in_systm.h" | |
ecaa4e6f | 13 | #include "../net/if.h" |
fcfe450e BJ |
14 | #include "../netinet/ip.h" |
15 | #include "../netinet/ip_var.h" | |
16 | #include "../netinet/ip_icmp.h" | |
17 | #include "../netinet/tcp.h" | |
18 | #include "../netinet/tcp_fsm.h" | |
19 | #include "../netinet/tcp_seq.h" | |
20 | #include "../netinet/tcp_timer.h" | |
21 | #include "../netinet/tcp_var.h" | |
22 | #include "../netinet/tcpip.h" | |
c47a5909 | 23 | #include <errno.h> |
ecaa4e6f BJ |
24 | |
25 | /* | |
26 | * Tcp initialization | |
27 | */ | |
28 | tcp_init() | |
29 | { | |
30 | ||
31 | tcp_iss = 1; /* wrong */ | |
32 | tcb.inp_next = tcb.inp_prev = &tcb; | |
405c9168 BJ |
33 | tcp_alpha = TCP_ALPHA; |
34 | tcp_beta = TCP_BETA; | |
ecaa4e6f BJ |
35 | } |
36 | ||
37 | /* | |
38 | * Create template to be used to send tcp packets on a connection. | |
39 | * Call after host entry created, allocates an mbuf and fills | |
40 | * in a skeletal tcp/ip header, minimizing the amount of work | |
41 | * necessary when the connection is used. | |
42 | */ | |
43 | struct tcpiphdr * | |
44 | tcp_template(tp) | |
45 | struct tcpcb *tp; | |
46 | { | |
47 | register struct inpcb *inp = tp->t_inpcb; | |
48 | register struct mbuf *m; | |
49 | register struct tcpiphdr *n; | |
50 | ||
e6b33a03 | 51 | m = m_get(M_WAIT); |
ecaa4e6f BJ |
52 | if (m == 0) |
53 | return (0); | |
54 | m->m_off = MMAXOFF - sizeof (struct tcpiphdr); | |
55 | m->m_len = sizeof (struct tcpiphdr); | |
56 | n = mtod(m, struct tcpiphdr *); | |
57 | n->ti_next = n->ti_prev = 0; | |
58 | n->ti_x1 = 0; | |
59 | n->ti_pr = IPPROTO_TCP; | |
60 | n->ti_len = htons(sizeof (struct tcpiphdr) - sizeof (struct ip)); | |
61 | n->ti_src = inp->inp_laddr; | |
62 | n->ti_dst = inp->inp_faddr; | |
63 | n->ti_sport = inp->inp_lport; | |
64 | n->ti_dport = inp->inp_fport; | |
65 | n->ti_seq = 0; | |
0974b45c | 66 | n->ti_ack = 0; |
ecaa4e6f BJ |
67 | n->ti_x2 = 0; |
68 | n->ti_off = 5; | |
69 | n->ti_flags = 0; | |
70 | n->ti_win = 0; | |
71 | n->ti_sum = 0; | |
72 | n->ti_urp = 0; | |
73 | return (n); | |
74 | } | |
75 | ||
76 | /* | |
405c9168 BJ |
77 | * Send a single message to the TCP at address specified by |
78 | * the given TCP/IP header. If flags==0, then we make a copy | |
79 | * of the tcpiphdr at ti and send directly to the addressed host. | |
80 | * This is used to force keep alive messages out using the TCP | |
81 | * template for a connection tp->t_template. If flags are given | |
82 | * then we send a message back to the TCP which originated the | |
83 | * segment ti, and discard the mbuf containing it and any other | |
84 | * attached mbufs. | |
85 | * | |
86 | * In any case the ack and sequence number of the transmitted | |
87 | * segment are as specified by the parameters. | |
ecaa4e6f | 88 | */ |
8e65fd66 BJ |
89 | tcp_respond(tp, ti, ack, seq, flags) |
90 | struct tcpcb *tp; | |
ecaa4e6f | 91 | register struct tcpiphdr *ti; |
0974b45c | 92 | tcp_seq ack, seq; |
ecaa4e6f BJ |
93 | int flags; |
94 | { | |
405c9168 | 95 | struct mbuf *m; |
1e977657 | 96 | int win = 0, tlen; |
c124e997 | 97 | struct route *ro = 0; |
ecaa4e6f | 98 | |
c124e997 | 99 | if (tp) { |
8e65fd66 | 100 | win = sbspace(&tp->t_inpcb->inp_socket->so_rcv); |
c124e997 SL |
101 | ro = &tp->t_inpcb->inp_route; |
102 | } | |
405c9168 | 103 | if (flags == 0) { |
ef9b4258 | 104 | m = m_get(M_DONTWAIT); |
405c9168 BJ |
105 | if (m == 0) |
106 | return; | |
1e977657 | 107 | m->m_len = sizeof (struct tcpiphdr) + 1; |
405c9168 BJ |
108 | *mtod(m, struct tcpiphdr *) = *ti; |
109 | ti = mtod(m, struct tcpiphdr *); | |
110 | flags = TH_ACK; | |
1e977657 | 111 | tlen = 1; |
405c9168 | 112 | } else { |
4aed14e3 | 113 | m = dtom(ti); |
405c9168 BJ |
114 | m_freem(m->m_next); |
115 | m->m_next = 0; | |
1acff8ec | 116 | m->m_off = (int)ti - (int)m; |
405c9168 | 117 | m->m_len = sizeof (struct tcpiphdr); |
0974b45c | 118 | #define xchg(a,b,type) { type t; t=a; a=b; b=t; } |
405c9168 BJ |
119 | xchg(ti->ti_dst.s_addr, ti->ti_src.s_addr, u_long); |
120 | xchg(ti->ti_dport, ti->ti_sport, u_short); | |
ecaa4e6f | 121 | #undef xchg |
1e977657 | 122 | tlen = 0; |
405c9168 | 123 | } |
0974b45c BJ |
124 | ti->ti_next = ti->ti_prev = 0; |
125 | ti->ti_x1 = 0; | |
1e977657 | 126 | ti->ti_len = sizeof (struct tcphdr) + tlen; |
4aed14e3 BJ |
127 | ti->ti_seq = seq; |
128 | ti->ti_ack = ack; | |
129 | #if vax | |
668cc26d | 130 | ti->ti_len = htons((u_short)ti->ti_len); |
4aed14e3 BJ |
131 | ti->ti_seq = htonl(ti->ti_seq); |
132 | ti->ti_ack = htonl(ti->ti_ack); | |
133 | #endif | |
0974b45c BJ |
134 | ti->ti_x2 = 0; |
135 | ti->ti_off = sizeof (struct tcphdr) >> 2; | |
ecaa4e6f | 136 | ti->ti_flags = flags; |
8e65fd66 BJ |
137 | ti->ti_win = win; |
138 | #if vax | |
139 | ti->ti_win = htons(ti->ti_win); | |
140 | #endif | |
141 | ti->ti_urp = 0; | |
f3cdd721 | 142 | ti->ti_sum = in_cksum(m, sizeof (struct tcpiphdr) + tlen); |
1e977657 | 143 | ((struct ip *)ti)->ip_len = sizeof (struct tcpiphdr) + tlen; |
0974b45c | 144 | ((struct ip *)ti)->ip_ttl = TCP_TTL; |
c124e997 | 145 | (void) ip_output(m, (struct mbuf *)0, ro, 0); |
ecaa4e6f | 146 | } |
a6503abf | 147 | |
0974b45c BJ |
148 | /* |
149 | * Create a new TCP control block, making an | |
150 | * empty reassembly queue and hooking it to the argument | |
151 | * protocol control block. | |
152 | */ | |
a6503abf BJ |
153 | struct tcpcb * |
154 | tcp_newtcpcb(inp) | |
155 | struct inpcb *inp; | |
156 | { | |
e6b33a03 | 157 | struct mbuf *m = m_getclr(M_DONTWAIT); |
a6503abf | 158 | register struct tcpcb *tp; |
a6503abf BJ |
159 | |
160 | if (m == 0) | |
161 | return (0); | |
162 | tp = mtod(m, struct tcpcb *); | |
a6503abf | 163 | tp->seg_next = tp->seg_prev = (struct tcpiphdr *)tp; |
1bc20e72 | 164 | tp->t_maxseg = 576; /* satisfy the rest of the world */ |
3e60e1e6 | 165 | tp->t_flags = 0; /* sends options! */ |
a6503abf BJ |
166 | tp->t_inpcb = inp; |
167 | inp->inp_ppcb = (caddr_t)tp; | |
168 | return (tp); | |
169 | } | |
170 | ||
0974b45c BJ |
171 | /* |
172 | * Drop a TCP connection, reporting | |
173 | * the specified error. If connection is synchronized, | |
174 | * then send a RST to peer. | |
175 | */ | |
a6503abf BJ |
176 | tcp_drop(tp, errno) |
177 | struct tcpcb *tp; | |
178 | int errno; | |
179 | { | |
180 | struct socket *so = tp->t_inpcb->inp_socket; | |
181 | ||
d3504cc0 | 182 | if (TCPS_HAVERCVDSYN(tp->t_state)) { |
a6503abf BJ |
183 | tp->t_state = TCPS_CLOSED; |
184 | tcp_output(tp); | |
185 | } | |
186 | so->so_error = errno; | |
a6503abf BJ |
187 | tcp_close(tp); |
188 | } | |
189 | ||
72e4f44e SL |
190 | tcp_abort(inp) |
191 | struct inpcb *inp; | |
192 | { | |
193 | tcp_close(inp->inp_ppcb); | |
194 | } | |
195 | ||
0974b45c BJ |
196 | /* |
197 | * Close a TCP control block: | |
198 | * discard all space held by the tcp | |
199 | * discard internet protocol block | |
200 | * wake up any sleepers | |
201 | */ | |
a6503abf BJ |
202 | tcp_close(tp) |
203 | register struct tcpcb *tp; | |
204 | { | |
205 | register struct tcpiphdr *t; | |
364801f5 BJ |
206 | struct inpcb *inp = tp->t_inpcb; |
207 | struct socket *so = inp->inp_socket; | |
a6503abf | 208 | |
a6503abf BJ |
209 | t = tp->seg_next; |
210 | for (; t != (struct tcpiphdr *)tp; t = (struct tcpiphdr *)t->ti_next) | |
211 | m_freem(dtom(t)); | |
0974b45c | 212 | if (tp->t_template) |
a6503abf | 213 | (void) m_free(dtom(tp->t_template)); |
0974b45c BJ |
214 | if (tp->t_tcpopt) |
215 | (void) m_free(dtom(tp->t_tcpopt)); | |
216 | if (tp->t_ipopt) | |
217 | (void) m_free(dtom(tp->t_ipopt)); | |
a6503abf | 218 | (void) m_free(dtom(tp)); |
364801f5 | 219 | inp->inp_ppcb = 0; |
4aed14e3 | 220 | soisdisconnected(so); |
86676257 | 221 | in_pcbdetach(inp); |
a6503abf BJ |
222 | } |
223 | ||
a6503abf BJ |
224 | tcp_drain() |
225 | { | |
a6503abf | 226 | |
a6503abf BJ |
227 | } |
228 | ||
72e4f44e SL |
229 | tcp_ctlinput(cmd, arg) |
230 | int cmd; | |
231 | caddr_t arg; | |
a6503abf | 232 | { |
39674d5f SL |
233 | struct in_addr *sin; |
234 | extern u_char inetctlerrmap[]; | |
39674d5f SL |
235 | |
236 | if (cmd < 0 || cmd > PRC_NCMDS) | |
237 | return; | |
238 | switch (cmd) { | |
239 | ||
240 | case PRC_ROUTEDEAD: | |
241 | break; | |
242 | ||
243 | case PRC_QUENCH: | |
244 | break; | |
245 | ||
246 | /* these are handled by ip */ | |
247 | case PRC_IFDOWN: | |
248 | case PRC_HOSTDEAD: | |
249 | case PRC_HOSTUNREACH: | |
250 | break; | |
251 | ||
252 | default: | |
253 | sin = &((struct icmp *)arg)->icmp_ip.ip_dst; | |
254 | in_pcbnotify(&tcb, sin, inetctlerrmap[cmd], tcp_abort); | |
255 | } | |
a6503abf | 256 | } |