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 (at) 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 (at) acm.org> 37 * Karl Knutson <karl (at) athena.chicago.il.us> 38 * Hui Huang <hui.huang (at) nokia.com> 39 * Jon Grimm <jgrimm (at) us.ibm.com> 40 * Sridhar Samudrala <samudrala (at) 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 60 char *TCID = __FILE__; 61 int TST_TOTAL = 15; 62 int TST_CNT = 0; 63 64 int main(void) 65 { 66 int sk1, sk2; 67 sockaddr_storage_t loop1; 68 sockaddr_storage_t loop2; 69 sockaddr_storage_t msgname; 70 struct iovec iov; 71 struct msghdr inmessage; 72 struct msghdr outmessage; 73 char incmsg[CMSG_SPACE(sizeof(sctp_cmsg_data_t))]; 74 char outcmsg[CMSG_SPACE(sizeof(struct sctp_sndrcvinfo))]; 75 struct cmsghdr *cmsg; 76 struct sctp_sndrcvinfo *sinfo; 77 struct iovec out_iov; 78 char *message = "hello, world!\n"; 79 char *telephone = "Watson, come here! I need you!\n"; 80 char *telephone_resp = "I already brought your coffee...\n"; 81 int error, bytes_sent; 82 int pf_class; 83 uint32_t ppid; 84 uint32_t stream; 85 sctp_assoc_t associd1, associd2; 86 struct sctp_assoc_change *sac; 87 char *big_buffer; 88 struct sockaddr *laddrs, *paddrs; 89 int n_laddrs, n_paddrs, i; 90 struct sockaddr *sa_addr; 91 struct sockaddr_in *in_addr; 92 struct sockaddr_in6 *in6_addr; 93 void *addr_buf; 94 95 /* Rather than fflush() throughout the code, set stdout to 96 * be unbuffered. 97 */ 98 setvbuf(stdout, NULL, _IONBF, 0); 99 100 /* Set some basic values which depend on the address family. */ 101 #if TEST_V6 102 pf_class = PF_INET6; 103 104 loop1.v6.sin6_family = AF_INET6; 105 loop1.v6.sin6_addr = (struct in6_addr)SCTP_IN6ADDR_ANY_INIT; 106 loop1.v6.sin6_port = htons(SCTP_TESTPORT_1); 107 108 loop2.v6.sin6_family = AF_INET6; 109 loop2.v6.sin6_addr = in6addr_loopback; 110 loop2.v6.sin6_port = htons(SCTP_TESTPORT_2); 111 #else 112 pf_class = PF_INET; 113 114 loop1.v4.sin_family = AF_INET; 115 loop1.v4.sin_addr.s_addr = INADDR_ANY; 116 loop1.v4.sin_port = htons(SCTP_TESTPORT_1); 117 118 loop2.v4.sin_family = AF_INET; 119 loop2.v4.sin_addr.s_addr = SCTP_IP_LOOPBACK; 120 loop2.v4.sin_port = htons(SCTP_TESTPORT_2); 121 #endif /* TEST_V6 */ 122 123 /* Create the two endpoints which will talk to each other. */ 124 sk1 = test_socket(pf_class, SOCK_SEQPACKET, IPPROTO_SCTP); 125 sk2 = test_socket(pf_class, SOCK_SEQPACKET, IPPROTO_SCTP); 126 127 tst_resm(TPASS, "socket"); 128 129 /* Bind these sockets to the test ports. */ 130 test_bind(sk1, &loop1.sa, sizeof(loop1)); 131 test_bind(sk2, &loop2.sa, sizeof(loop2)); 132 133 tst_resm(TPASS, "bind"); 134 135 /* Enable ASSOC_CHANGE and SNDRCVINFO notifications. */ 136 test_enable_assoc_change(sk1); 137 test_enable_assoc_change(sk2); 138 139 /* Initialize inmessage for all receives. */ 140 big_buffer = test_malloc(REALLY_BIG); 141 memset(&inmessage, 0, sizeof(inmessage)); 142 iov.iov_base = big_buffer; 143 iov.iov_len = REALLY_BIG; 144 inmessage.msg_iov = &iov; 145 inmessage.msg_iovlen = 1; 146 inmessage.msg_control = incmsg; 147 inmessage.msg_name = &msgname; 148 149 /* Try to read on socket 2. This should fail since we are 150 * neither listening, nor established. 151 */ 152 inmessage.msg_controllen = sizeof(incmsg); 153 error = recvmsg(sk2, &inmessage, MSG_WAITALL); 154 if (error > 0) 155 tst_brkm(TBROK, tst_exit, "recvmsg on a socket neither" 156 "listening nor established error: %d", error); 157 158 tst_resm(TPASS, "recvmsg on a socket neither listening nor " 159 "established"); 160 161 /* Mark sk2 as being able to accept new associations. */ 162 error = test_listen(sk2, 1); 163 164 tst_resm(TPASS, "listen"); 165 166 /* Send the first message. This will create the association. */ 167 outmessage.msg_name = &loop2; 168 outmessage.msg_namelen = sizeof(loop2); 169 outmessage.msg_iov = &out_iov; 170 outmessage.msg_iovlen = 1; 171 outmessage.msg_control = outcmsg; 172 outmessage.msg_controllen = sizeof(outcmsg); 173 outmessage.msg_flags = 0; 174 cmsg = CMSG_FIRSTHDR(&outmessage); 175 cmsg->cmsg_level = IPPROTO_SCTP; 176 cmsg->cmsg_type = SCTP_SNDRCV; 177 cmsg->cmsg_len = CMSG_LEN(sizeof(struct sctp_sndrcvinfo)); 178 outmessage.msg_controllen = cmsg->cmsg_len; 179 sinfo = (struct sctp_sndrcvinfo *)CMSG_DATA(cmsg); 180 memset(sinfo, 0x00, sizeof(struct sctp_sndrcvinfo)); 181 ppid = rand(); /* Choose an arbitrary value. */ 182 stream = 1; 183 sinfo->sinfo_ppid = ppid; 184 sinfo->sinfo_stream = stream; 185 outmessage.msg_iov->iov_base = message; 186 outmessage.msg_iov->iov_len = strlen(message) + 1; 187 test_sendmsg(sk1, &outmessage, 0, strlen(message)+1); 188 189 tst_resm(TPASS, "sendmsg with a valid msg_name"); 190 191 /* Get the communication up message on sk2. */ 192 inmessage.msg_controllen = sizeof(incmsg); 193 inmessage.msg_namelen = sizeof(msgname); 194 error = test_recvmsg(sk2, &inmessage, MSG_WAITALL); 195 test_check_msg_notification(&inmessage, error, 196 sizeof(struct sctp_assoc_change), 197 SCTP_ASSOC_CHANGE, SCTP_COMM_UP); 198 #if TEST_V6 199 200 if (inmessage.msg_namelen != sizeof(struct sockaddr_in6)) { 201 DUMP_CORE; 202 } 203 if (msgname.v6.sin6_port != htons(SCTP_TESTPORT_1)) { 204 DUMP_CORE; 205 } 206 207 if (msgname.v6.sin6_family != AF_INET6) { 208 DUMP_CORE; 209 } 210 211 if (memcmp(&msgname.v6.sin6_addr, &in6addr_loopback, 212 sizeof(msgname.v6.sin6_addr))) { 213 DUMP_CORE; 214 } 215 #else 216 if (inmessage.msg_namelen != sizeof(struct sockaddr_in)) { 217 DUMP_CORE; 218 } 219 if (msgname.v4.sin_port != htons(SCTP_TESTPORT_1)) { 220 DUMP_CORE; 221 } 222 223 if (msgname.v4.sin_family != AF_INET) { 224 DUMP_CORE; 225 } 226 if (msgname.v4.sin_addr.s_addr != SCTP_IP_LOOPBACK) { 227 DUMP_CORE; 228 } 229 #endif 230 sac = (struct sctp_assoc_change *)iov.iov_base; 231 associd2 = sac->sac_assoc_id; 232 233 /* Get the communication up message on sk1. */ 234 iov.iov_base = big_buffer; 235 iov.iov_len = REALLY_BIG; 236 inmessage.msg_control = incmsg; 237 inmessage.msg_controllen = sizeof(incmsg); 238 error = test_recvmsg(sk1, &inmessage, MSG_WAITALL); 239 test_check_msg_notification(&inmessage, error, 240 sizeof(struct sctp_assoc_change), 241 SCTP_ASSOC_CHANGE, SCTP_COMM_UP); 242 sac = (struct sctp_assoc_change *)iov.iov_base; 243 associd1 = sac->sac_assoc_id; 244 245 tst_resm(TPASS, "recvmsg COMM_UP notifications"); 246 247 /* Get the first message which was sent. */ 248 inmessage.msg_controllen = sizeof(incmsg); 249 inmessage.msg_namelen = sizeof(msgname); 250 memset(&msgname, 0, sizeof(msgname)); 251 error = test_recvmsg(sk2, &inmessage, MSG_WAITALL); 252 test_check_msg_data(&inmessage, error, strlen(message) + 1, 253 MSG_EOR, stream, ppid); 254 #if TEST_V6 255 256 if (inmessage.msg_namelen != sizeof(struct sockaddr_in6)) { 257 DUMP_CORE; 258 } 259 if (msgname.v6.sin6_port != htons(SCTP_TESTPORT_1)) { 260 DUMP_CORE; 261 } 262 263 if (msgname.v6.sin6_family != AF_INET6) { 264 DUMP_CORE; 265 } 266 267 if (memcmp(&msgname.v6.sin6_addr, &in6addr_loopback, 268 sizeof(msgname.v6.sin6_addr))) { 269 DUMP_CORE; 270 } 271 #else 272 if (inmessage.msg_namelen != sizeof(struct sockaddr_in)) { 273 DUMP_CORE; 274 } 275 if (msgname.v4.sin_port != htons(SCTP_TESTPORT_1)) { 276 DUMP_CORE; 277 } 278 if (msgname.v4.sin_family != AF_INET) { 279 DUMP_CORE; 280 } 281 if (msgname.v4.sin_addr.s_addr != SCTP_IP_LOOPBACK) { 282 DUMP_CORE; 283 } 284 #endif 285 286 /* Try to send a message with NULL msg_name and associd, should fail */ 287 outmessage.msg_controllen = sizeof(outcmsg); 288 outmessage.msg_flags = 0; 289 cmsg = CMSG_FIRSTHDR(&outmessage); 290 cmsg->cmsg_level = IPPROTO_SCTP; 291 cmsg->cmsg_type = SCTP_SNDRCV; 292 cmsg->cmsg_len = CMSG_LEN(sizeof(struct sctp_sndrcvinfo)); 293 outmessage.msg_controllen = cmsg->cmsg_len; 294 sinfo = (struct sctp_sndrcvinfo *)CMSG_DATA(cmsg); 295 memset(sinfo, 0x00, sizeof(struct sctp_sndrcvinfo)); 296 ppid++; 297 stream++; 298 sinfo->sinfo_ppid = ppid; 299 sinfo->sinfo_stream = stream; 300 outmessage.msg_iov->iov_base = telephone; 301 outmessage.msg_iov->iov_len = strlen(telephone) + 1; 302 outmessage.msg_name = NULL; 303 outmessage.msg_namelen = 0; 304 bytes_sent = sendmsg(sk1, &outmessage, MSG_NOSIGNAL); 305 if ((bytes_sent > 0) || (EPIPE != errno)) 306 tst_brkm(TBROK, tst_exit, "sendmsg with NULL associd and " 307 "NULL msg_name error:%d errno:%d", error, errno); 308 309 tst_resm(TPASS, "sendmsg with NULL associd and NULL msg_name"); 310 311 /* Fill in a incorrect assoc_id, which should cause an error. */ 312 sinfo->sinfo_assoc_id = associd2; 313 bytes_sent = sendmsg(sk1, &outmessage, MSG_NOSIGNAL); 314 if ((bytes_sent > 0) || (EPIPE != errno)) 315 tst_brkm(TBROK, tst_exit, "sendmsg with incorrect associd " 316 "error:%d errno:%d", error, errno); 317 318 tst_resm(TPASS, "sendmsg with incorrect associd"); 319 320 /* Fill in a correct assoc_id and get back to the normal testing. */ 321 sinfo->sinfo_assoc_id = associd1; 322 /* Send two more messages, to cause a second SACK. */ 323 test_sendmsg(sk1, &outmessage, 0, strlen(telephone)+1); 324 325 outmessage.msg_name = &loop2; 326 outmessage.msg_namelen = sizeof(loop2); 327 outmessage.msg_iov->iov_base = telephone_resp; 328 outmessage.msg_iov->iov_len = strlen(telephone_resp) + 1; 329 test_sendmsg(sk1, &outmessage, 0, strlen(telephone_resp)+1); 330 331 tst_resm(TPASS, "sendmsg with valid associd"); 332 333 /* Get those two messages. */ 334 inmessage.msg_controllen = sizeof(incmsg); 335 error = test_recvmsg(sk2, &inmessage, MSG_WAITALL); 336 test_check_msg_data(&inmessage, error, strlen(telephone) + 1, 337 MSG_EOR, stream, ppid); 338 339 inmessage.msg_controllen = sizeof(incmsg); 340 error = test_recvmsg(sk2, &inmessage, MSG_WAITALL); 341 test_check_msg_data(&inmessage, error, strlen(telephone_resp) + 1, 342 MSG_EOR, stream, ppid); 343 344 tst_resm(TPASS, "recvmsg"); 345 346 n_laddrs = sctp_getladdrs(sk1, associd1, &laddrs); 347 if (n_laddrs <= 0) 348 tst_brkm(TBROK, tst_exit, "sctp_getladdrs: %s", 349 strerror(errno)); 350 351 tst_resm(TPASS, "sctp_getladdrs"); 352 353 addr_buf = (void *)laddrs; 354 for (i = 0; i < n_laddrs; i++) { 355 sa_addr = (struct sockaddr *)addr_buf; 356 if (AF_INET == sa_addr->sa_family) { 357 in_addr = (struct sockaddr_in *)sa_addr; 358 tst_resm(TINFO, "LOCAL ADDR %d.%d.%d.%d PORT %d", 359 NIPQUAD(in_addr->sin_addr), 360 ntohs(in_addr->sin_port)); 361 addr_buf += sizeof(struct sockaddr_in); 362 } else { 363 in6_addr = (struct sockaddr_in6 *)sa_addr; 364 tst_resm(TINFO, 365 "LOCAL ADDR %04x:%04x:%04x:%04x:%04x:%04x:%04x:%04x PORT %d", 366 NIP6(in6_addr->sin6_addr), 367 ntohs(in6_addr->sin6_port)); 368 addr_buf += sizeof(struct sockaddr_in6); 369 } 370 } 371 372 sctp_freeladdrs(laddrs); 373 374 tst_resm(TPASS, "sctp_freeladdrs"); 375 376 n_paddrs = sctp_getpaddrs(sk1, associd1, &paddrs); 377 if (n_paddrs <= 0) 378 tst_brkm(TBROK, tst_exit, "sctp_getpaddrs: %s", 379 strerror(errno)); 380 381 tst_resm(TPASS, "sctp_getpaddrs"); 382 383 addr_buf = (void *)paddrs; 384 for (i = 0; i < n_paddrs; i++) { 385 sa_addr = (struct sockaddr *)addr_buf; 386 if (AF_INET == sa_addr->sa_family) { 387 in_addr = (struct sockaddr_in *)sa_addr; 388 tst_resm(TINFO, "PEER ADDR %d.%d.%d.%d PORT %d", 389 NIPQUAD(in_addr->sin_addr), 390 ntohs(in_addr->sin_port)); 391 addr_buf += sizeof(struct sockaddr_in); 392 } else { 393 in6_addr = (struct sockaddr_in6 *)sa_addr; 394 tst_resm(TINFO, 395 "PEER ADDR %04x:%04x:%04x:%04x:%04x:%04x:%04x:%04x PORT %d", 396 NIP6(in6_addr->sin6_addr), 397 ntohs(in6_addr->sin6_port)); 398 addr_buf += sizeof(struct sockaddr_in6); 399 } 400 } 401 402 sctp_freepaddrs(paddrs); 403 404 tst_resm(TPASS, "sctp_freepaddrs"); 405 406 /* Shut down the link. */ 407 close(sk1); 408 409 /* Get the shutdown complete notification. */ 410 inmessage.msg_controllen = sizeof(incmsg); 411 inmessage.msg_namelen = sizeof(msgname); 412 memset(&msgname, 0, sizeof(msgname)); 413 error = test_recvmsg(sk2, &inmessage, MSG_WAITALL); 414 test_check_msg_notification(&inmessage, error, 415 sizeof(struct sctp_assoc_change), 416 SCTP_ASSOC_CHANGE, SCTP_SHUTDOWN_COMP); 417 #if TEST_V6 418 419 if (inmessage.msg_namelen != sizeof(struct sockaddr_in6)) { 420 DUMP_CORE; 421 } 422 if (msgname.v6.sin6_port != htons(SCTP_TESTPORT_1)) { 423 DUMP_CORE; 424 } 425 426 if (msgname.v6.sin6_family != AF_INET6) { 427 DUMP_CORE; 428 } 429 430 if (memcmp(&msgname.v6.sin6_addr, &in6addr_loopback, 431 sizeof(msgname.v6.sin6_addr))) { 432 DUMP_CORE; 433 } 434 #else 435 if (inmessage.msg_namelen != sizeof(struct sockaddr_in)) { 436 DUMP_CORE; 437 } 438 if (msgname.v4.sin_port != htons(SCTP_TESTPORT_1)) { 439 DUMP_CORE; 440 } 441 442 if (msgname.v4.sin_family != AF_INET) { 443 DUMP_CORE; 444 } 445 if (msgname.v4.sin_addr.s_addr != SCTP_IP_LOOPBACK) { 446 DUMP_CORE; 447 } 448 #endif 449 450 tst_resm(TPASS, "recvmsg SHUTDOWN_COMP notification"); 451 452 close(sk2); 453 454 /* Indicate successful completion. */ 455 return 0; 456 } 457