Software `/` code `/` prosody

Annotate

util-src/signal.c @ 13744:34ac05f6bd10 13.0

core.configmanager: Fix reporting delayed warnings from global section A Credential in the global section would be stored at delayed_warnings["*/secret"], but get("example.com","secret") would look for delayed_warnings["example.com/secret"] Storing the warnings in the config itself has the unfortunate side-effect that the config now contains util.error objects, which may be awkward if something bypasses get(). Should rawget() also do this filtering? getconfig() too? Currently this only affects prosodyctl, so maybe it won't be much of a problem.

author	Kim Alvefur <zash@zash.se>
date	Sat, 22 Feb 2025 00:08:18 +0100
parent	13618:3118dc02f908

rev	line source
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	1 /*
2405 88f73ee1c46f util.signal: Update header comment for new filename Matthew Wild <mwild1@gmail.com> parents: 2343 diff changeset	2 * signal.c -- Signal Handler Library for Lua
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	3 *
2431 c4d32b35fe60 util.signal: Update version in header, and author's email Matthew Wild <mwild1@gmail.com> parents: 2430 diff changeset	4 * Version: 1.000+changes
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	5 *
2431 c4d32b35fe60 util.signal: Update version in header, and author's email Matthew Wild <mwild1@gmail.com> parents: 2430 diff changeset	6 * Copyright (C) 2007 Patrick J. Donnelly (batrick@batbytes.com)
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	7 *
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	8 * This software is distributed under the same license as Lua 5.0:
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	9 *
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	10 * Permission is hereby granted, free of charge, to any person obtaining a
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	11 * copy of this software and associated documentation files (the "Software"),
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	12 * to deal in the Software without restriction, including without limitation
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	13 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	14 * and/or sell copies of the Software, and to permit persons to whom the
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	15 * Software is furnished to do so, subject to the following conditions:
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	16 *
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	17 * The above copyright notice and this permission notice shall be included
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	18 * in all copies or substantial portions of the Software.
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	19 *
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	20 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	21 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	22 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	23 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	24 * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	25 * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	26 * OTHER DEALINGS IN THE SOFTWARE.
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	27 */
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	28
9150 c1d5f52274cf net, pposix, signal: Check for redefined defines, fix warnings. Emmanuel Gil Peyrot <linkmauve@linkmauve.fr> parents: 8420 diff changeset	29 #ifndef _GNU_SOURCE
7973 703f7f45feb4 util.signal: Enable all GNU features, _DEFAULT_SOURCE doesn't have the desired effect before glibc 2.19 Kim Alvefur <zash@zash.se> parents: 7971 diff changeset	30 #define _GNU_SOURCE
9150 c1d5f52274cf net, pposix, signal: Check for redefined defines, fix warnings. Emmanuel Gil Peyrot <linkmauve@linkmauve.fr> parents: 8420 diff changeset	31 #endif
7931 b619b85e01aa util.pposix, configure: Move _GNU_SOURCE macro into source files Kim Alvefur <zash@zash.se> parents: 7889 diff changeset	32
13618 3118dc02f908 util.signal: Factor out single #define that enables signalfd(2) use Kim Alvefur <zash@zash.se> parents: 13617 diff changeset	33 #ifdef __linux__
3118dc02f908 util.signal: Factor out single #define that enables signalfd(2) use Kim Alvefur <zash@zash.se> parents: 13617 diff changeset	34 #define HAVE_SIGNALFD
3118dc02f908 util.signal: Factor out single #define that enables signalfd(2) use Kim Alvefur <zash@zash.se> parents: 13617 diff changeset	35 #endif
3118dc02f908 util.signal: Factor out single #define that enables signalfd(2) use Kim Alvefur <zash@zash.se> parents: 13617 diff changeset	36
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	37 #include <signal.h>
2459 66f60e69567b util.signal: Using stdlib.h instead of malloc.h. Tobias Markmann <tm@ayena.de> parents: 2432 diff changeset	38 #include <stdlib.h>
13617 7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	39 #include <unistd.h>
13618 3118dc02f908 util.signal: Factor out single #define that enables signalfd(2) use Kim Alvefur <zash@zash.se> parents: 13617 diff changeset	40 #ifdef HAVE_SIGNALFD
13439 1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	41 #include <sys/signalfd.h>
1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	42 #endif
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	43
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	44 #include "lua.h"
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	45 #include "lauxlib.h"
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	46
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	47 #if (LUA_VERSION_NUM < 503)
763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	48 #define lua_isinteger(L, n) lua_isnumber(L, n)
763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	49 #endif
6413 a552f4170aed util-src/.c: Add macro for compiling with Lua 5.2 Kim Alvefur <zash@zash.se>* parents: 6412 diff changeset	50
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	51 #ifndef lsig
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	52
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	53 #define lsig
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	54
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	55 struct lua_signal {
7889 b8d694646597 util-src/.c: Attach pointer to name instead of type Kim Alvefur <zash@zash.se> parents: 7818 diff changeset	56 char name; / name of the signal */
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	57 int sig; /* the signal */
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	58 };
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	59
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	60 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	61
8414 7ea3311ca632 util.signal: Use a static array to keep track of pending signals (fixes #1029) Kim Alvefur <zash@zash.se> parents: 7973 diff changeset	62 #define MAX_PENDING_SIGNALS 32
7ea3311ca632 util.signal: Use a static array to keep track of pending signals (fixes #1029) Kim Alvefur <zash@zash.se> parents: 7973 diff changeset	63
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	64 #define LUA_SIGNAL "lua_signal"
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	65
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	66 static const struct lua_signal lua_signals[] = {
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	67 /* ANSI C signals */
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	68 #ifdef SIGABRT
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	69 {"SIGABRT", SIGABRT},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	70 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	71 #ifdef SIGFPE
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	72 {"SIGFPE", SIGFPE},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	73 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	74 #ifdef SIGILL
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	75 {"SIGILL", SIGILL},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	76 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	77 #ifdef SIGINT
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	78 {"SIGINT", SIGINT},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	79 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	80 #ifdef SIGSEGV
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	81 {"SIGSEGV", SIGSEGV},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	82 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	83 #ifdef SIGTERM
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	84 {"SIGTERM", SIGTERM},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	85 #endif
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	86 /* posix signals */
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	87 #ifdef SIGHUP
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	88 {"SIGHUP", SIGHUP},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	89 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	90 #ifdef SIGQUIT
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	91 {"SIGQUIT", SIGQUIT},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	92 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	93 #ifdef SIGTRAP
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	94 {"SIGTRAP", SIGTRAP},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	95 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	96 #ifdef SIGKILL
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	97 {"SIGKILL", SIGKILL},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	98 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	99 #ifdef SIGUSR1
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	100 {"SIGUSR1", SIGUSR1},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	101 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	102 #ifdef SIGUSR2
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	103 {"SIGUSR2", SIGUSR2},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	104 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	105 #ifdef SIGPIPE
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	106 {"SIGPIPE", SIGPIPE},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	107 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	108 #ifdef SIGALRM
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	109 {"SIGALRM", SIGALRM},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	110 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	111 #ifdef SIGCHLD
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	112 {"SIGCHLD", SIGCHLD},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	113 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	114 #ifdef SIGCONT
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	115 {"SIGCONT", SIGCONT},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	116 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	117 #ifdef SIGSTOP
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	118 {"SIGSTOP", SIGSTOP},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	119 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	120 #ifdef SIGTTIN
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	121 {"SIGTTIN", SIGTTIN},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	122 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	123 #ifdef SIGTTOU
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	124 {"SIGTTOU", SIGTTOU},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	125 #endif
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	126 /* some BSD signals */
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	127 #ifdef SIGIOT
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	128 {"SIGIOT", SIGIOT},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	129 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	130 #ifdef SIGBUS
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	131 {"SIGBUS", SIGBUS},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	132 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	133 #ifdef SIGCLD
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	134 {"SIGCLD", SIGCLD},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	135 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	136 #ifdef SIGURG
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	137 {"SIGURG", SIGURG},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	138 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	139 #ifdef SIGXCPU
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	140 {"SIGXCPU", SIGXCPU},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	141 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	142 #ifdef SIGXFSZ
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	143 {"SIGXFSZ", SIGXFSZ},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	144 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	145 #ifdef SIGVTALRM
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	146 {"SIGVTALRM", SIGVTALRM},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	147 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	148 #ifdef SIGPROF
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	149 {"SIGPROF", SIGPROF},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	150 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	151 #ifdef SIGWINCH
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	152 {"SIGWINCH", SIGWINCH},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	153 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	154 #ifdef SIGPOLL
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	155 {"SIGPOLL", SIGPOLL},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	156 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	157 #ifdef SIGIO
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	158 {"SIGIO", SIGIO},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	159 #endif
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	160 /* add odd signals */
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	161 #ifdef SIGSTKFLT
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	162 {"SIGSTKFLT", SIGSTKFLT}, /* stack fault */
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	163 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	164 #ifdef SIGSYS
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	165 {"SIGSYS", SIGSYS},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	166 #endif
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	167 {NULL, 0}
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	168 };
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	169
7889 b8d694646597 util-src/.c: Attach pointer to name instead of type Kim Alvefur <zash@zash.se> parents: 7818 diff changeset	170 static lua_State *Lsig = NULL;
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	171 static lua_Hook Hsig = NULL;
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	172 static int Hmask = 0;
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	173 static int Hcount = 0;
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	174
10480 94cacf9fd0ae util..c: Add static qualifiers everywhere Emmanuel Gil Peyrot <linkmauve@linkmauve.fr>* parents: 9151 diff changeset	175 static int signals[MAX_PENDING_SIGNALS];
94cacf9fd0ae util..c: Add static qualifiers everywhere Emmanuel Gil Peyrot <linkmauve@linkmauve.fr>* parents: 9151 diff changeset	176 static int nsig = 0;
2430 69d377c84fe3 util.signal: Queue up multiple signals, instead of trampling on the previous debug hook (and never clearing our own) Matthew Wild <mwild1@gmail.com> parents: 2405 diff changeset	177
7889 b8d694646597 util-src/.c: Attach pointer to name instead of type Kim Alvefur <zash@zash.se> parents: 7818 diff changeset	178 static void sighook(lua_State L, lua_Debug ar) {
9151 fee3933ff346 pposix, signal: Ignore unused arguments. Emmanuel Gil Peyrot <linkmauve@linkmauve.fr> parents: 9150 diff changeset	179 (void)ar;
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	180 /* restore the old hook */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	181 lua_sethook(L, Hsig, Hmask, Hcount);
2432 1e045b3e9dce util.signal: Restore the old debug hook earlier, just in case we receive another signal between clearing the signal queue and restoring it Matthew Wild <mwild1@gmail.com> parents: 2431 diff changeset	182
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	183 lua_pushstring(L, LUA_SIGNAL);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	184 lua_gettable(L, LUA_REGISTRYINDEX);
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	185
8420 fb27aff6d491 util.signal: Fix loop (fixes #1047) Kim Alvefur <zash@zash.se> parents: 8414 diff changeset	186 for(int i = 0; i < nsig; i++) {
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	187 lua_pushinteger(L, signals[i]);
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	188 lua_gettable(L, -2);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	189 lua_call(L, 0, 0);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	190 };
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	191
8414 7ea3311ca632 util.signal: Use a static array to keep track of pending signals (fixes #1029) Kim Alvefur <zash@zash.se> parents: 7973 diff changeset	192 nsig = 0;
7ea3311ca632 util.signal: Use a static array to keep track of pending signals (fixes #1029) Kim Alvefur <zash@zash.se> parents: 7973 diff changeset	193
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	194 lua_pop(L, 1); /* pop lua_signal table */
2430 69d377c84fe3 util.signal: Queue up multiple signals, instead of trampling on the previous debug hook (and never clearing our own) Matthew Wild <mwild1@gmail.com> parents: 2405 diff changeset	195
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	196 }
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	197
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	198 static void handle(int sig) {
8414 7ea3311ca632 util.signal: Use a static array to keep track of pending signals (fixes #1029) Kim Alvefur <zash@zash.se> parents: 7973 diff changeset	199 if(nsig == 0) {
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	200 /* Store the existing debug hook (if any) and its parameters */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	201 Hsig = lua_gethook(Lsig);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	202 Hmask = lua_gethookmask(Lsig);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	203 Hcount = lua_gethookcount(Lsig);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	204
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	205 /* Set our new debug hook */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	206 lua_sethook(Lsig, sighook, LUA_MASKCALL \| LUA_MASKRET \| LUA_MASKCOUNT, 1);
8414 7ea3311ca632 util.signal: Use a static array to keep track of pending signals (fixes #1029) Kim Alvefur <zash@zash.se> parents: 7973 diff changeset	207 }
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	208
8414 7ea3311ca632 util.signal: Use a static array to keep track of pending signals (fixes #1029) Kim Alvefur <zash@zash.se> parents: 7973 diff changeset	209 if(nsig < MAX_PENDING_SIGNALS) {
8420 fb27aff6d491 util.signal: Fix loop (fixes #1047) Kim Alvefur <zash@zash.se> parents: 8414 diff changeset	210 signals[nsig++] = sig;
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	211 }
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	212 }
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	213
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	214 /*
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	215 * l_signal == signal(signal [, func [, chook]])
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	216 *
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	217 * signal = signal number or string
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	218 * func = Lua function to call
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	219 * chook = catch within C functions
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	220 * if caught, Lua function _must_
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	221 * exit, as the stack is most likely
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	222 * in an unstable state.
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	223 */
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	224
7889 b8d694646597 util-src/.c: Attach pointer to name instead of type Kim Alvefur <zash@zash.se> parents: 7818 diff changeset	225 static int l_signal(lua_State *L) {
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	226 int args = lua_gettop(L);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	227 int t, sig; /* type, signal */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	228
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	229 /* get type of signal */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	230 luaL_checkany(L, 1);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	231 t = lua_type(L, 1);
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	232
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	233 if(t == LUA_TNUMBER) {
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	234 sig = (int) lua_tointeger(L, 1);
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	235 } else if(t == LUA_TSTRING) {
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	236 lua_pushstring(L, LUA_SIGNAL);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	237 lua_gettable(L, LUA_REGISTRYINDEX);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	238 lua_pushvalue(L, 1);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	239 lua_gettable(L, -2);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	240
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	241 if(!lua_isinteger(L, -1)) {
6620 50eaefeec013 util-src/.c: Per convention call luaL_error() as argument to return Florian Zeitz <florob@babelmonkeys.de>* parents: 6615 diff changeset	242 return luaL_error(L, "invalid signal string");
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	243 }
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	244
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	245 sig = (int) lua_tointeger(L, -1);
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	246 lua_pop(L, 1); /* get rid of number we pushed */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	247 } else {
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	248 luaL_checknumber(L, 1); /* will always error, with good error msg */
6620 50eaefeec013 util-src/.c: Per convention call luaL_error() as argument to return Florian Zeitz <florob@babelmonkeys.de>* parents: 6615 diff changeset	249 return luaL_error(L, "unreachable: invalid number was accepted");
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	250 }
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	251
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	252 /* set handler */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	253 if(args == 1 \|\| lua_isnil(L, 2)) { /* clear handler */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	254 lua_pushstring(L, LUA_SIGNAL);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	255 lua_gettable(L, LUA_REGISTRYINDEX);
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	256 lua_pushinteger(L, sig);
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	257 lua_gettable(L, -2); /* return old handler */
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	258 lua_pushinteger(L, sig);
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	259 lua_pushnil(L);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	260 lua_settable(L, -4);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	261 lua_remove(L, -2); /* remove LUA_SIGNAL table */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	262 signal(sig, SIG_DFL);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	263 } else {
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	264 luaL_checktype(L, 2, LUA_TFUNCTION);
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	265
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	266 lua_pushstring(L, LUA_SIGNAL);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	267 lua_gettable(L, LUA_REGISTRYINDEX);
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	268
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	269 lua_pushinteger(L, sig);
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	270 lua_pushvalue(L, 2);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	271 lua_settable(L, -3);
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	272
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	273 /* Set the state for the handler */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	274 Lsig = L;
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	275
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	276 if(lua_toboolean(L, 3)) { /* c hook? */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	277 if(signal(sig, handle) == SIG_ERR) {
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	278 lua_pushboolean(L, 0);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	279 } else {
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	280 lua_pushboolean(L, 1);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	281 }
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	282 } else { /* lua_hook */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	283 if(signal(sig, handle) == SIG_ERR) {
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	284 lua_pushboolean(L, 0);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	285 } else {
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	286 lua_pushboolean(L, 1);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	287 }
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	288 }
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	289 }
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	290
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	291 return 1;
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	292 }
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	293
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	294 /*
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	295 * l_raise == raise(signal)
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	296 *
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	297 * signal = signal number or string
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	298 */
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	299
7889 b8d694646597 util-src/.c: Attach pointer to name instead of type Kim Alvefur <zash@zash.se> parents: 7818 diff changeset	300 static int l_raise(lua_State *L) {
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	301 /* int args = lua_gettop(L); */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	302 int t = 0; /* type */
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	303 lua_Integer ret;
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	304
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	305 luaL_checkany(L, 1);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	306
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	307 t = lua_type(L, 1);
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	308
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	309 if(t == LUA_TNUMBER) {
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	310 ret = (lua_Integer) raise((int) lua_tointeger(L, 1));
763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	311 lua_pushinteger(L, ret);
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	312 } else if(t == LUA_TSTRING) {
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	313 lua_pushstring(L, LUA_SIGNAL);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	314 lua_gettable(L, LUA_REGISTRYINDEX);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	315 lua_pushvalue(L, 1);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	316 lua_gettable(L, -2);
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	317
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	318 if(!lua_isnumber(L, -1)) {
6620 50eaefeec013 util-src/.c: Per convention call luaL_error() as argument to return Florian Zeitz <florob@babelmonkeys.de>* parents: 6615 diff changeset	319 return luaL_error(L, "invalid signal string");
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	320 }
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	321
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	322 ret = (lua_Integer) raise((int) lua_tointeger(L, -1));
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	323 lua_pop(L, 1); /* get rid of number we pushed */
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	324 lua_pushinteger(L, ret);
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	325 } else {
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	326 luaL_checknumber(L, 1); /* will always error, with good error msg */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	327 }
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	328
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	329 return 1;
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	330 }
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	331
3282 8ef3beed0779 util.signal: Make kill() available on OS X (thanks darkrain). Waqas Hussain <waqas20@gmail.com> parents: 3274 diff changeset	332 #if defined(__unix__) \|\| defined(__APPLE__)
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	333
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	334 /* define some posix only functions */
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	335
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	336 /*
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	337 * l_kill == kill(pid, signal)
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	338 *
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	339 * pid = process id
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	340 * signal = signal number or string
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	341 */
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	342
7889 b8d694646597 util-src/.c: Attach pointer to name instead of type Kim Alvefur <zash@zash.se> parents: 7818 diff changeset	343 static int l_kill(lua_State *L) {
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	344 int t; /* type */
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	345 lua_Integer ret; /* return value */
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	346
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	347 luaL_checknumber(L, 1); /* must be int for pid */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	348 luaL_checkany(L, 2); /* check for a second arg */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	349
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	350 t = lua_type(L, 2);
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	351
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	352 if(t == LUA_TNUMBER) {
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	353 ret = (lua_Integer) kill((int) lua_tointeger(L, 1),
763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	354 (int) lua_tointeger(L, 2));
763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	355 lua_pushinteger(L, ret);
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	356 } else if(t == LUA_TSTRING) {
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	357 lua_pushstring(L, LUA_SIGNAL);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	358 lua_gettable(L, LUA_REGISTRYINDEX);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	359 lua_pushvalue(L, 2);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	360 lua_gettable(L, -2);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	361
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	362 if(!lua_isnumber(L, -1)) {
6620 50eaefeec013 util-src/.c: Per convention call luaL_error() as argument to return Florian Zeitz <florob@babelmonkeys.de>* parents: 6615 diff changeset	363 return luaL_error(L, "invalid signal string");
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	364 }
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	365
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	366 ret = (lua_Integer) kill((int) lua_tointeger(L, 1),
763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	367 (int) lua_tointeger(L, -1));
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	368 lua_pop(L, 1); /* get rid of number we pushed */
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	369 lua_pushinteger(L, ret);
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	370 } else {
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	371 luaL_checknumber(L, 2); /* will always error, with good error msg */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	372 }
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	373
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	374 return 1;
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	375 }
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	376
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	377 #endif
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	378
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	379 struct lsignalfd {
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	380 int fd;
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	381 sigset_t mask;
13618 3118dc02f908 util.signal: Factor out single #define that enables signalfd(2) use Kim Alvefur <zash@zash.se> parents: 13617 diff changeset	382 #ifndef HAVE_SIGNALFD
13617 7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	383 int write_fd;
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	384 #endif
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	385 };
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	386
13618 3118dc02f908 util.signal: Factor out single #define that enables signalfd(2) use Kim Alvefur <zash@zash.se> parents: 13617 diff changeset	387 #ifndef HAVE_SIGNALFD
13617 7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	388 #define MAX_SIGNALFD 32
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	389 struct lsignalfd signalfds[MAX_SIGNALFD];
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	390 static int signalfd_num = 0;
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	391 static void signal2fd(int sig) {
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	392 for(int i = 0; i < signalfd_num; i++) {
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	393 if(sigismember(&signalfds[i].mask, sig)) {
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	394 write(signalfds[i].write_fd, &sig, sizeof(sig));
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	395 }
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	396 }
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	397 }
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	398 #endif
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	399
13439 1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	400 static int l_signalfd(lua_State *L) {
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	401 struct lsignalfd *sfd = lua_newuserdata(L, sizeof(struct lsignalfd));
13617 7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	402 int sig = luaL_checkinteger(L, 1);
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	403
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	404 sigemptyset(&sfd->mask);
13617 7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	405 sigaddset(&sfd->mask, sig);
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	406
13618 3118dc02f908 util.signal: Factor out single #define that enables signalfd(2) use Kim Alvefur <zash@zash.se> parents: 13617 diff changeset	407 #ifdef HAVE_SIGNALFD
13448 93b4ce0115f0 util.signal: Fail signalfd() if unable to change signal mask Kim Alvefur <zash@zash.se> parents: 13441 diff changeset	408 if (sigprocmask(SIG_BLOCK, &sfd->mask, NULL) != 0) {
93b4ce0115f0 util.signal: Fail signalfd() if unable to change signal mask Kim Alvefur <zash@zash.se> parents: 13441 diff changeset	409 lua_pushnil(L);
93b4ce0115f0 util.signal: Fail signalfd() if unable to change signal mask Kim Alvefur <zash@zash.se> parents: 13441 diff changeset	410 return 1;
93b4ce0115f0 util.signal: Fail signalfd() if unable to change signal mask Kim Alvefur <zash@zash.se> parents: 13441 diff changeset	411 };
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	412
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	413 sfd->fd = signalfd(-1, &sfd->mask, SFD_NONBLOCK);
13439 1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	414
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	415 if(sfd->fd == -1) {
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	416 lua_pushnil(L);
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	417 return 1;
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	418 }
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	419
13617 7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	420 #else
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	421
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	422 if(signalfd_num >= MAX_SIGNALFD) {
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	423 lua_pushnil(L);
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	424 return 1;
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	425 }
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	426
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	427 if(signal(sig, signal2fd) == SIG_ERR) {
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	428 lua_pushnil(L);
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	429 return 1;
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	430 }
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	431
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	432 int pipefd[2];
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	433
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	434 if(pipe(pipefd) == -1) {
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	435 lua_pushnil(L);
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	436 return 1;
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	437 }
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	438
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	439 sfd->fd = pipefd[0];
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	440 sfd->write_fd = pipefd[1];
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	441 signalfds[signalfd_num++] = *sfd;
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	442 #endif
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	443
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	444 luaL_setmetatable(L, "signalfd");
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	445 return 1;
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	446 }
13439 1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	447
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	448 static int l_signalfd_getfd(lua_State *L) {
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	449 struct lsignalfd *sfd = luaL_checkudata(L, 1, "signalfd");
13439 1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	450
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	451 if (sfd->fd == -1) {
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	452 lua_pushnil(L);
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	453 return 1;
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	454 }
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	455
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	456 lua_pushinteger(L, sfd->fd);
13439 1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	457 return 1;
1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	458 }
1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	459
1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	460 static int l_signalfd_read(lua_State *L) {
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	461 struct lsignalfd *sfd = luaL_checkudata(L, 1, "signalfd");
13618 3118dc02f908 util.signal: Factor out single #define that enables signalfd(2) use Kim Alvefur <zash@zash.se> parents: 13617 diff changeset	462 #ifdef HAVE_SIGNALFD
13439 1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	463 struct signalfd_siginfo siginfo;
1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	464
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	465 if(read(sfd->fd, &siginfo, sizeof(siginfo)) < 0) {
13439 1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	466 return 0;
1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	467 }
1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	468
13617 7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	469
13439 1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	470 lua_pushinteger(L, siginfo.ssi_signo);
1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	471 return 1;
13617 7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	472
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	473 #else
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	474 int signo;
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	475
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	476 if(read(sfd->fd, &signo, sizeof(int)) < 0) {
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	477 return 0;
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	478 }
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	479
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	480 lua_pushinteger(L, signo);
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	481 return 1;
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	482 #endif
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	483
13439 1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	484 }
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	485
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	486 static int l_signalfd_close(lua_State *L) {
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	487 struct lsignalfd *sfd = luaL_checkudata(L, 1, "signalfd");
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	488
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	489 if(close(sfd->fd) != 0) {
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	490 lua_pushboolean(L, 0);
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	491 return 1;
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	492 }
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	493
13618 3118dc02f908 util.signal: Factor out single #define that enables signalfd(2) use Kim Alvefur <zash@zash.se> parents: 13617 diff changeset	494 #ifndef HAVE_SIGNALFD
13617 7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	495
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	496 if(close(sfd->write_fd) != 0) {
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	497 lua_pushboolean(L, 0);
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	498 return 1;
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	499 }
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	500
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	501 for(int i = signalfd_num; i > 0; i--) {
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	502 if(signalfds[i].fd == sfd->fd) {
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	503 signalfds[i] = signalfds[signalfd_num--];
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	504 }
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	505 }
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	506
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	507 #endif
7722a3aa2ff5 util.signal: Implement signalfd for BSD Kim Alvefur <zash@zash.se>* parents: 13448 diff changeset	508
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	509 sfd->fd = -1;
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	510 lua_pushboolean(L, 1);
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	511 return 1;
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	512 }
13439 1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	513
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	514 static const struct luaL_Reg lsignal_lib[] = {
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	515 {"signal", l_signal},
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	516 {"raise", l_raise},
3282 8ef3beed0779 util.signal: Make kill() available on OS X (thanks darkrain). Waqas Hussain <waqas20@gmail.com> parents: 3274 diff changeset	517 #if defined(__unix__) \|\| defined(__APPLE__)
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	518 {"kill", l_kill},
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	519 #endif
13439 1e229d710a3c util.signal: Add support for signalfd(2) on Linux Kim Alvefur <zash@zash.se> parents: 12976 diff changeset	520 {"signalfd", l_signalfd},
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	521 {NULL, NULL}
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	522 };
8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	523
12976 a187600ec7d6 util: Add compat for prosody module name change to C sources Kim Alvefur <zash@zash.se> parents: 12575 diff changeset	524 int luaopen_prosody_util_signal(lua_State *L) {
7818 54669df178c2 util-src: Make C modules assert that the Lua runtime matches what it was compiled for Kim Alvefur <zash@zash.se> parents: 6789 diff changeset	525 luaL_checkversion(L);
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	526 int i = 0;
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	527
13441 6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	528 luaL_newmetatable(L, "signalfd");
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	529 lua_pushcfunction(L, l_signalfd_close);
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	530 lua_setfield(L, -2, "__gc");
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	531 lua_createtable(L, 0, 1);
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	532 {
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	533 lua_pushcfunction(L, l_signalfd_getfd);
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	534 lua_setfield(L, -2, "getfd");
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	535 lua_pushcfunction(L, l_signalfd_read);
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	536 lua_setfield(L, -2, "read");
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	537 lua_pushcfunction(L, l_signalfd_close);
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	538 lua_setfield(L, -2, "close");
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	539 }
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	540 lua_setfield(L, -2, "__index");
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	541 lua_pop(L, 1);
6d96b6eeee5a util.signal: Wrap signalfd in an userdatum for gc handling etc Kim Alvefur <zash@zash.se> parents: 13439 diff changeset	542
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	543 /* add the library */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	544 lua_newtable(L);
6789 6b180e77c97a util-src/.c: Invert Lua 5.2 compat to be 5.2+ by default and a macro to support 5.1 Kim Alvefur <zash@zash.se>* parents: 6620 diff changeset	545 luaL_setfuncs(L, lsignal_lib, 0);
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	546
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	547 /* push lua_signals table into the registry */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	548 /* put the signals inside the library table too,
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	549 * they are only a reference */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	550 lua_pushstring(L, LUA_SIGNAL);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	551 lua_newtable(L);
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	552
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	553 while(lua_signals[i].name != NULL) {
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	554 /* registry table */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	555 lua_pushstring(L, lua_signals[i].name);
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	556 lua_pushinteger(L, lua_signals[i].sig);
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	557 lua_settable(L, -3);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	558 /* signal table */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	559 lua_pushstring(L, lua_signals[i].name);
10799 763bb2ce3f60 util.pposix,signal: Pass around various OS numbers as integers [Lua 5.3] Kim Alvefur <zash@zash.se> parents: 10480 diff changeset	560 lua_pushinteger(L, lua_signals[i].sig);
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	561 lua_settable(L, -5);
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	562 i++;
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	563 }
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	564
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	565 /* add newtable to the registry */
8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	566 lua_settable(L, LUA_REGISTRYINDEX);
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	567
6615 8e4572a642cb util-src/.c: astyle --indent=tab --brackets=attach --indent-switches --break-blocks --pad-oper --unpad-paren --add-brackets --align-pointer=type --lineend=linux Kim Alvefur <zash@zash.se>* parents: 6413 diff changeset	568 return 1;
988 8cb9a0d59e78 util.lsignal: Add lsignal library for catching POSIX signals Matthew Wild <mwild1@gmail.com> parents: diff changeset	569 }
12976 a187600ec7d6 util: Add compat for prosody module name change to C sources Kim Alvefur <zash@zash.se> parents: 12575 diff changeset	570 int luaopen_util_signal(lua_State *L) {
a187600ec7d6 util: Add compat for prosody module name change to C sources Kim Alvefur <zash@zash.se> parents: 12575 diff changeset	571 return luaopen_prosody_util_signal(L);
a187600ec7d6 util: Add compat for prosody module name change to C sources Kim Alvefur <zash@zash.se> parents: 12575 diff changeset	572 }

prosody

34ac05f6bd10

util-src/signal.c

Software / code / prosody

Annotate

util-src/signal.c @ 13744:34ac05f6bd10 13.0

Software `/` code `/` prosody