zend_gdb.c

/*
 +----------------------------------------------------------------------+
 | Zend Engine |
 +----------------------------------------------------------------------+
 | Copyright (c) Zend Technologies Ltd. (http://www.zend.com) |
 +----------------------------------------------------------------------+
 | This source file is subject to version 2.00 of the Zend 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.zend.com/license/2_00.txt. |
 | If you did not receive a copy of the Zend license and are unable to |
 | obtain it through the world-wide-web, please send a note to |
 | license@zend.com so we can mail you a copy immediately. |
 +----------------------------------------------------------------------+
 | Authors: Dmitry Stogov <dmitry@zend.com> |
 | Xinchen Hui <xinchen.h@zend.com> |
 +----------------------------------------------------------------------+
*/

#include"zend.h"
#include"zend_gdb.h"

#include<sys/types.h>
#include<sys/stat.h>
#include<fcntl.h>
#include<unistd.h>

#if defined(__FreeBSD__) &&__FreeBSD_version >= 1100000
# include<sys/user.h>
# include<libutil.h>
#endif

enum {
ZEND_GDBJIT_NOACTION,
ZEND_GDBJIT_REGISTER,
ZEND_GDBJIT_UNREGISTER
};

typedefstruct_zend_gdbjit_code_entry {
struct_zend_gdbjit_code_entry*next_entry;
struct_zend_gdbjit_code_entry*prev_entry;
constchar*symfile_addr;
uint64_tsymfile_size;
} zend_gdbjit_code_entry;

typedefstruct_zend_gdbjit_descriptor {
uint32_tversion;
uint32_taction_flag;
struct_zend_gdbjit_code_entry*relevant_entry;
struct_zend_gdbjit_code_entry*first_entry;
} zend_gdbjit_descriptor;

ZEND_APIzend_gdbjit_descriptor__jit_debug_descriptor= {
1, ZEND_GDBJIT_NOACTION, NULL, NULL
};

ZEND_APIzend_never_inlinevoid__jit_debug_register_code(void)
{
 __asm__ __volatile__("");
}

ZEND_APIboolzend_gdb_register_code(constvoid*object, size_tsize)
{
zend_gdbjit_code_entry*entry;

entry=malloc(sizeof(zend_gdbjit_code_entry) +size);
if (entry==NULL) {
return0;
 }

entry->symfile_addr= ((char*)entry) +sizeof(zend_gdbjit_code_entry);
entry->symfile_size=size;

memcpy((char*)entry->symfile_addr, object, size);

entry->prev_entry=NULL;
entry->next_entry=__jit_debug_descriptor.first_entry;

if (entry->next_entry) {
entry->next_entry->prev_entry=entry;
 }
__jit_debug_descriptor.first_entry=entry;

/* Notify GDB */
__jit_debug_descriptor.relevant_entry=entry;
__jit_debug_descriptor.action_flag=ZEND_GDBJIT_REGISTER;
__jit_debug_register_code();

return1;
}

ZEND_APIvoidzend_gdb_unregister_all(void)
{
zend_gdbjit_code_entry*entry;

__jit_debug_descriptor.action_flag=ZEND_GDBJIT_UNREGISTER;
while ((entry=__jit_debug_descriptor.first_entry)) {
__jit_debug_descriptor.first_entry=entry->next_entry;
if (entry->next_entry) {
entry->next_entry->prev_entry=NULL;
 }
/* Notify GDB */
__jit_debug_descriptor.relevant_entry=entry;
__jit_debug_register_code();

free(entry);
 }
}

ZEND_APIboolzend_gdb_present(void)
{
boolret=0;
#if defined(__linux__) /* netbsd while having this procfs part, does not hold the tracer pid */
intfd=open("/proc/self/status", O_RDONLY);

if (fd >= 0) {
charbuf[1024];
ssize_tn=read(fd, buf, sizeof(buf) -1);
char*s;
pid_tpid;

if (n>0) {
buf[n] =0;
s=strstr(buf, "TracerPid:");
if (s) {
s+=sizeof("TracerPid:") -1;
while (*s==' '||*s=='\t') {
s++;
 }
pid=atoi(s);
if (pid) {
charout[1024];
snprintf(buf, sizeof(buf), "/proc/%d/exe", (int)pid);
if (readlink(buf, out, sizeof(out) -1) >0) {
if (strstr(out, "gdb")) {
ret=1;
 }
 }
 }
 }
 }

close(fd);
 }
#elif defined(__FreeBSD__) &&__FreeBSD_version >= 1100000
structkinfo_proc*proc=kinfo_getproc(getpid());

if (proc) {
if ((proc->ki_flag&P_TRACED) !=0) {
structkinfo_proc*dbg=kinfo_getproc(proc->ki_tracer);

ret= (dbg&&strstr(dbg->ki_comm, "gdb"));
 }
 }
#endif

returnret;
}