diff options
author | Jeroen van Wolffelaar <jeroen@php.net> | 2001-09-25 22:49:04 +0000 |
---|---|---|
committer | Jeroen van Wolffelaar <jeroen@php.net> | 2001-09-25 22:49:04 +0000 |
commit | 6cfba2a3ea0c59f63b8c225b2a0ff85194f432f5 (patch) | |
tree | b2660d658d42d90c170552b76c11815afd03aed3 /ext/hyperwave/hw.c | |
parent | 0ddd124d1d58f5f1094c8287e0f3905e6ab45d40 (diff) | |
download | php-git-6cfba2a3ea0c59f63b8c225b2a0ff85194f432f5.tar.gz |
2nd phase in back-substitution those macro's
I've got pretty much everything now...
Diffstat (limited to 'ext/hyperwave/hw.c')
-rw-r--r-- | ext/hyperwave/hw.c | 340 |
1 files changed, 170 insertions, 170 deletions
diff --git a/ext/hyperwave/hw.c b/ext/hyperwave/hw.c index ed1ebd1103..f9a3e94de5 100644 --- a/ext/hyperwave/hw.c +++ b/ext/hyperwave/hw.c @@ -725,20 +725,20 @@ static void php_hw_do_connect(INTERNAL_FUNCTION_PARAMETERS, int persistent) /* Host: */ convert_to_string_ex(argv[0]); - host = (char *) estrndup((*argv[0])->value.str.val, (*argv[0])->value.str.len); + host = (char *) estrndup(Z_STRVAL_PP(argv[0]), Z_STRLEN_PP(argv[0])); /* Port: */ convert_to_long_ex(argv[1]); - port = (*argv[1])->value.lval; + port = Z_LVAL_PP(argv[1]); /* Username and Password */ if(argc > 2) { /* Username */ convert_to_string_ex(argv[2]); - username = (char *) estrndup((*argv[2])->value.str.val, (*argv[2])->value.str.len); + username = (char *) estrndup(Z_STRVAL_PP(argv[2]), Z_STRLEN_PP(argv[2])); /* Password */ convert_to_string_ex(argv[3]); - password = (char *) estrndup((*argv[3])->value.str.val, (*argv[3])->value.str.len); + password = (char *) estrndup(Z_STRVAL_PP(argv[3]), Z_STRLEN_PP(argv[3])); } /* Create identifier string for connection */ @@ -981,7 +981,7 @@ PHP_FUNCTION(hw_close) WRONG_PARAM_COUNT; } convert_to_long_ex(arg1); - id=(*arg1)->value.lval; + id=Z_LVAL_PP(arg1); ptr = zend_list_find(id, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -1005,7 +1005,7 @@ PHP_FUNCTION(hw_info) WRONG_PARAM_COUNT; } convert_to_long_ex(arg1); - id=(*arg1)->value.lval; + id=Z_LVAL_PP(arg1); ptr = zend_list_find(id, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -1037,7 +1037,7 @@ PHP_FUNCTION(hw_error) WRONG_PARAM_COUNT; } convert_to_long_ex(arg1); - id=(*arg1)->value.lval; + id=Z_LVAL_PP(arg1); ptr = zend_list_find(id, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -1060,7 +1060,7 @@ PHP_FUNCTION(hw_errormsg) WRONG_PARAM_COUNT; } convert_to_long_ex(arg1); - id=(*arg1)->value.lval; + id=Z_LVAL_PP(arg1); ptr = zend_list_find(id, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -1351,7 +1351,7 @@ char *php_hw_command(INTERNAL_FUNCTION_PARAMETERS, int comm) { return NULL; } convert_to_long_ex(arg1); - link=(*arg1)->value.lval; + link=Z_LVAL_PP(arg1); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); @@ -1516,9 +1516,9 @@ PHP_FUNCTION(hw_dummy) convert_to_long_ex(arg1); convert_to_long_ex(arg2); convert_to_long_ex(arg3); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; - msgid=(*arg3)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); + msgid=Z_LVAL_PP(arg3); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -1555,7 +1555,7 @@ PHP_FUNCTION(hw_getobject) WRONG_PARAM_COUNT; convert_to_long_ex(argv[0]); - if((*argv[1])->type == IS_ARRAY) { + if(Z_TYPE_PP(argv[1]) == IS_ARRAY) { multi = 1; convert_to_array_ex(argv[1]); } else { @@ -1565,11 +1565,11 @@ PHP_FUNCTION(hw_getobject) if(argc == 3) { convert_to_string_ex(argv[2]); - query = (*argv[2])->value.str.val; + query = Z_STRVAL_PP(argv[2]); } else query = NULL; - link=(*argv[0])->value.lval; + link=Z_LVAL_PP(argv[0]); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); @@ -1583,7 +1583,7 @@ PHP_FUNCTION(hw_getobject) HashTable *lht; zval **keydata; - lht = (*argv[1])->value.ht; + lht = Z_ARRVAL_PP(argv[1]); if(0 == (count = zend_hash_num_elements(lht))) { RETURN_FALSE; } @@ -1619,7 +1619,7 @@ PHP_FUNCTION(hw_getobject) } else { char *object = NULL; - id=(*argv[1])->value.lval; + id=Z_LVAL_PP(argv[1]); if (0 != (ptr->lasterror = send_getobject(ptr->socket, id, &object))) RETURN_FALSE; @@ -1643,9 +1643,9 @@ PHP_FUNCTION(hw_insertobject) convert_to_long(arg1); convert_to_string(arg2); convert_to_string(arg3); - link=arg1->value.lval; - objrec=arg2->value.str.val; - parms=arg3->value.str.val; + link=Z_LVAL_P(arg1); + objrec=Z_STRVAL_P(arg2); + parms=Z_STRVAL_P(arg3); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); @@ -1676,8 +1676,8 @@ PHP_FUNCTION(hw_getandlock) } convert_to_long(arg1); convert_to_long(arg2); - link=arg1->value.lval; - id=arg2->value.lval; + link=Z_LVAL_P(arg1); + id=Z_LVAL_P(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -1708,8 +1708,8 @@ PHP_FUNCTION(hw_unlock) } convert_to_long(arg1); convert_to_long(arg2); - link=arg1->value.lval; - id=arg2->value.lval; + link=Z_LVAL_P(arg1); + id=Z_LVAL_P(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -1737,8 +1737,8 @@ PHP_FUNCTION(hw_deleteobject) } convert_to_long(arg1); convert_to_long(arg2); - link=arg1->value.lval; - id=arg2->value.lval; + link=Z_LVAL_P(arg1); + id=Z_LVAL_P(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -1769,9 +1769,9 @@ PHP_FUNCTION(hw_changeobject) convert_to_long(arg1); /* Connection */ convert_to_long(arg2); /* object ID */ convert_to_array(arg3); /* Array with new attributes */ - link=arg1->value.lval; - id=arg2->value.lval; - newobjarr=arg3->value.ht; + link=Z_LVAL_P(arg1); + id=Z_LVAL_P(arg2); + newobjarr=Z_ARRVAL_P(arg3); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -1868,13 +1868,13 @@ PHP_FUNCTION(hw_modifyobject) convert_to_array_ex(argv[3]); /* Array with attributes to add */ if(argc == 5) { convert_to_long_ex(argv[4]); - mode = (*argv[4])->value.lval; + mode = Z_LVAL_PP(argv[4]); } else mode = 0; - link=(*argv[0])->value.lval; - id=(*argv[1])->value.lval; - remobjarr=(*argv[2])->value.ht; - addobjarr=(*argv[3])->value.ht; + link=Z_LVAL_PP(argv[0]); + id=Z_LVAL_PP(argv[1]); + remobjarr=Z_ARRVAL_PP(argv[2]); + addobjarr=Z_ARRVAL_PP(argv[3]); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -2093,16 +2093,16 @@ void php_hw_mvcp(INTERNAL_FUNCTION_PARAMETERS, int mvcp) { convert_to_long(arg1); convert_to_array(arg2); convert_to_long(arg3); - link=arg1->value.lval; - src_arr=arg2->value.ht; + link=Z_LVAL_P(arg1); + src_arr=Z_ARRVAL_P(arg2); switch(mvcp) { case MOVE: /* Move also has fromID, which is arg3 --> arg4 becomes destID */ convert_to_long(arg4); - from=arg3->value.lval; - dest=arg4->value.lval; + from=Z_LVAL_P(arg3); + dest=Z_LVAL_P(arg4); break; case COPY: /* No fromID for Copy needed --> arg3 is destID */ - dest=arg3->value.lval; + dest=Z_LVAL_P(arg3); from = 0; break; } @@ -2204,20 +2204,20 @@ PHP_FUNCTION(hw_gettext) mode = 0; urlprefix = NULL; if(argc == 3) { - switch(argv[2]->type) { + switch(Z_TYPE_P(argv[2])) { case IS_LONG: convert_to_long(argv[2]); - rootid = argv[2]->value.lval; + rootid = Z_LVAL_P(argv[2]); mode = 1; break; case IS_STRING: convert_to_string(argv[2]); - urlprefix = argv[2]->value.str.val; + urlprefix = Z_STRVAL_P(argv[2]); break; } } - link=argv[0]->value.lval; - id=argv[1]->value.lval; + link=Z_LVAL_P(argv[0]); + id=Z_LVAL_P(argv[1]); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -2258,7 +2258,7 @@ PHP_FUNCTION(hw_edittext) } convert_to_long(arg1); convert_to_long(arg2); - link=arg1->value.lval; + link=Z_LVAL_P(arg1); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { @@ -2266,7 +2266,7 @@ PHP_FUNCTION(hw_edittext) RETURN_FALSE; } - doc=arg2->value.lval; + doc=Z_LVAL_P(arg2); docptr = zend_list_find(doc, &type); if(!docptr || (type!=le_document)) { @@ -2301,8 +2301,8 @@ PHP_FUNCTION(hw_getcgi) } convert_to_long(arg1); convert_to_long(arg2); - link=arg1->value.lval; - id=arg2->value.lval; + link=Z_LVAL_P(arg1); + id=Z_LVAL_P(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -2363,8 +2363,8 @@ PHP_FUNCTION(hw_getremote) } convert_to_long(arg1); convert_to_long(arg2); - link=arg1->value.lval; - id=arg2->value.lval; + link=Z_LVAL_P(arg1); + id=Z_LVAL_P(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -2404,8 +2404,8 @@ PHP_FUNCTION(hw_getremotechildren) } convert_to_long(arg1); convert_to_string(arg2); - link=arg1->value.lval; - objrec=arg2->value.str.val; + link=Z_LVAL_P(arg1); + objrec=Z_STRVAL_P(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); @@ -2508,8 +2508,8 @@ PHP_FUNCTION(hw_setlinkroot) } convert_to_long(arg1); convert_to_long(arg2); - link = arg1->value.lval; - rootid = arg2->value.lval; + link = Z_LVAL_P(arg1); + rootid = Z_LVAL_P(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); @@ -2554,8 +2554,8 @@ PHP_FUNCTION(hw_pipedocument) convert_to_long(arg1); convert_to_long(arg2); - link=arg1->value.lval; - id=arg2->value.lval; + link=Z_LVAL_P(arg1); + id=Z_LVAL_P(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); @@ -2565,7 +2565,7 @@ PHP_FUNCTION(hw_pipedocument) /* check for the array with urlprefixes */ if(argc == 3) { convert_to_array(arg3); - prefixarray =arg3->value.ht; + prefixarray =Z_ARRVAL_P(arg3); if((prefixarray == NULL) || (zend_hash_num_elements(prefixarray) != 5)) { php_error(E_WARNING, "You must provide 5 urlprefixes (you have provided %d)", zend_hash_num_elements(prefixarray)); RETURN_FALSE; @@ -2663,12 +2663,12 @@ PHP_FUNCTION(hw_oldpipedocument) convert_to_long(argv[1]); /* if(argc == 3) { convert_to_long(argv[2]); - rootid = argv[2]->value.lval; + rootid = Z_LVAL_P(argv[2]); if(rootid != 0) mode = 1; } -*/ link=argv[0]->value.lval; - id=argv[1]->value.lval; +*/ link=Z_LVAL_P(argv[0]); + id=Z_LVAL_P(argv[1]); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); @@ -2728,8 +2728,8 @@ PHP_FUNCTION(hw_pipecgi) } convert_to_long(arg1); convert_to_long(arg2); - link=arg1->value.lval; - id=arg2->value.lval; + link=Z_LVAL_P(arg1); + id=Z_LVAL_P(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -2794,15 +2794,15 @@ PHP_FUNCTION(hw_insertdocument) convert_to_long(arg1); convert_to_long(arg2); convert_to_long(arg3); - link=arg1->value.lval; - id=arg2->value.lval; + link=Z_LVAL_P(arg1); + id=Z_LVAL_P(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find connection identifier %d", link); RETURN_FALSE; } - doc=arg3->value.lval; + doc=Z_LVAL_P(arg3); docptr = zend_list_find(doc, &type); if(!docptr || (type!=le_document)) { php_error(E_WARNING, "Unable to find document identifier %d", doc); @@ -2844,17 +2844,17 @@ PHP_FUNCTION(hw_new_document) doc = malloc(sizeof(hw_document)); if(NULL == doc) RETURN_FALSE; - doc->data = malloc(arg3->value.lval+1); + doc->data = malloc(Z_LVAL_P(arg3)+1); if(NULL == doc->data) { free(doc); RETURN_FALSE; } - memcpy(doc->data, arg2->value.str.val, arg3->value.lval); + memcpy(doc->data, Z_STRVAL_P(arg2), Z_LVAL_P(arg3)); ptr = doc->data; - ptr[arg3->value.lval] = '\0'; - doc->attributes = strdup(arg1->value.str.val); + Z_LVAL_P(ptr[arg3)] = '\0'; + doc->attributes = strdup(Z_STRVAL_P(arg1)); doc->bodytag = NULL; - doc->size = arg3->value.lval; + doc->size = Z_LVAL_P(arg3); Z_LVAL_P(return_value) = zend_list_insert(doc, le_document); Z_TYPE_P(return_value) = IS_LONG; } @@ -2883,7 +2883,7 @@ PHP_FUNCTION(hw_new_document_from_file) convert_to_string_ex(arg1); convert_to_string_ex(arg2); - fp = php_fopen_wrapper((*arg2)->value.str.val, "r", use_include_path|ENFORCE_SAFE_MODE, &issock, &socketd, NULL TSRMLS_CC); + fp = php_fopen_wrapper(Z_STRVAL_PP(arg2), "r", use_include_path|ENFORCE_SAFE_MODE, &issock, &socketd, NULL TSRMLS_CC); if (!fp && !socketd){ if (issock != BAD_URL) { char *tmp = estrndup(Z_STRVAL_PP(arg2), Z_STRLEN_PP(arg2)); @@ -2955,7 +2955,7 @@ PHP_FUNCTION(hw_new_document_from_file) doc->data = realloc(doc->data, bcount+1); ptr = doc->data; ptr[bcount] = '\0'; - doc->attributes = strdup((*arg1)->value.str.val); + doc->attributes = strdup(Z_STRVAL_PP(arg1)); doc->bodytag = NULL; doc->size = bcount; Z_LVAL_P(return_value) = zend_list_insert(doc, le_document); @@ -2976,7 +2976,7 @@ PHP_FUNCTION(hw_free_document) WRONG_PARAM_COUNT; } convert_to_long(arg1); - id=arg1->value.lval; + id=Z_LVAL_P(arg1); ptr = zend_list_find(id, &type); if(!ptr || (type!=le_document)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3003,7 +3003,7 @@ PHP_FUNCTION(hw_output_document) WRONG_PARAM_COUNT; } convert_to_long(arg1); - id=arg1->value.lval; + id=Z_LVAL_P(arg1); ptr = zend_list_find(id, &type); if(!ptr || (type!=le_document)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3037,7 +3037,7 @@ PHP_FUNCTION(hw_document_bodytag) RETURN_FALSE; convert_to_long(argv[0]); - id=argv[0]->value.lval; + id=Z_LVAL_P(argv[0]); ptr = zend_list_find(id, &type); if(!ptr || (type!=le_document)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3046,14 +3046,14 @@ PHP_FUNCTION(hw_document_bodytag) if(argc == 2) { convert_to_string(argv[1]); - str=argv[1]->value.str.val; + str=Z_STRVAL_P(argv[1]); } if(str != NULL) { - temp = emalloc(argv[1]->value.str.len + strlen(ptr->bodytag) + 2); + temp = emalloc(Z_STRLEN_P(argv[1]) + strlen(ptr->bodytag) + 2); strcpy(temp, ptr->bodytag); strcpy(temp+strlen(ptr->bodytag)-1, str); - strcpy(temp+strlen(ptr->bodytag)-1+argv[1]->value.str.len, ">\n"); + strcpy(temp+strlen(ptr->bodytag)-1+Z_STRLEN_P(argv[1]), ">\n"); RETURN_STRING(temp, 0); } else { //fprintf(stderr, "hw_document_bodytag: %s (%s)\n", ptr->bodytag, ptr->attributes); @@ -3082,7 +3082,7 @@ PHP_FUNCTION(hw_document_content) RETURN_FALSE; convert_to_long(argv[0]); - id=argv[0]->value.lval; + id=Z_LVAL_P(argv[0]); ptr = zend_list_find(id, &type); if(!ptr || (type!=le_document)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3111,7 +3111,7 @@ PHP_FUNCTION(hw_document_setcontent) convert_to_long(argv[0]); convert_to_string(argv[1]); - id=argv[0]->value.lval; + id=Z_LVAL_P(argv[0]); ptr = zend_list_find(id, &type); if(!ptr || (type!=le_document)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3119,7 +3119,7 @@ PHP_FUNCTION(hw_document_setcontent) } str = ptr->data; - if(NULL != (ptr->data = strdup(argv[1]->value.str.val))) { + if(NULL != (ptr->data = strdup(Z_STRVAL_P(argv[1])))) { ptr->size = strlen(ptr->data); free(str); RETURN_TRUE; @@ -3146,7 +3146,7 @@ PHP_FUNCTION(hw_document_size) WRONG_PARAM_COUNT; } convert_to_long(arg1); - id=arg1->value.lval; + id=Z_LVAL_P(arg1); ptr = zend_list_find(id, &type); if(!ptr || (type!=le_document)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3173,7 +3173,7 @@ PHP_FUNCTION(hw_document_attributes) WRONG_PARAM_COUNT; } convert_to_long(arg1); - id=arg1->value.lval; + id=Z_LVAL_P(arg1); ptr = zend_list_find(id, &type); if(!ptr || (type!=le_document)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3200,8 +3200,8 @@ PHP_FUNCTION(hw_getparentsobj) } convert_to_long(arg1); convert_to_long(arg2); - link=arg1->value.lval; - id=arg2->value.lval; + link=Z_LVAL_P(arg1); + id=Z_LVAL_P(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3235,8 +3235,8 @@ PHP_FUNCTION(hw_getparents) } convert_to_long(arg1); convert_to_long(arg2); - link=arg1->value.lval; - id=arg2->value.lval; + link=Z_LVAL_P(arg1); + id=Z_LVAL_P(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3281,8 +3281,8 @@ PHP_FUNCTION(hw_children) } convert_to_long_ex(arg1); convert_to_long_ex(arg2); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3328,8 +3328,8 @@ PHP_FUNCTION(hw_childrenobj) } convert_to_long_ex(arg1); convert_to_long_ex(arg2); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3363,8 +3363,8 @@ PHP_FUNCTION(hw_getchildcoll) } convert_to_long_ex(arg1); convert_to_long_ex(arg2); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3410,8 +3410,8 @@ PHP_FUNCTION(hw_getchildcollobj) } convert_to_long_ex(arg1); convert_to_long_ex(arg2); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3444,8 +3444,8 @@ PHP_FUNCTION(hw_docbyanchor) } convert_to_long_ex(arg1); convert_to_long_ex(arg2); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3476,8 +3476,8 @@ PHP_FUNCTION(hw_docbyanchorobj) } convert_to_long_ex(arg1); convert_to_long_ex(arg2); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3516,9 +3516,9 @@ PHP_FUNCTION(hw_getobjectbyquery) convert_to_long_ex(arg1); convert_to_string_ex(arg2); convert_to_long_ex(arg3); - link=(*arg1)->value.lval; - query=(*arg2)->value.str.val; - maxhits=(*arg3)->value.lval; + link=Z_LVAL_PP(arg1); + query=Z_STRVAL_PP(arg2); + maxhits=Z_LVAL_PP(arg3); if (maxhits < 0) maxhits=0x7FFFFFFF; ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { @@ -3560,9 +3560,9 @@ PHP_FUNCTION(hw_getobjectbyqueryobj) convert_to_long_ex(arg1); convert_to_string_ex(arg2); convert_to_long_ex(arg3); - link=(*arg1)->value.lval; - query=(*arg2)->value.str.val; - maxhits=(*arg3)->value.lval; + link=Z_LVAL_PP(arg1); + query=Z_STRVAL_PP(arg2); + maxhits=Z_LVAL_PP(arg3); if (maxhits < 0) maxhits=0x7FFFFFFF; ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { @@ -3600,10 +3600,10 @@ PHP_FUNCTION(hw_getobjectbyquerycoll) convert_to_long_ex(arg2); convert_to_string_ex(arg3); convert_to_long_ex(arg4); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; - query=(*arg3)->value.str.val; - maxhits=(*arg4)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); + query=Z_STRVAL_PP(arg3); + maxhits=Z_LVAL_PP(arg4); if (maxhits < 0) maxhits=0x7FFFFFFF; ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { @@ -3646,10 +3646,10 @@ PHP_FUNCTION(hw_getobjectbyquerycollobj) convert_to_long_ex(arg2); convert_to_string_ex(arg3); convert_to_long_ex(arg4); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; - query=(*arg3)->value.str.val; - maxhits=(*arg4)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); + query=Z_STRVAL_PP(arg3); + maxhits=Z_LVAL_PP(arg4); if (maxhits < 0) maxhits=0x7FFFFFFF; ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { @@ -3687,9 +3687,9 @@ PHP_FUNCTION(hw_getobjectbyftquery) convert_to_long_ex(arg1); convert_to_string_ex(arg2); convert_to_long_ex(arg3); - link=(*arg1)->value.lval; - query=(*arg2)->value.str.val; - maxhits=(*arg3)->value.lval; + link=Z_LVAL_PP(arg1); + query=Z_STRVAL_PP(arg2); + maxhits=Z_LVAL_PP(arg3); if (maxhits < 0) maxhits=0x7FFFFFFF; ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { @@ -3732,9 +3732,9 @@ PHP_FUNCTION(hw_getobjectbyftqueryobj) convert_to_long_ex(arg1); convert_to_string_ex(arg2); convert_to_long_ex(arg3); - link=(*arg1)->value.lval; - query=(*arg2)->value.str.val; - maxhits=(*arg3)->value.lval; + link=Z_LVAL_PP(arg1); + query=Z_STRVAL_PP(arg2); + maxhits=Z_LVAL_PP(arg3); if (maxhits < 0) maxhits=0x7FFFFFFF; ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { @@ -3773,10 +3773,10 @@ PHP_FUNCTION(hw_getobjectbyftquerycoll) convert_to_long_ex(arg2); convert_to_string_ex(arg3); convert_to_long_ex(arg4); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; - query=(*arg3)->value.str.val; - maxhits=(*arg4)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); + query=Z_STRVAL_PP(arg3); + maxhits=Z_LVAL_PP(arg4); if (maxhits < 0) maxhits=0x7FFFFFFF; ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { @@ -3820,10 +3820,10 @@ PHP_FUNCTION(hw_getobjectbyftquerycollobj) convert_to_long_ex(arg2); convert_to_string_ex(arg3); convert_to_long_ex(arg4); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; - query=(*arg3)->value.str.val; - maxhits=(*arg4)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); + query=Z_STRVAL_PP(arg3); + maxhits=Z_LVAL_PP(arg4); if (maxhits < 0) maxhits=0x7FFFFFFF; ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { @@ -3858,8 +3858,8 @@ PHP_FUNCTION(hw_getchilddoccoll) } convert_to_long_ex(arg1); convert_to_long_ex(arg2); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3898,8 +3898,8 @@ PHP_FUNCTION(hw_getchilddoccollobj) } convert_to_long_ex(arg1); convert_to_long_ex(arg2); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3934,8 +3934,8 @@ PHP_FUNCTION(hw_getanchors) } convert_to_long_ex(arg1); convert_to_long_ex(arg2); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -3974,8 +3974,8 @@ PHP_FUNCTION(hw_getanchorsobj) } convert_to_long_ex(arg1); convert_to_long_ex(arg2); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); ptr = (hw_connection *) zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", id); @@ -4006,7 +4006,7 @@ PHP_FUNCTION(hw_getusername) WRONG_PARAM_COUNT; } convert_to_long_ex(arg1); - link = (*arg1)->value.lval; + link = Z_LVAL_PP(arg1); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); @@ -4034,9 +4034,9 @@ PHP_FUNCTION(hw_identify) convert_to_long_ex(arg1); convert_to_string_ex(arg2); convert_to_string_ex(arg3); - link = (*arg1)->value.lval; - name=(*arg2)->value.str.val; - passwd=(*arg3)->value.str.val; + link = Z_LVAL_PP(arg1); + name=Z_STRVAL_PP(arg2); + passwd=Z_STRVAL_PP(arg3); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); @@ -4080,14 +4080,14 @@ PHP_FUNCTION(hw_objrec2array) if(zend_get_parameters_ex(1, &arg1) == FAILURE) WRONG_PARAM_COUNT; convert_to_string_ex(arg1); - make2_return_array_from_objrec(&return_value, (*arg1)->value.str.val, NULL); + make2_return_array_from_objrec(&return_value, Z_STRVAL_PP(arg1), NULL); break; case 2: if(zend_get_parameters_ex(2, &arg1, &arg2) == FAILURE) WRONG_PARAM_COUNT; convert_to_array_ex(arg2); convert_to_string_ex(arg1); - make2_return_array_from_objrec(&return_value, (*arg1)->value.str.val, *arg2); + make2_return_array_from_objrec(&return_value, Z_STRVAL_PP(arg1), *arg2); break; default: WRONG_PARAM_COUNT; @@ -4106,7 +4106,7 @@ PHP_FUNCTION(hw_array2objrec) WRONG_PARAM_COUNT; } convert_to_array_ex(arg1); - objrec = make_objrec_from_array((*arg1)->value.ht); + objrec = make_objrec_from_array(Z_ARRVAL_PP(arg1)); if(objrec) { retobj = estrdup(objrec); free(objrec); @@ -4132,22 +4132,22 @@ PHP_FUNCTION(hw_incollections) convert_to_array_ex(arg2); convert_to_array_ex(arg3); convert_to_long_ex(arg4); - link = (*arg1)->value.lval; - retcoll=(*arg4)->value.lval; + link = Z_LVAL_PP(arg1); + retcoll=Z_LVAL_PP(arg4); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); RETURN_FALSE; } - cobjids = zend_hash_num_elements((*arg2)->value.ht); - if(NULL == (objectIDs = make_ints_from_array((*arg2)->value.ht))) { + cobjids = zend_hash_num_elements(Z_ARRVAL_PP(arg2)); + if(NULL == (objectIDs = make_ints_from_array(Z_ARRVAL_PP(arg2)))) { php_error(E_WARNING, "Could not create Int Array from Array\n"); RETURN_FALSE; } - ccollids = zend_hash_num_elements((*arg3)->value.ht); - if(NULL == (collIDs = make_ints_from_array((*arg3)->value.ht))) { + ccollids = zend_hash_num_elements(Z_ARRVAL_PP(arg3)); + if(NULL == (collIDs = make_ints_from_array(Z_ARRVAL_PP(arg3)))) { php_error(E_WARNING, "Could not create Int Array from Array\n"); efree(objectIDs); RETURN_FALSE; @@ -4193,15 +4193,15 @@ PHP_FUNCTION(hw_inscoll) convert_to_long_ex(arg1); convert_to_long_ex(arg2); convert_to_array_ex(arg3); - link = (*arg1)->value.lval; - id=(*arg2)->value.lval; + link = Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); RETURN_FALSE; } - if(NULL == (objrec = make_objrec_from_array((*arg3)->value.ht))) { + if(NULL == (objrec = make_objrec_from_array(Z_ARRVAL_PP(arg3)))) { php_error(E_WARNING, "Could not create Object Record from Array\n"); RETURN_FALSE; } @@ -4238,12 +4238,12 @@ PHP_FUNCTION(hw_insdoc) convert_to_string_ex(argv[2]); if(argc == 4) { convert_to_string_ex(argv[3]); - text = (*argv[3])->value.str.val; + text = Z_STRVAL_PP(argv[3]); } else { text = NULL; } - link = (*argv[0])->value.lval; - id = (*argv[1])->value.lval; + link = Z_LVAL_PP(argv[0]); + id = Z_LVAL_PP(argv[1]); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); @@ -4251,7 +4251,7 @@ PHP_FUNCTION(hw_insdoc) } set_swap(ptr->swap_on); - objrec = (*argv[2])->value.str.val; + objrec = Z_STRVAL_PP(argv[2]); if (0 != (ptr->lasterror = send_insdoc(ptr->socket, id, objrec, text, &newid))) { RETURN_FALSE; } @@ -4275,8 +4275,8 @@ PHP_FUNCTION(hw_getsrcbydestobj) } convert_to_long_ex(arg1); convert_to_long_ex(arg2); - link=(*arg1)->value.lval; - id=(*arg2)->value.lval; + link=Z_LVAL_PP(arg1); + id=Z_LVAL_PP(arg2); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); @@ -4309,9 +4309,9 @@ PHP_FUNCTION(hw_mapid) convert_to_long_ex(arg1); convert_to_long_ex(arg2); convert_to_long_ex(arg3); - link=(*arg1)->value.lval; - servid=(*arg2)->value.lval; - id=(*arg3)->value.lval; + link=Z_LVAL_PP(arg1); + servid=Z_LVAL_PP(arg2); + id=Z_LVAL_PP(arg3); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); @@ -4344,10 +4344,10 @@ PHP_FUNCTION(hw_getrellink) convert_to_long_ex(arg2); convert_to_long_ex(arg3); convert_to_long_ex(arg4); - link=(*arg1)->value.lval; - rootid=(*arg2)->value.lval; - sourceid=(*arg3)->value.lval; - destid=(*arg4)->value.lval; + link=Z_LVAL_PP(arg1); + rootid=Z_LVAL_PP(arg2); + sourceid=Z_LVAL_PP(arg3); + destid=Z_LVAL_PP(arg4); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); @@ -4397,7 +4397,7 @@ PHP_FUNCTION(hw_insertanchors) convert_to_long_ex(arg1); convert_to_array_ex(arg2); convert_to_array_ex(arg3); - docid=(*arg1)->value.lval; + docid=Z_LVAL_PP(arg1); hwdoc = zend_list_find(docid, &type); if(!hwdoc || (type!=le_document)) { php_error(E_WARNING, "Unable to find file identifier %d", docid); @@ -4408,7 +4408,7 @@ PHP_FUNCTION(hw_insertanchors) if(argc == 4) { int i; convert_to_array_ex(arg4); - prefixarray =(*arg4)->value.ht; + prefixarray =Z_ARRVAL_PP(arg4); if((prefixarray == NULL) || (zend_hash_num_elements(prefixarray) != 5)) { php_error(E_WARNING, "You must provide 5 urlprefixes (you have provided %d)", zend_hash_num_elements(prefixarray)); RETURN_FALSE; @@ -4447,15 +4447,15 @@ PHP_FUNCTION(hw_insertanchors) urlprefix = NULL; } - if(zend_hash_num_elements((*arg2)->value.ht) != zend_hash_num_elements((*arg3)->value.ht)) { + if(zend_hash_num_elements(Z_ARRVAL_PP(arg2)) != zend_hash_num_elements(Z_ARRVAL_PP(arg3))) { php_error(E_WARNING, "Unequal number of elments in arrays"); RETURN_FALSE; } /* Turn PHP-Array of strings into C-Array of strings */ - arrht = (*arg2)->value.ht; + arrht = Z_ARRVAL_PP(arg2); anchorrecs = make_strs_from_array(arrht); - arrht = (*arg3)->value.ht; + arrht = Z_ARRVAL_PP(arg3); dest = make_strs_from_array(arrht); if (0 != (error = send_insertanchors(&(hwdoc->data), &count, anchorrecs, dest, zend_hash_num_elements(arrht), urlprefix, &bodytag))) { @@ -4493,7 +4493,7 @@ PHP_FUNCTION(hw_connection_info) WRONG_PARAM_COUNT; } convert_to_long_ex(arg1); - link=(*arg1)->value.lval; + link=Z_LVAL_PP(arg1); ptr = zend_list_find(link, &type); if(!ptr || (type!=le_socketp && type!=le_psocketp)) { php_error(E_WARNING, "Unable to find file identifier %d", link); |