cd /usr/local/src/php-5.6.7/ext/

./ext_skel --extname=php_list

cd php_list

vim config.m4

PHP_ARG_ENABLE(php_list, whether to enable php_list support,

dnl Make sure that the comment is aligned:

[  --enable-php_list           Enable php_list support])

(dnl是注释标签)

vim list.h

typedef struct list_node

{

zval *value;

struct list_node *prev;

struct list_node *next;

} list_node;

typedef struct list_head

{

int size;

list_node *head;

list_node *tail;

} list_head;

list_head *list_create()

{

list_head *head;

head = (list_head *) malloc(sizeof(list_head));

if(head)

{

head->size = 0;

head->head = NULL;

head->tail = NULL;

}

return head;

}

int list_add_head(list_head *head, zval *value)

{

list_node *node;

node = (list_node *)malloc(sizeof(*node));

if(!node)

{

return 0;

}

node->value = value;

node->prev = NULL;

node->next = head->head;

if(head->head)

{

head->head->prev = node;

}

head->head = node;

if(!head->tail)

{

head->tail = head->head;

}

head->size++;

return 1;

}

int list_add_tail(list_head *head, zval *value)

{

list_node *node;

node = (list_node *)malloc(sizeof(*node));

if(!node)

{

return 0;

}

node->value = value;

node->prev = head->tail;

node->next = NULL;

if(head->tail)

{

head->tail->next = node;

}

head->tail = node;

if(!head->head)

{

head->head = head->tail;

}

head->size++;

return 1;

}

int list_delete_index(list_head *head, int index)

{

list_node *curr;

if(index < 0)

{

index = (-index)-1;

curr = head->tail;

while(index > 0)

{

curr = curr->prev;

index--;

}

}

else

{

curr = head->head;

while(index > 0)

{

curr = curr->next;

index--;

}

}

if(!curr || index > 0)

{

return 0;

}

if(curr->prev)

{

curr->prev->next = curr->next;

}

else

{

head->head = curr->next;

}

if(curr->next)

{

curr->next->prev = curr->prev;

head->tail = curr->prev;

}

return 1;

}

int list_fetch(list_head *head, int index, zval **retval)

{

list_node *node;

if(index >= 0)

{

node = head->head;

while(node && index > 0)

{

node = node->next;

index--;

}

}

else

{

index = (-index) - 1;

node = head->tail;

while(node && index > 0)

{

node = node->prev;

index--;

}

}

if(!node || index > 0)

{

return 0;

}

*retval = node->value;

return 1;

}

int list_length(list_head *head)

{

if(head)

{

return head->size;

}

else

{

return 0;

}

}

void list_destroy(list_head *head)

{

list_node *curr, *next;

curr = head->head;

while(curr)

{

next = curr->next;

free(curr);

curr = next;

}

free(head);

}

vi php_list.c

/*

+----------------------------------------------------------------------+

| PHP Version 5                                                        |

+----------------------------------------------------------------------+

| Copyright (c) 1997-2015 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_php_list.h"

#include "list.h"

/* True global resources - no need for thread safety here */

static int le_php_list;

static int freed = 0;

void list_destroy_handler(zend_rsrc_list_entry *rsrc TSRMLS_DC)

{

if(!freed)

{

list_head *list;

list = (list_head *)rsrc->ptr;

list_destroy(list);

freed = 1;

}

}

/* {{{ PHP_INI

*/

/* Remove comments and fill if you need to have entries in php.ini

PHP_INI_BEGIN()

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_php_list_compiled(string arg)

Return a string to confirm that the module is compiled in */

PHP_FUNCTION(confirm_php_list_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;

}

RETURN_STRINGL(strg, len, 0);

}

PHP_FUNCTION(list_create)

{

list_head *list;

list = list_create();

if(!list)

{

RETURN_NULL();

}

else

{

ZEND_REGISTER_RESOURCE(return_value, list, le_php_list);

}

}

PHP_FUNCTION(list_add_head)

{

zval *value;

zval *lrc;

list_head *list;

if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rz", &lrc, &value) == FAILURE)

{

RETURN_FALSE;

}

ZEND_FETCH_RESOURCE(list, list_head *, &lrc, -1, "List Resource", le_php_list);

list_add_head(list, value);

RETURN_TRUE;

}

PHP_FUNCTION(list_fetch_head)

{

zval *lrc, *retval;

list_head *list;

int res;

if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &lrc) == FAILURE)

{

RETURN_FALSE;

}

ZEND_FETCH_RESOURCE(list, list_head *, &lrc, -1, "List Resource", le_php_list);

res = list_fetch(list, 0, &retval);

if(!res)

{

RETURN_NULL();

}

else

{

RETURN_ZVAL(retval, 1, 0);

}

}

PHP_FUNCTION(list_add_tail)

{

zval *value;

zval *lrc;

list_head *list;

if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rz", &lrc, &value) == FAILURE)

{

RETURN_FALSE;

}

ZEND_FETCH_RESOURCE(list, list_head *, &lrc, -1, "List Resource", le_php_list);

list_add_tail(list, value);

RETURN_TRUE;

}

PHP_FUNCTION(list_fetch_tail)

{

zval *lrc, *retval;

list_head *list;

int res;

if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &lrc) == FAILURE)

{

RETURN_FALSE;

}

ZEND_FETCH_RESOURCE(list, list_head *, &lrc, -1, "List Resource", le_php_list);

res = list_fetch(list, list_length(list)-1, &retval);

if(!res)

{

RETURN_NULL();

}

else

{

RETURN_ZVAL(retval, 1, 0);

}

}

PHP_FUNCTION(list_fetch_index)

{

zval *lrc, *retval;

list_head *list;

long index;

int res;

if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &lrc, &index) == FAILURE)

{

RETURN_FALSE;

}

ZEND_FETCH_RESOURCE(list, list_head *, &lrc, -1, "List Resource", le_php_list);

res = list_fetch(list, index, &retval);

if(!res)

{

RETURN_NULL();

}

else

{

RETURN_ZVAL(retval, 1, 0);

}

}

PHP_FUNCTION(list_element_nums)

{

zval *lrc;

list_head *list;

if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &lrc) == FAILURE)

{

RETURN_FALSE;

}

ZEND_FETCH_RESOURCE(list, list_head *, &lrc, -1, "List Resource", le_php_list);

RETURN_LONG(list_length(list));

}

PHP_FUNCTION(list_delete_index)

{

zval *lrc;

list_head *list;

long index;

if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &lrc, &index) == FAILURE)

{

RETURN_FALSE;

}

ZEND_FETCH_RESOURCE(list, list_head *, &lrc, -1, "List Resource", le_php_list);

if(list_delete(list, index))

{

RETURN_TRUE;

}

else

{

RETURN_FALSE;

}

}

PHP_FUNCTION(list_destroy)

{

zval *lrc;

list_head *list;

if(zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &lrc) == FAILURE)

{

RETURN_FALSE;

}

ZEND_FETCH_RESOURCE(list, list_head *, &lrc, -1, "List Resource", le_php_list);

if(!freed)

{

list_destroy(list);

freed = 1;

}

}

/* }}} */

/* 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_php_list_init_globals

*/

/* Uncomment this function if you have INI entries

static void php_php_list_init_globals(zend_php_list_globals *php_list_globals)

{

php_list_globals->global_value = 0;

php_list_globals->global_string = NULL;

}

*/

/* }}} */

/* {{{ PHP_MINIT_FUNCTION

*/

PHP_MINIT_FUNCTION(php_list)

{

/* If you have INI entries, uncomment these lines

REGISTER_INI_ENTRIES();

*/

le_php_list = zend_register_list_destructors_ex(list_destroy_handler, NULL, "list_resource", module_number);

return SUCCESS;

}

/* }}} */

/* {{{ PHP_MSHUTDOWN_FUNCTION

*/

PHP_MSHUTDOWN_FUNCTION(php_list)

{

/* 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(php_list)

{

return SUCCESS;

}

/* }}} */

/* Remove if there's nothing to do at request end */

/* {{{ PHP_RSHUTDOWN_FUNCTION

*/

PHP_RSHUTDOWN_FUNCTION(php_list)

{

return SUCCESS;

}

/* }}} */

/* {{{ PHP_MINFO_FUNCTION

*/

PHP_MINFO_FUNCTION(php_list)

{

php_info_print_table_start();

php_info_print_table_header(2, "php_list support", "enabled");

php_info_print_table_end();

/* Remove comments if you have entries in php.ini

DISPLAY_INI_ENTRIES();

*/

}

/* }}} */

/* {{{ php_list_functions[]

*

* Every user visible function must have an entry in php_list_functions[].

*/

const zend_function_entry php_list_functions[] = {

PHP_FE(list_create,             NULL)

PHP_FE(list_add_head,           NULL)

PHP_FE(list_fetch_head,         NULL)

PHP_FE(list_add_tail,           NULL)

PHP_FE(list_fetch_tail,         NULL)

PHP_FE(list_fetch_index,        NULL)

PHP_FE(list_delete_index,       NULL)

PHP_FE(list_destroy,            NULL)

PHP_FE(list_element_nums,       NULL)

PHP_FE(confirm_php_list_compiled,       NULL)           /* For testing, remove later. */

PHP_FE_END      /* Must be the last line in php_list_functions[] */

};

/* }}} */

/* {{{ php_list_module_entry

*/

zend_module_entry php_list_module_entry = {

STANDARD_MODULE_HEADER,

"php_list",

php_list_functions,

PHP_MINIT(php_list),

PHP_MSHUTDOWN(php_list),

PHP_RINIT(php_list),            /* Replace with NULL if there's nothing to do at request start */

PHP_RSHUTDOWN(php_list),        /* Replace with NULL if there's nothing to do at request end */

PHP_MINFO(php_list),

PHP_PHP_LIST_VERSION,

STANDARD_MODULE_PROPERTIES

};

/* }}} */

#ifdef COMPILE_DL_PHP_LIST

ZEND_GET_MODULE(php_list)

#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

*/

phpize

./configure --with-php-config=/usr/local/php/bin/php-config

make

make install

查看php_list模块是否安装成功

/usr/local/php/bin/php -m | grep php_list

如果显示php_list，表明安装成功

重启php-fpm

编写测试的php文件

$list = list_create();

$tmp = array();

for($i=0; $i<10; $i++)

{

$tmp[$i] = "elements".$i;

echo $tmp[$i].'
';

list_add_head($list, $tmp[$i]);

//list_add_head($list, "element[$i]");

}

$list_nums = list_element_nums($list);

echo "numbers of list:".$list_nums.'
';

echo '
';

for($i=0; $i

{

$res = list_fetch_index($list, $i);

echo $res.'
';

}

显示结果为：

elements0

elements1

elements2

elements3

elements4

elements5

elements6

elements7

elements8

elements9

numbers of list:10

elements9

elements8

elements7

elements6

elements5

elements4

elements3

elements2

elements1

elements0