os-posix.c 7.76 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28
/*
 * os-posix.c
 *
 * Copyright (c) 2003-2008 Fabrice Bellard
 * Copyright (c) 2010 Red Hat, Inc.
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
 */

#include <unistd.h>
#include <fcntl.h>
#include <signal.h>
29 30
#include <sys/types.h>
#include <sys/wait.h>
31 32
/*needed for MAP_POPULATE before including qemu-options.h */
#include <sys/mman.h>
33
#include <pwd.h>
34
#include <grp.h>
35
#include <libgen.h>
36 37 38

/* Needed early for CONFIG_BSD etc. */
#include "config-host.h"
39
#include "sysemu/sysemu.h"
40 41
#include "net/slirp.h"
#include "qemu-options.h"
42

43 44
#ifdef CONFIG_LINUX
#include <sys/prctl.h>
45 46
#endif

47
static struct passwd *user_pwd;
48
static const char *chroot_dir;
49
static int daemonize;
50
static int daemon_pipe;
51

52
void os_setup_early_signal_handling(void)
53 54 55 56 57 58 59
{
    struct sigaction act;
    sigfillset(&act.sa_mask);
    act.sa_flags = 0;
    act.sa_handler = SIG_IGN;
    sigaction(SIGPIPE, &act, NULL);
}
60

61
static void termsig_handler(int signal, siginfo_t *info, void *c)
62
{
63
    qemu_system_killed(info->si_signo, info->si_pid);
64 65 66 67 68 69 70
}

void os_setup_signal_handling(void)
{
    struct sigaction act;

    memset(&act, 0, sizeof(act));
71 72
    act.sa_sigaction = termsig_handler;
    act.sa_flags = SA_SIGINFO;
73 74 75 76
    sigaction(SIGINT,  &act, NULL);
    sigaction(SIGHUP,  &act, NULL);
    sigaction(SIGTERM, &act, NULL);
}
77 78 79 80 81 82

/* Find a likely location for support files using the location of the binary.
   For installed binaries this will be "$bindir/../share/qemu".  When
   running from the build tree this will be "$bindir/../pc-bios".  */
#define SHARE_SUFFIX "/share/qemu"
#define BUILD_SUFFIX "/pc-bios"
83
char *os_find_datadir(void)
84
{
85
    char *dir, *exec_dir;
86 87 88
    char *res;
    size_t max_len;

89 90 91
    exec_dir = qemu_get_exec_dir();
    if (exec_dir == NULL) {
        return NULL;
92
    }
93
    dir = dirname(exec_dir);
94 95 96

    max_len = strlen(dir) +
        MAX(strlen(SHARE_SUFFIX), strlen(BUILD_SUFFIX)) + 1;
97
    res = g_malloc0(max_len);
98 99 100 101
    snprintf(res, max_len, "%s%s", dir, SHARE_SUFFIX);
    if (access(res, R_OK)) {
        snprintf(res, max_len, "%s%s", dir, BUILD_SUFFIX);
        if (access(res, R_OK)) {
102
            g_free(res);
103 104 105 106
            res = NULL;
        }
    }

107
    g_free(exec_dir);
108 109 110 111
    return res;
}
#undef SHARE_SUFFIX
#undef BUILD_SUFFIX
112

113 114 115 116 117 118
void os_set_proc_name(const char *s)
{
#if defined(PR_SET_NAME)
    char name[16];
    if (!s)
        return;
119
    pstrcpy(name, sizeof(name), s);
120 121 122 123 124 125 126 127 128 129 130 131
    /* Could rewrite argv[0] too, but that's a bit more complicated.
       This simple way is enough for `top'. */
    if (prctl(PR_SET_NAME, name)) {
        perror("unable to change process name");
        exit(1);
    }
#else
    fprintf(stderr, "Change of process name not supported by your OS\n");
    exit(1);
#endif
}

132 133 134 135 136 137 138 139 140 141 142 143 144
/*
 * Parse OS specific command line options.
 * return 0 if option handled, -1 otherwise
 */
void os_parse_cmd_args(int index, const char *optarg)
{
    switch (index) {
#ifdef CONFIG_SLIRP
    case QEMU_OPTION_smb:
        if (net_slirp_smb(optarg) < 0)
            exit(1);
        break;
#endif
145 146 147 148 149 150 151
    case QEMU_OPTION_runas:
        user_pwd = getpwnam(optarg);
        if (!user_pwd) {
            fprintf(stderr, "User \"%s\" doesn't exist\n", optarg);
            exit(1);
        }
        break;
152 153 154
    case QEMU_OPTION_chroot:
        chroot_dir = optarg;
        break;
155 156 157
    case QEMU_OPTION_daemonize:
        daemonize = 1;
        break;
158 159 160 161 162
#if defined(CONFIG_LINUX)
    case QEMU_OPTION_enablefips:
        fips_set_state(true);
        break;
#endif
163 164
    }
}
165

166
static void change_process_uid(void)
167 168 169 170 171 172
{
    if (user_pwd) {
        if (setgid(user_pwd->pw_gid) < 0) {
            fprintf(stderr, "Failed to setgid(%d)\n", user_pwd->pw_gid);
            exit(1);
        }
173 174 175 176 177
        if (initgroups(user_pwd->pw_name, user_pwd->pw_gid) < 0) {
            fprintf(stderr, "Failed to initgroups(\"%s\", %d)\n",
                    user_pwd->pw_name, user_pwd->pw_gid);
            exit(1);
        }
178 179 180 181 182 183 184 185 186 187
        if (setuid(user_pwd->pw_uid) < 0) {
            fprintf(stderr, "Failed to setuid(%d)\n", user_pwd->pw_uid);
            exit(1);
        }
        if (setuid(0) != -1) {
            fprintf(stderr, "Dropping privileges failed\n");
            exit(1);
        }
    }
}
188

189
static void change_root(void)
190 191 192 193 194 195 196 197 198 199 200 201 202
{
    if (chroot_dir) {
        if (chroot(chroot_dir) < 0) {
            fprintf(stderr, "chroot failed\n");
            exit(1);
        }
        if (chdir("/")) {
            perror("not able to chdir to /");
            exit(1);
        }
    }

}
203 204 205 206

void os_daemonize(void)
{
    if (daemonize) {
207
        pid_t pid;
208
        int fds[2];
209

210 211 212
        if (pipe(fds) == -1) {
            exit(1);
        }
213

214 215 216 217
        pid = fork();
        if (pid > 0) {
            uint8_t status;
            ssize_t len;
218

219
            close(fds[1]);
220

221 222 223
            do {
                len = read(fds[0], &status, 1);
            } while (len < 0 && errno == EINTR);
224 225 226 227 228 229 230 231

            /* only exit successfully if our child actually wrote
             * a one-byte zero to our pipe, upon successful init */
            exit(len == 1 && status == 0 ? 0 : 1);

        } else if (pid < 0) {
            exit(1);
        }
232

233
        close(fds[0]);
234 235
        daemon_pipe = fds[1];
        qemu_set_cloexec(daemon_pipe);
236

237
        setsid();
238

239 240 241 242 243 244 245
        pid = fork();
        if (pid > 0) {
            exit(0);
        } else if (pid < 0) {
            exit(1);
        }
        umask(027);
246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261

        signal(SIGTSTP, SIG_IGN);
        signal(SIGTTOU, SIG_IGN);
        signal(SIGTTIN, SIG_IGN);
    }
}

void os_setup_post(void)
{
    int fd = 0;

    if (daemonize) {
        if (chdir("/")) {
            perror("not able to chdir to /");
            exit(1);
        }
262 263 264 265
        TFR(fd = qemu_open("/dev/null", O_RDWR));
        if (fd == -1) {
            exit(1);
        }
266 267
    }

268 269
    change_root();
    change_process_uid();
270 271

    if (daemonize) {
272 273 274
        uint8_t status = 0;
        ssize_t len;

275 276 277 278 279
        dup2(fd, 0);
        dup2(fd, 1);
        dup2(fd, 2);

        close(fd);
280 281 282 283 284 285 286

        do {        
            len = write(daemon_pipe, &status, 1);
        } while (len < 0 && errno == EINTR);
        if (len != 1) {
            exit(1);
        }
287 288 289
    }
}

290 291 292 293
void os_set_line_buffering(void)
{
    setvbuf(stdout, NULL, _IOLBF, 0);
}
294

295 296 297 298 299 300 301 302 303 304 305
int qemu_create_pidfile(const char *filename)
{
    char buffer[128];
    int len;
    int fd;

    fd = qemu_open(filename, O_RDWR | O_CREAT, 0600);
    if (fd == -1) {
        return -1;
    }
    if (lockf(fd, F_TLOCK, 0) == -1) {
306
        close(fd);
307 308
        return -1;
    }
309
    len = snprintf(buffer, sizeof(buffer), FMT_pid "\n", getpid());
310
    if (write(fd, buffer, len) != len) {
311
        close(fd);
312 313 314
        return -1;
    }

315
    /* keep pidfile open & locked forever */
316 317
    return 0;
}
318 319 320 321 322

bool is_daemonized(void)
{
    return daemonize;
}
323 324 325 326 327 328 329 330 331 332 333 334

int os_mlock(void)
{
    int ret = 0;

    ret = mlockall(MCL_CURRENT | MCL_FUTURE);
    if (ret < 0) {
        perror("mlockall");
    }

    return ret;
}