Catch up with Gearman's libtest
[m6w6/libmemcached] / libtest / port.cc
1 /* vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
2 *
3 * Data Differential YATL (i.e. libtest) library
4 *
5 * Copyright (C) 2012 Data Differential, http://datadifferential.com/
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions are
9 * met:
10 *
11 * * Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 *
14 * * Redistributions in binary form must reproduce the above
15 * copyright notice, this list of conditions and the following disclaimer
16 * in the documentation and/or other materials provided with the
17 * distribution.
18 *
19 * * The names of its contributors may not be used to endorse or
20 * promote products derived from this software without specific prior
21 * written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
24 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
25 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
26 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
27 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
28 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
29 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
30 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
31 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
32 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
33 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34 *
35 */
36
37 #include <config.h>
38 #include <libtest/common.h>
39
40 #include <cassert>
41 #include <cstdlib>
42 #include <cstring>
43 #include <ctime>
44 #include <fnmatch.h>
45 #include <iostream>
46 #include <sys/socket.h>
47 #include <sys/stat.h>
48 #include <sys/time.h>
49 #include <sys/types.h>
50 #include <sys/wait.h>
51 #include <unistd.h>
52
53 #include <utility>
54 #include <vector>
55
56 #include <signal.h>
57
58 #include <libtest/signal.h>
59
60 #ifndef __INTEL_COMPILER
61 #pragma GCC diagnostic ignored "-Wold-style-cast"
62 #endif
63
64 using namespace libtest;
65
66 struct socket_st {
67 typedef std::vector< std::pair< int, in_port_t> > socket_port_t;
68 socket_port_t _pair;
69
70 void release(in_port_t _arg)
71 {
72 for(socket_port_t::iterator iter= _pair.begin();
73 iter != _pair.end();
74 iter++)
75 {
76 if ((*iter).second == _arg)
77 {
78 close((*iter).first);
79 }
80 }
81 }
82
83 ~socket_st()
84 {
85 for(socket_port_t::iterator iter= _pair.begin();
86 iter != _pair.end();
87 iter++)
88 {
89 close((*iter).first);
90 }
91 }
92 };
93
94 static socket_st all_socket_fd;
95
96 static in_port_t global_port= 0;
97
98 namespace libtest {
99
100 in_port_t default_port()
101 {
102 if (global_port == 0)
103 {
104 global_port= get_free_port();
105 }
106
107 return global_port;
108 }
109
110 void release_port(in_port_t arg)
111 {
112 all_socket_fd.release(arg);
113 }
114
115 in_port_t get_free_port()
116 {
117 in_port_t ret_port= in_port_t(0);
118
119 int retries= 1024;
120
121 while (retries--)
122 {
123 int sd;
124 if ((sd= socket(AF_INET, SOCK_STREAM, 0)) != -1)
125 {
126 int optval= 1;
127 if (setsockopt(sd, SOL_SOCKET, SO_REUSEADDR, &optval, sizeof(optval)) != -1)
128 {
129 struct sockaddr_in sin;
130 sin.sin_port= 0;
131 sin.sin_addr.s_addr= 0;
132 sin.sin_addr.s_addr= INADDR_ANY;
133 sin.sin_family= AF_INET;
134
135 if (bind(sd, (struct sockaddr *)&sin,sizeof(struct sockaddr_in) ) != -1)
136 {
137 socklen_t addrlen= sizeof(sin);
138
139 if (getsockname(sd, (struct sockaddr *)&sin, &addrlen) != -1)
140 {
141 ret_port= sin.sin_port;
142 }
143 }
144 }
145
146 all_socket_fd._pair.push_back(std::make_pair(sd, ret_port));
147 }
148
149 if (ret_port > 1024)
150 {
151 break;
152 }
153 }
154
155 // We handle the case where if we max out retries, we still abort.
156 if (ret_port <= 1024)
157 {
158 fatal_message("No port could be found");
159 }
160
161 return ret_port;
162 }
163
164 } // namespace libtest