Metrics
0
Watch 292 Star 1.1K Fork 260

GVPswoole / swoole-srcCApache-2.0

Sign up for free
Explore and code with more than 2 million developers,Free private repositories !:)
Sign up
PHP的异步、并行、高性能网络通信引擎 spread retract

http://www.swoole.com/

  • C++ 41.9%
  • PHP 36.4%
  • C 20.6%
  • M4 0.5%
  • Shell 0.2%
  • Other 0.4%
Clone or download
swoole_trace.cc 12.59 KB
Copy Edit Web IDE Raw Blame History
韩天峰 authored 2019-07-18 17:47 . fix test [2]
/*
+----------------------------------------------------------------------+
| Swoole |
+----------------------------------------------------------------------+
| This source file is subject to version 2.0 of the Apache 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.apache.org/licenses/LICENSE-2.0.html |
| If you did not receive a copy of the Apache2.0 license and are unable|
| to obtain it through the world-wide-web, please send a note to |
| license@swoole.com so we can mail you a copy immediately. |
+----------------------------------------------------------------------+
| Author: Tianfeng Han <mikan.tenny@gmail.com> |
+----------------------------------------------------------------------+
*/
#include "php_swoole.h"
#ifdef HAVE_PTRACE
#include <stddef.h>
#include <sys/ptrace.h>
#if SIZEOF_LONG == 4
#define PTR_FMT "08"
#elif SIZEOF_LONG == 8
#define PTR_FMT "016"
#endif
#if defined(PT_ATTACH) && !defined(PTRACE_ATTACH)
#if __APPLE__
#define PTRACE_ATTACH PT_ATTACHEXC
#else
#define PTRACE_ATTACH PT_ATTACH
#endif
#endif
#if defined(PT_DETACH) && !defined(PTRACE_DETACH)
#define PTRACE_DETACH PT_DETACH
#endif
#if defined(PT_READ_D) && !defined(PTRACE_PEEKDATA)
#define PTRACE_PEEKDATA PT_READ_D
#endif
#define valid_ptr(p) ((p) && 0 == ((p) & (sizeof(long) - 1)))
static void trace_request(swWorker *worker);
static int trace_dump(swWorker *worker, FILE *slowlog);
static int trace_get_long(pid_t traced_pid, long addr, long *data);
static int trace_get_strz(pid_t traced_pid, char *buf, size_t sz, long addr);
static void trace_request(swWorker *worker)
{
FILE *slowlog = SwooleG.serv->request_slowlog_file;
pid_t traced_pid = worker->pid;
int ret = trace_dump(worker, slowlog);
if (ret < 0)
{
swSysWarn("failed to trace worker %d, error lint =%d", worker->pid, -ret);
}
if (0 > ptrace(PTRACE_DETACH, traced_pid, (caddr_t) 1, 0))
{
swSysWarn("failed to ptrace(DETACH) worker %d", worker->pid);
}
fflush(slowlog);
}
void php_swoole_trace_check(void *arg)
{
swServer *serv = (swServer *) arg;
uint8_t timeout = serv->request_slowlog_timeout;
int count = serv->worker_num + serv->task_worker_num;
int i = serv->trace_event_worker ? 0 : serv->worker_num;
swWorker *worker;
for (; i < count; i++)
{
worker = swServer_get_worker(serv, i);
swTraceLog(SW_TRACE_SERVER, "trace request, worker#%d, pid=%d. request_time=%ld", i, worker->pid, worker->request_time);
if (!(worker->request_time > 0 && worker->traced == 0 && serv->gs->now - worker->request_time >= timeout))
{
continue;
}
if (ptrace(PTRACE_ATTACH, worker->pid, 0, 0) < 0)
{
swSysWarn("failed to ptrace(ATTACH, %d) worker#%d,", worker->pid, worker->id);
continue;
}
worker->tracer = trace_request;
worker->traced = 1;
}
}
static int trace_get_long(pid_t traced_pid, long addr, long *data)
{
errno = 0;
*data = ptrace(PTRACE_PEEKDATA, traced_pid, (caddr_t) addr, 0);
if (*data < 0)
{
return -1;
}
return 0;
}
static int trace_get_strz(pid_t traced_pid, char *buf, size_t sz, long addr)
{
int i;
long l = addr;
char *lc = (char *) &l;
i = l % SIZEOF_LONG;
l -= i;
for (addr = l;; addr += SIZEOF_LONG)
{
if (0 > trace_get_long(traced_pid, addr, &l))
{
return -1;
}
for (; i < SIZEOF_LONG; i++)
{
--sz;
if (sz && lc[i])
{
*buf++ = lc[i];
continue;
}
*buf = '\0';
return 0;
}
i = 0;
}
return 0;
}
size_t trace_print_time(struct timeval *tv, char *timebuf, size_t timebuf_len)
{
struct tm t;
size_t len;
len = strftime(timebuf, timebuf_len, "[%d-%b-%Y %H:%M:%S", localtime_r((const time_t *) &tv->tv_sec, &t));
len += sw_snprintf(timebuf + len, timebuf_len - len, "] ");
return len;
}
static int trace_dump(swWorker *worker, FILE *slowlog)
{
pid_t traced_pid = worker->pid;
int callers_limit = 100;
struct timeval tv;
static const int buf_size = 1024;
char buf[buf_size];
long execute_data;
long l;
gettimeofday(&tv, 0);
trace_print_time(&tv, buf, buf_size);
fprintf(slowlog, "\n%s [worker#%d] pid %d\n", buf, worker->id, (int) traced_pid);
if (0 > trace_get_long(traced_pid, (long) &EG(current_execute_data), &l))
{
return -__LINE__;
}
execute_data = l;
#if PHP_VERSION_ID > 70100
while (execute_data)
{
long function;
long function_name;
long file_name;
long prev;
uint32_t lineno = 0;
if (0 > trace_get_long(traced_pid, execute_data + offsetof(zend_execute_data, func), &l))
{
return -__LINE__;
}
function = l;
if (valid_ptr(function))
{
if (0 > trace_get_long(traced_pid, function + offsetof(zend_function, common.function_name), &l))
{
return -1;
}
function_name = l;
if (function_name == 0)
{
uint32_t *call_info = (uint32_t *) &l;
if (0 > trace_get_long(traced_pid, execute_data + offsetof(zend_execute_data, This.u1.type_info), &l))
{
return -__LINE__;
}
#if PHP_VERSION_ID < 70400
if (ZEND_CALL_KIND_EX((*call_info) >> ZEND_CALL_INFO_SHIFT) == ZEND_CALL_TOP_CODE)
#else
if (ZEND_CALL_KIND_EX(*call_info) == ZEND_CALL_TOP_CODE)
#endif
{
return 0;
}
#if PHP_VERSION_ID < 70400
else if (ZEND_CALL_KIND_EX(*(call_info) >> ZEND_CALL_INFO_SHIFT) == ZEND_CALL_NESTED_CODE)
#else
else if (ZEND_CALL_KIND_EX(*call_info) == ZEND_CALL_NESTED_CODE)
#endif
{
memcpy(buf, "[INCLUDE_OR_EVAL]", sizeof("[INCLUDE_OR_EVAL]"));
}
else
{
ZEND_ASSERT(0);
}
}
else
{
if (0 > trace_get_strz(traced_pid, buf, buf_size, function_name + offsetof(zend_string, val)))
{
return -__LINE__;
}
}
}
else
{
memcpy(buf, "???", sizeof("???"));
}
fprintf(slowlog, "[0x%" PTR_FMT "lx] ", execute_data);
fprintf(slowlog, "%s()", buf);
*buf = '\0';
if (0 > trace_get_long(traced_pid, execute_data + offsetof(zend_execute_data, prev_execute_data), &l))
{
return -__LINE__;
}
execute_data = prev = l;
while (prev)
{
zend_uchar *type;
if (0 > trace_get_long(traced_pid, prev + offsetof(zend_execute_data, func), &l))
{
return -__LINE__;
}
function = l;
if (!valid_ptr(function))
{
break;
}
type = (zend_uchar *) &l;
if (0 > trace_get_long(traced_pid, function + offsetof(zend_function, type), &l))
{
return -__LINE__;
}
if (ZEND_USER_CODE(*type))
{
if (0 > trace_get_long(traced_pid, function + offsetof(zend_op_array, filename), &l))
{
return -__LINE__;
}
file_name = l;
if (0 > trace_get_strz(traced_pid, buf, buf_size, file_name + offsetof(zend_string, val)))
{
return -__LINE__;
}
if (0 > trace_get_long(traced_pid, prev + offsetof(zend_execute_data, opline), &l))
{
return -__LINE__;
}
if (valid_ptr(l))
{
long opline = l;
uint32_t *lu = (uint32_t *) &l;
if (0 > trace_get_long(traced_pid, opline + offsetof(struct _zend_op, lineno), &l))
{
return -__LINE__;
}
lineno = *lu;
}
break;
}
if (0 > trace_get_long(traced_pid, prev + offsetof(zend_execute_data, prev_execute_data), &l))
{
return -__LINE__;
}
prev = l;
}
fprintf(slowlog, " %s:%u\n", *buf ? buf : "unknown", lineno);
if (0 == --callers_limit)
{
break;
}
}
#else
while (execute_data)
{
long function;
long function_name;
long file_name;
long prev;
uint lineno = 0;
if (0 > trace_get_long(traced_pid, execute_data + offsetof(zend_execute_data, func), &l))
{
return -1;
}
function = l;
if (valid_ptr(function))
{
if (0 > trace_get_long(traced_pid, function + offsetof(zend_function, common.function_name), &l))
{
return -1;
}
function_name = l;
if (function_name == 0)
{
uint32_t *call_info = (uint32_t *)&l;
if (0 > trace_get_long(traced_pid, execute_data + offsetof(zend_execute_data, This.u1.type_info), &l))
{
return -1;
}
if (ZEND_CALL_KIND_EX((*call_info) >> 24) == ZEND_CALL_TOP_CODE)
{
return 0;
}
else if (ZEND_CALL_KIND_EX(*(call_info) >> 24) == ZEND_CALL_NESTED_CODE)
{
memcpy(buf, "[INCLUDE_OR_EVAL]", sizeof("[INCLUDE_OR_EVAL]"));
}
else
{
ZEND_ASSERT(0);
}
}
else
{
if (0 > trace_get_strz(traced_pid, buf, buf_size, function_name + offsetof(zend_string, val)))
{
return -1;
}
}
}
else
{
memcpy(buf, "???", sizeof("???"));
}
fprintf(slowlog, "[0x%" PTR_FMT "lx] ", execute_data);
fprintf(slowlog, "%s()", buf);
*buf = '\0';
if (0 > trace_get_long(traced_pid, execute_data + offsetof(zend_execute_data, prev_execute_data), &l))
{
return -1;
}
execute_data = prev = l;
while (prev)
{
zend_uchar *type;
if (0 > trace_get_long(traced_pid, prev + offsetof(zend_execute_data, func), &l))
{
return -1;
}
function = l;
if (!valid_ptr(function))
{
break;
}
type = (zend_uchar *)&l;
if (0 > trace_get_long(traced_pid, function + offsetof(zend_function, type), &l))
{
return -1;
}
if (ZEND_USER_CODE(*type))
{
if (0 > trace_get_long(traced_pid, function + offsetof(zend_op_array, filename), &l))
{
return -1;
}
file_name = l;
if (0 > trace_get_strz(traced_pid, buf, buf_size, file_name + offsetof(zend_string, val)))
{
return -1;
}
if (0 > trace_get_long(traced_pid, prev + offsetof(zend_execute_data, opline), &l))
{
return -1;
}
if (valid_ptr(l))
{
long opline = l;
uint32_t *lu = (uint32_t *) &l;
if (0 > trace_get_long(traced_pid, opline + offsetof(struct _zend_op, lineno), &l))
{
return -1;
}
lineno = *lu;
}
break;
}
if (0 > trace_get_long(traced_pid, prev + offsetof(zend_execute_data, prev_execute_data), &l))
{
return -1;
}
prev = l;
}
fprintf(slowlog, " %s:%u\n", *buf ? buf : "unknown", lineno);
if (0 == --callers_limit)
{
break;
}
}
#endif
return 0;
}
#endif

Comment ( 0 )

You need to Sign in for post a comment

C
1
https://gitee.com/swoole/swoole.git
git@gitee.com:swoole/swoole.git

Help Search