1 /*-
2 * Copyright (c) 2001-2007, by Cisco Systems, Inc. All rights reserved.
3 *
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions are met:
6 *
7 * a) Redistributions of source code must retain the above copyright notice,
8 * this list of conditions and the following disclaimer.
9 *
10 * b) Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in
12 * the documentation and/or other materials provided with the distribution.
13 *
14 * c) Neither the name of Cisco Systems, Inc. nor the names of its
15 * contributors may be used to endorse or promote products derived
16 * from this software without specific prior written permission.
17 *
18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
19 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
20 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
22 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
23 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
24 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
25 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
26 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
27 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
28 * THE POSSIBILITY OF SUCH DAMAGE.
29 */
30
31 /* $KAME: sctp_usrreq.c,v 1.48 2005/03/07 23:26:08 itojun Exp $ */
32
33 #include <sys/cdefs.h>
34 __FBSDID("$FreeBSD$");
35 #include <netinet/sctp_os.h>
36 #include <sys/proc.h>
37 #include <netinet/sctp_pcb.h>
38 #include <netinet/sctp_header.h>
39 #include <netinet/sctp_var.h>
40 #if defined(INET6)
41 #include <netinet6/sctp6_var.h>
42 #endif
43 #include <netinet/sctp_sysctl.h>
44 #include <netinet/sctp_output.h>
45 #include <netinet/sctp_uio.h>
46 #include <netinet/sctp_asconf.h>
47 #include <netinet/sctputil.h>
48 #include <netinet/sctp_indata.h>
49 #include <netinet/sctp_timer.h>
50 #include <netinet/sctp_auth.h>
51 #include <netinet/sctp_bsd_addr.h>
52 #include <netinet/sctp_cc_functions.h>
53
54
55
56
57 void
58 sctp_init(void)
59 {
60 /* Init the SCTP pcb in sctp_pcb.c */
61 u_long sb_max_adj;
62
63 sctp_pcb_init();
64
65
66 if ((nmbclusters / 8) > SCTP_ASOC_MAX_CHUNKS_ON_QUEUE)
67 sctp_max_chunks_on_queue = (nmbclusters / 8);
68 /*
69 * Allow a user to take no more than 1/2 the number of clusters or
70 * the SB_MAX whichever is smaller for the send window.
71 */
72 sb_max_adj = (u_long)((u_quad_t) (SB_MAX) * MCLBYTES / (MSIZE + MCLBYTES));
73 sctp_sendspace = min(sb_max_adj,
74 (((uint32_t) nmbclusters / 2) * SCTP_DEFAULT_MAXSEGMENT));
75 /*
76 * Now for the recv window, should we take the same amount? or
77 * should I do 1/2 the SB_MAX instead in the SB_MAX min above. For
78 * now I will just copy.
79 */
80 sctp_recvspace = sctp_sendspace;
81
82 }
83
84
85
86 /*
87 * cleanup of the sctppcbinfo structure.
88 * Assumes that the sctppcbinfo lock is held.
89 */
90 void
91 sctp_pcbinfo_cleanup(void)
92 {
93 /* free the hash tables */
94 if (sctppcbinfo.sctp_asochash != NULL)
95 SCTP_HASH_FREE(sctppcbinfo.sctp_asochash, sctppcbinfo.hashasocmark);
96 if (sctppcbinfo.sctp_ephash != NULL)
97 SCTP_HASH_FREE(sctppcbinfo.sctp_ephash, sctppcbinfo.hashmark);
98 if (sctppcbinfo.sctp_tcpephash != NULL)
99 SCTP_HASH_FREE(sctppcbinfo.sctp_tcpephash, sctppcbinfo.hashtcpmark);
100 if (sctppcbinfo.sctp_restarthash != NULL)
101 SCTP_HASH_FREE(sctppcbinfo.sctp_restarthash, sctppcbinfo.hashrestartmark);
102 }
103
104
105 static void
106 sctp_pathmtu_adjustment(struct sctp_inpcb *inp,
107 struct sctp_tcb *stcb,
108 struct sctp_nets *net,
109 uint16_t nxtsz)
110 {
111 struct sctp_tmit_chunk *chk;
112
113 /* Adjust that too */
114 stcb->asoc.smallest_mtu = nxtsz;
115 /* now off to subtract IP_DF flag if needed */
116 #ifdef SCTP_PRINT_FOR_B_AND_M
117 SCTP_PRINTF("sctp_pathmtu_adjust called inp:%p stcb:%p net:%p nxtsz:%d\n",
118 inp, stcb, net, nxtsz);
119 #endif
120 TAILQ_FOREACH(chk, &stcb->asoc.send_queue, sctp_next) {
121 if ((chk->send_size + IP_HDR_SIZE) > nxtsz) {
122 chk->flags |= CHUNK_FLAGS_FRAGMENT_OK;
123 }
124 }
125 TAILQ_FOREACH(chk, &stcb->asoc.sent_queue, sctp_next) {
126 if ((chk->send_size + IP_HDR_SIZE) > nxtsz) {
127 /*
128 * For this guy we also mark for immediate resend
129 * since we sent to big of chunk
130 */
131 chk->flags |= CHUNK_FLAGS_FRAGMENT_OK;
132 if (chk->sent != SCTP_DATAGRAM_RESEND) {
133 sctp_ucount_incr(stcb->asoc.sent_queue_retran_cnt);
134 }
135 chk->sent = SCTP_DATAGRAM_RESEND;
136 chk->rec.data.doing_fast_retransmit = 0;
137 if (sctp_logging_level & SCTP_FLIGHT_LOGGING_ENABLE) {
138 sctp_misc_ints(SCTP_FLIGHT_LOG_DOWN_PMTU,
139 chk->whoTo->flight_size,
140 chk->book_size,
141 (uintptr_t) chk->whoTo,
142 chk->rec.data.TSN_seq);
143 }
144 /* Clear any time so NO RTT is being done */
145 chk->do_rtt = 0;
146 sctp_flight_size_decrease(chk);
147 sctp_total_flight_decrease(stcb, chk);
148 }
149 }
150 }
151
152 static void
153 sctp_notify_mbuf(struct sctp_inpcb *inp,
154 struct sctp_tcb *stcb,
155 struct sctp_nets *net,
156 struct ip *ip,
157 struct sctphdr *sh)
158 {
159 struct icmp *icmph;
160 int totsz, tmr_stopped = 0;
161 uint16_t nxtsz;
162
163 /* protection */
164 if ((inp == NULL) || (stcb == NULL) || (net == NULL) ||
165 (ip == NULL) || (sh == NULL)) {
166 if (stcb != NULL) {
167 SCTP_TCB_UNLOCK(stcb);
168 }
169 return;
170 }
171 /* First job is to verify the vtag matches what I would send */
172 if (ntohl(sh->v_tag) != (stcb->asoc.peer_vtag)) {
173 SCTP_TCB_UNLOCK(stcb);
174 return;
175 }
176 icmph = (struct icmp *)((caddr_t)ip - (sizeof(struct icmp) -
177 sizeof(struct ip)));
178 if (icmph->icmp_type != ICMP_UNREACH) {
179 /* We only care about unreachable */
180 SCTP_TCB_UNLOCK(stcb);
181 return;
182 }
183 if (icmph->icmp_code != ICMP_UNREACH_NEEDFRAG) {
184 /* not a unreachable message due to frag. */
185 SCTP_TCB_UNLOCK(stcb);
186 return;
187 }
188 totsz = ip->ip_len;
189
190 nxtsz = ntohs(icmph->icmp_nextmtu);
191 if (nxtsz == 0) {
192 /*
193 * old type router that does not tell us what the next size
194 * mtu is. Rats we will have to guess (in a educated fashion
195 * of course)
196 */
197 nxtsz = find_next_best_mtu(totsz);
198 }
199 /* Stop any PMTU timer */
200 if (SCTP_OS_TIMER_PENDING(&net->pmtu_timer.timer)) {
201 tmr_stopped = 1;
202 sctp_timer_stop(SCTP_TIMER_TYPE_PATHMTURAISE, inp, stcb, net,
203 SCTP_FROM_SCTP_USRREQ + SCTP_LOC_1);
204 }
205 /* Adjust destination size limit */
206 if (net->mtu > nxtsz) {
207 net->mtu = nxtsz;
208 }
209 /* now what about the ep? */
210 if (stcb->asoc.smallest_mtu > nxtsz) {
211 #ifdef SCTP_PRINT_FOR_B_AND_M
212 SCTP_PRINTF("notify_mbuf (ICMP) calls sctp_pathmtu_adjust mtu:%d\n",
213 nxtsz);
214 #endif
215 sctp_pathmtu_adjustment(inp, stcb, net, nxtsz);
216 }
217 if (tmr_stopped)
218 sctp_timer_start(SCTP_TIMER_TYPE_PATHMTURAISE, inp, stcb, net);
219
220 SCTP_TCB_UNLOCK(stcb);
221 }
222
223
224 void
225 sctp_notify(struct sctp_inpcb *inp,
226 struct ip *ip,
227 struct sctphdr *sh,
228 struct sockaddr *to,
229 struct sctp_tcb *stcb,
230 struct sctp_nets *net)
231 {
232 #if defined (__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
233 struct socket *so;
234
235 #endif
236 /* protection */
237 int reason;
238 struct icmp *icmph;
239
240
241 if ((inp == NULL) || (stcb == NULL) || (net == NULL) ||
242 (sh == NULL) || (to == NULL)) {
243 if (stcb)
244 SCTP_TCB_UNLOCK(stcb);
245 return;
246 }
247 /* First job is to verify the vtag matches what I would send */
248 if (ntohl(sh->v_tag) != (stcb->asoc.peer_vtag)) {
249 SCTP_TCB_UNLOCK(stcb);
250 return;
251 }
252 icmph = (struct icmp *)((caddr_t)ip - (sizeof(struct icmp) -
253 sizeof(struct ip)));
254 if (icmph->icmp_type != ICMP_UNREACH) {
255 /* We only care about unreachable */
256 SCTP_TCB_UNLOCK(stcb);
257 return;
258 }
259 if ((icmph->icmp_code == ICMP_UNREACH_NET) ||
260 (icmph->icmp_code == ICMP_UNREACH_HOST) ||
261 (icmph->icmp_code == ICMP_UNREACH_NET_UNKNOWN) ||
262 (icmph->icmp_code == ICMP_UNREACH_HOST_UNKNOWN) ||
263 (icmph->icmp_code == ICMP_UNREACH_ISOLATED) ||
264 (icmph->icmp_code == ICMP_UNREACH_NET_PROHIB) ||
265 (icmph->icmp_code == ICMP_UNREACH_HOST_PROHIB) ||
266 (icmph->icmp_code == ICMP_UNREACH_FILTER_PROHIB)) {
267
268 /*
269 * Hmm reachablity problems we must examine closely. If its
270 * not reachable, we may have lost a network. Or if there is
271 * NO protocol at the other end named SCTP. well we consider
272 * it a OOTB abort.
273 */
274 if (net->dest_state & SCTP_ADDR_REACHABLE) {
275 /* Ok that destination is NOT reachable */
276 SCTP_PRINTF("ICMP (thresh %d/%d) takes interface %p down\n",
277 net->error_count,
278 net->failure_threshold,
279 net);
280
281 net->dest_state &= ~SCTP_ADDR_REACHABLE;
282 net->dest_state |= SCTP_ADDR_NOT_REACHABLE;
283 /*
284 * JRS 5/14/07 - If a destination is unreachable,
285 * the PF bit is turned off. This allows an
286 * unambiguous use of the PF bit for destinations
287 * that are reachable but potentially failed. If the
288 * destination is set to the unreachable state, also
289 * set the destination to the PF state.
290 */
291 /*
292 * Add debug message here if destination is not in
293 * PF state.
294 */
295 /* Stop any running T3 timers here? */
296 if (sctp_cmt_on_off && sctp_cmt_pf) {
297 net->dest_state &= ~SCTP_ADDR_PF;
298 SCTPDBG(SCTP_DEBUG_TIMER4, "Destination %p moved from PF to unreachable.\n",
299 net);
300 }
301 net->error_count = net->failure_threshold + 1;
302 sctp_ulp_notify(SCTP_NOTIFY_INTERFACE_DOWN,
303 stcb, SCTP_FAILED_THRESHOLD,
304 (void *)net, SCTP_SO_NOT_LOCKED);
305 }
306 SCTP_TCB_UNLOCK(stcb);
307 } else if ((icmph->icmp_code == ICMP_UNREACH_PROTOCOL) ||
308 (icmph->icmp_code == ICMP_UNREACH_PORT)) {
309 /*
310 * Here the peer is either playing tricks on us, including
311 * an address that belongs to someone who does not support
312 * SCTP OR was a userland implementation that shutdown and
313 * now is dead. In either case treat it like a OOTB abort
314 * with no TCB
315 */
316 reason = SCTP_PEER_FAULTY;
317 sctp_abort_notification(stcb, reason, SCTP_SO_NOT_LOCKED);
318 #if defined (__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
319 so = SCTP_INP_SO(inp);
320 atomic_add_int(&stcb->asoc.refcnt, 1);
321 SCTP_TCB_UNLOCK(stcb);
322 SCTP_SOCKET_LOCK(so, 1);
323 SCTP_TCB_LOCK(stcb);
324 atomic_subtract_int(&stcb->asoc.refcnt, 1);
325 #endif
326 (void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, SCTP_FROM_SCTP_USRREQ + SCTP_LOC_2);
327 #if defined (__APPLE__) || defined(SCTP_SO_LOCK_TESTING)
328 SCTP_SOCKET_UNLOCK(so, 1);
329 /* SCTP_TCB_UNLOCK(stcb); MT: I think this is not needed. */
330 #endif
331 /* no need to unlock here, since the TCB is gone */
332 } else {
333 SCTP_TCB_UNLOCK(stcb);
334 }
335 }
336
337 void
338 sctp_ctlinput(cmd, sa, vip)
339 int cmd;
340 struct sockaddr *sa;
341 void *vip;
342 {
343 struct ip *ip = vip;
344 struct sctphdr *sh;
345 uint32_t vrf_id;
346
347 /* FIX, for non-bsd is this right? */
348 vrf_id = SCTP_DEFAULT_VRFID;
349 if (sa->sa_family != AF_INET ||
350 ((struct sockaddr_in *)sa)->sin_addr.s_addr == INADDR_ANY) {
351 return;
352 }
353 if (PRC_IS_REDIRECT(cmd)) {
354 ip = 0;
355 } else if ((unsigned)cmd >= PRC_NCMDS || inetctlerrmap[cmd] == 0) {
356 return;
357 }
358 if (ip) {
359 struct sctp_inpcb *inp = NULL;
360 struct sctp_tcb *stcb = NULL;
361 struct sctp_nets *net = NULL;
362 struct sockaddr_in to, from;
363
364 sh = (struct sctphdr *)((caddr_t)ip + (ip->ip_hl << 2));
365 bzero(&to, sizeof(to));
366 bzero(&from, sizeof(from));
367 from.sin_family = to.sin_family = AF_INET;
368 from.sin_len = to.sin_len = sizeof(to);
369 from.sin_port = sh->src_port;
370 from.sin_addr = ip->ip_src;
371 to.sin_port = sh->dest_port;
372 to.sin_addr = ip->ip_dst;
373
374 /*
375 * 'to' holds the dest of the packet that failed to be sent.
376 * 'from' holds our local endpoint address. Thus we reverse
377 * the to and the from in the lookup.
378 */
379 stcb = sctp_findassociation_addr_sa((struct sockaddr *)&from,
380 (struct sockaddr *)&to,
381 &inp, &net, 1, vrf_id);
382 if (stcb != NULL && inp && (inp->sctp_socket != NULL)) {
383 if (cmd != PRC_MSGSIZE) {
384 sctp_notify(inp, ip, sh,
385 (struct sockaddr *)&to, stcb,
386 net);
387 } else {
388 /* handle possible ICMP size messages */
389 sctp_notify_mbuf(inp, stcb, net, ip, sh);
390 }
391 } else {
392 if ((stcb == NULL) && (inp != NULL)) {
393 /* reduce ref-count */
394 SCTP_INP_WLOCK(inp);
395 SCTP_INP_DECR_REF(inp);
396 SCTP_INP_WUNLOCK(inp);
397 }
398 }
399 }
400 return;
401 }
402
403 static int
404 sctp_getcred(SYSCTL_HANDLER_ARGS)
405 {
406 struct xucred xuc;
407 struct sockaddr_in addrs[2];
408 struct sctp_inpcb *inp;
409 struct sctp_nets *net;
410 struct sctp_tcb *stcb;
411 int error;
412 uint32_t vrf_id;
413
414 /* FIX, for non-bsd is this right? */
415 vrf_id = SCTP_DEFAULT_VRFID;
416
417 error = priv_check(req->td, PRIV_NETINET_GETCRED);
418
419 if (error)
420 return (error);
421
422 error = SYSCTL_IN(req, addrs, sizeof(addrs));
423 if (error)
424 return (error);
425
426 stcb = sctp_findassociation_addr_sa(sintosa(&addrs[0]),
427 sintosa(&addrs[1]),
428 &inp, &net, 1, vrf_id);
429 if (stcb == NULL || inp == NULL || inp->sctp_socket == NULL) {
430 if ((inp != NULL) && (stcb == NULL)) {
431 /* reduce ref-count */
432 SCTP_INP_WLOCK(inp);
433 SCTP_INP_DECR_REF(inp);
434 goto cred_can_cont;
435 }
436 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOENT);
437 error = ENOENT;
438 goto out;
439 }
440 SCTP_TCB_UNLOCK(stcb);
441 /*
442 * We use the write lock here, only since in the error leg we need
443 * it. If we used RLOCK, then we would have to
444 * wlock/decr/unlock/rlock. Which in theory could create a hole.
445 * Better to use higher wlock.
446 */
447 SCTP_INP_WLOCK(inp);
448 cred_can_cont:
449 error = cr_canseesocket(req->td->td_ucred, inp->sctp_socket);
450 if (error) {
451 SCTP_INP_WUNLOCK(inp);
452 goto out;
453 }
454 cru2x(inp->sctp_socket->so_cred, &xuc);
455 SCTP_INP_WUNLOCK(inp);
456 error = SYSCTL_OUT(req, &xuc, sizeof(struct xucred));
457 out:
458 return (error);
459 }
460
461 SYSCTL_PROC(_net_inet_sctp, OID_AUTO, getcred, CTLTYPE_OPAQUE | CTLFLAG_RW,
462 0, 0, sctp_getcred, "S,ucred", "Get the ucred of a SCTP connection");
463
464
465 static void
466 sctp_abort(struct socket *so)
467 {
468 struct sctp_inpcb *inp;
469 uint32_t flags;
470
471 inp = (struct sctp_inpcb *)so->so_pcb;
472 if (inp == 0) {
473 return;
474 }
475 sctp_must_try_again:
476 flags = inp->sctp_flags;
477 #ifdef SCTP_LOG_CLOSING
478 sctp_log_closing(inp, NULL, 17);
479 #endif
480 if (((flags & SCTP_PCB_FLAGS_SOCKET_GONE) == 0) &&
481 (atomic_cmpset_int(&inp->sctp_flags, flags, (flags | SCTP_PCB_FLAGS_SOCKET_GONE | SCTP_PCB_FLAGS_CLOSE_IP)))) {
482 #ifdef SCTP_LOG_CLOSING
483 sctp_log_closing(inp, NULL, 16);
484 #endif
485 sctp_inpcb_free(inp, SCTP_FREE_SHOULD_USE_ABORT,
486 SCTP_CALLED_AFTER_CMPSET_OFCLOSE);
487 SOCK_LOCK(so);
488 SCTP_SB_CLEAR(so->so_snd);
489 /*
490 * same for the rcv ones, they are only here for the
491 * accounting/select.
492 */
493 SCTP_SB_CLEAR(so->so_rcv);
494
495 /* Now null out the reference, we are completely detached. */
496 so->so_pcb = NULL;
497 SOCK_UNLOCK(so);
498 } else {
499 flags = inp->sctp_flags;
500 if ((flags & SCTP_PCB_FLAGS_SOCKET_GONE) == 0) {
501 goto sctp_must_try_again;
502 }
503 }
504 return;
505 }
506
507 static int
508 sctp_attach(struct socket *so, int proto, struct thread *p)
509 {
510 struct sctp_inpcb *inp;
511 struct inpcb *ip_inp;
512 int error;
513 uint32_t vrf_id = SCTP_DEFAULT_VRFID;
514
515 #ifdef IPSEC
516 uint32_t flags;
517
518 #endif
519 inp = (struct sctp_inpcb *)so->so_pcb;
520 if (inp != 0) {
521 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
522 return EINVAL;
523 }
524 error = SCTP_SORESERVE(so, sctp_sendspace, sctp_recvspace);
525 if (error) {
526 return error;
527 }
528 error = sctp_inpcb_alloc(so, vrf_id);
529 if (error) {
530 return error;
531 }
532 inp = (struct sctp_inpcb *)so->so_pcb;
533 SCTP_INP_WLOCK(inp);
534 inp->sctp_flags &= ~SCTP_PCB_FLAGS_BOUND_V6; /* I'm not v6! */
535 ip_inp = &inp->ip_inp.inp;
536 ip_inp->inp_vflag |= INP_IPV4;
537 ip_inp->inp_ip_ttl = ip_defttl;
538 #ifdef IPSEC
539 error = ipsec_init_policy(so, &ip_inp->inp_sp);
540 #ifdef SCTP_LOG_CLOSING
541 sctp_log_closing(inp, NULL, 17);
542 #endif
543 if (error != 0) {
544 flags = inp->sctp_flags;
545 if (((flags & SCTP_PCB_FLAGS_SOCKET_GONE) == 0) &&
546 (atomic_cmpset_int(&inp->sctp_flags, flags, (flags | SCTP_PCB_FLAGS_SOCKET_GONE | SCTP_PCB_FLAGS_CLOSE_IP)))) {
547 #ifdef SCTP_LOG_CLOSING
548 sctp_log_closing(inp, NULL, 15);
549 #endif
550 SCTP_INP_WUNLOCK(inp);
551 sctp_inpcb_free(inp, SCTP_FREE_SHOULD_USE_ABORT,
552 SCTP_CALLED_AFTER_CMPSET_OFCLOSE);
553 } else {
554 SCTP_INP_WUNLOCK(inp);
555 }
556 return error;
557 }
558 #endif /* IPSEC */
559 SCTP_INP_WUNLOCK(inp);
560 return 0;
561 }
562
563 static int
564 sctp_bind(struct socket *so, struct sockaddr *addr, struct thread *p)
565 {
566 struct sctp_inpcb *inp = NULL;
567 int error;
568
569 #ifdef INET6
570 if (addr && addr->sa_family != AF_INET) {
571 /* must be a v4 address! */
572 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
573 return EINVAL;
574 }
575 #endif /* INET6 */
576 if (addr && (addr->sa_len != sizeof(struct sockaddr_in))) {
577 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
578 return EINVAL;
579 }
580 inp = (struct sctp_inpcb *)so->so_pcb;
581 if (inp == 0) {
582 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
583 return EINVAL;
584 }
585 error = sctp_inpcb_bind(so, addr, NULL, p);
586 return error;
587 }
588
589 void
590 sctp_close(struct socket *so)
591 {
592 struct sctp_inpcb *inp;
593 uint32_t flags;
594
595 inp = (struct sctp_inpcb *)so->so_pcb;
596 if (inp == 0)
597 return;
598
599 /*
600 * Inform all the lower layer assoc that we are done.
601 */
602 sctp_must_try_again:
603 flags = inp->sctp_flags;
604 #ifdef SCTP_LOG_CLOSING
605 sctp_log_closing(inp, NULL, 17);
606 #endif
607 if (((flags & SCTP_PCB_FLAGS_SOCKET_GONE) == 0) &&
608 (atomic_cmpset_int(&inp->sctp_flags, flags, (flags | SCTP_PCB_FLAGS_SOCKET_GONE | SCTP_PCB_FLAGS_CLOSE_IP)))) {
609 if (((so->so_options & SO_LINGER) && (so->so_linger == 0)) ||
610 (so->so_rcv.sb_cc > 0)) {
611 #ifdef SCTP_LOG_CLOSING
612 sctp_log_closing(inp, NULL, 13);
613 #endif
614 sctp_inpcb_free(inp, SCTP_FREE_SHOULD_USE_ABORT,
615 SCTP_CALLED_AFTER_CMPSET_OFCLOSE);
616 } else {
617 #ifdef SCTP_LOG_CLOSING
618 sctp_log_closing(inp, NULL, 14);
619 #endif
620 sctp_inpcb_free(inp, SCTP_FREE_SHOULD_USE_GRACEFUL_CLOSE,
621 SCTP_CALLED_AFTER_CMPSET_OFCLOSE);
622 }
623 /*
624 * The socket is now detached, no matter what the state of
625 * the SCTP association.
626 */
627 SOCK_LOCK(so);
628 SCTP_SB_CLEAR(so->so_snd);
629 /*
630 * same for the rcv ones, they are only here for the
631 * accounting/select.
632 */
633 SCTP_SB_CLEAR(so->so_rcv);
634
635 /* Now null out the reference, we are completely detached. */
636 so->so_pcb = NULL;
637 SOCK_UNLOCK(so);
638 } else {
639 flags = inp->sctp_flags;
640 if ((flags & SCTP_PCB_FLAGS_SOCKET_GONE) == 0) {
641 goto sctp_must_try_again;
642 }
643 }
644 return;
645 }
646
647
648 int
649 sctp_sendm(struct socket *so, int flags, struct mbuf *m, struct sockaddr *addr,
650 struct mbuf *control, struct thread *p);
651
652
653 int
654 sctp_sendm(struct socket *so, int flags, struct mbuf *m, struct sockaddr *addr,
655 struct mbuf *control, struct thread *p)
656 {
657 struct sctp_inpcb *inp;
658 int error;
659
660 inp = (struct sctp_inpcb *)so->so_pcb;
661 if (inp == 0) {
662 if (control) {
663 sctp_m_freem(control);
664 control = NULL;
665 }
666 SCTP_LTRACE_ERR_RET_PKT(m, inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
667 sctp_m_freem(m);
668 return EINVAL;
669 }
670 /* Got to have an to address if we are NOT a connected socket */
671 if ((addr == NULL) &&
672 ((inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) ||
673 (inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE))
674 ) {
675 goto connected_type;
676 } else if (addr == NULL) {
677 SCTP_LTRACE_ERR_RET_PKT(m, inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EDESTADDRREQ);
678 error = EDESTADDRREQ;
679 sctp_m_freem(m);
680 if (control) {
681 sctp_m_freem(control);
682 control = NULL;
683 }
684 return (error);
685 }
686 #ifdef INET6
687 if (addr->sa_family != AF_INET) {
688 /* must be a v4 address! */
689 SCTP_LTRACE_ERR_RET_PKT(m, inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EDESTADDRREQ);
690 sctp_m_freem(m);
691 if (control) {
692 sctp_m_freem(control);
693 control = NULL;
694 }
695 error = EDESTADDRREQ;
696 return EDESTADDRREQ;
697 }
698 #endif /* INET6 */
699 connected_type:
700 /* now what about control */
701 if (control) {
702 if (inp->control) {
703 SCTP_PRINTF("huh? control set?\n");
704 sctp_m_freem(inp->control);
705 inp->control = NULL;
706 }
707 inp->control = control;
708 }
709 /* Place the data */
710 if (inp->pkt) {
711 SCTP_BUF_NEXT(inp->pkt_last) = m;
712 inp->pkt_last = m;
713 } else {
714 inp->pkt_last = inp->pkt = m;
715 }
716 if (
717 /* FreeBSD uses a flag passed */
718 ((flags & PRUS_MORETOCOME) == 0)
719 ) {
720 /*
721 * note with the current version this code will only be used
722 * by OpenBSD-- NetBSD, FreeBSD, and MacOS have methods for
723 * re-defining sosend to use the sctp_sosend. One can
724 * optionally switch back to this code (by changing back the
725 * definitions) but this is not advisable. This code is used
726 * by FreeBSD when sending a file with sendfile() though.
727 */
728 int ret;
729
730 ret = sctp_output(inp, inp->pkt, addr, inp->control, p, flags);
731 inp->pkt = NULL;
732 inp->control = NULL;
733 return (ret);
734 } else {
735 return (0);
736 }
737 }
738
739 int
740 sctp_disconnect(struct socket *so)
741 {
742 struct sctp_inpcb *inp;
743
744 inp = (struct sctp_inpcb *)so->so_pcb;
745 if (inp == NULL) {
746 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOTCONN);
747 return (ENOTCONN);
748 }
749 SCTP_INP_RLOCK(inp);
750 if ((inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) ||
751 (inp->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) {
752 if (SCTP_LIST_EMPTY(&inp->sctp_asoc_list)) {
753 /* No connection */
754 SCTP_INP_RUNLOCK(inp);
755 return (0);
756 } else {
757 struct sctp_association *asoc;
758 struct sctp_tcb *stcb;
759
760 stcb = LIST_FIRST(&inp->sctp_asoc_list);
761 if (stcb == NULL) {
762 SCTP_INP_RUNLOCK(inp);
763 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
764 return (EINVAL);
765 }
766 SCTP_TCB_LOCK(stcb);
767 asoc = &stcb->asoc;
768 if (stcb->asoc.state & SCTP_STATE_ABOUT_TO_BE_FREED) {
769 /* We are about to be freed, out of here */
770 SCTP_TCB_UNLOCK(stcb);
771 SCTP_INP_RUNLOCK(inp);
772 return (0);
773 }
774 if (((so->so_options & SO_LINGER) &&
775 (so->so_linger == 0)) ||
776 (so->so_rcv.sb_cc > 0)) {
777 if (SCTP_GET_STATE(asoc) !=
778 SCTP_STATE_COOKIE_WAIT) {
779 /* Left with Data unread */
780 struct mbuf *err;
781
782 err = sctp_get_mbuf_for_msg(sizeof(struct sctp_paramhdr), 0, M_DONTWAIT, 1, MT_DATA);
783 if (err) {
784 /*
785 * Fill in the user
786 * initiated abort
787 */
788 struct sctp_paramhdr *ph;
789
790 ph = mtod(err, struct sctp_paramhdr *);
791 SCTP_BUF_LEN(err) = sizeof(struct sctp_paramhdr);
792 ph->param_type = htons(SCTP_CAUSE_USER_INITIATED_ABT);
793 ph->param_length = htons(SCTP_BUF_LEN(err));
794 }
795 #if defined(SCTP_PANIC_ON_ABORT)
796 panic("disconnect does an abort");
797 #endif
798 sctp_send_abort_tcb(stcb, err, SCTP_SO_LOCKED);
799 SCTP_STAT_INCR_COUNTER32(sctps_aborted);
800 }
801 SCTP_INP_RUNLOCK(inp);
802 if ((SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_OPEN) ||
803 (SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_SHUTDOWN_RECEIVED)) {
804 SCTP_STAT_DECR_GAUGE32(sctps_currestab);
805 }
806 (void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, SCTP_FROM_SCTP_USRREQ + SCTP_LOC_3);
807 /* No unlock tcb assoc is gone */
808 return (0);
809 }
810 if (TAILQ_EMPTY(&asoc->send_queue) &&
811 TAILQ_EMPTY(&asoc->sent_queue) &&
812 (asoc->stream_queue_cnt == 0)) {
813 /* there is nothing queued to send, so done */
814 if (asoc->locked_on_sending) {
815 goto abort_anyway;
816 }
817 if ((SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_SENT) &&
818 (SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_ACK_SENT)) {
819 /* only send SHUTDOWN 1st time thru */
820 sctp_stop_timers_for_shutdown(stcb);
821 sctp_send_shutdown(stcb,
822 stcb->asoc.primary_destination);
823 sctp_chunk_output(stcb->sctp_ep, stcb, SCTP_OUTPUT_FROM_T3, SCTP_SO_LOCKED);
824 if ((SCTP_GET_STATE(asoc) == SCTP_STATE_OPEN) ||
825 (SCTP_GET_STATE(asoc) == SCTP_STATE_SHUTDOWN_RECEIVED)) {
826 SCTP_STAT_DECR_GAUGE32(sctps_currestab);
827 }
828 SCTP_SET_STATE(asoc, SCTP_STATE_SHUTDOWN_SENT);
829 SCTP_CLEAR_SUBSTATE(asoc, SCTP_STATE_SHUTDOWN_PENDING);
830 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWN,
831 stcb->sctp_ep, stcb,
832 asoc->primary_destination);
833 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD,
834 stcb->sctp_ep, stcb,
835 asoc->primary_destination);
836 }
837 } else {
838 /*
839 * we still got (or just got) data to send,
840 * so set SHUTDOWN_PENDING
841 */
842 /*
843 * XXX sockets draft says that SCTP_EOF
844 * should be sent with no data. currently,
845 * we will allow user data to be sent first
846 * and move to SHUTDOWN-PENDING
847 */
848 asoc->state |= SCTP_STATE_SHUTDOWN_PENDING;
849 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD, stcb->sctp_ep, stcb,
850 asoc->primary_destination);
851 if (asoc->locked_on_sending) {
852 /* Locked to send out the data */
853 struct sctp_stream_queue_pending *sp;
854
855 sp = TAILQ_LAST(&asoc->locked_on_sending->outqueue, sctp_streamhead);
856 if (sp == NULL) {
857 SCTP_PRINTF("Error, sp is NULL, locked on sending is non-null strm:%d\n",
858 asoc->locked_on_sending->stream_no);
859 } else {
860 if ((sp->length == 0) && (sp->msg_is_complete == 0))
861 asoc->state |= SCTP_STATE_PARTIAL_MSG_LEFT;
862 }
863 }
864 if (TAILQ_EMPTY(&asoc->send_queue) &&
865 TAILQ_EMPTY(&asoc->sent_queue) &&
866 (asoc->state & SCTP_STATE_PARTIAL_MSG_LEFT)) {
867 struct mbuf *op_err;
868
869 abort_anyway:
870 op_err = sctp_get_mbuf_for_msg((sizeof(struct sctp_paramhdr) + sizeof(uint32_t)),
871 0, M_DONTWAIT, 1, MT_DATA);
872 if (op_err) {
873 /*
874 * Fill in the user
875 * initiated abort
876 */
877 struct sctp_paramhdr *ph;
878 uint32_t *ippp;
879
880 SCTP_BUF_LEN(op_err) =
881 (sizeof(struct sctp_paramhdr) + sizeof(uint32_t));
882 ph = mtod(op_err,
883 struct sctp_paramhdr *);
884 ph->param_type = htons(
885 SCTP_CAUSE_USER_INITIATED_ABT);
886 ph->param_length = htons(SCTP_BUF_LEN(op_err));
887 ippp = (uint32_t *) (ph + 1);
888 *ippp = htonl(SCTP_FROM_SCTP_USRREQ + SCTP_LOC_4);
889 }
890 #if defined(SCTP_PANIC_ON_ABORT)
891 panic("disconnect does an abort");
892 #endif
893
894 stcb->sctp_ep->last_abort_code = SCTP_FROM_SCTP_USRREQ + SCTP_LOC_4;
895 sctp_send_abort_tcb(stcb, op_err, SCTP_SO_LOCKED);
896 SCTP_STAT_INCR_COUNTER32(sctps_aborted);
897 if ((SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_OPEN) ||
898 (SCTP_GET_STATE(&stcb->asoc) == SCTP_STATE_SHUTDOWN_RECEIVED)) {
899 SCTP_STAT_DECR_GAUGE32(sctps_currestab);
900 }
901 SCTP_INP_RUNLOCK(inp);
902 (void)sctp_free_assoc(inp, stcb, SCTP_NORMAL_PROC, SCTP_FROM_SCTP_USRREQ + SCTP_LOC_5);
903 return (0);
904 } else {
905 sctp_chunk_output(inp, stcb, SCTP_OUTPUT_FROM_CLOSING, SCTP_SO_LOCKED);
906 }
907 }
908 SCTP_TCB_UNLOCK(stcb);
909 SCTP_INP_RUNLOCK(inp);
910 return (0);
911 }
912 /* not reached */
913 } else {
914 /* UDP model does not support this */
915 SCTP_INP_RUNLOCK(inp);
916 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EOPNOTSUPP);
917 return EOPNOTSUPP;
918 }
919 }
920
921 int
922 sctp_shutdown(struct socket *so)
923 {
924 struct sctp_inpcb *inp;
925
926 inp = (struct sctp_inpcb *)so->so_pcb;
927 if (inp == 0) {
928 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
929 return EINVAL;
930 }
931 SCTP_INP_RLOCK(inp);
932 /* For UDP model this is a invalid call */
933 if (inp->sctp_flags & SCTP_PCB_FLAGS_UDPTYPE) {
934 /* Restore the flags that the soshutdown took away. */
935 so->so_rcv.sb_state &= ~SBS_CANTRCVMORE;
936 /* This proc will wakeup for read and do nothing (I hope) */
937 SCTP_INP_RUNLOCK(inp);
938 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EOPNOTSUPP);
939 return (EOPNOTSUPP);
940 }
941 /*
942 * Ok if we reach here its the TCP model and it is either a SHUT_WR
943 * or SHUT_RDWR. This means we put the shutdown flag against it.
944 */
945 {
946 struct sctp_tcb *stcb;
947 struct sctp_association *asoc;
948
949 socantsendmore(so);
950
951 stcb = LIST_FIRST(&inp->sctp_asoc_list);
952 if (stcb == NULL) {
953 /*
954 * Ok we hit the case that the shutdown call was
955 * made after an abort or something. Nothing to do
956 * now.
957 */
958 SCTP_INP_RUNLOCK(inp);
959 return (0);
960 }
961 SCTP_TCB_LOCK(stcb);
962 asoc = &stcb->asoc;
963 if (TAILQ_EMPTY(&asoc->send_queue) &&
964 TAILQ_EMPTY(&asoc->sent_queue) &&
965 (asoc->stream_queue_cnt == 0)) {
966 if (asoc->locked_on_sending) {
967 goto abort_anyway;
968 }
969 /* there is nothing queued to send, so I'm done... */
970 if (SCTP_GET_STATE(asoc) != SCTP_STATE_SHUTDOWN_SENT) {
971 /* only send SHUTDOWN the first time through */
972 sctp_stop_timers_for_shutdown(stcb);
973 sctp_send_shutdown(stcb,
974 stcb->asoc.primary_destination);
975 sctp_chunk_output(stcb->sctp_ep, stcb, SCTP_OUTPUT_FROM_T3, SCTP_SO_LOCKED);
976 if ((SCTP_GET_STATE(asoc) == SCTP_STATE_OPEN) ||
977 (SCTP_GET_STATE(asoc) == SCTP_STATE_SHUTDOWN_RECEIVED)) {
978 SCTP_STAT_DECR_GAUGE32(sctps_currestab);
979 }
980 SCTP_SET_STATE(asoc, SCTP_STATE_SHUTDOWN_SENT);
981 SCTP_CLEAR_SUBSTATE(asoc, SCTP_STATE_SHUTDOWN_PENDING);
982 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWN,
983 stcb->sctp_ep, stcb,
984 asoc->primary_destination);
985 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD,
986 stcb->sctp_ep, stcb,
987 asoc->primary_destination);
988 }
989 } else {
990 /*
991 * we still got (or just got) data to send, so set
992 * SHUTDOWN_PENDING
993 */
994 asoc->state |= SCTP_STATE_SHUTDOWN_PENDING;
995 sctp_timer_start(SCTP_TIMER_TYPE_SHUTDOWNGUARD, stcb->sctp_ep, stcb,
996 asoc->primary_destination);
997
998 if (asoc->locked_on_sending) {
999 /* Locked to send out the data */
1000 struct sctp_stream_queue_pending *sp;
1001
1002 sp = TAILQ_LAST(&asoc->locked_on_sending->outqueue, sctp_streamhead);
1003 if (sp == NULL) {
1004 SCTP_PRINTF("Error, sp is NULL, locked on sending is non-null strm:%d\n",
1005 asoc->locked_on_sending->stream_no);
1006 } else {
1007 if ((sp->length == 0) && (sp->msg_is_complete == 0)) {
1008 asoc->state |= SCTP_STATE_PARTIAL_MSG_LEFT;
1009 }
1010 }
1011 }
1012 if (TAILQ_EMPTY(&asoc->send_queue) &&
1013 TAILQ_EMPTY(&asoc->sent_queue) &&
1014 (asoc->state & SCTP_STATE_PARTIAL_MSG_LEFT)) {
1015 struct mbuf *op_err;
1016
1017 abort_anyway:
1018 op_err = sctp_get_mbuf_for_msg((sizeof(struct sctp_paramhdr) + sizeof(uint32_t)),
1019 0, M_DONTWAIT, 1, MT_DATA);
1020 if (op_err) {
1021 /* Fill in the user initiated abort */
1022 struct sctp_paramhdr *ph;
1023 uint32_t *ippp;
1024
1025 SCTP_BUF_LEN(op_err) =
1026 sizeof(struct sctp_paramhdr) + sizeof(uint32_t);
1027 ph = mtod(op_err,
1028 struct sctp_paramhdr *);
1029 ph->param_type = htons(
1030 SCTP_CAUSE_USER_INITIATED_ABT);
1031 ph->param_length = htons(SCTP_BUF_LEN(op_err));
1032 ippp = (uint32_t *) (ph + 1);
1033 *ippp = htonl(SCTP_FROM_SCTP_USRREQ + SCTP_LOC_6);
1034 }
1035 #if defined(SCTP_PANIC_ON_ABORT)
1036 panic("shutdown does an abort");
1037 #endif
1038 stcb->sctp_ep->last_abort_code = SCTP_FROM_SCTP_USRREQ + SCTP_LOC_6;
1039 sctp_abort_an_association(stcb->sctp_ep, stcb,
1040 SCTP_RESPONSE_TO_USER_REQ,
1041 op_err, SCTP_SO_LOCKED);
1042 goto skip_unlock;
1043 } else {
1044 sctp_chunk_output(inp, stcb, SCTP_OUTPUT_FROM_CLOSING, SCTP_SO_LOCKED);
1045 }
1046 }
1047 SCTP_TCB_UNLOCK(stcb);
1048 }
1049 skip_unlock:
1050 SCTP_INP_RUNLOCK(inp);
1051 return 0;
1052 }
1053
1054 /*
1055 * copies a "user" presentable address and removes embedded scope, etc.
1056 * returns 0 on success, 1 on error
1057 */
1058 static uint32_t
1059 sctp_fill_user_address(struct sockaddr_storage *ss, struct sockaddr *sa)
1060 {
1061 struct sockaddr_in6 lsa6;
1062
1063 sa = (struct sockaddr *)sctp_recover_scope((struct sockaddr_in6 *)sa,
1064 &lsa6);
1065 memcpy(ss, sa, sa->sa_len);
1066 return (0);
1067 }
1068
1069
1070
1071 /*
1072 * NOTE: assumes addr lock is held
1073 */
1074 static size_t
1075 sctp_fill_up_addresses_vrf(struct sctp_inpcb *inp,
1076 struct sctp_tcb *stcb,
1077 size_t limit,
1078 struct sockaddr_storage *sas,
1079 uint32_t vrf_id)
1080 {
1081 struct sctp_ifn *sctp_ifn;
1082 struct sctp_ifa *sctp_ifa;
1083 int loopback_scope, ipv4_local_scope, local_scope, site_scope;
1084 size_t actual;
1085 int ipv4_addr_legal, ipv6_addr_legal;
1086 struct sctp_vrf *vrf;
1087
1088 actual = 0;
1089 if (limit <= 0)
1090 return (actual);
1091
1092 if (stcb) {
1093 /* Turn on all the appropriate scope */
1094 loopback_scope = stcb->asoc.loopback_scope;
1095 ipv4_local_scope = stcb->asoc.ipv4_local_scope;
1096 local_scope = stcb->asoc.local_scope;
1097 site_scope = stcb->asoc.site_scope;
1098 } else {
1099 /* Turn on ALL scope, since we look at the EP */
1100 loopback_scope = ipv4_local_scope = local_scope =
1101 site_scope = 1;
1102 }
1103 ipv4_addr_legal = ipv6_addr_legal = 0;
1104 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) {
1105 ipv6_addr_legal = 1;
1106 if (SCTP_IPV6_V6ONLY(inp) == 0) {
1107 ipv4_addr_legal = 1;
1108 }
1109 } else {
1110 ipv4_addr_legal = 1;
1111 }
1112 vrf = sctp_find_vrf(vrf_id);
1113 if (vrf == NULL) {
1114 return (0);
1115 }
1116 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) {
1117 LIST_FOREACH(sctp_ifn, &vrf->ifnlist, next_ifn) {
1118 if ((loopback_scope == 0) &&
1119 SCTP_IFN_IS_IFT_LOOP(sctp_ifn)) {
1120 /* Skip loopback if loopback_scope not set */
1121 continue;
1122 }
1123 LIST_FOREACH(sctp_ifa, &sctp_ifn->ifalist, next_ifa) {
1124 if (stcb) {
1125 /*
1126 * For the BOUND-ALL case, the list
1127 * associated with a TCB is Always
1128 * considered a reverse list.. i.e.
1129 * it lists addresses that are NOT
1130 * part of the association. If this
1131 * is one of those we must skip it.
1132 */
1133 if (sctp_is_addr_restricted(stcb,
1134 sctp_ifa)) {
1135 continue;
1136 }
1137 }
1138 if ((sctp_ifa->address.sa.sa_family == AF_INET) &&
1139 (ipv4_addr_legal)) {
1140 struct sockaddr_in *sin;
1141
1142 sin = (struct sockaddr_in *)&sctp_ifa->address.sa;
1143 if (sin->sin_addr.s_addr == 0) {
1144 /*
1145 * we skip unspecifed
1146 * addresses
1147 */
1148 continue;
1149 }
1150 if ((ipv4_local_scope == 0) &&
1151 (IN4_ISPRIVATE_ADDRESS(&sin->sin_addr))) {
1152 continue;
1153 }
1154 if (inp->sctp_flags & SCTP_PCB_FLAGS_NEEDS_MAPPED_V4) {
1155 in6_sin_2_v4mapsin6(sin, (struct sockaddr_in6 *)sas);
1156 ((struct sockaddr_in6 *)sas)->sin6_port = inp->sctp_lport;
1157 sas = (struct sockaddr_storage *)((caddr_t)sas + sizeof(struct sockaddr_in6));
1158 actual += sizeof(struct sockaddr_in6);
1159 } else {
1160 memcpy(sas, sin, sizeof(*sin));
1161 ((struct sockaddr_in *)sas)->sin_port = inp->sctp_lport;
1162 sas = (struct sockaddr_storage *)((caddr_t)sas + sizeof(*sin));
1163 actual += sizeof(*sin);
1164 }
1165 if (actual >= limit) {
1166 return (actual);
1167 }
1168 } else if ((sctp_ifa->address.sa.sa_family == AF_INET6) &&
1169 (ipv6_addr_legal)) {
1170 struct sockaddr_in6 *sin6;
1171
1172 sin6 = (struct sockaddr_in6 *)&sctp_ifa->address.sa;
1173 if (IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) {
1174 /*
1175 * we skip unspecifed
1176 * addresses
1177 */
1178 continue;
1179 }
1180 if (IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr)) {
1181 if (local_scope == 0)
1182 continue;
1183 if (sin6->sin6_scope_id == 0) {
1184 if (sa6_recoverscope(sin6) != 0)
1185 /*
1186 * bad link
1187 * local
1188 * address
1189 */
1190 continue;
1191 }
1192 }
1193 if ((site_scope == 0) &&
1194 (IN6_IS_ADDR_SITELOCAL(&sin6->sin6_addr))) {
1195 continue;
1196 }
1197 memcpy(sas, sin6, sizeof(*sin6));
1198 ((struct sockaddr_in6 *)sas)->sin6_port = inp->sctp_lport;
1199 sas = (struct sockaddr_storage *)((caddr_t)sas + sizeof(*sin6));
1200 actual += sizeof(*sin6);
1201 if (actual >= limit) {
1202 return (actual);
1203 }
1204 }
1205 }
1206 }
1207 } else {
1208 struct sctp_laddr *laddr;
1209
1210 LIST_FOREACH(laddr, &inp->sctp_addr_list, sctp_nxt_addr) {
1211 if (stcb) {
1212 if (sctp_is_addr_restricted(stcb, laddr->ifa)) {
1213 continue;
1214 }
1215 }
1216 if (sctp_fill_user_address(sas, &laddr->ifa->address.sa))
1217 continue;
1218
1219 ((struct sockaddr_in6 *)sas)->sin6_port = inp->sctp_lport;
1220 sas = (struct sockaddr_storage *)((caddr_t)sas +
1221 laddr->ifa->address.sa.sa_len);
1222 actual += laddr->ifa->address.sa.sa_len;
1223 if (actual >= limit) {
1224 return (actual);
1225 }
1226 }
1227 }
1228 return (actual);
1229 }
1230
1231 static size_t
1232 sctp_fill_up_addresses(struct sctp_inpcb *inp,
1233 struct sctp_tcb *stcb,
1234 size_t limit,
1235 struct sockaddr_storage *sas)
1236 {
1237 size_t size = 0;
1238
1239 SCTP_IPI_ADDR_RLOCK();
1240 /* fill up addresses for the endpoint's default vrf */
1241 size = sctp_fill_up_addresses_vrf(inp, stcb, limit, sas,
1242 inp->def_vrf_id);
1243 SCTP_IPI_ADDR_RUNLOCK();
1244 return (size);
1245 }
1246
1247 /*
1248 * NOTE: assumes addr lock is held
1249 */
1250 static int
1251 sctp_count_max_addresses_vrf(struct sctp_inpcb *inp, uint32_t vrf_id)
1252 {
1253 int cnt = 0;
1254 struct sctp_vrf *vrf = NULL;
1255
1256 /*
1257 * In both sub-set bound an bound_all cases we return the MAXIMUM
1258 * number of addresses that you COULD get. In reality the sub-set
1259 * bound may have an exclusion list for a given TCB OR in the
1260 * bound-all case a TCB may NOT include the loopback or other
1261 * addresses as well.
1262 */
1263 vrf = sctp_find_vrf(vrf_id);
1264 if (vrf == NULL) {
1265 return (0);
1266 }
1267 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) {
1268 struct sctp_ifn *sctp_ifn;
1269 struct sctp_ifa *sctp_ifa;
1270
1271 LIST_FOREACH(sctp_ifn, &vrf->ifnlist, next_ifn) {
1272 LIST_FOREACH(sctp_ifa, &sctp_ifn->ifalist, next_ifa) {
1273 /* Count them if they are the right type */
1274 if (sctp_ifa->address.sa.sa_family == AF_INET) {
1275 if (inp->sctp_flags & SCTP_PCB_FLAGS_NEEDS_MAPPED_V4)
1276 cnt += sizeof(struct sockaddr_in6);
1277 else
1278 cnt += sizeof(struct sockaddr_in);
1279
1280 } else if (sctp_ifa->address.sa.sa_family == AF_INET6)
1281 cnt += sizeof(struct sockaddr_in6);
1282 }
1283 }
1284 } else {
1285 struct sctp_laddr *laddr;
1286
1287 LIST_FOREACH(laddr, &inp->sctp_addr_list, sctp_nxt_addr) {
1288 if (laddr->ifa->address.sa.sa_family == AF_INET) {
1289 if (inp->sctp_flags & SCTP_PCB_FLAGS_NEEDS_MAPPED_V4)
1290 cnt += sizeof(struct sockaddr_in6);
1291 else
1292 cnt += sizeof(struct sockaddr_in);
1293
1294 } else if (laddr->ifa->address.sa.sa_family == AF_INET6)
1295 cnt += sizeof(struct sockaddr_in6);
1296 }
1297 }
1298 return (cnt);
1299 }
1300
1301 static int
1302 sctp_count_max_addresses(struct sctp_inpcb *inp)
1303 {
1304 int cnt = 0;
1305
1306 SCTP_IPI_ADDR_RLOCK();
1307 /* count addresses for the endpoint's default VRF */
1308 cnt = sctp_count_max_addresses_vrf(inp, inp->def_vrf_id);
1309 SCTP_IPI_ADDR_RUNLOCK();
1310 return (cnt);
1311 }
1312
1313 static int
1314 sctp_do_connect_x(struct socket *so, struct sctp_inpcb *inp, void *optval,
1315 size_t optsize, void *p, int delay)
1316 {
1317 int error = 0;
1318 int creat_lock_on = 0;
1319 struct sctp_tcb *stcb = NULL;
1320 struct sockaddr *sa;
1321 int num_v6 = 0, num_v4 = 0, *totaddrp, totaddr;
1322 int added = 0;
1323 uint32_t vrf_id;
1324 int bad_addresses = 0;
1325 sctp_assoc_t *a_id;
1326
1327 SCTPDBG(SCTP_DEBUG_PCB1, "Connectx called\n");
1328
1329 if ((inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) &&
1330 (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED)) {
1331 /* We are already connected AND the TCP model */
1332 SCTP_LTRACE_ERR_RET(inp, stcb, NULL, SCTP_FROM_SCTP_USRREQ, EADDRINUSE);
1333 return (EADDRINUSE);
1334 }
1335 if (inp->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL) {
1336 SCTP_LTRACE_ERR_RET(inp, stcb, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
1337 return (EINVAL);
1338 }
1339 if (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) {
1340 SCTP_INP_RLOCK(inp);
1341 stcb = LIST_FIRST(&inp->sctp_asoc_list);
1342 SCTP_INP_RUNLOCK(inp);
1343 }
1344 if (stcb) {
1345 SCTP_LTRACE_ERR_RET(inp, stcb, NULL, SCTP_FROM_SCTP_USRREQ, EALREADY);
1346 return (EALREADY);
1347 }
1348 SCTP_INP_INCR_REF(inp);
1349 SCTP_ASOC_CREATE_LOCK(inp);
1350 creat_lock_on = 1;
1351 if ((inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_ALLGONE) ||
1352 (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE)) {
1353 SCTP_LTRACE_ERR_RET(inp, stcb, NULL, SCTP_FROM_SCTP_USRREQ, EFAULT);
1354 error = EFAULT;
1355 goto out_now;
1356 }
1357 totaddrp = (int *)optval;
1358 totaddr = *totaddrp;
1359 sa = (struct sockaddr *)(totaddrp + 1);
1360 stcb = sctp_connectx_helper_find(inp, sa, &totaddr, &num_v4, &num_v6, &error, (optsize - sizeof(int)), &bad_addresses);
1361 if ((stcb != NULL) || bad_addresses) {
1362 /* Already have or am bring up an association */
1363 SCTP_ASOC_CREATE_UNLOCK(inp);
1364 creat_lock_on = 0;
1365 if (stcb)
1366 SCTP_TCB_UNLOCK(stcb);
1367 if (bad_addresses == 0) {
1368 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EALREADY);
1369 error = EALREADY;
1370 }
1371 goto out_now;
1372 }
1373 #ifdef INET6
1374 if (((inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) == 0) &&
1375 (num_v6 > 0)) {
1376 error = EINVAL;
1377 goto out_now;
1378 }
1379 if ((inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) &&
1380 (num_v4 > 0)) {
1381 struct in6pcb *inp6;
1382
1383 inp6 = (struct in6pcb *)inp;
1384 if (SCTP_IPV6_V6ONLY(inp6)) {
1385 /*
1386 * if IPV6_V6ONLY flag, ignore connections destined
1387 * to a v4 addr or v4-mapped addr
1388 */
1389 SCTP_LTRACE_ERR_RET(inp, stcb, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
1390 error = EINVAL;
1391 goto out_now;
1392 }
1393 }
1394 #endif /* INET6 */
1395 if ((inp->sctp_flags & SCTP_PCB_FLAGS_UNBOUND) ==
1396 SCTP_PCB_FLAGS_UNBOUND) {
1397 /* Bind a ephemeral port */
1398 error = sctp_inpcb_bind(so, NULL, NULL, p);
1399 if (error) {
1400 goto out_now;
1401 }
1402 }
1403 /* FIX ME: do we want to pass in a vrf on the connect call? */
1404 vrf_id = inp->def_vrf_id;
1405
1406 /* We are GOOD to go */
1407 stcb = sctp_aloc_assoc(inp, sa, 1, &error, 0, vrf_id,
1408 (struct thread *)p
1409 );
1410 if (stcb == NULL) {
1411 /* Gak! no memory */
1412 goto out_now;
1413 }
1414 SCTP_SET_STATE(&stcb->asoc, SCTP_STATE_COOKIE_WAIT);
1415 /* move to second address */
1416 if (sa->sa_family == AF_INET)
1417 sa = (struct sockaddr *)((caddr_t)sa + sizeof(struct sockaddr_in));
1418 else
1419 sa = (struct sockaddr *)((caddr_t)sa + sizeof(struct sockaddr_in6));
1420
1421 error = 0;
1422 added = sctp_connectx_helper_add(stcb, sa, (totaddr - 1), &error);
1423 /* Fill in the return id */
1424 if (error) {
1425 (void)sctp_free_assoc(inp, stcb, SCTP_PCBFREE_FORCE, SCTP_FROM_SCTP_USRREQ + SCTP_LOC_12);
1426 goto out_now;
1427 }
1428 a_id = (sctp_assoc_t *) optval;
1429 *a_id = sctp_get_associd(stcb);
1430
1431 /* initialize authentication parameters for the assoc */
1432 sctp_initialize_auth_params(inp, stcb);
1433
1434 if (delay) {
1435 /* doing delayed connection */
1436 stcb->asoc.delayed_connection = 1;
1437 sctp_timer_start(SCTP_TIMER_TYPE_INIT, inp, stcb, stcb->asoc.primary_destination);
1438 } else {
1439 (void)SCTP_GETTIME_TIMEVAL(&stcb->asoc.time_entered);
1440 sctp_send_initiate(inp, stcb, SCTP_SO_LOCKED);
1441 }
1442 SCTP_TCB_UNLOCK(stcb);
1443 if (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) {
1444 stcb->sctp_ep->sctp_flags |= SCTP_PCB_FLAGS_CONNECTED;
1445 /* Set the connected flag so we can queue data */
1446 soisconnecting(so);
1447 }
1448 out_now:
1449 if (creat_lock_on) {
1450 SCTP_ASOC_CREATE_UNLOCK(inp);
1451 }
1452 SCTP_INP_DECR_REF(inp);
1453 return error;
1454 }
1455
1456 #define SCTP_FIND_STCB(inp, stcb, assoc_id) { \
1457 if ((inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) ||\
1458 (inp->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) { \
1459 SCTP_INP_RLOCK(inp); \
1460 stcb = LIST_FIRST(&inp->sctp_asoc_list); \
1461 if (stcb) { \
1462 SCTP_TCB_LOCK(stcb); \
1463 } \
1464 SCTP_INP_RUNLOCK(inp); \
1465 } else if (assoc_id != 0) { \
1466 stcb = sctp_findassociation_ep_asocid(inp, assoc_id, 1); \
1467 if (stcb == NULL) { \
1468 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOENT); \
1469 error = ENOENT; \
1470 break; \
1471 } \
1472 } else { \
1473 stcb = NULL; \
1474 } \
1475 }
1476
1477
1478 #define SCTP_CHECK_AND_CAST(destp, srcp, type, size) {\
1479 if (size < sizeof(type)) { \
1480 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL); \
1481 error = EINVAL; \
1482 break; \
1483 } else { \
1484 destp = (type *)srcp; \
1485 } \
1486 }
1487
1488 static int
1489 sctp_getopt(struct socket *so, int optname, void *optval, size_t *optsize,
1490 void *p)
1491 {
1492 struct sctp_inpcb *inp = NULL;
1493 int error, val = 0;
1494 struct sctp_tcb *stcb = NULL;
1495
1496 if (optval == NULL) {
1497 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
1498 return (EINVAL);
1499 }
1500 inp = (struct sctp_inpcb *)so->so_pcb;
1501 if (inp == 0) {
1502 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
1503 return EINVAL;
1504 }
1505 error = 0;
1506
1507 switch (optname) {
1508 case SCTP_NODELAY:
1509 case SCTP_AUTOCLOSE:
1510 case SCTP_EXPLICIT_EOR:
1511 case SCTP_AUTO_ASCONF:
1512 case SCTP_DISABLE_FRAGMENTS:
1513 case SCTP_I_WANT_MAPPED_V4_ADDR:
1514 case SCTP_USE_EXT_RCVINFO:
1515 SCTP_INP_RLOCK(inp);
1516 switch (optname) {
1517 case SCTP_DISABLE_FRAGMENTS:
1518 val = sctp_is_feature_on(inp, SCTP_PCB_FLAGS_NO_FRAGMENT);
1519 break;
1520 case SCTP_I_WANT_MAPPED_V4_ADDR:
1521 val = sctp_is_feature_on(inp, SCTP_PCB_FLAGS_NEEDS_MAPPED_V4);
1522 break;
1523 case SCTP_AUTO_ASCONF:
1524 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) {
1525 /* only valid for bound all sockets */
1526 val = sctp_is_feature_on(inp, SCTP_PCB_FLAGS_AUTO_ASCONF);
1527 } else {
1528 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
1529 error = EINVAL;
1530 goto flags_out;
1531 }
1532 break;
1533 case SCTP_EXPLICIT_EOR:
1534 val = sctp_is_feature_on(inp, SCTP_PCB_FLAGS_EXPLICIT_EOR);
1535 break;
1536 case SCTP_NODELAY:
1537 val = sctp_is_feature_on(inp, SCTP_PCB_FLAGS_NODELAY);
1538 break;
1539 case SCTP_USE_EXT_RCVINFO:
1540 val = sctp_is_feature_on(inp, SCTP_PCB_FLAGS_EXT_RCVINFO);
1541 break;
1542 case SCTP_AUTOCLOSE:
1543 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_AUTOCLOSE))
1544 val = TICKS_TO_SEC(inp->sctp_ep.auto_close_time);
1545 else
1546 val = 0;
1547 break;
1548
1549 default:
1550 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOPROTOOPT);
1551 error = ENOPROTOOPT;
1552 } /* end switch (sopt->sopt_name) */
1553 if (optname != SCTP_AUTOCLOSE) {
1554 /* make it an "on/off" value */
1555 val = (val != 0);
1556 }
1557 if (*optsize < sizeof(val)) {
1558 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
1559 error = EINVAL;
1560 }
1561 flags_out:
1562 SCTP_INP_RUNLOCK(inp);
1563 if (error == 0) {
1564 /* return the option value */
1565 *(int *)optval = val;
1566 *optsize = sizeof(val);
1567 }
1568 break;
1569 case SCTP_GET_PACKET_LOG:
1570 {
1571 #ifdef SCTP_PACKET_LOGGING
1572 uint8_t *target;
1573 int ret;
1574
1575 SCTP_CHECK_AND_CAST(target, optval, uint8_t, *optsize);
1576 ret = sctp_copy_out_packet_log(target, (int)*optsize);
1577 *optsize = ret;
1578 #else
1579 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EOPNOTSUPP);
1580 error = EOPNOTSUPP;
1581 #endif
1582 break;
1583 }
1584 case SCTP_PARTIAL_DELIVERY_POINT:
1585 {
1586 uint32_t *value;
1587
1588 SCTP_CHECK_AND_CAST(value, optval, uint32_t, *optsize);
1589 *value = inp->partial_delivery_point;
1590 *optsize = sizeof(uint32_t);
1591 }
1592 break;
1593 case SCTP_FRAGMENT_INTERLEAVE:
1594 {
1595 uint32_t *value;
1596
1597 SCTP_CHECK_AND_CAST(value, optval, uint32_t, *optsize);
1598 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_FRAG_INTERLEAVE)) {
1599 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_INTERLEAVE_STRMS)) {
1600 *value = SCTP_FRAG_LEVEL_2;
1601 } else {
1602 *value = SCTP_FRAG_LEVEL_1;
1603 }
1604 } else {
1605 *value = SCTP_FRAG_LEVEL_0;
1606 }
1607 *optsize = sizeof(uint32_t);
1608 }
1609 break;
1610 case SCTP_CMT_ON_OFF:
1611 {
1612 struct sctp_assoc_value *av;
1613
1614 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, *optsize);
1615 if (sctp_cmt_on_off) {
1616 SCTP_FIND_STCB(inp, stcb, av->assoc_id);
1617 if (stcb) {
1618 av->assoc_value = stcb->asoc.sctp_cmt_on_off;
1619 SCTP_TCB_UNLOCK(stcb);
1620
1621 } else {
1622 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOTCONN);
1623 error = ENOTCONN;
1624 }
1625 } else {
1626 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOPROTOOPT);
1627 error = ENOPROTOOPT;
1628 }
1629 *optsize = sizeof(*av);
1630 }
1631 break;
1632 /* JRS - Get socket option for pluggable congestion control */
1633 case SCTP_PLUGGABLE_CC:
1634 {
1635 struct sctp_assoc_value *av;
1636
1637 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, *optsize);
1638 SCTP_FIND_STCB(inp, stcb, av->assoc_id);
1639 if (stcb) {
1640 av->assoc_value = stcb->asoc.congestion_control_module;
1641 SCTP_TCB_UNLOCK(stcb);
1642 } else {
1643 av->assoc_value = inp->sctp_ep.sctp_default_cc_module;
1644 }
1645 *optsize = sizeof(*av);
1646 }
1647 break;
1648 case SCTP_GET_ADDR_LEN:
1649 {
1650 struct sctp_assoc_value *av;
1651
1652 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, *optsize);
1653 error = EINVAL;
1654 #ifdef INET
1655 if (av->assoc_value == AF_INET) {
1656 av->assoc_value = sizeof(struct sockaddr_in);
1657 error = 0;
1658 }
1659 #endif
1660 #ifdef INET6
1661 if (av->assoc_value == AF_INET6) {
1662 av->assoc_value = sizeof(struct sockaddr_in6);
1663 error = 0;
1664 }
1665 #endif
1666 if (error) {
1667 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, error);
1668 }
1669 *optsize = sizeof(*av);
1670 }
1671 break;
1672 case SCTP_GET_ASSOC_NUMBER:
1673 {
1674 uint32_t *value, cnt;
1675
1676 SCTP_CHECK_AND_CAST(value, optval, uint32_t, *optsize);
1677 cnt = 0;
1678 SCTP_INP_RLOCK(inp);
1679 LIST_FOREACH(stcb, &inp->sctp_asoc_list, sctp_tcblist) {
1680 cnt++;
1681 }
1682 SCTP_INP_RUNLOCK(inp);
1683 *value = cnt;
1684 *optsize = sizeof(uint32_t);
1685 }
1686 break;
1687
1688 case SCTP_GET_ASSOC_ID_LIST:
1689 {
1690 struct sctp_assoc_ids *ids;
1691 unsigned int at, limit;
1692
1693 SCTP_CHECK_AND_CAST(ids, optval, struct sctp_assoc_ids, *optsize);
1694 at = 0;
1695 limit = *optsize / sizeof(sctp_assoc_t);
1696 SCTP_INP_RLOCK(inp);
1697 LIST_FOREACH(stcb, &inp->sctp_asoc_list, sctp_tcblist) {
1698 if (at < limit) {
1699 ids->gaids_assoc_id[at++] = sctp_get_associd(stcb);
1700 } else {
1701 error = EINVAL;
1702 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, error);
1703 break;
1704 }
1705 }
1706 SCTP_INP_RUNLOCK(inp);
1707 *optsize = at * sizeof(sctp_assoc_t);
1708 }
1709 break;
1710 case SCTP_CONTEXT:
1711 {
1712 struct sctp_assoc_value *av;
1713
1714 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, *optsize);
1715 SCTP_FIND_STCB(inp, stcb, av->assoc_id);
1716
1717 if (stcb) {
1718 av->assoc_value = stcb->asoc.context;
1719 SCTP_TCB_UNLOCK(stcb);
1720 } else {
1721 SCTP_INP_RLOCK(inp);
1722 av->assoc_value = inp->sctp_context;
1723 SCTP_INP_RUNLOCK(inp);
1724 }
1725 *optsize = sizeof(*av);
1726 }
1727 break;
1728 case SCTP_VRF_ID:
1729 {
1730 uint32_t *default_vrfid;
1731
1732 SCTP_CHECK_AND_CAST(default_vrfid, optval, uint32_t, *optsize);
1733 *default_vrfid = inp->def_vrf_id;
1734 break;
1735 }
1736 case SCTP_GET_ASOC_VRF:
1737 {
1738 struct sctp_assoc_value *id;
1739
1740 SCTP_CHECK_AND_CAST(id, optval, struct sctp_assoc_value, *optsize);
1741 SCTP_FIND_STCB(inp, stcb, id->assoc_id);
1742 if (stcb == NULL) {
1743 error = EINVAL;
1744 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, error);
1745 break;
1746 }
1747 id->assoc_value = stcb->asoc.vrf_id;
1748 break;
1749 }
1750 case SCTP_GET_VRF_IDS:
1751 {
1752 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EOPNOTSUPP);
1753 error = EOPNOTSUPP;
1754 break;
1755 }
1756 case SCTP_GET_NONCE_VALUES:
1757 {
1758 struct sctp_get_nonce_values *gnv;
1759
1760 SCTP_CHECK_AND_CAST(gnv, optval, struct sctp_get_nonce_values, *optsize);
1761 SCTP_FIND_STCB(inp, stcb, gnv->gn_assoc_id);
1762
1763 if (stcb) {
1764 gnv->gn_peers_tag = stcb->asoc.peer_vtag;
1765 gnv->gn_local_tag = stcb->asoc.my_vtag;
1766 SCTP_TCB_UNLOCK(stcb);
1767 } else {
1768 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOTCONN);
1769 error = ENOTCONN;
1770 }
1771 *optsize = sizeof(*gnv);
1772 }
1773 break;
1774 case SCTP_DELAYED_SACK:
1775 {
1776 struct sctp_sack_info *sack;
1777
1778 SCTP_CHECK_AND_CAST(sack, optval, struct sctp_sack_info, *optsize);
1779 SCTP_FIND_STCB(inp, stcb, sack->sack_assoc_id);
1780 if (stcb) {
1781 sack->sack_delay = stcb->asoc.delayed_ack;
1782 sack->sack_freq = stcb->asoc.sack_freq;
1783 SCTP_TCB_UNLOCK(stcb);
1784 } else {
1785 SCTP_INP_RLOCK(inp);
1786 sack->sack_delay = TICKS_TO_MSEC(inp->sctp_ep.sctp_timeoutticks[SCTP_TIMER_RECV]);
1787 sack->sack_freq = inp->sctp_ep.sctp_sack_freq;
1788 SCTP_INP_RUNLOCK(inp);
1789 }
1790 *optsize = sizeof(*sack);
1791 }
1792 break;
1793
1794 case SCTP_GET_SNDBUF_USE:
1795 {
1796 struct sctp_sockstat *ss;
1797
1798 SCTP_CHECK_AND_CAST(ss, optval, struct sctp_sockstat, *optsize);
1799 SCTP_FIND_STCB(inp, stcb, ss->ss_assoc_id);
1800
1801 if (stcb) {
1802 ss->ss_total_sndbuf = stcb->asoc.total_output_queue_size;
1803 ss->ss_total_recv_buf = (stcb->asoc.size_on_reasm_queue +
1804 stcb->asoc.size_on_all_streams);
1805 SCTP_TCB_UNLOCK(stcb);
1806 } else {
1807 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOTCONN);
1808 error = ENOTCONN;
1809 }
1810 *optsize = sizeof(struct sctp_sockstat);
1811 }
1812 break;
1813 case SCTP_MAX_BURST:
1814 {
1815 uint8_t *value;
1816
1817 SCTP_CHECK_AND_CAST(value, optval, uint8_t, *optsize);
1818
1819 SCTP_INP_RLOCK(inp);
1820 *value = inp->sctp_ep.max_burst;
1821 SCTP_INP_RUNLOCK(inp);
1822 *optsize = sizeof(uint8_t);
1823 }
1824 break;
1825 case SCTP_MAXSEG:
1826 {
1827 struct sctp_assoc_value *av;
1828 int ovh;
1829
1830 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, *optsize);
1831 SCTP_FIND_STCB(inp, stcb, av->assoc_id);
1832
1833 if (stcb) {
1834 av->assoc_value = sctp_get_frag_point(stcb, &stcb->asoc);
1835 SCTP_TCB_UNLOCK(stcb);
1836 } else {
1837 SCTP_INP_RLOCK(inp);
1838 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) {
1839 ovh = SCTP_MED_OVERHEAD;
1840 } else {
1841 ovh = SCTP_MED_V4_OVERHEAD;
1842 }
1843 if (inp->sctp_frag_point >= SCTP_DEFAULT_MAXSEGMENT)
1844 av->assoc_value = 0;
1845 else
1846 av->assoc_value = inp->sctp_frag_point - ovh;
1847 SCTP_INP_RUNLOCK(inp);
1848 }
1849 *optsize = sizeof(struct sctp_assoc_value);
1850 }
1851 break;
1852 case SCTP_GET_STAT_LOG:
1853 error = sctp_fill_stat_log(optval, optsize);
1854 break;
1855 case SCTP_EVENTS:
1856 {
1857 struct sctp_event_subscribe *events;
1858
1859 SCTP_CHECK_AND_CAST(events, optval, struct sctp_event_subscribe, *optsize);
1860 memset(events, 0, sizeof(*events));
1861 SCTP_INP_RLOCK(inp);
1862 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_RECVDATAIOEVNT))
1863 events->sctp_data_io_event = 1;
1864
1865 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_RECVASSOCEVNT))
1866 events->sctp_association_event = 1;
1867
1868 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_RECVPADDREVNT))
1869 events->sctp_address_event = 1;
1870
1871 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_RECVSENDFAILEVNT))
1872 events->sctp_send_failure_event = 1;
1873
1874 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_RECVPEERERR))
1875 events->sctp_peer_error_event = 1;
1876
1877 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_RECVSHUTDOWNEVNT))
1878 events->sctp_shutdown_event = 1;
1879
1880 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_PDAPIEVNT))
1881 events->sctp_partial_delivery_event = 1;
1882
1883 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_ADAPTATIONEVNT))
1884 events->sctp_adaptation_layer_event = 1;
1885
1886 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_AUTHEVNT))
1887 events->sctp_authentication_event = 1;
1888
1889 if (sctp_is_feature_on(inp, SCTP_PCB_FLAGS_STREAM_RESETEVNT))
1890 events->sctp_stream_reset_events = 1;
1891 SCTP_INP_RUNLOCK(inp);
1892 *optsize = sizeof(struct sctp_event_subscribe);
1893 }
1894 break;
1895
1896 case SCTP_ADAPTATION_LAYER:
1897 {
1898 uint32_t *value;
1899
1900 SCTP_CHECK_AND_CAST(value, optval, uint32_t, *optsize);
1901
1902 SCTP_INP_RLOCK(inp);
1903 *value = inp->sctp_ep.adaptation_layer_indicator;
1904 SCTP_INP_RUNLOCK(inp);
1905 *optsize = sizeof(uint32_t);
1906 }
1907 break;
1908 case SCTP_SET_INITIAL_DBG_SEQ:
1909 {
1910 uint32_t *value;
1911
1912 SCTP_CHECK_AND_CAST(value, optval, uint32_t, *optsize);
1913 SCTP_INP_RLOCK(inp);
1914 *value = inp->sctp_ep.initial_sequence_debug;
1915 SCTP_INP_RUNLOCK(inp);
1916 *optsize = sizeof(uint32_t);
1917 }
1918 break;
1919 case SCTP_GET_LOCAL_ADDR_SIZE:
1920 {
1921 uint32_t *value;
1922
1923 SCTP_CHECK_AND_CAST(value, optval, uint32_t, *optsize);
1924 SCTP_INP_RLOCK(inp);
1925 *value = sctp_count_max_addresses(inp);
1926 SCTP_INP_RUNLOCK(inp);
1927 *optsize = sizeof(uint32_t);
1928 }
1929 break;
1930 case SCTP_GET_REMOTE_ADDR_SIZE:
1931 {
1932 uint32_t *value;
1933 size_t size;
1934 struct sctp_nets *net;
1935
1936 SCTP_CHECK_AND_CAST(value, optval, uint32_t, *optsize);
1937 /* FIXME MT: change to sctp_assoc_value? */
1938 SCTP_FIND_STCB(inp, stcb, (sctp_assoc_t) * value);
1939
1940 if (stcb) {
1941 size = 0;
1942 /* Count the sizes */
1943 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) {
1944 if ((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_NEEDS_MAPPED_V4) ||
1945 (((struct sockaddr *)&net->ro._l_addr)->sa_family == AF_INET6)) {
1946 size += sizeof(struct sockaddr_in6);
1947 } else if (((struct sockaddr *)&net->ro._l_addr)->sa_family == AF_INET) {
1948 size += sizeof(struct sockaddr_in);
1949 } else {
1950 /* huh */
1951 break;
1952 }
1953 }
1954 SCTP_TCB_UNLOCK(stcb);
1955 *value = (uint32_t) size;
1956 } else {
1957 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOTCONN);
1958 error = ENOTCONN;
1959 }
1960 *optsize = sizeof(uint32_t);
1961 }
1962 break;
1963 case SCTP_GET_PEER_ADDRESSES:
1964 /*
1965 * Get the address information, an array is passed in to
1966 * fill up we pack it.
1967 */
1968 {
1969 size_t cpsz, left;
1970 struct sockaddr_storage *sas;
1971 struct sctp_nets *net;
1972 struct sctp_getaddresses *saddr;
1973
1974 SCTP_CHECK_AND_CAST(saddr, optval, struct sctp_getaddresses, *optsize);
1975 SCTP_FIND_STCB(inp, stcb, saddr->sget_assoc_id);
1976
1977 if (stcb) {
1978 left = (*optsize) - sizeof(struct sctp_getaddresses);
1979 *optsize = sizeof(struct sctp_getaddresses);
1980 sas = (struct sockaddr_storage *)&saddr->addr[0];
1981
1982 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) {
1983 if ((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_NEEDS_MAPPED_V4) ||
1984 (((struct sockaddr *)&net->ro._l_addr)->sa_family == AF_INET6)) {
1985 cpsz = sizeof(struct sockaddr_in6);
1986 } else if (((struct sockaddr *)&net->ro._l_addr)->sa_family == AF_INET) {
1987 cpsz = sizeof(struct sockaddr_in);
1988 } else {
1989 /* huh */
1990 break;
1991 }
1992 if (left < cpsz) {
1993 /* not enough room. */
1994 break;
1995 }
1996 if ((stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_NEEDS_MAPPED_V4) &&
1997 (((struct sockaddr *)&net->ro._l_addr)->sa_family == AF_INET)) {
1998 /* Must map the address */
1999 in6_sin_2_v4mapsin6((struct sockaddr_in *)&net->ro._l_addr,
2000 (struct sockaddr_in6 *)sas);
2001 } else {
2002 memcpy(sas, &net->ro._l_addr, cpsz);
2003 }
2004 ((struct sockaddr_in *)sas)->sin_port = stcb->rport;
2005
2006 sas = (struct sockaddr_storage *)((caddr_t)sas + cpsz);
2007 left -= cpsz;
2008 *optsize += cpsz;
2009 }
2010 SCTP_TCB_UNLOCK(stcb);
2011 } else {
2012 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOENT);
2013 error = ENOENT;
2014 }
2015 }
2016 break;
2017 case SCTP_GET_LOCAL_ADDRESSES:
2018 {
2019 size_t limit, actual;
2020 struct sockaddr_storage *sas;
2021 struct sctp_getaddresses *saddr;
2022
2023 SCTP_CHECK_AND_CAST(saddr, optval, struct sctp_getaddresses, *optsize);
2024 SCTP_FIND_STCB(inp, stcb, saddr->sget_assoc_id);
2025
2026 sas = (struct sockaddr_storage *)&saddr->addr[0];
2027 limit = *optsize - sizeof(sctp_assoc_t);
2028 actual = sctp_fill_up_addresses(inp, stcb, limit, sas);
2029 if (stcb) {
2030 SCTP_TCB_UNLOCK(stcb);
2031 }
2032 *optsize = sizeof(struct sockaddr_storage) + actual;
2033 }
2034 break;
2035 case SCTP_PEER_ADDR_PARAMS:
2036 {
2037 struct sctp_paddrparams *paddrp;
2038 struct sctp_nets *net;
2039
2040 SCTP_CHECK_AND_CAST(paddrp, optval, struct sctp_paddrparams, *optsize);
2041 SCTP_FIND_STCB(inp, stcb, paddrp->spp_assoc_id);
2042
2043 net = NULL;
2044 if (stcb) {
2045 net = sctp_findnet(stcb, (struct sockaddr *)&paddrp->spp_address);
2046 } else {
2047 /*
2048 * We increment here since
2049 * sctp_findassociation_ep_addr() wil do a
2050 * decrement if it finds the stcb as long as
2051 * the locked tcb (last argument) is NOT a
2052 * TCB.. aka NULL.
2053 */
2054 SCTP_INP_INCR_REF(inp);
2055 stcb = sctp_findassociation_ep_addr(&inp, (struct sockaddr *)&paddrp->spp_address, &net, NULL, NULL);
2056 if (stcb == NULL) {
2057 SCTP_INP_DECR_REF(inp);
2058 }
2059 }
2060 if (stcb && (net == NULL)) {
2061 struct sockaddr *sa;
2062
2063 sa = (struct sockaddr *)&paddrp->spp_address;
2064 if (sa->sa_family == AF_INET) {
2065 struct sockaddr_in *sin;
2066
2067 sin = (struct sockaddr_in *)sa;
2068 if (sin->sin_addr.s_addr) {
2069 error = EINVAL;
2070 SCTP_TCB_UNLOCK(stcb);
2071 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, error);
2072 break;
2073 }
2074 } else if (sa->sa_family == AF_INET6) {
2075 struct sockaddr_in6 *sin6;
2076
2077 sin6 = (struct sockaddr_in6 *)sa;
2078 if (!IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) {
2079 error = EINVAL;
2080 SCTP_TCB_UNLOCK(stcb);
2081 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, error);
2082 break;
2083 }
2084 } else {
2085 error = EAFNOSUPPORT;
2086 SCTP_TCB_UNLOCK(stcb);
2087 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, error);
2088 break;
2089 }
2090 }
2091 if (stcb) {
2092 /* Applys to the specific association */
2093 paddrp->spp_flags = 0;
2094 if (net) {
2095 int ovh;
2096
2097 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) {
2098 ovh = SCTP_MED_OVERHEAD;
2099 } else {
2100 ovh = SCTP_MED_V4_OVERHEAD;
2101 }
2102
2103
2104 paddrp->spp_pathmaxrxt = net->failure_threshold;
2105 paddrp->spp_pathmtu = net->mtu - ovh;
2106 /* get flags for HB */
2107 if (net->dest_state & SCTP_ADDR_NOHB)
2108 paddrp->spp_flags |= SPP_HB_DISABLE;
2109 else
2110 paddrp->spp_flags |= SPP_HB_ENABLE;
2111 /* get flags for PMTU */
2112 if (SCTP_OS_TIMER_PENDING(&net->pmtu_timer.timer)) {
2113 paddrp->spp_flags |= SPP_PMTUD_ENABLE;
2114 } else {
2115 paddrp->spp_flags |= SPP_PMTUD_DISABLE;
2116 }
2117 #ifdef INET
2118 if (net->ro._l_addr.sin.sin_family == AF_INET) {
2119 paddrp->spp_ipv4_tos = net->tos_flowlabel & 0x000000fc;
2120 paddrp->spp_flags |= SPP_IPV4_TOS;
2121 }
2122 #endif
2123 #ifdef INET6
2124 if (net->ro._l_addr.sin6.sin6_family == AF_INET6) {
2125 paddrp->spp_ipv6_flowlabel = net->tos_flowlabel;
2126 paddrp->spp_flags |= SPP_IPV6_FLOWLABEL;
2127 }
2128 #endif
2129 } else {
2130 /*
2131 * No destination so return default
2132 * value
2133 */
2134 int cnt = 0;
2135
2136 paddrp->spp_pathmaxrxt = stcb->asoc.def_net_failure;
2137 paddrp->spp_pathmtu = sctp_get_frag_point(stcb, &stcb->asoc);
2138 #ifdef INET
2139 paddrp->spp_ipv4_tos = stcb->asoc.default_tos & 0x000000fc;
2140 paddrp->spp_flags |= SPP_IPV4_TOS;
2141 #endif
2142 #ifdef INET6
2143 paddrp->spp_ipv6_flowlabel = stcb->asoc.default_flowlabel;
2144 paddrp->spp_flags |= SPP_IPV6_FLOWLABEL;
2145 #endif
2146 /* default settings should be these */
2147 if (stcb->asoc.hb_is_disabled == 0) {
2148 paddrp->spp_flags |= SPP_HB_ENABLE;
2149 } else {
2150 paddrp->spp_flags |= SPP_HB_DISABLE;
2151 }
2152 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) {
2153 if (SCTP_OS_TIMER_PENDING(&net->pmtu_timer.timer)) {
2154 cnt++;
2155 }
2156 }
2157 if (cnt) {
2158 paddrp->spp_flags |= SPP_PMTUD_ENABLE;
2159 }
2160 }
2161 paddrp->spp_hbinterval = stcb->asoc.heart_beat_delay;
2162 paddrp->spp_assoc_id = sctp_get_associd(stcb);
2163 SCTP_TCB_UNLOCK(stcb);
2164 } else {
2165 /* Use endpoint defaults */
2166 SCTP_INP_RLOCK(inp);
2167 paddrp->spp_pathmaxrxt = inp->sctp_ep.def_net_failure;
2168 paddrp->spp_hbinterval = TICKS_TO_MSEC(inp->sctp_ep.sctp_timeoutticks[SCTP_TIMER_HEARTBEAT]);
2169 paddrp->spp_assoc_id = (sctp_assoc_t) 0;
2170 /* get inp's default */
2171 #ifdef INET
2172 paddrp->spp_ipv4_tos = inp->ip_inp.inp.inp_ip_tos;
2173 paddrp->spp_flags |= SPP_IPV4_TOS;
2174 #endif
2175 #ifdef INET6
2176 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) {
2177 paddrp->spp_ipv6_flowlabel = ((struct in6pcb *)inp)->in6p_flowinfo;
2178 paddrp->spp_flags |= SPP_IPV6_FLOWLABEL;
2179 }
2180 #endif
2181 /* can't return this */
2182 paddrp->spp_pathmtu = 0;
2183
2184 /* default behavior, no stcb */
2185 paddrp->spp_flags = SPP_PMTUD_ENABLE;
2186
2187 if (sctp_is_feature_off(inp, SCTP_PCB_FLAGS_DONOT_HEARTBEAT)) {
2188 paddrp->spp_flags |= SPP_HB_ENABLE;
2189 } else {
2190 paddrp->spp_flags |= SPP_HB_DISABLE;
2191 }
2192 SCTP_INP_RUNLOCK(inp);
2193 }
2194 *optsize = sizeof(struct sctp_paddrparams);
2195 }
2196 break;
2197 case SCTP_GET_PEER_ADDR_INFO:
2198 {
2199 struct sctp_paddrinfo *paddri;
2200 struct sctp_nets *net;
2201
2202 SCTP_CHECK_AND_CAST(paddri, optval, struct sctp_paddrinfo, *optsize);
2203 SCTP_FIND_STCB(inp, stcb, paddri->spinfo_assoc_id);
2204
2205 net = NULL;
2206 if (stcb) {
2207 net = sctp_findnet(stcb, (struct sockaddr *)&paddri->spinfo_address);
2208 } else {
2209 /*
2210 * We increment here since
2211 * sctp_findassociation_ep_addr() wil do a
2212 * decrement if it finds the stcb as long as
2213 * the locked tcb (last argument) is NOT a
2214 * TCB.. aka NULL.
2215 */
2216 SCTP_INP_INCR_REF(inp);
2217 stcb = sctp_findassociation_ep_addr(&inp, (struct sockaddr *)&paddri->spinfo_address, &net, NULL, NULL);
2218 if (stcb == NULL) {
2219 SCTP_INP_DECR_REF(inp);
2220 }
2221 }
2222
2223 if ((stcb) && (net)) {
2224 paddri->spinfo_state = net->dest_state & (SCTP_REACHABLE_MASK | SCTP_ADDR_NOHB);
2225 paddri->spinfo_cwnd = net->cwnd;
2226 paddri->spinfo_srtt = ((net->lastsa >> 2) + net->lastsv) >> 1;
2227 paddri->spinfo_rto = net->RTO;
2228 paddri->spinfo_assoc_id = sctp_get_associd(stcb);
2229 SCTP_TCB_UNLOCK(stcb);
2230 } else {
2231 if (stcb) {
2232 SCTP_TCB_UNLOCK(stcb);
2233 }
2234 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOENT);
2235 error = ENOENT;
2236 }
2237 *optsize = sizeof(struct sctp_paddrinfo);
2238 }
2239 break;
2240 case SCTP_PCB_STATUS:
2241 {
2242 struct sctp_pcbinfo *spcb;
2243
2244 SCTP_CHECK_AND_CAST(spcb, optval, struct sctp_pcbinfo, *optsize);
2245 sctp_fill_pcbinfo(spcb);
2246 *optsize = sizeof(struct sctp_pcbinfo);
2247 }
2248 break;
2249
2250 case SCTP_STATUS:
2251 {
2252 struct sctp_nets *net;
2253 struct sctp_status *sstat;
2254
2255 SCTP_CHECK_AND_CAST(sstat, optval, struct sctp_status, *optsize);
2256 SCTP_FIND_STCB(inp, stcb, sstat->sstat_assoc_id);
2257
2258 if (stcb == NULL) {
2259 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, error);
2260 error = EINVAL;
2261 break;
2262 }
2263 /*
2264 * I think passing the state is fine since
2265 * sctp_constants.h will be available to the user
2266 * land.
2267 */
2268 sstat->sstat_state = stcb->asoc.state;
2269 sstat->sstat_assoc_id = sctp_get_associd(stcb);
2270 sstat->sstat_rwnd = stcb->asoc.peers_rwnd;
2271 sstat->sstat_unackdata = stcb->asoc.sent_queue_cnt;
2272 /*
2273 * We can't include chunks that have been passed to
2274 * the socket layer. Only things in queue.
2275 */
2276 sstat->sstat_penddata = (stcb->asoc.cnt_on_reasm_queue +
2277 stcb->asoc.cnt_on_all_streams);
2278
2279
2280 sstat->sstat_instrms = stcb->asoc.streamincnt;
2281 sstat->sstat_outstrms = stcb->asoc.streamoutcnt;
2282 sstat->sstat_fragmentation_point = sctp_get_frag_point(stcb, &stcb->asoc);
2283 memcpy(&sstat->sstat_primary.spinfo_address,
2284 &stcb->asoc.primary_destination->ro._l_addr,
2285 ((struct sockaddr *)(&stcb->asoc.primary_destination->ro._l_addr))->sa_len);
2286 net = stcb->asoc.primary_destination;
2287 ((struct sockaddr_in *)&sstat->sstat_primary.spinfo_address)->sin_port = stcb->rport;
2288 /*
2289 * Again the user can get info from sctp_constants.h
2290 * for what the state of the network is.
2291 */
2292 sstat->sstat_primary.spinfo_state = net->dest_state & SCTP_REACHABLE_MASK;
2293 sstat->sstat_primary.spinfo_cwnd = net->cwnd;
2294 sstat->sstat_primary.spinfo_srtt = net->lastsa;
2295 sstat->sstat_primary.spinfo_rto = net->RTO;
2296 sstat->sstat_primary.spinfo_mtu = net->mtu;
2297 sstat->sstat_primary.spinfo_assoc_id = sctp_get_associd(stcb);
2298 SCTP_TCB_UNLOCK(stcb);
2299 *optsize = sizeof(*sstat);
2300 }
2301 break;
2302 case SCTP_RTOINFO:
2303 {
2304 struct sctp_rtoinfo *srto;
2305
2306 SCTP_CHECK_AND_CAST(srto, optval, struct sctp_rtoinfo, *optsize);
2307 SCTP_FIND_STCB(inp, stcb, srto->srto_assoc_id);
2308
2309 if (stcb) {
2310 srto->srto_initial = stcb->asoc.initial_rto;
2311 srto->srto_max = stcb->asoc.maxrto;
2312 srto->srto_min = stcb->asoc.minrto;
2313 SCTP_TCB_UNLOCK(stcb);
2314 } else {
2315 SCTP_INP_RLOCK(inp);
2316 srto->srto_initial = inp->sctp_ep.initial_rto;
2317 srto->srto_max = inp->sctp_ep.sctp_maxrto;
2318 srto->srto_min = inp->sctp_ep.sctp_minrto;
2319 SCTP_INP_RUNLOCK(inp);
2320 }
2321 *optsize = sizeof(*srto);
2322 }
2323 break;
2324 case SCTP_ASSOCINFO:
2325 {
2326 struct sctp_assocparams *sasoc;
2327 uint32_t oldval;
2328
2329 SCTP_CHECK_AND_CAST(sasoc, optval, struct sctp_assocparams, *optsize);
2330 SCTP_FIND_STCB(inp, stcb, sasoc->sasoc_assoc_id);
2331
2332 if (stcb) {
2333 oldval = sasoc->sasoc_cookie_life;
2334 sasoc->sasoc_cookie_life = TICKS_TO_MSEC(stcb->asoc.cookie_life);
2335 sasoc->sasoc_asocmaxrxt = stcb->asoc.max_send_times;
2336 sasoc->sasoc_number_peer_destinations = stcb->asoc.numnets;
2337 sasoc->sasoc_peer_rwnd = stcb->asoc.peers_rwnd;
2338 sasoc->sasoc_local_rwnd = stcb->asoc.my_rwnd;
2339 SCTP_TCB_UNLOCK(stcb);
2340 } else {
2341 SCTP_INP_RLOCK(inp);
2342 sasoc->sasoc_cookie_life = TICKS_TO_MSEC(inp->sctp_ep.def_cookie_life);
2343 sasoc->sasoc_asocmaxrxt = inp->sctp_ep.max_send_times;
2344 sasoc->sasoc_number_peer_destinations = 0;
2345 sasoc->sasoc_peer_rwnd = 0;
2346 sasoc->sasoc_local_rwnd = sbspace(&inp->sctp_socket->so_rcv);
2347 SCTP_INP_RUNLOCK(inp);
2348 }
2349 *optsize = sizeof(*sasoc);
2350 }
2351 break;
2352 case SCTP_DEFAULT_SEND_PARAM:
2353 {
2354 struct sctp_sndrcvinfo *s_info;
2355
2356 SCTP_CHECK_AND_CAST(s_info, optval, struct sctp_sndrcvinfo, *optsize);
2357 SCTP_FIND_STCB(inp, stcb, s_info->sinfo_assoc_id);
2358
2359 if (stcb) {
2360 memcpy(s_info, &stcb->asoc.def_send, sizeof(stcb->asoc.def_send));
2361 SCTP_TCB_UNLOCK(stcb);
2362 } else {
2363 SCTP_INP_RLOCK(inp);
2364 memcpy(s_info, &inp->def_send, sizeof(inp->def_send));
2365 SCTP_INP_RUNLOCK(inp);
2366 }
2367 *optsize = sizeof(*s_info);
2368 }
2369 break;
2370 case SCTP_INITMSG:
2371 {
2372 struct sctp_initmsg *sinit;
2373
2374 SCTP_CHECK_AND_CAST(sinit, optval, struct sctp_initmsg, *optsize);
2375 SCTP_INP_RLOCK(inp);
2376 sinit->sinit_num_ostreams = inp->sctp_ep.pre_open_stream_count;
2377 sinit->sinit_max_instreams = inp->sctp_ep.max_open_streams_intome;
2378 sinit->sinit_max_attempts = inp->sctp_ep.max_init_times;
2379 sinit->sinit_max_init_timeo = inp->sctp_ep.initial_init_rto_max;
2380 SCTP_INP_RUNLOCK(inp);
2381 *optsize = sizeof(*sinit);
2382 }
2383 break;
2384 case SCTP_PRIMARY_ADDR:
2385 /* we allow a "get" operation on this */
2386 {
2387 struct sctp_setprim *ssp;
2388
2389 SCTP_CHECK_AND_CAST(ssp, optval, struct sctp_setprim, *optsize);
2390 SCTP_FIND_STCB(inp, stcb, ssp->ssp_assoc_id);
2391
2392 if (stcb) {
2393 /* simply copy out the sockaddr_storage... */
2394 int len;
2395
2396 len = *optsize;
2397 if (len > stcb->asoc.primary_destination->ro._l_addr.sa.sa_len)
2398 len = stcb->asoc.primary_destination->ro._l_addr.sa.sa_len;
2399
2400 memcpy(&ssp->ssp_addr,
2401 &stcb->asoc.primary_destination->ro._l_addr,
2402 len);
2403 SCTP_TCB_UNLOCK(stcb);
2404 } else {
2405 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, error);
2406 error = EINVAL;
2407 }
2408 *optsize = sizeof(*ssp);
2409 }
2410 break;
2411
2412 case SCTP_HMAC_IDENT:
2413 {
2414 struct sctp_hmacalgo *shmac;
2415 sctp_hmaclist_t *hmaclist;
2416 uint32_t size;
2417 int i;
2418
2419 SCTP_CHECK_AND_CAST(shmac, optval, struct sctp_hmacalgo, *optsize);
2420
2421 SCTP_INP_RLOCK(inp);
2422 hmaclist = inp->sctp_ep.local_hmacs;
2423 if (hmaclist == NULL) {
2424 /* no HMACs to return */
2425 *optsize = sizeof(*shmac);
2426 SCTP_INP_RUNLOCK(inp);
2427 break;
2428 }
2429 /* is there room for all of the hmac ids? */
2430 size = sizeof(*shmac) + (hmaclist->num_algo *
2431 sizeof(shmac->shmac_idents[0]));
2432 if ((size_t)(*optsize) < size) {
2433 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, error);
2434 error = EINVAL;
2435 SCTP_INP_RUNLOCK(inp);
2436 break;
2437 }
2438 /* copy in the list */
2439 for (i = 0; i < hmaclist->num_algo; i++)
2440 shmac->shmac_idents[i] = hmaclist->hmac[i];
2441 SCTP_INP_RUNLOCK(inp);
2442 *optsize = size;
2443 break;
2444 }
2445 case SCTP_AUTH_ACTIVE_KEY:
2446 {
2447 struct sctp_authkeyid *scact;
2448
2449 SCTP_CHECK_AND_CAST(scact, optval, struct sctp_authkeyid, *optsize);
2450 SCTP_FIND_STCB(inp, stcb, scact->scact_assoc_id);
2451
2452 if (stcb) {
2453 /* get the active key on the assoc */
2454 scact->scact_keynumber = stcb->asoc.authinfo.assoc_keyid;
2455 SCTP_TCB_UNLOCK(stcb);
2456 } else {
2457 /* get the endpoint active key */
2458 SCTP_INP_RLOCK(inp);
2459 scact->scact_keynumber = inp->sctp_ep.default_keyid;
2460 SCTP_INP_RUNLOCK(inp);
2461 }
2462 *optsize = sizeof(*scact);
2463 break;
2464 }
2465 case SCTP_LOCAL_AUTH_CHUNKS:
2466 {
2467 struct sctp_authchunks *sac;
2468 sctp_auth_chklist_t *chklist = NULL;
2469 size_t size = 0;
2470
2471 SCTP_CHECK_AND_CAST(sac, optval, struct sctp_authchunks, *optsize);
2472 SCTP_FIND_STCB(inp, stcb, sac->gauth_assoc_id);
2473
2474 if (stcb) {
2475 /* get off the assoc */
2476 chklist = stcb->asoc.local_auth_chunks;
2477 /* is there enough space? */
2478 size = sctp_auth_get_chklist_size(chklist);
2479 if (*optsize < (sizeof(struct sctp_authchunks) + size)) {
2480 error = EINVAL;
2481 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, error);
2482 } else {
2483 /* copy in the chunks */
2484 (void)sctp_serialize_auth_chunks(chklist, sac->gauth_chunks);
2485 }
2486 SCTP_TCB_UNLOCK(stcb);
2487 } else {
2488 /* get off the endpoint */
2489 SCTP_INP_RLOCK(inp);
2490 chklist = inp->sctp_ep.local_auth_chunks;
2491 /* is there enough space? */
2492 size = sctp_auth_get_chklist_size(chklist);
2493 if (*optsize < (sizeof(struct sctp_authchunks) + size)) {
2494 error = EINVAL;
2495 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, error);
2496 } else {
2497 /* copy in the chunks */
2498 (void)sctp_serialize_auth_chunks(chklist, sac->gauth_chunks);
2499 }
2500 SCTP_INP_RUNLOCK(inp);
2501 }
2502 *optsize = sizeof(struct sctp_authchunks) + size;
2503 break;
2504 }
2505 case SCTP_PEER_AUTH_CHUNKS:
2506 {
2507 struct sctp_authchunks *sac;
2508 sctp_auth_chklist_t *chklist = NULL;
2509 size_t size = 0;
2510
2511 SCTP_CHECK_AND_CAST(sac, optval, struct sctp_authchunks, *optsize);
2512 SCTP_FIND_STCB(inp, stcb, sac->gauth_assoc_id);
2513
2514 if (stcb) {
2515 /* get off the assoc */
2516 chklist = stcb->asoc.peer_auth_chunks;
2517 /* is there enough space? */
2518 size = sctp_auth_get_chklist_size(chklist);
2519 if (*optsize < (sizeof(struct sctp_authchunks) + size)) {
2520 error = EINVAL;
2521 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, error);
2522 } else {
2523 /* copy in the chunks */
2524 (void)sctp_serialize_auth_chunks(chklist, sac->gauth_chunks);
2525 }
2526 SCTP_TCB_UNLOCK(stcb);
2527 } else {
2528 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOENT);
2529 error = ENOENT;
2530 }
2531 *optsize = sizeof(struct sctp_authchunks) + size;
2532 break;
2533 }
2534
2535
2536 default:
2537 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOPROTOOPT);
2538 error = ENOPROTOOPT;
2539 *optsize = 0;
2540 break;
2541 } /* end switch (sopt->sopt_name) */
2542 return (error);
2543 }
2544
2545 static int
2546 sctp_setopt(struct socket *so, int optname, void *optval, size_t optsize,
2547 void *p)
2548 {
2549 int error, set_opt;
2550 uint32_t *mopt;
2551 struct sctp_tcb *stcb = NULL;
2552 struct sctp_inpcb *inp = NULL;
2553 uint32_t vrf_id;
2554
2555 if (optval == NULL) {
2556 SCTP_PRINTF("optval is NULL\n");
2557 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
2558 return (EINVAL);
2559 }
2560 inp = (struct sctp_inpcb *)so->so_pcb;
2561 if (inp == 0) {
2562 SCTP_PRINTF("inp is NULL?\n");
2563 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
2564 return EINVAL;
2565 }
2566 vrf_id = inp->def_vrf_id;
2567
2568 error = 0;
2569 switch (optname) {
2570 case SCTP_NODELAY:
2571 case SCTP_AUTOCLOSE:
2572 case SCTP_AUTO_ASCONF:
2573 case SCTP_EXPLICIT_EOR:
2574 case SCTP_DISABLE_FRAGMENTS:
2575 case SCTP_USE_EXT_RCVINFO:
2576 case SCTP_I_WANT_MAPPED_V4_ADDR:
2577 /* copy in the option value */
2578 SCTP_CHECK_AND_CAST(mopt, optval, uint32_t, optsize);
2579 set_opt = 0;
2580 if (error)
2581 break;
2582 switch (optname) {
2583 case SCTP_DISABLE_FRAGMENTS:
2584 set_opt = SCTP_PCB_FLAGS_NO_FRAGMENT;
2585 break;
2586 case SCTP_AUTO_ASCONF:
2587 /*
2588 * NOTE: we don't really support this flag
2589 */
2590 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) {
2591 /* only valid for bound all sockets */
2592 set_opt = SCTP_PCB_FLAGS_AUTO_ASCONF;
2593 } else {
2594 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
2595 return (EINVAL);
2596 }
2597 break;
2598 case SCTP_EXPLICIT_EOR:
2599 set_opt = SCTP_PCB_FLAGS_EXPLICIT_EOR;
2600 break;
2601 case SCTP_USE_EXT_RCVINFO:
2602 set_opt = SCTP_PCB_FLAGS_EXT_RCVINFO;
2603 break;
2604 case SCTP_I_WANT_MAPPED_V4_ADDR:
2605 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) {
2606 set_opt = SCTP_PCB_FLAGS_NEEDS_MAPPED_V4;
2607 } else {
2608 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
2609 return (EINVAL);
2610 }
2611 break;
2612 case SCTP_NODELAY:
2613 set_opt = SCTP_PCB_FLAGS_NODELAY;
2614 break;
2615 case SCTP_AUTOCLOSE:
2616 if ((inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) ||
2617 (inp->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL)) {
2618 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
2619 return (EINVAL);
2620 }
2621 set_opt = SCTP_PCB_FLAGS_AUTOCLOSE;
2622 /*
2623 * The value is in ticks. Note this does not effect
2624 * old associations, only new ones.
2625 */
2626 inp->sctp_ep.auto_close_time = SEC_TO_TICKS(*mopt);
2627 break;
2628 }
2629 SCTP_INP_WLOCK(inp);
2630 if (*mopt != 0) {
2631 sctp_feature_on(inp, set_opt);
2632 } else {
2633 sctp_feature_off(inp, set_opt);
2634 }
2635 SCTP_INP_WUNLOCK(inp);
2636 break;
2637 case SCTP_PARTIAL_DELIVERY_POINT:
2638 {
2639 uint32_t *value;
2640
2641 SCTP_CHECK_AND_CAST(value, optval, uint32_t, optsize);
2642 if (*value > SCTP_SB_LIMIT_RCV(so)) {
2643 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
2644 error = EINVAL;
2645 break;
2646 }
2647 inp->partial_delivery_point = *value;
2648 }
2649 break;
2650 case SCTP_FRAGMENT_INTERLEAVE:
2651 /* not yet until we re-write sctp_recvmsg() */
2652 {
2653 uint32_t *level;
2654
2655 SCTP_CHECK_AND_CAST(level, optval, uint32_t, optsize);
2656 if (*level == SCTP_FRAG_LEVEL_2) {
2657 sctp_feature_on(inp, SCTP_PCB_FLAGS_FRAG_INTERLEAVE);
2658 sctp_feature_on(inp, SCTP_PCB_FLAGS_INTERLEAVE_STRMS);
2659 } else if (*level == SCTP_FRAG_LEVEL_1) {
2660 sctp_feature_on(inp, SCTP_PCB_FLAGS_FRAG_INTERLEAVE);
2661 sctp_feature_off(inp, SCTP_PCB_FLAGS_INTERLEAVE_STRMS);
2662 } else if (*level == SCTP_FRAG_LEVEL_0) {
2663 sctp_feature_off(inp, SCTP_PCB_FLAGS_FRAG_INTERLEAVE);
2664 sctp_feature_off(inp, SCTP_PCB_FLAGS_INTERLEAVE_STRMS);
2665
2666 } else {
2667 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
2668 error = EINVAL;
2669 }
2670 }
2671 break;
2672 case SCTP_CMT_ON_OFF:
2673 {
2674 struct sctp_assoc_value *av;
2675
2676 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, optsize);
2677 if (sctp_cmt_on_off) {
2678 SCTP_FIND_STCB(inp, stcb, av->assoc_id);
2679 if (stcb) {
2680 stcb->asoc.sctp_cmt_on_off = (uint8_t) av->assoc_value;
2681 SCTP_TCB_UNLOCK(stcb);
2682 } else {
2683 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOTCONN);
2684 error = ENOTCONN;
2685 }
2686 } else {
2687 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOPROTOOPT);
2688 error = ENOPROTOOPT;
2689 }
2690 }
2691 break;
2692 /* JRS - Set socket option for pluggable congestion control */
2693 case SCTP_PLUGGABLE_CC:
2694 {
2695 struct sctp_assoc_value *av;
2696
2697 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, optsize);
2698 SCTP_FIND_STCB(inp, stcb, av->assoc_id);
2699 if (stcb) {
2700 switch (av->assoc_value) {
2701 /*
2702 * JRS - Standard TCP congestion
2703 * control
2704 */
2705 case SCTP_CC_RFC2581:
2706 {
2707 stcb->asoc.congestion_control_module = SCTP_CC_RFC2581;
2708 stcb->asoc.cc_functions.sctp_set_initial_cc_param = &sctp_set_initial_cc_param;
2709 stcb->asoc.cc_functions.sctp_cwnd_update_after_sack = &sctp_cwnd_update_after_sack;
2710 stcb->asoc.cc_functions.sctp_cwnd_update_after_fr = &sctp_cwnd_update_after_fr;
2711 stcb->asoc.cc_functions.sctp_cwnd_update_after_timeout = &sctp_cwnd_update_after_timeout;
2712 stcb->asoc.cc_functions.sctp_cwnd_update_after_ecn_echo = &sctp_cwnd_update_after_ecn_echo;
2713 stcb->asoc.cc_functions.sctp_cwnd_update_after_packet_dropped = &sctp_cwnd_update_after_packet_dropped;
2714 stcb->asoc.cc_functions.sctp_cwnd_update_after_output = &sctp_cwnd_update_after_output;
2715 stcb->asoc.cc_functions.sctp_cwnd_update_after_fr_timer = &sctp_cwnd_update_after_fr_timer;
2716 SCTP_TCB_UNLOCK(stcb);
2717 break;
2718 }
2719 /*
2720 * JRS - High Speed TCP congestion
2721 * control (Floyd)
2722 */
2723 case SCTP_CC_HSTCP:
2724 {
2725 stcb->asoc.congestion_control_module = SCTP_CC_HSTCP;
2726 stcb->asoc.cc_functions.sctp_set_initial_cc_param = &sctp_set_initial_cc_param;
2727 stcb->asoc.cc_functions.sctp_cwnd_update_after_sack = &sctp_hs_cwnd_update_after_sack;
2728 stcb->asoc.cc_functions.sctp_cwnd_update_after_fr = &sctp_hs_cwnd_update_after_fr;
2729 stcb->asoc.cc_functions.sctp_cwnd_update_after_timeout = &sctp_cwnd_update_after_timeout;
2730 stcb->asoc.cc_functions.sctp_cwnd_update_after_ecn_echo = &sctp_cwnd_update_after_ecn_echo;
2731 stcb->asoc.cc_functions.sctp_cwnd_update_after_packet_dropped = &sctp_cwnd_update_after_packet_dropped;
2732 stcb->asoc.cc_functions.sctp_cwnd_update_after_output = &sctp_cwnd_update_after_output;
2733 stcb->asoc.cc_functions.sctp_cwnd_update_after_fr_timer = &sctp_cwnd_update_after_fr_timer;
2734 SCTP_TCB_UNLOCK(stcb);
2735 break;
2736 }
2737 /* JRS - HTCP congestion control */
2738 case SCTP_CC_HTCP:
2739 {
2740 stcb->asoc.congestion_control_module = SCTP_CC_HTCP;
2741 stcb->asoc.cc_functions.sctp_set_initial_cc_param = &sctp_htcp_set_initial_cc_param;
2742 stcb->asoc.cc_functions.sctp_cwnd_update_after_sack = &sctp_htcp_cwnd_update_after_sack;
2743 stcb->asoc.cc_functions.sctp_cwnd_update_after_fr = &sctp_htcp_cwnd_update_after_fr;
2744 stcb->asoc.cc_functions.sctp_cwnd_update_after_timeout = &sctp_htcp_cwnd_update_after_timeout;
2745 stcb->asoc.cc_functions.sctp_cwnd_update_after_ecn_echo = &sctp_htcp_cwnd_update_after_ecn_echo;
2746 stcb->asoc.cc_functions.sctp_cwnd_update_after_packet_dropped = &sctp_cwnd_update_after_packet_dropped;
2747 stcb->asoc.cc_functions.sctp_cwnd_update_after_output = &sctp_cwnd_update_after_output;
2748 stcb->asoc.cc_functions.sctp_cwnd_update_after_fr_timer = &sctp_htcp_cwnd_update_after_fr_timer;
2749 SCTP_TCB_UNLOCK(stcb);
2750 break;
2751 }
2752 /*
2753 * JRS - All other values are
2754 * invalid
2755 */
2756 default:
2757 {
2758 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
2759 error = EINVAL;
2760 SCTP_TCB_UNLOCK(stcb);
2761 break;
2762 }
2763 }
2764 } else {
2765 switch (av->assoc_value) {
2766 case SCTP_CC_RFC2581:
2767 case SCTP_CC_HSTCP:
2768 case SCTP_CC_HTCP:
2769 inp->sctp_ep.sctp_default_cc_module = av->assoc_value;
2770 break;
2771 default:
2772 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
2773 error = EINVAL;
2774 break;
2775 };
2776 }
2777 }
2778 break;
2779 case SCTP_CLR_STAT_LOG:
2780 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EOPNOTSUPP);
2781 error = EOPNOTSUPP;
2782 break;
2783 case SCTP_CONTEXT:
2784 {
2785 struct sctp_assoc_value *av;
2786
2787 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, optsize);
2788 SCTP_FIND_STCB(inp, stcb, av->assoc_id);
2789
2790 if (stcb) {
2791 stcb->asoc.context = av->assoc_value;
2792 SCTP_TCB_UNLOCK(stcb);
2793 } else {
2794 SCTP_INP_WLOCK(inp);
2795 inp->sctp_context = av->assoc_value;
2796 SCTP_INP_WUNLOCK(inp);
2797 }
2798 }
2799 break;
2800 case SCTP_VRF_ID:
2801 {
2802 uint32_t *default_vrfid;
2803
2804 SCTP_CHECK_AND_CAST(default_vrfid, optval, uint32_t, optsize);
2805 if (*default_vrfid > SCTP_MAX_VRF_ID) {
2806 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
2807 error = EINVAL;
2808 break;
2809 }
2810 inp->def_vrf_id = *default_vrfid;
2811 break;
2812 }
2813 case SCTP_DEL_VRF_ID:
2814 {
2815 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EOPNOTSUPP);
2816 error = EOPNOTSUPP;
2817 break;
2818 }
2819 case SCTP_ADD_VRF_ID:
2820 {
2821 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EOPNOTSUPP);
2822 error = EOPNOTSUPP;
2823 break;
2824 }
2825 case SCTP_DELAYED_SACK:
2826 {
2827 struct sctp_sack_info *sack;
2828
2829 SCTP_CHECK_AND_CAST(sack, optval, struct sctp_sack_info, optsize);
2830 SCTP_FIND_STCB(inp, stcb, sack->sack_assoc_id);
2831 if (sack->sack_delay) {
2832 if (sack->sack_delay > SCTP_MAX_SACK_DELAY)
2833 sack->sack_delay = SCTP_MAX_SACK_DELAY;
2834 }
2835 if (stcb) {
2836 if (sack->sack_delay) {
2837 if (MSEC_TO_TICKS(sack->sack_delay) < 1) {
2838 sack->sack_delay = TICKS_TO_MSEC(1);
2839 }
2840 stcb->asoc.delayed_ack = sack->sack_delay;
2841 }
2842 if (sack->sack_freq) {
2843 stcb->asoc.sack_freq = sack->sack_freq;
2844 }
2845 SCTP_TCB_UNLOCK(stcb);
2846 } else {
2847 SCTP_INP_WLOCK(inp);
2848 if (sack->sack_delay) {
2849 if (MSEC_TO_TICKS(sack->sack_delay) < 1) {
2850 sack->sack_delay = TICKS_TO_MSEC(1);
2851 }
2852 inp->sctp_ep.sctp_timeoutticks[SCTP_TIMER_RECV] = MSEC_TO_TICKS(sack->sack_delay);
2853 }
2854 if (sack->sack_freq) {
2855 inp->sctp_ep.sctp_sack_freq = sack->sack_freq;
2856 }
2857 SCTP_INP_WUNLOCK(inp);
2858 }
2859 break;
2860 }
2861 case SCTP_AUTH_CHUNK:
2862 {
2863 struct sctp_authchunk *sauth;
2864
2865 SCTP_CHECK_AND_CAST(sauth, optval, struct sctp_authchunk, optsize);
2866
2867 SCTP_INP_WLOCK(inp);
2868 if (sctp_auth_add_chunk(sauth->sauth_chunk, inp->sctp_ep.local_auth_chunks)) {
2869 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
2870 error = EINVAL;
2871 }
2872 SCTP_INP_WUNLOCK(inp);
2873 break;
2874 }
2875 case SCTP_AUTH_KEY:
2876 {
2877 struct sctp_authkey *sca;
2878 struct sctp_keyhead *shared_keys;
2879 sctp_sharedkey_t *shared_key;
2880 sctp_key_t *key = NULL;
2881 size_t size;
2882
2883 SCTP_CHECK_AND_CAST(sca, optval, struct sctp_authkey, optsize);
2884 SCTP_FIND_STCB(inp, stcb, sca->sca_assoc_id);
2885 size = optsize - sizeof(*sca);
2886
2887 if (stcb) {
2888 /* set it on the assoc */
2889 shared_keys = &stcb->asoc.shared_keys;
2890 /* clear the cached keys for this key id */
2891 sctp_clear_cachedkeys(stcb, sca->sca_keynumber);
2892 /*
2893 * create the new shared key and
2894 * insert/replace it
2895 */
2896 if (size > 0) {
2897 key = sctp_set_key(sca->sca_key, (uint32_t) size);
2898 if (key == NULL) {
2899 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOMEM);
2900 error = ENOMEM;
2901 SCTP_TCB_UNLOCK(stcb);
2902 break;
2903 }
2904 }
2905 shared_key = sctp_alloc_sharedkey();
2906 if (shared_key == NULL) {
2907 sctp_free_key(key);
2908 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOMEM);
2909 error = ENOMEM;
2910 SCTP_TCB_UNLOCK(stcb);
2911 break;
2912 }
2913 shared_key->key = key;
2914 shared_key->keyid = sca->sca_keynumber;
2915 sctp_insert_sharedkey(shared_keys, shared_key);
2916 SCTP_TCB_UNLOCK(stcb);
2917 } else {
2918 /* set it on the endpoint */
2919 SCTP_INP_WLOCK(inp);
2920 shared_keys = &inp->sctp_ep.shared_keys;
2921 /*
2922 * clear the cached keys on all assocs for
2923 * this key id
2924 */
2925 sctp_clear_cachedkeys_ep(inp, sca->sca_keynumber);
2926 /*
2927 * create the new shared key and
2928 * insert/replace it
2929 */
2930 if (size > 0) {
2931 key = sctp_set_key(sca->sca_key, (uint32_t) size);
2932 if (key == NULL) {
2933 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOMEM);
2934 error = ENOMEM;
2935 SCTP_INP_WUNLOCK(inp);
2936 break;
2937 }
2938 }
2939 shared_key = sctp_alloc_sharedkey();
2940 if (shared_key == NULL) {
2941 sctp_free_key(key);
2942 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOMEM);
2943 error = ENOMEM;
2944 SCTP_INP_WUNLOCK(inp);
2945 break;
2946 }
2947 shared_key->key = key;
2948 shared_key->keyid = sca->sca_keynumber;
2949 sctp_insert_sharedkey(shared_keys, shared_key);
2950 SCTP_INP_WUNLOCK(inp);
2951 }
2952 break;
2953 }
2954 case SCTP_HMAC_IDENT:
2955 {
2956 struct sctp_hmacalgo *shmac;
2957 sctp_hmaclist_t *hmaclist;
2958 uint32_t hmacid;
2959 size_t size, i, found;
2960
2961 SCTP_CHECK_AND_CAST(shmac, optval, struct sctp_hmacalgo, optsize);
2962 size = (optsize - sizeof(*shmac)) / sizeof(shmac->shmac_idents[0]);
2963 hmaclist = sctp_alloc_hmaclist(size);
2964 if (hmaclist == NULL) {
2965 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOMEM);
2966 error = ENOMEM;
2967 break;
2968 }
2969 for (i = 0; i < size; i++) {
2970 hmacid = shmac->shmac_idents[i];
2971 if (sctp_auth_add_hmacid(hmaclist, (uint16_t) hmacid)) {
2972 /* invalid HMACs were found */ ;
2973 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
2974 error = EINVAL;
2975 sctp_free_hmaclist(hmaclist);
2976 goto sctp_set_hmac_done;
2977 }
2978 }
2979 found = 0;
2980 for (i = 0; i < hmaclist->num_algo; i++) {
2981 if (hmaclist->hmac[i] == SCTP_AUTH_HMAC_ID_SHA1) {
2982 /* already in list */
2983 found = 1;
2984 }
2985 }
2986 if (!found) {
2987 sctp_free_hmaclist(hmaclist);
2988 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
2989 error = EINVAL;
2990 break;
2991 }
2992 /* set it on the endpoint */
2993 SCTP_INP_WLOCK(inp);
2994 if (inp->sctp_ep.local_hmacs)
2995 sctp_free_hmaclist(inp->sctp_ep.local_hmacs);
2996 inp->sctp_ep.local_hmacs = hmaclist;
2997 SCTP_INP_WUNLOCK(inp);
2998 sctp_set_hmac_done:
2999 break;
3000 }
3001 case SCTP_AUTH_ACTIVE_KEY:
3002 {
3003 struct sctp_authkeyid *scact;
3004
3005 SCTP_CHECK_AND_CAST(scact, optval, struct sctp_authkeyid, optsize);
3006 SCTP_FIND_STCB(inp, stcb, scact->scact_assoc_id);
3007
3008 /* set the active key on the right place */
3009 if (stcb) {
3010 /* set the active key on the assoc */
3011 if (sctp_auth_setactivekey(stcb, scact->scact_keynumber)) {
3012 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3013 error = EINVAL;
3014 }
3015 SCTP_TCB_UNLOCK(stcb);
3016 } else {
3017 /* set the active key on the endpoint */
3018 SCTP_INP_WLOCK(inp);
3019 if (sctp_auth_setactivekey_ep(inp, scact->scact_keynumber)) {
3020 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3021 error = EINVAL;
3022 }
3023 SCTP_INP_WUNLOCK(inp);
3024 }
3025 break;
3026 }
3027 case SCTP_AUTH_DELETE_KEY:
3028 {
3029 struct sctp_authkeyid *scdel;
3030
3031 SCTP_CHECK_AND_CAST(scdel, optval, struct sctp_authkeyid, optsize);
3032 SCTP_FIND_STCB(inp, stcb, scdel->scact_assoc_id);
3033
3034 /* delete the key from the right place */
3035 if (stcb) {
3036 if (sctp_delete_sharedkey(stcb, scdel->scact_keynumber)) {
3037 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3038 error = EINVAL;
3039 }
3040 SCTP_TCB_UNLOCK(stcb);
3041 } else {
3042 SCTP_INP_WLOCK(inp);
3043 if (sctp_delete_sharedkey_ep(inp, scdel->scact_keynumber)) {
3044 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3045 error = EINVAL;
3046 }
3047 SCTP_INP_WUNLOCK(inp);
3048 }
3049 break;
3050 }
3051
3052 case SCTP_RESET_STREAMS:
3053 {
3054 struct sctp_stream_reset *strrst;
3055 uint8_t send_in = 0, send_tsn = 0, send_out = 0;
3056 int i;
3057
3058 SCTP_CHECK_AND_CAST(strrst, optval, struct sctp_stream_reset, optsize);
3059 SCTP_FIND_STCB(inp, stcb, strrst->strrst_assoc_id);
3060
3061 if (stcb == NULL) {
3062 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOENT);
3063 error = ENOENT;
3064 break;
3065 }
3066 if (stcb->asoc.peer_supports_strreset == 0) {
3067 /*
3068 * Peer does not support it, we return
3069 * protocol not supported since this is true
3070 * for this feature and this peer, not the
3071 * socket request in general.
3072 */
3073 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EPROTONOSUPPORT);
3074 error = EPROTONOSUPPORT;
3075 SCTP_TCB_UNLOCK(stcb);
3076 break;
3077 }
3078 if (stcb->asoc.stream_reset_outstanding) {
3079 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EALREADY);
3080 error = EALREADY;
3081 SCTP_TCB_UNLOCK(stcb);
3082 break;
3083 }
3084 if (strrst->strrst_flags == SCTP_RESET_LOCAL_RECV) {
3085 send_in = 1;
3086 } else if (strrst->strrst_flags == SCTP_RESET_LOCAL_SEND) {
3087 send_out = 1;
3088 } else if (strrst->strrst_flags == SCTP_RESET_BOTH) {
3089 send_in = 1;
3090 send_out = 1;
3091 } else if (strrst->strrst_flags == SCTP_RESET_TSN) {
3092 send_tsn = 1;
3093 } else {
3094 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3095 error = EINVAL;
3096 SCTP_TCB_UNLOCK(stcb);
3097 break;
3098 }
3099 for (i = 0; i < strrst->strrst_num_streams; i++) {
3100 if ((send_in) &&
3101
3102 (strrst->strrst_list[i] > stcb->asoc.streamincnt)) {
3103 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3104 error = EINVAL;
3105 goto get_out;
3106 }
3107 if ((send_out) &&
3108 (strrst->strrst_list[i] > stcb->asoc.streamoutcnt)) {
3109 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3110 error = EINVAL;
3111 goto get_out;
3112 }
3113 }
3114 if (error) {
3115 get_out:
3116 SCTP_TCB_UNLOCK(stcb);
3117 break;
3118 }
3119 error = sctp_send_str_reset_req(stcb, strrst->strrst_num_streams,
3120 strrst->strrst_list,
3121 send_out, (stcb->asoc.str_reset_seq_in - 3),
3122 send_in, send_tsn);
3123
3124 sctp_chunk_output(inp, stcb, SCTP_OUTPUT_FROM_STRRST_REQ, SCTP_SO_LOCKED);
3125 SCTP_TCB_UNLOCK(stcb);
3126 }
3127 break;
3128
3129 case SCTP_CONNECT_X:
3130 if (optsize < (sizeof(int) + sizeof(struct sockaddr_in))) {
3131 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3132 error = EINVAL;
3133 break;
3134 }
3135 error = sctp_do_connect_x(so, inp, optval, optsize, p, 0);
3136 break;
3137
3138 case SCTP_CONNECT_X_DELAYED:
3139 if (optsize < (sizeof(int) + sizeof(struct sockaddr_in))) {
3140 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3141 error = EINVAL;
3142 break;
3143 }
3144 error = sctp_do_connect_x(so, inp, optval, optsize, p, 1);
3145 break;
3146
3147 case SCTP_CONNECT_X_COMPLETE:
3148 {
3149 struct sockaddr *sa;
3150 struct sctp_nets *net;
3151
3152 /* FIXME MT: check correct? */
3153 SCTP_CHECK_AND_CAST(sa, optval, struct sockaddr, optsize);
3154
3155 /* find tcb */
3156 if (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) {
3157 SCTP_INP_RLOCK(inp);
3158 stcb = LIST_FIRST(&inp->sctp_asoc_list);
3159 if (stcb) {
3160 SCTP_TCB_LOCK(stcb);
3161 net = sctp_findnet(stcb, sa);
3162 }
3163 SCTP_INP_RUNLOCK(inp);
3164 } else {
3165 /*
3166 * We increment here since
3167 * sctp_findassociation_ep_addr() wil do a
3168 * decrement if it finds the stcb as long as
3169 * the locked tcb (last argument) is NOT a
3170 * TCB.. aka NULL.
3171 */
3172 SCTP_INP_INCR_REF(inp);
3173 stcb = sctp_findassociation_ep_addr(&inp, sa, &net, NULL, NULL);
3174 if (stcb == NULL) {
3175 SCTP_INP_DECR_REF(inp);
3176 }
3177 }
3178
3179 if (stcb == NULL) {
3180 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOENT);
3181 error = ENOENT;
3182 break;
3183 }
3184 if (stcb->asoc.delayed_connection == 1) {
3185 stcb->asoc.delayed_connection = 0;
3186 (void)SCTP_GETTIME_TIMEVAL(&stcb->asoc.time_entered);
3187 sctp_timer_stop(SCTP_TIMER_TYPE_INIT, inp, stcb,
3188 stcb->asoc.primary_destination,
3189 SCTP_FROM_SCTP_USRREQ + SCTP_LOC_9);
3190 sctp_send_initiate(inp, stcb, SCTP_SO_LOCKED);
3191 } else {
3192 /*
3193 * already expired or did not use delayed
3194 * connectx
3195 */
3196 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EALREADY);
3197 error = EALREADY;
3198 }
3199 SCTP_TCB_UNLOCK(stcb);
3200 }
3201 break;
3202 case SCTP_MAX_BURST:
3203 {
3204 uint8_t *burst;
3205
3206 SCTP_CHECK_AND_CAST(burst, optval, uint8_t, optsize);
3207
3208 SCTP_INP_WLOCK(inp);
3209 if (*burst) {
3210 inp->sctp_ep.max_burst = *burst;
3211 }
3212 SCTP_INP_WUNLOCK(inp);
3213 }
3214 break;
3215 case SCTP_MAXSEG:
3216 {
3217 struct sctp_assoc_value *av;
3218 int ovh;
3219
3220 SCTP_CHECK_AND_CAST(av, optval, struct sctp_assoc_value, optsize);
3221 SCTP_FIND_STCB(inp, stcb, av->assoc_id);
3222
3223 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) {
3224 ovh = SCTP_MED_OVERHEAD;
3225 } else {
3226 ovh = SCTP_MED_V4_OVERHEAD;
3227 }
3228 if (stcb) {
3229 if (av->assoc_value) {
3230 stcb->asoc.sctp_frag_point = (av->assoc_value + ovh);
3231 } else {
3232 stcb->asoc.sctp_frag_point = SCTP_DEFAULT_MAXSEGMENT;
3233 }
3234 SCTP_TCB_UNLOCK(stcb);
3235 } else {
3236 SCTP_INP_WLOCK(inp);
3237 /*
3238 * FIXME MT: I think this is not in tune
3239 * with the API ID
3240 */
3241 if (av->assoc_value) {
3242 inp->sctp_frag_point = (av->assoc_value + ovh);
3243 } else {
3244 inp->sctp_frag_point = SCTP_DEFAULT_MAXSEGMENT;
3245 }
3246 SCTP_INP_WUNLOCK(inp);
3247 }
3248 }
3249 break;
3250 case SCTP_EVENTS:
3251 {
3252 struct sctp_event_subscribe *events;
3253
3254 SCTP_CHECK_AND_CAST(events, optval, struct sctp_event_subscribe, optsize);
3255
3256 SCTP_INP_WLOCK(inp);
3257 if (events->sctp_data_io_event) {
3258 sctp_feature_on(inp, SCTP_PCB_FLAGS_RECVDATAIOEVNT);
3259 } else {
3260 sctp_feature_off(inp, SCTP_PCB_FLAGS_RECVDATAIOEVNT);
3261 }
3262
3263 if (events->sctp_association_event) {
3264 sctp_feature_on(inp, SCTP_PCB_FLAGS_RECVASSOCEVNT);
3265 } else {
3266 sctp_feature_off(inp, SCTP_PCB_FLAGS_RECVASSOCEVNT);
3267 }
3268
3269 if (events->sctp_address_event) {
3270 sctp_feature_on(inp, SCTP_PCB_FLAGS_RECVPADDREVNT);
3271 } else {
3272 sctp_feature_off(inp, SCTP_PCB_FLAGS_RECVPADDREVNT);
3273 }
3274
3275 if (events->sctp_send_failure_event) {
3276 sctp_feature_on(inp, SCTP_PCB_FLAGS_RECVSENDFAILEVNT);
3277 } else {
3278 sctp_feature_off(inp, SCTP_PCB_FLAGS_RECVSENDFAILEVNT);
3279 }
3280
3281 if (events->sctp_peer_error_event) {
3282 sctp_feature_on(inp, SCTP_PCB_FLAGS_RECVPEERERR);
3283 } else {
3284 sctp_feature_off(inp, SCTP_PCB_FLAGS_RECVPEERERR);
3285 }
3286
3287 if (events->sctp_shutdown_event) {
3288 sctp_feature_on(inp, SCTP_PCB_FLAGS_RECVSHUTDOWNEVNT);
3289 } else {
3290 sctp_feature_off(inp, SCTP_PCB_FLAGS_RECVSHUTDOWNEVNT);
3291 }
3292
3293 if (events->sctp_partial_delivery_event) {
3294 sctp_feature_on(inp, SCTP_PCB_FLAGS_PDAPIEVNT);
3295 } else {
3296 sctp_feature_off(inp, SCTP_PCB_FLAGS_PDAPIEVNT);
3297 }
3298
3299 if (events->sctp_adaptation_layer_event) {
3300 sctp_feature_on(inp, SCTP_PCB_FLAGS_ADAPTATIONEVNT);
3301 } else {
3302 sctp_feature_off(inp, SCTP_PCB_FLAGS_ADAPTATIONEVNT);
3303 }
3304
3305 if (events->sctp_authentication_event) {
3306 sctp_feature_on(inp, SCTP_PCB_FLAGS_AUTHEVNT);
3307 } else {
3308 sctp_feature_off(inp, SCTP_PCB_FLAGS_AUTHEVNT);
3309 }
3310
3311 if (events->sctp_stream_reset_events) {
3312 sctp_feature_on(inp, SCTP_PCB_FLAGS_STREAM_RESETEVNT);
3313 } else {
3314 sctp_feature_off(inp, SCTP_PCB_FLAGS_STREAM_RESETEVNT);
3315 }
3316 SCTP_INP_WUNLOCK(inp);
3317 }
3318 break;
3319
3320 case SCTP_ADAPTATION_LAYER:
3321 {
3322 struct sctp_setadaptation *adap_bits;
3323
3324 SCTP_CHECK_AND_CAST(adap_bits, optval, struct sctp_setadaptation, optsize);
3325 SCTP_INP_WLOCK(inp);
3326 inp->sctp_ep.adaptation_layer_indicator = adap_bits->ssb_adaptation_ind;
3327 SCTP_INP_WUNLOCK(inp);
3328 }
3329 break;
3330 #ifdef SCTP_DEBUG
3331 case SCTP_SET_INITIAL_DBG_SEQ:
3332 {
3333 uint32_t *vvv;
3334
3335 SCTP_CHECK_AND_CAST(vvv, optval, uint32_t, optsize);
3336 SCTP_INP_WLOCK(inp);
3337 inp->sctp_ep.initial_sequence_debug = *vvv;
3338 SCTP_INP_WUNLOCK(inp);
3339 }
3340 break;
3341 #endif
3342 case SCTP_DEFAULT_SEND_PARAM:
3343 {
3344 struct sctp_sndrcvinfo *s_info;
3345
3346 SCTP_CHECK_AND_CAST(s_info, optval, struct sctp_sndrcvinfo, optsize);
3347 SCTP_FIND_STCB(inp, stcb, s_info->sinfo_assoc_id);
3348
3349 if (stcb) {
3350 if (s_info->sinfo_stream <= stcb->asoc.streamoutcnt) {
3351 memcpy(&stcb->asoc.def_send, s_info, min(optsize, sizeof(stcb->asoc.def_send)));
3352 } else {
3353 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3354 error = EINVAL;
3355 }
3356 SCTP_TCB_UNLOCK(stcb);
3357 } else {
3358 SCTP_INP_WLOCK(inp);
3359 memcpy(&inp->def_send, s_info, min(optsize, sizeof(inp->def_send)));
3360 SCTP_INP_WUNLOCK(inp);
3361 }
3362 }
3363 break;
3364 case SCTP_PEER_ADDR_PARAMS:
3365 /* Applys to the specific association */
3366 {
3367 struct sctp_paddrparams *paddrp;
3368 struct sctp_nets *net;
3369
3370 SCTP_CHECK_AND_CAST(paddrp, optval, struct sctp_paddrparams, optsize);
3371 SCTP_FIND_STCB(inp, stcb, paddrp->spp_assoc_id);
3372 net = NULL;
3373 if (stcb) {
3374 net = sctp_findnet(stcb, (struct sockaddr *)&paddrp->spp_address);
3375 } else {
3376 /*
3377 * We increment here since
3378 * sctp_findassociation_ep_addr() wil do a
3379 * decrement if it finds the stcb as long as
3380 * the locked tcb (last argument) is NOT a
3381 * TCB.. aka NULL.
3382 */
3383 SCTP_INP_INCR_REF(inp);
3384 stcb = sctp_findassociation_ep_addr(&inp,
3385 (struct sockaddr *)&paddrp->spp_address,
3386 &net, NULL, NULL);
3387 if (stcb == NULL) {
3388 SCTP_INP_DECR_REF(inp);
3389 }
3390 }
3391 if (stcb && (net == NULL)) {
3392 struct sockaddr *sa;
3393
3394 sa = (struct sockaddr *)&paddrp->spp_address;
3395 if (sa->sa_family == AF_INET) {
3396 struct sockaddr_in *sin;
3397
3398 sin = (struct sockaddr_in *)sa;
3399 if (sin->sin_addr.s_addr) {
3400 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3401 SCTP_TCB_UNLOCK(stcb);
3402 error = EINVAL;
3403 break;
3404 }
3405 } else if (sa->sa_family == AF_INET6) {
3406 struct sockaddr_in6 *sin6;
3407
3408 sin6 = (struct sockaddr_in6 *)sa;
3409 if (!IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) {
3410 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3411 SCTP_TCB_UNLOCK(stcb);
3412 error = EINVAL;
3413 break;
3414 }
3415 } else {
3416 error = EAFNOSUPPORT;
3417 SCTP_TCB_UNLOCK(stcb);
3418 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, error);
3419 break;
3420 }
3421 }
3422 /* sanity checks */
3423 if ((paddrp->spp_flags & SPP_HB_ENABLE) && (paddrp->spp_flags & SPP_HB_DISABLE)) {
3424 if (stcb)
3425 SCTP_TCB_UNLOCK(stcb);
3426 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3427 return (EINVAL);
3428 }
3429 if ((paddrp->spp_flags & SPP_PMTUD_ENABLE) && (paddrp->spp_flags & SPP_PMTUD_DISABLE)) {
3430 if (stcb)
3431 SCTP_TCB_UNLOCK(stcb);
3432 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3433 return (EINVAL);
3434 }
3435 if (stcb) {
3436 /************************TCB SPECIFIC SET ******************/
3437 /*
3438 * do we change the timer for HB, we run
3439 * only one?
3440 */
3441 int ovh = 0;
3442
3443 if (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) {
3444 ovh = SCTP_MED_OVERHEAD;
3445 } else {
3446 ovh = SCTP_MED_V4_OVERHEAD;
3447 }
3448
3449 if (paddrp->spp_hbinterval)
3450 stcb->asoc.heart_beat_delay = paddrp->spp_hbinterval;
3451 else if (paddrp->spp_flags & SPP_HB_TIME_IS_ZERO)
3452 stcb->asoc.heart_beat_delay = 0;
3453
3454 /* network sets ? */
3455 if (net) {
3456 /************************NET SPECIFIC SET ******************/
3457 if (paddrp->spp_flags & SPP_HB_DEMAND) {
3458 /* on demand HB */
3459 if (sctp_send_hb(stcb, 1, net) < 0) {
3460 /* asoc destroyed */
3461 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3462 error = EINVAL;
3463 break;
3464 }
3465 }
3466 if (paddrp->spp_flags & SPP_HB_DISABLE) {
3467 net->dest_state |= SCTP_ADDR_NOHB;
3468 }
3469 if (paddrp->spp_flags & SPP_HB_ENABLE) {
3470 net->dest_state &= ~SCTP_ADDR_NOHB;
3471 }
3472 if ((paddrp->spp_flags & SPP_PMTUD_DISABLE) && (paddrp->spp_pathmtu >= SCTP_SMALLEST_PMTU)) {
3473 if (SCTP_OS_TIMER_PENDING(&net->pmtu_timer.timer)) {
3474 sctp_timer_stop(SCTP_TIMER_TYPE_PATHMTURAISE, inp, stcb, net,
3475 SCTP_FROM_SCTP_USRREQ + SCTP_LOC_10);
3476 }
3477 if (paddrp->spp_pathmtu > SCTP_DEFAULT_MINSEGMENT) {
3478 net->mtu = paddrp->spp_pathmtu + ovh;
3479 if (net->mtu < stcb->asoc.smallest_mtu) {
3480 #ifdef SCTP_PRINT_FOR_B_AND_M
3481 SCTP_PRINTF("SCTP_PMTU_DISABLE calls sctp_pathmtu_adjustment:%d\n",
3482 net->mtu);
3483 #endif
3484 sctp_pathmtu_adjustment(inp, stcb, net, net->mtu);
3485 }
3486 }
3487 }
3488 if (paddrp->spp_flags & SPP_PMTUD_ENABLE) {
3489 if (SCTP_OS_TIMER_PENDING(&net->pmtu_timer.timer)) {
3490 sctp_timer_start(SCTP_TIMER_TYPE_PATHMTURAISE, inp, stcb, net);
3491 }
3492 }
3493 if (paddrp->spp_pathmaxrxt)
3494 net->failure_threshold = paddrp->spp_pathmaxrxt;
3495 #ifdef INET
3496 if (paddrp->spp_flags & SPP_IPV4_TOS) {
3497 if (net->ro._l_addr.sin.sin_family == AF_INET) {
3498 net->tos_flowlabel = paddrp->spp_ipv4_tos & 0x000000fc;
3499 }
3500 }
3501 #endif
3502 #ifdef INET6
3503 if (paddrp->spp_flags & SPP_IPV6_FLOWLABEL) {
3504 if (net->ro._l_addr.sin6.sin6_family == AF_INET6) {
3505 net->tos_flowlabel = paddrp->spp_ipv6_flowlabel;
3506 }
3507 }
3508 #endif
3509 } else {
3510 /************************ASSOC ONLY -- NO NET SPECIFIC SET ******************/
3511 if (paddrp->spp_pathmaxrxt)
3512 stcb->asoc.def_net_failure = paddrp->spp_pathmaxrxt;
3513
3514 if (paddrp->spp_flags & SPP_HB_ENABLE) {
3515 /* Turn back on the timer */
3516 stcb->asoc.hb_is_disabled = 0;
3517 sctp_timer_start(SCTP_TIMER_TYPE_HEARTBEAT, inp, stcb, net);
3518 }
3519 if ((paddrp->spp_flags & SPP_PMTUD_DISABLE) && (paddrp->spp_pathmtu >= SCTP_SMALLEST_PMTU)) {
3520 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) {
3521 if (SCTP_OS_TIMER_PENDING(&net->pmtu_timer.timer)) {
3522 sctp_timer_stop(SCTP_TIMER_TYPE_PATHMTURAISE, inp, stcb, net,
3523 SCTP_FROM_SCTP_USRREQ + SCTP_LOC_10);
3524 }
3525 if (paddrp->spp_pathmtu > SCTP_DEFAULT_MINSEGMENT) {
3526 net->mtu = paddrp->spp_pathmtu + ovh;
3527 if (net->mtu < stcb->asoc.smallest_mtu) {
3528 #ifdef SCTP_PRINT_FOR_B_AND_M
3529 SCTP_PRINTF("SCTP_PMTU_DISABLE calls sctp_pathmtu_adjustment:%d\n",
3530 net->mtu);
3531 #endif
3532 sctp_pathmtu_adjustment(inp, stcb, net, net->mtu);
3533 }
3534 }
3535 }
3536 }
3537 if (paddrp->spp_flags & SPP_PMTUD_ENABLE) {
3538 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) {
3539 if (SCTP_OS_TIMER_PENDING(&net->pmtu_timer.timer)) {
3540 sctp_timer_start(SCTP_TIMER_TYPE_PATHMTURAISE, inp, stcb, net);
3541 }
3542 }
3543 }
3544 if (paddrp->spp_flags & SPP_HB_DISABLE) {
3545 int cnt_of_unconf = 0;
3546 struct sctp_nets *lnet;
3547
3548 stcb->asoc.hb_is_disabled = 1;
3549 TAILQ_FOREACH(lnet, &stcb->asoc.nets, sctp_next) {
3550 if (lnet->dest_state & SCTP_ADDR_UNCONFIRMED) {
3551 cnt_of_unconf++;
3552 }
3553 }
3554 /*
3555 * stop the timer ONLY if we
3556 * have no unconfirmed
3557 * addresses
3558 */
3559 if (cnt_of_unconf == 0) {
3560 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) {
3561 sctp_timer_stop(SCTP_TIMER_TYPE_HEARTBEAT, inp, stcb, net,
3562 SCTP_FROM_SCTP_USRREQ + SCTP_LOC_11);
3563 }
3564 }
3565 }
3566 if (paddrp->spp_flags & SPP_HB_ENABLE) {
3567 /* start up the timer. */
3568 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) {
3569 sctp_timer_start(SCTP_TIMER_TYPE_HEARTBEAT, inp, stcb, net);
3570 }
3571 }
3572 #ifdef INET
3573 if (paddrp->spp_flags & SPP_IPV4_TOS)
3574 stcb->asoc.default_tos = paddrp->spp_ipv4_tos & 0x000000fc;
3575 #endif
3576 #ifdef INET6
3577 if (paddrp->spp_flags & SPP_IPV6_FLOWLABEL)
3578 stcb->asoc.default_flowlabel = paddrp->spp_ipv6_flowlabel;
3579 #endif
3580
3581 }
3582 SCTP_TCB_UNLOCK(stcb);
3583 } else {
3584 /************************NO TCB, SET TO default stuff ******************/
3585 SCTP_INP_WLOCK(inp);
3586 /*
3587 * For the TOS/FLOWLABEL stuff you set it
3588 * with the options on the socket
3589 */
3590 if (paddrp->spp_pathmaxrxt) {
3591 inp->sctp_ep.def_net_failure = paddrp->spp_pathmaxrxt;
3592 }
3593 if (paddrp->spp_flags & SPP_HB_TIME_IS_ZERO)
3594 inp->sctp_ep.sctp_timeoutticks[SCTP_TIMER_HEARTBEAT] = 0;
3595 else if (paddrp->spp_hbinterval) {
3596 if (paddrp->spp_hbinterval > SCTP_MAX_HB_INTERVAL)
3597 paddrp->spp_hbinterval = SCTP_MAX_HB_INTERVAL;
3598 inp->sctp_ep.sctp_timeoutticks[SCTP_TIMER_HEARTBEAT] = MSEC_TO_TICKS(paddrp->spp_hbinterval);
3599 }
3600 if (paddrp->spp_flags & SPP_HB_ENABLE) {
3601 sctp_feature_off(inp, SCTP_PCB_FLAGS_DONOT_HEARTBEAT);
3602
3603 } else if (paddrp->spp_flags & SPP_HB_DISABLE) {
3604 sctp_feature_on(inp, SCTP_PCB_FLAGS_DONOT_HEARTBEAT);
3605 }
3606 SCTP_INP_WUNLOCK(inp);
3607 }
3608 }
3609 break;
3610 case SCTP_RTOINFO:
3611 {
3612 struct sctp_rtoinfo *srto;
3613 uint32_t new_init, new_min, new_max;
3614
3615 SCTP_CHECK_AND_CAST(srto, optval, struct sctp_rtoinfo, optsize);
3616 SCTP_FIND_STCB(inp, stcb, srto->srto_assoc_id);
3617
3618 if (stcb) {
3619 if (srto->srto_initial)
3620 new_init = srto->srto_initial;
3621 else
3622 new_init = stcb->asoc.initial_rto;
3623 if (srto->srto_max)
3624 new_max = srto->srto_max;
3625 else
3626 new_max = stcb->asoc.maxrto;
3627 if (srto->srto_min)
3628 new_min = srto->srto_min;
3629 else
3630 new_min = stcb->asoc.minrto;
3631 if ((new_min <= new_init) && (new_init <= new_max)) {
3632 stcb->asoc.initial_rto = new_init;
3633 stcb->asoc.maxrto = new_max;
3634 stcb->asoc.minrto = new_min;
3635 } else {
3636 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EDOM);
3637 error = EDOM;
3638 }
3639 SCTP_TCB_UNLOCK(stcb);
3640 } else {
3641 SCTP_INP_WLOCK(inp);
3642 if (srto->srto_initial)
3643 new_init = srto->srto_initial;
3644 else
3645 new_init = inp->sctp_ep.initial_rto;
3646 if (srto->srto_max)
3647 new_max = srto->srto_max;
3648 else
3649 new_max = inp->sctp_ep.sctp_maxrto;
3650 if (srto->srto_min)
3651 new_min = srto->srto_min;
3652 else
3653 new_min = inp->sctp_ep.sctp_minrto;
3654 if ((new_min <= new_init) && (new_init <= new_max)) {
3655 inp->sctp_ep.initial_rto = new_init;
3656 inp->sctp_ep.sctp_maxrto = new_max;
3657 inp->sctp_ep.sctp_minrto = new_min;
3658 } else {
3659 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EDOM);
3660 error = EDOM;
3661 }
3662 SCTP_INP_WUNLOCK(inp);
3663 }
3664 }
3665 break;
3666 case SCTP_ASSOCINFO:
3667 {
3668 struct sctp_assocparams *sasoc;
3669
3670 SCTP_CHECK_AND_CAST(sasoc, optval, struct sctp_assocparams, optsize);
3671 SCTP_FIND_STCB(inp, stcb, sasoc->sasoc_assoc_id);
3672 if (sasoc->sasoc_cookie_life) {
3673 /* boundary check the cookie life */
3674 if (sasoc->sasoc_cookie_life < 1000)
3675 sasoc->sasoc_cookie_life = 1000;
3676 if (sasoc->sasoc_cookie_life > SCTP_MAX_COOKIE_LIFE) {
3677 sasoc->sasoc_cookie_life = SCTP_MAX_COOKIE_LIFE;
3678 }
3679 }
3680 if (stcb) {
3681 if (sasoc->sasoc_asocmaxrxt)
3682 stcb->asoc.max_send_times = sasoc->sasoc_asocmaxrxt;
3683 sasoc->sasoc_number_peer_destinations = stcb->asoc.numnets;
3684 sasoc->sasoc_peer_rwnd = 0;
3685 sasoc->sasoc_local_rwnd = 0;
3686 if (sasoc->sasoc_cookie_life) {
3687 stcb->asoc.cookie_life = MSEC_TO_TICKS(sasoc->sasoc_cookie_life);
3688 }
3689 SCTP_TCB_UNLOCK(stcb);
3690 } else {
3691 SCTP_INP_WLOCK(inp);
3692 if (sasoc->sasoc_asocmaxrxt)
3693 inp->sctp_ep.max_send_times = sasoc->sasoc_asocmaxrxt;
3694 sasoc->sasoc_number_peer_destinations = 0;
3695 sasoc->sasoc_peer_rwnd = 0;
3696 sasoc->sasoc_local_rwnd = 0;
3697 if (sasoc->sasoc_cookie_life) {
3698 inp->sctp_ep.def_cookie_life = MSEC_TO_TICKS(sasoc->sasoc_cookie_life);
3699 }
3700 SCTP_INP_WUNLOCK(inp);
3701 }
3702 }
3703 break;
3704 case SCTP_INITMSG:
3705 {
3706 struct sctp_initmsg *sinit;
3707
3708 SCTP_CHECK_AND_CAST(sinit, optval, struct sctp_initmsg, optsize);
3709 SCTP_INP_WLOCK(inp);
3710 if (sinit->sinit_num_ostreams)
3711 inp->sctp_ep.pre_open_stream_count = sinit->sinit_num_ostreams;
3712
3713 if (sinit->sinit_max_instreams)
3714 inp->sctp_ep.max_open_streams_intome = sinit->sinit_max_instreams;
3715
3716 if (sinit->sinit_max_attempts)
3717 inp->sctp_ep.max_init_times = sinit->sinit_max_attempts;
3718
3719 if (sinit->sinit_max_init_timeo)
3720 inp->sctp_ep.initial_init_rto_max = sinit->sinit_max_init_timeo;
3721 SCTP_INP_WUNLOCK(inp);
3722 }
3723 break;
3724 case SCTP_PRIMARY_ADDR:
3725 {
3726 struct sctp_setprim *spa;
3727 struct sctp_nets *net, *lnet;
3728
3729 SCTP_CHECK_AND_CAST(spa, optval, struct sctp_setprim, optsize);
3730 SCTP_FIND_STCB(inp, stcb, spa->ssp_assoc_id);
3731
3732 net = NULL;
3733 if (stcb) {
3734 net = sctp_findnet(stcb, (struct sockaddr *)&spa->ssp_addr);
3735 } else {
3736 /*
3737 * We increment here since
3738 * sctp_findassociation_ep_addr() wil do a
3739 * decrement if it finds the stcb as long as
3740 * the locked tcb (last argument) is NOT a
3741 * TCB.. aka NULL.
3742 */
3743 SCTP_INP_INCR_REF(inp);
3744 stcb = sctp_findassociation_ep_addr(&inp,
3745 (struct sockaddr *)&spa->ssp_addr,
3746 &net, NULL, NULL);
3747 if (stcb == NULL) {
3748 SCTP_INP_DECR_REF(inp);
3749 }
3750 }
3751
3752 if ((stcb) && (net)) {
3753 if ((net != stcb->asoc.primary_destination) &&
3754 (!(net->dest_state & SCTP_ADDR_UNCONFIRMED))) {
3755 /* Ok we need to set it */
3756 lnet = stcb->asoc.primary_destination;
3757 if (sctp_set_primary_addr(stcb, (struct sockaddr *)NULL, net) == 0) {
3758 if (net->dest_state & SCTP_ADDR_SWITCH_PRIMARY) {
3759 net->dest_state |= SCTP_ADDR_DOUBLE_SWITCH;
3760 }
3761 net->dest_state |= SCTP_ADDR_SWITCH_PRIMARY;
3762 }
3763 }
3764 } else {
3765 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3766 error = EINVAL;
3767 }
3768 if (stcb) {
3769 SCTP_TCB_UNLOCK(stcb);
3770 }
3771 }
3772 break;
3773 case SCTP_SET_DYNAMIC_PRIMARY:
3774 {
3775 union sctp_sockstore *ss;
3776
3777 error = priv_check(curthread,
3778 PRIV_NETINET_RESERVEDPORT);
3779 if (error)
3780 break;
3781
3782 SCTP_CHECK_AND_CAST(ss, optval, union sctp_sockstore, optsize);
3783 /* SUPER USER CHECK? */
3784 error = sctp_dynamic_set_primary(&ss->sa, vrf_id);
3785 }
3786 break;
3787 case SCTP_SET_PEER_PRIMARY_ADDR:
3788 {
3789 struct sctp_setpeerprim *sspp;
3790
3791 SCTP_CHECK_AND_CAST(sspp, optval, struct sctp_setpeerprim, optsize);
3792 SCTP_FIND_STCB(inp, stcb, sspp->sspp_assoc_id);
3793 if (stcb != NULL) {
3794 struct sctp_ifa *ifa;
3795
3796 ifa = sctp_find_ifa_by_addr((struct sockaddr *)&sspp->sspp_addr,
3797 stcb->asoc.vrf_id, SCTP_ADDR_NOT_LOCKED);
3798 if (ifa == NULL) {
3799 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3800 error = EINVAL;
3801 goto out_of_it;
3802 }
3803 if ((inp->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) == 0) {
3804 /*
3805 * Must validate the ifa found is in
3806 * our ep
3807 */
3808 struct sctp_laddr *laddr;
3809 int found = 0;
3810
3811 LIST_FOREACH(laddr, &inp->sctp_addr_list, sctp_nxt_addr) {
3812 if (laddr->ifa == NULL) {
3813 SCTPDBG(SCTP_DEBUG_OUTPUT1, "%s: NULL ifa\n",
3814 __FUNCTION__);
3815 continue;
3816 }
3817 if (laddr->ifa == ifa) {
3818 found = 1;
3819 break;
3820 }
3821 }
3822 if (!found) {
3823 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3824 error = EINVAL;
3825 goto out_of_it;
3826 }
3827 }
3828 if (sctp_set_primary_ip_address_sa(stcb,
3829 (struct sockaddr *)&sspp->sspp_addr) != 0) {
3830 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3831 error = EINVAL;
3832 }
3833 out_of_it:
3834 SCTP_TCB_UNLOCK(stcb);
3835 } else {
3836 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3837 error = EINVAL;
3838 }
3839
3840 }
3841 break;
3842 case SCTP_BINDX_ADD_ADDR:
3843 {
3844 struct sctp_getaddresses *addrs;
3845 size_t sz;
3846 struct thread *td;
3847 int prison = 0;
3848
3849 td = (struct thread *)p;
3850 if (jailed(td->td_ucred)) {
3851 prison = 1;
3852 }
3853 SCTP_CHECK_AND_CAST(addrs, optval, struct sctp_getaddresses,
3854 optsize);
3855 if (addrs->addr->sa_family == AF_INET) {
3856 sz = sizeof(struct sctp_getaddresses) - sizeof(struct sockaddr) + sizeof(struct sockaddr_in);
3857 if (optsize < sz) {
3858 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3859 error = EINVAL;
3860 break;
3861 }
3862 if (prison && prison_ip(td->td_ucred, 0, &(((struct sockaddr_in *)(addrs->addr))->sin_addr.s_addr))) {
3863 SCTP_LTRACE_ERR_RET(inp, stcb, NULL, SCTP_FROM_SCTP_USRREQ, EADDRNOTAVAIL);
3864 error = EADDRNOTAVAIL;
3865 }
3866 } else if (addrs->addr->sa_family == AF_INET6) {
3867 sz = sizeof(struct sctp_getaddresses) - sizeof(struct sockaddr) + sizeof(struct sockaddr_in6);
3868 if (optsize < sz) {
3869 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3870 error = EINVAL;
3871 break;
3872 }
3873 /* JAIL XXXX Add else here for V6 */
3874 }
3875 sctp_bindx_add_address(so, inp, addrs->addr,
3876 addrs->sget_assoc_id, vrf_id,
3877 &error, p);
3878 }
3879 break;
3880 case SCTP_BINDX_REM_ADDR:
3881 {
3882 struct sctp_getaddresses *addrs;
3883 size_t sz;
3884 struct thread *td;
3885 int prison = 0;
3886
3887 td = (struct thread *)p;
3888 if (jailed(td->td_ucred)) {
3889 prison = 1;
3890 }
3891 SCTP_CHECK_AND_CAST(addrs, optval, struct sctp_getaddresses, optsize);
3892 if (addrs->addr->sa_family == AF_INET) {
3893 sz = sizeof(struct sctp_getaddresses) - sizeof(struct sockaddr) + sizeof(struct sockaddr_in);
3894 if (optsize < sz) {
3895 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3896 error = EINVAL;
3897 break;
3898 }
3899 if (prison && prison_ip(td->td_ucred, 0, &(((struct sockaddr_in *)(addrs->addr))->sin_addr.s_addr))) {
3900 SCTP_LTRACE_ERR_RET(inp, stcb, NULL, SCTP_FROM_SCTP_USRREQ, EADDRNOTAVAIL);
3901 error = EADDRNOTAVAIL;
3902 }
3903 } else if (addrs->addr->sa_family == AF_INET6) {
3904 sz = sizeof(struct sctp_getaddresses) - sizeof(struct sockaddr) + sizeof(struct sockaddr_in6);
3905 if (optsize < sz) {
3906 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3907 error = EINVAL;
3908 break;
3909 }
3910 /* JAIL XXXX Add else here for V6 */
3911 }
3912 sctp_bindx_delete_address(so, inp, addrs->addr,
3913 addrs->sget_assoc_id, vrf_id,
3914 &error);
3915 }
3916 break;
3917 default:
3918 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOPROTOOPT);
3919 error = ENOPROTOOPT;
3920 break;
3921 } /* end switch (opt) */
3922 return (error);
3923 }
3924
3925
3926 int
3927 sctp_ctloutput(struct socket *so, struct sockopt *sopt)
3928 {
3929 void *optval = NULL;
3930 size_t optsize = 0;
3931 struct sctp_inpcb *inp;
3932 void *p;
3933 int error = 0;
3934
3935 inp = (struct sctp_inpcb *)so->so_pcb;
3936 if (inp == 0) {
3937 /* I made the same as TCP since we are not setup? */
3938 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3939 return (ECONNRESET);
3940 }
3941 if (sopt->sopt_level != IPPROTO_SCTP) {
3942 /* wrong proto level... send back up to IP */
3943 #ifdef INET6
3944 if (INP_CHECK_SOCKAF(so, AF_INET6))
3945 error = ip6_ctloutput(so, sopt);
3946 else
3947 #endif /* INET6 */
3948 error = ip_ctloutput(so, sopt);
3949 return (error);
3950 }
3951 optsize = sopt->sopt_valsize;
3952 if (optsize) {
3953 SCTP_MALLOC(optval, void *, optsize, SCTP_M_SOCKOPT);
3954 if (optval == NULL) {
3955 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOBUFS);
3956 return (ENOBUFS);
3957 }
3958 error = sooptcopyin(sopt, optval, optsize, optsize);
3959 if (error) {
3960 SCTP_FREE(optval, SCTP_M_SOCKOPT);
3961 goto out;
3962 }
3963 }
3964 p = (void *)sopt->sopt_td;
3965 if (sopt->sopt_dir == SOPT_SET) {
3966 error = sctp_setopt(so, sopt->sopt_name, optval, optsize, p);
3967 } else if (sopt->sopt_dir == SOPT_GET) {
3968 error = sctp_getopt(so, sopt->sopt_name, optval, &optsize, p);
3969 } else {
3970 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3971 error = EINVAL;
3972 }
3973 if ((error == 0) && (optval != NULL)) {
3974 error = sooptcopyout(sopt, optval, optsize);
3975 SCTP_FREE(optval, SCTP_M_SOCKOPT);
3976 } else if (optval != NULL) {
3977 SCTP_FREE(optval, SCTP_M_SOCKOPT);
3978 }
3979 out:
3980 return (error);
3981 }
3982
3983
3984 static int
3985 sctp_connect(struct socket *so, struct sockaddr *addr, struct thread *p)
3986 {
3987 int error = 0;
3988 int create_lock_on = 0;
3989 uint32_t vrf_id;
3990 struct sctp_inpcb *inp;
3991 struct sctp_tcb *stcb = NULL;
3992
3993 inp = (struct sctp_inpcb *)so->so_pcb;
3994 if (inp == 0) {
3995 /* I made the same as TCP since we are not setup? */
3996 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
3997 return (ECONNRESET);
3998 }
3999 if (addr == NULL) {
4000 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
4001 return EINVAL;
4002 }
4003 if ((addr->sa_family == AF_INET6) && (addr->sa_len != sizeof(struct sockaddr_in6))) {
4004 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
4005 return (EINVAL);
4006 }
4007 if ((addr->sa_family == AF_INET) && (addr->sa_len != sizeof(struct sockaddr_in))) {
4008 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
4009 return (EINVAL);
4010 }
4011 SCTP_ASOC_CREATE_LOCK(inp);
4012 create_lock_on = 1;
4013
4014 SCTP_INP_INCR_REF(inp);
4015 if ((inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_ALLGONE) ||
4016 (inp->sctp_flags & SCTP_PCB_FLAGS_SOCKET_GONE)) {
4017 /* Should I really unlock ? */
4018 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EFAULT);
4019 error = EFAULT;
4020 goto out_now;
4021 }
4022 #ifdef INET6
4023 if (((inp->sctp_flags & SCTP_PCB_FLAGS_BOUND_V6) == 0) &&
4024 (addr->sa_family == AF_INET6)) {
4025 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
4026 error = EINVAL;
4027 goto out_now;
4028 }
4029 #endif /* INET6 */
4030 if ((inp->sctp_flags & SCTP_PCB_FLAGS_UNBOUND) ==
4031 SCTP_PCB_FLAGS_UNBOUND) {
4032 /* Bind a ephemeral port */
4033 error = sctp_inpcb_bind(so, NULL, NULL, p);
4034 if (error) {
4035 goto out_now;
4036 }
4037 }
4038 /* Now do we connect? */
4039 if (inp->sctp_flags & SCTP_PCB_FLAGS_IN_TCPPOOL) {
4040 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
4041 error = EINVAL;
4042 goto out_now;
4043 }
4044 if ((inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) &&
4045 (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED)) {
4046 /* We are already connected AND the TCP model */
4047 SCTP_LTRACE_ERR_RET(inp, stcb, NULL, SCTP_FROM_SCTP_USRREQ, EADDRINUSE);
4048 error = EADDRINUSE;
4049 goto out_now;
4050 }
4051 if (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) {
4052 SCTP_INP_RLOCK(inp);
4053 stcb = LIST_FIRST(&inp->sctp_asoc_list);
4054 SCTP_INP_RUNLOCK(inp);
4055 } else {
4056 /*
4057 * We increment here since sctp_findassociation_ep_addr()
4058 * wil do a decrement if it finds the stcb as long as the
4059 * locked tcb (last argument) is NOT a TCB.. aka NULL.
4060 */
4061 SCTP_INP_INCR_REF(inp);
4062 stcb = sctp_findassociation_ep_addr(&inp, addr, NULL, NULL, NULL);
4063 if (stcb == NULL) {
4064 SCTP_INP_DECR_REF(inp);
4065 } else {
4066 SCTP_TCB_LOCK(stcb);
4067 }
4068 }
4069 if (stcb != NULL) {
4070 /* Already have or am bring up an association */
4071 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EALREADY);
4072 error = EALREADY;
4073 goto out_now;
4074 }
4075 vrf_id = inp->def_vrf_id;
4076 /* We are GOOD to go */
4077 stcb = sctp_aloc_assoc(inp, addr, 1, &error, 0, vrf_id, p);
4078 if (stcb == NULL) {
4079 /* Gak! no memory */
4080 goto out_now;
4081 }
4082 if (stcb->sctp_ep->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) {
4083 stcb->sctp_ep->sctp_flags |= SCTP_PCB_FLAGS_CONNECTED;
4084 /* Set the connected flag so we can queue data */
4085 soisconnecting(so);
4086 }
4087 SCTP_SET_STATE(&stcb->asoc, SCTP_STATE_COOKIE_WAIT);
4088 (void)SCTP_GETTIME_TIMEVAL(&stcb->asoc.time_entered);
4089
4090 /* initialize authentication parameters for the assoc */
4091 sctp_initialize_auth_params(inp, stcb);
4092
4093 sctp_send_initiate(inp, stcb, SCTP_SO_LOCKED);
4094 SCTP_TCB_UNLOCK(stcb);
4095 out_now:
4096 if (create_lock_on) {
4097 SCTP_ASOC_CREATE_UNLOCK(inp);
4098 }
4099 SCTP_INP_DECR_REF(inp);
4100 return error;
4101 }
4102
4103 int
4104 sctp_listen(struct socket *so, int backlog, struct thread *p)
4105 {
4106 /*
4107 * Note this module depends on the protocol processing being called
4108 * AFTER any socket level flags and backlog are applied to the
4109 * socket. The traditional way that the socket flags are applied is
4110 * AFTER protocol processing. We have made a change to the
4111 * sys/kern/uipc_socket.c module to reverse this but this MUST be in
4112 * place if the socket API for SCTP is to work properly.
4113 */
4114
4115 int error = 0;
4116 struct sctp_inpcb *inp;
4117
4118 inp = (struct sctp_inpcb *)so->so_pcb;
4119 if (inp == 0) {
4120 /* I made the same as TCP since we are not setup? */
4121 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
4122 return (ECONNRESET);
4123 }
4124 SCTP_INP_RLOCK(inp);
4125 #ifdef SCTP_LOCK_LOGGING
4126 if (sctp_logging_level & SCTP_LOCK_LOGGING_ENABLE) {
4127 sctp_log_lock(inp, (struct sctp_tcb *)NULL, SCTP_LOG_LOCK_SOCK);
4128 }
4129 #endif
4130 SOCK_LOCK(so);
4131 error = solisten_proto_check(so);
4132 if (error) {
4133 SOCK_UNLOCK(so);
4134 SCTP_INP_RUNLOCK(inp);
4135 return (error);
4136 }
4137 if ((inp->sctp_flags & SCTP_PCB_FLAGS_TCPTYPE) &&
4138 (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED)) {
4139 /* We are already connected AND the TCP model */
4140 SCTP_INP_RUNLOCK(inp);
4141 SOCK_UNLOCK(so);
4142 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EADDRINUSE);
4143 return (EADDRINUSE);
4144 }
4145 if (inp->sctp_flags & SCTP_PCB_FLAGS_UNBOUND) {
4146 /* We must do a bind. */
4147 SOCK_UNLOCK(so);
4148 SCTP_INP_RUNLOCK(inp);
4149 if ((error = sctp_inpcb_bind(so, NULL, NULL, p))) {
4150 /* bind error, probably perm */
4151 return (error);
4152 }
4153 SOCK_LOCK(so);
4154 } else {
4155 if (backlog != 0) {
4156 inp->sctp_flags |= SCTP_PCB_FLAGS_LISTENING;
4157 } else {
4158 inp->sctp_flags &= ~SCTP_PCB_FLAGS_LISTENING;
4159 }
4160 SCTP_INP_RUNLOCK(inp);
4161 }
4162 /* It appears for 7.0 and on, we must always call this. */
4163 solisten_proto(so, backlog);
4164 if (inp->sctp_flags & SCTP_PCB_FLAGS_UDPTYPE) {
4165 /* remove the ACCEPTCONN flag for one-to-many sockets */
4166 so->so_options &= ~SO_ACCEPTCONN;
4167 }
4168 if (backlog == 0) {
4169 /* turning off listen */
4170 so->so_options &= ~SO_ACCEPTCONN;
4171 }
4172 SOCK_UNLOCK(so);
4173 return (error);
4174 }
4175
4176 static int sctp_defered_wakeup_cnt = 0;
4177
4178 int
4179 sctp_accept(struct socket *so, struct sockaddr **addr)
4180 {
4181 struct sctp_tcb *stcb;
4182 struct sctp_inpcb *inp;
4183 union sctp_sockstore store;
4184
4185 int error;
4186
4187 inp = (struct sctp_inpcb *)so->so_pcb;
4188
4189 if (inp == 0) {
4190 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
4191 return (ECONNRESET);
4192 }
4193 SCTP_INP_RLOCK(inp);
4194 if (inp->sctp_flags & SCTP_PCB_FLAGS_UDPTYPE) {
4195 SCTP_INP_RUNLOCK(inp);
4196 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EOPNOTSUPP);
4197 return (EOPNOTSUPP);
4198 }
4199 if (so->so_state & SS_ISDISCONNECTED) {
4200 SCTP_INP_RUNLOCK(inp);
4201 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ECONNABORTED);
4202 return (ECONNABORTED);
4203 }
4204 stcb = LIST_FIRST(&inp->sctp_asoc_list);
4205 if (stcb == NULL) {
4206 SCTP_INP_RUNLOCK(inp);
4207 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
4208 return (ECONNRESET);
4209 }
4210 SCTP_TCB_LOCK(stcb);
4211 SCTP_INP_RUNLOCK(inp);
4212 store = stcb->asoc.primary_destination->ro._l_addr;
4213 SCTP_TCB_UNLOCK(stcb);
4214 if (store.sa.sa_family == AF_INET) {
4215 struct sockaddr_in *sin;
4216
4217 SCTP_MALLOC_SONAME(sin, struct sockaddr_in *, sizeof *sin);
4218 sin->sin_family = AF_INET;
4219 sin->sin_len = sizeof(*sin);
4220 sin->sin_port = ((struct sockaddr_in *)&store)->sin_port;
4221 sin->sin_addr = ((struct sockaddr_in *)&store)->sin_addr;
4222 *addr = (struct sockaddr *)sin;
4223 } else {
4224 struct sockaddr_in6 *sin6;
4225
4226 SCTP_MALLOC_SONAME(sin6, struct sockaddr_in6 *, sizeof *sin6);
4227 sin6->sin6_family = AF_INET6;
4228 sin6->sin6_len = sizeof(*sin6);
4229 sin6->sin6_port = ((struct sockaddr_in6 *)&store)->sin6_port;
4230
4231 sin6->sin6_addr = ((struct sockaddr_in6 *)&store)->sin6_addr;
4232 if ((error = sa6_recoverscope(sin6)) != 0) {
4233 SCTP_FREE_SONAME(sin6);
4234 return (error);
4235 }
4236 *addr = (struct sockaddr *)sin6;
4237 }
4238 /* Wake any delayed sleep action */
4239 if (inp->sctp_flags & SCTP_PCB_FLAGS_DONT_WAKE) {
4240 SCTP_INP_WLOCK(inp);
4241 inp->sctp_flags &= ~SCTP_PCB_FLAGS_DONT_WAKE;
4242 if (inp->sctp_flags & SCTP_PCB_FLAGS_WAKEOUTPUT) {
4243 inp->sctp_flags &= ~SCTP_PCB_FLAGS_WAKEOUTPUT;
4244 SCTP_INP_WUNLOCK(inp);
4245 SOCKBUF_LOCK(&inp->sctp_socket->so_snd);
4246 if (sowriteable(inp->sctp_socket)) {
4247 sowwakeup_locked(inp->sctp_socket);
4248 } else {
4249 SOCKBUF_UNLOCK(&inp->sctp_socket->so_snd);
4250 }
4251 SCTP_INP_WLOCK(inp);
4252 }
4253 if (inp->sctp_flags & SCTP_PCB_FLAGS_WAKEINPUT) {
4254 inp->sctp_flags &= ~SCTP_PCB_FLAGS_WAKEINPUT;
4255 SCTP_INP_WUNLOCK(inp);
4256 SOCKBUF_LOCK(&inp->sctp_socket->so_rcv);
4257 if (soreadable(inp->sctp_socket)) {
4258 sctp_defered_wakeup_cnt++;
4259 sorwakeup_locked(inp->sctp_socket);
4260 } else {
4261 SOCKBUF_UNLOCK(&inp->sctp_socket->so_rcv);
4262 }
4263 SCTP_INP_WLOCK(inp);
4264 }
4265 SCTP_INP_WUNLOCK(inp);
4266 }
4267 return (0);
4268 }
4269
4270 int
4271 sctp_ingetaddr(struct socket *so, struct sockaddr **addr)
4272 {
4273 struct sockaddr_in *sin;
4274 uint32_t vrf_id;
4275 struct sctp_inpcb *inp;
4276 struct sctp_ifa *sctp_ifa;
4277
4278 /*
4279 * Do the malloc first in case it blocks.
4280 */
4281 SCTP_MALLOC_SONAME(sin, struct sockaddr_in *, sizeof *sin);
4282 sin->sin_family = AF_INET;
4283 sin->sin_len = sizeof(*sin);
4284 inp = (struct sctp_inpcb *)so->so_pcb;
4285 if (!inp) {
4286 SCTP_FREE_SONAME(sin);
4287 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
4288 return ECONNRESET;
4289 }
4290 SCTP_INP_RLOCK(inp);
4291 sin->sin_port = inp->sctp_lport;
4292 if (inp->sctp_flags & SCTP_PCB_FLAGS_BOUNDALL) {
4293 if (inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) {
4294 struct sctp_tcb *stcb;
4295 struct sockaddr_in *sin_a;
4296 struct sctp_nets *net;
4297 int fnd;
4298
4299 stcb = LIST_FIRST(&inp->sctp_asoc_list);
4300 if (stcb == NULL) {
4301 goto notConn;
4302 }
4303 fnd = 0;
4304 sin_a = NULL;
4305 SCTP_TCB_LOCK(stcb);
4306 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) {
4307 sin_a = (struct sockaddr_in *)&net->ro._l_addr;
4308 if (sin_a == NULL)
4309 /* this will make coverity happy */
4310 continue;
4311
4312 if (sin_a->sin_family == AF_INET) {
4313 fnd = 1;
4314 break;
4315 }
4316 }
4317 if ((!fnd) || (sin_a == NULL)) {
4318 /* punt */
4319 SCTP_TCB_UNLOCK(stcb);
4320 goto notConn;
4321 }
4322 vrf_id = inp->def_vrf_id;
4323 sctp_ifa = sctp_source_address_selection(inp,
4324 stcb,
4325 (sctp_route_t *) & net->ro,
4326 net, 0, vrf_id);
4327 if (sctp_ifa) {
4328 sin->sin_addr = sctp_ifa->address.sin.sin_addr;
4329 sctp_free_ifa(sctp_ifa);
4330 }
4331 SCTP_TCB_UNLOCK(stcb);
4332 } else {
4333 /* For the bound all case you get back 0 */
4334 notConn:
4335 sin->sin_addr.s_addr = 0;
4336 }
4337
4338 } else {
4339 /* Take the first IPv4 address in the list */
4340 struct sctp_laddr *laddr;
4341 int fnd = 0;
4342
4343 LIST_FOREACH(laddr, &inp->sctp_addr_list, sctp_nxt_addr) {
4344 if (laddr->ifa->address.sa.sa_family == AF_INET) {
4345 struct sockaddr_in *sin_a;
4346
4347 sin_a = (struct sockaddr_in *)&laddr->ifa->address.sa;
4348 sin->sin_addr = sin_a->sin_addr;
4349 fnd = 1;
4350 break;
4351 }
4352 }
4353 if (!fnd) {
4354 SCTP_FREE_SONAME(sin);
4355 SCTP_INP_RUNLOCK(inp);
4356 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOENT);
4357 return ENOENT;
4358 }
4359 }
4360 SCTP_INP_RUNLOCK(inp);
4361 (*addr) = (struct sockaddr *)sin;
4362 return (0);
4363 }
4364
4365 int
4366 sctp_peeraddr(struct socket *so, struct sockaddr **addr)
4367 {
4368 struct sockaddr_in *sin = (struct sockaddr_in *)*addr;
4369 int fnd;
4370 struct sockaddr_in *sin_a;
4371 struct sctp_inpcb *inp;
4372 struct sctp_tcb *stcb;
4373 struct sctp_nets *net;
4374
4375 /* Do the malloc first in case it blocks. */
4376 inp = (struct sctp_inpcb *)so->so_pcb;
4377 if ((inp == NULL) ||
4378 ((inp->sctp_flags & SCTP_PCB_FLAGS_CONNECTED) == 0)) {
4379 /* UDP type and listeners will drop out here */
4380 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOTCONN);
4381 return (ENOTCONN);
4382 }
4383 SCTP_MALLOC_SONAME(sin, struct sockaddr_in *, sizeof *sin);
4384 sin->sin_family = AF_INET;
4385 sin->sin_len = sizeof(*sin);
4386
4387 /* We must recapture incase we blocked */
4388 inp = (struct sctp_inpcb *)so->so_pcb;
4389 if (!inp) {
4390 SCTP_FREE_SONAME(sin);
4391 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
4392 return ECONNRESET;
4393 }
4394 SCTP_INP_RLOCK(inp);
4395 stcb = LIST_FIRST(&inp->sctp_asoc_list);
4396 if (stcb) {
4397 SCTP_TCB_LOCK(stcb);
4398 }
4399 SCTP_INP_RUNLOCK(inp);
4400 if (stcb == NULL) {
4401 SCTP_FREE_SONAME(sin);
4402 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, EINVAL);
4403 return ECONNRESET;
4404 }
4405 fnd = 0;
4406 TAILQ_FOREACH(net, &stcb->asoc.nets, sctp_next) {
4407 sin_a = (struct sockaddr_in *)&net->ro._l_addr;
4408 if (sin_a->sin_family == AF_INET) {
4409 fnd = 1;
4410 sin->sin_port = stcb->rport;
4411 sin->sin_addr = sin_a->sin_addr;
4412 break;
4413 }
4414 }
4415 SCTP_TCB_UNLOCK(stcb);
4416 if (!fnd) {
4417 /* No IPv4 address */
4418 SCTP_FREE_SONAME(sin);
4419 SCTP_LTRACE_ERR_RET(inp, NULL, NULL, SCTP_FROM_SCTP_USRREQ, ENOENT);
4420 return ENOENT;
4421 }
4422 (*addr) = (struct sockaddr *)sin;
4423 return (0);
4424 }
4425
4426 struct pr_usrreqs sctp_usrreqs = {
4427 .pru_abort = sctp_abort,
4428 .pru_accept = sctp_accept,
4429 .pru_attach = sctp_attach,
4430 .pru_bind = sctp_bind,
4431 .pru_connect = sctp_connect,
4432 .pru_control = in_control,
4433 .pru_close = sctp_close,
4434 .pru_detach = sctp_close,
4435 .pru_sopoll = sopoll_generic,
4436 .pru_disconnect = sctp_disconnect,
4437 .pru_listen = sctp_listen,
4438 .pru_peeraddr = sctp_peeraddr,
4439 .pru_send = sctp_sendm,
4440 .pru_shutdown = sctp_shutdown,
4441 .pru_sockaddr = sctp_ingetaddr,
4442 .pru_sosend = sctp_sosend,
4443 .pru_soreceive = sctp_soreceive
4444 };
Cache object: df0e50fd5361d1f6b0036a4c1fa645b7
|