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