/*

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

| PHP Version 7 |

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

| Copyright (c) 1997-2016 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: Sascha Schumann <sascha@schumann.cx> |

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

*/

/* $Id$ */

#define ZEND_INCLUDE_FULL_WINDOWS_HEADERS

#include "php.h"

#include "php_ini.h"

#include "php_apache.h"

#include "apr_strings.h"

#include "ap_config.h"

#include "util_filter.h"

#include "httpd.h"

#include "http_config.h"

#include "http_request.h"

#include "http_core.h"

#include "http_protocol.h"

#include "http_log.h"

#include "http_main.h"

#include "util_script.h"

#include "http_core.h"

#ifdef PHP_AP_DEBUG

#define phpapdebug(a) fprintf a

#else

#define phpapdebug(a)

#endif

typedef struct {

HashTable config;

} php_conf_rec;

typedef struct {

char *value;

size_t value_len;

char status;

char htaccess;

} php_dir_entry;

static const char *real_value_hnd(cmd_parms *cmd, void *dummy, const char *name, const char *value, int status)

{

php_conf_rec *d = dummy;

php_dir_entry e;

phpapdebug((stderr, "Getting %s=%s for %p (%d)\n", name, value, dummy, zend_hash_num_elements(&d->config)));

if (!strncasecmp(value, "none", sizeof("none"))) {

value = "";

}

e.value = apr_pstrdup(cmd->pool, value);

e.value_len = strlen(value);

e.status = status;

e.htaccess = ((cmd->override & (RSRC_CONF|ACCESS_CONF)) == 0);

zend_hash_str_update_mem(&d->config, (char *) name, strlen(name), &e, sizeof(e));

return NULL;

}

static const char *php_apache_value_handler(cmd_parms *cmd, void *dummy, const char *name, const char *value)

{

return real_value_hnd(cmd, dummy, name, value, PHP_INI_PERDIR);

}

static const char *php_apache_admin_value_handler(cmd_parms *cmd, void *dummy, const char *name, const char *value)

{

return real_value_hnd(cmd, dummy, name, value, PHP_INI_SYSTEM);

}

static const char *real_flag_hnd(cmd_parms *cmd, void *dummy, const char *arg1, const char *arg2, int status)

{

char bool_val[2];

if (!strcasecmp(arg2, "On") || (arg2[0] == '1' && arg2[1] == '\0')) {

bool_val[0] = '1';

} else {

bool_val[0] = '0';

}

bool_val[1] = 0;

return real_value_hnd(cmd, dummy, arg1, bool_val, status);

}

static const char *php_apache_flag_handler(cmd_parms *cmd, void *dummy, const char *name, const char *value)

{

return real_flag_hnd(cmd, dummy, name, value, PHP_INI_PERDIR);

}

static const char *php_apache_admin_flag_handler(cmd_parms *cmd, void *dummy, const char *name, const char *value)

{

return real_flag_hnd(cmd, dummy, name, value, PHP_INI_SYSTEM);

}

static const char *php_apache_phpini_set(cmd_parms *cmd, void *mconfig, const char *arg)

{

if (apache2_php_ini_path_override) {

return "Only first PHPINIDir directive honored per configuration tree - subsequent ones ignored";

}

apache2_php_ini_path_override = ap_server_root_relative(cmd->pool, arg);

return NULL;

}

static zend_bool should_overwrite_per_dir_entry(HashTable *target_ht, zval *zv, zend_hash_key *hash_key, void *pData)

{

php_dir_entry *new_per_dir_entry = Z_PTR_P(zv);

php_dir_entry *orig_per_dir_entry;

if ((orig_per_dir_entry = zend_hash_find_ptr(target_ht, hash_key->key)) == NULL) {

return 1; /* does not exist in dest, copy from source */

}

if (new_per_dir_entry->status >= orig_per_dir_entry->status) {

/* use new entry */

phpapdebug((stderr, "ADDING/OVERWRITING %s (%d vs. %d)\n", hash_key->arKey, new_per_dir_entry->status, orig_per_dir_entry->status));

return 1;

} else {

return 0;

}

}

void config_entry_ctor(zval *zv)

{

php_dir_entry *pe = (php_dir_entry*)Z_PTR_P(zv);

php_dir_entry *npe = malloc(sizeof(php_dir_entry));

memcpy(npe, pe, sizeof(php_dir_entry));

ZVAL_PTR(zv, npe);

}

void *merge_php_config(apr_pool_t *p, void *base_conf, void *new_conf)

{

php_conf_rec *d = base_conf, *e = new_conf, *n = NULL;

n = create_php_config(p, "merge_php_config");

/* copy old config */

zend_hash_copy(&n->config, &d->config, config_entry_ctor);

/* merge new config */

phpapdebug((stderr, "Merge dir (%p)+(%p)=(%p)\n", base_conf, new_conf, n));

zend_hash_merge_ex(&n->config, &e->config, config_entry_ctor, should_overwrite_per_dir_entry, NULL);

return n;

}

char *get_php_config(void *conf, char *name, size_t name_len)

{

php_conf_rec *d = conf;

php_dir_entry *pe;

if ((pe = zend_hash_str_find_ptr(&d->config, name, name_len)) != NULL) {

return pe->value;

}

return "";

}

void apply_config(void *dummy)

{

php_conf_rec *d = dummy;

zend_string *str;

php_dir_entry *data;

ZEND_HASH_FOREACH_STR_KEY_PTR(&d->config, str, data) {

phpapdebug((stderr, "APPLYING (%s)(%s)\n", str, data->value));

if (zend_alter_ini_entry_chars(str, data->value, data->value_len, data->status, data->htaccess?PHP_INI_STAGE_HTACCESS:PHP_INI_STAGE_ACTIVATE) == FAILURE) {

phpapdebug((stderr, "..FAILED\n"));

}

} ZEND_HASH_FOREACH_END();

}

const command_rec php_dir_cmds[] =

{

AP_INIT_TAKE2("php_value", php_apache_value_handler, NULL, OR_OPTIONS, "PHP Value Modifier"),

AP_INIT_TAKE2("php_flag", php_apache_flag_handler, NULL, OR_OPTIONS, "PHP Flag Modifier"),

AP_INIT_TAKE2("php_admin_value", php_apache_admin_value_handler, NULL, ACCESS_CONF|RSRC_CONF, "PHP Value Modifier (Admin)"),

AP_INIT_TAKE2("php_admin_flag", php_apache_admin_flag_handler, NULL, ACCESS_CONF|RSRC_CONF, "PHP Flag Modifier (Admin)"),

AP_INIT_TAKE1("PHPINIDir", php_apache_phpini_set, NULL, RSRC_CONF, "Directory containing the php.ini file"),

{NULL}

};

static apr_status_t destroy_php_config(void *data)

{

php_conf_rec *d = data;

phpapdebug((stderr, "Destroying config %p\n", data));

zend_hash_destroy(&d->config);

return APR_SUCCESS;

}

static void config_entry_dtor(zval *zv)

{

free((php_dir_entry*)Z_PTR_P(zv));

}

void *create_php_config(apr_pool_t *p, char *dummy)

{

php_conf_rec *newx = (php_conf_rec *) apr_pcalloc(p, sizeof(*newx));

phpapdebug((stderr, "Creating new config (%p) for %s\n", newx, dummy));

zend_hash_init(&newx->config, 0, NULL, config_entry_dtor, 1);

apr_pool_cleanup_register(p, newx, destroy_php_config, apr_pool_cleanup_null);

return (void *) newx;

}

/*

* Local variables:

* tab-width: 4

* c-basic-offset: 4

* End:

* vim600: sw=4 ts=4 fdm=marker

* vim<600: sw=4 ts=4

*/