git.m6w6.name Git - m6w6/ext-http/blob - php_http_headers.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-2011, Michael Wallner <mike@php.net>            |
  10     +--------------------------------------------------------------------+
  11 */
  12
  13 #include "php_http_api.h"
  14
  15 PHP_HTTP_API STATUS php_http_headers_parse(const char *header, size_t length, HashTable *headers, php_http_info_callback_t callback_func, void **callback_data TSRMLS_DC)
  16 {
  17         php_http_header_parser_t ctx;
  18         php_http_buffer_t buf;
  19
  20         php_http_buffer_from_string_ex(&buf, header, length);
  21         php_http_header_parser_init(&ctx TSRMLS_CC);
  22         php_http_header_parser_parse(&ctx, &buf, PHP_HTTP_HEADER_PARSER_CLEANUP, headers, callback_func, callback_data);
  23         php_http_header_parser_dtor(&ctx);
  24         php_http_buffer_dtor(&buf);
  25         /* FIXME */
  26         return SUCCESS;
  27 }
  28
  29 #define PHP_HTTP_BEGIN_ARGS(method, req_args)   PHP_HTTP_BEGIN_ARGS_EX(HttpHeader, method, 0, req_args)
  30 #define PHP_HTTP_EMPTY_ARGS(method)                             PHP_HTTP_EMPTY_ARGS_EX(HttpHeader, method, 0)
  31 #define PHP_HTTP_HEADER_ME(method, v)                   PHP_ME(HttpHeader, method, PHP_HTTP_ARGS(HttpHeader, method), v)
  32
  33 PHP_HTTP_BEGIN_ARGS(__construct, 0)
  34         PHP_HTTP_ARG_VAL(name, 0)
  35         PHP_HTTP_ARG_VAL(value, 0)
  36 PHP_HTTP_END_ARGS;
  37
  38 PHP_HTTP_EMPTY_ARGS(serialize);
  39 PHP_HTTP_BEGIN_ARGS(unserialize, 1)
  40         PHP_HTTP_ARG_VAL(serialized, 0)
  41 PHP_HTTP_END_ARGS;
  42
  43 PHP_HTTP_BEGIN_ARGS(match, 1)
  44         PHP_HTTP_ARG_VAL(value, 0)
  45         PHP_HTTP_ARG_VAL(flags, 0)
  46 PHP_HTTP_END_ARGS;
  47
  48 PHP_HTTP_BEGIN_ARGS(negotiate, 1)
  49         PHP_HTTP_ARG_VAL(supported, 0)
  50         PHP_HTTP_ARG_VAL(result, 1)
  51 PHP_HTTP_END_ARGS;
  52
  53 PHP_HTTP_BEGIN_ARGS(parse, 1)
  54         PHP_HTTP_ARG_VAL(string, 0)
  55         PHP_HTTP_ARG_VAL(flags, 0)
  56 PHP_HTTP_END_ARGS;
  57
  58 static zend_class_entry *php_http_header_class_entry;
  59
  60 zend_class_entry *php_http_header_get_class_entry(void)
  61 {
  62         return php_http_header_class_entry;
  63 }
  64
  65 static zend_function_entry php_http_header_method_entry[] = {
  66         PHP_HTTP_HEADER_ME(__construct, ZEND_ACC_PUBLIC|ZEND_ACC_CTOR)
  67         PHP_HTTP_HEADER_ME(serialize, ZEND_ACC_PUBLIC)
  68         ZEND_MALIAS(HttpHeader, __toString, serialize, PHP_HTTP_ARGS(HttpHeader, serialize), ZEND_ACC_PUBLIC)
  69         ZEND_MALIAS(HttpHeader, toString, serialize, PHP_HTTP_ARGS(HttpHeader, serialize), ZEND_ACC_PUBLIC)
  70         PHP_HTTP_HEADER_ME(unserialize, ZEND_ACC_PUBLIC)
  71         PHP_HTTP_HEADER_ME(match, ZEND_ACC_PUBLIC)
  72         PHP_HTTP_HEADER_ME(negotiate, ZEND_ACC_PUBLIC)
  73         PHP_HTTP_HEADER_ME(parse, ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
  74         EMPTY_FUNCTION_ENTRY
  75 };
  76
  77 PHP_METHOD(HttpHeader, __construct)
  78 {
  79         char *name_str = NULL, *value_str = NULL;
  80         int name_len = 0, value_len = 0;
  81
  82         with_error_handling(EH_THROW, php_http_exception_get_class_entry()) {
  83                 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s!s!", &name_str, &name_len, &value_str, &value_len)) {
  84                         if (name_str && name_len) {
  85                                 char *pretty_str = estrndup(name_str, name_len);
  86                                 zend_update_property_stringl(php_http_header_class_entry, getThis(), ZEND_STRL("name"), php_http_pretty_key(pretty_str, name_len, 1, 1), name_len TSRMLS_CC);
  87                                 efree(pretty_str);
  88                         }
  89                         if (value_str && value_len) {
  90                                 zend_update_property_stringl(php_http_header_class_entry, getThis(), ZEND_STRL("value"), value_str, value_len TSRMLS_CC);
  91                         }
  92                 }
  93         } end_error_handling();
  94 }
  95
  96 PHP_METHOD(HttpHeader, serialize)
  97 {
  98         php_http_buffer_t buf;
  99         zval *zname, *zvalue;
 100
 101         php_http_buffer_init(&buf);
 102         zname = php_http_ztyp(IS_STRING, zend_read_property(php_http_header_class_entry, getThis(), ZEND_STRL("name"), 0 TSRMLS_CC));
 103         php_http_buffer_append(&buf, Z_STRVAL_P(zname), Z_STRLEN_P(zname));
 104         zval_ptr_dtor(&zname);
 105         zvalue = php_http_ztyp(IS_STRING, zend_read_property(php_http_header_class_entry, getThis(), ZEND_STRL("value"), 0 TSRMLS_CC));
 106         if (Z_STRLEN_P(zvalue)) {
 107                 php_http_buffer_appends(&buf, ": ");
 108                 php_http_buffer_append(&buf, Z_STRVAL_P(zvalue), Z_STRLEN_P(zvalue));
 109         } else {
 110                 php_http_buffer_appends(&buf, ":");
 111         }
 112         zval_ptr_dtor(&zvalue);
 113
 114         RETURN_PHP_HTTP_BUFFER_VAL(&buf);
 115 }
 116
 117 PHP_METHOD(HttpHeader, unserialize)
 118 {
 119         char *serialized_str;
 120         int serialized_len;
 121
 122         if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &serialized_str, &serialized_len)) {
 123                 HashTable ht;
 124
 125                 zend_hash_init(&ht, 1, NULL, ZVAL_PTR_DTOR, 0);
 126                 if (SUCCESS == php_http_headers_parse(serialized_str, serialized_len, &ht, NULL, NULL TSRMLS_CC)) {
 127                         if (zend_hash_num_elements(&ht)) {
 128                                 zval **val, *cpy;
 129                                 char *str;
 130                                 uint len;
 131                                 ulong idx;
 132
 133                                 zend_hash_internal_pointer_reset(&ht);
 134                                 switch (zend_hash_get_current_key_ex(&ht, &str, &len, &idx, 0, NULL)) {
 135                                         case HASH_KEY_IS_STRING:
 136                                                 zend_update_property_stringl(php_http_header_class_entry, getThis(), ZEND_STRL("name"), str, len - 1 TSRMLS_CC);
 137                                                 break;
 138                                         case HASH_KEY_IS_LONG:
 139                                                 zend_update_property_long(php_http_header_class_entry, getThis(), ZEND_STRL("name"), idx TSRMLS_CC);
 140                                                 break;
 141                                         default:
 142                                                 break;
 143                                 }
 144                                 zend_hash_get_current_data(&ht, (void *) &val);
 145                                 cpy = php_http_zsep(1, IS_STRING, *val);
 146                                 zend_update_property(php_http_header_class_entry, getThis(), ZEND_STRL("value"), cpy TSRMLS_CC);
 147                                 zval_ptr_dtor(&cpy);
 148                         }
 149                 }
 150                 zend_hash_destroy(&ht);
 151         }
 152
 153 }
 154
 155 PHP_METHOD(HttpHeader, match)
 156 {
 157         char *val_str;
 158         int val_len;
 159         long flags = 0;
 160         zval *zvalue;
 161
 162         if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|sl", &val_str, &val_len, &flags)) {
 163                 RETURN_NULL();
 164         }
 165
 166         zvalue = php_http_ztyp(IS_STRING, zend_read_property(php_http_header_class_entry, getThis(), ZEND_STRL("value"), 0 TSRMLS_CC));
 167         RETVAL_BOOL(php_http_match(Z_STRVAL_P(zvalue), val_str, flags));
 168         zval_ptr_dtor(&zvalue);
 169 }
 170
 171 PHP_METHOD(HttpHeader, negotiate)
 172 {
 173         HashTable *supported, *rs;
 174         zval *zname, *zvalue, *rs_array = NULL;
 175         char *sep_str = NULL;
 176         size_t sep_len = 0;
 177
 178         if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "H|z", &supported, &rs_array)) {
 179                 if (rs_array) {
 180                         zval_dtor(rs_array);
 181                         array_init(rs_array);
 182                 }
 183
 184                 zname = php_http_ztyp(IS_STRING, zend_read_property(php_http_header_class_entry, getThis(), ZEND_STRL("name"), 0 TSRMLS_CC));
 185                 if (!strcasecmp(Z_STRVAL_P(zname), "Accept")) {
 186                         sep_str = "/";
 187                         sep_len = 1;
 188                 } else if (!strcasecmp(Z_STRVAL_P(zname), "Accept-Language")) {
 189                         sep_str = "-";
 190                         sep_len = 1;
 191                 }
 192                 zval_ptr_dtor(&zname);
 193
 194                 zvalue = php_http_ztyp(IS_STRING, zend_read_property(php_http_header_class_entry, getThis(), ZEND_STRL("value"), 0 TSRMLS_CC));
 195                 if ((rs = php_http_negotiate(Z_STRVAL_P(zvalue), Z_STRLEN_P(zvalue), supported, sep_str, sep_len TSRMLS_CC))) {
 196                         PHP_HTTP_DO_NEGOTIATE_HANDLE_RESULT(rs, supported, rs_array);
 197                 } else {
 198                         PHP_HTTP_DO_NEGOTIATE_HANDLE_DEFAULT(supported, rs_array);
 199                 }
 200                 zval_ptr_dtor(&zvalue);
 201         } else {
 202                 RETURN_FALSE;
 203         }
 204 }
 205
 206 PHP_METHOD(HttpHeader, parse)
 207 {
 208         char *header_str;
 209         int header_len;
 210         zend_class_entry *ce = NULL;
 211
 212         if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|C", &header_str, &header_len, &ce)) {
 213                 php_http_header_parser_t *parser = php_http_header_parser_init(NULL TSRMLS_CC);
 214                 php_http_buffer_t *buf = php_http_buffer_from_string(header_str, header_len);
 215
 216                 if (parser && buf) {
 217                         php_http_header_parser_state_t rs;
 218
 219                         array_init(return_value);
 220
 221                         rs = php_http_header_parser_parse(parser, buf,
 222                                         PHP_HTTP_HEADER_PARSER_CLEANUP, Z_ARRVAL_P(return_value), NULL, NULL);
 223
 224                         if (rs == PHP_HTTP_HEADER_PARSER_STATE_FAILURE) {
 225                                 php_http_error(HE_WARNING, PHP_HTTP_E_MALFORMED_HEADERS, "Could not parse headers");
 226                                 zval_dtor(return_value);
 227                                 RETVAL_NULL();
 228                         } else {
 229                                 if (ce && instanceof_function(ce, php_http_header_class_entry TSRMLS_CC)) {
 230                                         HashPosition pos;
 231                                         php_http_array_hashkey_t key = php_http_array_hashkey_init(0);
 232                                         zval **val;
 233
 234                                         FOREACH_KEYVAL(pos, return_value, key, val) {
 235                                                 zval *zho, *zkey, *zvalue;
 236
 237                                                 Z_ADDREF_PP(val);
 238                                                 zvalue = *val;
 239
 240                                                 MAKE_STD_ZVAL(zkey);
 241                                                 if (key.type == HASH_KEY_IS_LONG) {
 242                                                         ZVAL_LONG(zkey, key.num);
 243                                                 } else {
 244                                                         ZVAL_STRINGL(zkey, key.str, key.len - 1, 1);
 245                                                 }
 246
 247                                                 MAKE_STD_ZVAL(zho);
 248                                                 object_init_ex(zho, ce);
 249                                                 zend_call_method_with_2_params(&zho, ce, NULL, "__construct", NULL, zkey, zvalue);
 250
 251                                                 if (key.type == HASH_KEY_IS_LONG) {
 252                                                         zend_hash_index_update(Z_ARRVAL_P(return_value), key.num, (void *) &zho, sizeof(zval *), NULL);
 253                                                 } else {
 254                                                         zend_hash_update(Z_ARRVAL_P(return_value), key.str, key.len, (void *) &zho, sizeof(zval *), NULL);
 255                                                 }
 256
 257                                                 zval_ptr_dtor(&zvalue);
 258                                                 zval_ptr_dtor(&zkey);
 259                                         }
 260                                 }
 261                         }
 262                 }
 263
 264                 if (parser) {
 265                         php_http_header_parser_free(&parser);
 266                 }
 267                 if (buf) {
 268                         php_http_buffer_free(&buf);
 269                 }
 270         }
 271 }
 272
 273 PHP_MINIT_FUNCTION(http_header)
 274 {
 275         PHP_HTTP_REGISTER_CLASS(http, Header, http_header, php_http_object_get_class_entry(), 0);
 276         zend_class_implements(php_http_header_class_entry TSRMLS_CC, 1, zend_ce_serializable);
 277         zend_declare_class_constant_long(php_http_header_class_entry, ZEND_STRL("MATCH_LOOSE"), PHP_HTTP_MATCH_LOOSE TSRMLS_CC);
 278         zend_declare_class_constant_long(php_http_header_class_entry, ZEND_STRL("MATCH_CASE"), PHP_HTTP_MATCH_CASE TSRMLS_CC);
 279         zend_declare_class_constant_long(php_http_header_class_entry, ZEND_STRL("MATCH_WORD"), PHP_HTTP_MATCH_WORD TSRMLS_CC);
 280         zend_declare_class_constant_long(php_http_header_class_entry, ZEND_STRL("MATCH_FULL"), PHP_HTTP_MATCH_FULL TSRMLS_CC);
 281         zend_declare_class_constant_long(php_http_header_class_entry, ZEND_STRL("MATCH_STRICT"), PHP_HTTP_MATCH_STRICT TSRMLS_CC);
 282         zend_declare_property_null(php_http_header_class_entry, ZEND_STRL("name"), ZEND_ACC_PUBLIC TSRMLS_CC);
 283         zend_declare_property_null(php_http_header_class_entry, ZEND_STRL("value"), ZEND_ACC_PUBLIC TSRMLS_CC);
 284
 285         return SUCCESS;
 286 }
 287
 288 /*
 289  * Local variables:
 290  * tab-width: 4
 291  * c-basic-offset: 4
 292  * End:
 293  * vim600: noet sw=4 ts=4 fdm=marker
 294  * vim<600: noet sw=4 ts=4
 295  */
 296