zval val;
zend_ulong idx;
-#ifndef PHP_WIN32
- char **env;
-#else
- char *environment, *env;
-#endif
-
+ p = strchr(env, '=');
+ if (!p
+ || p == env
+ || !valid_environment_name(env, p)) {
+ /* malformed entry? */
+ return;
+ }
+ name_len = p - env;
+ p++;
+ len = strlen(p);
+ if (len == 0) {
+ ZVAL_EMPTY_STRING(&val);
+ } else if (len == 1) {
+ ZVAL_INTERNED_STR(&val, ZSTR_CHAR((zend_uchar)*p));
+ } else {
+ ZVAL_NEW_STR(&val, zend_string_init(p, len, 0));
+ }
+ if (ZEND_HANDLE_NUMERIC_STR(env, name_len, idx)) {
+ zend_hash_index_update(ht, idx, &val);
+ } else {
+ php_register_variable_quick(env, name_len, &val, ht);
+ }
+ }
+
+ void _php_import_environment_variables(zval *array_ptr)
+ {
tsrm_env_lock();
- for (env = environ; env != NULL && *env != NULL; env++) {
- p = strchr(*env, '=');
- if (!p
- || p == *env
- || !valid_environment_name(*env, p)) {
- /* malformed entry? */
- continue;
- }
- name_len = p - *env;
- p++;
- len = strlen(p);
- if (len == 0) {
- ZVAL_EMPTY_STRING(&val);
- } else if (len == 1) {
- ZVAL_INTERNED_STR(&val, ZSTR_CHAR((zend_uchar)*p));
- } else {
- ZVAL_NEW_STR(&val, zend_string_init(p, len, 0));
- }
- if (ZEND_HANDLE_NUMERIC_STR(*env, name_len, idx)) {
- zend_hash_index_update(Z_ARRVAL_P(array_ptr), idx, &val);
- } else {
- php_register_variable_quick(*env, name_len, &val, Z_ARRVAL_P(array_ptr));
- }
+ #ifndef PHP_WIN32
- for (env = environ; env != NULL && *env != NULL; env++) {
++ for (char **env = environ; env != NULL && *env != NULL; env++) {
+ import_environment_variable(Z_ARRVAL_P(array_ptr), *env);
+ }
+ #else
- environment = GetEnvironmentStringsA();
- for (env = environment; env != NULL && *env; env += strlen(env) + 1) {
++ char *environment = GetEnvironmentStringsA();
++ for (char *env = environment; env != NULL && *env; env += strlen(env) + 1) {
+ import_environment_variable(Z_ARRVAL_P(array_ptr), env);
}
+ FreeEnvironmentStringsA(environment);
+ #endif
tsrm_env_unlock();
}