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