/*
 * Copyright (c) 2021, Oracle and/or its affiliates. All rights reserved.
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
 *
 * This code is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License version 2 only, as
 * published by the Free Software Foundation.
 *
 * This code is distributed in the hope that it will be useful, but WITHOUT
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
 * version 2 for more details (a copy is included in the LICENSE file that
 * accompanied this code).
 *
 * You should have received a copy of the GNU General Public License version
 * 2 along with this work; if not, write to the Free Software Foundation,
 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
 *
 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
 * or visit www.oracle.com if you need additional information or have any
 * questions.
 */

#include <errno.h>
#include "jvmti.h"
#include <signal.h>
#include <stdio.h>
#include <unistd.h>

static const struct { int sig; const char* name; } signals[] = {
    { SIGABRT, "SIGABRT" }, { SIGALRM, "SIGALRM" }, { SIGBUS, "SIGBUS" }, { SIGCHLD, "SIGCHLD" }, { SIGCONT, "SIGCONT" },
    { SIGFPE, "SIGFPE" }, { SIGHUP, "SIGHUP" }, { SIGILL, "SIGILL" }, { SIGINT, "SIGINT" }, { SIGKILL, "SIGKILL" },
    { SIGPIPE, "SIGPIPE" }, { SIGQUIT, "SIGQUIT" }, { SIGSEGV, "SIGSEGV" }, { SIGSTOP, "SIGSTOP" }, { SIGTERM, "SIGTERM" },
    { SIGTSTP, "SIGTSTP" }, { SIGTTIN, "SIGTTIN" }, { SIGTTOU, "SIGTTOU" }, { SIGUSR1, "SIGUSR1" }, { SIGUSR2, "SIGUSR2" },
#ifdef SIGPOLL
    { SIGPOLL, "SIGPOLL" },
#endif
    { SIGPROF, "SIGPROF" }, { SIGSYS, "SIGSYS" }, { SIGTRAP, "SIGTRAP" }, { SIGURG, "SIGURG" }, { SIGVTALRM, "SIGVTALRM" },
    { SIGXCPU, "SIGXCPU" }, { SIGXFSZ, "SIGXFSZ" }, { -1, NULL }
};

int main(int argc, char** argv) {

    printf("PID: %d\n", getpid());

    sigset_t current_mask;
    sigemptyset(&current_mask);
    if (sigprocmask(SIG_BLOCK /* ignored */, NULL, &current_mask) != 0) {
        printf("sigprocmask %d\n", errno);
        return -1;
    }

    for (int n = 0; signals[n].sig != -1; n++) {
        printf("%s: ", signals[n].name);
        if (sigismember(&current_mask, signals[n].sig)) {
            printf("blocked ");
        }
        struct sigaction act;
        if (sigaction(signals[n].sig, NULL, &act) != 0) {
            printf("sigaction %d\n", errno);
            printf("\n");
            continue;
        }
        const void* const handler = (act.sa_flags & SA_SIGINFO ?
                                    (void*)act.sa_sigaction : (void*)act.sa_handler);
        if (handler == (void*)SIG_DFL) {
            printf("default ");
        } else if (handler == (void*)SIG_IGN) {
            printf("ignore ");
        } else if (handler == (void*)SIG_HOLD) {
            printf("hold ");
        } else {
            printf("%p ", handler);
        }
#ifdef _AIX
        printf("%X\n", act.sa_flags);
#else
        printf("%X %X\n", act.sa_flags, act.sa_mask);
#endif
    }

    return 0;
}