Merge lp:~tangent-org/libmemcached/1.0-build/ Build: jenkins-Libmemcached-187
[m6w6/libmemcached] / libtest / killpid.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 "libtest/yatlcon.h"
38 #include <libtest/common.h>
39
40 #include <cstdlib>
41 #include <cstring>
42 #include <iostream>
43 #include <sstream>
44 #include <signal.h>
45 #include <sys/types.h>
46 #include <sys/types.h>
47 #include <sys/wait.h>
48
49
50 #include <libtest/killpid.h>
51 #include <libtest/stream.h>
52
53 using namespace libtest;
54
55 bool kill_pid(pid_t pid_arg)
56 {
57 assert(pid_arg > 0);
58 if (pid_arg < 1)
59 {
60 Error << "Invalid pid:" << pid_arg;
61 return false;
62 }
63
64 if ((::kill(pid_arg, SIGTERM) == -1))
65 {
66 switch (errno)
67 {
68 case EPERM:
69 Error << "Does someone else have a process running locally for " << int(pid_arg) << "?";
70 return false;
71
72 case ESRCH:
73 Error << "Process " << int(pid_arg) << " not found.";
74 return false;
75
76 default:
77 case EINVAL:
78 Error << "kill() " << strerror(errno);
79 return false;
80 }
81 }
82
83 {
84 uint32_t this_wait= 0;
85 uint32_t timeout= 20; // This number should be high enough for valgrind startup (which is slow)
86 uint32_t waited;
87 uint32_t retry;
88
89 for (waited= 0, retry= 4; ; retry++, waited+= this_wait)
90 {
91 int status= 0;
92 if (waitpid(pid_arg, &status, WNOHANG) == 0)
93 {
94 break;
95 }
96 else if (errno == ECHILD)
97 {
98 // Server has already gone away
99 break;
100 }
101 else if (waited >= timeout)
102 {
103 // Timeout failed
104 kill(pid_arg, SIGKILL);
105 break;
106 }
107
108 this_wait= retry * retry / 3 + 1;
109 libtest::dream(this_wait, 0);
110 }
111 }
112
113 return true;
114 }
115
116 bool check_pid(const std::string &filename)
117 {
118 if (filename.empty())
119 {
120 return false;
121 }
122
123 FILE *fp;
124 if ((fp= fopen(filename.c_str(), "r")))
125 {
126 libtest::vchar_t pid_buffer;
127 pid_buffer.resize(1024);
128
129 char *ptr= fgets(&pid_buffer[0], int(pid_buffer.size()), fp);
130 fclose(fp);
131
132 if (ptr)
133 {
134 pid_t pid= (pid_t)atoi(&pid_buffer[0]);
135 if (pid > 0)
136 {
137 return (::kill(pid, 0) == 0);
138 }
139 }
140 }
141
142 return false;
143 }
144
145
146 bool kill_file(const std::string &filename)
147 {
148 if (filename.empty())
149 {
150 return true;
151 }
152
153 FILE *fp;
154 if ((fp= fopen(filename.c_str(), "r")))
155 {
156 libtest::vchar_t pid_buffer;
157 pid_buffer.resize(1024);
158
159 char *ptr= fgets(&pid_buffer[0], int(pid_buffer.size()), fp);
160 fclose(fp);
161
162 if (ptr)
163 {
164 pid_t pid= (pid_t)atoi(&pid_buffer[0]);
165 if (pid != 0)
166 {
167 bool ret= kill_pid(pid);
168 unlink(filename.c_str()); // If this happens we may be dealing with a dead server that left its pid file.
169
170 return ret;
171 }
172 }
173 }
174
175 return false;
176 }
177
178 #define STRINGIFY(x) #x
179 #define TOSTRING(x) STRINGIFY(x)
180 #define LIBTEST_AT __FILE__ ":" TOSTRING(__LINE__)
181
182 pid_t get_pid_from_file(const std::string &filename, std::stringstream& error_message)
183 {
184 pid_t ret= -1;
185
186 if (filename.empty())
187 {
188 error_message << LIBTEST_AT << " empty pid file";
189 return ret;
190 }
191
192 FILE *fp;
193 if ((fp= fopen(filename.c_str(), "r")))
194 {
195 libtest::vchar_t pid_buffer;
196 pid_buffer.resize(1024);
197
198 char *ptr= fgets(&pid_buffer[0], int(pid_buffer.size()), fp);
199 if (ptr)
200 {
201 ret= (pid_t)atoi(&pid_buffer[0]);
202 if (ret < 1)
203 {
204 error_message << LIBTEST_AT << " Invalid pid was read from file " << filename;
205 }
206 }
207 else
208 {
209 error_message << LIBTEST_AT << " File " << filename << " was empty ";
210 }
211
212 fclose(fp);
213
214 return ret;
215 }
216 else
217 {
218 libtest::vchar_t buffer;
219 buffer.resize(1024);
220 char *current_directory= getcwd(&buffer[0], buffer.size());
221 error_message << "Error while opening " << current_directory << "/" << filename << " " << strerror(errno);
222 }
223
224 return ret;
225 }