这篇文章连着上一篇文章
http://blog.csdn.net/cabing2005/article/details/53540159
资源类型变量的使用
在zend_minit_function里面注册资源
#define PHP_SAMPLE_DESCRIPTOR_RES_NAME "山寨文件描述符"
static int le_sample_descriptor;
ZEND_MINIT_FUNCTION(sample)
{
le_sample_descriptor = zend_register_list_destructors_ex(NULL, NULL, PHP_SAMPLE_DESCRIPTOR_RES_NAME,module_number);
return SUCCESS;
}
//附加资料
#define register_list_destructors(ld, pld) zend_register_list_destructors((void (*)(void *))ld, (void (*)(void *))pld, module_number);
ZEND_API int zend_register_list_destructors(void (*ld)(void *), void (*pld)(void *), int module_number);
ZEND_API int zend_register_list_destructors_ex(rsrc_dtor_func_t ld, rsrc_dtor_func_t pld, char *type_name, int module_number);
获取资源三种方式
//方式一
ZEND_FETCH_RESOURCE(fp,FILE*,&file_resource,-1,PHP_EXT_START1_DESCRIPTOR_RES_NAME,le_ext_start1);
/*
//方式二
fp = (FILE*) zend_fetch_resource(&file_resource TSRMLS_CC, -1,PHP_EXT_START1_DESCRIPTOR_RES_NAME, NULL,1, le_ext_start1);
if (!fp)
{
RETURN_FALSE;
}*/
//方式三
int rsrc_type;
fp = (FILE*)zend_list_find(Z_RESVAL_P(file_resource),&rsrc_type);
if (!fp || rsrc_type != le_ext_start1){
php_error_docref(NULL TSRMLS_CC, E_WARNING,"Invalid resource provided");
RETURN_NULL();
}
释放资源–可以在mini上注册
ZEND_FETCH_RESOURCE(fp, FILE*, &file_resource, -1,PHP_SAMPLE_DESCRIPTOR_RES_NAME, le_sample_descriptor);
zend_hash_index_del(&EG(regular_list),Z_RESVAL_P(file_resource));
测试文件
<?php
class A{}
//测试写一个文件
$fp = ext_start1_open("test.log", "w");
$ret = ext_start1_write($fp,"abcdefg12313123adfadf");
var_dump($ret);
ext_start1_close($fp);
//测试读一个文件
$fp2 = ext_start1_open("test.log", "r");
var_dump("$fp=",$fp,$fp2);
var_dump(ext_start1_read($fp2));
ext_start1_close($fp2);
die;
//zval_create_array创建一个数组
$arr2 = zval_create_array();
var_dump($arr2);
//zval_change_ref
$str = "hi go";
var_dump(zval_change_ref($str));
var_dump($str);
//zval_add_data
var_dump(zval_add_data());
var_dump($zval_add_data_a,$zval_add_data_b);
//tzval_type_conv_string
var_dump(tzval_type_conv_string(1),tzval_type_conv_string(3.1415));
//tzval_type_exist
$sss1 = 12;
tzval_type_exist("sss1");
//tzval_type
tzval_type();var_dump($tzval_type_data);
//tjudge_type
var_dump(tjudge_type(3),tjudge_type("a1"),tjudge_type(1.1));
var_dump(tjudge_type(array(1,2)),tjudge_type(new A()));
//ext_start1_self_concat
$str = "abc";
var_dump(ext_start1_self_concat($str,3));
头文件
/*
+----------------------------------------------------------------------+
| PHP Version 5 |
+----------------------------------------------------------------------+
| Copyright (c) 1997-2014 The PHP Group |
+----------------------------------------------------------------------+
| This source file is subject to version 3.01 of the PHP 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.php.net/license/3_01.txt |
| If you did not receive a copy of the PHP license and are unable to |
| obtain it through the world-wide-web, please send a note to |
| license@php.net so we can mail you a copy immediately. |
+----------------------------------------------------------------------+
| Author: |
+----------------------------------------------------------------------+
*/
/* $Id$ */
#ifndef PHP_EXT_START1_H
#define PHP_EXT_START1_H
extern zend_module_entry ext_start1_module_entry;
#define phpext_ext_start1_ptr &ext_start1_module_entry
#define PHP_EXT_START1_VERSION "0.1.0" /* Replace with version number for your extension */
#ifdef PHP_WIN32
# define PHP_EXT_START1_API __declspec(dllexport)
#elif defined(__GNUC__) && __GNUC__ >= 4
# define PHP_EXT_START1_API __attribute__ ((visibility("default")))
#else
# define PHP_EXT_START1_API
#endif
#ifdef ZTS
#include "TSRM.h"
#endif
/*
Declare any global variables you may need between the BEGIN
and END macros here:
ZEND_BEGIN_MODULE_GLOBALS(ext_start1)
long global_value;
char *global_string;
ZEND_END_MODULE_GLOBALS(ext_start1)
*/
/* In every utility function you add that needs to use variables
in php_ext_start1_globals, call TSRMLS_FETCH(); after declaring other
variables used by that function, or better yet, pass in TSRMLS_CC
after the last function argument and declare your utility function
with TSRMLS_DC after the last declared argument. Always refer to
the globals in your function as EXT_START1_G(variable). You are
encouraged to rename these macros something shorter, see
examples in any other php module directory.
*/
#ifdef ZTS
#define EXT_START1_G(v) TSRMG(ext_start1_globals_id, zend_ext_start1_globals *, v)
#else
#define EXT_START1_G(v) (ext_start1_globals.v)
#endif
#endif /* PHP_EXT_START1_H */
/*
* Local variables:
* tab-width: 4
* c-basic-offset: 4
* End:
* vim600: noet sw=4 ts=4 fdm=marker
* vim<600: noet sw=4 ts=4
*/
PHP_FUNCTION(ext_start1_self_concat);
PHP_FUNCTION(tjudge_type);
PHP_FUNCTION(tzval_type);
PHP_FUNCTION(tzval_type_exist);
PHP_FUNCTION(tzval_type_conv_string);
PHP_FUNCTION(zval_add_data);
PHP_FUNCTION(zval_change_ref);
PHP_FUNCTION(zval_create_array);
PHP_FUNCTION(php_resource);
PHP_FUNCTION(ext_start1_open);
PHP_FUNCTION(ext_start1_read);
PHP_FUNCTION(ext_start1_write);
PHP_FUNCTION(ext_start1_close);
实现文件
/*
+----------------------------------------------------------------------+
| PHP Version 5 |
+----------------------------------------------------------------------+
| Copyright (c) 1997-2014 The PHP Group |
+----------------------------------------------------------------------+
| This source file is subject to version 3.01 of the PHP 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.php.net/license/3_01.txt |
| If you did not receive a copy of the PHP license and are unable to |
| obtain it through the world-wide-web, please send a note to |
| license@php.net so we can mail you a copy immediately. |
+----------------------------------------------------------------------+
| Author: |
+----------------------------------------------------------------------+
*/
/* $Id$ */
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include "php.h"
#include "php_ini.h"
#include "ext/standard/info.h"
#include "php_ext_start1.h"
/* If you declare any globals in php_ext_start1.h uncomment this:
ZEND_DECLARE_MODULE_GLOBALS(ext_start1)
*/
/* True global resources - no need for thread safety here */
static int le_ext_start1;
/* {{{ PHP_INI
*/
/* Remove comments and fill if you need to have entries in php.ini
PHP_INI_BEGIN()
STD_PHP_INI_ENTRY("ext_start1.global_value", "42", PHP_INI_ALL, OnUpdateLong, global_value, zend_ext_start1_globals, ext_start1_globals)
STD_PHP_INI_ENTRY("ext_start1.global_string", "foobar", PHP_INI_ALL, OnUpdateString, global_string, zend_ext_start1_globals, ext_start1_globals)
PHP_INI_END()
*/
/* }}} */
/* Remove the following function when you have successfully modified config.m4
so that your module can be compiled into PHP, it exists only for testing
purposes. */
/* Every user-visible function in PHP should document itself in the source */
/* {{{ proto string confirm_ext_start1_compiled(string arg)
Return a string to confirm that the module is compiled in */
PHP_FUNCTION(confirm_ext_start1_compiled)
{
char *arg = NULL;
int arg_len, len;
char *strg;
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &arg, &arg_len) == FAILURE) {
return;
}
len = spprintf(&strg, 0, "Congratulations! You have successfully modified ext/%.78s/config.m4. Module %.78s is now compiled into PHP.", "ext_start1", arg);
RETURN_STRINGL(strg, len, 0);
}
/* }}} */
/* The previous line is meant for vim and emacs, so it can correctly fold and
unfold functions in source code. See the corresponding marks just before
function definition, where the functions purpose is also documented. Please
follow this convention for the convenience of others editing your code.
*/
/* {{{ php_ext_start1_init_globals
*/
/* Uncomment this function if you have INI entries
static void php_ext_start1_init_globals(zend_ext_start1_globals *ext_start1_globals)
{
ext_start1_globals->global_value = 0;
ext_start1_globals->global_string = NULL;
}
*/
/* }}} */
/* {{{ PHP_MINIT_FUNCTION
*/
#define PHP_EXT_START1_DESCRIPTOR_RES_NAME "php_ext_star1_desc"
static void php_ext_start1_descriptor_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC)
{
FILE *fp = (FILE*)rsrc->ptr;
fclose(fp);
}
PHP_MINIT_FUNCTION(ext_start1)
{
/* If you have INI entries, uncomment these lines
REGISTER_INI_ENTRIES();
*/
le_ext_start1 = zend_register_list_destructors_ex(php_ext_start1_descriptor_dtor, NULL, PHP_EXT_START1_DESCRIPTOR_RES_NAME,module_number);
return SUCCESS;
}
/* }}} */
/* {{{ PHP_MSHUTDOWN_FUNCTION
*/
PHP_MSHUTDOWN_FUNCTION(ext_start1)
{
/* uncomment this line if you have INI entries
UNREGISTER_INI_ENTRIES();
*/
return SUCCESS;
}
/* }}} */
/* Remove if there's nothing to do at request start */
/* {{{ PHP_RINIT_FUNCTION
*/
PHP_RINIT_FUNCTION(ext_start1)
{
return SUCCESS;
}
/* }}} */
/* Remove if there's nothing to do at request end */
/* {{{ PHP_RSHUTDOWN_FUNCTION
*/
PHP_RSHUTDOWN_FUNCTION(ext_start1)
{
return SUCCESS;
}
/* }}} */
/* {{{ PHP_MINFO_FUNCTION
*/
PHP_MINFO_FUNCTION(ext_start1)
{
php_info_print_table_start();
php_info_print_table_header(2, "ext_start1 support", "enabled");
php_info_print_table_end();
/* Remove comments if you have entries in php.ini
DISPLAY_INI_ENTRIES();
*/
}
/* }}} */
/* {{{ ext_start1_functions[]
*
* Every user visible function must have an entry in ext_start1_functions[].
*/
const zend_function_entry ext_start1_functions[] = {
PHP_FE(ext_start1_close,NULL)
PHP_FE(ext_start1_write,NULL)
PHP_FE(ext_start1_read,NULL)
PHP_FE(ext_start1_open,NULL)
PHP_FE(zval_create_array,NULL)
PHP_FE(zval_change_ref,NULL)
PHP_FE(zval_add_data,NULL)
PHP_FE(ext_start1_self_concat,NULL)
PHP_FE(tjudge_type,NULL)
PHP_FE(tzval_type,NULL)
PHP_FE(tzval_type_exist,NULL)
PHP_FE(tzval_type_conv_string,NULL)
PHP_FE(confirm_ext_start1_compiled, NULL) /* For testing, remove later. */
PHP_FE_END /* Must be the last line in ext_start1_functions[] */
};
/* }}} */
/* {{{ ext_start1_module_entry
*/
zend_module_entry ext_start1_module_entry = {
STANDARD_MODULE_HEADER,
"ext_start1",
ext_start1_functions,
PHP_MINIT(ext_start1),
PHP_MSHUTDOWN(ext_start1),
PHP_RINIT(ext_start1), /* Replace with NULL if there's nothing to do at request start */
PHP_RSHUTDOWN(ext_start1), /* Replace with NULL if there's nothing to do at request end */
PHP_MINFO(ext_start1),
PHP_EXT_START1_VERSION,
STANDARD_MODULE_PROPERTIES
};
/* }}} */
#ifdef COMPILE_DL_EXT_START1
ZEND_GET_MODULE(ext_start1)
#endif
/*
* Local variables:
* tab-width: 4
* c-basic-offset: 4
* End:
* vim600: noet sw=4 ts=4 fdm=marker
* vim<600: noet sw=4 ts=4
*/
//连接字符串
PHP_FUNCTION(ext_start1_self_concat){
char *result = NULL;
char *presult;
int result_len;
char *arg = NULL;
int arg_len;
long len;
if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,"sl",&arg,&arg_len,&len) == FAILURE){
return;
}
php_printf("%s,arg_len=%d,len=%ld\n",arg,arg_len,len);
result_len = arg_len * len;
result = (char*)emalloc(result_len+1);
presult = result;
while(len--){
memcpy(presult,arg,arg_len);
presult += arg_len;
}
presult += '\0';
php_printf("result=%lu\n",strlen(result));
RETURN_STRINGL(result, result_len, 0);
}
//获取类型 返回类型字符串
PHP_FUNCTION(tjudge_type){
zval **ptr;
if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,"Z",&ptr) == FAILURE){
return;
}
switch(Z_TYPE_PP(ptr)){
case IS_NULL:
RETVAL_STRING("null",1);
break;
case IS_BOOL:
RETVAL_STRING("bool",1);
break;
case IS_LONG:
RETVAL_STRING("long",1);
break;
case IS_DOUBLE:
RETVAL_STRING("double",1);
break;
case IS_STRING:
RETVAL_STRING("string",1);
break;
case IS_ARRAY:
RETVAL_STRING("array",1);
break;
case IS_OBJECT:
RETVAL_STRING("object",1);
break;
case IS_RESOURCE:
RETVAL_STRING("resource",1);
break;
default :
RETVAL_STRING("other",1);
}
}
//注册当前作用域的变量
PHP_FUNCTION(tzval_type){
zval *ptr;
MAKE_STD_ZVAL(ptr);
ZVAL_STRING(ptr,"simple php ext",1);
ZEND_SET_SYMBOL(EG(active_symbol_table),"tzval_type_data",ptr);
}
//检测类型是否存在
PHP_FUNCTION(tzval_type_exist){
zval **pptr;
char *arg;
int arg_len;
if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,"s",&arg,&arg_len) == FAILURE){
return;
}
if(zend_hash_find(EG(active_symbol_table),arg,arg_len+1,(void**)&pptr) ==SUCCESS){
//if(zend_hash_find(EG(active_symbol_table),"sss1",sizeof("sss1"),(void**)&pptr) ==SUCCESS){
php_printf("find it\n");
}else{
php_printf("can't find it\n");
}
}
//类型的转换--int to string
PHP_FUNCTION(tzval_type_conv_string){
zval **pptr;
//MAKE_STD_ZVAL(*pptr);//error
if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,"Z",&pptr) == FAILURE){
return;
}
if(Z_TYPE_PP(pptr) == IS_ARRAY){
return;
}
if(Z_TYPE_PP(pptr) == IS_OBJECT){
return;
}
if(Z_TYPE_PP(pptr) == IS_RESOURCE){
return;
}
//convert
convert_to_string(*pptr);
RETURN_STRING(Z_STRVAL_PP(pptr),1);
}
//添加同一个数据
PHP_FUNCTION(zval_add_data)
{
zval *helloval;
MAKE_STD_ZVAL(helloval);
ZVAL_STRING(helloval, "Hello World", 1);
zend_hash_add(EG(active_symbol_table), "zval_add_data_a", sizeof("zval_add_data_a"),&helloval, sizeof(zval*), NULL);
zend_hash_add(EG(active_symbol_table), "zval_add_data_b", sizeof("zval_add_data_b"),&helloval, sizeof(zval*), NULL);
php_printf("data_ref=%u",helloval->refcount__gc);
RETVAL_LONG(42);
}
//引用传值
PHP_FUNCTION(zval_change_ref)
{
zval *a;
//我们我接收的参数传给zval *a;
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z", &a) == FAILURE)
{
RETURN_NULL();
}
//将a转成字符串
convert_to_string(a);
//更改数据
ZVAL_STRING(a," (modified by ref!)",1);
RETVAL_STRING("change ok\n",1);
}
//创造数组
PHP_FUNCTION(zval_create_array){
zval *myarr;
array_init(return_value);
add_assoc_long(return_value,"life",42);
add_index_bool(return_value,123,1);
add_next_index_double(return_value,3.1415);
add_next_index_string(return_value,"GO",1);
add_next_index_string(return_value,estrdup("Bar"), 0);
MAKE_STD_ZVAL(myarr);
array_init(myarr);
add_next_index_long(myarr,1);
add_next_index_long(myarr,1100);
add_next_index_long(myarr,9900);
add_index_zval(return_value,33,myarr);
}
PHP_FUNCTION(ext_start1_open){
FILE *fp;
char *name,*mode;
int name_len,mode_len;
if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,"ss",&name,&name_len,&mode,&mode_len)== FAILURE){
RETURN_NULL();
}
if(!name_len || !mode_len){
php_error_docref(NULL TSRMLS_CC, E_WARNING,"Invalid name or mode length");
RETURN_FALSE;
}
fp = fopen(name,mode);
if(!fp){
php_error_docref(NULL TSRMLS_CC, E_WARNING,"Unable to open %s using mode %s",name, mode);
RETURN_FALSE;
}
ZEND_REGISTER_RESOURCE(return_value,fp,le_ext_start1);
}
/**
ZEND_FUNCTION(sample_fwrite)
{
FILE *fp;
zval *file_resource;
char *data;
int data_len;
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs",&file_resource, &data, &data_len) == FAILURE )
{
RETURN_NULL();
}
ZEND_FETCH_RESOURCE(fp,FILE*,&file_resource,-1,PHP_SAMPLE_DESCRIPTOR_RES_NAME,le_sample_descriptor);
RETURN_LONG(fwrite(data, 1, data_len, fp));
}
*/
PHP_FUNCTION(ext_start1_write){
FILE *fp;
zval *file_resource;
char *data;
int data_len;
if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,"rs",&file_resource,&data,&data_len) == FAILURE)
{
RETURN_NULL();
}
//ZEND_FETCH_RESOURCE(fp,FILE*,&file_resource,-1,PHP_EXT_START1_DESCRIPTOR_RES_NAME,le_ext_start1);
/*
fp = (FILE*) zend_fetch_resource(&file_resource TSRMLS_CC, -1,PHP_EXT_START1_DESCRIPTOR_RES_NAME, NULL,1, le_ext_start1);
if (!fp)
{
RETURN_FALSE;
}*/
int rsrc_type;
fp = (FILE*)zend_list_find(Z_RESVAL_P(file_resource),&rsrc_type);
if (!fp || rsrc_type != le_ext_start1){
php_error_docref(NULL TSRMLS_CC, E_WARNING,"Invalid resource provided");
RETURN_NULL();
}
RETVAL_LONG(fwrite(data,1,data_len,fp));
}
PHP_FUNCTION(ext_start1_read){
FILE *fp;
zval *file_resource;
char buffer[4069];
if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,"r",&file_resource) == FAILURE)
{
RETURN_NULL();
}
ZEND_FETCH_RESOURCE(fp,FILE*,&file_resource,-1,PHP_EXT_START1_DESCRIPTOR_RES_NAME,le_ext_start1);
int read_len = fread(buffer,4096,1,fp);
if( read_len >= 0){
read_len = strlen(buffer);
char *result = (char*)emalloc(read_len+1);
memcpy(result,buffer,read_len);
result[read_len] = '\0';
//printf("%d\n",read_len);
RETURN_STRINGL(result, read_len, 0);
}
RETURN_FALSE;
}
PHP_FUNCTION(ext_start1_close){
FILE *fp;
zval *file_resource;
if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC,"r",&file_resource) == FAILURE)
{
RETURN_NULL();
}
ZEND_FETCH_RESOURCE(fp,FILE*,&file_resource,-1,PHP_EXT_START1_DESCRIPTOR_RES_NAME,le_ext_start1);
zend_hash_index_del(&EG(regular_list),Z_RESVAL_P(file_resource));
RETURN_TRUE;
}