/*
 * Copyright 2004-2011, Ingo Weinhold, ingo_weinhold@gmx.de.
 * Distributed under the terms of the MIT License.
 */

#include <image.h>

#include <errno.h>
#include <pthread.h>
#include <stdlib.h>
#include <string.h>
#include <sys/wait.h>
#include <unistd.h>

#include <errno_private.h>
#include <syscall_utils.h>


extern "C" int
system(const char *command)
{
        if (!command)
                return 1;

        const char *argv[] = { "/bin/sh", "-c", command, NULL };
        int argc = 3;

        thread_id thread = load_image(argc, argv, (const char **)environ);
        if (thread < 0)
                RETURN_AND_SET_ERRNO_TEST_CANCEL(thread);

        // block SIGCHLD ...
        sigset_t mask, oldMask;
        sigemptyset(&mask);
        sigaddset(&mask, SIGCHLD);
        sigprocmask(SIG_BLOCK, &mask, &oldMask);

        // and ignore SIGINT and SIGQUIT while waiting for completion
        struct sigaction intSave, quitSave, sa;
        memset(&sa, 0, sizeof(sa));
        sigemptyset(&sa.sa_mask);
        sa.sa_handler = SIG_IGN;
        sigaction(SIGINT, &sa, &intSave);
        sigaction(SIGQUIT, &sa, &quitSave);

        resume_thread(thread);

        int exitStatus;
        pid_t result;
        while ((result = waitpid(thread, &exitStatus, 0)) < 0
                && errno == B_INTERRUPTED) {
                // waitpid() was interrupted by a signal, retry...
        }

        // unblock and reset signal handlers
        sigprocmask(SIG_SETMASK, &oldMask, NULL);
        sigaction(SIGINT, &intSave, NULL);
        sigaction(SIGQUIT, &quitSave, NULL);

        if (result < 0)
                return -1;

        return exitStatus;
}