69 lines
2.3 KiB
C
69 lines
2.3 KiB
C
/*
|
|
+----------------------------------------------------------------------+
|
|
| Copyright © The PHP Group and Contributors. |
|
|
+----------------------------------------------------------------------+
|
|
| This source file is subject to the Modified BSD License that is |
|
|
| bundled with this package in the file LICENSE, and is available |
|
|
| through the World Wide Web at <https://www.php.net/license/>. |
|
|
| |
|
|
| SPDX-License-Identifier: BSD-3-Clause |
|
|
+----------------------------------------------------------------------+
|
|
| Author: Niklas Keller <kelunik@php.net> |
|
|
| Author: Anatol Belski <ab@php.net> |
|
|
+----------------------------------------------------------------------+
|
|
*/
|
|
|
|
#include "php.h"
|
|
#include "zend_hrtime.h"
|
|
|
|
#ifdef ZEND_ENABLE_ZVAL_LONG64
|
|
#define PHP_RETURN_HRTIME(t) RETURN_LONG((zend_long)t)
|
|
#else
|
|
#ifdef _WIN32
|
|
# define HRTIME_U64A(i, s, len) _ui64toa_s(i, s, len, 10)
|
|
#else
|
|
# define HRTIME_U64A(i, s, len) \
|
|
do { \
|
|
int st = snprintf(s, len, "%llu", i); \
|
|
s[st] = '\0'; \
|
|
} while (0)
|
|
#endif
|
|
#define PHP_RETURN_HRTIME(t) do { \
|
|
char _a[65]; \
|
|
double _d; \
|
|
HRTIME_U64A(t, _a, sizeof(_a)); \
|
|
_d = zend_strtod(_a, NULL); \
|
|
RETURN_DOUBLE(_d); \
|
|
} while (0)
|
|
#endif
|
|
|
|
/* {{{ Returns an array of integers in form [seconds, nanoseconds] counted
|
|
from an arbitrary point in time. If an optional boolean argument is
|
|
passed, returns an integer on 64-bit platforms or float on 32-bit
|
|
containing the current high-resolution time in nanoseconds. The
|
|
delivered timestamp is monotonic and cannot be adjusted. */
|
|
PHP_FUNCTION(hrtime)
|
|
{
|
|
bool get_as_num = 0;
|
|
zend_hrtime_t t = zend_hrtime();
|
|
|
|
ZEND_PARSE_PARAMETERS_START(0, 1)
|
|
Z_PARAM_OPTIONAL
|
|
Z_PARAM_BOOL(get_as_num)
|
|
ZEND_PARSE_PARAMETERS_END();
|
|
|
|
#if ZEND_HRTIME_AVAILABLE
|
|
if (UNEXPECTED(get_as_num)) {
|
|
PHP_RETURN_HRTIME(t);
|
|
} else {
|
|
zval first, second;
|
|
ZVAL_LONG(&first, (zend_long)(t / (zend_hrtime_t)ZEND_NANO_IN_SEC));
|
|
ZVAL_LONG(&second, (zend_long)(t % (zend_hrtime_t)ZEND_NANO_IN_SEC));
|
|
RETURN_ARR(zend_new_pair(&first, &second));
|
|
}
|
|
#else
|
|
RETURN_FALSE;
|
|
#endif
|
|
}
|
|
/* }}} */
|