php扩展开发---使用PHP Embed SAPI实现Opcodes查看器

转载：http://www.laruence.com/2008/09/23/539.html
php version:5.6.22
mac

#include <stdio.h>#include "../php/php-5.6.22/sapi/embed/php_embed.h"#ifdef ZTS    void ***tsrm_ls;#endif//#define BUFFER_LEN 10000;char *opname(zend_uchar opcode){    switch (opcode) {        case ZEND_NOP:            return "ZEND_NOP";        case ZEND_ADD:            return "ZEND_ADD";        case ZEND_SUB:            return "ZEND_SUB";        case ZEND_MUL:            return "ZEND_MUL";        case ZEND_DIV:            return "ZEND_DIV";        case ZEND_MOD:            return "ZEND_MOD";        case ZEND_SL:            return "ZEND_SL";        case ZEND_SR:            return "ZEND_SR";        case ZEND_CONCAT:            return "ZEND_CONCAT";        case ZEND_BW_OR:            return "ZEND_BW_OR";        case ZEND_BW_AND:            return "ZEND_BW_AND";        case ZEND_BW_XOR:            return "ZEND_BW_XOR";        case ZEND_BW_NOT:            return "ZEND_BW_NOT";        case ZEND_BOOL_NOT:            return "ZEND_BOOL_NOT";        case ZEND_BOOL_XOR:            return "ZEND_BOOL_XOR";        case ZEND_IS_IDENTICAL:            return "ZEND_IS_IDENTICAL";        case ZEND_IS_NOT_IDENTICAL:            return "ZEND_IS_NOT_IDENTICAL";        case ZEND_IS_EQUAL:            return "ZEND_IS_EQUAL";        case ZEND_IS_NOT_EQUAL:            return "ZEND_IS_NOT_EQUAL";        case ZEND_IS_SMALLER:            return "ZEND_IS_SMALLER";        case ZEND_IS_SMALLER_OR_EQUAL:            return "ZEND_IS_SMALLER_OR_EQUAL";        case ZEND_CAST:            return "ZEND_CAST";        case ZEND_QM_ASSIGN:            return "ZEND_QM_ASSIGN";        case ZEND_ASSIGN_ADD:            return "ZEND_ASSIGN_ADD";        case ZEND_ASSIGN_SUB:            return "ZEND_ASSIGN_SUB";        case ZEND_ASSIGN_MUL:            return "ZEND_ASSIGN_MUL";        case ZEND_ASSIGN_DIV:            return "ZEND_ASSIGN_DIV";        case ZEND_ASSIGN_MOD:            return "ZEND_ASSIGN_MOD";        case ZEND_ASSIGN_SL:            return "ZEND_ASSIGN_SL";        case ZEND_ASSIGN_SR:            return "ZEND_ASSIGN_SR";        case ZEND_ASSIGN_CONCAT:            return "ZEND_ASSIGN_CONCAT";        case ZEND_ASSIGN_BW_OR:            return "ZEND_ASSIGN_BW_OR";        case ZEND_ASSIGN_BW_AND:            return "ZEND_ASSIGN_BW_AND";        case ZEND_ASSIGN_BW_XOR:            return "ZEND_ASSIGN_BW_XOR";        case ZEND_PRE_INC:            return "ZEND_PRE_INC";        case ZEND_PRE_DEC:            return "ZEND_PRE_DEC";        case ZEND_POST_INC:            return "ZEND_POST_INC";        case ZEND_POST_DEC:            return "ZEND_POST_DEC";        case ZEND_ASSIGN:            return "ZEND_ASSIGN";        case ZEND_ASSIGN_REF:            return "ZEND_ASSIGN_REF";        case ZEND_ECHO:            return "ZEND_ECHO";        case ZEND_PRINT:            return "ZEND_PRINT";        case ZEND_JMP:            return "ZEND_JMP";        case ZEND_JMPZ:            return "ZEND_JMPZ";        case ZEND_JMPNZ:            return "ZEND_JMPNZ";        case ZEND_JMPZNZ:            return "ZEND_JMPZNZ";        case ZEND_JMPZ_EX:            return "ZEND_JMPZ_EX";        case ZEND_JMPNZ_EX:            return "ZEND_JMPNZ_EX";        case ZEND_CASE:            return "ZEND_CASE";        case ZEND_SWITCH_FREE:            return "ZEND_SWITCH_FREE";        case ZEND_BRK:            return "ZEND_BRK";        case ZEND_CONT:            return "ZEND_CONT";        case ZEND_BOOL:            return "ZEND_BOOL";        case ZEND_INIT_STRING:            return "ZEND_INIT_STRING";        case ZEND_ADD_CHAR:            return "ZEND_ADD_CHAR";        case ZEND_ADD_STRING:            return "ZEND_ADD_STRING";        case ZEND_ADD_VAR:            return "ZEND_ADD_VAR";        case ZEND_BEGIN_SILENCE:            return "ZEND_BEGIN_SILENCE";        case ZEND_END_SILENCE:            return "ZEND_END_SILENCE";        case ZEND_INIT_FCALL_BY_NAME:            return "ZEND_INIT_FCALL_BY_NAME";        case ZEND_DO_FCALL:            return "ZEND_DO_FCALL";        case ZEND_DO_FCALL_BY_NAME:            return "ZEND_DO_FCALL_BY_NAME";        case ZEND_RETURN:            return "ZEND_RETURN";        case ZEND_RECV:            return "ZEND_RECV";        case ZEND_RECV_INIT:            return "ZEND_RECV_INIT";        case ZEND_SEND_VAL:            return "ZEND_SEND_VAL";        case ZEND_SEND_VAR:            return "ZEND_SEND_VAR";        case ZEND_SEND_REF:            return "ZEND_SEND_REF";        case ZEND_NEW:            return "ZEND_NEW";        case ZEND_INIT_NS_FCALL_BY_NAME:            return "ZEND_INIT_NS_FCALL_BY_NAME";        case ZEND_FREE:            return "ZEND_FREE";        case ZEND_INIT_ARRAY:            return "ZEND_INIT_ARRAY";        case ZEND_ADD_ARRAY_ELEMENT:            return "ZEND_ADD_ARRAY_ELEMENT";        case ZEND_INCLUDE_OR_EVAL:            return "ZEND_INCLUDE_OR_EVAL";        case ZEND_UNSET_VAR:            return "ZEND_UNSET_VAR";        case ZEND_UNSET_DIM:            return "ZEND_UNSET_DIM";        case ZEND_UNSET_OBJ:            return "ZEND_UNSET_OBJ";        case ZEND_FE_RESET:            return "ZEND_FE_RESET";        case ZEND_FE_FETCH:            return "ZEND_FE_FETCH";        case ZEND_EXIT:            return "ZEND_EXIT";        case ZEND_FETCH_R:            return "ZEND_FETCH_R";        case ZEND_FETCH_DIM_R:            return "ZEND_FETCH_DIM_R";        case ZEND_FETCH_OBJ_R:            return "ZEND_FETCH_OBJ_R";        case ZEND_FETCH_W:            return "ZEND_FETCH_W";        case ZEND_FETCH_DIM_W:            return "ZEND_FETCH_DIM_W";        case ZEND_FETCH_OBJ_W:            return "ZEND_FETCH_OBJ_W";        case ZEND_FETCH_RW:            return "ZEND_FETCH_RW";        case ZEND_FETCH_DIM_RW:            return "ZEND_FETCH_DIM_RW";        case ZEND_FETCH_OBJ_RW:            return "ZEND_FETCH_OBJ_RW";        case ZEND_FETCH_IS:            return "ZEND_FETCH_IS";        case ZEND_FETCH_DIM_IS:            return "ZEND_FETCH_DIM_IS";        case ZEND_FETCH_OBJ_IS:            return "ZEND_FETCH_OBJ_IS";        case ZEND_FETCH_FUNC_ARG:            return "ZEND_FETCH_FUNC_ARG";        case ZEND_FETCH_DIM_FUNC_ARG:            return "ZEND_FETCH_DIM_FUNC_ARG";        case ZEND_FETCH_OBJ_FUNC_ARG:            return "ZEND_FETCH_OBJ_FUNC_ARG";        case ZEND_FETCH_UNSET:            return "ZEND_FETCH_UNSET";        case ZEND_FETCH_DIM_UNSET:            return "ZEND_FETCH_DIM_UNSET";        case ZEND_FETCH_OBJ_UNSET:            return "ZEND_FETCH_OBJ_UNSET";        case ZEND_FETCH_DIM_TMP_VAR:            return "ZEND_FETCH_DIM_TMP_VAR";        case ZEND_FETCH_CONSTANT:            return "ZEND_FETCH_CONSTANT";        case ZEND_GOTO:            return "ZEND_GOTO";        case ZEND_EXT_STMT:            return "ZEND_EXT_STMT";        case ZEND_EXT_FCALL_BEGIN:            return "ZEND_EXT_FCALL_BEGIN";        case ZEND_EXT_FCALL_END:            return "ZEND_EXT_FCALL_END";        case ZEND_EXT_NOP:            return "ZEND_EXT_NOP";        case ZEND_TICKS:            return "ZEND_TICKS";        case ZEND_SEND_VAR_NO_REF:            return "ZEND_SEND_VAR_NO_REF";        case ZEND_CATCH:            return "ZEND_CATCH";        case ZEND_THROW:            return "ZEND_THROW";        case ZEND_FETCH_CLASS:            return "ZEND_FETCH_CLASS";        case ZEND_CLONE:            return "ZEND_CLONE";        case ZEND_RETURN_BY_REF:            return "ZEND_RETURN_BY_REF";        case ZEND_INIT_METHOD_CALL:            return "ZEND_INIT_METHOD_CALL";        case ZEND_INIT_STATIC_METHOD_CALL:            return "ZEND_INIT_STATIC_METHOD_CALL";        case ZEND_ISSET_ISEMPTY_VAR:            return "ZEND_ISSET_ISEMPTY_VAR";        case ZEND_ISSET_ISEMPTY_DIM_OBJ:            return "ZEND_ISSET_ISEMPTY_DIM_OBJ";        case ZEND_PRE_INC_OBJ:            return "ZEND_PRE_INC_OBJ";        case ZEND_PRE_DEC_OBJ:            return "ZEND_PRE_DEC_OBJ";        case ZEND_POST_INC_OBJ:            return "ZEND_POST_INC_OBJ";        case ZEND_POST_DEC_OBJ:            return "ZEND_POST_DEC_OBJ";        case ZEND_ASSIGN_OBJ:            return "ZEND_ASSIGN_OBJ";        case ZEND_INSTANCEOF:            return "ZEND_INSTANCEOF";        case ZEND_DECLARE_CLASS:            return "ZEND_DECLARE_CLASS";        case ZEND_DECLARE_INHERITED_CLASS:            return "ZEND_DECLARE_INHERITED_CLASS";        case ZEND_DECLARE_FUNCTION:            return "ZEND_DECLARE_FUNCTION";        case ZEND_RAISE_ABSTRACT_ERROR:            return "ZEND_RAISE_ABSTRACT_ERROR";        case ZEND_DECLARE_CONST:            return "ZEND_DECLARE_CONST";        case ZEND_ADD_INTERFACE:            return "ZEND_ADD_INTERFACE";        case ZEND_DECLARE_INHERITED_CLASS_DELAYED:            return "ZEND_DECLARE_INHERITED_CLASS_DELAYED";        case ZEND_VERIFY_ABSTRACT_CLASS:            return "ZEND_VERIFY_ABSTRACT_CLASS";        case ZEND_ASSIGN_DIM:            return "ZEND_ASSIGN_DIM";        case ZEND_ISSET_ISEMPTY_PROP_OBJ:            return "ZEND_ISSET_ISEMPTY_PROP_OBJ";        case ZEND_HANDLE_EXCEPTION:            return "ZEND_HANDLE_EXCEPTION";        case ZEND_USER_OPCODE:            return "ZEND_USER_OPCODE";        case ZEND_JMP_SET:            return "ZEND_JMP_SET";        case ZEND_DECLARE_LAMBDA_FUNCTION:            return "ZEND_DECLARE_LAMBDA_FUNCTION";        case ZEND_ADD_TRAIT:            return "ZEND_ADD_TRAIT";        case ZEND_BIND_TRAITS:            return "ZEND_BIND_TRAITS";        case ZEND_SEPARATE:            return "ZEND_SEPARATE";        case ZEND_QM_ASSIGN_VAR:            return "ZEND_QM_ASSIGN_VAR";        case ZEND_JMP_SET_VAR:            return "ZEND_JMP_SET_VAR";        case ZEND_DISCARD_EXCEPTION:            return "ZEND_DISCARD_EXCEPTION";        case ZEND_YIELD:            return "ZEND_YIELD";        case ZEND_GENERATOR_RETURN:            return "ZEND_GENERATOR_RETURN";        case ZEND_FAST_CALL:            return "ZEND_FAST_CALL";        case ZEND_FAST_RET:            return "ZEND_FAST_RET";        case ZEND_RECV_VARIADIC:            return "ZEND_RECV_VARIADIC";        case ZEND_SEND_UNPACK:            return "ZEND_SEND_UNPACK";        case ZEND_POW:            return "ZEND_POW";        case ZEND_ASSIGN_POW:            return "ZEND_ASSIGN_POW";        default:            return "unknow";    }}char *format_zval(zval *z){    static char buffer[10000];    int len;    switch(z->type) {        case IS_NULL:            return "NULL";        case IS_LONG:        case IS_BOOL:            snprintf(buffer, 10000, "%d", z->value.lval);            return buffer;        case IS_DOUBLE:            snprintf(buffer, 10000, "%f", z->value.dval);            return buffer;        case IS_STRING:            snprintf(buffer, 10000, "\"%s\"", z->value.str.val);            return buffer;        case IS_ARRAY:        case IS_OBJECT:        case IS_RESOURCE:        case IS_CONSTANT://        case IS_CONSTANT_ARRAY:            return "";        default:            return "unknown";    }//    efree(buffer);}char * format_znode(znode_op *n, zend_uint type){    static char buffer[10000];    switch (type &~ EXT_TYPE_UNUSED) {        case IS_CONST:            return format_zval(n->zv);            break;        case IS_VAR:            snprintf(buffer, 10000, "$%d",  n->var /sizeof(temp_variable));            return buffer;            break;        case IS_TMP_VAR:            snprintf(buffer, 10000, "~%d",  n->var /sizeof(temp_variable));            return buffer;            break;        default:            return "";            break;    }//    efree(buffer);}void dump_op(zend_op *op, int num){    printf("%5d  %5d %30s %40s %40s %40s\n", num, op->lineno,           opname(op->opcode),           format_znode(&op->op1 , op->op1_type),           format_znode(&op->op2, op->op2_type),           "sss") ;}void dump_op_array(zend_op_array *op_array){    if(op_array) {        int i;        printf("%5s  %5s %30s %40s %40s %40s\n", "opnum", "line", "opcode", "op1", "op2", "result");        for(i = 0; i < op_array->last; i++) {            dump_op(&op_array->opcodes[i], i);        }    }}int main(int argc, char **argv){    zend_op_array *op_array;    zend_file_handle file_handle;    if(argc != 2) {        printf("usage:  op_dumper <script>\n");        return 1;    }    PHP_EMBED_START_BLOCK(argc,argv);                    printf("Script: %s\n", argv[1]);                    file_handle.filename = argv[1];                    file_handle.free_filename = 0;                    file_handle.type = ZEND_HANDLE_FILENAME;                    file_handle.opened_path = NULL;                    op_array =  zend_compile_file(&file_handle, ZEND_INCLUDE TSRMLS_CC);                    if(!op_array) {                        printf("Error parsing script: %s\n", file_handle.filename);                        return 1;                    }                    dump_op_array(op_array);                    destroy_op_array(op_array TSRMLS_CC);                    efree(op_array);                    zend_destroy_file_handle(&file_handle TSRMLS_CC);    PHP_EMBED_END_BLOCK();    return 0;}