1 /* SCTP kernel Implementation
2 * (C) Copyright IBM Corp. 2001, 2003
3 * Copyright (c) 1999-2000 Cisco, Inc.
4 * Copyright (c) 1999-2001 Motorola, Inc.
5 * Copyright (c) 2001 Intel Corp.
6 * Copyright (c) 2001 Nokia, Inc.
7 *
8 * The SCTP implementation is free software;
9 * you can redistribute it and/or modify it under the terms of
10 * the GNU General Public License as published by
11 * the Free Software Foundation; either version 2, or (at your option)
12 * any later version.
13 *
14 * The SCTP implementation is distributed in the hope that it
15 * will be useful, but WITHOUT ANY WARRANTY; without even the implied
16 * ************************
17 * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
18 * See the GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with GNU CC; see the file COPYING. If not, write to
22 * the Free Software Foundation, 59 Temple Place - Suite 330,
23 * Boston, MA 02111-1307, USA.
24 *
25 * Please send any bug reports or fixes you make to the
26 * email address(es):
27 * lksctp developers <lksctp-developers@lists.sourceforge.net>
28 *
29 * Or submit a bug report through the following website:
30 * http://www.sf.net/projects/lksctp
31 *
32 * Any bugs reported to us we will try to fix... any fixes shared will
33 * be incorporated into the next SCTP release.
34 *
35 * Written or modified by:
36 * La Monte H.P. Yarroll <piggy@acm.org>
37 * Karl Knutson <karl@athena.chicago.il.us>
38 * Hui Huang <hui.huang@nokia.com>
39 * Jon Grimm <jgrimm@us.ibm.com>
40 * Sridhar Samudrala <samudrala@us.ibm.com>
41 */
42
43 /* This is a basic functional test for the SCTP kernel
44 * implementation state machine.
45 */
46
47 #include <stdio.h>
48 #include <unistd.h>
49 #include <stdlib.h>
50 #include <string.h>
51 #include <sys/types.h>
52 #include <sys/socket.h>
53 #include <sys/uio.h>
54 #include <netinet/in.h>
55 #include <sys/errno.h>
56 #include <errno.h>
57 #include <netinet/sctp.h>
58 #include <sctputil.h>
59 #include "tst_kernel.h"
60
61 char *TCID = __FILE__;
62 int TST_TOTAL = 15;
63 int TST_CNT = 0;
64
main(void)65 int main(void)
66 {
67 int sk1, sk2;
68 sockaddr_storage_t loop1;
69 sockaddr_storage_t loop2;
70 sockaddr_storage_t msgname;
71 struct iovec iov;
72 struct msghdr inmessage;
73 struct msghdr outmessage;
74 char incmsg[CMSG_SPACE(sizeof(sctp_cmsg_data_t))];
75 char outcmsg[CMSG_SPACE(sizeof(struct sctp_sndrcvinfo))];
76 struct cmsghdr *cmsg;
77 struct sctp_sndrcvinfo *sinfo;
78 struct iovec out_iov;
79 char *message = "hello, world!\n";
80 char *telephone = "Watson, come here! I need you!\n";
81 char *telephone_resp = "I already brought your coffee...\n";
82 int error, bytes_sent;
83 int pf_class;
84 uint32_t ppid;
85 uint32_t stream;
86 sctp_assoc_t associd1, associd2;
87 struct sctp_assoc_change *sac;
88 char *big_buffer;
89 struct sockaddr *laddrs, *paddrs;
90 int n_laddrs, n_paddrs, i;
91 struct sockaddr *sa_addr;
92 struct sockaddr_in *in_addr;
93 struct sockaddr_in6 *in6_addr;
94 void *addr_buf;
95
96 if (tst_check_driver("sctp"))
97 tst_brkm(TCONF, tst_exit, "sctp driver not available");
98
99 /* Rather than fflush() throughout the code, set stdout to
100 * be unbuffered.
101 */
102 setvbuf(stdout, NULL, _IONBF, 0);
103
104 /* Set some basic values which depend on the address family. */
105 #if TEST_V6
106 pf_class = PF_INET6;
107
108 loop1.v6.sin6_family = AF_INET6;
109 loop1.v6.sin6_addr = (struct in6_addr)SCTP_IN6ADDR_ANY_INIT;
110 loop1.v6.sin6_port = htons(SCTP_TESTPORT_1);
111
112 loop2.v6.sin6_family = AF_INET6;
113 loop2.v6.sin6_addr = in6addr_loopback;
114 loop2.v6.sin6_port = htons(SCTP_TESTPORT_2);
115 #else
116 pf_class = PF_INET;
117
118 loop1.v4.sin_family = AF_INET;
119 loop1.v4.sin_addr.s_addr = INADDR_ANY;
120 loop1.v4.sin_port = htons(SCTP_TESTPORT_1);
121
122 loop2.v4.sin_family = AF_INET;
123 loop2.v4.sin_addr.s_addr = SCTP_IP_LOOPBACK;
124 loop2.v4.sin_port = htons(SCTP_TESTPORT_2);
125 #endif /* TEST_V6 */
126
127 /* Create the two endpoints which will talk to each other. */
128 sk1 = test_socket(pf_class, SOCK_SEQPACKET, IPPROTO_SCTP);
129 sk2 = test_socket(pf_class, SOCK_SEQPACKET, IPPROTO_SCTP);
130
131 tst_resm(TPASS, "socket");
132
133 /* Bind these sockets to the test ports. */
134 test_bind(sk1, &loop1.sa, sizeof(loop1));
135 test_bind(sk2, &loop2.sa, sizeof(loop2));
136
137 tst_resm(TPASS, "bind");
138
139 /* Enable ASSOC_CHANGE and SNDRCVINFO notifications. */
140 test_enable_assoc_change(sk1);
141 test_enable_assoc_change(sk2);
142
143 /* Initialize inmessage for all receives. */
144 big_buffer = test_malloc(REALLY_BIG);
145 memset(&inmessage, 0, sizeof(inmessage));
146 iov.iov_base = big_buffer;
147 iov.iov_len = REALLY_BIG;
148 inmessage.msg_iov = &iov;
149 inmessage.msg_iovlen = 1;
150 inmessage.msg_control = incmsg;
151 inmessage.msg_name = &msgname;
152
153 /* Try to read on socket 2. This should fail since we are
154 * neither listening, nor established.
155 */
156 inmessage.msg_controllen = sizeof(incmsg);
157 error = recvmsg(sk2, &inmessage, MSG_WAITALL);
158 if (error > 0)
159 tst_brkm(TBROK, tst_exit, "recvmsg on a socket neither "
160 "listening nor established error: %d", error);
161
162 tst_resm(TPASS, "recvmsg on a socket neither listening nor "
163 "established");
164
165 /* Mark sk2 as being able to accept new associations. */
166 error = test_listen(sk2, 1);
167
168 tst_resm(TPASS, "listen");
169
170 /* Send the first message. This will create the association. */
171 outmessage.msg_name = &loop2;
172 outmessage.msg_namelen = sizeof(loop2);
173 outmessage.msg_iov = &out_iov;
174 outmessage.msg_iovlen = 1;
175 outmessage.msg_control = outcmsg;
176 outmessage.msg_controllen = sizeof(outcmsg);
177 outmessage.msg_flags = 0;
178 cmsg = CMSG_FIRSTHDR(&outmessage);
179 cmsg->cmsg_level = IPPROTO_SCTP;
180 cmsg->cmsg_type = SCTP_SNDRCV;
181 cmsg->cmsg_len = CMSG_LEN(sizeof(struct sctp_sndrcvinfo));
182 outmessage.msg_controllen = cmsg->cmsg_len;
183 sinfo = (struct sctp_sndrcvinfo *)CMSG_DATA(cmsg);
184 memset(sinfo, 0x00, sizeof(struct sctp_sndrcvinfo));
185 ppid = rand(); /* Choose an arbitrary value. */
186 stream = 1;
187 sinfo->sinfo_ppid = ppid;
188 sinfo->sinfo_stream = stream;
189 outmessage.msg_iov->iov_base = message;
190 outmessage.msg_iov->iov_len = strlen(message) + 1;
191 test_sendmsg(sk1, &outmessage, 0, strlen(message)+1);
192
193 tst_resm(TPASS, "sendmsg with a valid msg_name");
194
195 /* Get the communication up message on sk2. */
196 inmessage.msg_controllen = sizeof(incmsg);
197 inmessage.msg_namelen = sizeof(msgname);
198 error = test_recvmsg(sk2, &inmessage, MSG_WAITALL);
199 test_check_msg_notification(&inmessage, error,
200 sizeof(struct sctp_assoc_change),
201 SCTP_ASSOC_CHANGE, SCTP_COMM_UP);
202 #if TEST_V6
203
204 if (inmessage.msg_namelen != sizeof(struct sockaddr_in6)) {
205 DUMP_CORE;
206 }
207 if (msgname.v6.sin6_port != htons(SCTP_TESTPORT_1)) {
208 DUMP_CORE;
209 }
210
211 if (msgname.v6.sin6_family != AF_INET6) {
212 DUMP_CORE;
213 }
214
215 if (memcmp(&msgname.v6.sin6_addr, &in6addr_loopback,
216 sizeof(msgname.v6.sin6_addr))) {
217 DUMP_CORE;
218 }
219 #else
220 if (inmessage.msg_namelen != sizeof(struct sockaddr_in)) {
221 DUMP_CORE;
222 }
223 if (msgname.v4.sin_port != htons(SCTP_TESTPORT_1)) {
224 DUMP_CORE;
225 }
226
227 if (msgname.v4.sin_family != AF_INET) {
228 DUMP_CORE;
229 }
230 if (msgname.v4.sin_addr.s_addr != SCTP_IP_LOOPBACK) {
231 DUMP_CORE;
232 }
233 #endif
234 sac = (struct sctp_assoc_change *)iov.iov_base;
235 associd2 = sac->sac_assoc_id;
236
237 /* Get the communication up message on sk1. */
238 iov.iov_base = big_buffer;
239 iov.iov_len = REALLY_BIG;
240 inmessage.msg_control = incmsg;
241 inmessage.msg_controllen = sizeof(incmsg);
242 error = test_recvmsg(sk1, &inmessage, MSG_WAITALL);
243 test_check_msg_notification(&inmessage, error,
244 sizeof(struct sctp_assoc_change),
245 SCTP_ASSOC_CHANGE, SCTP_COMM_UP);
246 sac = (struct sctp_assoc_change *)iov.iov_base;
247 associd1 = sac->sac_assoc_id;
248
249 tst_resm(TPASS, "recvmsg COMM_UP notifications");
250
251 /* Get the first message which was sent. */
252 inmessage.msg_controllen = sizeof(incmsg);
253 inmessage.msg_namelen = sizeof(msgname);
254 memset(&msgname, 0, sizeof(msgname));
255 error = test_recvmsg(sk2, &inmessage, MSG_WAITALL);
256 test_check_msg_data(&inmessage, error, strlen(message) + 1,
257 MSG_EOR, stream, ppid);
258 #if TEST_V6
259
260 if (inmessage.msg_namelen != sizeof(struct sockaddr_in6)) {
261 DUMP_CORE;
262 }
263 if (msgname.v6.sin6_port != htons(SCTP_TESTPORT_1)) {
264 DUMP_CORE;
265 }
266
267 if (msgname.v6.sin6_family != AF_INET6) {
268 DUMP_CORE;
269 }
270
271 if (memcmp(&msgname.v6.sin6_addr, &in6addr_loopback,
272 sizeof(msgname.v6.sin6_addr))) {
273 DUMP_CORE;
274 }
275 #else
276 if (inmessage.msg_namelen != sizeof(struct sockaddr_in)) {
277 DUMP_CORE;
278 }
279 if (msgname.v4.sin_port != htons(SCTP_TESTPORT_1)) {
280 DUMP_CORE;
281 }
282 if (msgname.v4.sin_family != AF_INET) {
283 DUMP_CORE;
284 }
285 if (msgname.v4.sin_addr.s_addr != SCTP_IP_LOOPBACK) {
286 DUMP_CORE;
287 }
288 #endif
289
290 /* Try to send a message with NULL msg_name and associd, should fail */
291 outmessage.msg_controllen = sizeof(outcmsg);
292 outmessage.msg_flags = 0;
293 cmsg = CMSG_FIRSTHDR(&outmessage);
294 cmsg->cmsg_level = IPPROTO_SCTP;
295 cmsg->cmsg_type = SCTP_SNDRCV;
296 cmsg->cmsg_len = CMSG_LEN(sizeof(struct sctp_sndrcvinfo));
297 outmessage.msg_controllen = cmsg->cmsg_len;
298 sinfo = (struct sctp_sndrcvinfo *)CMSG_DATA(cmsg);
299 memset(sinfo, 0x00, sizeof(struct sctp_sndrcvinfo));
300 ppid++;
301 stream++;
302 sinfo->sinfo_ppid = ppid;
303 sinfo->sinfo_stream = stream;
304 outmessage.msg_iov->iov_base = telephone;
305 outmessage.msg_iov->iov_len = strlen(telephone) + 1;
306 outmessage.msg_name = NULL;
307 outmessage.msg_namelen = 0;
308 bytes_sent = sendmsg(sk1, &outmessage, MSG_NOSIGNAL);
309 if ((bytes_sent > 0) || (EPIPE != errno))
310 tst_brkm(TBROK, tst_exit, "sendmsg with NULL associd and "
311 "NULL msg_name error:%d errno:%d", error, errno);
312
313 tst_resm(TPASS, "sendmsg with NULL associd and NULL msg_name");
314
315 /* Fill in a incorrect assoc_id, which should cause an error. */
316 sinfo->sinfo_assoc_id = associd2;
317 bytes_sent = sendmsg(sk1, &outmessage, MSG_NOSIGNAL);
318 if ((bytes_sent > 0) || (EPIPE != errno))
319 tst_brkm(TBROK, tst_exit, "sendmsg with incorrect associd "
320 "error:%d errno:%d", error, errno);
321
322 tst_resm(TPASS, "sendmsg with incorrect associd");
323
324 /* Fill in a correct assoc_id and get back to the normal testing. */
325 sinfo->sinfo_assoc_id = associd1;
326 /* Send two more messages, to cause a second SACK. */
327 test_sendmsg(sk1, &outmessage, 0, strlen(telephone)+1);
328
329 outmessage.msg_name = &loop2;
330 outmessage.msg_namelen = sizeof(loop2);
331 outmessage.msg_iov->iov_base = telephone_resp;
332 outmessage.msg_iov->iov_len = strlen(telephone_resp) + 1;
333 test_sendmsg(sk1, &outmessage, 0, strlen(telephone_resp)+1);
334
335 tst_resm(TPASS, "sendmsg with valid associd");
336
337 /* Get those two messages. */
338 inmessage.msg_controllen = sizeof(incmsg);
339 error = test_recvmsg(sk2, &inmessage, MSG_WAITALL);
340 test_check_msg_data(&inmessage, error, strlen(telephone) + 1,
341 MSG_EOR, stream, ppid);
342
343 inmessage.msg_controllen = sizeof(incmsg);
344 error = test_recvmsg(sk2, &inmessage, MSG_WAITALL);
345 test_check_msg_data(&inmessage, error, strlen(telephone_resp) + 1,
346 MSG_EOR, stream, ppid);
347
348 tst_resm(TPASS, "recvmsg");
349
350 n_laddrs = sctp_getladdrs(sk1, associd1, &laddrs);
351 if (n_laddrs <= 0)
352 tst_brkm(TBROK, tst_exit, "sctp_getladdrs: %s",
353 strerror(errno));
354
355 tst_resm(TPASS, "sctp_getladdrs");
356
357 addr_buf = (void *)laddrs;
358 for (i = 0; i < n_laddrs; i++) {
359 sa_addr = (struct sockaddr *)addr_buf;
360 if (AF_INET == sa_addr->sa_family) {
361 in_addr = (struct sockaddr_in *)sa_addr;
362 tst_resm(TINFO, "LOCAL ADDR %d.%d.%d.%d PORT %d",
363 NIPQUAD(in_addr->sin_addr),
364 ntohs(in_addr->sin_port));
365 addr_buf += sizeof(struct sockaddr_in);
366 } else {
367 in6_addr = (struct sockaddr_in6 *)sa_addr;
368 tst_resm(TINFO,
369 "LOCAL ADDR %04x:%04x:%04x:%04x:%04x:%04x:%04x:%04x PORT %d",
370 NIP6(in6_addr->sin6_addr),
371 ntohs(in6_addr->sin6_port));
372 addr_buf += sizeof(struct sockaddr_in6);
373 }
374 }
375
376 sctp_freeladdrs(laddrs);
377
378 tst_resm(TPASS, "sctp_freeladdrs");
379
380 n_paddrs = sctp_getpaddrs(sk1, associd1, &paddrs);
381 if (n_paddrs <= 0)
382 tst_brkm(TBROK, tst_exit, "sctp_getpaddrs: %s",
383 strerror(errno));
384
385 tst_resm(TPASS, "sctp_getpaddrs");
386
387 addr_buf = (void *)paddrs;
388 for (i = 0; i < n_paddrs; i++) {
389 sa_addr = (struct sockaddr *)addr_buf;
390 if (AF_INET == sa_addr->sa_family) {
391 in_addr = (struct sockaddr_in *)sa_addr;
392 tst_resm(TINFO, "PEER ADDR %d.%d.%d.%d PORT %d",
393 NIPQUAD(in_addr->sin_addr),
394 ntohs(in_addr->sin_port));
395 addr_buf += sizeof(struct sockaddr_in);
396 } else {
397 in6_addr = (struct sockaddr_in6 *)sa_addr;
398 tst_resm(TINFO,
399 "PEER ADDR %04x:%04x:%04x:%04x:%04x:%04x:%04x:%04x PORT %d",
400 NIP6(in6_addr->sin6_addr),
401 ntohs(in6_addr->sin6_port));
402 addr_buf += sizeof(struct sockaddr_in6);
403 }
404 }
405
406 sctp_freepaddrs(paddrs);
407
408 tst_resm(TPASS, "sctp_freepaddrs");
409
410 /* Shut down the link. */
411 close(sk1);
412
413 /* Get the shutdown complete notification. */
414 inmessage.msg_controllen = sizeof(incmsg);
415 inmessage.msg_namelen = sizeof(msgname);
416 memset(&msgname, 0, sizeof(msgname));
417 error = test_recvmsg(sk2, &inmessage, MSG_WAITALL);
418 test_check_msg_notification(&inmessage, error,
419 sizeof(struct sctp_assoc_change),
420 SCTP_ASSOC_CHANGE, SCTP_SHUTDOWN_COMP);
421 #if TEST_V6
422
423 if (inmessage.msg_namelen != sizeof(struct sockaddr_in6)) {
424 DUMP_CORE;
425 }
426 if (msgname.v6.sin6_port != htons(SCTP_TESTPORT_1)) {
427 DUMP_CORE;
428 }
429
430 if (msgname.v6.sin6_family != AF_INET6) {
431 DUMP_CORE;
432 }
433
434 if (memcmp(&msgname.v6.sin6_addr, &in6addr_loopback,
435 sizeof(msgname.v6.sin6_addr))) {
436 DUMP_CORE;
437 }
438 #else
439 if (inmessage.msg_namelen != sizeof(struct sockaddr_in)) {
440 DUMP_CORE;
441 }
442 if (msgname.v4.sin_port != htons(SCTP_TESTPORT_1)) {
443 DUMP_CORE;
444 }
445
446 if (msgname.v4.sin_family != AF_INET) {
447 DUMP_CORE;
448 }
449 if (msgname.v4.sin_addr.s_addr != SCTP_IP_LOOPBACK) {
450 DUMP_CORE;
451 }
452 #endif
453
454 tst_resm(TPASS, "recvmsg SHUTDOWN_COMP notification");
455
456 close(sk2);
457
458 /* Indicate successful completion. */
459 return 0;
460 }
461