158a334bd378d5b0bf1f132bc85b507d08cc125d
[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_PROGRESSFUNCTION, NULL);
394 curl_easy_setopt(o->ch, CURLOPT_VERBOSE, 0);
395 curl_easy_setopt(o->ch, CURLOPT_DEBUGFUNCTION, NULL);
396 curl_easy_cleanup(o->ch);
397 }
398 phpstr_dtor(&o->response);
399 phpstr_dtor(&o->request);
400 phpstr_dtor(&o->history);
401 efree(o);
402 }
403
404 STATUS _http_request_object_requesthandler(http_request_object *obj, zval *this_ptr, http_request_body *body TSRMLS_DC)
405 {
406 zval *meth, *URL, *qdata, *opts;
407 char *request_uri;
408 STATUS status;
409
410 if (!body) {
411 return FAILURE;
412 }
413 if ((!obj->ch) && (!(obj->ch = curl_easy_init()))) {
414 http_error(E_WARNING, HTTP_E_CURL, "Could not initilaize curl");
415 return FAILURE;
416 }
417
418 meth = GET_PROP(obj, method);
419 URL = GET_PROP(obj, url);
420 qdata = GET_PROP(obj, queryData);
421 opts = GET_PROP(obj, options);
422
423 // HTTP_URI_MAXLEN+1 long char *
424 if (!(request_uri = http_absolute_uri_ex(Z_STRVAL_P(URL), Z_STRLEN_P(URL), NULL, 0, NULL, 0, 0))) {
425 return FAILURE;
426 }
427
428 if (Z_STRLEN_P(qdata) && (strlen(request_uri) < HTTP_URI_MAXLEN)) {
429 if (!strchr(request_uri, '?')) {
430 strcat(request_uri, "?");
431 } else {
432 strcat(request_uri, "&");
433 }
434 strncat(request_uri, Z_STRVAL_P(qdata), HTTP_URI_MAXLEN - strlen(request_uri));
435 }
436
437 /* ensure we have HttpRequest::debugWrapper as dbg callback */
438 {
439 zval *dbg_cb;
440 MAKE_STD_ZVAL(dbg_cb);
441 array_init(dbg_cb);
442 zval_add_ref(&getThis());
443 add_next_index_zval(dbg_cb, getThis());
444 add_next_index_stringl(dbg_cb, "debugWrapper", lenof("debugWrapper"), 1);
445 add_assoc_zval(opts, "ondebug", dbg_cb);
446 }
447 /* */
448
449 switch (Z_LVAL_P(meth))
450 {
451 case HTTP_GET:
452 case HTTP_HEAD:
453 body->type = -1;
454 status = http_request_init(obj->ch, Z_LVAL_P(meth), request_uri, NULL, Z_ARRVAL_P(opts), &obj->response);
455 break;
456
457 case HTTP_PUT:
458 {
459 php_stream *stream;
460 php_stream_statbuf ssb;
461 zval *file = GET_PROP(obj, putFile);
462
463 if ( (stream = php_stream_open_wrapper(Z_STRVAL_P(file), "rb", REPORT_ERRORS|ENFORCE_SAFE_MODE, NULL)) &&
464 !php_stream_stat(stream, &ssb)) {
465 body->type = HTTP_REQUEST_BODY_UPLOADFILE;
466 body->data = stream;
467 body->size = ssb.sb.st_size;
468
469 status = http_request_init(obj->ch, HTTP_PUT, request_uri, body, Z_ARRVAL_P(opts), &obj->response);
470 } else {
471 status = FAILURE;
472 }
473 }
474 break;
475
476 case HTTP_POST:
477 {
478 zval *fields = GET_PROP(obj, postFields), *files = GET_PROP(obj, postFiles);
479
480 if (SUCCESS == (status = http_request_body_fill(body, Z_ARRVAL_P(fields), Z_ARRVAL_P(files)))) {
481 status = http_request_init(obj->ch, HTTP_POST, request_uri, body, Z_ARRVAL_P(opts), &obj->response);
482 }
483 }
484 break;
485
486 default:
487 {
488 zval *post = GET_PROP(obj, postData);
489
490 body->type = HTTP_REQUEST_BODY_CSTRING;
491 body->data = Z_STRVAL_P(post);
492 body->size = Z_STRLEN_P(post);
493
494 status = http_request_init(obj->ch, Z_LVAL_P(meth), request_uri, body, Z_ARRVAL_P(opts), &obj->response);
495 }
496 break;
497 }
498
499 /* clean previous response */
500 phpstr_dtor(&obj->response);
501 /* clean previous request */
502 phpstr_dtor(&obj->request);
503
504 efree(request_uri);
505 return status;
506 }
507
508 STATUS _http_request_object_responsehandler(http_request_object *obj, zval *this_ptr TSRMLS_DC)
509 {
510 http_message *msg;
511
512 phpstr_fix(&obj->request);
513 phpstr_fix(&obj->response);
514
515 if (msg = http_message_parse(PHPSTR_VAL(&obj->response), PHPSTR_LEN(&obj->response))) {
516 char *body;
517 size_t body_len;
518 zval *headers, *message,
519 *resp = GET_PROP(obj, responseData),
520 *info = GET_PROP(obj, responseInfo),
521 *hist = GET_PROP(obj, recordHistory);
522
523 if (Z_TYPE_P(hist) != IS_BOOL) {
524 convert_to_boolean_ex(&hist);
525 }
526 if (Z_LVAL_P(hist)) {
527 /* we need to act like a zipper, as we'll receive
528 * the requests and the responses in separate chains
529 * for redirects
530 */
531 http_message *response = msg, *request = http_message_parse(PHPSTR_VAL(&obj->request), PHPSTR_LEN(&obj->request));
532 http_message *free_msg = request;
533
534 do {
535 char *message;
536 size_t msglen;
537
538 http_message_tostring(response, &message, &msglen);
539 phpstr_append(&obj->history, message, msglen);
540 efree(message);
541
542 http_message_tostring(request, &message, &msglen);
543 phpstr_append(&obj->history, message, msglen);
544 efree(message);
545
546 } while ((response = response->parent) && (request = request->parent));
547
548 http_message_free(free_msg);
549 phpstr_fix(&obj->history);
550 }
551
552 UPD_PROP(obj, long, responseCode, msg->info.response.code);
553
554 MAKE_STD_ZVAL(headers)
555 array_init(headers);
556
557 zend_hash_copy(Z_ARRVAL_P(headers), &msg->hdrs, (copy_ctor_func_t) zval_add_ref, NULL, sizeof(zval *));
558 phpstr_data(PHPSTR(msg), &body, &body_len);
559
560 add_assoc_zval(resp, "headers", headers);
561 add_assoc_stringl(resp, "body", body, body_len, 0);
562
563 MAKE_STD_ZVAL(message);
564 message->type = IS_OBJECT;
565 message->is_ref = 1;
566 message->value.obj = http_message_object_from_msg(msg);
567 SET_PROP(obj, responseMessage, message);
568 zval_ptr_dtor(&message);
569
570 http_request_info(obj->ch, Z_ARRVAL_P(info));
571 SET_PROP(obj, responseInfo, info);
572
573 return SUCCESS;
574 }
575 return FAILURE;
576 }
577
578 /* ### USERLAND ### */
579
580 /* {{{ proto void HttpRequest::__construct([string url[, long request_method = HTTP_GET]])
581 *
582 * Instantiate a new HttpRequest object which can be used to issue HEAD, GET
583 * and POST (including posting files) HTTP requests.
584 */
585 PHP_METHOD(HttpRequest, __construct)
586 {
587 char *URL = NULL;
588 int URL_len;
589 long meth = -1;
590 getObject(http_request_object, obj);
591
592 SET_EH_THROW_HTTP();
593 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|sl", &URL, &URL_len, &meth)) {
594 INIT_PARR(obj, options);
595 INIT_PARR(obj, responseInfo);
596 INIT_PARR(obj, responseData);
597 INIT_PARR(obj, postFields);
598 INIT_PARR(obj, postFiles);
599
600 if (URL) {
601 UPD_PROP(obj, string, url, URL);
602 }
603 if (meth > -1) {
604 UPD_PROP(obj, long, method, meth);
605 }
606 }
607 SET_EH_NORMAL();
608 }
609 /* }}} */
610
611 /* {{{ proto void HttpRequest::__destruct()
612 *
613 * Destroys the HttpRequest object.
614 */
615 PHP_METHOD(HttpRequest, __destruct)
616 {
617 getObject(http_request_object, obj);
618
619 NO_ARGS;
620
621 FREE_PARR(obj, options);
622 FREE_PARR(obj, responseInfo);
623 FREE_PARR(obj, responseData);
624 FREE_PARR(obj, postFields);
625 FREE_PARR(obj, postFiles);
626 }
627 /* }}} */
628
629 /* {{{ proto bool HttpRequest::setOptions(array options)
630 *
631 * Set the request options to use. See http_get() for a full list of available options.
632 */
633 PHP_METHOD(HttpRequest, setOptions)
634 {
635 char *key = NULL;
636 ulong idx = 0;
637 zval *opts, *old_opts, **opt;
638 getObject(http_request_object, obj);
639
640 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/", &opts)) {
641 RETURN_FALSE;
642 }
643
644 old_opts = GET_PROP(obj, options);
645
646 /* some options need extra attention -- thus cannot use array_merge() directly */
647 FOREACH_KEYVAL(opts, key, idx, opt) {
648 if (key) {
649 if (!strcmp(key, "headers")) {
650 zval **headers;
651 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(old_opts), "headers", sizeof("headers"), (void **) &headers)) {
652 array_merge(*opt, *headers);
653 continue;
654 }
655 } else if (!strcmp(key, "cookies")) {
656 zval **cookies;
657 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(old_opts), "cookies", sizeof("cookies"), (void **) &cookies)) {
658 array_merge(*opt, *cookies);
659 continue;
660 }
661 } else if (!strcmp(key, "ssl")) {
662 zval **ssl;
663 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(old_opts), "ssl", sizeof("ssl"), (void **) &ssl)) {
664 array_merge(*opt, *ssl);
665 continue;
666 }
667 }else if ((!strcasecmp(key, "url")) || (!strcasecmp(key, "uri"))) {
668 if (Z_TYPE_PP(opt) != IS_STRING) {
669 convert_to_string_ex(opt);
670 }
671 UPD_PROP(obj, string, url, Z_STRVAL_PP(opt));
672 continue;
673 } else if (!strcmp(key, "method")) {
674 if (Z_TYPE_PP(opt) != IS_LONG) {
675 convert_to_long_ex(opt);
676 }
677 UPD_PROP(obj, long, method, Z_LVAL_PP(opt));
678 continue;
679 } else if (!strcmp(key, "ondebug")) {
680 SET_PROP(obj, dbg_user_cb, *opt);
681 }
682
683 zval_add_ref(opt);
684 add_assoc_zval(old_opts, key, *opt);
685
686 /* reset */
687 key = NULL;
688 }
689 }
690
691 RETURN_TRUE;
692 }
693 /* }}} */
694
695 /* {{{ proto array HttpRequest::getOptions()
696 *
697 * Get current set options.
698 */
699 PHP_METHOD(HttpRequest, getOptions)
700 {
701 NO_ARGS;
702
703 IF_RETVAL_USED {
704 zval *opts;
705 getObject(http_request_object, obj);
706
707 opts = GET_PROP(obj, options);
708 array_init(return_value);
709 array_copy(opts, return_value);
710 }
711 }
712 /* }}} */
713
714 /* {{{ proto void HttpRequest::unsetOptions()
715 *
716 * Unset all options/headers/cookies.
717 */
718 PHP_METHOD(HttpRequest, unsetOptions)
719 {
720 getObject(http_request_object, obj);
721
722 NO_ARGS;
723
724 FREE_PARR(obj, options);
725 INIT_PARR(obj, options);
726 zend_update_property_null(http_request_object_ce, getThis(), "dbg_user_cb", lenof("dbg_user_cb") TSRMLS_CC);
727 }
728 /* }}} */
729
730 /* {{{ proto bool HttpRequest::setSslOptions(array options)
731 *
732 * Set additional SSL options.
733 */
734 PHP_METHOD(HttpRequest, setSslOptions)
735 {
736 zval *opts, *old_opts, **ssl_options;
737 getObject(http_request_object, obj);
738
739 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/", &opts)) {
740 RETURN_FALSE;
741 }
742
743 old_opts = GET_PROP(obj, options);
744
745 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(old_opts), "ssl", sizeof("ssl"), (void **) &ssl_options)) {
746 array_merge(opts, *ssl_options);
747 } else {
748 zval_add_ref(&opts);
749 add_assoc_zval(old_opts, "ssl", opts);
750 }
751
752 RETURN_TRUE;
753 }
754 /* }}} */
755
756 /* {{{ proto array HttpRequest::getSslOtpions()
757 *
758 * Get previously set SSL options.
759 */
760 PHP_METHOD(HttpRequest, getSslOptions)
761 {
762 NO_ARGS;
763
764 IF_RETVAL_USED {
765 zval *opts, **ssl_options;
766 getObject(http_request_object, obj);
767
768 opts = GET_PROP(obj, options);
769
770 array_init(return_value);
771
772 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "ssl", sizeof("ssl"), (void **) &ssl_options)) {
773 array_copy(*ssl_options, return_value);
774 }
775 }
776 }
777 /* }}} */
778
779 /* {{{ proto void HttpRequest::unsetSslOptions()
780 *
781 * Unset previously set SSL options.
782 */
783 PHP_METHOD(HttpRequest, unsetSslOptions)
784 {
785 zval *opts;
786 getObject(http_request_object, obj);
787
788 NO_ARGS;
789
790 opts = GET_PROP(obj, options);
791 zend_hash_del(Z_ARRVAL_P(opts), "ssl", sizeof("ssl"));
792 }
793 /* }}} */
794
795 /* {{{ proto bool HttpRequest::addHeaders(array headers)
796 *
797 * Add request header name/value pairs.
798 */
799 PHP_METHOD(HttpRequest, addHeaders)
800 {
801 zval *opts, **headers, *new_headers;
802 getObject(http_request_object, obj);
803
804 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/", &new_headers)) {
805 RETURN_FALSE;
806 }
807
808 opts = GET_PROP(obj, options);
809
810 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "headers", sizeof("headers"), (void **) &headers)) {
811 array_merge(new_headers, *headers);
812 } else {
813 zval_add_ref(&new_headers);
814 add_assoc_zval(opts, "headers", new_headers);
815 }
816
817 RETURN_TRUE;
818 }
819 /* }}} */
820
821 /* {{{ proto array HttpRequest::getHeaders()
822 *
823 * Get previously set request headers.
824 */
825 PHP_METHOD(HttpRequest, getHeaders)
826 {
827 NO_ARGS;
828
829 IF_RETVAL_USED {
830 zval *opts, **headers;
831 getObject(http_request_object, obj);
832
833 opts = GET_PROP(obj, options);
834
835 array_init(return_value);
836
837 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "headers", sizeof("headers"), (void **) &headers)) {
838 array_copy(*headers, return_value);
839 }
840 }
841 }
842 /* }}} */
843
844 /* {{{ proto void HttpRequest::unsetHeaders()
845 *
846 * Unset previously set request headers.
847 */
848 PHP_METHOD(HttpRequest, unsetHeaders)
849 {
850 zval *opts;
851 getObject(http_request_object, obj);
852
853 NO_ARGS;
854
855 opts = GET_PROP(obj, options);
856 zend_hash_del(Z_ARRVAL_P(opts), "headers", sizeof("headers"));
857 }
858 /* }}} */
859
860 /* {{{ proto bool HttpRequest::addCookies(array cookies)
861 *
862 * Add cookies.
863 */
864 PHP_METHOD(HttpRequest, addCookies)
865 {
866 zval *opts, **cookies, *new_cookies;
867 getObject(http_request_object, obj);
868
869 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/", &new_cookies)) {
870 RETURN_FALSE;
871 }
872
873 opts = GET_PROP(obj, options);
874
875 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "cookies", sizeof("cookies"), (void **) &cookies)) {
876 array_merge(new_cookies, *cookies);
877 } else {
878 zval_add_ref(&new_cookies);
879 add_assoc_zval(opts, "cookies", new_cookies);
880 }
881
882 RETURN_TRUE;
883 }
884 /* }}} */
885
886 /* {{{ proto array HttpRequest::getCookies()
887 *
888 * Get previously set cookies.
889 */
890 PHP_METHOD(HttpRequest, getCookies)
891 {
892 NO_ARGS;
893
894 IF_RETVAL_USED {
895 zval *opts, **cookies;
896 getObject(http_request_object, obj);
897
898 opts = GET_PROP(obj, options);
899
900 array_init(return_value);
901
902 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "cookies", sizeof("cookies"), (void **) &cookies)) {
903 array_copy(*cookies, return_value);
904 }
905 }
906 }
907 /* }}} */
908
909 /* {{{ proto void HttpRequest::unsetCookies()
910 *
911 */
912 PHP_METHOD(HttpRequest, unsetCookies)
913 {
914 zval *opts;
915 getObject(http_request_object, obj);
916
917 NO_ARGS;
918
919 opts = GET_PROP(obj, options);
920 zend_hash_del(Z_ARRVAL_P(opts), "cookies", sizeof("cookies"));
921 }
922 /* }}} */
923
924 /* {{{ proto bool HttpRequest::setUrl(string url)
925 *
926 * Set the request URL.
927 */
928 PHP_METHOD(HttpRequest, setUrl)
929 {
930 char *URL = NULL;
931 int URL_len;
932 getObject(http_request_object, obj);
933
934 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &URL, &URL_len)) {
935 RETURN_FALSE;
936 }
937
938 UPD_PROP(obj, string, url, URL);
939 RETURN_TRUE;
940 }
941 /* }}} */
942
943 /* {{{ proto string HttpRequest::getUrl()
944 *
945 * Get the previously set request URL.
946 */
947 PHP_METHOD(HttpRequest, getUrl)
948 {
949 NO_ARGS;
950
951 IF_RETVAL_USED {
952 zval *URL;
953 getObject(http_request_object, obj);
954
955 URL = GET_PROP(obj, url);
956 RETURN_STRINGL(Z_STRVAL_P(URL), Z_STRLEN_P(URL), 1);
957 }
958 }
959 /* }}} */
960
961 /* {{{ proto bool HttpRequest::setMethod(long request_method)
962 *
963 * Set the request methods; one of the <tt>HTTP_HEAD</tt>, <tt>HTTP_GET</tt> or
964 * <tt>HTTP_POST</tt> constants.
965 */
966 PHP_METHOD(HttpRequest, setMethod)
967 {
968 long meth;
969 getObject(http_request_object, obj);
970
971 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &meth)) {
972 RETURN_FALSE;
973 }
974
975 UPD_PROP(obj, long, method, meth);
976 RETURN_TRUE;
977 }
978 /* }}} */
979
980 /* {{{ proto long HttpRequest::getMethod()
981 *
982 * Get the previously set request method.
983 */
984 PHP_METHOD(HttpRequest, getMethod)
985 {
986 NO_ARGS;
987
988 IF_RETVAL_USED {
989 zval *meth;
990 getObject(http_request_object, obj);
991
992 meth = GET_PROP(obj, method);
993 RETURN_LONG(Z_LVAL_P(meth));
994 }
995 }
996 /* }}} */
997
998 /* {{{ proto bool HttpRequest::setContentType(string content_type)
999 *
1000 * Set the content type the post request should have.
1001 * Use this only if you know what you're doing.
1002 */
1003 PHP_METHOD(HttpRequest, setContentType)
1004 {
1005 char *ctype;
1006 int ct_len;
1007 getObject(http_request_object, obj);
1008
1009 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &ctype, &ct_len)) {
1010 RETURN_FALSE;
1011 }
1012
1013 if (!strchr(ctype, '/')) {
1014 http_error_ex(E_WARNING, HTTP_E_PARAM, "Content-Type '%s' doesn't seem to contain a primary and a secondary part", ctype);
1015 RETURN_FALSE;
1016 }
1017
1018 UPD_PROP(obj, string, contentType, ctype);
1019 RETURN_TRUE;
1020 }
1021 /* }}} */
1022
1023 /* {{{ proto string HttpRequest::getContentType()
1024 *
1025 * Get the previously content type.
1026 */
1027 PHP_METHOD(HttpRequest, getContentType)
1028 {
1029 NO_ARGS;
1030
1031 IF_RETVAL_USED {
1032 zval *ctype;
1033 getObject(http_request_object, obj);
1034
1035 ctype = GET_PROP(obj, contentType);
1036 RETURN_STRINGL(Z_STRVAL_P(ctype), Z_STRLEN_P(ctype), 1);
1037 }
1038 }
1039 /* }}} */
1040
1041 /* {{{ proto bool HttpRequest::setQueryData(mixed query_data)
1042 *
1043 * Set the URL query parameters to use.
1044 * Overwrites previously set query parameters.
1045 * Affects any request types.
1046 */
1047 PHP_METHOD(HttpRequest, setQueryData)
1048 {
1049 zval *qdata;
1050 char *query_data = NULL;
1051 getObject(http_request_object, obj);
1052
1053 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z", &qdata)) {
1054 RETURN_FALSE;
1055 }
1056
1057 if ((Z_TYPE_P(qdata) == IS_ARRAY) || (Z_TYPE_P(qdata) == IS_OBJECT)) {
1058 if (SUCCESS != http_urlencode_hash(HASH_OF(qdata), &query_data)) {
1059 RETURN_FALSE;
1060 }
1061 UPD_PROP(obj, string, queryData, query_data);
1062 efree(query_data);
1063 RETURN_TRUE;
1064 }
1065
1066 convert_to_string(qdata);
1067 UPD_PROP(obj, string, queryData, Z_STRVAL_P(qdata));
1068 RETURN_TRUE;
1069 }
1070 /* }}} */
1071
1072 /* {{{ proto string HttpRequest::getQueryData()
1073 *
1074 * Get the current query data in form of an urlencoded query string.
1075 */
1076 PHP_METHOD(HttpRequest, getQueryData)
1077 {
1078 NO_ARGS;
1079
1080 IF_RETVAL_USED {
1081 zval *qdata;
1082 getObject(http_request_object, obj);
1083
1084 qdata = GET_PROP(obj, queryData);
1085 RETURN_STRINGL(Z_STRVAL_P(qdata), Z_STRLEN_P(qdata), 1);
1086 }
1087 }
1088 /* }}} */
1089
1090 /* {{{ proto bool HttpRequest::addQueryData(array query_params)
1091 *
1092 * Add parameters to the query parameter list.
1093 * Affects any request type.
1094 */
1095 PHP_METHOD(HttpRequest, addQueryData)
1096 {
1097 zval *qdata, *old_qdata;
1098 char *query_data = NULL;
1099 getObject(http_request_object, obj);
1100
1101 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &qdata)) {
1102 RETURN_FALSE;
1103 }
1104
1105 old_qdata = GET_PROP(obj, queryData);
1106
1107 if (SUCCESS != http_urlencode_hash_ex(HASH_OF(qdata), 1, Z_STRVAL_P(old_qdata), Z_STRLEN_P(old_qdata), &query_data, NULL)) {
1108 RETURN_FALSE;
1109 }
1110
1111 UPD_PROP(obj, string, queryData, query_data);
1112 efree(query_data);
1113
1114 RETURN_TRUE;
1115 }
1116 /* }}} */
1117
1118 /* {{{ proto void HttpRequest::unsetQueryData()
1119 *
1120 * Clean the query parameters.
1121 * Affects any request type.
1122 */
1123 PHP_METHOD(HttpRequest, unsetQueryData)
1124 {
1125 getObject(http_request_object, obj);
1126
1127 NO_ARGS;
1128
1129 UPD_PROP(obj, string, queryData, "");
1130 }
1131 /* }}} */
1132
1133 /* {{{ proto bool HttpRequest::addPostFields(array post_data)
1134 *
1135 * Adds POST data entries.
1136 * Affects only POST requests.
1137 */
1138 PHP_METHOD(HttpRequest, addPostFields)
1139 {
1140 zval *post, *post_data;
1141 getObject(http_request_object, obj);
1142
1143 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &post_data)) {
1144 RETURN_FALSE;
1145 }
1146
1147 post = GET_PROP(obj, postFields);
1148 array_merge(post_data, post);
1149
1150 RETURN_TRUE;
1151 }
1152 /* }}} */
1153
1154 /* {{{ proto bool HttpRequest::setPostFields(array post_data)
1155 *
1156 * Set the POST data entries.
1157 * Overwrites previously set POST data.
1158 * Affects only POST requests.
1159 */
1160 PHP_METHOD(HttpRequest, setPostFields)
1161 {
1162 zval *post, *post_data;
1163 getObject(http_request_object, obj);
1164
1165 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &post_data)) {
1166 RETURN_FALSE;
1167 }
1168
1169 post = GET_PROP(obj, postFields);
1170 zend_hash_clean(Z_ARRVAL_P(post));
1171 array_copy(post_data, post);
1172
1173 RETURN_TRUE;
1174 }
1175 /* }}}*/
1176
1177 /* {{{ proto array HttpRequest::getPostFields()
1178 *
1179 * Get previously set POST data.
1180 */
1181 PHP_METHOD(HttpRequest, getPostFields)
1182 {
1183 NO_ARGS;
1184
1185 IF_RETVAL_USED {
1186 zval *post_data;
1187 getObject(http_request_object, obj);
1188
1189 post_data = GET_PROP(obj, postFields);
1190 array_init(return_value);
1191 array_copy(post_data, return_value);
1192 }
1193 }
1194 /* }}} */
1195
1196 /* {{{ proto void HttpRequest::unsetPostFields()
1197 *
1198 * Clean POST data entires.
1199 * Affects only POST requests.
1200 */
1201 PHP_METHOD(HttpRequest, unsetPostFields)
1202 {
1203 zval *post_data;
1204 getObject(http_request_object, obj);
1205
1206 NO_ARGS;
1207
1208 post_data = GET_PROP(obj, postFields);
1209 zend_hash_clean(Z_ARRVAL_P(post_data));
1210 }
1211 /* }}} */
1212
1213 /* {{{ proto bool HttpRequest::addPostFile(string name, string file[, string content_type = "application/x-octetstream"])
1214 *
1215 * Add a file to the POST request.
1216 * Affects only POST requests.
1217 */
1218 PHP_METHOD(HttpRequest, addPostFile)
1219 {
1220 zval *files, *entry;
1221 char *name, *file, *type = NULL;
1222 int name_len, file_len, type_len = 0;
1223 getObject(http_request_object, obj);
1224
1225 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ss|s", &name, &name_len, &file, &file_len, &type, &type_len)) {
1226 RETURN_FALSE;
1227 }
1228
1229 if (type_len) {
1230 if (!strchr(type, '/')) {
1231 http_error_ex(E_WARNING, HTTP_E_PARAM, "Content-Type '%s' doesn't seem to contain a primary and a secondary part", type);
1232 RETURN_FALSE;
1233 }
1234 } else {
1235 type = "application/x-octetstream";
1236 type_len = sizeof("application/x-octetstream") - 1;
1237 }
1238
1239 MAKE_STD_ZVAL(entry);
1240 array_init(entry);
1241
1242 add_assoc_stringl(entry, "name", name, name_len, 1);
1243 add_assoc_stringl(entry, "type", type, type_len, 1);
1244 add_assoc_stringl(entry, "file", file, file_len, 1);
1245
1246 files = GET_PROP(obj, postFiles);
1247 add_next_index_zval(files, entry);
1248
1249 RETURN_TRUE;
1250 }
1251 /* }}} */
1252
1253 /* {{{ proto bool HttpRequest::setPostFiles(array post_files)
1254 *
1255 * Set files to post.
1256 * Overwrites previously set post files.
1257 * Affects only POST requests.
1258 */
1259 PHP_METHOD(HttpRequest, setPostFiles)
1260 {
1261 zval *files, *pFiles;
1262 getObject(http_request_object, obj);
1263
1264 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &files)) {
1265 RETURN_FALSE;
1266 }
1267
1268 pFiles = GET_PROP(obj, postFiles);
1269 zend_hash_clean(Z_ARRVAL_P(pFiles));
1270 array_copy(files, pFiles);
1271
1272 RETURN_TRUE;
1273 }
1274 /* }}} */
1275
1276 /* {{{ proto array HttpRequest::getPostFiles()
1277 *
1278 * Get all previously added POST files.
1279 */
1280 PHP_METHOD(HttpRequest, getPostFiles)
1281 {
1282 NO_ARGS;
1283
1284 IF_RETVAL_USED {
1285 zval *files;
1286 getObject(http_request_object, obj);
1287
1288 files = GET_PROP(obj, postFiles);
1289
1290 array_init(return_value);
1291 array_copy(files, return_value);
1292 }
1293 }
1294 /* }}} */
1295
1296 /* {{{ proto void HttpRequest::unsetPostFiles()
1297 *
1298 * Unset the POST files list.
1299 * Affects only POST requests.
1300 */
1301 PHP_METHOD(HttpRequest, unsetPostFiles)
1302 {
1303 zval *files;
1304 getObject(http_request_object, obj);
1305
1306 NO_ARGS;
1307
1308 files = GET_PROP(obj, postFiles);
1309 zend_hash_clean(Z_ARRVAL_P(files));
1310 }
1311 /* }}} */
1312
1313 /* {{{ proto bool HttpRequest::SetPutFile(string file)
1314 *
1315 * Set file to put.
1316 * Affects only PUT requests.
1317 */
1318 PHP_METHOD(HttpRequest, setPutFile)
1319 {
1320 char *file;
1321 int file_len;
1322 getObject(http_request_object, obj);
1323
1324 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &file, &file_len)) {
1325 RETURN_FALSE;
1326 }
1327
1328 UPD_PROP(obj, string, putFile, file);
1329 RETURN_TRUE;
1330 }
1331 /* }}} */
1332
1333 /* {{{ proto string HttpRequest::getPutFile()
1334 *
1335 * Get previously set put file.
1336 */
1337 PHP_METHOD(HttpRequest, getPutFile)
1338 {
1339 NO_ARGS;
1340
1341 IF_RETVAL_USED {
1342 zval *putfile;
1343 getObject(http_request_object, obj);
1344
1345 putfile = GET_PROP(obj, putFile);
1346 RETVAL_STRINGL(Z_STRVAL_P(putfile), Z_STRLEN_P(putfile), 1);
1347 }
1348 }
1349 /* }}} */
1350
1351 /* {{{ proto void HttpRequest::unsetPutFile()
1352 *
1353 * Unset file to put.
1354 * Affects only PUT requests.
1355 */
1356 PHP_METHOD(HttpRequest, unsetPutFile)
1357 {
1358 getObject(http_request_object, obj);
1359
1360 NO_ARGS;
1361
1362 UPD_PROP(obj, string, putFile, "");
1363 }
1364 /* }}} */
1365
1366 /* {{{ proto array HttpRequest::getResponseData()
1367 *
1368 * Get all response data after the request has been sent.
1369 */
1370 PHP_METHOD(HttpRequest, getResponseData)
1371 {
1372 NO_ARGS;
1373
1374 IF_RETVAL_USED {
1375 zval *data;
1376 getObject(http_request_object, obj);
1377
1378 data = GET_PROP(obj, responseData);
1379 array_init(return_value);
1380 array_copy(data, return_value);
1381 }
1382 }
1383 /* }}} */
1384
1385 /* {{{ proto mixed HttpRequest::getResponseHeader([string name])
1386 *
1387 * Get response header(s) after the request has been sent.
1388 */
1389 PHP_METHOD(HttpRequest, getResponseHeader)
1390 {
1391 IF_RETVAL_USED {
1392 zval *data, **headers, **header;
1393 char *header_name = NULL;
1394 int header_len = 0;
1395 getObject(http_request_object, obj);
1396
1397 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &header_name, &header_len)) {
1398 RETURN_FALSE;
1399 }
1400
1401 data = GET_PROP(obj, responseData);
1402 if (SUCCESS != zend_hash_find(Z_ARRVAL_P(data), "headers", sizeof("headers"), (void **) &headers)) {
1403 RETURN_FALSE;
1404 }
1405
1406 if (!header_len || !header_name) {
1407 array_init(return_value);
1408 array_copy(*headers, return_value);
1409 } else if (SUCCESS == zend_hash_find(Z_ARRVAL_PP(headers), pretty_key(header_name, header_len, 1, 1), header_len + 1, (void **) &header)) {
1410 RETURN_STRINGL(Z_STRVAL_PP(header), Z_STRLEN_PP(header), 1);
1411 } else {
1412 RETURN_FALSE;
1413 }
1414 }
1415 }
1416 /* }}} */
1417
1418 /* {{{ proto array HttpRequest::getResponseCookie([string name])
1419 *
1420 * Get response cookie(s) after the request has been sent.
1421 */
1422 PHP_METHOD(HttpRequest, getResponseCookie)
1423 {
1424 IF_RETVAL_USED {
1425 zval *data, **headers;
1426 char *cookie_name = NULL;
1427 int cookie_len = 0;
1428 getObject(http_request_object, obj);
1429
1430 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &cookie_name, &cookie_len)) {
1431 RETURN_FALSE;
1432 }
1433
1434 array_init(return_value);
1435
1436 data = GET_PROP(obj, responseData);
1437 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(data), "headers", sizeof("headers"), (void **) &headers)) {
1438 ulong idx = 0;
1439 char *key = NULL;
1440 zval **header = NULL;
1441
1442 FOREACH_HASH_KEYVAL(Z_ARRVAL_PP(headers), key, idx, header) {
1443 if (key && !strcasecmp(key, "Set-Cookie")) {
1444 /* several cookies? */
1445 if (Z_TYPE_PP(header) == IS_ARRAY) {
1446 zval **cookie;
1447
1448 FOREACH_HASH_VAL(Z_ARRVAL_PP(header), cookie) {
1449 zval *cookie_hash;
1450 MAKE_STD_ZVAL(cookie_hash);
1451 array_init(cookie_hash);
1452
1453 if (SUCCESS == http_parse_cookie(Z_STRVAL_PP(cookie), Z_ARRVAL_P(cookie_hash))) {
1454 if (!cookie_len) {
1455 add_next_index_zval(return_value, cookie_hash);
1456 } else {
1457 zval **name;
1458
1459 if ( (SUCCESS == zend_hash_find(Z_ARRVAL_P(cookie_hash), "name", sizeof("name"), (void **) &name)) &&
1460 (!strcmp(Z_STRVAL_PP(name), cookie_name))) {
1461 add_next_index_zval(return_value, cookie_hash);
1462 return; /* <<< FOUND >>> */
1463 } else {
1464 zval_dtor(cookie_hash);
1465 efree(cookie_hash);
1466 }
1467 }
1468 } else {
1469 zval_dtor(cookie_hash);
1470 efree(cookie_hash);
1471 }
1472 }
1473 } else {
1474 zval *cookie_hash;
1475 MAKE_STD_ZVAL(cookie_hash);
1476 array_init(cookie_hash);
1477
1478 if (SUCCESS == http_parse_cookie(Z_STRVAL_PP(header), Z_ARRVAL_P(cookie_hash))) {
1479 if (!cookie_len) {
1480 add_next_index_zval(return_value, cookie_hash);
1481 } else {
1482 zval **name;
1483
1484 if ( (SUCCESS == zend_hash_find(Z_ARRVAL_P(cookie_hash), "name", sizeof("name"), (void **) &name)) &&
1485 (!strcmp(Z_STRVAL_PP(name), cookie_name))) {
1486 add_next_index_zval(return_value, cookie_hash);
1487 } else {
1488 zval_dtor(cookie_hash);
1489 efree(cookie_hash);
1490 }
1491 }
1492 } else {
1493 zval_dtor(cookie_hash);
1494 efree(cookie_hash);
1495 }
1496 }
1497 break;
1498 }
1499 /* reset key */
1500 key = NULL;
1501 }
1502 }
1503 }
1504 }
1505 /* }}} */
1506
1507 /* {{{ proto string HttpRequest::getResponseBody()
1508 *
1509 * Get the response body after the request has been sent.
1510 */
1511 PHP_METHOD(HttpRequest, getResponseBody)
1512 {
1513 NO_ARGS;
1514
1515 IF_RETVAL_USED {
1516 zval *data, **body;
1517 getObject(http_request_object, obj);
1518
1519 data = GET_PROP(obj, responseData);
1520 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(data), "body", sizeof("body"), (void **) &body)) {
1521 RETURN_STRINGL(Z_STRVAL_PP(body), Z_STRLEN_PP(body), 1);
1522 } else {
1523 RETURN_FALSE;
1524 }
1525 }
1526 }
1527 /* }}} */
1528
1529 /* {{{ proto int HttpRequest::getResponseCode()
1530 *
1531 * Get the response code after the request has been sent.
1532 */
1533 PHP_METHOD(HttpRequest, getResponseCode)
1534 {
1535 NO_ARGS;
1536
1537 IF_RETVAL_USED {
1538 zval *code;
1539 getObject(http_request_object, obj);
1540
1541 code = GET_PROP(obj, responseCode);
1542 RETURN_LONG(Z_LVAL_P(code));
1543 }
1544 }
1545 /* }}} */
1546
1547 /* {{{ proto array HttpRequest::getResponseInfo([string name])
1548 *
1549 * Get response info after the request has been sent.
1550 * See http_get() for a full list of returned info.
1551 */
1552 PHP_METHOD(HttpRequest, getResponseInfo)
1553 {
1554 IF_RETVAL_USED {
1555 zval *info, **infop;
1556 char *info_name = NULL;
1557 int info_len = 0;
1558 getObject(http_request_object, obj);
1559
1560 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &info_name, &info_len)) {
1561 RETURN_FALSE;
1562 }
1563
1564 info = GET_PROP(obj, responseInfo);
1565
1566 if (info_len && info_name) {
1567 if (SUCCESS == zend_hash_find(Z_ARRVAL_P(info), pretty_key(info_name, info_len, 0, 0), info_len + 1, (void **) &infop)) {
1568 RETURN_ZVAL(*infop, 1, ZVAL_PTR_DTOR);
1569 } else {
1570 http_error_ex(E_NOTICE, HTTP_E_PARAM, "Could not find response info named %s", info_name);
1571 RETURN_FALSE;
1572 }
1573 } else {
1574 array_init(return_value);
1575 array_copy(info, return_value);
1576 }
1577 }
1578 }
1579 /* }}}*/
1580
1581 /* {{{ proto HttpMessage HttpRequest::getResponseMessage()
1582 *
1583 * Get the full response as HttpMessage object.
1584 */
1585 PHP_METHOD(HttpRequest, getResponseMessage)
1586 {
1587 NO_ARGS;
1588
1589 IF_RETVAL_USED {
1590 zval *message;
1591 getObject(http_request_object, obj);
1592
1593 SET_EH_THROW_HTTP();
1594 message = GET_PROP(obj, responseMessage);
1595 if (Z_TYPE_P(message) == IS_OBJECT) {
1596 RETVAL_OBJECT(message);
1597 } else {
1598 RETVAL_NULL();
1599 }
1600 SET_EH_NORMAL();
1601 }
1602 }
1603 /* }}} */
1604
1605 /* {{{ proto HttpMessage HttpRequest::getRequestMessage()
1606 *
1607 * Get sent HTTP message.
1608 */
1609 PHP_METHOD(HttpRequest, getRequestMessage)
1610 {
1611 NO_ARGS;
1612
1613 IF_RETVAL_USED {
1614 zval *message;
1615 http_message *msg;
1616 getObject(http_request_object, obj);
1617
1618 SET_EH_THROW_HTTP();
1619 if (msg = http_message_parse(PHPSTR_VAL(&obj->request), PHPSTR_LEN(&obj->request))) {
1620 RETVAL_OBJVAL(http_message_object_from_msg(msg));
1621 }
1622 SET_EH_NORMAL();
1623 }
1624 }
1625 /* }}} */
1626
1627 PHP_METHOD(HttpRequest, getHistory)
1628 {
1629 NO_ARGS;
1630
1631 IF_RETVAL_USED {
1632 zval *history;
1633 http_message *msg;
1634 getObject(http_request_object, obj);
1635
1636 SET_EH_THROW_HTTP();
1637 if (msg = http_message_parse(PHPSTR_VAL(&obj->history), PHPSTR_LEN(&obj->history))) {
1638 RETVAL_OBJVAL(http_message_object_from_msg(msg));
1639 }
1640 SET_EH_NORMAL();
1641 }
1642 }
1643
1644 /* {{{ proto bool HttpRequest::send()
1645 *
1646 * Send the HTTP request.
1647 *
1648 * GET example:
1649 * <pre>
1650 * <?php
1651 * $r = new HttpRequest('http://example.com/feed.rss', HTTP_GET);
1652 * $r->setOptions(array('lastmodified' => filemtime('local.rss')));
1653 * $r->addQueryData(array('category' => 3));
1654 * try {
1655 * $r->send();
1656 * if ($r->getResponseCode() == 200) {
1657 * file_put_contents('local.rss', $r->getResponseBody());
1658 * }
1659 * } catch (HttpException $ex) {
1660 * echo $ex;
1661 * }
1662 * ?>
1663 * </pre>
1664 *
1665 * POST example:
1666 * <pre>
1667 * <?php
1668 * $r = new HttpRequest('http://example.com/form.php', HTTP_POST);
1669 * $r->setOptions(array('cookies' => array('lang' => 'de')));
1670 * $r->addpostFields(array('user' => 'mike', 'pass' => 's3c|r3t'));
1671 * $r->addPostFile('image', 'profile.jpg', 'image/jpeg');
1672 * if ($r->send()) {
1673 * echo $r->getResponseBody();
1674 * }
1675 * ?>
1676 * </pre>
1677 */
1678 PHP_METHOD(HttpRequest, send)
1679 {
1680 STATUS status = FAILURE;
1681 http_request_body body = {0, NULL, 0};
1682 getObject(http_request_object, obj);
1683
1684 NO_ARGS;
1685
1686 SET_EH_THROW_HTTP();
1687
1688 if (obj->pool) {
1689 http_error(E_WARNING, HTTP_E_CURL, "Cannot perform HttpRequest::send() while attached to an HttpRequestPool");
1690 SET_EH_NORMAL();
1691 RETURN_FALSE;
1692 }
1693
1694 if (SUCCESS == (status = http_request_object_requesthandler(obj, getThis(), &body))) {
1695 status = http_request_exec(obj->ch, NULL);
1696 }
1697 http_request_body_dtor(&body);
1698
1699 /* final data handling */
1700 if (SUCCESS == status) {
1701 status = http_request_object_responsehandler(obj, getThis());
1702 }
1703
1704 SET_EH_NORMAL();
1705 RETURN_SUCCESS(status);
1706 }
1707 /* }}} */
1708
1709 /* {{{ proto private HttpRequest::debugWrapper(long type, string message)
1710 */
1711 PHP_METHOD(HttpRequest, debugWrapper)
1712 {
1713 static int curl_ignores_body = 0;
1714 getObject(http_request_object, obj);
1715 zval *type, *message, *dbg_user_cb = GET_PROP(obj, dbg_user_cb);
1716
1717 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "zz", &type, &message)) {
1718 RETURN_NULL();
1719 }
1720
1721 if (Z_TYPE_P(type) != IS_LONG) {
1722 convert_to_long_ex(&type);
1723 }
1724 if (Z_TYPE_P(message) != IS_STRING) {
1725 convert_to_string_ex(&message);
1726 }
1727
1728 switch (Z_LVAL_P(type))
1729 {
1730 case CURLINFO_DATA_IN:
1731 /* fetch ignored body */
1732 if (curl_ignores_body && Z_LVAL_P(type) == CURLINFO_DATA_IN) {
1733 phpstr_append(&obj->response, Z_STRVAL_P(message), Z_STRLEN_P(message));
1734 }
1735 break;
1736
1737 case CURLINFO_TEXT:
1738 /* check if following incoming data would be ignored */
1739 curl_ignores_body = !strcmp(Z_STRVAL_P(message), "Ignoring the response-body\n");
1740 break;
1741
1742 case CURLINFO_HEADER_OUT:
1743 case CURLINFO_DATA_OUT:
1744 /* fetch outgoing request message */
1745 phpstr_append(&obj->request, Z_STRVAL_P(message), Z_STRLEN_P(message));
1746 break;
1747 }
1748
1749 /* call user debug callback */
1750 if (Z_TYPE_P(dbg_user_cb) != IS_NULL) {
1751 zval *args[2], cb_ret;
1752
1753 args[0] = type;
1754 args[1] = message;
1755 call_user_function(EG(function_table), NULL, dbg_user_cb, &cb_ret, 2, args TSRMLS_CC);
1756 }
1757
1758 RETURN_NULL();
1759 }
1760 /* }}} */
1761
1762 #endif /* ZEND_ENGINE_2 && HTTP_HAVE_CURL */
1763
1764 /*
1765 * Local variables:
1766 * tab-width: 4
1767 * c-basic-offset: 4
1768 * End:
1769 * vim600: noet sw=4 ts=4 fdm=marker
1770 * vim<600: noet sw=4 ts=4
1771 */
1772