1 /* This testcase is part of GDB, the GNU debugger. 2 3 Copyright 2011-2015 Free Software Foundation, Inc. 4 5 This program is free software; you can redistribute it and/or modify 6 it under the terms of the GNU General Public License as published by 7 the Free Software Foundation; either version 3 of the License, or 8 (at your option) any later version. 9 10 This program is distributed in the hope that it will be useful, 11 but WITHOUT ANY WARRANTY; without even the implied warranty of 12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13 GNU General Public License for more details. 14 15 You should have received a copy of the GNU General Public License 16 along with this program. If not, see <http://www.gnu.org/licenses/>. */ 17 18 #include <sys/shm.h> 19 #include <sys/sem.h> 20 #include <sys/msg.h> 21 #include <stdio.h> 22 #include <pthread.h> 23 #include <arpa/inet.h> 24 #include <sys/socket.h> 25 #include <unistd.h> 26 27 static pthread_mutex_t mutex = PTHREAD_MUTEX_INITIALIZER; 28 29 void * 30 thread_proc (void *args) 31 { 32 pthread_mutex_lock (&mutex); 33 pthread_mutex_unlock (&mutex); 34 } 35 36 int 37 main (void) 38 { 39 const int flags = IPC_CREAT | 0666; 40 key_t shmkey = 3925, semkey = 7428, msgkey = 5294; 41 int shmid, semid, msqid; 42 FILE *fd; 43 pthread_t thread; 44 struct sockaddr_in sock_addr; 45 int sock; 46 unsigned short port; 47 socklen_t size; 48 int status, try, retries = 1000; 49 50 for (try = 0; try < retries; ++try) 51 { 52 shmid = shmget (shmkey, 4096, flags | IPC_EXCL); 53 if (shmid >= 0) 54 break; 55 56 ++shmkey; 57 } 58 59 if (shmid < 0) 60 { 61 printf ("Cannot create shared-memory region after %d tries.\n", retries); 62 return 1; 63 } 64 65 for (try = 0; try < retries; ++try) 66 { 67 semid = semget (semkey, 1, flags | IPC_EXCL); 68 if (semid >= 0) 69 break; 70 71 ++semkey; 72 } 73 74 if (semid < 0) 75 { 76 printf ("Cannot create semaphore after %d tries.\n", retries); 77 return 1; 78 } 79 80 for (try = 0; try < retries; ++try) 81 { 82 msqid = msgget (msgkey, flags | IPC_EXCL); 83 if (msqid >= 0) 84 break; 85 86 ++msgkey; 87 } 88 89 if (msqid < 0) 90 { 91 printf ("Cannot create message queue after %d tries.\n", retries); 92 return 1; 93 } 94 95 fd = fopen ("/dev/null", "r"); 96 97 /* Lock the mutex to prevent the new thread from finishing immediately. */ 98 pthread_mutex_lock (&mutex); 99 pthread_create (&thread, NULL, thread_proc, 0); 100 101 sock = socket (PF_INET, SOCK_STREAM, IPPROTO_TCP); 102 if (sock < 0) 103 { 104 printf ("Cannot create socket.\n"); 105 return 1; 106 } 107 108 sock_addr.sin_family = AF_INET; 109 sock_addr.sin_port = 0; /* Bind to a free port. */ 110 sock_addr.sin_addr.s_addr = htonl (INADDR_ANY); 111 112 status = bind (sock, (struct sockaddr *) &sock_addr, sizeof (sock_addr)); 113 if (status < 0) 114 { 115 printf ("Cannot bind socket.\n"); 116 return 1; 117 } 118 119 /* Find the assigned port number of the socket. */ 120 size = sizeof (sock_addr); 121 status = getsockname (sock, (struct sockaddr *) &sock_addr, &size); 122 if (status < 0) 123 { 124 printf ("Cannot find name of socket.\n"); 125 return 1; 126 } 127 port = ntohs (sock_addr.sin_port); 128 129 status = listen (sock, 1); 130 if (status < 0) 131 { 132 printf ("Cannot listen on socket.\n"); 133 return 1; 134 } 135 136 /* Set breakpoint here. */ 137 138 shmctl (shmid, IPC_RMID, NULL); 139 semctl (semid, 0, IPC_RMID, NULL); 140 msgctl (msqid, IPC_RMID, NULL); 141 fclose (fd); 142 close (sock); 143 144 pthread_mutex_unlock (&mutex); 145 pthread_join (thread, NULL); 146 147 return 0; 148 } 149