- increment refcount for HttpRequest object put into hashtable as debug wrapper
[m6w6/ext-http] / http_request_object.c
1 /*
2 +----------------------------------------------------------------------+
3 | PECL :: http |
4 +----------------------------------------------------------------------+
5 | This source file is subject to version 3.0 of the PHP license, that |
6 | is bundled with this package in the file LICENSE, and is available |
7 | through the world-wide-web at http://www.php.net/license/3_0.txt. |
8 | If you did not receive a copy of the PHP license and are unable to |
9 | obtain it through the world-wide-web, please send a note to |
10 | license@php.net so we can mail you a copy immediately. |
11 +----------------------------------------------------------------------+
12 | Copyright (c) 2004-2005 Michael Wallner <mike@php.net> |
13 +----------------------------------------------------------------------+
14 */
15
16 /* $Id$ */
17
18
19 #ifdef HAVE_CONFIG_H
20 # include "config.h"
21 #endif
22 #include "php.h"
23
24 #if defined(ZEND_ENGINE_2) && defined(HTTP_HAVE_CURL)
25
26 #include "php_http_std_defs.h"
27 #include "php_http_request_object.h"
28 #include "php_http_request_api.h"
29 #include "php_http_request_pool_api.h"
30 #include "php_http.h"
31 #include "php_http_api.h"
32 #include "php_http_url_api.h"
33 #include "php_http_message_api.h"
34 #include "php_http_message_object.h"
35 #include "php_http_exception_object.h"
36
37 #ifdef PHP_WIN32
38 # include <winsock2.h>
39 #endif
40 #include <curl/curl.h>
41
42 #define HTTP_BEGIN_ARGS(method, ret_ref, req_args) HTTP_BEGIN_ARGS_EX(HttpRequest, method, ret_ref, req_args)
43 #define HTTP_EMPTY_ARGS(method, ret_ref) HTTP_EMPTY_ARGS_EX(HttpRequest, method, ret_ref)
44 #define HTTP_REQUEST_ME(method, visibility) PHP_ME(HttpRequest, method, HTTP_ARGS(HttpRequest, method), visibility)
45 #define HTTP_REQUEST_ALIAS(method, func) HTTP_STATIC_ME_ALIAS(method, func, HTTP_ARGS(HttpRequest, method))
46
47 HTTP_EMPTY_ARGS(__destruct, 0);
48 HTTP_BEGIN_ARGS(__construct, 0, 0)
49 HTTP_ARG_VAL(url, 0)
50 HTTP_ARG_VAL(method, 0)
51 HTTP_END_ARGS;
52
53 HTTP_EMPTY_ARGS(getOptions, 0);
54 HTTP_EMPTY_ARGS(unsetOptions, 0);
55 HTTP_BEGIN_ARGS(setOptions, 0, 1)
56 HTTP_ARG_VAL(options, 0)
57 HTTP_END_ARGS;
58
59 HTTP_EMPTY_ARGS(getSslOptions, 0);
60 HTTP_EMPTY_ARGS(unsetSslOptions, 0);
61 HTTP_BEGIN_ARGS(setSslOptions, 0, 1)
62 HTTP_ARG_VAL(ssl_options, 0)
63 HTTP_END_ARGS;
64
65 HTTP_EMPTY_ARGS(getHeaders, 0);
66 HTTP_EMPTY_ARGS(unsetHeaders, 0);
67 HTTP_BEGIN_ARGS(addHeaders, 0, 1)
68 HTTP_ARG_VAL(headers, 0)
69 HTTP_END_ARGS;
70
71 HTTP_EMPTY_ARGS(getCookies, 0);
72 HTTP_EMPTY_ARGS(unsetCookies, 0);
73 HTTP_BEGIN_ARGS(addCookies, 0, 1)
74 HTTP_ARG_VAL(cookies, 0)
75 HTTP_END_ARGS;
76
77 HTTP_EMPTY_ARGS(getUrl, 0);
78 HTTP_BEGIN_ARGS(setUrl, 0, 1)
79 HTTP_ARG_VAL(url, 0)
80 HTTP_END_ARGS;
81
82 HTTP_EMPTY_ARGS(getMethod, 0);
83 HTTP_BEGIN_ARGS(setMethod, 0, 1)
84 HTTP_ARG_VAL(request_method, 0)
85 HTTP_END_ARGS;
86
87 HTTP_EMPTY_ARGS(getContentType, 0);
88 HTTP_BEGIN_ARGS(setContentType, 0, 1)
89 HTTP_ARG_VAL(content_type, 0)
90 HTTP_END_ARGS;
91
92 HTTP_EMPTY_ARGS(getQueryData, 0);
93 HTTP_EMPTY_ARGS(unsetQueryData, 0);
94 HTTP_BEGIN_ARGS(setQueryData, 0, 1)
95 HTTP_ARG_VAL(query_data, 0)
96 HTTP_END_ARGS;
97
98 HTTP_BEGIN_ARGS(addQueryData, 0, 1)
99 HTTP_ARG_VAL(query_data, 0)
100 HTTP_END_ARGS;
101
102 HTTP_EMPTY_ARGS(getPostFields, 0);
103 HTTP_EMPTY_ARGS(unsetPostFields, 0);
104 HTTP_BEGIN_ARGS(setPostFields, 0, 1)
105 HTTP_ARG_VAL(post_fields, 0)
106 HTTP_END_ARGS;
107
108 HTTP_BEGIN_ARGS(addPostFields, 0, 1)
109 HTTP_ARG_VAL(post_fields, 0)
110 HTTP_END_ARGS;
111
112 HTTP_EMPTY_ARGS(getPostFiles, 0);
113 HTTP_EMPTY_ARGS(unsetPostFiles, 0);
114 HTTP_BEGIN_ARGS(setPostFiles, 0, 1)
115 HTTP_ARG_VAL(post_files, 0)
116 HTTP_END_ARGS;
117
118 HTTP_BEGIN_ARGS(addPostFile, 0, 2)
119 HTTP_ARG_VAL(formname, 0)
120 HTTP_ARG_VAL(filename, 0)
121 HTTP_ARG_VAL(content_type, 0)
122 HTTP_END_ARGS;
123
124 HTTP_EMPTY_ARGS(getPutFile, 0);
125 HTTP_EMPTY_ARGS(unsetPutFile, 0);
126 HTTP_BEGIN_ARGS(setPutFile, 0, 1)
127 HTTP_ARG_VAL(filename, 0)
128 HTTP_END_ARGS;
129
130 HTTP_EMPTY_ARGS(getResponseData, 0);
131 HTTP_BEGIN_ARGS(getResponseHeader, 0, 0)
132 HTTP_ARG_VAL(name, 0)
133 HTTP_END_ARGS;
134
135 HTTP_BEGIN_ARGS(getResponseCookie, 0, 0)
136 HTTP_ARG_VAL(name, 0)
137 HTTP_END_ARGS;
138
139 HTTP_EMPTY_ARGS(getResponseBody, 0);
140 HTTP_EMPTY_ARGS(getResponseCode, 0);
141 HTTP_BEGIN_ARGS(getResponseInfo, 0, 0)
142 HTTP_ARG_VAL(name, 0)
143 HTTP_END_ARGS;
144
145 HTTP_EMPTY_ARGS(getResponseMessage, 1);
146 HTTP_EMPTY_ARGS(getRequestMessage, 1);
147 HTTP_EMPTY_ARGS(getHistory, 1);
148 HTTP_EMPTY_ARGS(send, 0);
149
150 HTTP_BEGIN_ARGS(get, 0, 1)
151 HTTP_ARG_VAL(url, 0)
152 HTTP_ARG_VAL(options, 0)
153 HTTP_ARG_VAL(info, 1)
154 HTTP_END_ARGS;
155
156 HTTP_BEGIN_ARGS(head, 0, 1)
157 HTTP_ARG_VAL(url, 0)
158 HTTP_ARG_VAL(options, 0)
159 HTTP_ARG_VAL(info, 1)
160 HTTP_END_ARGS;
161
162 HTTP_BEGIN_ARGS(postData, 0, 2)
163 HTTP_ARG_VAL(url, 0)
164 HTTP_ARG_VAL(data, 0)
165 HTTP_ARG_VAL(options, 0)
166 HTTP_ARG_VAL(info, 1)
167 HTTP_END_ARGS;
168
169 HTTP_BEGIN_ARGS(postFields, 0, 2)
170 HTTP_ARG_VAL(url, 0)
171 HTTP_ARG_VAL(data, 0)
172 HTTP_ARG_VAL(options, 0)
173 HTTP_ARG_VAL(info, 1)
174 HTTP_END_ARGS;
175
176 HTTP_BEGIN_ARGS(putFile, 0, 2)
177 HTTP_ARG_VAL(url, 0)
178 HTTP_ARG_VAL(file, 0)
179 HTTP_ARG_VAL(options, 0)
180 HTTP_ARG_VAL(info, 1)
181 HTTP_END_ARGS;
182
183 HTTP_BEGIN_ARGS(putStream, 0, 2)
184 HTTP_ARG_VAL(url, 0)
185 HTTP_ARG_VAL(stream, 0)
186 HTTP_ARG_VAL(options, 0)
187 HTTP_ARG_VAL(info, 1)
188 HTTP_END_ARGS;
189
190 HTTP_BEGIN_ARGS(methodRegister, 0, 1)
191 HTTP_ARG_VAL(method_name, 0)
192 HTTP_END_ARGS;
193
194 HTTP_BEGIN_ARGS(methodUnregister, 0, 1)
195 HTTP_ARG_VAL(method, 0)
196 HTTP_END_ARGS;
197
198 HTTP_BEGIN_ARGS(methodName, 0, 1)
199 HTTP_ARG_VAL(method_id, 0)
200 HTTP_END_ARGS;
201
202 HTTP_BEGIN_ARGS(methodExists, 0, 1)
203 HTTP_ARG_VAL(method, 0)
204 HTTP_END_ARGS;
205
206 HTTP_BEGIN_ARGS(debugWrapper, 0, 2)
207 HTTP_ARG_VAL(info_type, 0)
208 HTTP_ARG_VAL(info_message, 0)
209 HTTP_END_ARGS;
210
211 #define http_request_object_declare_default_properties() _http_request_object_declare_default_properties(TSRMLS_C)
212 static inline void _http_request_object_declare_default_properties(TSRMLS_D);
213
214 zend_class_entry *http_request_object_ce;
215 zend_function_entry http_request_object_fe[] = {
216 HTTP_REQUEST_ME(__construct, ZEND_ACC_PUBLIC|ZEND_ACC_CTOR)
217 HTTP_REQUEST_ME(__destruct, ZEND_ACC_PUBLIC|ZEND_ACC_DTOR)
218
219 HTTP_REQUEST_ME(setOptions, ZEND_ACC_PUBLIC)
220 HTTP_REQUEST_ME(getOptions, ZEND_ACC_PUBLIC)
221 HTTP_REQUEST_ME(unsetOptions, ZEND_ACC_PUBLIC)
222 HTTP_REQUEST_ME(setSslOptions, ZEND_ACC_PUBLIC)
223 HTTP_REQUEST_ME(getSslOptions, ZEND_ACC_PUBLIC)
224 HTTP_REQUEST_ME(unsetSslOptions, ZEND_ACC_PUBLIC)
225
226 HTTP_REQUEST_ME(addHeaders, ZEND_ACC_PUBLIC)
227 HTTP_REQUEST_ME(getHeaders, ZEND_ACC_PUBLIC)
228 HTTP_REQUEST_ME(unsetHeaders, ZEND_ACC_PUBLIC)
229 HTTP_REQUEST_ME(addCookies, ZEND_ACC_PUBLIC)
230 HTTP_REQUEST_ME(getCookies, ZEND_ACC_PUBLIC)
231 HTTP_REQUEST_ME(unsetCookies, ZEND_ACC_PUBLIC)
232
233 HTTP_REQUEST_ME(setMethod, ZEND_ACC_PUBLIC)
234 HTTP_REQUEST_ME(getMethod, ZEND_ACC_PUBLIC)
235
236 HTTP_REQUEST_ME(setUrl, ZEND_ACC_PUBLIC)
237 HTTP_REQUEST_ME(getUrl, ZEND_ACC_PUBLIC)
238
239 HTTP_REQUEST_ME(setContentType, ZEND_ACC_PUBLIC)
240 HTTP_REQUEST_ME(getContentType, ZEND_ACC_PUBLIC)
241
242 HTTP_REQUEST_ME(setQueryData, ZEND_ACC_PUBLIC)
243 HTTP_REQUEST_ME(getQueryData, ZEND_ACC_PUBLIC)
244 HTTP_REQUEST_ME(addQueryData, ZEND_ACC_PUBLIC)
245 HTTP_REQUEST_ME(unsetQueryData, ZEND_ACC_PUBLIC)
246
247 HTTP_REQUEST_ME(setPostFields, ZEND_ACC_PUBLIC)
248 HTTP_REQUEST_ME(getPostFields, ZEND_ACC_PUBLIC)
249 HTTP_REQUEST_ME(addPostFields, ZEND_ACC_PUBLIC)
250 HTTP_REQUEST_ME(unsetPostFields, ZEND_ACC_PUBLIC)
251
252 HTTP_REQUEST_ME(setPostFiles, ZEND_ACC_PUBLIC)
253 HTTP_REQUEST_ME(addPostFile, ZEND_ACC_PUBLIC)
254 HTTP_REQUEST_ME(getPostFiles, ZEND_ACC_PUBLIC)
255 HTTP_REQUEST_ME(unsetPostFiles, ZEND_ACC_PUBLIC)
256
257 HTTP_REQUEST_ME(setPutFile, ZEND_ACC_PUBLIC)
258 HTTP_REQUEST_ME(getPutFile, ZEND_ACC_PUBLIC)
259 HTTP_REQUEST_ME(unsetPutFile, ZEND_ACC_PUBLIC)
260
261 HTTP_REQUEST_ME(send, ZEND_ACC_PUBLIC)
262
263 HTTP_REQUEST_ME(getResponseData, ZEND_ACC_PUBLIC)
264 HTTP_REQUEST_ME(getResponseHeader, ZEND_ACC_PUBLIC)
265 HTTP_REQUEST_ME(getResponseCookie, ZEND_ACC_PUBLIC)
266 HTTP_REQUEST_ME(getResponseCode, ZEND_ACC_PUBLIC)
267 HTTP_REQUEST_ME(getResponseBody, ZEND_ACC_PUBLIC)
268 HTTP_REQUEST_ME(getResponseInfo, ZEND_ACC_PUBLIC)
269 HTTP_REQUEST_ME(getResponseMessage, ZEND_ACC_PUBLIC)
270 HTTP_REQUEST_ME(getRequestMessage, ZEND_ACC_PUBLIC)
271 HTTP_REQUEST_ME(getHistory, ZEND_ACC_PUBLIC)
272
273 HTTP_REQUEST_ALIAS(get, http_get)
274 HTTP_REQUEST_ALIAS(head, http_head)
275 HTTP_REQUEST_ALIAS(postData, http_post_data)
276 HTTP_REQUEST_ALIAS(postFields, http_post_fields)
277 HTTP_REQUEST_ALIAS(putFile, http_put_file)
278 HTTP_REQUEST_ALIAS(putStream, http_put_stream)
279
280 HTTP_REQUEST_ALIAS(methodRegister, http_request_method_register)
281 HTTP_REQUEST_ALIAS(methodUnregister, http_request_method_unregister)
282 HTTP_REQUEST_ALIAS(methodName, http_request_method_name)
283 HTTP_REQUEST_ALIAS(methodExists, http_request_method_exists)
284
285 HTTP_REQUEST_ME(debugWrapper, ZEND_ACC_PRIVATE|ZEND_ACC_FINAL)
286
287 {NULL, NULL, NULL}
288 };
289 static zend_object_handlers http_request_object_handlers;
290
291 void _http_request_object_init(INIT_FUNC_ARGS)
292 {
293 HTTP_REGISTER_CLASS_EX(HttpRequest, http_request_object, NULL, 0);
294
295 /* HTTP/1.1 */
296 HTTP_LONG_CONSTANT("HTTP_GET", HTTP_GET);
297 HTTP_LONG_CONSTANT("HTTP_HEAD", HTTP_HEAD);
298 HTTP_LONG_CONSTANT("HTTP_POST", HTTP_POST);
299 HTTP_LONG_CONSTANT("HTTP_PUT", HTTP_PUT);
300 HTTP_LONG_CONSTANT("HTTP_DELETE", HTTP_DELETE);
301 HTTP_LONG_CONSTANT("HTTP_OPTIONS", HTTP_OPTIONS);
302 HTTP_LONG_CONSTANT("HTTP_TRACE", HTTP_TRACE);
303 HTTP_LONG_CONSTANT("HTTP_CONNECT", HTTP_CONNECT);
304 /* WebDAV - RFC 2518 */
305 HTTP_LONG_CONSTANT("HTTP_PROPFIND", HTTP_PROPFIND);
306 HTTP_LONG_CONSTANT("HTTP_PROPPATCH", HTTP_PROPPATCH);
307 HTTP_LONG_CONSTANT("HTTP_MKCOL", HTTP_MKCOL);
308 HTTP_LONG_CONSTANT("HTTP_COPY", HTTP_COPY);
309 HTTP_LONG_CONSTANT("HTTP_MOVE", HTTP_MOVE);
310 HTTP_LONG_CONSTANT("HTTP_LOCK", HTTP_LOCK);
311 HTTP_LONG_CONSTANT("HTTP_UNLOCK", HTTP_UNLOCK);
312 /* WebDAV Versioning - RFC 3253 */
313 HTTP_LONG_CONSTANT("HTTP_VERSION_CONTROL", HTTP_VERSION_CONTROL);
314 HTTP_LONG_CONSTANT("HTTP_REPORT", HTTP_REPORT);
315 HTTP_LONG_CONSTANT("HTTP_CHECKOUT", HTTP_CHECKOUT);
316 HTTP_LONG_CONSTANT("HTTP_CHECKIN", HTTP_CHECKIN);
317 HTTP_LONG_CONSTANT("HTTP_UNCHECKOUT", HTTP_UNCHECKOUT);
318 HTTP_LONG_CONSTANT("HTTP_MKWORKSPACE", HTTP_MKWORKSPACE);
319 HTTP_LONG_CONSTANT("HTTP_UPDATE", HTTP_UPDATE);
320 HTTP_LONG_CONSTANT("HTTP_LABEL", HTTP_LABEL);
321 HTTP_LONG_CONSTANT("HTTP_MERGE", HTTP_MERGE);
322 HTTP_LONG_CONSTANT("HTTP_BASELINE_CONTROL", HTTP_BASELINE_CONTROL);
323 HTTP_LONG_CONSTANT("HTTP_MKACTIVITY", HTTP_MKACTIVITY);
324 /* WebDAV Access Control - RFC 3744 */
325 HTTP_LONG_CONSTANT("HTTP_ACL", HTTP_ACL);
326
327
328 # if LIBCURL_VERSION_NUM >= 0x070a05
329 HTTP_LONG_CONSTANT("HTTP_AUTH_BASIC", CURLAUTH_BASIC);
330 HTTP_LONG_CONSTANT("HTTP_AUTH_DIGEST", CURLAUTH_DIGEST);
331 HTTP_LONG_CONSTANT("HTTP_AUTH_NTLM", CURLAUTH_NTLM);
332 # endif /* LIBCURL_VERSION_NUM */
333 }
334
335 zend_object_value _http_request_object_new(zend_class_entry *ce TSRMLS_DC)
336 {
337 zend_object_value ov;
338 http_request_object *o;
339
340 o = ecalloc(1, sizeof(http_request_object));
341 o->zo.ce = ce;
342 o->ch = curl_easy_init();
343 o->pool = NULL;
344
345 phpstr_init(&o->history);
346 phpstr_init(&o->request);
347 phpstr_init_ex(&o->response, HTTP_CURLBUF_SIZE, 0);
348
349 ALLOC_HASHTABLE(OBJ_PROP(o));
350 zend_hash_init(OBJ_PROP(o), 0, NULL, ZVAL_PTR_DTOR, 0);
351 zend_hash_copy(OBJ_PROP(o), &ce->default_properties, (copy_ctor_func_t) zval_add_ref, NULL, sizeof(zval *));
352
353 ov.handle = putObject(http_request_object, o);
354 ov.handlers = &http_request_object_handlers;
355
356 return ov;
357 }
358
359 static inline void _http_request_object_declare_default_properties(TSRMLS_D)
360 {
361 zend_class_entry *ce = http_request_object_ce;
362
363 DCL_PROP_N(PROTECTED, options);
364 DCL_PROP_N(PROTECTED, responseInfo);
365 DCL_PROP_N(PROTECTED, responseData);
366 DCL_PROP_N(PROTECTED, responseCode);
367 DCL_PROP_N(PROTECTED, responseMessage);
368 DCL_PROP_N(PROTECTED, postFields);
369 DCL_PROP_N(PROTECTED, postFiles);
370
371 DCL_PROP(PROTECTED, long, method, HTTP_GET);
372
373 DCL_PROP(PROTECTED, string, url, "");
374 DCL_PROP(PROTECTED, string, contentType, "");
375 DCL_PROP(PROTECTED, string, queryData, "");
376 DCL_PROP(PROTECTED, string, putFile, "");
377
378 DCL_PROP_N(PRIVATE, dbg_user_cb);
379 DCL_PROP(PUBLIC, bool, recordHistory, 1);
380 }
381
382 void _http_request_object_free(zend_object *object TSRMLS_DC)
383 {
384 http_request_object *o = (http_request_object *) object;
385
386 if (OBJ_PROP(o)) {
387 zend_hash_destroy(OBJ_PROP(o));
388 FREE_HASHTABLE(OBJ_PROP(o));
389 }
390 if (o->ch) {
391 /* avoid nasty segfaults with already cleaned up callbacks */
392 curl_easy_setopt(o->ch, CURLOPT_NOPROGRESS, 1);
393 curl_easy_setopt(o->ch, CURLOPT_VERBOSE, 0);
394 curl_easy_cleanup(o->ch);
395 }
396 phpstr_dtor(&o->response);
397 phpstr_dtor(&o->request);
398 phpstr_dtor(&o->history);
399 efree(o);
400 }
401
402 STATUS _http_request_object_requesthandler(http_request_object *obj, zval *this_ptr, http_request_body *body TSRMLS_DC)
403 {
404 zval *meth, *URL, *qdata, *opts;
405 char *request_uri;
406 STATUS status;
407
408 if (!body) {
409 return FAILURE;
410 }
411 if ((!obj->ch) && (!(obj->ch = curl_easy_init()))) {
412 http_error(E_WARNING, HTTP_E_CURL, "Could not initilaize curl");
413 return FAILURE;
414 }
415
416 meth = GET_PROP(obj, method);
417 URL = GET_PROP(obj, url);
418 qdata = GET_PROP(obj, queryData);
419 opts = GET_PROP(obj, options);
420
421 // HTTP_URI_MAXLEN+1 long char *
422 if (!(request_uri = http_absolute_uri_ex(Z_STRVAL_P(URL), Z_STRLEN_P(URL), NULL, 0, NULL, 0, 0))) {
423 return FAILURE;
424 }
425
426 if (Z_STRLEN_P(qdata) && (strlen(request_uri) < HTTP_URI_MAXLEN)) {
427 if (!strchr(request_uri, '?')) {
428 strcat(request_uri, "?");
429 } else {
430 strcat(request_uri, "&");
431 }
432 strncat(request_uri, Z_STRVAL_P(qdata), HTTP_URI_MAXLEN - strlen(request_uri));
433 }
434
435 /* ensure we have HttpRequest::debugWrapper as dbg callback */
436 {
437 zval *dbg_cb;
438 MAKE_STD_ZVAL(dbg_cb);
439 array_init(dbg_cb);
440 zval_add_ref(&getThis());
441 add_next_index_zval(dbg_cb, getThis());
442 add_next_index_stringl(dbg_cb, "debugWrapper", lenof("debugWrapper"), 1);
443 add_assoc_zval(opts, "ondebug", dbg_cb);
444 }
445 /* */
446
447 switch (Z_LVAL_P(meth))
448 {
449 case HTTP_GET:
450 case HTTP_HEAD:
451 body->type = -1;
452 status = http_request_init(obj->ch, Z_LVAL_P(meth), request_uri, NULL, Z_ARRVAL_P(opts), &obj->response);
453 break;
454
455 case HTTP_PUT:
456 {
457 php_stream *stream;
458 php_stream_statbuf ssb;
459 zval *file = GET_PROP(obj, putFile);
460
461 if ( (stream = php_stream_open_wrapper(Z_STRVAL_P(file), "rb", REPORT_ERRORS|ENFORCE_SAFE_MODE, NULL)) &&
462 !php_stream_stat(stream, &ssb)) {
463 body->type = HTTP_REQUEST_BODY_UPLOADFILE;
464 body->data = stream;
465 body->size = ssb.sb.st_size;
466
467 status = http_request_init(obj->ch, HTTP_PUT, request_uri, body, Z_ARRVAL_P(opts), &obj->response);
468 } else {
469 status = FAILURE;
470 }
471 }
472 break;
473
474 case HTTP_POST:
475 {
476 zval *fields = GET_PROP(obj, postFields), *files = GET_PROP(obj, postFiles);
477
478 if (SUCCESS == (status = http_request_body_fill(body, Z_ARRVAL_P(fields), Z_ARRVAL_P(files)))) {
479 status = http_request_init(obj->ch, HTTP_POST, request_uri, body, Z_ARRVAL_P(opts), &obj->response);
480 }
481 }
482 break;
483
484 default:
485 {
486 zval *post = GET_PROP(obj, postData);
487
488 body->type = HTTP_REQUEST_BODY_CSTRING;
489 body->data = Z_STRVAL_P(post);
490 body->size = Z_STRLEN_P(post);
491
492 status = http_request_init(obj->ch, Z_LVAL_P(meth), request_uri, body, Z_ARRVAL_P(opts), &obj->response);
493 }
494 break;
495 }
496
497 /* clean previous response */
498 phpstr_dtor(&obj->response);
499 /* clean previous request */
500 phpstr_dtor(&obj->request);
501
502 efree(request_uri);
503 return status;
504 }
505
506 STATUS _http_request_object_responsehandler(http_request_object *obj, zval *this_ptr TSRMLS_DC)
507 {
508 http_message *msg;
509
510 phpstr_fix(&obj->request);
511 phpstr_fix(&obj->response);
512
513 if (msg = http_message_parse(PHPSTR_VAL(&obj->response), PHPSTR_LEN(&obj->response))) {
514 char *body;
515 size_t body_len;
516 zval *headers, *message,
517 *resp = GET_PROP(obj, responseData),
518 *info = GET_PROP(obj, responseInfo),
519 *hist = GET_PROP(obj, recordHistory);
520
521 if (Z_TYPE_P(hist) != IS_BOOL) {
522 convert_to_boolean_ex(&hist);
523 }
524 if (Z_LVAL_P(hist)) {
525 /* we need to act like a zipper, as we'll receive
526 * the requests and the responses in separate chains
527 * for redirects
528 */
529 http_message *response = msg, *request = http_message_parse(PHPSTR_VAL(&obj->request), PHPSTR_LEN(&obj->request));
530 http_message *free_msg = request;
531
532 do {
533 char *message;
534 size_t msglen;
535
536 http_message_tostring(response, &message, &msglen);
537 phpstr_append(&obj->history, message, msglen);
538 efree(message);
539
540 http_message_tostring(request, &message, &msglen);
541 phpstr_append(&obj->history, message, msglen);
542 efree(message);
543
544 } while ((response = response->parent) && (request = request->parent));
545
546 http_message_free(free_msg);
547 phpstr_fix(&obj->history);
548 }
549
550 UPD_PROP(obj, long, responseCode, msg->info.response.code);
551
552 MAKE_STD_ZVAL(headers)
553 array_init(headers);
554
555 zend_hash_copy(Z_ARRVAL_P(headers), &msg->hdrs, (copy_ctor_func_t) zval_add_ref, NULL, sizeof(zval *));
556 phpstr_data(PHPSTR(msg), &body, &body_len);
557
558 add_assoc_zval(resp, "headers", headers);
559 add_assoc_stringl(resp, "body", body, body_len, 0);
560
561 MAKE_STD_ZVAL(message);
562 message->type = IS_OBJECT;
563 message->is_ref = 1;
564 message->value.obj = http_message_object_from_msg(msg);
565 SET_PROP(obj, responseMessage, message);
566 zval_ptr_dtor(&message);
567
568 http_request_info(obj->ch, Z_ARRVAL_P(info));
569 SET_PROP(obj, responseInfo, info);
570
571 return SUCCESS;
572 }
573 return FAILURE;
574 }
575
576 /* ### USERLAND ### */
577
578 /* {{{ proto void HttpRequest::__construct([string url[, long request_method = HTTP_GET]])
579 *
580 * Instantiate a new HttpRequest object which can be used to issue HEAD, GET
581 * and POST (including posting files) HTTP requests.
582 */
583 PHP_METHOD(HttpRequest, __construct)
584 {
585 char *URL = NULL;
586 int URL_len;
587 long meth = -1;
588 getObject(http_request_object, obj);
589
590 SET_EH_THROW_HTTP();
591 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|sl", &URL, &URL_len, &meth)) {
592 INIT_PARR(obj, options);
593 INIT_PARR(obj, responseInfo);
594 INIT_PARR(obj, responseData);
595 INIT_PARR(obj, postFields);
596 INIT_PARR(obj, postFiles);
597
598 if (URL) {
599 UPD_PROP(obj, string, url, URL);
600 }
601 if (meth > -1) {
602 UPD_PROP(obj, long, method, meth);
603 }
604 }
605 SET_EH_NORMAL();
606 }
607 /* }}} */
608
609 /* {{{ proto void HttpRequest::__destruct()
610 *
611 * Destroys the HttpRequest object.
612 */
613 PHP_METHOD(HttpRequest, __destruct)
614 {
615 getObject(http_request_object, obj);
616
617 NO_ARGS;
618
619 FREE_PARR(obj, options);
620 FREE_PARR(obj, responseInfo);
621 FREE_PARR(obj, responseData);
622 FREE_PARR(obj, postFields);
623 FREE_PARR(obj, postFiles);
624 }
625 /* }}} */
626
627 /* {{{ proto bool HttpRequest::setOptions(array options)
628 *
629 * Set the request options to use. See http_get() for a full list of available options.
630 */
631 PHP_METHOD(HttpRequest, setOptions)
632 {
633 char *key = NULL;
634 ulong idx = 0;
635 zval *opts, *old_opts, **opt;
636 getObject(http_request_object, obj);
637
638 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/", &opts)) {
639 RETURN_FALSE;
640 }
641
642 old_opts = GET_PROP(obj, options);
643
644 /* some options need extra attention -- thus cannot use array_merge() directly */
645 FOREACH_KEYVAL(opts, key, idx, opt) {
646 if (key) {
647 if (!strcmp(key, "headers")) {
648 zval **headers;
649 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(old_opts), "headers", sizeof("headers"), (void **) &headers)) {
650 array_merge(*opt, *headers);
651 }
652 } else if (!strcmp(key, "cookies")) {
653 zval **cookies;
654 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(old_opts), "cookies", sizeof("cookies"), (void **) &cookies)) {
655 array_merge(*opt, *cookies);
656 }
657 } else if ((!strcasecmp(key, "url")) || (!strcasecmp(key, "uri"))) {
658 if (Z_TYPE_PP(opt) != IS_STRING) {
659 convert_to_string_ex(opt);
660 }
661 UPD_PROP(obj, string, url, Z_STRVAL_PP(opt));
662 } else if (!strcmp(key, "method")) {
663 if (Z_TYPE_PP(opt) != IS_LONG) {
664 convert_to_long_ex(opt);
665 }
666 UPD_PROP(obj, long, method, Z_LVAL_PP(opt));
667 } else {
668 if (!strcmp(key, "ondebug")) {
669 SET_PROP(obj, dbg_user_cb, *opt);
670 }
671 zval_add_ref(opt);
672 add_assoc_zval(old_opts, key, *opt);
673 }
674
675 /* reset */
676 key = NULL;
677 }
678 }
679
680 RETURN_TRUE;
681 }
682 /* }}} */
683
684 /* {{{ proto array HttpRequest::getOptions()
685 *
686 * Get current set options.
687 */
688 PHP_METHOD(HttpRequest, getOptions)
689 {
690 NO_ARGS;
691
692 IF_RETVAL_USED {
693 zval *opts;
694 getObject(http_request_object, obj);
695
696 opts = GET_PROP(obj, options);
697 array_init(return_value);
698 array_copy(opts, return_value);
699 }
700 }
701 /* }}} */
702
703 /* {{{ proto void HttpRequest::unsetOptions()
704 *
705 * Unset all options/headers/cookies.
706 */
707 PHP_METHOD(HttpRequest, unsetOptions)
708 {
709 getObject(http_request_object, obj);
710
711 NO_ARGS;
712
713 FREE_PARR(obj, options);
714 INIT_PARR(obj, options);
715 zend_update_property_null(http_request_object_ce, getThis(), "dbg_user_cb", lenof("dbg_user_cb") TSRMLS_CC);
716 }
717 /* }}} */
718
719 /* {{{ proto bool HttpRequest::setSslOptions(array options)
720 *
721 * Set additional SSL options.
722 */
723 PHP_METHOD(HttpRequest, setSslOptions)
724 {
725 zval *opts, *old_opts, **ssl_options;
726 getObject(http_request_object, obj);
727
728 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/", &opts)) {
729 RETURN_FALSE;
730 }
731
732 old_opts = GET_PROP(obj, options);
733
734 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(old_opts), "ssl", sizeof("ssl"), (void **) &ssl_options)) {
735 array_merge(opts, *ssl_options);
736 } else {
737 zval_add_ref(&opts);
738 add_assoc_zval(old_opts, "ssl", opts);
739 }
740
741 RETURN_TRUE;
742 }
743 /* }}} */
744
745 /* {{{ proto array HttpRequest::getSslOtpions()
746 *
747 * Get previously set SSL options.
748 */
749 PHP_METHOD(HttpRequest, getSslOptions)
750 {
751 NO_ARGS;
752
753 IF_RETVAL_USED {
754 zval *opts, **ssl_options;
755 getObject(http_request_object, obj);
756
757 opts = GET_PROP(obj, options);
758
759 array_init(return_value);
760
761 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "ssl", sizeof("ssl"), (void **) &ssl_options)) {
762 array_copy(*ssl_options, return_value);
763 }
764 }
765 }
766 /* }}} */
767
768 /* {{{ proto void HttpRequest::unsetSslOptions()
769 *
770 * Unset previously set SSL options.
771 */
772 PHP_METHOD(HttpRequest, unsetSslOptions)
773 {
774 zval *opts;
775 getObject(http_request_object, obj);
776
777 NO_ARGS;
778
779 opts = GET_PROP(obj, options);
780 zend_hash_del(Z_ARRVAL_P(opts), "ssl", sizeof("ssl"));
781 }
782 /* }}} */
783
784 /* {{{ proto bool HttpRequest::addHeaders(array headers)
785 *
786 * Add request header name/value pairs.
787 */
788 PHP_METHOD(HttpRequest, addHeaders)
789 {
790 zval *opts, **headers, *new_headers;
791 getObject(http_request_object, obj);
792
793 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/", &new_headers)) {
794 RETURN_FALSE;
795 }
796
797 opts = GET_PROP(obj, options);
798
799 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "headers", sizeof("headers"), (void **) &headers)) {
800 array_merge(new_headers, *headers);
801 } else {
802 zval_add_ref(&new_headers);
803 add_assoc_zval(opts, "headers", new_headers);
804 }
805
806 RETURN_TRUE;
807 }
808 /* }}} */
809
810 /* {{{ proto array HttpRequest::getHeaders()
811 *
812 * Get previously set request headers.
813 */
814 PHP_METHOD(HttpRequest, getHeaders)
815 {
816 NO_ARGS;
817
818 IF_RETVAL_USED {
819 zval *opts, **headers;
820 getObject(http_request_object, obj);
821
822 opts = GET_PROP(obj, options);
823
824 array_init(return_value);
825
826 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "headers", sizeof("headers"), (void **) &headers)) {
827 array_copy(*headers, return_value);
828 }
829 }
830 }
831 /* }}} */
832
833 /* {{{ proto void HttpRequest::unsetHeaders()
834 *
835 * Unset previously set request headers.
836 */
837 PHP_METHOD(HttpRequest, unsetHeaders)
838 {
839 zval *opts;
840 getObject(http_request_object, obj);
841
842 NO_ARGS;
843
844 opts = GET_PROP(obj, options);
845 zend_hash_del(Z_ARRVAL_P(opts), "headers", sizeof("headers"));
846 }
847 /* }}} */
848
849 /* {{{ proto bool HttpRequest::addCookies(array cookies)
850 *
851 * Add cookies.
852 */
853 PHP_METHOD(HttpRequest, addCookies)
854 {
855 zval *opts, **cookies, *new_cookies;
856 getObject(http_request_object, obj);
857
858 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/", &new_cookies)) {
859 RETURN_FALSE;
860 }
861
862 opts = GET_PROP(obj, options);
863
864 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "cookies", sizeof("cookies"), (void **) &cookies)) {
865 array_merge(new_cookies, *cookies);
866 } else {
867 zval_add_ref(&new_cookies);
868 add_assoc_zval(opts, "cookies", new_cookies);
869 }
870
871 RETURN_TRUE;
872 }
873 /* }}} */
874
875 /* {{{ proto array HttpRequest::getCookies()
876 *
877 * Get previously set cookies.
878 */
879 PHP_METHOD(HttpRequest, getCookies)
880 {
881 NO_ARGS;
882
883 IF_RETVAL_USED {
884 zval *opts, **cookies;
885 getObject(http_request_object, obj);
886
887 opts = GET_PROP(obj, options);
888
889 array_init(return_value);
890
891 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "cookies", sizeof("cookies"), (void **) &cookies)) {
892 array_copy(*cookies, return_value);
893 }
894 }
895 }
896 /* }}} */
897
898 /* {{{ proto void HttpRequest::unsetCookies()
899 *
900 */
901 PHP_METHOD(HttpRequest, unsetCookies)
902 {
903 zval *opts;
904 getObject(http_request_object, obj);
905
906 NO_ARGS;
907
908 opts = GET_PROP(obj, options);
909 zend_hash_del(Z_ARRVAL_P(opts), "cookies", sizeof("cookies"));
910 }
911 /* }}} */
912
913 /* {{{ proto bool HttpRequest::setUrl(string url)
914 *
915 * Set the request URL.
916 */
917 PHP_METHOD(HttpRequest, setUrl)
918 {
919 char *URL = NULL;
920 int URL_len;
921 getObject(http_request_object, obj);
922
923 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &URL, &URL_len)) {
924 RETURN_FALSE;
925 }
926
927 UPD_PROP(obj, string, url, URL);
928 RETURN_TRUE;
929 }
930 /* }}} */
931
932 /* {{{ proto string HttpRequest::getUrl()
933 *
934 * Get the previously set request URL.
935 */
936 PHP_METHOD(HttpRequest, getUrl)
937 {
938 NO_ARGS;
939
940 IF_RETVAL_USED {
941 zval *URL;
942 getObject(http_request_object, obj);
943
944 URL = GET_PROP(obj, url);
945 RETURN_STRINGL(Z_STRVAL_P(URL), Z_STRLEN_P(URL), 1);
946 }
947 }
948 /* }}} */
949
950 /* {{{ proto bool HttpRequest::setMethod(long request_method)
951 *
952 * Set the request methods; one of the <tt>HTTP_HEAD</tt>, <tt>HTTP_GET</tt> or
953 * <tt>HTTP_POST</tt> constants.
954 */
955 PHP_METHOD(HttpRequest, setMethod)
956 {
957 long meth;
958 getObject(http_request_object, obj);
959
960 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &meth)) {
961 RETURN_FALSE;
962 }
963
964 UPD_PROP(obj, long, method, meth);
965 RETURN_TRUE;
966 }
967 /* }}} */
968
969 /* {{{ proto long HttpRequest::getMethod()
970 *
971 * Get the previously set request method.
972 */
973 PHP_METHOD(HttpRequest, getMethod)
974 {
975 NO_ARGS;
976
977 IF_RETVAL_USED {
978 zval *meth;
979 getObject(http_request_object, obj);
980
981 meth = GET_PROP(obj, method);
982 RETURN_LONG(Z_LVAL_P(meth));
983 }
984 }
985 /* }}} */
986
987 /* {{{ proto bool HttpRequest::setContentType(string content_type)
988 *
989 * Set the content type the post request should have.
990 * Use this only if you know what you're doing.
991 */
992 PHP_METHOD(HttpRequest, setContentType)
993 {
994 char *ctype;
995 int ct_len;
996 getObject(http_request_object, obj);
997
998 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &ctype, &ct_len)) {
999 RETURN_FALSE;
1000 }
1001
1002 if (!strchr(ctype, '/')) {
1003 http_error_ex(E_WARNING, HTTP_E_PARAM, "Content-Type '%s' doesn't seem to contain a primary and a secondary part", ctype);
1004 RETURN_FALSE;
1005 }
1006
1007 UPD_PROP(obj, string, contentType, ctype);
1008 RETURN_TRUE;
1009 }
1010 /* }}} */
1011
1012 /* {{{ proto string HttpRequest::getContentType()
1013 *
1014 * Get the previously content type.
1015 */
1016 PHP_METHOD(HttpRequest, getContentType)
1017 {
1018 NO_ARGS;
1019
1020 IF_RETVAL_USED {
1021 zval *ctype;
1022 getObject(http_request_object, obj);
1023
1024 ctype = GET_PROP(obj, contentType);
1025 RETURN_STRINGL(Z_STRVAL_P(ctype), Z_STRLEN_P(ctype), 1);
1026 }
1027 }
1028 /* }}} */
1029
1030 /* {{{ proto bool HttpRequest::setQueryData(mixed query_data)
1031 *
1032 * Set the URL query parameters to use.
1033 * Overwrites previously set query parameters.
1034 * Affects any request types.
1035 */
1036 PHP_METHOD(HttpRequest, setQueryData)
1037 {
1038 zval *qdata;
1039 char *query_data = NULL;
1040 getObject(http_request_object, obj);
1041
1042 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z", &qdata)) {
1043 RETURN_FALSE;
1044 }
1045
1046 if ((Z_TYPE_P(qdata) == IS_ARRAY) || (Z_TYPE_P(qdata) == IS_OBJECT)) {
1047 if (SUCCESS != http_urlencode_hash(HASH_OF(qdata), &query_data)) {
1048 RETURN_FALSE;
1049 }
1050 UPD_PROP(obj, string, queryData, query_data);
1051 efree(query_data);
1052 RETURN_TRUE;
1053 }
1054
1055 convert_to_string(qdata);
1056 UPD_PROP(obj, string, queryData, Z_STRVAL_P(qdata));
1057 RETURN_TRUE;
1058 }
1059 /* }}} */
1060
1061 /* {{{ proto string HttpRequest::getQueryData()
1062 *
1063 * Get the current query data in form of an urlencoded query string.
1064 */
1065 PHP_METHOD(HttpRequest, getQueryData)
1066 {
1067 NO_ARGS;
1068
1069 IF_RETVAL_USED {
1070 zval *qdata;
1071 getObject(http_request_object, obj);
1072
1073 qdata = GET_PROP(obj, queryData);
1074 RETURN_STRINGL(Z_STRVAL_P(qdata), Z_STRLEN_P(qdata), 1);
1075 }
1076 }
1077 /* }}} */
1078
1079 /* {{{ proto bool HttpRequest::addQueryData(array query_params)
1080 *
1081 * Add parameters to the query parameter list.
1082 * Affects any request type.
1083 */
1084 PHP_METHOD(HttpRequest, addQueryData)
1085 {
1086 zval *qdata, *old_qdata;
1087 char *query_data = NULL;
1088 getObject(http_request_object, obj);
1089
1090 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &qdata)) {
1091 RETURN_FALSE;
1092 }
1093
1094 old_qdata = GET_PROP(obj, queryData);
1095
1096 if (SUCCESS != http_urlencode_hash_ex(HASH_OF(qdata), 1, Z_STRVAL_P(old_qdata), Z_STRLEN_P(old_qdata), &query_data, NULL)) {
1097 RETURN_FALSE;
1098 }
1099
1100 UPD_PROP(obj, string, queryData, query_data);
1101 efree(query_data);
1102
1103 RETURN_TRUE;
1104 }
1105 /* }}} */
1106
1107 /* {{{ proto void HttpRequest::unsetQueryData()
1108 *
1109 * Clean the query parameters.
1110 * Affects any request type.
1111 */
1112 PHP_METHOD(HttpRequest, unsetQueryData)
1113 {
1114 getObject(http_request_object, obj);
1115
1116 NO_ARGS;
1117
1118 UPD_PROP(obj, string, queryData, "");
1119 }
1120 /* }}} */
1121
1122 /* {{{ proto bool HttpRequest::addPostFields(array post_data)
1123 *
1124 * Adds POST data entries.
1125 * Affects only POST requests.
1126 */
1127 PHP_METHOD(HttpRequest, addPostFields)
1128 {
1129 zval *post, *post_data;
1130 getObject(http_request_object, obj);
1131
1132 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &post_data)) {
1133 RETURN_FALSE;
1134 }
1135
1136 post = GET_PROP(obj, postFields);
1137 array_merge(post_data, post);
1138
1139 RETURN_TRUE;
1140 }
1141 /* }}} */
1142
1143 /* {{{ proto bool HttpRequest::setPostFields(array post_data)
1144 *
1145 * Set the POST data entries.
1146 * Overwrites previously set POST data.
1147 * Affects only POST requests.
1148 */
1149 PHP_METHOD(HttpRequest, setPostFields)
1150 {
1151 zval *post, *post_data;
1152 getObject(http_request_object, obj);
1153
1154 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &post_data)) {
1155 RETURN_FALSE;
1156 }
1157
1158 post = GET_PROP(obj, postFields);
1159 zend_hash_clean(Z_ARRVAL_P(post));
1160 array_copy(post_data, post);
1161
1162 RETURN_TRUE;
1163 }
1164 /* }}}*/
1165
1166 /* {{{ proto array HttpRequest::getPostFields()
1167 *
1168 * Get previously set POST data.
1169 */
1170 PHP_METHOD(HttpRequest, getPostFields)
1171 {
1172 NO_ARGS;
1173
1174 IF_RETVAL_USED {
1175 zval *post_data;
1176 getObject(http_request_object, obj);
1177
1178 post_data = GET_PROP(obj, postFields);
1179 array_init(return_value);
1180 array_copy(post_data, return_value);
1181 }
1182 }
1183 /* }}} */
1184
1185 /* {{{ proto void HttpRequest::unsetPostFields()
1186 *
1187 * Clean POST data entires.
1188 * Affects only POST requests.
1189 */
1190 PHP_METHOD(HttpRequest, unsetPostFields)
1191 {
1192 zval *post_data;
1193 getObject(http_request_object, obj);
1194
1195 NO_ARGS;
1196
1197 post_data = GET_PROP(obj, postFields);
1198 zend_hash_clean(Z_ARRVAL_P(post_data));
1199 }
1200 /* }}} */
1201
1202 /* {{{ proto bool HttpRequest::addPostFile(string name, string file[, string content_type = "application/x-octetstream"])
1203 *
1204 * Add a file to the POST request.
1205 * Affects only POST requests.
1206 */
1207 PHP_METHOD(HttpRequest, addPostFile)
1208 {
1209 zval *files, *entry;
1210 char *name, *file, *type = NULL;
1211 int name_len, file_len, type_len = 0;
1212 getObject(http_request_object, obj);
1213
1214 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ss|s", &name, &name_len, &file, &file_len, &type, &type_len)) {
1215 RETURN_FALSE;
1216 }
1217
1218 if (type_len) {
1219 if (!strchr(type, '/')) {
1220 http_error_ex(E_WARNING, HTTP_E_PARAM, "Content-Type '%s' doesn't seem to contain a primary and a secondary part", type);
1221 RETURN_FALSE;
1222 }
1223 } else {
1224 type = "application/x-octetstream";
1225 type_len = sizeof("application/x-octetstream") - 1;
1226 }
1227
1228 MAKE_STD_ZVAL(entry);
1229 array_init(entry);
1230
1231 add_assoc_stringl(entry, "name", name, name_len, 1);
1232 add_assoc_stringl(entry, "type", type, type_len, 1);
1233 add_assoc_stringl(entry, "file", file, file_len, 1);
1234
1235 files = GET_PROP(obj, postFiles);
1236 add_next_index_zval(files, entry);
1237
1238 RETURN_TRUE;
1239 }
1240 /* }}} */
1241
1242 /* {{{ proto bool HttpRequest::setPostFiles(array post_files)
1243 *
1244 * Set files to post.
1245 * Overwrites previously set post files.
1246 * Affects only POST requests.
1247 */
1248 PHP_METHOD(HttpRequest, setPostFiles)
1249 {
1250 zval *files, *pFiles;
1251 getObject(http_request_object, obj);
1252
1253 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &files)) {
1254 RETURN_FALSE;
1255 }
1256
1257 pFiles = GET_PROP(obj, postFiles);
1258 zend_hash_clean(Z_ARRVAL_P(pFiles));
1259 array_copy(files, pFiles);
1260
1261 RETURN_TRUE;
1262 }
1263 /* }}} */
1264
1265 /* {{{ proto array HttpRequest::getPostFiles()
1266 *
1267 * Get all previously added POST files.
1268 */
1269 PHP_METHOD(HttpRequest, getPostFiles)
1270 {
1271 NO_ARGS;
1272
1273 IF_RETVAL_USED {
1274 zval *files;
1275 getObject(http_request_object, obj);
1276
1277 files = GET_PROP(obj, postFiles);
1278
1279 array_init(return_value);
1280 array_copy(files, return_value);
1281 }
1282 }
1283 /* }}} */
1284
1285 /* {{{ proto void HttpRequest::unsetPostFiles()
1286 *
1287 * Unset the POST files list.
1288 * Affects only POST requests.
1289 */
1290 PHP_METHOD(HttpRequest, unsetPostFiles)
1291 {
1292 zval *files;
1293 getObject(http_request_object, obj);
1294
1295 NO_ARGS;
1296
1297 files = GET_PROP(obj, postFiles);
1298 zend_hash_clean(Z_ARRVAL_P(files));
1299 }
1300 /* }}} */
1301
1302 /* {{{ proto bool HttpRequest::SetPutFile(string file)
1303 *
1304 * Set file to put.
1305 * Affects only PUT requests.
1306 */
1307 PHP_METHOD(HttpRequest, setPutFile)
1308 {
1309 char *file;
1310 int file_len;
1311 getObject(http_request_object, obj);
1312
1313 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &file, &file_len)) {
1314 RETURN_FALSE;
1315 }
1316
1317 UPD_PROP(obj, string, putFile, file);
1318 RETURN_TRUE;
1319 }
1320 /* }}} */
1321
1322 /* {{{ proto string HttpRequest::getPutFile()
1323 *
1324 * Get previously set put file.
1325 */
1326 PHP_METHOD(HttpRequest, getPutFile)
1327 {
1328 NO_ARGS;
1329
1330 IF_RETVAL_USED {
1331 zval *putfile;
1332 getObject(http_request_object, obj);
1333
1334 putfile = GET_PROP(obj, putFile);
1335 RETVAL_STRINGL(Z_STRVAL_P(putfile), Z_STRLEN_P(putfile), 1);
1336 }
1337 }
1338 /* }}} */
1339
1340 /* {{{ proto void HttpRequest::unsetPutFile()
1341 *
1342 * Unset file to put.
1343 * Affects only PUT requests.
1344 */
1345 PHP_METHOD(HttpRequest, unsetPutFile)
1346 {
1347 getObject(http_request_object, obj);
1348
1349 NO_ARGS;
1350
1351 UPD_PROP(obj, string, putFile, "");
1352 }
1353 /* }}} */
1354
1355 /* {{{ proto array HttpRequest::getResponseData()
1356 *
1357 * Get all response data after the request has been sent.
1358 */
1359 PHP_METHOD(HttpRequest, getResponseData)
1360 {
1361 NO_ARGS;
1362
1363 IF_RETVAL_USED {
1364 zval *data;
1365 getObject(http_request_object, obj);
1366
1367 data = GET_PROP(obj, responseData);
1368 array_init(return_value);
1369 array_copy(data, return_value);
1370 }
1371 }
1372 /* }}} */
1373
1374 /* {{{ proto mixed HttpRequest::getResponseHeader([string name])
1375 *
1376 * Get response header(s) after the request has been sent.
1377 */
1378 PHP_METHOD(HttpRequest, getResponseHeader)
1379 {
1380 IF_RETVAL_USED {
1381 zval *data, **headers, **header;
1382 char *header_name = NULL;
1383 int header_len = 0;
1384 getObject(http_request_object, obj);
1385
1386 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &header_name, &header_len)) {
1387 RETURN_FALSE;
1388 }
1389
1390 data = GET_PROP(obj, responseData);
1391 if (SUCCESS != zend_hash_find(Z_ARRVAL_P(data), "headers", sizeof("headers"), (void **) &headers)) {
1392 RETURN_FALSE;
1393 }
1394
1395 if (!header_len || !header_name) {
1396 array_init(return_value);
1397 array_copy(*headers, return_value);
1398 } else if (SUCCESS == zend_hash_find(Z_ARRVAL_PP(headers), pretty_key(header_name, header_len, 1, 1), header_len + 1, (void **) &header)) {
1399 RETURN_STRINGL(Z_STRVAL_PP(header), Z_STRLEN_PP(header), 1);
1400 } else {
1401 RETURN_FALSE;
1402 }
1403 }
1404 }
1405 /* }}} */
1406
1407 /* {{{ proto array HttpRequest::getResponseCookie([string name])
1408 *
1409 * Get response cookie(s) after the request has been sent.
1410 */
1411 PHP_METHOD(HttpRequest, getResponseCookie)
1412 {
1413 IF_RETVAL_USED {
1414 zval *data, **headers;
1415 char *cookie_name = NULL;
1416 int cookie_len = 0;
1417 getObject(http_request_object, obj);
1418
1419 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &cookie_name, &cookie_len)) {
1420 RETURN_FALSE;
1421 }
1422
1423 array_init(return_value);
1424
1425 data = GET_PROP(obj, responseData);
1426 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(data), "headers", sizeof("headers"), (void **) &headers)) {
1427 ulong idx = 0;
1428 char *key = NULL;
1429 zval **header = NULL;
1430
1431 FOREACH_HASH_KEYVAL(Z_ARRVAL_PP(headers), key, idx, header) {
1432 if (key && !strcasecmp(key, "Set-Cookie")) {
1433 /* several cookies? */
1434 if (Z_TYPE_PP(header) == IS_ARRAY) {
1435 zval **cookie;
1436
1437 FOREACH_HASH_VAL(Z_ARRVAL_PP(header), cookie) {
1438 zval *cookie_hash;
1439 MAKE_STD_ZVAL(cookie_hash);
1440 array_init(cookie_hash);
1441
1442 if (SUCCESS == http_parse_cookie(Z_STRVAL_PP(cookie), Z_ARRVAL_P(cookie_hash))) {
1443 if (!cookie_len) {
1444 add_next_index_zval(return_value, cookie_hash);
1445 } else {
1446 zval **name;
1447
1448 if ( (SUCCESS == zend_hash_find(Z_ARRVAL_P(cookie_hash), "name", sizeof("name"), (void **) &name)) &&
1449 (!strcmp(Z_STRVAL_PP(name), cookie_name))) {
1450 add_next_index_zval(return_value, cookie_hash);
1451 return; /* <<< FOUND >>> */
1452 } else {
1453 zval_dtor(cookie_hash);
1454 efree(cookie_hash);
1455 }
1456 }
1457 } else {
1458 zval_dtor(cookie_hash);
1459 efree(cookie_hash);
1460 }
1461 }
1462 } else {
1463 zval *cookie_hash;
1464 MAKE_STD_ZVAL(cookie_hash);
1465 array_init(cookie_hash);
1466
1467 if (SUCCESS == http_parse_cookie(Z_STRVAL_PP(header), Z_ARRVAL_P(cookie_hash))) {
1468 if (!cookie_len) {
1469 add_next_index_zval(return_value, cookie_hash);
1470 } else {
1471 zval **name;
1472
1473 if ( (SUCCESS == zend_hash_find(Z_ARRVAL_P(cookie_hash), "name", sizeof("name"), (void **) &name)) &&
1474 (!strcmp(Z_STRVAL_PP(name), cookie_name))) {
1475 add_next_index_zval(return_value, cookie_hash);
1476 } else {
1477 zval_dtor(cookie_hash);
1478 efree(cookie_hash);
1479 }
1480 }
1481 } else {
1482 zval_dtor(cookie_hash);
1483 efree(cookie_hash);
1484 }
1485 }
1486 break;
1487 }
1488 /* reset key */
1489 key = NULL;
1490 }
1491 }
1492 }
1493 }
1494 /* }}} */
1495
1496 /* {{{ proto string HttpRequest::getResponseBody()
1497 *
1498 * Get the response body after the request has been sent.
1499 */
1500 PHP_METHOD(HttpRequest, getResponseBody)
1501 {
1502 NO_ARGS;
1503
1504 IF_RETVAL_USED {
1505 zval *data, **body;
1506 getObject(http_request_object, obj);
1507
1508 data = GET_PROP(obj, responseData);
1509 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(data), "body", sizeof("body"), (void **) &body)) {
1510 RETURN_STRINGL(Z_STRVAL_PP(body), Z_STRLEN_PP(body), 1);
1511 } else {
1512 RETURN_FALSE;
1513 }
1514 }
1515 }
1516 /* }}} */
1517
1518 /* {{{ proto int HttpRequest::getResponseCode()
1519 *
1520 * Get the response code after the request has been sent.
1521 */
1522 PHP_METHOD(HttpRequest, getResponseCode)
1523 {
1524 NO_ARGS;
1525
1526 IF_RETVAL_USED {
1527 zval *code;
1528 getObject(http_request_object, obj);
1529
1530 code = GET_PROP(obj, responseCode);
1531 RETURN_LONG(Z_LVAL_P(code));
1532 }
1533 }
1534 /* }}} */
1535
1536 /* {{{ proto array HttpRequest::getResponseInfo([string name])
1537 *
1538 * Get response info after the request has been sent.
1539 * See http_get() for a full list of returned info.
1540 */
1541 PHP_METHOD(HttpRequest, getResponseInfo)
1542 {
1543 IF_RETVAL_USED {
1544 zval *info, **infop;
1545 char *info_name = NULL;
1546 int info_len = 0;
1547 getObject(http_request_object, obj);
1548
1549 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &info_name, &info_len)) {
1550 RETURN_FALSE;
1551 }
1552
1553 info = GET_PROP(obj, responseInfo);
1554
1555 if (info_len && info_name) {
1556 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(info), pretty_key(info_name, info_len, 0, 0), info_len + 1, (void **) &infop)) {
1557 RETURN_ZVAL(*infop, 1, ZVAL_PTR_DTOR);
1558 } else {
1559 http_error_ex(E_NOTICE, HTTP_E_PARAM, "Could not find response info named %s", info_name);
1560 RETURN_FALSE;
1561 }
1562 } else {
1563 array_init(return_value);
1564 array_copy(info, return_value);
1565 }
1566 }
1567 }
1568 /* }}}*/
1569
1570 /* {{{ proto HttpMessage HttpRequest::getResponseMessage()
1571 *
1572 * Get the full response as HttpMessage object.
1573 */
1574 PHP_METHOD(HttpRequest, getResponseMessage)
1575 {
1576 NO_ARGS;
1577
1578 IF_RETVAL_USED {
1579 zval *message;
1580 getObject(http_request_object, obj);
1581
1582 SET_EH_THROW_HTTP();
1583 message = GET_PROP(obj, responseMessage);
1584 if (Z_TYPE_P(message) == IS_OBJECT) {
1585 RETVAL_OBJECT(message);
1586 } else {
1587 RETVAL_NULL();
1588 }
1589 SET_EH_NORMAL();
1590 }
1591 }
1592 /* }}} */
1593
1594 /* {{{ proto HttpMessage HttpRequest::getRequestMessage()
1595 *
1596 * Get sent HTTP message.
1597 */
1598 PHP_METHOD(HttpRequest, getRequestMessage)
1599 {
1600 NO_ARGS;
1601
1602 IF_RETVAL_USED {
1603 zval *message;
1604 http_message *msg;
1605 getObject(http_request_object, obj);
1606
1607 SET_EH_THROW_HTTP();
1608 if (msg = http_message_parse(PHPSTR_VAL(&obj->request), PHPSTR_LEN(&obj->request))) {
1609 RETVAL_OBJVAL(http_message_object_from_msg(msg));
1610 }
1611 SET_EH_NORMAL();
1612 }
1613 }
1614 /* }}} */
1615
1616 PHP_METHOD(HttpRequest, getHistory)
1617 {
1618 NO_ARGS;
1619
1620 IF_RETVAL_USED {
1621 zval *history;
1622 http_message *msg;
1623 getObject(http_request_object, obj);
1624
1625 SET_EH_THROW_HTTP();
1626 if (msg = http_message_parse(PHPSTR_VAL(&obj->history), PHPSTR_LEN(&obj->history))) {
1627 RETVAL_OBJVAL(http_message_object_from_msg(msg));
1628 }
1629 SET_EH_NORMAL();
1630 }
1631 }
1632
1633 /* {{{ proto bool HttpRequest::send()
1634 *
1635 * Send the HTTP request.
1636 *
1637 * GET example:
1638 * <pre>
1639 * <?php
1640 * $r = new HttpRequest('http://example.com/feed.rss', HTTP_GET);
1641 * $r->setOptions(array('lastmodified' => filemtime('local.rss')));
1642 * $r->addQueryData(array('category' => 3));
1643 * try {
1644 * $r->send();
1645 * if ($r->getResponseCode() == 200) {
1646 * file_put_contents('local.rss', $r->getResponseBody());
1647 * }
1648 * } catch (HttpException $ex) {
1649 * echo $ex;
1650 * }
1651 * ?>
1652 * </pre>
1653 *
1654 * POST example:
1655 * <pre>
1656 * <?php
1657 * $r = new HttpRequest('http://example.com/form.php', HTTP_POST);
1658 * $r->setOptions(array('cookies' => array('lang' => 'de')));
1659 * $r->addpostFields(array('user' => 'mike', 'pass' => 's3c|r3t'));
1660 * $r->addPostFile('image', 'profile.jpg', 'image/jpeg');
1661 * if ($r->send()) {
1662 * echo $r->getResponseBody();
1663 * }
1664 * ?>
1665 * </pre>
1666 */
1667 PHP_METHOD(HttpRequest, send)
1668 {
1669 STATUS status = FAILURE;
1670 http_request_body body = {0, NULL, 0};
1671 getObject(http_request_object, obj);
1672
1673 NO_ARGS;
1674
1675 SET_EH_THROW_HTTP();
1676
1677 if (obj->pool) {
1678 http_error(E_WARNING, HTTP_E_CURL, "Cannot perform HttpRequest::send() while attached to an HttpRequestPool");
1679 SET_EH_NORMAL();
1680 RETURN_FALSE;
1681 }
1682
1683 if (SUCCESS == (status = http_request_object_requesthandler(obj, getThis(), &body))) {
1684 status = http_request_exec(obj->ch, NULL);
1685 }
1686 http_request_body_dtor(&body);
1687
1688 /* final data handling */
1689 if (SUCCESS == status) {
1690 status = http_request_object_responsehandler(obj, getThis());
1691 }
1692
1693 SET_EH_NORMAL();
1694 RETURN_SUCCESS(status);
1695 }
1696 /* }}} */
1697
1698 /* {{{ proto private HttpRequest::debugWrapper(long type, string message)
1699 */
1700 PHP_METHOD(HttpRequest, debugWrapper)
1701 {
1702 static int curl_ignores_body = 0;
1703 getObject(http_request_object, obj);
1704 zval *type, *message, *dbg_user_cb = GET_PROP(obj, dbg_user_cb);
1705
1706 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "zz", &type, &message)) {
1707 RETURN_NULL();
1708 }
1709
1710 if (Z_TYPE_P(type) != IS_LONG) {
1711 convert_to_long_ex(&type);
1712 }
1713 if (Z_TYPE_P(message) != IS_STRING) {
1714 convert_to_string_ex(&message);
1715 }
1716
1717 switch (Z_LVAL_P(type))
1718 {
1719 case CURLINFO_DATA_IN:
1720 /* fetch ignored body */
1721 if (curl_ignores_body && Z_LVAL_P(type) == CURLINFO_DATA_IN) {
1722 phpstr_append(&obj->response, Z_STRVAL_P(message), Z_STRLEN_P(message));
1723 }
1724 break;
1725
1726 case CURLINFO_TEXT:
1727 /* check if following incoming data would be ignored */
1728 curl_ignores_body = !strcmp(Z_STRVAL_P(message), "Ignoring the response-body\n");
1729 break;
1730
1731 case CURLINFO_HEADER_OUT:
1732 case CURLINFO_DATA_OUT:
1733 /* fetch outgoing request message */
1734 phpstr_append(&obj->request, Z_STRVAL_P(message), Z_STRLEN_P(message));
1735 break;
1736 }
1737
1738 /* call user debug callback */
1739 if (Z_TYPE_P(dbg_user_cb) != IS_NULL) {
1740 zval *args[2], cb_ret;
1741
1742 args[0] = type;
1743 args[1] = message;
1744 call_user_function(EG(function_table), NULL, dbg_user_cb, &cb_ret, 2, args TSRMLS_CC);
1745 }
1746
1747 RETURN_NULL();
1748 }
1749 /* }}} */
1750
1751 #endif /* ZEND_ENGINE_2 && HTTP_HAVE_CURL */
1752
1753 /*
1754 * Local variables:
1755 * tab-width: 4
1756 * c-basic-offset: 4
1757 * End:
1758 * vim600: noet sw=4 ts=4 fdm=marker
1759 * vim<600: noet sw=4 ts=4
1760 */
1761