git.m6w6.name Git - m6w6/ext-http/blob - php_http_object.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 STATUS php_http_new(zend_object_value *ov, zend_class_entry *ce, php_http_new_t create, zend_class_entry *parent_ce, void *intern_ptr, void **obj_ptr TSRMLS_DC)
  16 {
  17         if (!ce) {
  18                 ce = parent_ce;
  19         } else if (parent_ce && !instanceof_function(ce, parent_ce TSRMLS_CC)) {
  20                 php_http_error(HE_WARNING, PHP_HTTP_E_RUNTIME, "Class %s does not extend %s", ce->name, parent_ce->name);
  21                 return FAILURE;
  22         }
  23
  24         *ov = create(ce, intern_ptr, obj_ptr TSRMLS_CC);
  25         return SUCCESS;
  26 }
  27
  28 PHP_HTTP_API zend_error_handling_t php_http_object_get_error_handling(zval *object TSRMLS_DC)
  29 {
  30         zval *zeh, *lzeh;
  31         long eh;
  32
  33         zeh = zend_read_property(Z_OBJCE_P(object), object, ZEND_STRL("errorHandling"), 0 TSRMLS_CC);
  34         if (Z_TYPE_P(zeh) != IS_NULL) {
  35                 lzeh = php_http_ztyp(IS_LONG, zeh);
  36                 eh = Z_LVAL_P(lzeh);
  37                 zval_ptr_dtor(&lzeh);
  38                 return eh;
  39         }
  40         zeh = zend_read_static_property(php_http_object_class_entry, ZEND_STRL("defaultErrorHandling"), 0 TSRMLS_CC);
  41         if (Z_TYPE_P(zeh) != IS_NULL) {
  42                 lzeh = php_http_ztyp(IS_LONG, zeh);
  43                 eh = Z_LVAL_P(lzeh);
  44                 zval_ptr_dtor(&lzeh);
  45                 return eh;
  46         }
  47         return EH_NORMAL;
  48 }
  49
  50 #define PHP_HTTP_BEGIN_ARGS(method, req_args)                   PHP_HTTP_BEGIN_ARGS_EX(HttpObject, method, 0, req_args)
  51 #define PHP_HTTP_EMPTY_ARGS(method)                                             PHP_HTTP_EMPTY_ARGS_EX(HttpObject, method, 0)
  52 #define PHP_HTTP_OBJECT_ME(method, visibility)                  PHP_ME(HttpObject, method, PHP_HTTP_ARGS(HttpObject, method), visibility)
  53
  54 PHP_HTTP_BEGIN_ARGS(setErrorHandling, 1)
  55         PHP_HTTP_ARG_VAL(eh, 0)
  56 PHP_HTTP_END_ARGS;
  57
  58 PHP_HTTP_EMPTY_ARGS(getErrorHandling);
  59
  60 PHP_HTTP_BEGIN_ARGS(setDefaultErrorHandling, 1)
  61         PHP_HTTP_ARG_VAL(eh, 0)
  62 PHP_HTTP_END_ARGS;
  63
  64 PHP_HTTP_EMPTY_ARGS(getDefaultErrorHandling);
  65
  66 PHP_HTTP_BEGIN_ARGS(triggerError, 3)
  67         PHP_HTTP_ARG_VAL(error_type, 0)
  68         PHP_HTTP_ARG_VAL(error_code, 0)
  69         PHP_HTTP_ARG_VAL(error_message, 0)
  70 PHP_HTTP_END_ARGS;
  71
  72 zend_class_entry *php_http_object_class_entry;
  73 zend_function_entry php_http_object_method_entry[] = {
  74         PHP_HTTP_OBJECT_ME(setErrorHandling, ZEND_ACC_PUBLIC)
  75         PHP_HTTP_OBJECT_ME(getErrorHandling, ZEND_ACC_PUBLIC)
  76         PHP_HTTP_OBJECT_ME(setDefaultErrorHandling, ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
  77         PHP_HTTP_OBJECT_ME(getDefaultErrorHandling, ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
  78         PHP_HTTP_OBJECT_ME(triggerError, ZEND_ACC_PUBLIC)
  79
  80         EMPTY_FUNCTION_ENTRY
  81 };
  82
  83 zend_object_value php_http_object_new(zend_class_entry *ce TSRMLS_DC)
  84 {
  85         return php_http_object_new_ex(ce, NULL, NULL TSRMLS_CC);
  86 }
  87
  88 zend_object_value php_http_object_new_ex(zend_class_entry *ce, void *nothing, php_http_object_t **ptr TSRMLS_DC)
  89 {
  90         zend_object_value ov;
  91         php_http_object_t *o;
  92
  93         o = ecalloc(1, sizeof(php_http_object_t));
  94         zend_object_std_init((zend_object *) o, ce TSRMLS_CC);
  95         object_properties_init((zend_object *) o, ce);
  96
  97         if (ptr) {
  98                 *ptr = o;
  99         }
 100
 101         ov.handle = zend_objects_store_put(o, NULL, (zend_objects_free_object_storage_t) zend_objects_free_object_storage, NULL TSRMLS_CC);
 102         ov.handlers = zend_get_std_object_handlers();
 103
 104         return ov;
 105 }
 106
 107 PHP_METHOD(HttpObject, getErrorHandling)
 108 {
 109         RETURN_PROP(php_http_object_class_entry, "errorHandling");
 110 }
 111
 112 PHP_METHOD(HttpObject, setErrorHandling)
 113 {
 114         long eh;
 115
 116         if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &eh)) {
 117                 switch (eh) {
 118                         case EH_NORMAL:
 119                         case EH_SUPPRESS:
 120                         case EH_THROW:
 121                                 zend_update_property_long(php_http_object_class_entry, getThis(), ZEND_STRL("errorHandling"), eh TSRMLS_CC);
 122                                 break;
 123
 124                         default:
 125                                 php_http_error(HE_WARNING, PHP_HTTP_E_RUNTIME, "unknown error handling code (%ld)", eh);
 126                                 break;
 127                 }
 128         }
 129
 130         RETURN_ZVAL(getThis(), 1, 0);
 131 }
 132
 133 PHP_METHOD(HttpObject, getDefaultErrorHandling)
 134 {
 135         RETURN_SPROP(php_http_object_class_entry, "defaultErrorHandling");
 136 }
 137
 138 PHP_METHOD(HttpObject, setDefaultErrorHandling)
 139 {
 140         long eh;
 141
 142         if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &eh)) {
 143                 switch (eh) {
 144                         case EH_NORMAL:
 145                         case EH_SUPPRESS:
 146                         case EH_THROW:
 147                                 zend_update_static_property_long(php_http_object_class_entry, ZEND_STRL("defaultErrorHandling"), eh TSRMLS_CC);
 148                                 break;
 149
 150                         default:
 151                                 php_http_error(HE_WARNING, PHP_HTTP_E_RUNTIME, "unknown error handling code (%ld)", eh);
 152                                 break;
 153                 }
 154         }
 155 }
 156
 157 PHP_METHOD(HttpObject, triggerError)
 158 {
 159         long eh, code;
 160         char *msg_str;
 161         int msg_len;
 162
 163         if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "lls", &eh, &code, &msg_str, &msg_len)) {
 164                 php_http_error(eh TSRMLS_CC, code, "%.*s", msg_len, msg_str);
 165         }
 166 }
 167
 168 PHP_MINIT_FUNCTION(http_object)
 169 {
 170         PHP_HTTP_REGISTER_CLASS(http, Object, http_object, NULL, ZEND_ACC_ABSTRACT);
 171         php_http_object_class_entry->create_object = php_http_object_new;
 172
 173         zend_declare_property_null(php_http_object_class_entry, ZEND_STRL("defaultErrorHandling"), (ZEND_ACC_STATIC|ZEND_ACC_PROTECTED) TSRMLS_CC);
 174         zend_declare_property_null(php_http_object_class_entry, ZEND_STRL("errorHandling"), ZEND_ACC_PROTECTED TSRMLS_CC);
 175
 176         zend_declare_class_constant_long(php_http_object_class_entry, ZEND_STRL("EH_NORMAL"), EH_NORMAL TSRMLS_CC);
 177         zend_declare_class_constant_long(php_http_object_class_entry, ZEND_STRL("EH_SUPPRESS"), EH_SUPPRESS TSRMLS_CC);
 178         zend_declare_class_constant_long(php_http_object_class_entry, ZEND_STRL("EH_THROW"), EH_THROW TSRMLS_CC);
 179
 180         return SUCCESS;
 181 }
 182
 183
 184 /*
 185  * Local variables:
 186  * tab-width: 4
 187  * c-basic-offset: 4
 188  * End:
 189  * vim600: noet sw=4 ts=4 fdm=marker
 190  * vim<600: noet sw=4 ts=4
 191  */
 192