mirror of
https://github.com/php/php-src.git
synced 2024-12-14 12:26:19 +08:00
1387 lines
38 KiB
C
1387 lines
38 KiB
C
/*
|
|
+----------------------------------------------------------------------+
|
|
| PHP Version 7 |
|
|
+----------------------------------------------------------------------+
|
|
| Copyright (c) 1997-2016 The PHP Group |
|
|
+----------------------------------------------------------------------+
|
|
| This source file is subject to version 3.01 of the PHP license, |
|
|
| that is bundled with this package in the file LICENSE, and is |
|
|
| available through the world-wide-web at the following url: |
|
|
| http://www.php.net/license/3_01.txt |
|
|
| If you did not receive a copy of the PHP license and are unable to |
|
|
| obtain it through the world-wide-web, please send a note to |
|
|
| license@php.net so we can mail you a copy immediately. |
|
|
+----------------------------------------------------------------------+
|
|
| Author: Jason Greene <jason@inetgurus.net> |
|
|
+----------------------------------------------------------------------+
|
|
*/
|
|
|
|
/* $Id$ */
|
|
|
|
#define PCNTL_DEBUG 0
|
|
|
|
#if PCNTL_DEBUG
|
|
#define DEBUG_OUT printf("DEBUG: ");printf
|
|
#define IF_DEBUG(z) z
|
|
#else
|
|
#define IF_DEBUG(z)
|
|
#endif
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include "php.h"
|
|
#include "php_ini.h"
|
|
#include "ext/standard/info.h"
|
|
#include "php_pcntl.h"
|
|
#include "php_signal.h"
|
|
#include "php_ticks.h"
|
|
|
|
#if HAVE_GETPRIORITY || HAVE_SETPRIORITY || HAVE_WAIT3
|
|
#include <sys/wait.h>
|
|
#include <sys/time.h>
|
|
#include <sys/resource.h>
|
|
#endif
|
|
|
|
#include <errno.h>
|
|
|
|
ZEND_DECLARE_MODULE_GLOBALS(pcntl)
|
|
static PHP_GINIT_FUNCTION(pcntl);
|
|
|
|
/* {{{ arginfo */
|
|
ZEND_BEGIN_ARG_INFO(arginfo_pcntl_void, 0)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_waitpid, 0, 0, 2)
|
|
ZEND_ARG_INFO(0, pid)
|
|
ZEND_ARG_INFO(1, status)
|
|
ZEND_ARG_INFO(0, options)
|
|
ZEND_ARG_INFO(1, rusage)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_wait, 0, 0, 1)
|
|
ZEND_ARG_INFO(1, status)
|
|
ZEND_ARG_INFO(0, options)
|
|
ZEND_ARG_INFO(1, rusage)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_signal, 0, 0, 2)
|
|
ZEND_ARG_INFO(0, signo)
|
|
ZEND_ARG_INFO(0, handler)
|
|
ZEND_ARG_INFO(0, restart_syscalls)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_sigprocmask, 0, 0, 2)
|
|
ZEND_ARG_INFO(0, how)
|
|
ZEND_ARG_INFO(0, set)
|
|
ZEND_ARG_INFO(1, oldset)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_sigwaitinfo, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, set)
|
|
ZEND_ARG_INFO(1, info)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_sigtimedwait, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, set)
|
|
ZEND_ARG_INFO(1, info)
|
|
ZEND_ARG_INFO(0, seconds)
|
|
ZEND_ARG_INFO(0, nanoseconds)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_wifexited, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, status)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_wifstopped, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, status)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
#ifdef HAVE_WCONTINUED
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_wifcontinued, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, status)
|
|
ZEND_END_ARG_INFO()
|
|
#endif
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_wifsignaled, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, status)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_wifexitstatus, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, status)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_wtermsig, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, status)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_wstopsig, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, status)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_exec, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, path)
|
|
ZEND_ARG_INFO(0, args)
|
|
ZEND_ARG_INFO(0, envs)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_alarm, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, seconds)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
#ifdef HAVE_GETPRIORITY
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_getpriority, 0, 0, 0)
|
|
ZEND_ARG_INFO(0, pid)
|
|
ZEND_ARG_INFO(0, process_identifier)
|
|
ZEND_END_ARG_INFO()
|
|
#endif
|
|
|
|
#ifdef HAVE_SETPRIORITY
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_setpriority, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, priority)
|
|
ZEND_ARG_INFO(0, pid)
|
|
ZEND_ARG_INFO(0, process_identifier)
|
|
ZEND_END_ARG_INFO()
|
|
#endif
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_pcntl_strerror, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, errno)
|
|
ZEND_END_ARG_INFO()
|
|
/* }}} */
|
|
|
|
const zend_function_entry pcntl_functions[] = {
|
|
PHP_FE(pcntl_fork, arginfo_pcntl_void)
|
|
PHP_FE(pcntl_waitpid, arginfo_pcntl_waitpid)
|
|
PHP_FE(pcntl_wait, arginfo_pcntl_wait)
|
|
PHP_FE(pcntl_signal, arginfo_pcntl_signal)
|
|
PHP_FE(pcntl_signal_dispatch, arginfo_pcntl_void)
|
|
PHP_FE(pcntl_wifexited, arginfo_pcntl_wifexited)
|
|
PHP_FE(pcntl_wifstopped, arginfo_pcntl_wifstopped)
|
|
PHP_FE(pcntl_wifsignaled, arginfo_pcntl_wifsignaled)
|
|
PHP_FE(pcntl_wexitstatus, arginfo_pcntl_wifexitstatus)
|
|
PHP_FE(pcntl_wtermsig, arginfo_pcntl_wtermsig)
|
|
PHP_FE(pcntl_wstopsig, arginfo_pcntl_wstopsig)
|
|
PHP_FE(pcntl_exec, arginfo_pcntl_exec)
|
|
PHP_FE(pcntl_alarm, arginfo_pcntl_alarm)
|
|
PHP_FE(pcntl_get_last_error, arginfo_pcntl_void)
|
|
PHP_FALIAS(pcntl_errno, pcntl_get_last_error, NULL)
|
|
PHP_FE(pcntl_strerror, arginfo_pcntl_strerror)
|
|
#ifdef HAVE_GETPRIORITY
|
|
PHP_FE(pcntl_getpriority, arginfo_pcntl_getpriority)
|
|
#endif
|
|
#ifdef HAVE_SETPRIORITY
|
|
PHP_FE(pcntl_setpriority, arginfo_pcntl_setpriority)
|
|
#endif
|
|
#ifdef HAVE_SIGPROCMASK
|
|
PHP_FE(pcntl_sigprocmask, arginfo_pcntl_sigprocmask)
|
|
#endif
|
|
#if HAVE_SIGWAITINFO && HAVE_SIGTIMEDWAIT
|
|
PHP_FE(pcntl_sigwaitinfo, arginfo_pcntl_sigwaitinfo)
|
|
PHP_FE(pcntl_sigtimedwait, arginfo_pcntl_sigtimedwait)
|
|
#endif
|
|
#ifdef HAVE_WCONTINUED
|
|
PHP_FE(pcntl_wifcontinued, arginfo_pcntl_wifcontinued)
|
|
#endif
|
|
PHP_FE_END
|
|
};
|
|
|
|
zend_module_entry pcntl_module_entry = {
|
|
STANDARD_MODULE_HEADER,
|
|
"pcntl",
|
|
pcntl_functions,
|
|
PHP_MINIT(pcntl),
|
|
PHP_MSHUTDOWN(pcntl),
|
|
PHP_RINIT(pcntl),
|
|
PHP_RSHUTDOWN(pcntl),
|
|
PHP_MINFO(pcntl),
|
|
PHP_PCNTL_VERSION,
|
|
PHP_MODULE_GLOBALS(pcntl),
|
|
PHP_GINIT(pcntl),
|
|
NULL,
|
|
NULL,
|
|
STANDARD_MODULE_PROPERTIES_EX
|
|
};
|
|
|
|
#ifdef COMPILE_DL_PCNTL
|
|
ZEND_GET_MODULE(pcntl)
|
|
#endif
|
|
|
|
static void pcntl_signal_handler(int);
|
|
static void pcntl_signal_dispatch();
|
|
|
|
void php_register_signal_constants(INIT_FUNC_ARGS)
|
|
{
|
|
|
|
/* Wait Constants */
|
|
#ifdef WNOHANG
|
|
REGISTER_LONG_CONSTANT("WNOHANG", (zend_long) WNOHANG, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef WUNTRACED
|
|
REGISTER_LONG_CONSTANT("WUNTRACED", (zend_long) WUNTRACED, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef HAVE_WCONTINUED
|
|
REGISTER_LONG_CONSTANT("WCONTINUED", (zend_long) WCONTINUED, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
|
|
/* Signal Constants */
|
|
REGISTER_LONG_CONSTANT("SIG_IGN", (zend_long) SIG_IGN, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIG_DFL", (zend_long) SIG_DFL, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIG_ERR", (zend_long) SIG_ERR, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGHUP", (zend_long) SIGHUP, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGINT", (zend_long) SIGINT, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGQUIT", (zend_long) SIGQUIT, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGILL", (zend_long) SIGILL, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGTRAP", (zend_long) SIGTRAP, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGABRT", (zend_long) SIGABRT, CONST_CS | CONST_PERSISTENT);
|
|
#ifdef SIGIOT
|
|
REGISTER_LONG_CONSTANT("SIGIOT", (zend_long) SIGIOT, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
REGISTER_LONG_CONSTANT("SIGBUS", (zend_long) SIGBUS, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGFPE", (zend_long) SIGFPE, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGKILL", (zend_long) SIGKILL, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGUSR1", (zend_long) SIGUSR1, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGSEGV", (zend_long) SIGSEGV, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGUSR2", (zend_long) SIGUSR2, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGPIPE", (zend_long) SIGPIPE, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGALRM", (zend_long) SIGALRM, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGTERM", (zend_long) SIGTERM, CONST_CS | CONST_PERSISTENT);
|
|
#ifdef SIGSTKFLT
|
|
REGISTER_LONG_CONSTANT("SIGSTKFLT",(zend_long) SIGSTKFLT, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef SIGCLD
|
|
REGISTER_LONG_CONSTANT("SIGCLD", (zend_long) SIGCLD, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef SIGCHLD
|
|
REGISTER_LONG_CONSTANT("SIGCHLD", (zend_long) SIGCHLD, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
REGISTER_LONG_CONSTANT("SIGCONT", (zend_long) SIGCONT, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGSTOP", (zend_long) SIGSTOP, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGTSTP", (zend_long) SIGTSTP, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGTTIN", (zend_long) SIGTTIN, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGTTOU", (zend_long) SIGTTOU, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGURG", (zend_long) SIGURG , CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGXCPU", (zend_long) SIGXCPU, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGXFSZ", (zend_long) SIGXFSZ, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGVTALRM",(zend_long) SIGVTALRM, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGPROF", (zend_long) SIGPROF, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGWINCH", (zend_long) SIGWINCH, CONST_CS | CONST_PERSISTENT);
|
|
#ifdef SIGPOLL
|
|
REGISTER_LONG_CONSTANT("SIGPOLL", (zend_long) SIGPOLL, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
REGISTER_LONG_CONSTANT("SIGIO", (zend_long) SIGIO, CONST_CS | CONST_PERSISTENT);
|
|
#ifdef SIGPWR
|
|
REGISTER_LONG_CONSTANT("SIGPWR", (zend_long) SIGPWR, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef SIGSYS
|
|
REGISTER_LONG_CONSTANT("SIGSYS", (zend_long) SIGSYS, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIGBABY", (zend_long) SIGSYS, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
|
|
#if HAVE_GETPRIORITY || HAVE_SETPRIORITY
|
|
REGISTER_LONG_CONSTANT("PRIO_PGRP", PRIO_PGRP, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("PRIO_USER", PRIO_USER, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("PRIO_PROCESS", PRIO_PROCESS, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
|
|
/* {{{ "how" argument for sigprocmask */
|
|
#ifdef HAVE_SIGPROCMASK
|
|
REGISTER_LONG_CONSTANT("SIG_BLOCK", SIG_BLOCK, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIG_UNBLOCK", SIG_UNBLOCK, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SIG_SETMASK", SIG_SETMASK, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
/* }}} */
|
|
|
|
/* {{{ si_code */
|
|
#if HAVE_SIGWAITINFO && HAVE_SIGTIMEDWAIT
|
|
REGISTER_LONG_CONSTANT("SI_USER", SI_USER, CONST_CS | CONST_PERSISTENT);
|
|
#ifdef SI_NOINFO
|
|
REGISTER_LONG_CONSTANT("SI_NOINFO", SI_NOINFO, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef SI_KERNEL
|
|
REGISTER_LONG_CONSTANT("SI_KERNEL", SI_KERNEL, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
REGISTER_LONG_CONSTANT("SI_QUEUE", SI_QUEUE, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SI_TIMER", SI_TIMER, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SI_MESGQ", SI_MESGQ, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("SI_ASYNCIO", SI_ASYNCIO, CONST_CS | CONST_PERSISTENT);
|
|
#ifdef SI_SIGIO
|
|
REGISTER_LONG_CONSTANT("SI_SIGIO", SI_SIGIO, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef SI_TKILL
|
|
REGISTER_LONG_CONSTANT("SI_TKILL", SI_TKILL, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
|
|
/* si_code for SIGCHILD */
|
|
#ifdef CLD_EXITED
|
|
REGISTER_LONG_CONSTANT("CLD_EXITED", CLD_EXITED, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef CLD_KILLED
|
|
REGISTER_LONG_CONSTANT("CLD_KILLED", CLD_KILLED, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef CLD_DUMPED
|
|
REGISTER_LONG_CONSTANT("CLD_DUMPED", CLD_DUMPED, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef CLD_TRAPPED
|
|
REGISTER_LONG_CONSTANT("CLD_TRAPPED", CLD_TRAPPED, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef CLD_STOPPED
|
|
REGISTER_LONG_CONSTANT("CLD_STOPPED", CLD_STOPPED, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef CLD_CONTINUED
|
|
REGISTER_LONG_CONSTANT("CLD_CONTINUED", CLD_CONTINUED, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
|
|
/* si_code for SIGTRAP */
|
|
#ifdef TRAP_BRKPT
|
|
REGISTER_LONG_CONSTANT("TRAP_BRKPT", TRAP_BRKPT, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef TRAP_TRACE
|
|
REGISTER_LONG_CONSTANT("TRAP_TRACE", TRAP_TRACE, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
|
|
/* si_code for SIGPOLL */
|
|
#ifdef POLL_IN
|
|
REGISTER_LONG_CONSTANT("POLL_IN", POLL_IN, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef POLL_OUT
|
|
REGISTER_LONG_CONSTANT("POLL_OUT", POLL_OUT, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef POLL_MSG
|
|
REGISTER_LONG_CONSTANT("POLL_MSG", POLL_MSG, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef POLL_ERR
|
|
REGISTER_LONG_CONSTANT("POLL_ERR", POLL_ERR, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef POLL_PRI
|
|
REGISTER_LONG_CONSTANT("POLL_PRI", POLL_PRI, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef POLL_HUP
|
|
REGISTER_LONG_CONSTANT("POLL_HUP", POLL_HUP, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
|
|
#ifdef ILL_ILLOPC
|
|
REGISTER_LONG_CONSTANT("ILL_ILLOPC", ILL_ILLOPC, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef ILL_ILLOPN
|
|
REGISTER_LONG_CONSTANT("ILL_ILLOPN", ILL_ILLOPN, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef ILL_ILLADR
|
|
REGISTER_LONG_CONSTANT("ILL_ILLADR", ILL_ILLADR, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef ILL_ILLTRP
|
|
REGISTER_LONG_CONSTANT("ILL_ILLTRP", ILL_ILLTRP, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef ILL_PRVOPC
|
|
REGISTER_LONG_CONSTANT("ILL_PRVOPC", ILL_PRVOPC, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef ILL_PRVREG
|
|
REGISTER_LONG_CONSTANT("ILL_PRVREG", ILL_PRVREG, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef ILL_COPROC
|
|
REGISTER_LONG_CONSTANT("ILL_COPROC", ILL_COPROC, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef ILL_BADSTK
|
|
REGISTER_LONG_CONSTANT("ILL_BADSTK", ILL_BADSTK, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
|
|
#ifdef FPE_INTDIV
|
|
REGISTER_LONG_CONSTANT("FPE_INTDIV", FPE_INTDIV, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef FPE_INTOVF
|
|
REGISTER_LONG_CONSTANT("FPE_INTOVF", FPE_INTOVF, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef FPE_FLTDIV
|
|
REGISTER_LONG_CONSTANT("FPE_FLTDIV", FPE_FLTDIV, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef FPE_FLTOVF
|
|
REGISTER_LONG_CONSTANT("FPE_FLTOVF", FPE_FLTOVF, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef FPE_FLTUND
|
|
REGISTER_LONG_CONSTANT("FPE_FLTUND", FPE_FLTINV, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef FPE_FLTRES
|
|
REGISTER_LONG_CONSTANT("FPE_FLTRES", FPE_FLTRES, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef FPE_FLTINV
|
|
REGISTER_LONG_CONSTANT("FPE_FLTINV", FPE_FLTINV, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef FPE_FLTSUB
|
|
REGISTER_LONG_CONSTANT("FPE_FLTSUB", FPE_FLTSUB, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
|
|
#ifdef SEGV_MAPERR
|
|
REGISTER_LONG_CONSTANT("SEGV_MAPERR", SEGV_MAPERR, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef SEGV_ACCERR
|
|
REGISTER_LONG_CONSTANT("SEGV_ACCERR", SEGV_ACCERR, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
|
|
#ifdef BUS_ADRALN
|
|
REGISTER_LONG_CONSTANT("BUS_ADRALN", BUS_ADRALN, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef BUS_ADRERR
|
|
REGISTER_LONG_CONSTANT("BUS_ADRERR", BUS_ADRERR, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#ifdef BUS_OBJERR
|
|
REGISTER_LONG_CONSTANT("BUS_OBJERR", BUS_OBJERR, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
#endif /* HAVE_SIGWAITINFO && HAVE_SIGTIMEDWAIT */
|
|
/* }}} */
|
|
}
|
|
|
|
static void php_pcntl_register_errno_constants(INIT_FUNC_ARGS)
|
|
{
|
|
#ifdef EINTR
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(EINTR);
|
|
#endif
|
|
#ifdef ECHILD
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(ECHILD);
|
|
#endif
|
|
#ifdef EINVAL
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(EINVAL);
|
|
#endif
|
|
#ifdef EAGAIN
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(EAGAIN);
|
|
#endif
|
|
#ifdef ESRCH
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(ESRCH);
|
|
#endif
|
|
#ifdef EACCES
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(EACCES);
|
|
#endif
|
|
#ifdef EPERM
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(EPERM);
|
|
#endif
|
|
#ifdef ENOMEM
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(ENOMEM);
|
|
#endif
|
|
#ifdef E2BIG
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(E2BIG);
|
|
#endif
|
|
#ifdef EFAULT
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(EFAULT);
|
|
#endif
|
|
#ifdef EIO
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(EIO);
|
|
#endif
|
|
#ifdef EISDIR
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(EISDIR);
|
|
#endif
|
|
#ifdef ELIBBAD
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(ELIBBAD);
|
|
#endif
|
|
#ifdef ELOOP
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(ELOOP);
|
|
#endif
|
|
#ifdef EMFILE
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(EMFILE);
|
|
#endif
|
|
#ifdef ENAMETOOLONG
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(ENAMETOOLONG);
|
|
#endif
|
|
#ifdef ENFILE
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(ENFILE);
|
|
#endif
|
|
#ifdef ENOENT
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(ENOENT);
|
|
#endif
|
|
#ifdef ENOEXEC
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(ENOEXEC);
|
|
#endif
|
|
#ifdef ENOTDIR
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(ENOTDIR);
|
|
#endif
|
|
#ifdef ETXTBSY
|
|
REGISTER_PCNTL_ERRNO_CONSTANT(ETXTBSY);
|
|
#endif
|
|
}
|
|
|
|
static PHP_GINIT_FUNCTION(pcntl)
|
|
{
|
|
memset(pcntl_globals, 0, sizeof(*pcntl_globals));
|
|
}
|
|
|
|
PHP_RINIT_FUNCTION(pcntl)
|
|
{
|
|
zend_hash_init(&PCNTL_G(php_signal_table), 16, NULL, ZVAL_PTR_DTOR, 0);
|
|
PCNTL_G(head) = PCNTL_G(tail) = PCNTL_G(spares) = NULL;
|
|
return SUCCESS;
|
|
}
|
|
|
|
PHP_MINIT_FUNCTION(pcntl)
|
|
{
|
|
php_register_signal_constants(INIT_FUNC_ARGS_PASSTHRU);
|
|
php_pcntl_register_errno_constants(INIT_FUNC_ARGS_PASSTHRU);
|
|
php_add_tick_function(pcntl_signal_dispatch, NULL);
|
|
|
|
return SUCCESS;
|
|
}
|
|
|
|
PHP_MSHUTDOWN_FUNCTION(pcntl)
|
|
{
|
|
return SUCCESS;
|
|
}
|
|
|
|
PHP_RSHUTDOWN_FUNCTION(pcntl)
|
|
{
|
|
struct php_pcntl_pending_signal *sig;
|
|
|
|
/* FIXME: if a signal is delivered after this point, things will go pear shaped;
|
|
* need to remove signal handlers */
|
|
zend_hash_destroy(&PCNTL_G(php_signal_table));
|
|
while (PCNTL_G(head)) {
|
|
sig = PCNTL_G(head);
|
|
PCNTL_G(head) = sig->next;
|
|
efree(sig);
|
|
}
|
|
while (PCNTL_G(spares)) {
|
|
sig = PCNTL_G(spares);
|
|
PCNTL_G(spares) = sig->next;
|
|
efree(sig);
|
|
}
|
|
return SUCCESS;
|
|
}
|
|
|
|
PHP_MINFO_FUNCTION(pcntl)
|
|
{
|
|
php_info_print_table_start();
|
|
php_info_print_table_header(2, "pcntl support", "enabled");
|
|
php_info_print_table_end();
|
|
}
|
|
|
|
/* {{{ proto int pcntl_fork(void)
|
|
Forks the currently running process following the same behavior as the UNIX fork() system call*/
|
|
PHP_FUNCTION(pcntl_fork)
|
|
{
|
|
pid_t id;
|
|
|
|
id = fork();
|
|
if (id == -1) {
|
|
PCNTL_G(last_error) = errno;
|
|
php_error_docref(NULL, E_WARNING, "Error %d", errno);
|
|
}
|
|
|
|
RETURN_LONG((zend_long) id);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto int pcntl_alarm(int seconds)
|
|
Set an alarm clock for delivery of a signal*/
|
|
PHP_FUNCTION(pcntl_alarm)
|
|
{
|
|
zend_long seconds;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "l", &seconds) == FAILURE)
|
|
return;
|
|
|
|
RETURN_LONG ((zend_long) alarm(seconds));
|
|
}
|
|
/* }}} */
|
|
|
|
#define PHP_RUSAGE_PARA(from, to, field) \
|
|
add_assoc_long(to, #field, from.field)
|
|
#if !defined(_OSD_POSIX) && !defined(__BEOS__) /* BS2000 has only a few fields in the rusage struct */
|
|
#define PHP_RUSAGE_SPECIAL(from, to) \
|
|
PHP_RUSAGE_PARA(from, to, ru_oublock); \
|
|
PHP_RUSAGE_PARA(from, to, ru_inblock); \
|
|
PHP_RUSAGE_PARA(from, to, ru_msgsnd); \
|
|
PHP_RUSAGE_PARA(from, to, ru_msgrcv); \
|
|
PHP_RUSAGE_PARA(from, to, ru_maxrss); \
|
|
PHP_RUSAGE_PARA(from, to, ru_ixrss); \
|
|
PHP_RUSAGE_PARA(from, to, ru_idrss); \
|
|
PHP_RUSAGE_PARA(from, to, ru_minflt); \
|
|
PHP_RUSAGE_PARA(from, to, ru_majflt); \
|
|
PHP_RUSAGE_PARA(from, to, ru_nsignals); \
|
|
PHP_RUSAGE_PARA(from, to, ru_nvcsw); \
|
|
PHP_RUSAGE_PARA(from, to, ru_nivcsw); \
|
|
PHP_RUSAGE_PARA(from, to, ru_nswap);
|
|
#else /*_OSD_POSIX*/
|
|
#define PHP_RUSAGE_SPECIAL(from, to)
|
|
#endif
|
|
|
|
#define PHP_RUSAGE_COMMON(from ,to) \
|
|
PHP_RUSAGE_PARA(from, to, ru_utime.tv_usec); \
|
|
PHP_RUSAGE_PARA(from, to, ru_utime.tv_sec); \
|
|
PHP_RUSAGE_PARA(from, to, ru_stime.tv_usec); \
|
|
PHP_RUSAGE_PARA(from, to, ru_stime.tv_sec);
|
|
|
|
#define PHP_RUSAGE_TO_ARRAY(from, to) \
|
|
if (to) { \
|
|
PHP_RUSAGE_SPECIAL(from, to) \
|
|
PHP_RUSAGE_COMMON(from, to); \
|
|
}
|
|
|
|
/* {{{ proto int pcntl_waitpid(int pid, int &status, int options, array &$rusage)
|
|
Waits on or returns the status of a forked child as defined by the waitpid() system call */
|
|
PHP_FUNCTION(pcntl_waitpid)
|
|
{
|
|
zend_long pid, options = 0;
|
|
zval *z_status = NULL, *z_rusage = NULL;
|
|
int status;
|
|
pid_t child_id;
|
|
#ifdef HAVE_WAIT4
|
|
struct rusage rusage;
|
|
#endif
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "lz/|lz/", &pid, &z_status, &options, &z_rusage) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
status = zval_get_long(z_status);
|
|
|
|
#ifdef HAVE_WAIT4
|
|
if (z_rusage) {
|
|
if (Z_TYPE_P(z_rusage) != IS_ARRAY) {
|
|
zval_dtor(z_rusage);
|
|
array_init(z_rusage);
|
|
} else {
|
|
zend_hash_clean(Z_ARRVAL_P(z_rusage));
|
|
}
|
|
|
|
memset(&rusage, 0, sizeof(struct rusage));
|
|
child_id = wait4((pid_t) pid, &status, options, &rusage);
|
|
} else {
|
|
child_id = waitpid((pid_t) pid, &status, options);
|
|
}
|
|
#else
|
|
child_id = waitpid((pid_t) pid, &status, options);
|
|
#endif
|
|
|
|
if (child_id < 0) {
|
|
PCNTL_G(last_error) = errno;
|
|
}
|
|
|
|
#ifdef HAVE_WAIT4
|
|
if (child_id > 0) {
|
|
PHP_RUSAGE_TO_ARRAY(rusage, z_rusage);
|
|
}
|
|
#endif
|
|
|
|
zval_dtor(z_status);
|
|
ZVAL_LONG(z_status, status);
|
|
|
|
RETURN_LONG((zend_long) child_id);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto int pcntl_wait(int &status, int $options, array &$rusage)
|
|
Waits on or returns the status of a forked child as defined by the waitpid() system call */
|
|
PHP_FUNCTION(pcntl_wait)
|
|
{
|
|
zend_long options = 0;
|
|
zval *z_status = NULL, *z_rusage = NULL;
|
|
int status;
|
|
pid_t child_id;
|
|
#ifdef HAVE_WAIT3
|
|
struct rusage rusage;
|
|
#endif
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "z/|lz/", &z_status, &options, &z_rusage) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
status = zval_get_long(z_status);
|
|
#ifdef HAVE_WAIT3
|
|
if (z_rusage) {
|
|
if (Z_TYPE_P(z_rusage) != IS_ARRAY) {
|
|
zval_dtor(z_rusage);
|
|
array_init(z_rusage);
|
|
} else {
|
|
zend_hash_clean(Z_ARRVAL_P(z_rusage));
|
|
}
|
|
|
|
memset(&rusage, 0, sizeof(struct rusage));
|
|
child_id = wait3(&status, options, &rusage);
|
|
} else if (options) {
|
|
child_id = wait3(&status, options, NULL);
|
|
} else {
|
|
child_id = wait(&status);
|
|
}
|
|
#else
|
|
child_id = wait(&status);
|
|
#endif
|
|
if (child_id < 0) {
|
|
PCNTL_G(last_error) = errno;
|
|
}
|
|
|
|
#ifdef HAVE_WAIT3
|
|
if (child_id > 0) {
|
|
PHP_RUSAGE_TO_ARRAY(rusage, z_rusage);
|
|
}
|
|
#endif
|
|
|
|
zval_dtor(z_status);
|
|
ZVAL_LONG(z_status, status);
|
|
|
|
RETURN_LONG((zend_long) child_id);
|
|
}
|
|
/* }}} */
|
|
|
|
#undef PHP_RUSAGE_PARA
|
|
#undef PHP_RUSAGE_SPECIAL
|
|
#undef PHP_RUSAGE_COMMON
|
|
#undef PHP_RUSAGE_TO_ARRAY
|
|
|
|
/* {{{ proto bool pcntl_wifexited(int status)
|
|
Returns true if the child status code represents a successful exit */
|
|
PHP_FUNCTION(pcntl_wifexited)
|
|
{
|
|
#ifdef WIFEXITED
|
|
zend_long status_word;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "l", &status_word) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
if (WIFEXITED(status_word))
|
|
RETURN_TRUE;
|
|
#endif
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto bool pcntl_wifstopped(int status)
|
|
Returns true if the child status code represents a stopped process (WUNTRACED must have been used with waitpid) */
|
|
PHP_FUNCTION(pcntl_wifstopped)
|
|
{
|
|
#ifdef WIFSTOPPED
|
|
zend_long status_word;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "l", &status_word) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
if (WIFSTOPPED(status_word))
|
|
RETURN_TRUE;
|
|
#endif
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto bool pcntl_wifsignaled(int status)
|
|
Returns true if the child status code represents a process that was terminated due to a signal */
|
|
PHP_FUNCTION(pcntl_wifsignaled)
|
|
{
|
|
#ifdef WIFSIGNALED
|
|
zend_long status_word;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "l", &status_word) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
if (WIFSIGNALED(status_word))
|
|
RETURN_TRUE;
|
|
#endif
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
/* {{{ proto bool pcntl_wifcontinued(int status)
|
|
Returns true if the child status code represents a process that was resumed due to a SIGCONT signal */
|
|
PHP_FUNCTION(pcntl_wifcontinued)
|
|
{
|
|
#ifdef HAVE_WCONTINUED
|
|
zend_long status_word;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "l", &status_word) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
if (WIFCONTINUED(status_word))
|
|
RETURN_TRUE;
|
|
#endif
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/* {{{ proto int pcntl_wexitstatus(int status)
|
|
Returns the status code of a child's exit */
|
|
PHP_FUNCTION(pcntl_wexitstatus)
|
|
{
|
|
#ifdef WEXITSTATUS
|
|
zend_long status_word;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "l", &status_word) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
RETURN_LONG(WEXITSTATUS(status_word));
|
|
#else
|
|
RETURN_FALSE;
|
|
#endif
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto int pcntl_wtermsig(int status)
|
|
Returns the number of the signal that terminated the process who's status code is passed */
|
|
PHP_FUNCTION(pcntl_wtermsig)
|
|
{
|
|
#ifdef WTERMSIG
|
|
zend_long status_word;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "l", &status_word) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
RETURN_LONG(WTERMSIG(status_word));
|
|
#else
|
|
RETURN_FALSE;
|
|
#endif
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto int pcntl_wstopsig(int status)
|
|
Returns the number of the signal that caused the process to stop who's status code is passed */
|
|
PHP_FUNCTION(pcntl_wstopsig)
|
|
{
|
|
#ifdef WSTOPSIG
|
|
zend_long status_word;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "l", &status_word) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
RETURN_LONG(WSTOPSIG(status_word));
|
|
#else
|
|
RETURN_FALSE;
|
|
#endif
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto bool pcntl_exec(string path [, array args [, array envs]])
|
|
Executes specified program in current process space as defined by exec(2) */
|
|
PHP_FUNCTION(pcntl_exec)
|
|
{
|
|
zval *args = NULL, *envs = NULL;
|
|
zval *element;
|
|
HashTable *args_hash, *envs_hash;
|
|
int argc = 0, argi = 0;
|
|
int envc = 0, envi = 0;
|
|
char **argv = NULL, **envp = NULL;
|
|
char **current_arg, **pair;
|
|
int pair_length;
|
|
zend_string *key;
|
|
char *path;
|
|
size_t path_len;
|
|
zend_ulong key_num;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "p|aa", &path, &path_len, &args, &envs) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
if (ZEND_NUM_ARGS() > 1) {
|
|
/* Build argument list */
|
|
args_hash = Z_ARRVAL_P(args);
|
|
argc = zend_hash_num_elements(args_hash);
|
|
|
|
argv = safe_emalloc((argc + 2), sizeof(char *), 0);
|
|
*argv = path;
|
|
current_arg = argv+1;
|
|
ZEND_HASH_FOREACH_VAL(args_hash, element) {
|
|
if (argi >= argc) break;
|
|
convert_to_string_ex(element);
|
|
*current_arg = Z_STRVAL_P(element);
|
|
argi++;
|
|
current_arg++;
|
|
} ZEND_HASH_FOREACH_END();
|
|
*(current_arg) = NULL;
|
|
} else {
|
|
argv = emalloc(2 * sizeof(char *));
|
|
*argv = path;
|
|
*(argv+1) = NULL;
|
|
}
|
|
|
|
if ( ZEND_NUM_ARGS() == 3 ) {
|
|
/* Build environment pair list */
|
|
envs_hash = Z_ARRVAL_P(envs);
|
|
envc = zend_hash_num_elements(envs_hash);
|
|
|
|
pair = envp = safe_emalloc((envc + 1), sizeof(char *), 0);
|
|
ZEND_HASH_FOREACH_KEY_VAL(envs_hash, key_num, key, element) {
|
|
if (envi >= envc) break;
|
|
if (!key) {
|
|
key = zend_long_to_str(key_num);
|
|
} else {
|
|
zend_string_addref(key);
|
|
}
|
|
|
|
convert_to_string_ex(element);
|
|
|
|
/* Length of element + equal sign + length of key + null */
|
|
pair_length = Z_STRLEN_P(element) + ZSTR_LEN(key) + 2;
|
|
*pair = emalloc(pair_length);
|
|
strlcpy(*pair, ZSTR_VAL(key), ZSTR_LEN(key) + 1);
|
|
strlcat(*pair, "=", pair_length);
|
|
strlcat(*pair, Z_STRVAL_P(element), pair_length);
|
|
|
|
/* Cleanup */
|
|
zend_string_release(key);
|
|
envi++;
|
|
pair++;
|
|
} ZEND_HASH_FOREACH_END();
|
|
*(pair) = NULL;
|
|
|
|
if (execve(path, argv, envp) == -1) {
|
|
PCNTL_G(last_error) = errno;
|
|
php_error_docref(NULL, E_WARNING, "Error has occurred: (errno %d) %s", errno, strerror(errno));
|
|
}
|
|
|
|
/* Cleanup */
|
|
for (pair = envp; *pair != NULL; pair++) efree(*pair);
|
|
efree(envp);
|
|
} else {
|
|
|
|
if (execv(path, argv) == -1) {
|
|
PCNTL_G(last_error) = errno;
|
|
php_error_docref(NULL, E_WARNING, "Error has occurred: (errno %d) %s", errno, strerror(errno));
|
|
}
|
|
}
|
|
|
|
efree(argv);
|
|
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto bool pcntl_signal(int signo, callback handle [, bool restart_syscalls])
|
|
Assigns a system signal handler to a PHP function */
|
|
PHP_FUNCTION(pcntl_signal)
|
|
{
|
|
zval *handle;
|
|
zend_string *func_name;
|
|
zend_long signo;
|
|
zend_bool restart_syscalls = 1;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "lz|b", &signo, &handle, &restart_syscalls) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
if (signo < 1 || signo > 32) {
|
|
php_error_docref(NULL, E_WARNING, "Invalid signal");
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
if (!PCNTL_G(spares)) {
|
|
/* since calling malloc() from within a signal handler is not portable,
|
|
* pre-allocate a few records for recording signals */
|
|
int i;
|
|
for (i = 0; i < 32; i++) {
|
|
struct php_pcntl_pending_signal *psig;
|
|
|
|
psig = emalloc(sizeof(*psig));
|
|
psig->next = PCNTL_G(spares);
|
|
PCNTL_G(spares) = psig;
|
|
}
|
|
}
|
|
|
|
/* Special long value case for SIG_DFL and SIG_IGN */
|
|
if (Z_TYPE_P(handle) == IS_LONG) {
|
|
if (Z_LVAL_P(handle) != (zend_long) SIG_DFL && Z_LVAL_P(handle) != (zend_long) SIG_IGN) {
|
|
php_error_docref(NULL, E_WARNING, "Invalid value for handle argument specified");
|
|
RETURN_FALSE;
|
|
}
|
|
if (php_signal(signo, (Sigfunc *) Z_LVAL_P(handle), (int) restart_syscalls) == SIG_ERR) {
|
|
PCNTL_G(last_error) = errno;
|
|
php_error_docref(NULL, E_WARNING, "Error assigning signal");
|
|
RETURN_FALSE;
|
|
}
|
|
zend_hash_index_del(&PCNTL_G(php_signal_table), signo);
|
|
RETURN_TRUE;
|
|
}
|
|
|
|
if (!zend_is_callable(handle, 0, &func_name)) {
|
|
PCNTL_G(last_error) = EINVAL;
|
|
php_error_docref(NULL, E_WARNING, "%s is not a callable function name error", ZSTR_VAL(func_name));
|
|
zend_string_release(func_name);
|
|
RETURN_FALSE;
|
|
}
|
|
zend_string_release(func_name);
|
|
|
|
/* Add the function name to our signal table */
|
|
if (zend_hash_index_update(&PCNTL_G(php_signal_table), signo, handle)) {
|
|
if (Z_REFCOUNTED_P(handle)) Z_ADDREF_P(handle);
|
|
}
|
|
|
|
if (php_signal4(signo, pcntl_signal_handler, (int) restart_syscalls, 1) == SIG_ERR) {
|
|
PCNTL_G(last_error) = errno;
|
|
php_error_docref(NULL, E_WARNING, "Error assigning signal");
|
|
RETURN_FALSE;
|
|
}
|
|
RETURN_TRUE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto bool pcntl_signal_dispatch()
|
|
Dispatch signals to signal handlers */
|
|
PHP_FUNCTION(pcntl_signal_dispatch)
|
|
{
|
|
pcntl_signal_dispatch();
|
|
RETURN_TRUE;
|
|
}
|
|
/* }}} */
|
|
|
|
#ifdef HAVE_SIGPROCMASK
|
|
/* {{{ proto bool pcntl_sigprocmask(int how, array set[, array &oldset])
|
|
Examine and change blocked signals */
|
|
PHP_FUNCTION(pcntl_sigprocmask)
|
|
{
|
|
zend_long how, signo;
|
|
zval *user_set, *user_oldset = NULL, *user_signo;
|
|
sigset_t set, oldset;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "la|z/", &how, &user_set, &user_oldset) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
if (sigemptyset(&set) != 0 || sigemptyset(&oldset) != 0) {
|
|
PCNTL_G(last_error) = errno;
|
|
php_error_docref(NULL, E_WARNING, "%s", strerror(errno));
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
ZEND_HASH_FOREACH_VAL(Z_ARRVAL_P(user_set), user_signo) {
|
|
signo = zval_get_long(user_signo);
|
|
if (sigaddset(&set, signo) != 0) {
|
|
PCNTL_G(last_error) = errno;
|
|
php_error_docref(NULL, E_WARNING, "%s", strerror(errno));
|
|
RETURN_FALSE;
|
|
}
|
|
} ZEND_HASH_FOREACH_END();
|
|
|
|
if (sigprocmask(how, &set, &oldset) != 0) {
|
|
PCNTL_G(last_error) = errno;
|
|
php_error_docref(NULL, E_WARNING, "%s", strerror(errno));
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
if (user_oldset != NULL) {
|
|
if (Z_TYPE_P(user_oldset) != IS_ARRAY) {
|
|
zval_dtor(user_oldset);
|
|
array_init(user_oldset);
|
|
} else {
|
|
zend_hash_clean(Z_ARRVAL_P(user_oldset));
|
|
}
|
|
for (signo = 1; signo < MAX(NSIG-1, SIGRTMAX); ++signo) {
|
|
if (sigismember(&oldset, signo) != 1) {
|
|
continue;
|
|
}
|
|
add_next_index_long(user_oldset, signo);
|
|
}
|
|
}
|
|
|
|
RETURN_TRUE;
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
|
|
#if HAVE_SIGWAITINFO && HAVE_SIGTIMEDWAIT
|
|
static void pcntl_sigwaitinfo(INTERNAL_FUNCTION_PARAMETERS, int timedwait) /* {{{ */
|
|
{
|
|
zval *user_set, *user_signo, *user_siginfo = NULL;
|
|
zend_long tv_sec = 0, tv_nsec = 0;
|
|
sigset_t set;
|
|
int signo;
|
|
siginfo_t siginfo;
|
|
struct timespec timeout;
|
|
|
|
if (timedwait) {
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "a|z/ll", &user_set, &user_siginfo, &tv_sec, &tv_nsec) == FAILURE) {
|
|
return;
|
|
}
|
|
} else {
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "a|z/", &user_set, &user_siginfo) == FAILURE) {
|
|
return;
|
|
}
|
|
}
|
|
|
|
if (sigemptyset(&set) != 0) {
|
|
PCNTL_G(last_error) = errno;
|
|
php_error_docref(NULL, E_WARNING, "%s", strerror(errno));
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
ZEND_HASH_FOREACH_VAL(Z_ARRVAL_P(user_set), user_signo) {
|
|
signo = zval_get_long(user_signo);
|
|
if (sigaddset(&set, signo) != 0) {
|
|
PCNTL_G(last_error) = errno;
|
|
php_error_docref(NULL, E_WARNING, "%s", strerror(errno));
|
|
RETURN_FALSE;
|
|
}
|
|
} ZEND_HASH_FOREACH_END();
|
|
|
|
if (timedwait) {
|
|
timeout.tv_sec = (time_t) tv_sec;
|
|
timeout.tv_nsec = tv_nsec;
|
|
signo = sigtimedwait(&set, &siginfo, &timeout);
|
|
} else {
|
|
signo = sigwaitinfo(&set, &siginfo);
|
|
}
|
|
if (signo == -1 && errno != EAGAIN) {
|
|
PCNTL_G(last_error) = errno;
|
|
php_error_docref(NULL, E_WARNING, "%s", strerror(errno));
|
|
}
|
|
|
|
/*
|
|
* sigtimedwait and sigwaitinfo can return 0 on success on some
|
|
* platforms, e.g. NetBSD
|
|
*/
|
|
if (!signo && siginfo.si_signo) {
|
|
signo = siginfo.si_signo;
|
|
}
|
|
|
|
if (signo > 0 && user_siginfo) {
|
|
if (Z_TYPE_P(user_siginfo) != IS_ARRAY) {
|
|
zval_dtor(user_siginfo);
|
|
array_init(user_siginfo);
|
|
} else {
|
|
zend_hash_clean(Z_ARRVAL_P(user_siginfo));
|
|
}
|
|
add_assoc_long_ex(user_siginfo, "signo", sizeof("signo")-1, siginfo.si_signo);
|
|
add_assoc_long_ex(user_siginfo, "errno", sizeof("errno")-1, siginfo.si_errno);
|
|
add_assoc_long_ex(user_siginfo, "code", sizeof("code")-1, siginfo.si_code);
|
|
switch(signo) {
|
|
#ifdef SIGCHLD
|
|
case SIGCHLD:
|
|
add_assoc_long_ex(user_siginfo, "status", sizeof("status")-1, siginfo.si_status);
|
|
# ifdef si_utime
|
|
add_assoc_double_ex(user_siginfo, "utime", sizeof("utime")-1, siginfo.si_utime);
|
|
# endif
|
|
# ifdef si_stime
|
|
add_assoc_double_ex(user_siginfo, "stime", sizeof("stime")-1, siginfo.si_stime);
|
|
# endif
|
|
add_assoc_long_ex(user_siginfo, "pid", sizeof("pid")-1, siginfo.si_pid);
|
|
add_assoc_long_ex(user_siginfo, "uid", sizeof("uid")-1, siginfo.si_uid);
|
|
break;
|
|
#endif
|
|
case SIGILL:
|
|
case SIGFPE:
|
|
case SIGSEGV:
|
|
case SIGBUS:
|
|
add_assoc_double_ex(user_siginfo, "addr", sizeof("addr")-1, (zend_long)siginfo.si_addr);
|
|
break;
|
|
#ifdef SIGPOLL
|
|
case SIGPOLL:
|
|
add_assoc_long_ex(user_siginfo, "band", sizeof("band")-1, siginfo.si_band);
|
|
# ifdef si_fd
|
|
add_assoc_long_ex(user_siginfo, "fd", sizeof("fd")-1, siginfo.si_fd);
|
|
# endif
|
|
break;
|
|
#endif
|
|
}
|
|
}
|
|
|
|
RETURN_LONG(signo);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto int pcnlt_sigwaitinfo(array set[, array &siginfo])
|
|
Synchronously wait for queued signals */
|
|
PHP_FUNCTION(pcntl_sigwaitinfo)
|
|
{
|
|
pcntl_sigwaitinfo(INTERNAL_FUNCTION_PARAM_PASSTHRU, 0);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto int pcntl_sigtimedwait(array set[, array &siginfo[, int seconds[, int nanoseconds]]])
|
|
Wait for queued signals */
|
|
PHP_FUNCTION(pcntl_sigtimedwait)
|
|
{
|
|
pcntl_sigwaitinfo(INTERNAL_FUNCTION_PARAM_PASSTHRU, 1);
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
|
|
#ifdef HAVE_GETPRIORITY
|
|
/* {{{ proto int pcntl_getpriority([int pid [, int process_identifier]])
|
|
Get the priority of any process */
|
|
PHP_FUNCTION(pcntl_getpriority)
|
|
{
|
|
zend_long who = PRIO_PROCESS;
|
|
zend_long pid = getpid();
|
|
int pri;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "|ll", &pid, &who) == FAILURE) {
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
/* needs to be cleared, since any returned value is valid */
|
|
errno = 0;
|
|
|
|
pri = getpriority(who, pid);
|
|
|
|
if (errno) {
|
|
PCNTL_G(last_error) = errno;
|
|
switch (errno) {
|
|
case ESRCH:
|
|
php_error_docref(NULL, E_WARNING, "Error %d: No process was located using the given parameters", errno);
|
|
break;
|
|
case EINVAL:
|
|
php_error_docref(NULL, E_WARNING, "Error %d: Invalid identifier flag", errno);
|
|
break;
|
|
default:
|
|
php_error_docref(NULL, E_WARNING, "Unknown error %d has occurred", errno);
|
|
break;
|
|
}
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
RETURN_LONG(pri);
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
|
|
#ifdef HAVE_SETPRIORITY
|
|
/* {{{ proto bool pcntl_setpriority(int priority [, int pid [, int process_identifier]])
|
|
Change the priority of any process */
|
|
PHP_FUNCTION(pcntl_setpriority)
|
|
{
|
|
zend_long who = PRIO_PROCESS;
|
|
zend_long pid = getpid();
|
|
zend_long pri;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "l|ll", &pri, &pid, &who) == FAILURE) {
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
if (setpriority(who, pid, pri)) {
|
|
PCNTL_G(last_error) = errno;
|
|
switch (errno) {
|
|
case ESRCH:
|
|
php_error_docref(NULL, E_WARNING, "Error %d: No process was located using the given parameters", errno);
|
|
break;
|
|
case EINVAL:
|
|
php_error_docref(NULL, E_WARNING, "Error %d: Invalid identifier flag", errno);
|
|
break;
|
|
case EPERM:
|
|
php_error_docref(NULL, E_WARNING, "Error %d: A process was located, but neither its effective nor real user ID matched the effective user ID of the caller", errno);
|
|
break;
|
|
case EACCES:
|
|
php_error_docref(NULL, E_WARNING, "Error %d: Only a super user may attempt to increase the process priority", errno);
|
|
break;
|
|
default:
|
|
php_error_docref(NULL, E_WARNING, "Unknown error %d has occurred", errno);
|
|
break;
|
|
}
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
RETURN_TRUE;
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
|
|
/* {{{ proto int pcntl_get_last_error(void)
|
|
Retrieve the error number set by the last pcntl function which failed. */
|
|
PHP_FUNCTION(pcntl_get_last_error)
|
|
{
|
|
RETURN_LONG(PCNTL_G(last_error));
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto string pcntl_strerror(int errno)
|
|
Retrieve the system error message associated with the given errno. */
|
|
PHP_FUNCTION(pcntl_strerror)
|
|
{
|
|
zend_long error;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "l", &error) == FAILURE) {
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
RETURN_STRING(strerror(error));
|
|
}
|
|
/* }}} */
|
|
|
|
/* Our custom signal handler that calls the appropriate php_function */
|
|
static void pcntl_signal_handler(int signo)
|
|
{
|
|
struct php_pcntl_pending_signal *psig;
|
|
|
|
psig = PCNTL_G(spares);
|
|
if (!psig) {
|
|
/* oops, too many signals for us to track, so we'll forget about this one */
|
|
return;
|
|
}
|
|
PCNTL_G(spares) = psig->next;
|
|
|
|
psig->signo = signo;
|
|
psig->next = NULL;
|
|
|
|
/* the head check is important, as the tick handler cannot atomically clear both
|
|
* the head and tail */
|
|
if (PCNTL_G(head) && PCNTL_G(tail)) {
|
|
PCNTL_G(tail)->next = psig;
|
|
} else {
|
|
PCNTL_G(head) = psig;
|
|
}
|
|
PCNTL_G(tail) = psig;
|
|
PCNTL_G(pending_signals) = 1;
|
|
}
|
|
|
|
void pcntl_signal_dispatch()
|
|
{
|
|
zval param, *handle, retval;
|
|
struct php_pcntl_pending_signal *queue, *next;
|
|
sigset_t mask;
|
|
sigset_t old_mask;
|
|
|
|
if(!PCNTL_G(pending_signals)) {
|
|
return;
|
|
}
|
|
|
|
/* Mask all signals */
|
|
sigfillset(&mask);
|
|
sigprocmask(SIG_BLOCK, &mask, &old_mask);
|
|
|
|
/* Bail if the queue is empty or if we are already playing the queue*/
|
|
if (! PCNTL_G(head) || PCNTL_G(processing_signal_queue)) {
|
|
sigprocmask(SIG_SETMASK, &old_mask, NULL);
|
|
return;
|
|
}
|
|
|
|
/* Prevent reentrant handler calls */
|
|
PCNTL_G(processing_signal_queue) = 1;
|
|
|
|
queue = PCNTL_G(head);
|
|
PCNTL_G(head) = NULL; /* simple stores are atomic */
|
|
|
|
/* Allocate */
|
|
|
|
while (queue) {
|
|
if ((handle = zend_hash_index_find(&PCNTL_G(php_signal_table), queue->signo)) != NULL) {
|
|
ZVAL_NULL(&retval);
|
|
ZVAL_LONG(¶m, queue->signo);
|
|
|
|
/* Call php signal handler - Note that we do not report errors, and we ignore the return value */
|
|
/* FIXME: this is probably broken when multiple signals are handled in this while loop (retval) */
|
|
call_user_function(EG(function_table), NULL, handle, &retval, 1, ¶m);
|
|
zval_ptr_dtor(¶m);
|
|
zval_ptr_dtor(&retval);
|
|
}
|
|
|
|
next = queue->next;
|
|
queue->next = PCNTL_G(spares);
|
|
PCNTL_G(spares) = queue;
|
|
queue = next;
|
|
}
|
|
|
|
PCNTL_G(pending_signals) = 0;
|
|
|
|
/* Re-enable queue */
|
|
PCNTL_G(processing_signal_queue) = 0;
|
|
|
|
/* return signal mask to previous state */
|
|
sigprocmask(SIG_SETMASK, &old_mask, NULL);
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
* Local variables:
|
|
* tab-width: 4
|
|
* c-basic-offset: 4
|
|
* indent-tabs-mode: t
|
|
* End:
|
|
*/
|