}
+void php_parse_gpc_data2(char *val, char *var, pval *track_vars_array ELS_DC PLS_DC)
+{
+ char *p = NULL;
+ char *ip; /* index pointer */
+ char *index;
+ int var_len, val_len, index_len;
+ zval *gpc_element, **gpc_element_p, **top_gpc_p=NULL;
+ zend_bool is_array;
+ zend_bool free_index;
+ HashTable *symtable1=NULL;
+ HashTable *symtable2=NULL;
+
+ if (PG(gpc_globals)) {
+ symtable1 = EG(active_symbol_table);
+ }
+ if (track_vars_array) {
+ if (symtable1) {
+ symtable2 = track_vars_array->value.ht;
+ } else {
+ symtable1 = track_vars_array->value.ht;
+ }
+ }
+ if (!symtable1) {
+ /* we don't need track_vars, and we're not setting GPC globals either. */
+ return;
+ }
+
+ /*
+ * Prepare variable name
+ */
+ ip = strchr(var, '[');
+ if (ip) {
+ is_array = 1;
+ *ip = 0;
+ } else {
+ is_array = 0;
+ }
+ /* ignore leading spaces in the variable name */
+ while (*var && *var==' ') {
+ var++;
+ }
+ var_len = strlen(var);
+ if (var_len==0) { /* empty variable name, or variable name with a space in it */
+ return;
+ }
+ /* ensure that we don't have spaces or dots in the variable name (not binary safe) */
+ for (p=var; *p; p++) {
+ switch(*p) {
+ case ' ':
+ case '.':
+ *p='_';
+ break;
+ }
+ }
+
+ /* Prepare value */
+ val_len = strlen(val);
+ if (PG(magic_quotes_gpc)) {
+ val = php_addslashes(val, val_len, &val_len, 0);
+ } else {
+ val = estrndup(val, val_len);
+ }
+
+ index = var;
+ index_len = var_len;
+ free_index = 0;
+
+ while (1) {
+ if (is_array) {
+ char *escaped_index;
+
+ if (!index) {
+ MAKE_STD_ZVAL(gpc_element);
+ array_init(gpc_element);
+ zend_hash_next_index_insert(symtable1, &gpc_element, sizeof(zval *), (void **) &gpc_element_p);
+ } else {
+ if (PG(magic_quotes_gpc) && (index!=var)) {
+ /* no need to addslashes() the index if it's the main variable name */
+ escaped_index = php_addslashes(index, index_len, &index_len, 0);
+ } else {
+ escaped_index = index;
+ }
+ if (zend_hash_find(symtable1, escaped_index, index_len+1, (void **) &gpc_element_p)==FAILURE
+ || (*gpc_element_p)->type != IS_ARRAY) {
+ MAKE_STD_ZVAL(gpc_element);
+ array_init(gpc_element);
+ zend_hash_update(symtable1, escaped_index, index_len+1, &gpc_element, sizeof(zval *), (void **) &gpc_element_p);
+ }
+ if (index!=escaped_index) {
+ efree(escaped_index);
+ }
+ }
+ if (!top_gpc_p) {
+ top_gpc_p = gpc_element_p;
+ }
+ symtable1 = (*gpc_element_p)->value.ht;
+ /* ip pointed to the '[' character, now obtain the key */
+ index = ++ip;
+ index_len = 0;
+ if (*ip=='\n' || *ip=='\r' || *ip=='\t' || *ip==' ') {
+ ip++;
+ }
+ if (*ip==']') {
+ index = NULL;
+ } else {
+ ip = strchr(ip, ']');
+ if (!ip) {
+ php_error(E_WARNING, "Missing ] in %s variable", var);
+ return;
+ }
+ *ip = 0;
+ index_len = strlen(index);
+ }
+ ip++;
+ if (*ip=='[') {
+ is_array = 1;
+ *ip = 0;
+ } else {
+ is_array = 0;
+ }
+ } else {
+ MAKE_STD_ZVAL(gpc_element);
+ gpc_element->value.str.val = val;
+ gpc_element->value.str.len = val_len;
+ gpc_element->type = IS_STRING;
+ if (!index) {
+ zend_hash_next_index_insert(symtable1, &gpc_element, sizeof(zval *), (void **) &gpc_element_p);
+ } else {
+ zend_hash_update(symtable1, index, index_len+1, &gpc_element, sizeof(zval *), (void **) &gpc_element_p);
+ }
+ if (!top_gpc_p) {
+ top_gpc_p = gpc_element_p;
+ }
+ break;
+ }
+ }
+
+ if (symtable2 && top_gpc_p) {
+ zend_hash_update(symtable2, var, var_len+1, top_gpc_p, sizeof(zval *), NULL);
+ }
+}
+
+
void php_treat_data(int arg, char *str ELS_DC PLS_DC SLS_DC)
{
char *res = NULL, *var, *val;
/* FIXME: XXX: not binary safe, discards returned length */
_php3_urldecode(var, strlen(var));
_php3_urldecode(val, strlen(val));
- php_parse_gpc_data(val,var,array_ptr ELS_CC PLS_CC);
+ php_parse_gpc_data2(val,var,array_ptr ELS_CC PLS_CC);
}
if (arg == PARSE_COOKIE) {
var = strtok(NULL, ";");