attempt to implement some personal standards
[m6w6/ext-http] / php_http_env.c
diff --git a/php_http_env.c b/php_http_env.c
deleted file mode 100644 (file)
index c60d4c0..0000000
+++ /dev/null
@@ -1,819 +0,0 @@
-/*
-    +--------------------------------------------------------------------+
-    | PECL :: http                                                       |
-    +--------------------------------------------------------------------+
-    | Redistribution and use in source and binary forms, with or without |
-    | modification, are permitted provided that the conditions mentioned |
-    | in the accompanying LICENSE file are met.                          |
-    +--------------------------------------------------------------------+
-    | Copyright (c) 2004-2014, Michael Wallner <mike@php.net>            |
-    +--------------------------------------------------------------------+
-*/
-
-#include "php_http_api.h"
-#include "php_variables.h"
-
-PHP_RSHUTDOWN_FUNCTION(http_env)
-{
-       if (PHP_HTTP_G->env.request.headers) {
-               zend_hash_destroy(PHP_HTTP_G->env.request.headers);
-               FREE_HASHTABLE(PHP_HTTP_G->env.request.headers);
-               PHP_HTTP_G->env.request.headers = NULL;
-       }
-       if (PHP_HTTP_G->env.request.body) {
-               php_http_message_body_free(&PHP_HTTP_G->env.request.body);
-       }
-
-       if (PHP_HTTP_G->env.server_var) {
-               zval_ptr_dtor(&PHP_HTTP_G->env.server_var);
-               PHP_HTTP_G->env.server_var = NULL;
-       }
-
-       return SUCCESS;
-}
-
-void php_http_env_get_request_headers(HashTable *headers TSRMLS_DC)
-{
-       php_http_array_hashkey_t key = php_http_array_hashkey_init(0);
-       zval **hsv, **header;
-       HashPosition pos;
-
-       if (!PHP_HTTP_G->env.request.headers) {
-               ALLOC_HASHTABLE(PHP_HTTP_G->env.request.headers);
-               zend_hash_init(PHP_HTTP_G->env.request.headers, 0, NULL, ZVAL_PTR_DTOR, 0);
-
-               zend_is_auto_global("_SERVER", lenof("_SERVER") TSRMLS_CC);
-
-               if (SUCCESS == zend_hash_find(&EG(symbol_table), "_SERVER", sizeof("_SERVER"), (void *) &hsv) && Z_TYPE_PP(hsv) == IS_ARRAY) {
-                       FOREACH_KEY(pos, *hsv, key) {
-                               if (key.type == HASH_KEY_IS_STRING && key.len > 6 && *key.str == 'H' && !strncmp(key.str, "HTTP_", 5)) {
-                                       key.len -= 5;
-                                       key.str = php_http_pretty_key(estrndup(key.str + 5, key.len - 1), key.len - 1, 1, 1);
-
-                                       zend_hash_get_current_data_ex(Z_ARRVAL_PP(hsv), (void *) &header, &pos);
-                                       Z_ADDREF_P(*header);
-                                       zend_symtable_update(PHP_HTTP_G->env.request.headers, key.str, key.len, (void *) header, sizeof(zval *), NULL);
-
-                                       efree(key.str);
-                               } else if (key.type == HASH_KEY_IS_STRING && key.len > 9 && *key.str == 'C' && !strncmp(key.str, "CONTENT_", 8)) {
-                                       key.str = php_http_pretty_key(estrndup(key.str, key.len - 1), key.len - 1, 1, 1);
-
-                                       zend_hash_get_current_data_ex(Z_ARRVAL_PP(hsv), (void *) &header, &pos);
-                                       Z_ADDREF_P(*header);
-                                       zend_symtable_update(PHP_HTTP_G->env.request.headers, key.str, key.len, (void *) header, sizeof(zval *), NULL);
-
-                                       efree(key.str);
-                               }
-                       }
-               }
-       }
-
-       if (headers) {
-               zend_hash_copy(headers, PHP_HTTP_G->env.request.headers, (copy_ctor_func_t) zval_add_ref, NULL, sizeof(zval *));
-       }
-}
-
-char *php_http_env_get_request_header(const char *name_str, size_t name_len, size_t *len, php_http_message_t *request TSRMLS_DC)
-{
-       HashTable *request_headers;
-       zval **zvalue = NULL;
-       char *val = NULL, *key = php_http_pretty_key(estrndup(name_str, name_len), name_len, 1, 1);
-
-       if (request) {
-               request_headers = &request->hdrs;
-       } else {
-               php_http_env_get_request_headers(NULL TSRMLS_CC);
-               request_headers = PHP_HTTP_G->env.request.headers;
-       }
-
-       if (SUCCESS == zend_symtable_find(request_headers, key, name_len + 1, (void *) &zvalue)) {
-               zval *zcopy = php_http_ztyp(IS_STRING, *zvalue);
-
-               val = estrndup(Z_STRVAL_P(zcopy), Z_STRLEN_P(zcopy));
-               if (len) {
-                       *len = Z_STRLEN_P(zcopy);
-               }
-               zval_ptr_dtor(&zcopy);
-       }
-
-       efree(key);
-
-       return val;
-}
-
-int php_http_env_got_request_header(const char *name_str, size_t name_len, php_http_message_t *request TSRMLS_DC)
-{
-       HashTable *request_headers;
-       char *key = php_http_pretty_key(estrndup(name_str, name_len), name_len, 1, 1);
-       int got;
-
-       if (request) {
-               request_headers = &request->hdrs;
-       } else {
-               php_http_env_get_request_headers(NULL TSRMLS_CC);
-               request_headers = PHP_HTTP_G->env.request.headers;
-       }
-       got = zend_symtable_exists(request_headers, key, name_len + 1);
-       efree(key);
-
-       return got;
-}
-
-zval *php_http_env_get_superglobal(const char *key, size_t key_len TSRMLS_DC)
-{
-       zval **hsv;
-
-       zend_is_auto_global(key, key_len TSRMLS_CC);
-
-       if ((SUCCESS != zend_hash_find(&EG(symbol_table), key, key_len + 1, (void *) &hsv)) || (Z_TYPE_PP(hsv) != IS_ARRAY)) {
-               return NULL;
-       }
-
-       return *hsv;
-}
-
-zval *php_http_env_get_server_var(const char *key, size_t key_len, zend_bool check TSRMLS_DC)
-{
-       zval *hsv, **var;
-       char *env;
-
-       /* if available, this is a lot faster than accessing $_SERVER */
-       if (sapi_module.getenv) {
-               if ((!(env = sapi_module.getenv((char *) key, key_len TSRMLS_CC))) || (check && !*env)) {
-                       return NULL;
-               }
-               if (PHP_HTTP_G->env.server_var) {
-                       zval_ptr_dtor(&PHP_HTTP_G->env.server_var);
-               }
-               MAKE_STD_ZVAL(PHP_HTTP_G->env.server_var);
-               ZVAL_STRING(PHP_HTTP_G->env.server_var, env, 1);
-               return PHP_HTTP_G->env.server_var;
-       }
-
-       if (!(hsv = php_http_env_get_superglobal(ZEND_STRL("_SERVER") TSRMLS_CC))) {
-               return NULL;
-       }
-       if ((SUCCESS != zend_symtable_find(Z_ARRVAL_P(hsv), key, key_len + 1, (void *) &var))) {
-               return NULL;
-       }
-       if (check && !((Z_TYPE_PP(var) == IS_STRING) && Z_STRVAL_PP(var) && Z_STRLEN_PP(var))) {
-               return NULL;
-       }
-       return *var;
-}
-
-php_http_message_body_t *php_http_env_get_request_body(TSRMLS_D)
-{
-       if (!PHP_HTTP_G->env.request.body) {
-               php_stream *s = php_stream_temp_new();
-#if PHP_VERSION_ID >= 50600
-               php_stream *input = php_stream_open_wrapper("php://input", "r", 0, NULL);
-
-               /* php://input does not support stat */
-               php_stream_copy_to_stream_ex(input, s, -1, NULL);
-               php_stream_close(input);
-#else
-               if (SG(request_info).post_data || SG(request_info).raw_post_data) {
-                       /* php://input does not support seek() in PHP <= 5.5 */
-                       if (SG(request_info).raw_post_data) {
-                               php_stream_write(s, SG(request_info).raw_post_data, SG(request_info).raw_post_data_length);
-                       } else {
-                               php_stream_write(s, SG(request_info).post_data, SG(request_info).post_data_length);
-                       }
-               } else if (sapi_module.read_post && !SG(read_post_bytes)) {
-                       char *buf = emalloc(4096);
-                       int len;
-
-                       while (0 < (len = sapi_module.read_post(buf, 4096 TSRMLS_CC))) {
-                               SG(read_post_bytes) += len;
-                               php_stream_write(s, buf, len);
-
-                               if (len < 4096) {
-                                       break;
-                               }
-                       }
-                       efree(buf);
-               }
-#endif
-               php_stream_rewind(s);
-               PHP_HTTP_G->env.request.body = php_http_message_body_init(NULL, s TSRMLS_CC);
-       }
-
-       return PHP_HTTP_G->env.request.body;
-}
-
-const char *php_http_env_get_request_method(php_http_message_t *request TSRMLS_DC)
-{
-       const char *m;
-
-       if (PHP_HTTP_MESSAGE_TYPE(REQUEST, request)) {
-               m = request->http.info.request.method;
-       } else {
-               m = SG(request_info).request_method;
-       }
-
-       return m ? m : "GET";
-}
-
-php_http_range_status_t php_http_env_get_request_ranges(HashTable *ranges, size_t length, php_http_message_t *request TSRMLS_DC)
-{
-       zval *zentry;
-       char *range, *rp, c;
-       long begin = -1, end = -1, *ptr;
-
-       if (!(range = php_http_env_get_request_header(ZEND_STRL("Range"), NULL, request TSRMLS_CC))) {
-               return PHP_HTTP_RANGE_NO;
-       }
-       if (strncmp(range, "bytes=", lenof("bytes="))) {
-               PTR_FREE(range);
-               return PHP_HTTP_RANGE_NO;
-       }
-
-       rp  = range + lenof("bytes=");
-       ptr = &begin;
-
-       do {
-               switch (c = *(rp++)) {
-                       case '0':
-                               /* allow 000... - shall we? */
-                               if (*ptr != -10) {
-                                       *ptr *= 10;
-                               }
-                               break;
-
-                       case '1': case '2': case '3':
-                       case '4': case '5': case '6':
-                       case '7': case '8': case '9':
-                               /*
-                                * If the value of the pointer is already set (non-negative)
-                                * then multiply its value by ten and add the current value,
-                                * else initialise the pointers value with the current value
-                                * --
-                                * This let us recognize empty fields when validating the
-                                * ranges, i.e. a "-10" for begin and "12345" for the end
-                                * was the following range request: "Range: bytes=0-12345";
-                                * While a "-1" for begin and "12345" for the end would
-                                * have been: "Range: bytes=-12345".
-                                */
-                               if (*ptr > 0) {
-                                       *ptr *= 10;
-                                       *ptr += c - '0';
-                               } else {
-                                       *ptr = c - '0';
-                               }
-                               break;
-
-                       case '-':
-                               ptr = &end;
-                               break;
-
-                       case ' ':
-                               break;
-
-                       case 0:
-                       case ',':
-
-                               if (length) {
-                                       /* validate ranges */
-                                       switch (begin) {
-                                               /* "0-12345" */
-                                               case -10:
-                                                       switch (end) {
-                                                               /* "0-" */
-                                                               case -1:
-                                                                       PTR_FREE(range);
-                                                                       return PHP_HTTP_RANGE_NO;
-
-                                                               /* "0-0" */
-                                                               case -10:
-                                                                       end = 0;
-                                                                       break;
-
-                                                               default:
-                                                                       if (length <= (size_t) end) {
-                                                                               end = length - 1;
-                                                                       }
-                                                                       break;
-                                                       }
-                                                       begin = 0;
-                                                       break;
-
-                                               /* "-12345" */
-                                               case -1:
-                                                       /* "-", "-0" */
-                                                       if (end == -1 || end == -10) {
-                                                               PTR_FREE(range);
-                                                               return PHP_HTTP_RANGE_ERR;
-                                                       }
-                                                       begin = length - end;
-                                                       end = length - 1;
-                                                       break;
-
-                                               /* "12345-(NNN)" */
-                                               default:
-                                                       if (length <= (size_t) begin) {
-                                                               PTR_FREE(range);
-                                                               return PHP_HTTP_RANGE_ERR;
-                                                       }
-                                                       switch (end) {
-                                                               /* "12345-0" */
-                                                               case -10:
-                                                                       PTR_FREE(range);
-                                                                       return PHP_HTTP_RANGE_ERR;
-
-                                                               /* "12345-" */
-                                                               case -1:
-                                                                       end = length - 1;
-                                                                       break;
-
-                                                               /* "12345-67890" */
-                                                               default:
-                                                                       if (length <= (size_t) end) {
-                                                                               end = length - 1;
-                                                                       } else if (end <  begin) {
-                                                                               PTR_FREE(range);
-                                                                               return PHP_HTTP_RANGE_ERR;
-                                                                       }
-                                                                       break;
-                                                       }
-                                                       break;
-                                       }
-                               }
-
-                               MAKE_STD_ZVAL(zentry);
-                               array_init(zentry);
-                               add_index_long(zentry, 0, begin);
-                               add_index_long(zentry, 1, end);
-                               zend_hash_next_index_insert(ranges, &zentry, sizeof(zval *), NULL);
-
-                               begin = -1;
-                               end = -1;
-                               ptr = &begin;
-
-                               break;
-
-                       default:
-                               PTR_FREE(range);
-                               return PHP_HTTP_RANGE_NO;
-               }
-       } while (c != 0);
-
-       PTR_FREE(range);
-       return PHP_HTTP_RANGE_OK;
-}
-
-static void grab_headers(void *data, void *arg TSRMLS_DC)
-{
-       php_http_buffer_appendl(PHP_HTTP_BUFFER(arg), ((sapi_header_struct *)data)->header);
-       php_http_buffer_appends(PHP_HTTP_BUFFER(arg), PHP_HTTP_CRLF);
-}
-
-ZEND_RESULT_CODE php_http_env_get_response_headers(HashTable *headers_ht TSRMLS_DC)
-{
-       ZEND_RESULT_CODE status;
-       php_http_buffer_t headers;
-
-       php_http_buffer_init(&headers);
-       zend_llist_apply_with_argument(&SG(sapi_headers).headers, grab_headers, &headers TSRMLS_CC);
-       php_http_buffer_fix(&headers);
-
-       status = php_http_header_parse(headers.data, headers.used, headers_ht, NULL, NULL TSRMLS_CC);
-       php_http_buffer_dtor(&headers);
-
-       return status;
-}
-
-char *php_http_env_get_response_header(const char *name_str, size_t name_len TSRMLS_DC)
-{
-       char *val = NULL;
-       HashTable headers;
-
-       zend_hash_init(&headers, 0, NULL, ZVAL_PTR_DTOR, 0);
-       if (SUCCESS == php_http_env_get_response_headers(&headers TSRMLS_CC)) {
-               zval **zvalue;
-               char *key = php_http_pretty_key(estrndup(name_str, name_len), name_len, 1, 1);
-
-               if (SUCCESS == zend_symtable_find(&headers, key, name_len + 1, (void *) &zvalue)) {
-                       zval *zcopy = php_http_ztyp(IS_STRING, *zvalue);
-
-                       val = estrndup(Z_STRVAL_P(zcopy), Z_STRLEN_P(zcopy));
-                       zval_ptr_dtor(&zcopy);
-               }
-
-               efree(key);
-       }
-       zend_hash_destroy(&headers);
-
-       return val;
-}
-
-long php_http_env_get_response_code(TSRMLS_D)
-{
-       long code = SG(sapi_headers).http_response_code;
-       return code ? code : 200;
-}
-
-ZEND_RESULT_CODE php_http_env_set_response_code(long http_code TSRMLS_DC)
-{
-       return sapi_header_op(SAPI_HEADER_SET_STATUS, (void *) http_code TSRMLS_CC);
-}
-
-ZEND_RESULT_CODE php_http_env_set_response_status_line(long code, php_http_version_t *v TSRMLS_DC)
-{
-       sapi_header_line h = {NULL, 0, 0};
-       ZEND_RESULT_CODE ret;
-
-       h.line_len = spprintf(&h.line, 0, "HTTP/%u.%u %ld %s", v->major, v->minor, code, php_http_env_get_response_status_for_code(code));
-       ret = sapi_header_op(SAPI_HEADER_REPLACE, (void *) &h TSRMLS_CC);
-       efree(h.line);
-
-       return ret;
-}
-
-ZEND_RESULT_CODE php_http_env_set_response_protocol_version(php_http_version_t *v TSRMLS_DC)
-{
-       return php_http_env_set_response_status_line(php_http_env_get_response_code(TSRMLS_C), v TSRMLS_CC);
-}
-
-ZEND_RESULT_CODE php_http_env_set_response_header(long http_code, const char *header_str, size_t header_len, zend_bool replace TSRMLS_DC)
-{
-       sapi_header_line h = {estrndup(header_str, header_len), header_len, http_code};
-       ZEND_RESULT_CODE ret = sapi_header_op(replace ? SAPI_HEADER_REPLACE : SAPI_HEADER_ADD, (void *) &h TSRMLS_CC);
-       efree(h.line);
-       return ret;
-}
-
-ZEND_RESULT_CODE php_http_env_set_response_header_va(long http_code, zend_bool replace, const char *fmt, va_list argv TSRMLS_DC)
-{
-       ZEND_RESULT_CODE ret = FAILURE;
-       sapi_header_line h = {NULL, 0, http_code};
-
-       h.line_len = vspprintf(&h.line, 0, fmt, argv);
-
-       if (h.line) {
-               if (h.line_len) {
-                       ret = sapi_header_op(replace ? SAPI_HEADER_REPLACE : SAPI_HEADER_ADD, (void *) &h TSRMLS_CC);
-               }
-               efree(h.line);
-       }
-       return ret;
-}
-
-ZEND_RESULT_CODE php_http_env_set_response_header_format(long http_code, zend_bool replace TSRMLS_DC, const char *fmt, ...)
-{
-       ZEND_RESULT_CODE ret;
-       va_list args;
-
-       va_start(args, fmt);
-       ret = php_http_env_set_response_header_va(http_code, replace, fmt, args TSRMLS_CC);
-       va_end(args);
-
-       return ret;
-}
-
-ZEND_RESULT_CODE php_http_env_set_response_header_value(long http_code, const char *name_str, size_t name_len, zval *value, zend_bool replace TSRMLS_DC)
-{
-       if (!value) {
-               sapi_header_line h = {(char *) name_str, name_len, http_code};
-
-               return sapi_header_op(SAPI_HEADER_DELETE, (void *) &h TSRMLS_CC);
-       }
-
-       if(Z_TYPE_P(value) == IS_ARRAY || Z_TYPE_P(value) == IS_OBJECT) {
-               HashPosition pos;
-               int first = replace;
-               zval **data_ptr;
-
-               FOREACH_HASH_VAL(pos, HASH_OF(value), data_ptr) {
-                       if (SUCCESS != php_http_env_set_response_header_value(http_code, name_str, name_len, *data_ptr, first TSRMLS_CC)) {
-                               return FAILURE;
-                       }
-                       first = 0;
-               }
-
-               return SUCCESS;
-       } else {
-               zval *data = php_http_ztyp(IS_STRING, value);
-
-               if (!Z_STRLEN_P(data)) {
-                       zval_ptr_dtor(&data);
-                       return php_http_env_set_response_header_value(http_code, name_str, name_len, NULL, replace TSRMLS_CC);
-               } else {
-                       sapi_header_line h;
-                       ZEND_RESULT_CODE ret;
-
-                       if (name_len > INT_MAX) {
-                               name_len = INT_MAX;
-                       }
-                       h.response_code = http_code;
-                       h.line_len = spprintf(&h.line, 0, "%.*s: %.*s", (int) name_len, name_str, Z_STRLEN_P(data), Z_STRVAL_P(data));
-
-                       ret = sapi_header_op(replace ? SAPI_HEADER_REPLACE : SAPI_HEADER_ADD, (void *) &h TSRMLS_CC);
-
-                       zval_ptr_dtor(&data);
-                       PTR_FREE(h.line);
-
-                       return ret;
-               }
-       }
-}
-
-const char *php_http_env_get_response_status_for_code(unsigned code)
-{
-       switch (code) {
-#define PHP_HTTP_RESPONSE_CODE(c, s) case c: return s;
-#include "php_http_response_codes.h"
-#undef PHP_HTTP_RESPONSE_CODE
-       default:
-               return NULL;
-       }
-}
-
-ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_getRequestHeader, 0, 0, 0)
-       ZEND_ARG_INFO(0, header_name)
-ZEND_END_ARG_INFO();
-static PHP_METHOD(HttpEnv, getRequestHeader)
-{
-       char *header_name_str = NULL;
-       int header_name_len = 0;
-
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s!", &header_name_str, &header_name_len)) {
-               return;
-       }
-       if (header_name_str && header_name_len) {
-               size_t header_length;
-               char *header_value = php_http_env_get_request_header(header_name_str, header_name_len, &header_length, NULL TSRMLS_CC);
-
-               if (header_value) {
-                       RETURN_STRINGL(header_value, header_length, 0);
-               }
-       } else {
-               array_init(return_value);
-               php_http_env_get_request_headers(Z_ARRVAL_P(return_value) TSRMLS_CC);
-       }
-}
-
-ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_getRequestBody, 0, 0, 0)
-       ZEND_ARG_INFO(0, body_class_name)
-ZEND_END_ARG_INFO();
-static PHP_METHOD(HttpEnv, getRequestBody)
-{
-       zend_object_value ov;
-       php_http_message_body_t *body;
-       zend_class_entry *class_entry = php_http_message_body_class_entry;
-
-       php_http_expect(SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|C", &class_entry), invalid_arg, return);
-
-       body = php_http_env_get_request_body(TSRMLS_C);
-       if (SUCCESS == php_http_new(&ov, class_entry, (php_http_new_t) php_http_message_body_object_new_ex, php_http_message_body_class_entry, body, NULL TSRMLS_CC)) {
-               php_http_message_body_addref(body);
-               RETVAL_OBJVAL(ov, 0);
-       }
-}
-
-ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_getResponseStatusForCode, 0, 0, 1)
-       ZEND_ARG_INFO(0, code)
-ZEND_END_ARG_INFO();
-static PHP_METHOD(HttpEnv, getResponseStatusForCode)
-{
-       long code;
-       const char *status;
-
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &code)) {
-               return;
-       }
-
-       if ((status = php_http_env_get_response_status_for_code(code))) {
-               RETURN_STRING(status, 1);
-       }
-}
-
-ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_getResponseStatusForAllCodes, 0, 0, 0)
-ZEND_END_ARG_INFO();
-static PHP_METHOD(HttpEnv, getResponseStatusForAllCodes)
-{
-       if (SUCCESS != zend_parse_parameters_none()) {
-               return;
-       }
-
-       array_init(return_value);
-#define PHP_HTTP_RESPONSE_CODE(code, status) add_index_string(return_value, code, status, 1);
-#include "php_http_response_codes.h"
-#undef PHP_HTTP_RESPONSE_CODE
-}
-
-ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_getResponseHeader, 0, 0, 0)
-       ZEND_ARG_INFO(0, header_name)
-ZEND_END_ARG_INFO();
-static PHP_METHOD(HttpEnv, getResponseHeader)
-{
-       char *header_name_str = NULL;
-       int header_name_len = 0;
-
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s!", &header_name_str, &header_name_len)) {
-               return;
-       }
-       if (header_name_str && header_name_len) {
-               char *header_value = php_http_env_get_response_header(header_name_str, header_name_len TSRMLS_CC);
-
-               if (header_value) {
-                       RETURN_STRING(header_value, 0);
-               }
-       } else {
-               array_init(return_value);
-               php_http_env_get_response_headers(Z_ARRVAL_P(return_value) TSRMLS_CC);
-       }
-}
-
-ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_getResponseCode, 0, 0, 0)
-ZEND_END_ARG_INFO();
-static PHP_METHOD(HttpEnv, getResponseCode)
-{
-       if (SUCCESS != zend_parse_parameters_none()) {
-               return;
-       }
-       RETURN_LONG(php_http_env_get_response_code(TSRMLS_C));
-}
-
-ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_setResponseHeader, 0, 0, 1)
-       ZEND_ARG_INFO(0, header_name)
-       ZEND_ARG_INFO(0, header_value)
-       ZEND_ARG_INFO(0, response_code)
-       ZEND_ARG_INFO(0, replace_header)
-ZEND_END_ARG_INFO();
-static PHP_METHOD(HttpEnv, setResponseHeader)
-{
-       char *header_name_str;
-       int header_name_len;
-       zval *header_value = NULL;
-       long code = 0;
-       zend_bool replace_header = 1;
-
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|z!lb", &header_name_str, &header_name_len, &header_value, &code, &replace_header)) {
-               return;
-       }
-       RETURN_BOOL(SUCCESS == php_http_env_set_response_header_value(code, header_name_str, header_name_len, header_value, replace_header TSRMLS_CC));
-}
-
-ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_setResponseCode, 0, 0, 1)
-       ZEND_ARG_INFO(0, code)
-ZEND_END_ARG_INFO();
-static PHP_METHOD(HttpEnv, setResponseCode)
-{
-       long code;
-
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &code)) {
-               return;
-       }
-       RETURN_BOOL(SUCCESS == php_http_env_set_response_code(code TSRMLS_CC));
-}
-
-ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_negotiateLanguage, 0, 0, 1)
-       ZEND_ARG_INFO(0, supported)
-       ZEND_ARG_INFO(1, result_array)
-ZEND_END_ARG_INFO();
-static PHP_METHOD(HttpEnv, negotiateLanguage)
-{
-       HashTable *supported;
-       zval *rs_array = NULL;
-
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "H|z", &supported, &rs_array)) {
-               return;
-       }
-       if (rs_array) {
-               zval_dtor(rs_array);
-               array_init(rs_array);
-       }
-
-       PHP_HTTP_DO_NEGOTIATE(language, supported, rs_array);
-}
-
-ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_negotiateCharset, 0, 0, 1)
-       ZEND_ARG_INFO(0, supported)
-       ZEND_ARG_INFO(1, result_array)
-ZEND_END_ARG_INFO();
-static PHP_METHOD(HttpEnv, negotiateCharset)
-{
-       HashTable *supported;
-       zval *rs_array = NULL;
-
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "H|z", &supported, &rs_array)) {
-               return;
-       }
-       if (rs_array) {
-               zval_dtor(rs_array);
-               array_init(rs_array);
-       }
-       PHP_HTTP_DO_NEGOTIATE(charset, supported, rs_array);
-}
-
-ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_negotiateEncoding, 0, 0, 1)
-       ZEND_ARG_INFO(0, supported)
-       ZEND_ARG_INFO(1, result_array)
-ZEND_END_ARG_INFO();
-static PHP_METHOD(HttpEnv, negotiateEncoding)
-{
-       HashTable *supported;
-       zval *rs_array = NULL;
-
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "H|z", &supported, &rs_array)) {
-               return;
-       }
-       if (rs_array) {
-               zval_dtor(rs_array);
-               array_init(rs_array);
-       }
-       PHP_HTTP_DO_NEGOTIATE(encoding, supported, rs_array);
-}
-
-ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_negotiateContentType, 0, 0, 1)
-       ZEND_ARG_INFO(0, supported)
-       ZEND_ARG_INFO(1, result_array)
-ZEND_END_ARG_INFO();
-static PHP_METHOD(HttpEnv, negotiateContentType)
-{
-       HashTable *supported;
-       zval *rs_array = NULL;
-
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "H|z", &supported, &rs_array)) {
-               return;
-       }
-       if (rs_array) {
-               zval_dtor(rs_array);
-               array_init(rs_array);
-       }
-       PHP_HTTP_DO_NEGOTIATE(content_type, supported, rs_array);
-}
-
-ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_negotiate, 0, 0, 2)
-       ZEND_ARG_INFO(0, params)
-       ZEND_ARG_INFO(0, supported)
-       ZEND_ARG_INFO(0, primary_type_separator)
-       ZEND_ARG_INFO(1, result_array)
-ZEND_END_ARG_INFO();
-static PHP_METHOD(HttpEnv, negotiate)
-{
-       HashTable *supported, *rs;
-       zval *rs_array = NULL;
-       char *value_str, *sep_str = NULL;
-       int value_len, sep_len = 0;
-
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "sH|s!z", &value_str, &value_len, &supported, &sep_str, &sep_len, &rs_array)) {
-               return;
-       }
-
-
-       if (rs_array) {
-               zval_dtor(rs_array);
-               array_init(rs_array);
-       }
-
-       if ((rs = php_http_negotiate(value_str, value_len, supported, sep_str, sep_len TSRMLS_CC))) {
-               PHP_HTTP_DO_NEGOTIATE_HANDLE_RESULT(rs, supported, rs_array);
-       } else {
-               PHP_HTTP_DO_NEGOTIATE_HANDLE_DEFAULT(supported, rs_array);
-       }
-}
-
-static zend_function_entry php_http_env_methods[] = {
-       PHP_ME(HttpEnv, getRequestHeader,              ai_HttpEnv_getRequestHeader,              ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
-       PHP_ME(HttpEnv, getRequestBody,                ai_HttpEnv_getRequestBody,                ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
-
-       PHP_ME(HttpEnv, getResponseStatusForCode,      ai_HttpEnv_getResponseStatusForCode,      ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
-       PHP_ME(HttpEnv, getResponseStatusForAllCodes,  ai_HttpEnv_getResponseStatusForAllCodes,  ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
-
-       PHP_ME(HttpEnv, getResponseHeader,             ai_HttpEnv_getResponseHeader,             ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
-       PHP_ME(HttpEnv, getResponseCode,               ai_HttpEnv_getResponseCode,               ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
-       PHP_ME(HttpEnv, setResponseHeader,             ai_HttpEnv_setResponseHeader,             ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
-       PHP_ME(HttpEnv, setResponseCode,               ai_HttpEnv_setResponseCode,               ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
-
-       PHP_ME(HttpEnv, negotiateLanguage,             ai_HttpEnv_negotiateLanguage,             ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
-       PHP_ME(HttpEnv, negotiateContentType,          ai_HttpEnv_negotiateContentType,          ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
-       PHP_ME(HttpEnv, negotiateEncoding,             ai_HttpEnv_negotiateEncoding,             ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
-       PHP_ME(HttpEnv, negotiateCharset,              ai_HttpEnv_negotiateCharset,              ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
-       PHP_ME(HttpEnv, negotiate,                     ai_HttpEnv_negotiate,                     ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
-
-       EMPTY_FUNCTION_ENTRY
-};
-
-zend_class_entry *php_http_env_class_entry;
-
-PHP_MINIT_FUNCTION(http_env)
-{
-       zend_class_entry ce = {0};
-
-       INIT_NS_CLASS_ENTRY(ce, "http", "Env", php_http_env_methods);
-       php_http_env_class_entry = zend_register_internal_class(&ce TSRMLS_CC);
-
-       return SUCCESS;
-}
-
-
-/*
- * Local variables:
- * tab-width: 4
- * c-basic-offset: 4
- * End:
- * vim600: noet sw=4 ts=4 fdm=marker
- * vim<600: noet sw=4 ts=4
- */