1 //===- llvm/System/Unix/Program.cpp -----------------------------*- C++ -*-===//
3 // The LLVM Compiler Infrastructure
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
8 //===----------------------------------------------------------------------===//
10 // This file implements the Unix specific portion of the Program class.
12 //===----------------------------------------------------------------------===//
14 //===----------------------------------------------------------------------===//
15 //=== WARNING: Implementation here must contain only generic UNIX code that
16 //=== is guaranteed to work on *all* UNIX variants.
17 //===----------------------------------------------------------------------===//
19 #include <llvm/Config/config.h>
25 #if HAVE_SYS_RESOURCE_H
26 #include <sys/resource.h>
38 Program::Program() : Pid_(0) {}
40 Program::~Program() {}
42 // This function just uses the PATH environment variable to find the program.
44 Program::FindProgramByName(const std::string& progName) {
46 // Check some degenerate cases
47 if (progName.length() == 0) // no program
50 if (!temp.set(progName)) // invalid name
52 // Use the given path verbatim if it contains any slashes; this matches
53 // the behavior of sh(1) and friends.
54 if (progName.find('/') != std::string::npos)
57 // At this point, the file name is valid and its not executable
59 // Get the path. If its empty, we can't do anything to find it.
60 const char *PathStr = getenv("PATH");
64 // Now we have a colon separated list of directories to search; try them.
65 size_t PathLen = strlen(PathStr);
67 // Find the first colon...
68 const char *Colon = std::find(PathStr, PathStr+PathLen, ':');
70 // Check to see if this first directory contains the executable...
72 if (FilePath.set(std::string(PathStr,Colon))) {
73 FilePath.appendComponent(progName);
74 if (FilePath.canExecute())
75 return FilePath; // Found the executable!
78 // Nope it wasn't in this directory, check the next path in the list!
79 PathLen -= Colon-PathStr;
82 // Advance past duplicate colons
83 while (*PathStr == ':') {
91 static bool RedirectIO(const Path *Path, int FD, std::string* ErrMsg) {
97 // Redirect empty paths to /dev/null
100 File = Path->toString();
103 int InFD = open(File.c_str(), FD == 0 ? O_RDONLY : O_WRONLY|O_CREAT, 0666);
105 MakeErrMsg(ErrMsg, "Cannot open file '" + File + "' for "
106 + (FD == 0 ? "input" : "output"));
110 // Install it as the requested FD
111 if (-1 == dup2(InFD, FD)) {
112 MakeErrMsg(ErrMsg, "Cannot dup2");
115 close(InFD); // Close the original FD
119 static bool Timeout = false;
120 static void TimeOutHandler(int Sig) {
124 static void SetMemoryLimits (unsigned size)
126 #if HAVE_SYS_RESOURCE_H
128 __typeof__ (r.rlim_cur) limit = (__typeof__ (r.rlim_cur)) (size) * 1048576;
131 getrlimit (RLIMIT_DATA, &r);
133 setrlimit (RLIMIT_DATA, &r);
135 // Resident set size.
136 getrlimit (RLIMIT_RSS, &r);
138 setrlimit (RLIMIT_RSS, &r);
140 #ifdef RLIMIT_AS // e.g. NetBSD doesn't have it.
142 getrlimit (RLIMIT_AS, &r);
144 setrlimit (RLIMIT_AS, &r);
150 Program::Execute(const Path& path,
153 const Path** redirects,
154 unsigned memoryLimit,
157 if (!path.canExecute()) {
159 *ErrMsg = path.toString() + " is not executable";
163 // Create a child process.
166 // An error occured: Return to the caller.
168 MakeErrMsg(ErrMsg, "Couldn't fork");
171 // Child process: Execute the program.
173 // Redirect file descriptors...
176 if (RedirectIO(redirects[0], 0, ErrMsg)) { return false; }
178 if (RedirectIO(redirects[1], 1, ErrMsg)) { return false; }
179 if (redirects[1] && redirects[2] &&
180 *(redirects[1]) == *(redirects[2])) {
181 // If stdout and stderr should go to the same place, redirect stderr
182 // to the FD already open for stdout.
183 if (-1 == dup2(1,2)) {
184 MakeErrMsg(ErrMsg, "Can't redirect stderr to stdout");
188 // Just redirect stderr
189 if (RedirectIO(redirects[2], 2, ErrMsg)) { return false; }
194 if (memoryLimit!=0) {
195 SetMemoryLimits(memoryLimit);
200 execve (path.c_str(), (char**)args, (char**)envp);
202 execv (path.c_str(), (char**)args);
203 // If the execve() failed, we should exit and let the parent pick up
204 // our non-zero exit status.
208 // Parent process: Break out of the switch to do our processing.
213 // Make sure stderr and stdout have been flushed
214 std::cerr << std::flush;
215 std::cout << std::flush;
225 Program::Wait(unsigned secondsToWait,
228 #ifdef HAVE_SYS_WAIT_H
229 struct sigaction Act, Old;
232 MakeErrMsg(ErrMsg, "Process not started!");
236 // Install a timeout handler.
239 Act.sa_sigaction = 0;
240 Act.sa_handler = TimeOutHandler;
241 sigemptyset(&Act.sa_mask);
243 sigaction(SIGALRM, &Act, &Old);
244 alarm(secondsToWait);
247 // Parent process: Wait for the child process to terminate.
249 int child = this->Pid_;
250 while (wait(&status) != child)
251 if (secondsToWait && errno == EINTR) {
253 kill(child, SIGKILL);
255 // Turn off the alarm and restore the signal handler
257 sigaction(SIGALRM, &Old, 0);
259 // Wait for child to die
260 if (wait(&status) != child)
261 MakeErrMsg(ErrMsg, "Child timed out but wouldn't die");
263 MakeErrMsg(ErrMsg, "Child timed out", 0);
265 return -1; // Timeout detected
266 } else if (errno != EINTR) {
267 MakeErrMsg(ErrMsg, "Error waiting for child process");
271 // We exited normally without timeout, so turn off the timer.
274 sigaction(SIGALRM, &Old, 0);
277 // Return the proper exit status. 0=success, >0 is programs' exit status,
278 // <0 means a signal was returned, -9999999 means the program dumped core.
280 if (WIFEXITED(status))
281 result = WEXITSTATUS(status);
282 else if (WIFSIGNALED(status))
283 result = 0 - WTERMSIG(status);
285 else if (WCOREDUMP(status))
286 result |= 0x01000000;
295 bool Program::ChangeStdinToBinary(){
296 // Do nothing, as Unix doesn't differentiate between text and binary.
300 bool Program::ChangeStdoutToBinary(){
301 // Do nothing, as Unix doesn't differentiate between text and binary.