- Fixed memory leak when HttpUtil::Inflate() fails
[m6w6/ext-http] / http_exception_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-2007, Michael Wallner <mike@php.net> |
10 +--------------------------------------------------------------------+
11 */
12
13 /* $Id$ */
14
15 #include "php_http.h"
16
17 #ifdef ZEND_ENGINE_2
18
19 #ifndef HTTP_DBG_EXCEPTIONS
20 # define HTTP_DBG_EXCEPTIONS 0
21 #endif
22
23 #include "zend_interfaces.h"
24 #include "zend_exceptions.h"
25 #include "php_http_exception_object.h"
26
27 zend_class_entry *http_exception_object_ce;
28 zend_class_entry *HTTP_EX_CE(runtime);
29 zend_class_entry *HTTP_EX_CE(header);
30 zend_class_entry *HTTP_EX_CE(malformed_headers);
31 zend_class_entry *HTTP_EX_CE(request_method);
32 zend_class_entry *HTTP_EX_CE(message_type);
33 zend_class_entry *HTTP_EX_CE(invalid_param);
34 zend_class_entry *HTTP_EX_CE(encoding);
35 zend_class_entry *HTTP_EX_CE(request);
36 zend_class_entry *HTTP_EX_CE(request_pool);
37 zend_class_entry *HTTP_EX_CE(socket);
38 zend_class_entry *HTTP_EX_CE(response);
39 zend_class_entry *HTTP_EX_CE(url);
40 zend_class_entry *HTTP_EX_CE(querystring);
41
42 #define HTTP_EMPTY_ARGS(method) HTTP_EMPTY_ARGS_EX(HttpException, method, 0)
43 #define HTTP_EXCEPTION_ME(method, visibility) PHP_ME(HttpException, method, HTTP_ARGS(HttpException, method), visibility)
44
45 HTTP_EMPTY_ARGS(__toString);
46
47 zend_function_entry http_exception_object_fe[] = {
48 HTTP_EXCEPTION_ME(__toString, ZEND_ACC_PUBLIC)
49
50 EMPTY_FUNCTION_ENTRY
51 };
52
53 #if HTTP_DBG_EXCEPTIONS
54 static void http_exception_hook(zval *ex TSRMLS_DC)
55 {
56 if (ex) {
57 zval *m = zend_read_property(Z_OBJCE_P(ex), ex, "message", lenof("message"), 0 TSRMLS_CC);
58 fprintf(stderr, "*** Threw exception '%s'\n", Z_STRVAL_P(m));
59 } else {
60 fprintf(stderr, "*** Threw NULL exception\n");
61 }
62 }
63 #endif
64
65 PHP_MINIT_FUNCTION(http_exception_object)
66 {
67 HTTP_REGISTER_CLASS(HttpException, http_exception_object, ZEND_EXCEPTION_GET_DEFAULT(), 0);
68
69 zend_declare_property_null(HTTP_EX_DEF_CE, "innerException", lenof("innerException"), ZEND_ACC_PUBLIC TSRMLS_CC);
70
71 HTTP_REGISTER_EXCEPTION(HttpRuntimeException, HTTP_EX_CE(runtime), HTTP_EX_DEF_CE);
72 HTTP_REGISTER_EXCEPTION(HttpInvalidParamException, HTTP_EX_CE(invalid_param), HTTP_EX_DEF_CE);
73 HTTP_REGISTER_EXCEPTION(HttpHeaderException, HTTP_EX_CE(header), HTTP_EX_DEF_CE);
74 HTTP_REGISTER_EXCEPTION(HttpMalformedHeadersException, HTTP_EX_CE(malformed_headers), HTTP_EX_DEF_CE);
75 HTTP_REGISTER_EXCEPTION(HttpRequestMethodException, HTTP_EX_CE(request_method), HTTP_EX_DEF_CE);
76 HTTP_REGISTER_EXCEPTION(HttpMessageTypeException, HTTP_EX_CE(message_type), HTTP_EX_DEF_CE);
77 HTTP_REGISTER_EXCEPTION(HttpEncodingException, HTTP_EX_CE(encoding), HTTP_EX_DEF_CE);
78 HTTP_REGISTER_EXCEPTION(HttpRequestException, HTTP_EX_CE(request), HTTP_EX_DEF_CE);
79
80 zend_declare_property_long(HTTP_EX_CE(request), "curlCode", lenof("curlCode"), 0, ZEND_ACC_PUBLIC TSRMLS_CC);
81
82 HTTP_REGISTER_EXCEPTION(HttpRequestPoolException, HTTP_EX_CE(request_pool), HTTP_EX_DEF_CE);
83 HTTP_REGISTER_EXCEPTION(HttpSocketException, HTTP_EX_CE(socket), HTTP_EX_DEF_CE);
84 HTTP_REGISTER_EXCEPTION(HttpResponseException, HTTP_EX_CE(response), HTTP_EX_DEF_CE);
85 HTTP_REGISTER_EXCEPTION(HttpUrlException, HTTP_EX_CE(url), HTTP_EX_DEF_CE);
86 HTTP_REGISTER_EXCEPTION(HttpQueryStringException, HTTP_EX_CE(querystring), HTTP_EX_DEF_CE);
87
88 HTTP_LONG_CONSTANT("HTTP_E_RUNTIME", HTTP_E_RUNTIME);
89 HTTP_LONG_CONSTANT("HTTP_E_INVALID_PARAM", HTTP_E_INVALID_PARAM);
90 HTTP_LONG_CONSTANT("HTTP_E_HEADER", HTTP_E_HEADER);
91 HTTP_LONG_CONSTANT("HTTP_E_MALFORMED_HEADERS", HTTP_E_MALFORMED_HEADERS);
92 HTTP_LONG_CONSTANT("HTTP_E_REQUEST_METHOD", HTTP_E_REQUEST_METHOD);
93 HTTP_LONG_CONSTANT("HTTP_E_MESSAGE_TYPE", HTTP_E_MESSAGE_TYPE);
94 HTTP_LONG_CONSTANT("HTTP_E_ENCODING", HTTP_E_ENCODING);
95 HTTP_LONG_CONSTANT("HTTP_E_REQUEST", HTTP_E_REQUEST);
96 HTTP_LONG_CONSTANT("HTTP_E_REQUEST_POOL", HTTP_E_REQUEST_POOL);
97 HTTP_LONG_CONSTANT("HTTP_E_SOCKET", HTTP_E_SOCKET);
98 HTTP_LONG_CONSTANT("HTTP_E_RESPONSE", HTTP_E_RESPONSE);
99 HTTP_LONG_CONSTANT("HTTP_E_URL", HTTP_E_URL);
100 HTTP_LONG_CONSTANT("HTTP_E_QUERYSTRING", HTTP_E_QUERYSTRING);
101
102 #if HTTP_DBG_EXCEPTIONS
103 zend_throw_exception_hook=http_exception_hook;
104 #endif
105
106 return SUCCESS;
107 }
108
109 zend_class_entry *_http_exception_get_default()
110 {
111 return http_exception_object_ce;
112 }
113
114 zend_class_entry *_http_exception_get_for_code(long code)
115 {
116 zend_class_entry *ex = http_exception_object_ce;
117
118 switch (code) {
119 case HTTP_E_RUNTIME: ex = HTTP_EX_CE(runtime); break;
120 case HTTP_E_INVALID_PARAM: ex = HTTP_EX_CE(invalid_param); break;
121 case HTTP_E_HEADER: ex = HTTP_EX_CE(header); break;
122 case HTTP_E_MALFORMED_HEADERS: ex = HTTP_EX_CE(malformed_headers); break;
123 case HTTP_E_REQUEST_METHOD: ex = HTTP_EX_CE(request_method); break;
124 case HTTP_E_MESSAGE_TYPE: ex = HTTP_EX_CE(message_type); break;
125 case HTTP_E_ENCODING: ex = HTTP_EX_CE(encoding); break;
126 case HTTP_E_REQUEST: ex = HTTP_EX_CE(request); break;
127 case HTTP_E_REQUEST_POOL: ex = HTTP_EX_CE(request_pool); break;
128 case HTTP_E_SOCKET: ex = HTTP_EX_CE(socket); break;
129 case HTTP_E_RESPONSE: ex = HTTP_EX_CE(response); break;
130 case HTTP_E_URL: ex = HTTP_EX_CE(url); break;
131 case HTTP_E_QUERYSTRING: ex = HTTP_EX_CE(querystring); break;
132 }
133
134 return ex;
135 }
136
137 PHP_METHOD(HttpException, __toString)
138 {
139 phpstr full_str;
140 zend_class_entry *ce;
141 zval *zobj = getThis(), *retval = NULL, *m, *f, *l;
142
143 phpstr_init(&full_str);
144
145 do {
146 ce = Z_OBJCE_P(zobj);
147
148 m = zend_read_property(ce, zobj, "message", lenof("message"), 0 TSRMLS_CC);
149 f = zend_read_property(ce, zobj, "file", lenof("file"), 0 TSRMLS_CC);
150 l = zend_read_property(ce, zobj, "line", lenof("line"), 0 TSRMLS_CC);
151
152 if (m && f && l && Z_TYPE_P(m) == IS_STRING && Z_TYPE_P(f) == IS_STRING && Z_TYPE_P(l) == IS_LONG) {
153 if (zobj != getThis()) {
154 phpstr_appends(&full_str, " inner ");
155 }
156
157 phpstr_appendf(&full_str, "exception '%.*s' with message '%.*s' in %.*s:%ld" PHP_EOL,
158 ce->name_length, ce->name, Z_STRLEN_P(m), Z_STRVAL_P(m), Z_STRLEN_P(f), Z_STRVAL_P(f), Z_LVAL_P(l)
159 );
160 } else {
161 break;
162 }
163
164 zobj = zend_read_property(ce, zobj, "innerException", lenof("innerException"), 0 TSRMLS_CC);
165 } while (Z_TYPE_P(zobj) == IS_OBJECT);
166
167 if (zend_call_method_with_0_params(&getThis(), Z_OBJCE_P(getThis()), NULL, "gettraceasstring", &retval) && Z_TYPE_P(retval) == IS_STRING) {
168 phpstr_appends(&full_str, "Stack trace:" PHP_EOL);
169 phpstr_append(&full_str, Z_STRVAL_P(retval), Z_STRLEN_P(retval));
170 zval_ptr_dtor(&retval);
171 }
172
173 RETURN_PHPSTR_VAL(&full_str);
174 }
175
176 #endif
177
178 /*
179 * Local variables:
180 * tab-width: 4
181 * c-basic-offset: 4
182 * End:
183 * vim600: noet sw=4 ts=4 fdm=marker
184 * vim<600: noet sw=4 ts=4
185 */
186