git.m6w6.name Git - m6w6/ext-http/blob - php_http_env_request.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
  16 #undef PHP_HTTP_BEGIN_ARGS
  17 #undef PHP_HTTP_EMPTY_ARGS
  18 #define PHP_HTTP_BEGIN_ARGS(method, req_args)           PHP_HTTP_BEGIN_ARGS_EX(HttpEnvRequest, method, 0, req_args)
  19 #define PHP_HTTP_EMPTY_ARGS(method)                                     PHP_HTTP_EMPTY_ARGS_EX(HttpEnvRequest, method, 0)
  20 #define PHP_HTTP_ENV_REQUEST_ME(method, visibility)     PHP_ME(HttpEnvRequest, method, PHP_HTTP_ARGS(HttpEnvRequest, method), visibility)
  21
  22 PHP_HTTP_EMPTY_ARGS(__construct);
  23
  24 PHP_HTTP_BEGIN_ARGS(getQuery, 0)
  25         PHP_HTTP_ARG_VAL(name, 0)
  26         PHP_HTTP_ARG_VAL(type, 0)
  27         PHP_HTTP_ARG_VAL(defval, 0)
  28         PHP_HTTP_ARG_VAL(delete, 0)
  29 PHP_HTTP_END_ARGS;
  30
  31 PHP_HTTP_BEGIN_ARGS(getForm, 0)
  32         PHP_HTTP_ARG_VAL(name, 0)
  33         PHP_HTTP_ARG_VAL(type, 0)
  34         PHP_HTTP_ARG_VAL(defval, 0)
  35         PHP_HTTP_ARG_VAL(delete, 0)
  36 PHP_HTTP_END_ARGS;
  37
  38 PHP_HTTP_EMPTY_ARGS(getFiles);
  39
  40 static zend_class_entry *php_http_env_request_class_entry;
  41
  42 zend_class_entry *php_http_env_request_get_class_entry(void)
  43 {
  44         return php_http_env_request_class_entry;
  45 }
  46
  47 zend_function_entry php_http_env_request_method_entry[] = {
  48         PHP_HTTP_ENV_REQUEST_ME(__construct, ZEND_ACC_PUBLIC|ZEND_ACC_CTOR)
  49         PHP_HTTP_ENV_REQUEST_ME(getForm, ZEND_ACC_PUBLIC)
  50         PHP_HTTP_ENV_REQUEST_ME(getQuery, ZEND_ACC_PUBLIC)
  51         PHP_HTTP_ENV_REQUEST_ME(getFiles, ZEND_ACC_PUBLIC)
  52
  53         EMPTY_FUNCTION_ENTRY
  54 };
  55
  56 static int grab_file(void *zpp TSRMLS_DC, int argc, va_list argv, zend_hash_key *key)
  57 {
  58         zval *zfiles, **name, **zname, **error, **zerror, **type, **ztype, **size, **zsize, **tmp_name = zpp;
  59         zend_hash_key *file_key;
  60
  61         zfiles = (zval *) va_arg(argv, zval *);
  62         file_key = (zend_hash_key *) va_arg(argv, zend_hash_key *);
  63         name = (zval **) va_arg(argv, zval **);
  64         size = (zval **) va_arg(argv, zval **);
  65         type = (zval **) va_arg(argv, zval **);
  66         error = (zval **) va_arg(argv, zval **);
  67
  68         if (SUCCESS == zend_hash_index_find(Z_ARRVAL_PP(name), key->h, (void *) &zname)
  69         &&      SUCCESS == zend_hash_index_find(Z_ARRVAL_PP(size), key->h, (void *) &zsize)
  70         &&      SUCCESS == zend_hash_index_find(Z_ARRVAL_PP(type), key->h, (void *) &ztype)
  71         &&      SUCCESS == zend_hash_index_find(Z_ARRVAL_PP(error), key->h, (void *) &zerror)
  72         ) {
  73                 zval *entry, **array;
  74
  75                 MAKE_STD_ZVAL(entry);
  76                 array_init(entry);
  77
  78                 Z_ADDREF_PP(tmp_name);
  79                 add_assoc_zval_ex(entry, ZEND_STRS("file"), *tmp_name);
  80                 Z_ADDREF_PP(zname);
  81                 add_assoc_zval_ex(entry, ZEND_STRS("name"), *zname);
  82                 Z_ADDREF_PP(zsize);
  83                 add_assoc_zval_ex(entry, ZEND_STRS("size"), *zsize);
  84                 Z_ADDREF_PP(ztype);
  85                 add_assoc_zval_ex(entry, ZEND_STRS("type"), *ztype);
  86                 Z_ADDREF_PP(zerror);
  87                 add_assoc_zval_ex(entry, ZEND_STRS("error"), *zerror);
  88
  89                 if (SUCCESS == zend_hash_quick_find(Z_ARRVAL_P(zfiles), file_key->arKey, file_key->nKeyLength, file_key->h, (void *) &array)) {
  90                         add_next_index_zval(*array, entry);
  91                 } else {
  92                         zval *tmp;
  93
  94                         MAKE_STD_ZVAL(tmp);
  95                         array_init(tmp);
  96                         add_next_index_zval(tmp, entry);
  97                         zend_hash_quick_update(Z_ARRVAL_P(zfiles), file_key->arKey, file_key->nKeyLength, file_key->h, (void *) &tmp, sizeof(zval *), NULL);
  98                 }
  99         }
 100
 101         return ZEND_HASH_APPLY_KEEP;
 102 }
 103
 104 static int grab_files(void *zpp TSRMLS_DC, int argc, va_list argv, zend_hash_key *key)
 105 {
 106         zval *zfiles, **name, **tmp_name, **error, **type, **size, **val = zpp;
 107
 108         zfiles = (zval *) va_arg(argv, zval *);
 109
 110         if (Z_TYPE_PP(val) == IS_ARRAY
 111         &&      SUCCESS == zend_hash_find(Z_ARRVAL_PP(val), ZEND_STRS("tmp_name"), (void *) &tmp_name)
 112         &&      SUCCESS == zend_hash_find(Z_ARRVAL_PP(val), ZEND_STRS("name"), (void *) &name)
 113         &&      SUCCESS == zend_hash_find(Z_ARRVAL_PP(val), ZEND_STRS("size"), (void *) &size)
 114         &&      SUCCESS == zend_hash_find(Z_ARRVAL_PP(val), ZEND_STRS("type"), (void *) &type)
 115         &&      SUCCESS == zend_hash_find(Z_ARRVAL_PP(val), ZEND_STRS("error"), (void *) &error)
 116         ) {
 117                 int count;
 118
 119                 if (Z_TYPE_PP(tmp_name) == IS_ARRAY && (count = zend_hash_num_elements(Z_ARRVAL_PP(tmp_name))) > 1) {
 120                         if (count == zend_hash_num_elements(Z_ARRVAL_PP(name))
 121                         &&      count == zend_hash_num_elements(Z_ARRVAL_PP(size))
 122                         &&      count == zend_hash_num_elements(Z_ARRVAL_PP(type))
 123                         &&      count == zend_hash_num_elements(Z_ARRVAL_PP(error))
 124                         ) {
 125                                 zend_hash_apply_with_arguments(Z_ARRVAL_PP(tmp_name) TSRMLS_CC, grab_file, 6, zfiles, key, name, size, type, error);
 126                         } else {
 127                                 /* wat?! */
 128                                 return ZEND_HASH_APPLY_STOP;
 129                         }
 130                 } else  {
 131                         zval *cpy, **tmp;
 132
 133                         MAKE_STD_ZVAL(cpy);
 134                         MAKE_COPY_ZVAL(val, cpy);
 135                         if (SUCCESS == zend_hash_find(Z_ARRVAL_P(cpy), ZEND_STRS("tmp_name"), (void *) &tmp)) {
 136                                 Z_ADDREF_PP(tmp);
 137                                 add_assoc_zval_ex(cpy, ZEND_STRS("file"), *tmp);
 138                                 zend_hash_del_key_or_index(Z_ARRVAL_P(cpy), ZEND_STRS("tmp_name"), 0, HASH_DEL_KEY);
 139                         }
 140                         zend_hash_quick_update(Z_ARRVAL_P(zfiles), key->arKey, key->nKeyLength, key->h, (void *) &cpy, sizeof(zval *), NULL);
 141                 }
 142         }
 143
 144         return ZEND_HASH_APPLY_KEEP;
 145 }
 146
 147 PHP_METHOD(HttpEnvRequest, __construct)
 148 {
 149         with_error_handling(EH_THROW, php_http_exception_get_class_entry()) {
 150                 if (SUCCESS == zend_parse_parameters_none()) {
 151                         php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
 152                         zval *zsg, *zqs;
 153
 154                         obj->message = php_http_message_init_env(obj->message, PHP_HTTP_REQUEST TSRMLS_CC);
 155                         obj->body.handle = 0;
 156
 157                         zsg = php_http_env_get_superglobal(ZEND_STRL("_GET") TSRMLS_CC);
 158                         MAKE_STD_ZVAL(zqs);
 159                         object_init_ex(zqs, php_http_querystring_get_class_entry());
 160                         if (SUCCESS == php_http_querystring_ctor(zqs, zsg TSRMLS_CC)) {
 161                                 zend_update_property(php_http_env_request_class_entry, getThis(), ZEND_STRL("query"), zqs TSRMLS_CC);
 162                         }
 163                         zval_ptr_dtor(&zqs);
 164
 165                         zsg = php_http_env_get_superglobal(ZEND_STRL("_POST") TSRMLS_CC);
 166                         MAKE_STD_ZVAL(zqs);
 167                         object_init_ex(zqs, php_http_querystring_get_class_entry());
 168                         if (SUCCESS == php_http_querystring_ctor(zqs, zsg TSRMLS_CC)) {
 169                                 zend_update_property(php_http_env_request_class_entry, getThis(), ZEND_STRL("form"), zqs TSRMLS_CC);
 170                         }
 171                         zval_ptr_dtor(&zqs);
 172
 173                         MAKE_STD_ZVAL(zqs);
 174                         array_init(zqs);
 175                         if ((zsg = php_http_env_get_superglobal(ZEND_STRL("_FILES") TSRMLS_CC))) {
 176                                 zend_hash_apply_with_arguments(Z_ARRVAL_P(zsg) TSRMLS_CC, grab_files, 1, zqs);
 177                         }
 178
 179                         zend_update_property(php_http_env_request_class_entry, getThis(), ZEND_STRL("files"), zqs TSRMLS_CC);
 180                         zval_ptr_dtor(&zqs);
 181                 }
 182         } end_error_handling();
 183 }
 184
 185 #define call_querystring_get(prop) \
 186         do {\
 187                 zend_fcall_info fci; \
 188                 zend_fcall_info_cache fcc; \
 189                 zval *rv, mn, ***args = ecalloc(sizeof(zval **), ZEND_NUM_ARGS()); \
 190                 zval *qs = zend_read_property(Z_OBJCE_P(getThis()), getThis(), ZEND_STRL(prop), 0 TSRMLS_CC); \
 191                  \
 192                 INIT_PZVAL(&mn); \
 193                 array_init(&mn); \
 194                 Z_ADDREF_P(qs); \
 195                 add_next_index_zval(&mn, qs); \
 196                 add_next_index_stringl(&mn, ZEND_STRL("get"), 1); \
 197                 zend_fcall_info_init(&mn, 0, &fci, &fcc, NULL, NULL TSRMLS_CC); \
 198                 zend_get_parameters_array_ex(ZEND_NUM_ARGS(), args); \
 199                 zend_fcall_info_argp(&fci TSRMLS_CC, ZEND_NUM_ARGS(), args); \
 200                 zend_fcall_info_call(&fci, &fcc, &rv, NULL TSRMLS_CC); \
 201                 zend_fcall_info_args_clear(&fci, 1); \
 202                 efree(args); \
 203                 zval_dtor(&mn); \
 204                 RETVAL_ZVAL(rv, 0, 1); \
 205         } while(0);
 206
 207 PHP_METHOD(HttpEnvRequest, getForm)
 208 {
 209         if (ZEND_NUM_ARGS()) {
 210                 call_querystring_get("form");
 211         } else {
 212                 RETURN_PROP(php_http_env_request_class_entry, "form");
 213         }
 214 }
 215
 216 PHP_METHOD(HttpEnvRequest, getQuery)
 217 {
 218         if (ZEND_NUM_ARGS()) {
 219                 call_querystring_get("query");
 220         } else {
 221                 RETURN_PROP(php_http_env_request_class_entry, "query");
 222         }
 223 }
 224
 225 PHP_METHOD(HttpEnvRequest, getFiles)
 226 {
 227         if (SUCCESS == zend_parse_parameters_none()) {
 228                 RETURN_PROP(php_http_env_request_class_entry, "files");
 229         }
 230 }
 231
 232
 233 PHP_MINIT_FUNCTION(http_env_request)
 234 {
 235         PHP_HTTP_REGISTER_CLASS(http\\Env, Request, http_env_request, php_http_message_get_class_entry(), 0);
 236         zend_declare_property_null(php_http_env_request_class_entry, ZEND_STRL("query"), ZEND_ACC_PROTECTED TSRMLS_CC);
 237         zend_declare_property_null(php_http_env_request_class_entry, ZEND_STRL("form"), ZEND_ACC_PROTECTED TSRMLS_CC);
 238         zend_declare_property_null(php_http_env_request_class_entry, ZEND_STRL("files"), ZEND_ACC_PROTECTED TSRMLS_CC);
 239
 240         return SUCCESS;
 241 }
 242
 243
 244 /*
 245  * Local variables:
 246  * tab-width: 4
 247  * c-basic-offset: 4
 248  * End:
 249  * vim600: noet sw=4 ts=4 fdm=marker
 250  * vim<600: noet sw=4 ts=4
 251  */