sigar-test 0.7.3.1

data/src/sigar_signal.c

@@ -0,0 +1,216 @@
+/*
+ * Copyright (c) 2007 Hyperic, 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 "sigar.h"
+#include "sigar_private.h"
+#include "sigar_util.h"
+
+#ifdef WIN32
+#include <windows.h>
+#endif
+
+#include <signal.h>
+#include <errno.h>
+
+SIGAR_DECLARE(int) sigar_proc_kill(sigar_pid_t pid, int signum)
+{
+#ifdef WIN32
+    int status = -1;
+    HANDLE proc =
+        OpenProcess(PROCESS_ALL_ACCESS,
+                    TRUE, (DWORD)pid);
+
+    if (proc) {
+        switch (signum) {
+          case 0:
+            status = SIGAR_OK;
+            break;
+          default:
+            if (TerminateProcess(proc, signum)) {
+                status = SIGAR_OK;
+            }
+            break;
+        }
+
+        CloseHandle(proc);
+
+        if (status == SIGAR_OK) {
+            return SIGAR_OK;
+        }
+    }
+    return GetLastError();
+#else
+    if (kill(pid, signum) == -1) {
+        return errno;
+    }
+    return SIGAR_OK;
+#endif
+}
+
+SIGAR_DECLARE(int) sigar_signum_get(char *name)
+{
+    if (strnEQ(name, "SIG", 3)) {
+        name += 3;
+    }
+
+    switch (*name) {
+      case 'A':
+#ifdef SIGABRT
+        if (strEQ(name, "ABRT")) return SIGABRT;
+#endif
+#ifdef SIGALRM
+        if (strEQ(name, "ALRM")) return SIGALRM;
+#endif
+        break;
+      case 'B':
+#ifdef SIGBUS
+        if (strEQ(name, "BUS")) return SIGBUS;
+#endif
+        break;
+      case 'C':
+#ifdef SIGCONT
+        if (strEQ(name, "CONT")) return SIGCONT;
+#endif
+#ifdef SIGCHLD
+        if (strEQ(name, "CHLD")) return SIGCHLD;
+#endif
+#ifdef SIGCLD
+        if (strEQ(name, "CLD")) return SIGCLD;
+#endif
+        break;
+      case 'E':
+#ifdef SIGEMT
+        if (strEQ(name, "EMT")) return SIGEMT;
+#endif
+        break;
+      case 'F':
+#ifdef SIGFPE
+        if (strEQ(name, "FPE")) return SIGFPE;
+#endif
+        break;
+      case 'H':
+#ifdef SIGHUP
+        if (strEQ(name, "HUP")) return SIGHUP;
+#endif
+        break;
+      case 'I':
+#ifdef SIGINT
+        if (strEQ(name, "INT")) return SIGINT;
+#endif
+#ifdef SIGILL
+        if (strEQ(name, "ILL")) return SIGILL;
+#endif
+#ifdef SIGIOT
+        if (strEQ(name, "IOT")) return SIGIOT;
+#endif
+#ifdef SIGIO
+        if (strEQ(name, "IO")) return SIGIO;
+#endif
+#ifdef SIGINFO
+        if (strEQ(name, "INFO")) return SIGINFO;
+#endif
+        break;
+      case 'K':
+#ifdef SIGKILL
+        if (strEQ(name, "KILL")) return SIGKILL;
+#endif
+        break;
+      case 'P':
+#ifdef SIGPOLL
+        if (strEQ(name, "POLL")) return SIGPOLL;
+#endif
+#ifdef SIGPIPE
+        if (strEQ(name, "PIPE")) return SIGPIPE;
+#endif
+#ifdef SIGPROF
+        if (strEQ(name, "PROF")) return SIGPROF;
+#endif
+#ifdef SIGPWR
+        if (strEQ(name, "PWR")) return SIGPWR;
+#endif
+        break;
+      case 'Q':
+#ifdef SIGQUIT
+        if (strEQ(name, "QUIT")) return SIGQUIT;
+#endif
+        break;
+      case 'S':
+#ifdef SIGSEGV
+        if (strEQ(name, "SEGV")) return SIGSEGV;
+#endif
+#ifdef SIGSYS
+        if (strEQ(name, "SYS")) return SIGSYS;
+#endif
+#ifdef SIGSTOP
+        if (strEQ(name, "STOP")) return SIGSTOP;
+#endif
+#ifdef SIGSTKFLT
+        if (strEQ(name, "STKFLT")) return SIGSTKFLT;
+#endif
+        break;
+      case 'T':
+#ifdef SIGTRAP
+        if (strEQ(name, "TRAP")) return SIGTRAP;
+#endif
+#ifdef SIGTERM
+        if (strEQ(name, "TERM")) return SIGTERM;
+#endif
+#ifdef SIGTSTP
+        if (strEQ(name, "TSTP")) return SIGTSTP;
+#endif
+#ifdef SIGTTIN
+        if (strEQ(name, "TTIN")) return SIGTTIN;
+#endif
+#ifdef SIGTTOU
+        if (strEQ(name, "TTOU")) return SIGTTOU;
+#endif
+        break;
+      case 'U':
+#ifdef SIGURG
+        if (strEQ(name, "URG")) return SIGURG;
+#endif
+#ifdef SIGUSR1
+        if (strEQ(name, "USR1")) return SIGUSR1;
+#endif
+#ifdef SIGUSR2
+        if (strEQ(name, "USR2")) return SIGUSR2;
+#endif
+        break;
+      case 'V':
+#ifdef SIGVTALRM
+        if (strEQ(name, "VTALRM")) return SIGVTALRM;
+#endif
+        break;
+      case 'W':
+#ifdef SIGWINCH
+        if (strEQ(name, "WINCH")) return SIGWINCH;
+#endif
+        break;
+      case 'X':
+#ifdef SIGXCPU
+        if (strEQ(name, "XCPU")) return SIGXCPU;
+#endif
+#ifdef SIGXFSZ
+        if (strEQ(name, "XFSZ")) return SIGXFSZ;
+#endif
+        break;
+      default:
+        break;
+    }
+
+    return -1;
+}
+