2
0
mirror of https://github.com/openvswitch/ovs synced 2025-08-22 01:51:26 +00:00
ovs/lib/process.c
Thomas Graf ca6ba70092 list: Rename struct list to struct ovs_list
struct list is a common name and can't be used in public headers.

Signed-off-by: Thomas Graf <tgraf@noironetworks.com>
Acked-by: Ben Pfaff <blp@nicira.com>
2014-12-15 14:15:12 +01:00

440 lines
11 KiB
C
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/*
* Copyright (c) 2008, 2009, 2010, 2011, 2012, 2013 Nicira, Inc.
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at:
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
#include <config.h>
#include "process.h"
#include <errno.h>
#include <fcntl.h>
#include <signal.h>
#include <stdlib.h>
#include <string.h>
#include <sys/resource.h>
#include <sys/stat.h>
#include <sys/wait.h>
#include <unistd.h>
#include "coverage.h"
#include "dynamic-string.h"
#include "fatal-signal.h"
#include "list.h"
#include "ovs-thread.h"
#include "poll-loop.h"
#include "signals.h"
#include "socket-util.h"
#include "util.h"
#include "vlog.h"
VLOG_DEFINE_THIS_MODULE(process);
COVERAGE_DEFINE(process_start);
struct process {
struct ovs_list node;
char *name;
pid_t pid;
/* State. */
bool exited;
int status;
};
/* Pipe used to signal child termination. */
static int fds[2];
/* All processes. */
static struct ovs_list all_processes = LIST_INITIALIZER(&all_processes);
static void sigchld_handler(int signr OVS_UNUSED);
/* Initializes the process subsystem (if it is not already initialized). Calls
* exit() if initialization fails.
*
* This function may not be called after creating any additional threads.
*
* Calling this function is optional; it will be called automatically by
* process_start() if necessary. Calling it explicitly allows the client to
* prevent the process from exiting at an unexpected time. */
void
process_init(void)
{
#ifndef _WIN32
static bool inited;
struct sigaction sa;
assert_single_threaded();
if (inited) {
return;
}
inited = true;
/* Create notification pipe. */
xpipe_nonblocking(fds);
/* Set up child termination signal handler. */
memset(&sa, 0, sizeof sa);
sa.sa_handler = sigchld_handler;
sigemptyset(&sa.sa_mask);
sa.sa_flags = SA_NOCLDSTOP | SA_RESTART;
xsigaction(SIGCHLD, &sa, NULL);
#endif
}
char *
process_escape_args(char **argv)
{
struct ds ds = DS_EMPTY_INITIALIZER;
char **argp;
for (argp = argv; *argp; argp++) {
const char *arg = *argp;
const char *p;
if (argp != argv) {
ds_put_char(&ds, ' ');
}
if (arg[strcspn(arg, " \t\r\n\v\\\'\"")]) {
ds_put_char(&ds, '"');
for (p = arg; *p; p++) {
if (*p == '\\' || *p == '\"') {
ds_put_char(&ds, '\\');
}
ds_put_char(&ds, *p);
}
ds_put_char(&ds, '"');
} else {
ds_put_cstr(&ds, arg);
}
}
return ds_cstr(&ds);
}
/* Prepare to start a process whose command-line arguments are given by the
* null-terminated 'argv' array. Returns 0 if successful, otherwise a
* positive errno value. */
static int
process_prestart(char **argv)
{
char *binary;
process_init();
/* Log the process to be started. */
if (VLOG_IS_DBG_ENABLED()) {
char *args = process_escape_args(argv);
VLOG_DBG("starting subprocess: %s", args);
free(args);
}
/* execvp() will search PATH too, but the error in that case is more
* obscure, since it is only reported post-fork. */
binary = process_search_path(argv[0]);
if (!binary) {
VLOG_ERR("%s not found in PATH", argv[0]);
return ENOENT;
}
free(binary);
return 0;
}
/* Creates and returns a new struct process with the specified 'name' and
* 'pid'. */
static struct process *
process_register(const char *name, pid_t pid)
{
struct process *p;
const char *slash;
p = xzalloc(sizeof *p);
p->pid = pid;
slash = strrchr(name, '/');
p->name = xstrdup(slash ? slash + 1 : name);
p->exited = false;
list_push_back(&all_processes, &p->node);
return p;
}
#ifndef _WIN32
static bool
rlim_is_finite(rlim_t limit)
{
if (limit == RLIM_INFINITY) {
return false;
}
#ifdef RLIM_SAVED_CUR /* FreeBSD 8.0 lacks RLIM_SAVED_CUR. */
if (limit == RLIM_SAVED_CUR) {
return false;
}
#endif
#ifdef RLIM_SAVED_MAX /* FreeBSD 8.0 lacks RLIM_SAVED_MAX. */
if (limit == RLIM_SAVED_MAX) {
return false;
}
#endif
return true;
}
/* Returns the maximum valid FD value, plus 1. */
static int
get_max_fds(void)
{
static int max_fds;
if (!max_fds) {
struct rlimit r;
if (!getrlimit(RLIMIT_NOFILE, &r) && rlim_is_finite(r.rlim_cur)) {
max_fds = r.rlim_cur;
} else {
VLOG_WARN("failed to obtain fd limit, defaulting to 1024");
max_fds = 1024;
}
}
return max_fds;
}
#endif /* _WIN32 */
/* Starts a subprocess with the arguments in the null-terminated argv[] array.
* argv[0] is used as the name of the process. Searches the PATH environment
* variable to find the program to execute.
*
* This function may not be called after creating any additional threads.
*
* All file descriptors are closed before executing the subprocess, except for
* fds 0, 1, and 2.
*
* Returns 0 if successful, otherwise a positive errno value indicating the
* error. If successful, '*pp' is assigned a new struct process that may be
* used to query the process's status. On failure, '*pp' is set to NULL. */
int
process_start(char **argv, struct process **pp)
{
#ifndef _WIN32
pid_t pid;
int error;
sigset_t prev_mask;
assert_single_threaded();
*pp = NULL;
COVERAGE_INC(process_start);
error = process_prestart(argv);
if (error) {
return error;
}
fatal_signal_block(&prev_mask);
pid = fork();
if (pid < 0) {
VLOG_WARN("fork failed: %s", ovs_strerror(errno));
error = errno;
} else if (pid) {
/* Running in parent process. */
*pp = process_register(argv[0], pid);
error = 0;
} else {
/* Running in child process. */
int fd_max = get_max_fds();
int fd;
fatal_signal_fork();
for (fd = 3; fd < fd_max; fd++) {
close(fd);
}
xpthread_sigmask(SIG_SETMASK, &prev_mask, NULL);
execvp(argv[0], argv);
fprintf(stderr, "execvp(\"%s\") failed: %s\n",
argv[0], ovs_strerror(errno));
_exit(1);
}
xpthread_sigmask(SIG_SETMASK, &prev_mask, NULL);
return error;
#else
*pp = NULL;
return ENOSYS;
#endif
}
/* Destroys process 'p'. */
void
process_destroy(struct process *p)
{
if (p) {
list_remove(&p->node);
free(p->name);
free(p);
}
}
/* Sends signal 'signr' to process 'p'. Returns 0 if successful, otherwise a
* positive errno value. */
int
process_kill(const struct process *p, int signr)
{
#ifndef _WIN32
return (p->exited ? ESRCH
: !kill(p->pid, signr) ? 0
: errno);
#else
return ENOSYS;
#endif
}
/* Returns the pid of process 'p'. */
pid_t
process_pid(const struct process *p)
{
return p->pid;
}
/* Returns the name of process 'p' (the name passed to process_start() with any
* leading directories stripped). */
const char *
process_name(const struct process *p)
{
return p->name;
}
/* Returns true if process 'p' has exited, false otherwise. */
bool
process_exited(struct process *p)
{
return p->exited;
}
/* Returns process 'p''s exit status, as reported by waitpid(2).
* process_status(p) may be called only after process_exited(p) has returned
* true. */
int
process_status(const struct process *p)
{
ovs_assert(p->exited);
return p->status;
}
/* Given 'status', which is a process status in the form reported by waitpid(2)
* and returned by process_status(), returns a string describing how the
* process terminated. The caller is responsible for freeing the string when
* it is no longer needed. */
char *
process_status_msg(int status)
{
struct ds ds = DS_EMPTY_INITIALIZER;
#ifndef _WIN32
if (WIFEXITED(status)) {
ds_put_format(&ds, "exit status %d", WEXITSTATUS(status));
} else if (WIFSIGNALED(status)) {
char namebuf[SIGNAL_NAME_BUFSIZE];
ds_put_format(&ds, "killed (%s)",
signal_name(WTERMSIG(status), namebuf, sizeof namebuf));
} else if (WIFSTOPPED(status)) {
char namebuf[SIGNAL_NAME_BUFSIZE];
ds_put_format(&ds, "stopped (%s)",
signal_name(WSTOPSIG(status), namebuf, sizeof namebuf));
} else {
ds_put_format(&ds, "terminated abnormally (%x)", status);
}
if (WCOREDUMP(status)) {
ds_put_cstr(&ds, ", core dumped");
}
#else
ds_put_cstr(&ds, "function not supported.");
#endif
return ds_cstr(&ds);
}
/* Executes periodic maintenance activities required by the process module. */
void
process_run(void)
{
#ifndef _WIN32
char buf[_POSIX_PIPE_BUF];
if (!list_is_empty(&all_processes) && read(fds[0], buf, sizeof buf) > 0) {
struct process *p;
LIST_FOR_EACH (p, node, &all_processes) {
if (!p->exited) {
int retval, status;
do {
retval = waitpid(p->pid, &status, WNOHANG);
} while (retval == -1 && errno == EINTR);
if (retval == p->pid) {
p->exited = true;
p->status = status;
} else if (retval < 0) {
VLOG_WARN("waitpid: %s", ovs_strerror(errno));
p->exited = true;
p->status = -1;
}
}
}
}
#endif
}
/* Causes the next call to poll_block() to wake up when process 'p' has
* exited. */
void
process_wait(struct process *p)
{
#ifndef _WIN32
if (p->exited) {
poll_immediate_wake();
} else {
poll_fd_wait(fds[0], POLLIN);
}
#else
OVS_NOT_REACHED();
#endif
}
char *
process_search_path(const char *name)
{
char *save_ptr = NULL;
char *path, *dir;
struct stat s;
if (strchr(name, '/') || !getenv("PATH")) {
return stat(name, &s) == 0 ? xstrdup(name) : NULL;
}
path = xstrdup(getenv("PATH"));
for (dir = strtok_r(path, ":", &save_ptr); dir;
dir = strtok_r(NULL, ":", &save_ptr)) {
char *file = xasprintf("%s/%s", dir, name);
if (stat(file, &s) == 0) {
free(path);
return file;
}
free(file);
}
free(path);
return NULL;
}
static void
sigchld_handler(int signr OVS_UNUSED)
{
ignore(write(fds[1], "", 1));
}