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;
  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                 zend_hash_quick_update(Z_ARRVAL_P(zfiles), file_key->arKey, file_key->nKeyLength, file_key->h, (void *) &entry, sizeof(zval *), NULL);
  90         }
  91
  92         return ZEND_HASH_APPLY_KEEP;
  93 }
  94
  95 static int grab_files(void *zpp TSRMLS_DC, int argc, va_list argv, zend_hash_key *key)
  96 {
  97         zval *zfiles, **name, **tmp_name, **error, **type, **size, **val = zpp;
  98
  99         zfiles = (zval *) va_arg(argv, zval *);
 100
 101         if (Z_TYPE_PP(val) == IS_ARRAY
 102         &&      SUCCESS == zend_hash_find(Z_ARRVAL_PP(val), ZEND_STRS("tmp_name"), (void *) &tmp_name)
 103         &&      SUCCESS == zend_hash_find(Z_ARRVAL_PP(val), ZEND_STRS("name"), (void *) &name)
 104         &&      SUCCESS == zend_hash_find(Z_ARRVAL_PP(val), ZEND_STRS("size"), (void *) &size)
 105         &&      SUCCESS == zend_hash_find(Z_ARRVAL_PP(val), ZEND_STRS("type"), (void *) &type)
 106         &&      SUCCESS == zend_hash_find(Z_ARRVAL_PP(val), ZEND_STRS("error"), (void *) &error)
 107         ) {
 108                 int count;
 109
 110                 if (Z_TYPE_PP(tmp_name) == IS_ARRAY && (count = zend_hash_num_elements(Z_ARRVAL_PP(tmp_name))) > 1) {
 111                         if (count == zend_hash_num_elements(Z_ARRVAL_PP(name))
 112                         &&      count == zend_hash_num_elements(Z_ARRVAL_PP(size))
 113                         &&      count == zend_hash_num_elements(Z_ARRVAL_PP(type))
 114                         &&      count == zend_hash_num_elements(Z_ARRVAL_PP(error))
 115                         ) {
 116                                 zend_hash_apply_with_arguments(Z_ARRVAL_PP(tmp_name) TSRMLS_CC, grab_file, 6, zfiles, key, name, size, type, error);
 117                         } else {
 118                                 /* wat?! */
 119                                 return ZEND_HASH_APPLY_STOP;
 120                         }
 121                 } else  {
 122                         zval *cpy, **tmp;
 123
 124                         MAKE_STD_ZVAL(cpy);
 125                         MAKE_COPY_ZVAL(val, cpy);
 126                         if (SUCCESS == zend_hash_find(Z_ARRVAL_P(cpy), ZEND_STRS("tmp_name"), (void *) &tmp)) {
 127                                 Z_ADDREF_PP(tmp);
 128                                 add_assoc_zval_ex(cpy, ZEND_STRS("file"), *tmp);
 129                                 zend_hash_del_key_or_index(Z_ARRVAL_P(cpy), ZEND_STRS("tmp_name"), 0, HASH_DEL_KEY);
 130                         }
 131                         zend_hash_quick_update(Z_ARRVAL_P(zfiles), key->arKey, key->nKeyLength, key->h, (void *) &cpy, sizeof(zval *), NULL);
 132                 }
 133         }
 134
 135         return ZEND_HASH_APPLY_KEEP;
 136 }
 137
 138 PHP_METHOD(HttpEnvRequest, __construct)
 139 {
 140         with_error_handling(EH_THROW, php_http_exception_get_class_entry()) {
 141                 if (SUCCESS == zend_parse_parameters_none()) {
 142                         php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
 143                         zval *zsg, *zqs;
 144
 145                         obj->message = php_http_message_init_env(obj->message, PHP_HTTP_REQUEST TSRMLS_CC);
 146                         obj->body.handle = 0;
 147
 148                         zsg = php_http_env_get_superglobal(ZEND_STRL("_GET") TSRMLS_CC);
 149                         MAKE_STD_ZVAL(zqs);
 150                         object_init_ex(zqs, php_http_querystring_get_class_entry());
 151                         if (SUCCESS == php_http_querystring_ctor(zqs, zsg TSRMLS_CC)) {
 152                                 zend_update_property(php_http_env_request_class_entry, getThis(), ZEND_STRL("query"), zqs TSRMLS_CC);
 153                         }
 154                         zval_ptr_dtor(&zqs);
 155
 156                         zsg = php_http_env_get_superglobal(ZEND_STRL("_POST") TSRMLS_CC);
 157                         MAKE_STD_ZVAL(zqs);
 158                         object_init_ex(zqs, php_http_querystring_get_class_entry());
 159                         if (SUCCESS == php_http_querystring_ctor(zqs, zsg TSRMLS_CC)) {
 160                                 zend_update_property(php_http_env_request_class_entry, getThis(), ZEND_STRL("form"), zqs TSRMLS_CC);
 161                         }
 162                         zval_ptr_dtor(&zqs);
 163
 164                         MAKE_STD_ZVAL(zqs);
 165                         array_init(zqs);
 166                         if ((zsg = php_http_env_get_superglobal(ZEND_STRL("_FILES") TSRMLS_CC))) {
 167                                 zend_hash_apply_with_arguments(Z_ARRVAL_P(zsg) TSRMLS_CC, grab_files, 1, zqs);
 168                         }
 169
 170                         zend_update_property(php_http_env_request_class_entry, getThis(), ZEND_STRL("files"), zqs TSRMLS_CC);
 171                         zval_ptr_dtor(&zqs);
 172                 }
 173         } end_error_handling();
 174 }
 175
 176 #define call_querystring_get(prop) \
 177         do {\
 178                 zend_fcall_info fci; \
 179                 zend_fcall_info_cache fcc; \
 180                 zval *rv, mn, ***args = ecalloc(sizeof(zval **), ZEND_NUM_ARGS()); \
 181                 zval *qs = zend_read_property(Z_OBJCE_P(getThis()), getThis(), ZEND_STRL(prop), 0 TSRMLS_CC); \
 182                  \
 183                 INIT_PZVAL(&mn); \
 184                 array_init(&mn); \
 185                 Z_ADDREF_P(qs); \
 186                 add_next_index_zval(&mn, qs); \
 187                 add_next_index_stringl(&mn, ZEND_STRL("get"), 1); \
 188                 zend_fcall_info_init(&mn, 0, &fci, &fcc, NULL, NULL TSRMLS_CC); \
 189                 zend_get_parameters_array_ex(ZEND_NUM_ARGS(), args); \
 190                 zend_fcall_info_argp(&fci TSRMLS_CC, ZEND_NUM_ARGS(), args); \
 191                 zend_fcall_info_call(&fci, &fcc, &rv, NULL TSRMLS_CC); \
 192                 zend_fcall_info_args_clear(&fci, 1); \
 193                 efree(args); \
 194                 zval_dtor(&mn); \
 195                 RETVAL_ZVAL(rv, 0, 1); \
 196         } while(0);
 197
 198 PHP_METHOD(HttpEnvRequest, getForm)
 199 {
 200         if (ZEND_NUM_ARGS()) {
 201                 call_querystring_get("form");
 202         } else {
 203                 RETURN_PROP(php_http_env_request_class_entry, "form");
 204         }
 205 }
 206
 207 PHP_METHOD(HttpEnvRequest, getQuery)
 208 {
 209         if (ZEND_NUM_ARGS()) {
 210                 call_querystring_get("query");
 211         } else {
 212                 RETURN_PROP(php_http_env_request_class_entry, "query");
 213         }
 214 }
 215
 216 PHP_METHOD(HttpEnvRequest, getFiles)
 217 {
 218         if (SUCCESS == zend_parse_parameters_none()) {
 219                 RETURN_PROP(php_http_env_request_class_entry, "files");
 220         }
 221 }
 222
 223
 224 PHP_MINIT_FUNCTION(http_env_request)
 225 {
 226         PHP_HTTP_REGISTER_CLASS(http\\Env, Request, http_env_request, php_http_message_get_class_entry(), 0);
 227         zend_declare_property_null(php_http_env_request_class_entry, ZEND_STRL("query"), ZEND_ACC_PROTECTED TSRMLS_CC);
 228         zend_declare_property_null(php_http_env_request_class_entry, ZEND_STRL("form"), ZEND_ACC_PROTECTED TSRMLS_CC);
 229         zend_declare_property_null(php_http_env_request_class_entry, ZEND_STRL("files"), ZEND_ACC_PROTECTED TSRMLS_CC);
 230
 231         return SUCCESS;
 232 }
 233
 234
 235 /*
 236  * Local variables:
 237  * tab-width: 4
 238  * c-basic-offset: 4
 239  * End:
 240  * vim600: noet sw=4 ts=4 fdm=marker
 241  * vim<600: noet sw=4 ts=4
 242  */