archive/php-src
1
0
Fork 0
mirror of https://github.com/php/php-src.git synced 2025-08-19 17:04:47 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions 2

+compile

Browse source
This commit is contained in:
krakjoe 2013-11-10 11:35:59 +00:00
parent 6df19b3aa2
commit b978c20f63
5 changed files with 92 additions and 18 deletions
Download patch file Download diff file Expand all files Collapse all files

64
phpdbg_prompt.c
View file

@ -32,6 +32,15 @@ static PHPDBG_COMMAND(exec) { /* {{{ */
printf(
"Unsetting old execution context: %s\n", PHPDBG_G(exec));
efree(PHPDBG_G(exec));
PHPDBG_G(exec) = NULL;
}
if (PHPDBG_G(ops)) {
printf(
"Destroying compiled opcodes\n");
destroy_op_array(PHPDBG_G(ops) TSRMLS_CC);
efree(PHPDBG_G(ops));
PHPDBG_G(ops) = NULL;
}
PHPDBG_G(exec) = estrndup(
@ -39,11 +48,51 @@ static PHPDBG_COMMAND(exec) { /* {{{ */
printf(
"Set execution context: %s\n", PHPDBG_G(exec));
return SUCCESS;
} /* }}} */
static PHPDBG_COMMAND(compile) { /* {{{ */
zend_file_handle fh;
if (PHPDBG_G(exec)) {
if (PHPDBG_G(ops)) {
printf("Destroying compiled opcodes\n");
destroy_op_array(PHPDBG_G(ops) TSRMLS_CC);
efree(PHPDBG_G(ops));
}
printf("Attempting compilation of %s\n", PHPDBG_G(exec));
if (php_stream_open_for_zend_ex(PHPDBG_G(exec), &fh, USE_PATH|STREAM_OPEN_FOR_INCLUDE TSRMLS_CC) == SUCCESS) {
PHPDBG_G(ops) = zend_compile_file(
&fh, ZEND_INCLUDE TSRMLS_CC);
zend_destroy_file_handle(&fh TSRMLS_CC);
printf("Success\n");
return SUCCESS;
} else {
printf("Could not open file %s\n", PHPDBG_G(exec));
return FAILURE;
}
} else {
printf("No execution context\n");
return FAILURE;
}
} /* }}} */
static PHPDBG_COMMAND(print) { /* {{{ */
printf(
"%s\n", expr);
if (!expr_len) {
printf("Showing Execution Context Information:\n");
printf("Exec\t\t%s\n", PHPDBG_G(exec) ? PHPDBG_G(exec) : "none");
printf("Compiled\t%s\n", PHPDBG_G(ops) ? "yes" : "no");
if (PHPDBG_G(ops)) {
printf("Opcodes\t\t%d\n", PHPDBG_G(ops)->last-1);
printf("Variables\t%d\n", PHPDBG_G(ops)->last_var-1);
}
} else {
printf(
"%s\n", expr);
}
return SUCCESS;
} /* }}} */
@ -93,11 +142,12 @@ static PHPDBG_COMMAND(help) /* {{{ */
} /* }}} */
static const phpdbg_command_t phpdbg_prompt_commands[] = {
PHPDBG_COMMAND_D(exec, "set execution context"),
PHPDBG_COMMAND_D(print, "print something"),
PHPDBG_COMMAND_D(brake, "set brake point"),
PHPDBG_COMMAND_D(help, "show help menu"),
PHPDBG_COMMAND_D(quit, "exit phpdbg"),
PHPDBG_COMMAND_D(exec, "set execution context"),
PHPDBG_COMMAND_D(compile, "attempt to pre-compile execution context"),
PHPDBG_COMMAND_D(print, "print something"),
PHPDBG_COMMAND_D(brake, "set brake point"),
PHPDBG_COMMAND_D(help, "show help menu"),
PHPDBG_COMMAND_D(quit, "exit phpdbg"),
{NULL, 0, 0}
};