Extension Writing Part III: Resources

野性酷女 2022-08-06 17:00 128阅读 0赞

http://devzone.zend.com/446/extension-writing-part-iii-resources/

[Introduction][]  
[Resources][]  
[Initializing Resources][]  
[Accepting Resources as Function Parameters][]  
[Destroying Resources][]  
[Destroying a Resource by Force][]  
[Persistent Resources][]  
[Finding Existing Persistent Resources][]  
[Sanity Check][]  
[Summary][]

### Introduction ###

Up until now, you’ve worked with concepts that are familiar and map easily to userspace analogies. In this tutorial, you’ll dig into the inner workings of a more alien data type – completely opaque in userspace, but with behavior that should ultimately inspire a sense of déjà vu.

### Resources ###

While a PHP `zval` can represent a wide range of internal data types, one data type that is impossible to represent fully within a script is the pointer. Representing a pointer as a value becomes even more difficult when the structure your pointer references is an opaque `typedef`. Since there’s no meaningful way to present these complex structures, there’s also no way to act upon them meaningfully using traditional operators. The solution to this problem is to simply refer to the pointer by an essentially arbitrary label called a resource.

In order for the resource’s label to have any kind of meaning to the Zend Engine, its underlying data type must first be registered with PHP. You’ll start out by defining a simple data structure in php\_hello.h. You can place it pretty much anywhere but, for the sake of this exercise, put it after the`#define` statements, and before the `PHP_MINIT_FUNCTION` declaration. You’re also defining a constant, which will be used for the resource’s name as shown during a call to `var_dump()`.

Now, open up hello.c and add a true global integer before your`ZEND_DECLARE_MODULE_GLOBALS` statement:

List entry identifiers (`le_*`) are one of the very few places where you’ll declare true, honest to goodness global variables within a PHP extension. These values are simply used with a lookup table to associate resource types with their textual names and their destructor methods, so there’s nothing about them that needs to be threadsafe. Your extension will generate a unique number for each resource type it exports during the `MINIT` phase. Add that to your extension now, by placing the following line at the top of`PHP_MINIT_FUNCTION(hello)`:

### Initializing Resources ###

Now that you’ve registered your resource, you need to do something with it. Add the following function to hello.c, along with its matching entry in the`hello_functions` structure, and as a prototype in php\_hello.h:

Before allocating memory and duplicating data, this function performs a few sanity checks on the data passed into the resource: Was a name provided? Is this person’s age even remotely within the realm of a human lifespan? Of course, anti-senescence research could make the data type for age (and its sanity-checked limits) seem like the Y2K bug someday, but it’s probably safe to assume no-one will be older than 255 anytime soon.

Once the function has satisfied its entrance criteria, it’s all down to allocating some memory and putting the data where it belongs. Lastly,`return_value` is populated with a newly registered resource. This function doesn’t need to understand the internals of the data struct; it only needs to know what its pointer address is, and what resource type that data is associated with.

### Accepting Resources as Function Parameters ###

From the previous tutorial in this series, you already know how to use`zend_parse_parameters()` to accept a resource parameter. Now it’s time to apply that to recovering the data that goes with a given resource. Add this next function to your extension:

The important parts of the functionality here should be easy enough to parse.`ZEND_FETCH_RESOURCE()` wants a variable to drop the pointer value into. It also wants to know what the variable’s internal type should look like, and it needs to know where to get the resource identifier from.

The `-1` in this function call is an alternative to using `&zperson` to identify the resource. If any numeric value is provided here other than `-1`, the Zend Engine will attempt to use that number to identify the resource rather than the `zval*` parameter’s data. If the resource passed does not match the resource type specified by the last parameter, an error will be generated using the resource name given in the second to last parameter.

There is more than one way to skin a resource though. In fact the following four code blocks are all effectively identical:

The last couple of forms are useful in situations where you’re not in a`PHP_FUNCTION()`, and therefore have no `return_value` to assign; or when it’s perfectly reasonable for the resource type to not match, and simply returning`FALSE` is not what you want.

However you choose to retrieve your resource data from the parameter, the result is the same. You now have a familiar C struct that can be accessed in exactly the same way as you would any other C program. At this point the struct still ‘belongs’ to the resource variable, so your function shouldn’t free the pointer or change reference counts prior to exiting. So how are resources destroyed?

### Destroying Resources ###

Most PHP functions that create resource parameters have matching functions to free those resources. For example, `mysql_connect()` has `mysql_close()`,`mysql_query()` has `mysql_free_result()`, `fopen()` has `fclose()`, and so on and so forth. Experience has probably taught you that if you simply `unset()`variables containing resource values, then whatever real resource they’re attached to will also be freed/closed. For example:

The first line of this snippet opens a file for writing, foo.txt, and assigns the stream resource to the variable `$fp`. When the second line unsets `$fp`, PHP automatically closes the file – even though `fclose()` was never called. How does it do that?

The secret lies in the `zend_register_resource()` call you made in your `MINIT`function. The two `NULL` parameters you passed correspond to cleanup (or `dtor`) functions. The first is called for ordinary resources, and the second for persistent ones. We’ll focus on ordinary resources for now and come back to persistent resources later on, but the general semantics are the same. Modify your `zend_register_resource` line as follows:

and create a new function located just above the `MINIT` method:

As you can see, this simply frees any allocated buffers associated with the resource. When the last userspace variable containing a reference to your resource goes out of scope, this function will be automatically called so that your extension can free memory, disconnect from remote hosts, or perform other last minute cleanup.

### Destroying a Resource by Force ###

If calling a resource’s `dtor` function depends on all the variables pointing to it going out of scope, then how do functions like `fclose()` or`mysql_free_result()` manage to perform their job while references to the resource still exist? Before I answer that question, I’d like you to try out the following:

In both calls to `var_dump()`, you can see the numeric value of the resource number, so you know that a reference to your resource still exists; yet the second call to `var_dump()` claims the type is ‘unknown’. This is because the resource lookup table which the Zend Engine keeps in memory, no longer contains the file handle to match that number – so any attempt to perform a`ZEND_FETCH_RESOURCE()` using that number will fail.

`fclose()`, like so many other resource-based functions, accomplishes this by using `zend_list_delete()`. Perhaps obviously, perhaps not, this function deletes an item from a list, specifically a resource list. The simplest use of this would be:

Of course, this function will destroy \*any\* resource type regardless of whether it’s our `person` resource, a file handle, a MySQL connection, or whatever. In order to avoid causing potential trouble for other extensions and making userspace code harder to debug, it is considered good practice to first verify the resource type. This can be done easily by fetching the resource into a dummy variable using `ZEND_FETCH_RESOURCE()`. Go ahead and add that to your function, between the `zend_parse_parameters()` call and`zend_list_delete()`.

### Persistent Resources ###

If you’ve used `mysql_pconnect()`, `popen()` or any of the other persistent resource types, then you’ll know that it’s possible for a resource to stick around, not just after all the variables referencing it have gone out of scope, but even after a request completes and a new one begins. These resources are called persistent resources, because they persist throughout the life of the SAPI unless deliberately destroyed.

The two key differences between standard resources and persistent ones are the placement of the `dtor` function when registering, and the use of`pemalloc()`rather than `emalloc()` for data allocation.

Let’s build a version of our the `person` resource that can remain persistent. Start by adding another `zend_register_resource()` line to `MINIT`. Don’t forget to define the `le_hello_person_persist` variable next to `le_hello_person`:

The basic syntax is the same, but this time you’ve specified the destructor function in the second parameter to `zend_register_resource()` as opposed to the first. All that really distinguishes one of these from the other is when the `dtor` function is actually called. A `dtor` function passed in the first parameter is called with the active request shutdown, while a `dtor` function passed in the second parameter isn’t called until the module is unloaded during final shutdown.

Since you’ve referenced a new resource `dtor` function, you’ll need to define it. Adding this familiar looking method to hello.c somewhere above the `MINIT`function should do the trick:

Now you need a way to instantiate a persistent version of the `person`resource. The established convention is to create a new function with a ‘p’ prefix in the name. Add this function to your extension:

As you can see, this function differs only slightly from `hello_person_new()`. In practice, you’ll typically see these kinds of paired userspace functions implemented as wrapper functions around a common core. Take a look through the source at other paired resource creation functions to see how this kind of duplication is avoided.

Now that your extension is creating both types of resources, it needs to be able to handle both types. Fortunately, `ZEND_FETCH_RESOURCE` has a sister function that is up to the task. Replace your current call to`ZEND_FETCH_RESOURCE` in `hello_person_greet()` with the following:

This will load your `person` variable with appropriate data, regardless of whether or not a persistent resource was passed.

The functions these two `FETCH` macros call will actually allow you to specify any number of resource types, but it’s rare to need more than two. Just in case, here’s the last statement rewritten using the base function:

There are two important things to notice here. Firstly, you can see that the`FETCH_RESOURCE` macros automatically attempt to verify the resource. Expanded out, the `ZEND_VERIFY_RESOURCE` macro in this case simply translates to:

Of course, you don’t always want your extension function to exit just because a resource couldn’t be fetched, so you can use the real`zend_fetch_resource()` function to try to fetch the resource type, but then use your own logic to deal with `NULL` values being returned.

### Finding Existing Persistent Resources ###

A persistent resource is only as good as your ability to reuse it. In order to reuse it, you’ll need somewhere safe to store it. The Zend Engine provides for this through the `EG(persistent_list)` executor global, a`HashTable` containing `list_entry` structures which is normally used internally by the Eengine. Modify `hello_person_pnew()` according to the following:

This version of `hello_person_pnew()` first checks for an existing`php_hello_person` structure in the `EG(persistent_list)` global and, if available, uses that rather than waste time and resources on reallocating it. If it does not exist yet, the function allocates a new structure populated with fresh data and adds that structure to the persistent list instead. Either way, the function leaves you with a new structure registered as a resource within the request.

The persistent list used to store pointers is always local to the current process or thread, so there’s never any concern that two requests might be looking at the same data at the same time. If one process deliberately closes a persistent resource PHP will handle it, removing the reference to that resource from the persistent list so that future invocations don’t try to use the freed data.

### Sanity Check ###

Once again, your extension files as they should be by the end of this tutorial:

### config.m4 ###

### php\_hello.h ###

### hello.c ###

<table style="border:1px solid rgb(230,230,230); outline:0px; font-size:14px; vertical-align:baseline; margin:0px 0px 1.2em; padding:0px; border-collapse:collapse; border-spacing:0px; width:541px; background:transparent"> 
 <tbody style="border:0px; outline:0px; vertical-align:baseline; margin:0px; padding:0px; background:transparent"> 
 <tr style="border:0px; outline:0px; vertical-align:baseline; margin:0px; padding:0px; background:transparent"> 
 <td style="border:1px solid rgb(230,230,230); outline:0px; font-size:14px; vertical-align:baseline; margin:0px; padding:6px 0px 3px 10px; background:transparent"> <code style="border:0px; outline:0px; vertical-align:baseline; margin:0px; padding:0px; background:transparent"> #ifdef HAVE_CONFIG_H #include "config.h" #endif</code> #include "php.h" #include "php_ini.h" #include "php_hello.h" int le_hello_person; int le_hello_person_persist; ZEND_DECLARE_MODULE_GLOBALS(hello) static function_entry hello_functions[] = { &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_world, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_long, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_double, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_bool, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_null, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_greetme, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_add, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_dump, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_array, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_array_strings, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_array_walk, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_array_value, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_get_global_var, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_set_local_var, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_person_new, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_person_pnew, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_person_greet, NULL) &nbsp;&nbsp;&nbsp;&nbsp;PHP_FE(hello_person_delete, NULL) &nbsp;&nbsp;&nbsp;&nbsp;{NULL, NULL, NULL} }; zend_module_entry hello_module_entry = { #if ZEND_MODULE_API_NO &gt;= 20010901 &nbsp;&nbsp;&nbsp;&nbsp;STANDARD_MODULE_HEADER, #endif &nbsp;&nbsp;&nbsp;&nbsp;PHP_HELLO_WORLD_EXTNAME, &nbsp;&nbsp;&nbsp;&nbsp;hello_functions, &nbsp;&nbsp;&nbsp;&nbsp;PHP_MINIT(hello), &nbsp;&nbsp;&nbsp;&nbsp;PHP_MSHUTDOWN(hello), &nbsp;&nbsp;&nbsp;&nbsp;PHP_RINIT(hello), &nbsp;&nbsp;&nbsp;&nbsp;NULL, &nbsp;&nbsp;&nbsp;&nbsp;NULL, #if ZEND_MODULE_API_NO &gt;= 20010901 &nbsp;&nbsp;&nbsp;&nbsp;PHP_HELLO_WORLD_VERSION, #endif &nbsp;&nbsp;&nbsp;&nbsp;STANDARD_MODULE_PROPERTIES }; #ifdef COMPILE_DL_HELLO &nbsp;&nbsp;&nbsp;&nbsp;ZEND_GET_MODULE(hello) #endif PHP_INI_BEGIN() &nbsp;&nbsp;&nbsp;&nbsp;PHP_INI_ENTRY("hello.greeting", "Hello World", PHP_INI_ALL, NULL) &nbsp;&nbsp;&nbsp;&nbsp;STD_PHP_INI_ENTRY("hello.direction", "1", PHP_INI_ALL, OnUpdateBool, direction, zend_hello_globals, hello_globals) PHP_INI_END() static void php_hello_init_globals(zend_hello_globals *hello_globals) { &nbsp;&nbsp;&nbsp;&nbsp;hello_globals-&gt;direction = 1; } PHP_RINIT_FUNCTION(hello) { &nbsp;&nbsp;&nbsp;&nbsp;HELLO_G(counter) = 0; &nbsp;&nbsp;&nbsp;&nbsp;return SUCCESS; } static void php_hello_person_persist_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC) { &nbsp;&nbsp;&nbsp;&nbsp;php_hello_person *person = (php_hello_person*)rsrc-&gt;ptr; &nbsp;&nbsp;&nbsp;&nbsp;if (person) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if (person-&gt;name) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;pefree(person-&gt;name, 1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;pefree(person, 1); &nbsp;&nbsp;&nbsp; } } static void php_hello_person_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC) { &nbsp;&nbsp;&nbsp;&nbsp;php_hello_person *person = (php_hello_person*)rsrc-&gt;ptr; &nbsp;&nbsp;&nbsp;&nbsp;if (person) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if (person-&gt;name) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;efree(person-&gt;name); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;efree(person); &nbsp;&nbsp;&nbsp; } } PHP_MINIT_FUNCTION(hello) { &nbsp;&nbsp;&nbsp;&nbsp;le_hello_person = zend_register_list_destructors_ex(php_hello_person_dtor, NULL, PHP_HELLO_PERSON_RES_NAME, module_number); &nbsp;&nbsp;&nbsp;&nbsp;le_hello_person_persist = zend_register_list_destructors_ex (NULL, php_hello_person_persist_dtor, PHP_HELLO_PERSON_RES_NAME, module_number); &nbsp;&nbsp;&nbsp;&nbsp;ZEND_INIT_MODULE_GLOBALS(hello, php_hello_init_globals, NULL); &nbsp;&nbsp;&nbsp;&nbsp;REGISTER_INI_ENTRIES(); &nbsp;&nbsp;&nbsp;&nbsp;return SUCCESS; } PHP_MSHUTDOWN_FUNCTION(hello) { &nbsp;&nbsp;&nbsp;&nbsp;UNREGISTER_INI_ENTRIES(); &nbsp;&nbsp;&nbsp;&nbsp;return SUCCESS; } PHP_FUNCTION(hello_world) { &nbsp;&nbsp;&nbsp;&nbsp;RETURN_STRING("Hello World", 1); } PHP_FUNCTION(hello_long) { &nbsp;&nbsp;&nbsp;&nbsp;if (HELLO_G(direction)) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;HELLO_G(counter)++; &nbsp;&nbsp;&nbsp; } else { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;HELLO_G(counter)--; &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;RETURN_LONG(HELLO_G(counter)); } PHP_FUNCTION(hello_double) { &nbsp;&nbsp;&nbsp;&nbsp;RETURN_DOUBLE(3.1415926535); } PHP_FUNCTION(hello_bool) { &nbsp;&nbsp;&nbsp;&nbsp;RETURN_BOOL(1); } PHP_FUNCTION(hello_null) { &nbsp;&nbsp;&nbsp;&nbsp;RETURN_NULL(); } PHP_FUNCTION(hello_greetme) { &nbsp;&nbsp;&nbsp;&nbsp;zval *zname; &nbsp;&nbsp;&nbsp;&nbsp;if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z", &amp;zname) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_NULL(); &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;convert_to_string(zname); &nbsp;&nbsp;&nbsp;&nbsp;php_printf("Hello "); &nbsp;&nbsp;&nbsp;&nbsp;PHPWRITE(Z_STRVAL_P(zname), Z_STRLEN_P(zname)); &nbsp;&nbsp;&nbsp;&nbsp;php_printf(" "); &nbsp;&nbsp;&nbsp;&nbsp;RETURN_TRUE; } PHP_FUNCTION(hello_add) { &nbsp;&nbsp;&nbsp;&nbsp;long a; &nbsp;&nbsp;&nbsp;&nbsp;double b; &nbsp;&nbsp;&nbsp;&nbsp;zend_bool return_long = 0; &nbsp;&nbsp;&nbsp;&nbsp;if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ld|b", &amp;a, &amp;b, &amp;return_long) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_NULL(); &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;if (return_long) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_LONG(a + b); &nbsp;&nbsp;&nbsp; } else { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_DOUBLE(a + b); &nbsp;&nbsp;&nbsp; } } PHP_FUNCTION(hello_dump) { &nbsp;&nbsp;&nbsp;&nbsp;zval *uservar; &nbsp;&nbsp;&nbsp;&nbsp;if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z", &amp;uservar) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;RETURN_NULL(); &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;switch (Z_TYPE_P(uservar)) { &nbsp;&nbsp;&nbsp;&nbsp;case IS_NULL: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_printf("NULL "); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;break; &nbsp;&nbsp;&nbsp;&nbsp;case IS_BOOL: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_printf("Boolean: %s ", Z_LVAL_P(uservar) ? "TRUE" : "FALSE"); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;break; &nbsp;&nbsp;&nbsp;&nbsp;case IS_LONG: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_printf("Long: %ld ", Z_LVAL_P(uservar)); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;break; &nbsp;&nbsp;&nbsp;&nbsp;case IS_DOUBLE: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_printf("Double: %f ", Z_DVAL_P(uservar)); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;break; &nbsp;&nbsp;&nbsp;&nbsp;case IS_STRING: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_printf("String: "); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;PHPWRITE(Z_STRVAL_P(uservar), Z_STRLEN_P(uservar)); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_printf(" "); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;break; &nbsp;&nbsp;&nbsp;&nbsp;case IS_RESOURCE: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_printf("Resource "); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;break; &nbsp;&nbsp;&nbsp;&nbsp;case IS_ARRAY: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_printf("Array "); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;break; &nbsp;&nbsp;&nbsp;&nbsp;case IS_OBJECT: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_printf("Object "); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;break; &nbsp;&nbsp;&nbsp;&nbsp;default: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_printf("Unknown "); &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;RETURN_TRUE; } PHP_FUNCTION(hello_array) { &nbsp;&nbsp;&nbsp;&nbsp;char *mystr; &nbsp;&nbsp;&nbsp;&nbsp;zval *mysubarray; &nbsp;&nbsp;&nbsp;&nbsp;array_init(return_value); &nbsp;&nbsp;&nbsp;&nbsp;add_index_long(return_value, 42, 123); &nbsp;&nbsp;&nbsp;&nbsp;add_next_index_string(return_value, "I should now be found at index 43", 1); &nbsp;&nbsp;&nbsp;&nbsp;add_next_index_stringl(return_value, "I'm at 44!", 10, 1); &nbsp;&nbsp;&nbsp;&nbsp;mystr = estrdup("Forty Five"); &nbsp;&nbsp;&nbsp;&nbsp;add_next_index_string(return_value, mystr, 0); &nbsp;&nbsp;&nbsp;&nbsp;add_assoc_double(return_value, "pi", 3.1415926535); &nbsp;&nbsp;&nbsp;&nbsp;ALLOC_INIT_ZVAL(mysubarray); &nbsp;&nbsp;&nbsp;&nbsp;array_init(mysubarray); &nbsp;&nbsp;&nbsp;&nbsp;add_next_index_string(mysubarray, "hello", 1); &nbsp;&nbsp;&nbsp;&nbsp;php_printf("mysubarray-&gt;refcount = %d ", mysubarray-&gt;refcount); &nbsp;&nbsp;&nbsp;&nbsp;mysubarray-&gt;refcount = 2; &nbsp;&nbsp;&nbsp;&nbsp;php_printf("mysubarray-&gt;refcount = %d ", mysubarray-&gt;refcount); &nbsp;&nbsp;&nbsp;&nbsp;add_assoc_zval(return_value, "subarray", mysubarray); &nbsp;&nbsp;&nbsp;&nbsp;php_printf("mysubarray-&gt;refcount = %d ", mysubarray-&gt;refcount); } PHP_FUNCTION(hello_array_strings) { &nbsp;&nbsp;&nbsp;&nbsp;zval *arr, **data; &nbsp;&nbsp;&nbsp;&nbsp;HashTable *arr_hash; &nbsp;&nbsp;&nbsp;&nbsp;HashPosition pointer; &nbsp;&nbsp;&nbsp;&nbsp;int array_count; &nbsp;&nbsp;&nbsp;&nbsp;if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &amp;arr) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_NULL(); &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;arr_hash = Z_ARRVAL_P(arr); &nbsp;&nbsp;&nbsp;&nbsp;array_count = zend_hash_num_elements(arr_hash); &nbsp;&nbsp;&nbsp;&nbsp;php_printf("The array passed contains %d elements ", array_count); &nbsp;&nbsp;&nbsp;&nbsp;for(zend_hash_internal_pointer_reset_ex(arr_hash, &amp;pointer); zend_hash_get_current_data_ex(arr_hash, (void**) &amp;data, &amp;pointer) == SUCCESS; zend_hash_move_forward_ex(arr_hash, &amp;pointer)) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;zval temp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;char *key; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;int key_len; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;long index; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if (zend_hash_get_current_key_ex(arr_hash, &amp;key, &amp;key_len, &amp;index, 0, &amp;pointer) == HASH_KEY_IS_STRING) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;PHPWRITE(key, key_len); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; } else { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_printf("%ld", index); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_printf(" =&gt; "); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;temp = **data; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;zval_copy_ctor(&amp;temp); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;convert_to_string(&amp;temp); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;PHPWRITE(Z_STRVAL(temp), Z_STRLEN(temp)); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_printf(" "); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;zval_dtor(&amp;temp); &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;RETURN_TRUE; } static int php_hello_array_walk(zval **element TSRMLS_DC) { &nbsp;&nbsp;&nbsp;&nbsp;zval temp; &nbsp;&nbsp;&nbsp;&nbsp;temp = **element; &nbsp;&nbsp;&nbsp;&nbsp;zval_copy_ctor(&amp;temp); &nbsp;&nbsp;&nbsp;&nbsp;convert_to_string(&amp;temp); &nbsp;&nbsp;&nbsp;&nbsp;PHPWRITE(Z_STRVAL(temp), Z_STRLEN(temp)); &nbsp;&nbsp;&nbsp;&nbsp;php_printf(" "); &nbsp;&nbsp;&nbsp;&nbsp;zval_dtor(&amp;temp); &nbsp;&nbsp;&nbsp;&nbsp;return ZEND_HASH_APPLY_KEEP; } static int php_hello_array_walk_arg(zval **element, char *greeting TSRMLS_DC) { &nbsp;&nbsp;&nbsp;&nbsp;php_printf("%s", greeting); &nbsp;&nbsp;&nbsp;&nbsp;php_hello_array_walk(element TSRMLS_CC); &nbsp;&nbsp;&nbsp;&nbsp;return ZEND_HASH_APPLY_KEEP; } static int php_hello_array_walk_args(zval **element, int num_args, va_list args, zend_hash_key *hash_key) { &nbsp;&nbsp;&nbsp;&nbsp;char *prefix = va_arg(args, char*); &nbsp;&nbsp;&nbsp;&nbsp;char *suffix = va_arg(args, char*); &nbsp;&nbsp;&nbsp;&nbsp;TSRMLS_FETCH(); &nbsp;&nbsp;&nbsp;&nbsp;php_printf("%s", prefix); &nbsp;&nbsp;&nbsp;&nbsp;php_hello_array_walk(element TSRMLS_CC); &nbsp;&nbsp;&nbsp;&nbsp;php_printf("%s ", suffix); &nbsp;&nbsp;&nbsp;&nbsp;return ZEND_HASH_APPLY_KEEP; } PHP_FUNCTION(hello_array_walk) { &nbsp;&nbsp;&nbsp;&nbsp;zval *zarray; &nbsp;&nbsp;&nbsp;&nbsp;int print_newline = 1; &nbsp;&nbsp;&nbsp;&nbsp;if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &amp;zarray) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_NULL(); &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;zend_hash_apply(Z_ARRVAL_P(zarray), (apply_func_t)php_hello_array_walk TSRMLS_CC); &nbsp;&nbsp;&nbsp;&nbsp;zend_hash_internal_pointer_reset(Z_ARRVAL_P(zarray)); &nbsp;&nbsp;&nbsp;&nbsp;zend_hash_apply_with_argument(Z_ARRVAL_P(zarray), (apply_func_arg_t)php_hello_array_walk_arg, "Hello " TSRMLS_CC); &nbsp;&nbsp;&nbsp;&nbsp;zend_hash_apply_with_arguments(Z_ARRVAL_P(zarray), (apply_func_args_t)php_hello_array_walk_args, 2, "Hello ", "Welcome to my extension!"); &nbsp;&nbsp;&nbsp;&nbsp;RETURN_TRUE; } PHP_FUNCTION(hello_array_value) { &nbsp;&nbsp;&nbsp;&nbsp;zval *zarray, *zoffset, **zvalue; &nbsp;&nbsp;&nbsp;&nbsp;long index = 0; &nbsp;&nbsp;&nbsp;&nbsp;char *key = NULL; &nbsp;&nbsp;&nbsp;&nbsp;int key_len = 0; &nbsp;&nbsp;&nbsp;&nbsp;if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "az", &amp;zarray, &amp;zoffset) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_NULL(); &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;switch (Z_TYPE_P(zoffset)) { &nbsp;&nbsp;&nbsp;&nbsp;case IS_NULL: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;index = 0; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;break; &nbsp;&nbsp;&nbsp;&nbsp;case IS_DOUBLE: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;index = (long)Z_DVAL_P(zoffset); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;break; &nbsp;&nbsp;&nbsp;&nbsp;case IS_BOOL: &nbsp;&nbsp;&nbsp;&nbsp;case IS_LONG: &nbsp;&nbsp;&nbsp;&nbsp;case IS_RESOURCE: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;index = Z_LVAL_P(zoffset); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;break; &nbsp;&nbsp;&nbsp;&nbsp;case IS_STRING: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;key = Z_STRVAL_P(zoffset); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;key_len = Z_STRLEN_P(zoffset); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;break; &nbsp;&nbsp;&nbsp;&nbsp;case IS_ARRAY: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;key = "Array"; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;key_len = sizeof("Array") - 1; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;break; &nbsp;&nbsp;&nbsp;&nbsp;case IS_OBJECT: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;key = "Object"; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;key_len = sizeof("Object") - 1; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;break; &nbsp;&nbsp;&nbsp;&nbsp;default: &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;key = "Unknown"; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;key_len = sizeof("Unknown") - 1; &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;if (key &amp;&amp; zend_hash_find(Z_ARRVAL_P(zarray), key, key_len + 1, (void**)&amp;zvalue) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_error_docref(NULL TSRMLS_CC, E_NOTICE, "Undefined index: %s", key); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_NULL(); &nbsp;&nbsp;&nbsp; } else if (!key &amp;&amp; zend_hash_index_find(Z_ARRVAL_P(zarray), index, (void**)&amp;zvalue) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_error_docref(NULL TSRMLS_CC, E_NOTICE, "Undefined index: %ld", index); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_NULL(); &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;*return_value = **zvalue; &nbsp;&nbsp;&nbsp;&nbsp;zval_copy_ctor(return_value); } PHP_FUNCTION(hello_get_global_var) { &nbsp;&nbsp;&nbsp;&nbsp;char *varname; &nbsp;&nbsp;&nbsp;&nbsp;int varname_len; &nbsp;&nbsp;&nbsp;&nbsp;zval **varvalue; &nbsp;&nbsp;&nbsp;&nbsp;if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &amp;varname, &amp;varname_len) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_NULL(); &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;if (zend_hash_find(&amp;EG(symbol_table), varname, varname_len + 1, (void**)&amp;varvalue) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_error_docref(NULL TSRMLS_CC, E_NOTICE, "Undefined variable: %s", varname); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_NULL(); &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;*return_value = **varvalue; &nbsp;&nbsp;&nbsp;&nbsp;zval_copy_ctor(return_value); } PHP_FUNCTION(hello_set_local_var) { &nbsp;&nbsp;&nbsp;&nbsp;zval *newvar; &nbsp;&nbsp;&nbsp;&nbsp;char *varname; &nbsp;&nbsp;&nbsp;&nbsp;int varname_len; &nbsp;&nbsp;&nbsp;&nbsp;zval *value; &nbsp;&nbsp;&nbsp;&nbsp;if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "sz", &amp;varname, &amp;varname_len, &amp;value) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_NULL(); &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;ALLOC_INIT_ZVAL(newvar); &nbsp;&nbsp;&nbsp;&nbsp;*newvar = *value; &nbsp;&nbsp;&nbsp;&nbsp;zval_copy_ctor(newvar); &nbsp;&nbsp;&nbsp;&nbsp;zend_hash_add(EG(active_symbol_table), varname, varname_len + 1, &amp;newvar, sizeof(zval*), NULL); &nbsp;&nbsp;&nbsp;&nbsp;RETURN_TRUE; } PHP_FUNCTION(hello_person_new) { &nbsp;&nbsp;&nbsp;&nbsp;php_hello_person *person; &nbsp;&nbsp;&nbsp;&nbsp;char *name; &nbsp;&nbsp;&nbsp;&nbsp;int name_len; &nbsp;&nbsp;&nbsp;&nbsp;long age; &nbsp;&nbsp;&nbsp;&nbsp;if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "sl", &amp;name, &amp;name_len, &amp;age) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_FALSE; &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;if (name_len &lt; 1) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_error_docref(NULL TSRMLS_CC, E_WARNING, "No name given, person resource not created."); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_FALSE; &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;if (age &lt; 0 || age &gt; 255) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_error_docref(NULL TSRMLS_CC, E_WARNING, "Nonsense age (%d) given, person resource not created.", age); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_FALSE; &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;person = emalloc(sizeof(php_hello_person)); &nbsp;&nbsp;&nbsp;&nbsp;person-&gt;name = estrndup(name, name_len); &nbsp;&nbsp;&nbsp;&nbsp;person-&gt;name_len = name_len; &nbsp;&nbsp;&nbsp;&nbsp;person-&gt;age = age; &nbsp;&nbsp;&nbsp;&nbsp;ZEND_REGISTER_RESOURCE(return_value, person, le_hello_person); } PHP_FUNCTION(hello_person_pnew) { &nbsp;&nbsp;&nbsp;&nbsp;php_hello_person *person; &nbsp;&nbsp;&nbsp;&nbsp;char *name, *key; &nbsp;&nbsp;&nbsp;&nbsp;int name_len, key_len; &nbsp;&nbsp;&nbsp;&nbsp;long age; &nbsp;&nbsp;&nbsp;&nbsp;list_entry *le, new_le; &nbsp;&nbsp;&nbsp;&nbsp;if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "sl", &amp;name, &amp;name_len, &amp;age) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_FALSE; &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;if (name_len &lt; 1) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_error_docref(NULL TSRMLS_CC, E_WARNING, "No name given, person resource not created."); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_FALSE; &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;if (age &lt; 0 || age &gt; 255) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;php_error_docref(NULL TSRMLS_CC, E_WARNING, "Nonsense age (%d) given, person resource not created.", age); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_FALSE; &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;/* Look for an established resource */ &nbsp;&nbsp;&nbsp;&nbsp;key_len = spprintf(&amp;key, 0, "hello_person_%s_%d ", name, age); &nbsp;&nbsp;&nbsp;&nbsp;if (zend_hash_find(&amp;EG(persistent_list), key, key_len + 1, &amp;le) == SUCCESS) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;/* An entry for this person already exists */ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;ZEND_REGISTER_RESOURCE(return_value, le-&gt;ptr, le_hello_person_persist); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;efree(key); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;return; &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;/* New person, allocate a structure */ &nbsp;&nbsp;&nbsp;&nbsp;person = pemalloc(sizeof(php_hello_person), 1); &nbsp;&nbsp;&nbsp;&nbsp;person-&gt;name = pemalloc(name_len + 1, 1); &nbsp;&nbsp;&nbsp;&nbsp;memcpy(person-&gt;name, name, name_len + 1); &nbsp;&nbsp;&nbsp;&nbsp;person-&gt;name_len = name_len; &nbsp;&nbsp;&nbsp;&nbsp;person-&gt;age = age; &nbsp;&nbsp;&nbsp;&nbsp;ZEND_REGISTER_RESOURCE(return_value, person, le_hello_person_persist); &nbsp;&nbsp;&nbsp;&nbsp;/* Store a reference in the persistence list */ &nbsp;&nbsp;&nbsp;&nbsp;new_le.ptr = person; &nbsp;&nbsp;&nbsp;&nbsp;new_le.type = le_hello_person_persist; &nbsp;&nbsp;&nbsp;&nbsp;zend_hash_add(&amp;EG(persistent_list), key, key_len + 1, &amp;new_le, sizeof(list_entry), NULL); &nbsp;&nbsp;&nbsp;&nbsp;efree(key); } PHP_FUNCTION(hello_person_greet) { &nbsp;&nbsp;&nbsp;&nbsp;php_hello_person *person; &nbsp;&nbsp;&nbsp;&nbsp;zval *zperson; &nbsp;&nbsp;&nbsp;&nbsp;if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &amp;zperson) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_FALSE; &nbsp;&nbsp;&nbsp; } &nbsp;&nbsp;&nbsp;&nbsp;ZEND_FETCH_RESOURCE2(person, php_hello_person*, &amp;zperson, -1, PHP_HELLO_PERSON_RES_NAME, le_hello_person, le_hello_person_persist); &nbsp;&nbsp;&nbsp;&nbsp;php_printf("Hello "); &nbsp;&nbsp;&nbsp;&nbsp;PHPWRITE(person-&gt;name, person-&gt;name_len); &nbsp;&nbsp;&nbsp;&nbsp;php_printf("! According to my records, you are %d years old. ", person-&gt;age); &nbsp;&nbsp;&nbsp;&nbsp;RETURN_TRUE; } PHP_FUNCTION(hello_person_delete) { &nbsp;&nbsp;&nbsp;&nbsp;zval *zperson; &nbsp;&nbsp;&nbsp;&nbsp;if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &amp;zperson) == FAILURE) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;RETURN_FALSE; &nbsp;&nbsp;&nbsp; } <code style="border:0px; outline:0px; vertical-align:baseline; margin:0px; padding:0px; background:transparent">&nbsp;&nbsp;&nbsp;&nbsp;zend_list_delete(Z_LVAL_P(zperson)); &nbsp;&nbsp;&nbsp;&nbsp;RETURN_TRUE; } </code> </td> 
 </tr> 
 </tbody> 
</table>

### Summary ###

In this tutorial, Part Three of the Extension Writing series, you learned the few simple steps necessary to attach arbitrary, sometimes opaque data to PHP userspace variables. In later steps, you’ll combine these techniques with linking against third party libraries to create the kind of glue extensions you see so frequently with PHP.

In Part Four, we’ll take a look into Objects – from the simple arrays-with-functions available in PHP 4, to the more complex overloaded OOP structures available in PHP 5.

[Introduction]: http://devzone.zend.com/446/extension-writing-part-iii-resources/#Heading1
[Resources]: http://devzone.zend.com/446/extension-writing-part-iii-resources/#Heading2
[Initializing Resources]: http://devzone.zend.com/446/extension-writing-part-iii-resources/#Heading3
[Accepting Resources as Function Parameters]: http://devzone.zend.com/446/extension-writing-part-iii-resources/#Heading4
[Destroying Resources]: http://devzone.zend.com/446/extension-writing-part-iii-resources/#Heading5
[Destroying a Resource by Force]: http://devzone.zend.com/446/extension-writing-part-iii-resources/#Heading6
[Persistent Resources]: http://devzone.zend.com/446/extension-writing-part-iii-resources/#Heading7
[Finding Existing Persistent Resources]: http://devzone.zend.com/446/extension-writing-part-iii-resources/#Heading8
[Sanity Check]: http://devzone.zend.com/446/extension-writing-part-iii-resources/#Heading9
[Summary]: http://devzone.zend.com/446/extension-writing-part-iii-resources/#Heading10