1 /*
2    +----------------------------------------------------------------------+
3    | Copyright (c) The PHP Group                                          |
4    +----------------------------------------------------------------------+
5    | This source file is subject to version 3.01 of the PHP license,      |
6    | that is bundled with this package in the file LICENSE, and is        |
7    | available through the world-wide-web at the following url:           |
8    | https://www.php.net/license/3_01.txt                                 |
9    | If you did not receive a copy of the PHP license and are unable to   |
10    | obtain it through the world-wide-web, please send a note to          |
11    | license@php.net so we can mail you a copy immediately.               |
12    +----------------------------------------------------------------------+
13    | Author: Kévin Dunglas <kevin@dunglas.dev>                            |
14    +----------------------------------------------------------------------+
15  */
16 
17 #ifdef ZEND_MAX_EXECUTION_TIMERS
18 
19 #include <stdio.h>
20 #include <signal.h>
21 #include <time.h>
22 #include <unistd.h>
23 #include <errno.h>
24 #include <sys/syscall.h>
25 #include <sys/types.h>
26 
27 #include "zend.h"
28 #include "zend_globals.h"
29 #include "zend_portability.h"
30 
31 #if __has_feature(memory_sanitizer)
32 # include <sanitizer/msan_interface.h>
33 #endif
34 
35 // Musl Libc defines this macro, glibc does not
36 // According to "man 2 timer_create" this field should always be available, but it's not: https://sourceware.org/bugzilla/show_bug.cgi?id=27417
37 # ifndef sigev_notify_thread_id
38 # define sigev_notify_thread_id _sigev_un._tid
39 # endif
40 
zend_max_execution_timer_init(void)41 ZEND_API void zend_max_execution_timer_init(void) /* {{{ */
42 {
43 	pid_t pid = getpid();
44 
45 	if (EG(pid) == pid) {
46 		return;
47 	}
48 
49 	struct sigevent sev;
50 	sev.sigev_notify = SIGEV_THREAD_ID;
51 	sev.sigev_value.sival_ptr = &EG(max_execution_timer_timer);
52 	sev.sigev_signo = SIGRTMIN;
53 	sev.sigev_notify_thread_id = (pid_t) syscall(SYS_gettid);
54 
55 #if __has_feature(memory_sanitizer)
56 	/* MSan does not intercept timer_create() */
57 	__msan_unpoison(&EG(max_execution_timer_timer),
58 					sizeof(EG(max_execution_timer_timer)));
59 #endif
60 
61 	// Measure wall time instead of CPU time as originally planned now that it is possible https://github.com/php/php-src/pull/6504#issuecomment-1370303727
62 	if (timer_create(CLOCK_BOOTTIME, &sev, &EG(max_execution_timer_timer)) != 0) {
63 		zend_strerror_noreturn(E_ERROR, errno, "Could not create timer");
64 	}
65 
66 	EG(pid) = getpid();
67 
68 # ifdef MAX_EXECUTION_TIMERS_DEBUG
69 		fprintf(stderr, "Timer %#jx created on thread %d\n", (uintmax_t) EG(max_execution_timer_timer), sev.sigev_notify_thread_id);
70 # endif
71 
72 	sigaction(sev.sigev_signo, NULL, &EG(oldact));
73 }
74 /* }}} */
75 
zend_max_execution_timer_settime(zend_long seconds)76 void zend_max_execution_timer_settime(zend_long seconds) /* {{{ }*/
77 {
78 	/* Timer not initialized or shutdown. */
79 	if (!EG(pid)) {
80 		return;
81 	}
82 
83 	timer_t timer = EG(max_execution_timer_timer);
84 
85 	// Prevent EINVAL error
86 	if (seconds < 0 || seconds > 999999999) {
87 		seconds = 0;
88 	}
89 
90 	struct itimerspec its;
91 	its.it_value.tv_sec = seconds;
92 	its.it_value.tv_nsec = its.it_interval.tv_sec = its.it_interval.tv_nsec = 0;
93 
94 # ifdef MAX_EXECUTION_TIMERS_DEBUG
95 	fprintf(stderr, "Setting timer %#jx on thread %d (%ld seconds)...\n", (uintmax_t) timer, (pid_t) syscall(SYS_gettid), seconds);
96 # endif
97 
98 	if (timer_settime(timer, 0, &its, NULL) != 0) {
99 		zend_strerror_noreturn(E_ERROR, errno, "Could not set timer");
100 	}
101 }
102 /* }}} */
103 
zend_max_execution_timer_shutdown(void)104 void zend_max_execution_timer_shutdown(void) /* {{{ */
105 {
106 	/* Don't try to delete a timer created before a call to fork() */
107 	if (EG(pid) != getpid()) {
108 		return;
109 	}
110 
111 	EG(pid) = 0;
112 
113 	timer_t timer = EG(max_execution_timer_timer);
114 
115 # ifdef MAX_EXECUTION_TIMERS_DEBUG
116 	fprintf(stderr, "Deleting timer %#jx on thread %d...\n", (uintmax_t) timer, (pid_t) syscall(SYS_gettid));
117 # endif
118 
119 	int err = timer_delete(timer);
120 	if (err != 0) {
121 		zend_strerror_noreturn(E_ERROR, errno, "Could not delete timer");
122 	}
123 }
124 /* }}}} */
125 
126 #endif
127