git.m6w6.name Git - m6w6/ext-http/blob - php_http_env.c

   1 /*
   2     +--------------------------------------------------------------------+
   3     | PECL :: http                                                       |
   4     +--------------------------------------------------------------------+
   5     | Redistribution and use in source and binary forms, with or without |
   6     | modification, are permitted provided that the conditions mentioned |
   7     | in the accompanying LICENSE file are met.                          |
   8     +--------------------------------------------------------------------+
   9     | Copyright (c) 2004-2014, Michael Wallner <mike@php.net>            |
  10     +--------------------------------------------------------------------+
  11 */
  12
  13 #include "php_http_api.h"
  14 #include "php_variables.h"
  15
  16 PHP_RINIT_FUNCTION(http_env)
  17 {
  18         /* populate form data on non-POST requests */
  19         if (SG(request_info).request_method && strcasecmp(SG(request_info).request_method, "POST") && SG(request_info).content_type && *SG(request_info).content_type) {
  20                 uint ct_len = strlen(SG(request_info).content_type);
  21                 char *ct_str = estrndup(SG(request_info).content_type, ct_len);
  22                 php_http_params_opts_t opts;
  23                 HashTable params;
  24
  25                 php_http_params_opts_default_get(&opts);
  26                 opts.input.str = ct_str;
  27                 opts.input.len = ct_len;
  28
  29                 SG(request_info).content_type_dup = ct_str;
  30
  31                 ZEND_INIT_SYMTABLE(&params);
  32                 if (php_http_params_parse(&params, &opts)) {
  33                         zend_string *key_str;
  34                         zend_ulong key_num;
  35
  36                         if (HASH_KEY_IS_STRING == zend_hash_get_current_key(&params, &key_str, &key_num)) {
  37                                 sapi_post_entry *post_entry = NULL;
  38
  39                                 if ((post_entry = zend_hash_find_ptr(&SG(known_post_content_types), key_str))) {
  40                                         SG(request_info).post_entry = post_entry;
  41
  42                                         if (post_entry->post_reader) {
  43                                                 post_entry->post_reader();
  44                                         }
  45
  46                                         if (sapi_module.default_post_reader) {
  47                                                 sapi_module.default_post_reader();
  48                                         }
  49
  50                                         sapi_handle_post(&PG(http_globals)[TRACK_VARS_POST]);
  51
  52                                         /*
  53                                          * the rfc1867 handler is an awkward buddy
  54                                          * FIXME: this leaks because php_auto_globals_create_files()
  55                                          * as well as the rfc1867_handler call
  56                                          * array_init(&PG(http_globals)[TRACK_VARS_FILES])
  57                                          */
  58                                         Z_TRY_ADDREF(PG(http_globals)[TRACK_VARS_FILES]);
  59                                         zend_hash_str_update(&EG(symbol_table), "_FILES", lenof("_FILES"), &PG(http_globals)[TRACK_VARS_FILES]);
  60                                 }
  61                         }
  62                         zend_hash_destroy(&params);
  63                 }
  64         }
  65
  66         PTR_SET(SG(request_info).content_type_dup, NULL);
  67
  68         return SUCCESS;
  69 }
  70
  71 PHP_RSHUTDOWN_FUNCTION(http_env)
  72 {
  73         if (PHP_HTTP_G->env.request.headers) {
  74                 zend_hash_destroy(PHP_HTTP_G->env.request.headers);
  75                 FREE_HASHTABLE(PHP_HTTP_G->env.request.headers);
  76                 PHP_HTTP_G->env.request.headers = NULL;
  77         }
  78         if (PHP_HTTP_G->env.request.body) {
  79                 php_http_message_body_free(&PHP_HTTP_G->env.request.body);
  80         }
  81
  82         if (PHP_HTTP_G->env.server_var) {
  83                 zval_ptr_dtor(PHP_HTTP_G->env.server_var);
  84                 PHP_HTTP_G->env.server_var = NULL;
  85         }
  86
  87         return SUCCESS;
  88 }
  89
  90 void php_http_env_get_request_headers(HashTable *headers TSRMLS_DC)
  91 {
  92         php_http_arrkey_t key;
  93         zval *hsv, *header;
  94
  95         if (!PHP_HTTP_G->env.request.headers) {
  96                 ALLOC_HASHTABLE(PHP_HTTP_G->env.request.headers);
  97                 ZEND_INIT_SYMTABLE(PHP_HTTP_G->env.request.headers);
  98
  99                 if ((hsv = php_http_env_get_superglobal(ZEND_STRL("_SERVER")))) {
 100                         ZEND_HASH_FOREACH_KEY_VAL(Z_ARRVAL_P(hsv), key.h, key.key, header)
 101                         {
 102                                 if (key.key && key.key->len > 5 && *key.key->val == 'H' && !strncmp(key.key->val, "HTTP_", 5)) {
 103                                         size_t key_len = key.key->len - 5;
 104                                         char *key_str = php_http_pretty_key(estrndup(&key.key->val[5], key_len), key_len, 1, 1);
 105
 106                                         Z_TRY_ADDREF_P(header);
 107                                         zend_symtable_str_update(PHP_HTTP_G->env.request.headers, key_str, key_len, header);
 108
 109                                         efree(key_str);
 110                                 } else if (key.key && key.key->len > 8 && *key.key->val == 'C' && !strncmp(key.key->val, "CONTENT_", 8)) {
 111                                         char *key_str = php_http_pretty_key(estrndup(key.key->val, key.key->len), key.key->len, 1, 1);
 112
 113                                         Z_TRY_ADDREF_P(header);
 114                                         zend_symtable_str_update(PHP_HTTP_G->env.request.headers, key_str, key.key->len, header);
 115
 116                                         efree(key_str);
 117                                 }
 118                         }
 119                         ZEND_HASH_FOREACH_END();
 120                 }
 121         }
 122
 123         if (headers) {
 124                 array_copy(PHP_HTTP_G->env.request.headers, headers);
 125         }
 126 }
 127
 128 char *php_http_env_get_request_header(const char *name_str, size_t name_len, size_t *len, php_http_message_t *request)
 129 {
 130         HashTable *request_headers;
 131         zval *zvalue = NULL;
 132         char *val = NULL, *key = php_http_pretty_key(estrndup(name_str, name_len), name_len, 1, 1);
 133
 134         if (request) {
 135                 request_headers = &request->hdrs;
 136         } else {
 137                 php_http_env_get_request_headers(NULL);
 138                 request_headers = PHP_HTTP_G->env.request.headers;
 139         }
 140
 141         if ((zvalue = zend_symtable_str_find(request_headers, key, name_len))) {
 142                 zend_string *zs = zval_get_string(zvalue);
 143
 144                 val = estrndup(zs->val, zs->len);
 145                 if (len) {
 146                         *len = zs->len;
 147                 }
 148                 zend_string_release(zs);
 149         }
 150
 151         efree(key);
 152
 153         return val;
 154 }
 155
 156 zend_bool php_http_env_got_request_header(const char *name_str, size_t name_len, php_http_message_t *request)
 157 {
 158         HashTable *request_headers;
 159         char *key = php_http_pretty_key(estrndup(name_str, name_len), name_len, 1, 1);
 160         zend_bool got;
 161
 162         if (request) {
 163                 request_headers = &request->hdrs;
 164         } else {
 165                 php_http_env_get_request_headers(NULL);
 166                 request_headers = PHP_HTTP_G->env.request.headers;
 167         }
 168         got = zend_symtable_str_exists(request_headers, key, name_len);
 169         efree(key);
 170
 171         return got;
 172 }
 173
 174 zval *php_http_env_get_superglobal(const char *key, size_t key_len)
 175 {
 176         zval *hsv;
 177         zend_string *key_str = zend_string_init(key, key_len, 0);
 178
 179         zend_is_auto_global(key_str);
 180         hsv = zend_hash_find(&EG(symbol_table), key_str);
 181         zend_string_release(key_str);
 182
 183         if (Z_TYPE_P(hsv) != IS_ARRAY) {
 184                 return NULL;
 185         }
 186
 187         return hsv;
 188 }
 189
 190 zval *php_http_env_get_server_var(const char *key, size_t key_len, zend_bool check)
 191 {
 192         zval *hsv, *var;
 193
 194         /* if available, this is a lot faster than accessing $_SERVER * /
 195         if (sapi_module.getenv) {
 196                 char *env;
 197
 198                 if ((!(env = sapi_module.getenv((char *) key, key_len))) || (check && !*env)) {
 199                         return NULL;
 200                 }
 201                 if (PHP_HTTP_G->env.server_var) {
 202                         zval_ptr_dtor(&PHP_HTTP_G->env.server_var);
 203                 }
 204                 MAKE_STD_ZVAL(PHP_HTTP_G->env.server_var);
 205                 ZVAL_STRING(PHP_HTTP_G->env.server_var, env, 1);
 206                 return PHP_HTTP_G->env.server_var;
 207         }
 208         / * */
 209
 210         if (!(hsv = php_http_env_get_superglobal(ZEND_STRL("_SERVER")))) {
 211                 return NULL;
 212         }
 213         if (!(var = zend_symtable_str_find(Z_ARRVAL_P(hsv), key, key_len))) {
 214                 return NULL;
 215         }
 216         if (check && !((Z_TYPE_P(var) == IS_STRING) && Z_STRVAL_P(var) && Z_STRLEN_P(var))) {
 217                 return NULL;
 218         }
 219         return var;
 220 }
 221
 222 php_http_message_body_t *php_http_env_get_request_body(void)
 223 {
 224         if (!PHP_HTTP_G->env.request.body) {
 225                 php_stream *s = php_stream_temp_new();
 226                 php_stream *input = php_stream_open_wrapper("php://input", "r", 0, NULL);
 227
 228                 /* php://input does not support stat */
 229                 php_stream_copy_to_stream_ex(input, s, -1, NULL);
 230                 php_stream_close(input);
 231
 232                 php_stream_rewind(s);
 233                 PHP_HTTP_G->env.request.body = php_http_message_body_init(NULL, s);
 234         }
 235
 236         return PHP_HTTP_G->env.request.body;
 237 }
 238
 239 const char *php_http_env_get_request_method(php_http_message_t *request)
 240 {
 241         const char *m;
 242
 243         if (PHP_HTTP_MESSAGE_TYPE(REQUEST, request)) {
 244                 m = request->http.info.request.method;
 245         } else {
 246                 m = SG(request_info).request_method;
 247         }
 248
 249         return m ? m : "GET";
 250 }
 251
 252 php_http_range_status_t php_http_env_get_request_ranges(HashTable *ranges, size_t length, php_http_message_t *request)
 253 {
 254         zval zentry;
 255         char *range, *rp, c;
 256         long begin = -1, end = -1, *ptr;
 257
 258         if (!(range = php_http_env_get_request_header(ZEND_STRL("Range"), NULL, request))) {
 259                 return PHP_HTTP_RANGE_NO;
 260         }
 261         if (strncmp(range, "bytes=", lenof("bytes="))) {
 262                 PTR_FREE(range);
 263                 return PHP_HTTP_RANGE_NO;
 264         }
 265
 266         rp  = range + lenof("bytes=");
 267         ptr = &begin;
 268
 269         do {
 270                 switch (c = *(rp++)) {
 271                         case '0':
 272                                 /* allow 000... - shall we? */
 273                                 if (*ptr != -10) {
 274                                         *ptr *= 10;
 275                                 }
 276                                 break;
 277
 278                         case '1': case '2': case '3':
 279                         case '4': case '5': case '6':
 280                         case '7': case '8': case '9':
 281                                 /*
 282                                  * If the value of the pointer is already set (non-negative)
 283                                  * then multiply its value by ten and add the current value,
 284                                  * else initialise the pointers value with the current value
 285                                  * --
 286                                  * This let us recognize empty fields when validating the
 287                                  * ranges, i.e. a "-10" for begin and "12345" for the end
 288                                  * was the following range request: "Range: bytes=0-12345";
 289                                  * While a "-1" for begin and "12345" for the end would
 290                                  * have been: "Range: bytes=-12345".
 291                                  */
 292                                 if (*ptr > 0) {
 293                                         *ptr *= 10;
 294                                         *ptr += c - '0';
 295                                 } else {
 296                                         *ptr = c - '0';
 297                                 }
 298                                 break;
 299
 300                         case '-':
 301                                 ptr = &end;
 302                                 break;
 303
 304                         case ' ':
 305                                 break;
 306
 307                         case 0:
 308                         case ',':
 309
 310                                 if (length) {
 311                                         /* validate ranges */
 312                                         switch (begin) {
 313                                                 /* "0-12345" */
 314                                                 case -10:
 315                                                         switch (end) {
 316                                                                 /* "0-" */
 317                                                                 case -1:
 318                                                                         PTR_FREE(range);
 319                                                                         return PHP_HTTP_RANGE_NO;
 320
 321                                                                 /* "0-0" */
 322                                                                 case -10:
 323                                                                         end = 0;
 324                                                                         break;
 325
 326                                                                 default:
 327                                                                         if (length <= (size_t) end) {
 328                                                                                 end = length - 1;
 329                                                                         }
 330                                                                         break;
 331                                                         }
 332                                                         begin = 0;
 333                                                         break;
 334
 335                                                 /* "-12345" */
 336                                                 case -1:
 337                                                         /* "-", "-0" */
 338                                                         if (end == -1 || end == -10) {
 339                                                                 PTR_FREE(range);
 340                                                                 return PHP_HTTP_RANGE_ERR;
 341                                                         }
 342                                                         begin = length - end;
 343                                                         end = length - 1;
 344                                                         break;
 345
 346                                                 /* "12345-(NNN)" */
 347                                                 default:
 348                                                         if (length <= (size_t) begin) {
 349                                                                 PTR_FREE(range);
 350                                                                 return PHP_HTTP_RANGE_ERR;
 351                                                         }
 352                                                         switch (end) {
 353                                                                 /* "12345-0" */
 354                                                                 case -10:
 355                                                                         PTR_FREE(range);
 356                                                                         return PHP_HTTP_RANGE_ERR;
 357
 358                                                                 /* "12345-" */
 359                                                                 case -1:
 360                                                                         end = length - 1;
 361                                                                         break;
 362
 363                                                                 /* "12345-67890" */
 364                                                                 default:
 365                                                                         if (length <= (size_t) end) {
 366                                                                                 end = length - 1;
 367                                                                         } else if (end <  begin) {
 368                                                                                 PTR_FREE(range);
 369                                                                                 return PHP_HTTP_RANGE_ERR;
 370                                                                         }
 371                                                                         break;
 372                                                         }
 373                                                         break;
 374                                         }
 375                                 }
 376
 377                                 array_init(&zentry);
 378                                 add_index_long(&zentry, 0, begin);
 379                                 add_index_long(&zentry, 1, end);
 380                                 zend_hash_next_index_insert(ranges, &zentry);
 381
 382                                 begin = -1;
 383                                 end = -1;
 384                                 ptr = &begin;
 385
 386                                 break;
 387
 388                         default:
 389                                 PTR_FREE(range);
 390                                 return PHP_HTTP_RANGE_NO;
 391                 }
 392         } while (c != 0);
 393
 394         PTR_FREE(range);
 395         return PHP_HTTP_RANGE_OK;
 396 }
 397
 398 static void grab_headers(void *data, void *arg)
 399 {
 400         php_http_buffer_appendl(PHP_HTTP_BUFFER(arg), ((sapi_header_struct *)data)->header);
 401         php_http_buffer_appends(PHP_HTTP_BUFFER(arg), PHP_HTTP_CRLF);
 402 }
 403
 404 static void grab_header(void *data, void *arg)
 405 {
 406         struct {
 407                 char *name_str;
 408                 size_t name_len;
 409                 char *value_ptr;
 410         } *args = arg;
 411         sapi_header_struct *header = data;
 412
 413         if (    header->header_len > args->name_len
 414         && header->header[args->name_len] == ':'
 415         && !strncmp(header->header, args->name_str, args->name_len)
 416         ) {
 417                 args->value_ptr = &header->header[args->name_len + 1];
 418                 while (PHP_HTTP_IS_CTYPE(space, *args->value_ptr)) {
 419                         ++args->value_ptr;
 420                 }
 421         }
 422 }
 423
 424 ZEND_RESULT_CODE php_http_env_get_response_headers(HashTable *headers_ht)
 425 {
 426         ZEND_RESULT_CODE status;
 427         php_http_buffer_t headers;
 428
 429         php_http_buffer_init(&headers);
 430         zend_llist_apply_with_argument(&SG(sapi_headers).headers, grab_headers, &headers);
 431         php_http_buffer_fix(&headers);
 432
 433         status = php_http_header_parse(headers.data, headers.used, headers_ht, NULL, NULL);
 434         php_http_buffer_dtor(&headers);
 435
 436         return status;
 437 }
 438
 439 char *php_http_env_get_response_header(const char *name_str, size_t name_len)
 440 {
 441         struct {
 442                 char *name_str;
 443                 size_t name_len;
 444                 char *value_ptr;
 445         } args;
 446
 447         args.name_str = php_http_pretty_key(estrndup(name_str, name_len), name_len, 1, 1);
 448         args.name_len = name_len;
 449         args.value_ptr = NULL;
 450         zend_llist_apply_with_argument(&SG(sapi_headers).headers, grab_header, &args);
 451         efree(args.name_str);
 452
 453         return args.value_ptr ? estrdup(args.value_ptr) : NULL;
 454 }
 455
 456 long php_http_env_get_response_code(void)
 457 {
 458         long code = SG(sapi_headers).http_response_code;
 459         return code ? code : 200;
 460 }
 461
 462 ZEND_RESULT_CODE php_http_env_set_response_code(long http_code)
 463 {
 464         return sapi_header_op(SAPI_HEADER_SET_STATUS, (void *) (zend_intptr_t) http_code);
 465 }
 466
 467 ZEND_RESULT_CODE php_http_env_set_response_status_line(long code, php_http_version_t *v)
 468 {
 469         sapi_header_line h = {NULL, 0, 0};
 470         ZEND_RESULT_CODE ret;
 471
 472         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));
 473         ret = sapi_header_op(SAPI_HEADER_REPLACE, (void *) &h);
 474         efree(h.line);
 475
 476         return ret;
 477 }
 478
 479 ZEND_RESULT_CODE php_http_env_set_response_protocol_version(php_http_version_t *v)
 480 {
 481         return php_http_env_set_response_status_line(php_http_env_get_response_code(), v);
 482 }
 483
 484 ZEND_RESULT_CODE php_http_env_set_response_header(long http_code, const char *header_str, size_t header_len, zend_bool replace)
 485 {
 486         sapi_header_line h = {estrndup(header_str, header_len), header_len, http_code};
 487         ZEND_RESULT_CODE ret = sapi_header_op(replace ? SAPI_HEADER_REPLACE : SAPI_HEADER_ADD, (void *) &h);
 488         efree(h.line);
 489         return ret;
 490 }
 491
 492 ZEND_RESULT_CODE php_http_env_set_response_header_va(long http_code, zend_bool replace, const char *fmt, va_list argv)
 493 {
 494         ZEND_RESULT_CODE ret = FAILURE;
 495         sapi_header_line h = {NULL, 0, http_code};
 496
 497         h.line_len = vspprintf(&h.line, 0, fmt, argv);
 498
 499         if (h.line) {
 500                 if (h.line_len) {
 501                         ret = sapi_header_op(replace ? SAPI_HEADER_REPLACE : SAPI_HEADER_ADD, (void *) &h);
 502                 }
 503                 efree(h.line);
 504         }
 505         return ret;
 506 }
 507
 508 ZEND_RESULT_CODE php_http_env_set_response_header_format(long http_code, zend_bool replace, const char *fmt, ...)
 509 {
 510         ZEND_RESULT_CODE ret;
 511         va_list args;
 512
 513         va_start(args, fmt);
 514         ret = php_http_env_set_response_header_va(http_code, replace, fmt, args);
 515         va_end(args);
 516
 517         return ret;
 518 }
 519
 520 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)
 521 {
 522         if (!value) {
 523                 sapi_header_line h = {(char *) name_str, name_len, http_code};
 524
 525                 return sapi_header_op(SAPI_HEADER_DELETE, (void *) &h);
 526         }
 527
 528         if (Z_TYPE_P(value) == IS_ARRAY || Z_TYPE_P(value) == IS_OBJECT) {
 529                 int first = replace;
 530                 zval *data_ptr;
 531                 HashTable *ht = HASH_OF(value);
 532
 533                 ZEND_HASH_FOREACH_VAL_IND(ht, data_ptr)
 534                 {
 535                         if (SUCCESS != php_http_env_set_response_header_value(http_code, name_str, name_len, data_ptr, first)) {
 536                                 return FAILURE;
 537                         }
 538                         first = 0;
 539                 }
 540                 ZEND_HASH_FOREACH_END();
 541
 542                 return SUCCESS;
 543         } else {
 544                 zend_string *data = zval_get_string(value);
 545
 546                 if (!data->len) {
 547                         zend_string_release(data);
 548                         return php_http_env_set_response_header_value(http_code, name_str, name_len, NULL, replace);
 549                 } else {
 550                         sapi_header_line h;
 551                         ZEND_RESULT_CODE ret;
 552
 553                         if (name_len > INT_MAX) {
 554                                 return FAILURE;
 555                         }
 556                         h.response_code = http_code;
 557                         h.line_len = spprintf(&h.line, 0, "%.*s: %.*s", (int) name_len, name_str, data->len, data->val);
 558
 559                         ret = sapi_header_op(replace ? SAPI_HEADER_REPLACE : SAPI_HEADER_ADD, (void *) &h);
 560
 561                         zend_string_release(data);
 562                         PTR_FREE(h.line);
 563
 564                         return ret;
 565                 }
 566         }
 567 }
 568
 569 const char *php_http_env_get_response_status_for_code(unsigned code)
 570 {
 571         switch (code) {
 572 #define PHP_HTTP_RESPONSE_CODE(c, s) case c: return s;
 573 #include "php_http_response_codes.h"
 574 #undef PHP_HTTP_RESPONSE_CODE
 575         default:
 576                 return NULL;
 577         }
 578 }
 579
 580 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_getRequestHeader, 0, 0, 0)
 581         ZEND_ARG_INFO(0, header_name)
 582 ZEND_END_ARG_INFO();
 583 static PHP_METHOD(HttpEnv, getRequestHeader)
 584 {
 585         char *header_name_str = NULL;
 586         size_t header_name_len = 0;
 587
 588         if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS(), "|s!", &header_name_str, &header_name_len)) {
 589                 return;
 590         }
 591         if (header_name_str && header_name_len) {
 592                 size_t header_length;
 593                 char *header_value = php_http_env_get_request_header(header_name_str, header_name_len, &header_length, NULL);
 594
 595                 if (header_value) {
 596                         RETURN_STR(php_http_cs2zs(header_value, header_length));
 597                 }
 598         } else {
 599                 array_init(return_value);
 600                 php_http_env_get_request_headers(Z_ARRVAL_P(return_value));
 601         }
 602 }
 603
 604 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_getRequestBody, 0, 0, 0)
 605         ZEND_ARG_INFO(0, body_class_name)
 606 ZEND_END_ARG_INFO();
 607 static PHP_METHOD(HttpEnv, getRequestBody)
 608 {
 609         php_http_message_body_t *body;
 610         php_http_message_body_object_t *body_obj;
 611         zend_class_entry *class_entry = php_http_message_body_class_entry;
 612
 613         php_http_expect(SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS(), "|C", &class_entry), invalid_arg, return);
 614
 615         body = php_http_env_get_request_body();
 616         if (SUCCESS == php_http_new((void *) &body_obj, class_entry, (php_http_new_t) php_http_message_body_object_new_ex, php_http_message_body_class_entry, body)) {
 617                 php_http_message_body_addref(body);
 618                 RETVAL_OBJ(&body_obj->zo);
 619         }
 620 }
 621
 622 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_getResponseStatusForCode, 0, 0, 1)
 623         ZEND_ARG_INFO(0, code)
 624 ZEND_END_ARG_INFO();
 625 static PHP_METHOD(HttpEnv, getResponseStatusForCode)
 626 {
 627         zend_long code;
 628         const char *status;
 629
 630         if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &code)) {
 631                 return;
 632         }
 633
 634         if ((status = php_http_env_get_response_status_for_code(code))) {
 635                 RETURN_STRING(status);
 636         }
 637 }
 638
 639 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_getResponseStatusForAllCodes, 0, 0, 0)
 640 ZEND_END_ARG_INFO();
 641 static PHP_METHOD(HttpEnv, getResponseStatusForAllCodes)
 642 {
 643         if (SUCCESS != zend_parse_parameters_none()) {
 644                 return;
 645         }
 646
 647         array_init(return_value);
 648 #define PHP_HTTP_RESPONSE_CODE(code, status) add_index_string(return_value, code, status);
 649 #include "php_http_response_codes.h"
 650 #undef PHP_HTTP_RESPONSE_CODE
 651 }
 652
 653 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_getResponseHeader, 0, 0, 0)
 654         ZEND_ARG_INFO(0, header_name)
 655 ZEND_END_ARG_INFO();
 656 static PHP_METHOD(HttpEnv, getResponseHeader)
 657 {
 658         char *header_name_str = NULL;
 659         size_t header_name_len = 0;
 660
 661         if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS(), "|s!", &header_name_str, &header_name_len)) {
 662                 return;
 663         }
 664         if (header_name_str && header_name_len) {
 665                 char *header_value = php_http_env_get_response_header(header_name_str, header_name_len);
 666
 667                 if (header_value) {
 668                         RETURN_STR(php_http_cs2zs(header_value, strlen(header_value)));
 669                 }
 670         } else {
 671                 array_init(return_value);
 672                 php_http_env_get_response_headers(Z_ARRVAL_P(return_value));
 673         }
 674 }
 675
 676 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_getResponseCode, 0, 0, 0)
 677 ZEND_END_ARG_INFO();
 678 static PHP_METHOD(HttpEnv, getResponseCode)
 679 {
 680         if (SUCCESS != zend_parse_parameters_none()) {
 681                 return;
 682         }
 683         RETURN_LONG(php_http_env_get_response_code());
 684 }
 685
 686 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_setResponseHeader, 0, 0, 1)
 687         ZEND_ARG_INFO(0, header_name)
 688         ZEND_ARG_INFO(0, header_value)
 689         ZEND_ARG_INFO(0, response_code)
 690         ZEND_ARG_INFO(0, replace_header)
 691 ZEND_END_ARG_INFO();
 692 static PHP_METHOD(HttpEnv, setResponseHeader)
 693 {
 694         char *header_name_str;
 695         size_t header_name_len;
 696         zval *header_value = NULL;
 697         zend_long code = 0;
 698         zend_bool replace_header = 1;
 699
 700         if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS(), "s|z!lb", &header_name_str, &header_name_len, &header_value, &code, &replace_header)) {
 701                 return;
 702         }
 703         RETURN_BOOL(SUCCESS == php_http_env_set_response_header_value(code, header_name_str, header_name_len, header_value, replace_header));
 704 }
 705
 706 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_setResponseCode, 0, 0, 1)
 707         ZEND_ARG_INFO(0, code)
 708 ZEND_END_ARG_INFO();
 709 static PHP_METHOD(HttpEnv, setResponseCode)
 710 {
 711         zend_long code;
 712
 713         if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS(), "l", &code)) {
 714                 return;
 715         }
 716         RETURN_BOOL(SUCCESS == php_http_env_set_response_code(code));
 717 }
 718
 719 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_negotiateLanguage, 0, 0, 1)
 720         ZEND_ARG_INFO(0, supported)
 721         ZEND_ARG_INFO(1, result_array)
 722 ZEND_END_ARG_INFO();
 723 static PHP_METHOD(HttpEnv, negotiateLanguage)
 724 {
 725         HashTable *supported;
 726         zval *rs_array = NULL;
 727
 728         if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "H|z", &supported, &rs_array)) {
 729                 return;
 730         }
 731         if (rs_array) {
 732                 ZVAL_DEREF(rs_array);
 733                 zval_dtor(rs_array);
 734                 array_init(rs_array);
 735         }
 736
 737         PHP_HTTP_DO_NEGOTIATE(language, supported, rs_array);
 738 }
 739
 740 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_negotiateCharset, 0, 0, 1)
 741         ZEND_ARG_INFO(0, supported)
 742         ZEND_ARG_INFO(1, result_array)
 743 ZEND_END_ARG_INFO();
 744 static PHP_METHOD(HttpEnv, negotiateCharset)
 745 {
 746         HashTable *supported;
 747         zval *rs_array = NULL;
 748
 749         if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS(), "H|z", &supported, &rs_array)) {
 750                 return;
 751         }
 752         if (rs_array) {
 753                 ZVAL_DEREF(rs_array);
 754                 zval_dtor(rs_array);
 755                 array_init(rs_array);
 756         }
 757         PHP_HTTP_DO_NEGOTIATE(charset, supported, rs_array);
 758 }
 759
 760 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_negotiateEncoding, 0, 0, 1)
 761         ZEND_ARG_INFO(0, supported)
 762         ZEND_ARG_INFO(1, result_array)
 763 ZEND_END_ARG_INFO();
 764 static PHP_METHOD(HttpEnv, negotiateEncoding)
 765 {
 766         HashTable *supported;
 767         zval *rs_array = NULL;
 768
 769         if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS(), "H|z", &supported, &rs_array)) {
 770                 return;
 771         }
 772         if (rs_array) {
 773                 ZVAL_DEREF(rs_array);
 774                 zval_dtor(rs_array);
 775                 array_init(rs_array);
 776         }
 777         PHP_HTTP_DO_NEGOTIATE(encoding, supported, rs_array);
 778 }
 779
 780 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_negotiateContentType, 0, 0, 1)
 781         ZEND_ARG_INFO(0, supported)
 782         ZEND_ARG_INFO(1, result_array)
 783 ZEND_END_ARG_INFO();
 784 static PHP_METHOD(HttpEnv, negotiateContentType)
 785 {
 786         HashTable *supported;
 787         zval *rs_array = NULL;
 788
 789         if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS(), "H|z", &supported, &rs_array)) {
 790                 return;
 791         }
 792         if (rs_array) {
 793                 ZVAL_DEREF(rs_array);
 794                 zval_dtor(rs_array);
 795                 array_init(rs_array);
 796         }
 797         PHP_HTTP_DO_NEGOTIATE(content_type, supported, rs_array);
 798 }
 799
 800 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnv_negotiate, 0, 0, 2)
 801         ZEND_ARG_INFO(0, params)
 802         ZEND_ARG_INFO(0, supported)
 803         ZEND_ARG_INFO(0, primary_type_separator)
 804         ZEND_ARG_INFO(1, result_array)
 805 ZEND_END_ARG_INFO();
 806 static PHP_METHOD(HttpEnv, negotiate)
 807 {
 808         HashTable *supported, *rs;
 809         zval *rs_array = NULL;
 810         char *value_str, *sep_str = NULL;
 811         size_t value_len, sep_len = 0;
 812
 813         if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "sH|s!z", &value_str, &value_len, &supported, &sep_str, &sep_len, &rs_array)) {
 814                 return;
 815         }
 816
 817         if (rs_array) {
 818                 ZVAL_DEREF(rs_array);
 819                 zval_dtor(rs_array);
 820                 array_init(rs_array);
 821         }
 822
 823         if ((rs = php_http_negotiate(value_str, value_len, supported, sep_str, sep_len))) {
 824                 PHP_HTTP_DO_NEGOTIATE_HANDLE_RESULT(rs, supported, rs_array);
 825         } else {
 826                 PHP_HTTP_DO_NEGOTIATE_HANDLE_DEFAULT(supported, rs_array);
 827         }
 828 }
 829
 830 static zend_function_entry php_http_env_methods[] = {
 831         PHP_ME(HttpEnv, getRequestHeader,              ai_HttpEnv_getRequestHeader,              ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
 832         PHP_ME(HttpEnv, getRequestBody,                ai_HttpEnv_getRequestBody,                ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
 833
 834         PHP_ME(HttpEnv, getResponseStatusForCode,      ai_HttpEnv_getResponseStatusForCode,      ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
 835         PHP_ME(HttpEnv, getResponseStatusForAllCodes,  ai_HttpEnv_getResponseStatusForAllCodes,  ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
 836
 837         PHP_ME(HttpEnv, getResponseHeader,             ai_HttpEnv_getResponseHeader,             ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
 838         PHP_ME(HttpEnv, getResponseCode,               ai_HttpEnv_getResponseCode,               ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
 839         PHP_ME(HttpEnv, setResponseHeader,             ai_HttpEnv_setResponseHeader,             ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
 840         PHP_ME(HttpEnv, setResponseCode,               ai_HttpEnv_setResponseCode,               ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
 841
 842         PHP_ME(HttpEnv, negotiateLanguage,             ai_HttpEnv_negotiateLanguage,             ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
 843         PHP_ME(HttpEnv, negotiateContentType,          ai_HttpEnv_negotiateContentType,          ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
 844         PHP_ME(HttpEnv, negotiateEncoding,             ai_HttpEnv_negotiateEncoding,             ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
 845         PHP_ME(HttpEnv, negotiateCharset,              ai_HttpEnv_negotiateCharset,              ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
 846         PHP_ME(HttpEnv, negotiate,                     ai_HttpEnv_negotiate,                     ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
 847
 848         EMPTY_FUNCTION_ENTRY
 849 };
 850
 851 #ifdef PHP_HTTP_HAVE_JSON
 852 #include "ext/json/php_json.h"
 853
 854 static SAPI_POST_HANDLER_FUNC(php_http_json_post_handler)
 855 {
 856         zval *zarg = arg;
 857         zend_string *json = NULL;
 858
 859         if (SG(request_info).request_body) {
 860                 /* FG(stream_wrappers) not initialized yet, so we cannot use php://input */
 861                 php_stream_rewind(SG(request_info).request_body);
 862                 json = php_stream_copy_to_mem(SG(request_info).request_body, PHP_STREAM_COPY_ALL, 0);
 863         }
 864
 865         if (json) {
 866                 if (json->len) {
 867                         zval tmp;
 868
 869                         ZVAL_NULL(&tmp);
 870                         php_json_decode(&tmp, json->val, json->len, 1, PG(max_input_nesting_level));
 871
 872                         if (Z_TYPE(tmp) == IS_ARRAY) {
 873                                 array_copy(Z_ARRVAL(tmp), Z_ARRVAL_P(zarg));
 874                         }
 875                         zval_ptr_dtor(&tmp);
 876                 }
 877                 zend_string_release(json);
 878         }
 879 }
 880
 881 static void php_http_env_register_json_handler(void)
 882 {
 883         sapi_post_entry entry = {NULL, 0, NULL, NULL};
 884
 885         entry.post_reader = sapi_read_standard_form_data;
 886         entry.post_handler = php_http_json_post_handler;
 887
 888         entry.content_type = "text/json";
 889         entry.content_type_len = lenof("text/json");
 890         sapi_register_post_entry(&entry);
 891
 892         entry.content_type = "application/json";
 893         entry.content_type_len = lenof("application/json");
 894         sapi_register_post_entry(&entry);
 895 }
 896 #endif
 897
 898 zend_class_entry *php_http_env_class_entry;
 899
 900 PHP_MINIT_FUNCTION(http_env)
 901 {
 902         zend_class_entry ce = {0};
 903
 904         INIT_NS_CLASS_ENTRY(ce, "http", "Env", php_http_env_methods);
 905         php_http_env_class_entry = zend_register_internal_class(&ce);
 906
 907 #ifdef PHP_HTTP_HAVE_JSON
 908         php_http_env_register_json_handler();
 909 #endif
 910
 911         return SUCCESS;
 912 }
 913
 914
 915 /*
 916  * Local variables:
 917  * tab-width: 4
 918  * c-basic-offset: 4
 919  * End:
 920  * vim600: noet sw=4 ts=4 fdm=marker
 921  * vim<600: noet sw=4 ts=4
 922  */