2 +--------------------------------------------------------------------+
4 +--------------------------------------------------------------------+
5 | Redistribution and use in source and binary forms, with or without |
6 | modification, are permitted provided that the conditions mentioned |
7 | in the accompanying LICENSE file are met. |
8 +--------------------------------------------------------------------+
9 | Copyright (c) 2004-2011, Michael Wallner <mike@php.net> |
10 +--------------------------------------------------------------------+
13 #include "php_http_api.h"
15 PHP_HTTP_API php_http_client_pool_t
*php_http_client_pool_init(php_http_client_pool_t
*h
, php_http_client_pool_ops_t
*ops
, php_http_resource_factory_t
*rf
, void *init_arg TSRMLS_DC
)
17 php_http_client_pool_t
*free_h
= NULL
;
20 free_h
= h
= emalloc(sizeof(*h
));
22 memset(h
, 0, sizeof(*h
));
25 h
->rf
= rf
? rf
: php_http_resource_factory_init(NULL
, h
->ops
->rsrc
, NULL
, NULL
);
26 zend_llist_init(&h
->clients
.attached
, sizeof(zval
*), (llist_dtor_func_t
) ZVAL_PTR_DTOR
, 0);
27 zend_llist_init(&h
->clients
.finished
, sizeof(zval
*), (llist_dtor_func_t
) ZVAL_PTR_DTOR
, 0);
28 TSRMLS_SET_CTX(h
->ts
);
31 if (!(h
= h
->ops
->init(h
, init_arg
))) {
32 php_http_error(HE_WARNING
, PHP_HTTP_E_CLIENT_POOL
, "Could not initialize request pool");
42 PHP_HTTP_API php_http_client_pool_t
*php_http_client_pool_copy(php_http_client_pool_t
*from
, php_http_client_pool_t
*to
)
44 if (from
->ops
->copy
) {
45 return from
->ops
->copy(from
, to
);
51 PHP_HTTP_API
void php_http_client_pool_dtor(php_http_client_pool_t
*h
)
57 zend_llist_clean(&h
->clients
.finished
);
58 zend_llist_clean(&h
->clients
.attached
);
60 php_http_resource_factory_free(&h
->rf
);
63 PHP_HTTP_API
void php_http_client_pool_free(php_http_client_pool_t
**h
) {
65 php_http_client_pool_dtor(*h
);
71 PHP_HTTP_API STATUS
php_http_client_pool_attach(php_http_client_pool_t
*h
, zval
*client
)
73 TSRMLS_FETCH_FROM_CTX(h
->ts
);
78 php_http_message_body_t
*body
= NULL
;
79 php_http_client_object_t
*obj
= zend_object_store_get_object(client TSRMLS_CC
);
81 if (SUCCESS
!= php_http_client_object_requesthandler(obj
, client
, &m
, &url
, &body TSRMLS_CC
)) {
84 if (SUCCESS
== h
->ops
->attach(h
, obj
->client
, m
, url
, body
)) {
87 zend_llist_add_element(&h
->clients
.attached
, &client
);
96 static int php_http_client_pool_compare_handles(void *h1
, void *h2
)
98 return (Z_OBJ_HANDLE_PP((zval
**) h1
) == Z_OBJ_HANDLE_P((zval
*) h2
));
102 PHP_HTTP_API STATUS
php_http_client_pool_detach(php_http_client_pool_t
*h
, zval
*client
)
104 TSRMLS_FETCH_FROM_CTX(h
->ts
);
106 if (h
->ops
->detach
) {
107 php_http_client_object_t
*obj
= zend_object_store_get_object(client TSRMLS_CC
);
109 if (SUCCESS
== h
->ops
->detach(h
, obj
->client
)) {
110 zend_llist_del_element(&h
->clients
.finished
, client
, php_http_client_pool_compare_handles
);
111 zend_llist_del_element(&h
->clients
.attached
, client
, php_http_client_pool_compare_handles
);
119 PHP_HTTP_API STATUS
php_http_client_pool_wait(php_http_client_pool_t
*h
, struct timeval
*custom_timeout
)
122 return h
->ops
->wait(h
, custom_timeout
);
128 PHP_HTTP_API
int php_http_client_pool_once(php_http_client_pool_t
*h
)
131 return h
->ops
->once(h
);
137 PHP_HTTP_API STATUS
php_http_client_pool_exec(php_http_client_pool_t
*h
)
140 return h
->ops
->exec(h
);
146 static void detach(void *r
, void *h TSRMLS_DC
)
148 ((php_http_client_pool_t
*) h
)->ops
->detach(h
, ((php_http_client_object_t
*) zend_object_store_get_object(*((zval
**) r
) TSRMLS_CC
))->client
);
151 PHP_HTTP_API
void php_http_client_pool_reset(php_http_client_pool_t
*h
)
155 } else if (h
->ops
->detach
) {
156 TSRMLS_FETCH_FROM_CTX(h
->ts
);
158 zend_llist_apply_with_argument(&h
->clients
.attached
, detach
, h TSRMLS_CC
);
161 zend_llist_clean(&h
->clients
.attached
);
162 zend_llist_clean(&h
->clients
.finished
);
165 PHP_HTTP_API STATUS
php_http_client_pool_setopt(php_http_client_pool_t
*h
, php_http_client_pool_setopt_opt_t opt
, void *arg
)
167 if (h
->ops
->setopt
) {
168 return h
->ops
->setopt(h
, opt
, arg
);
174 PHP_HTTP_API
void php_http_client_pool_requests(php_http_client_pool_t
*h
, zval
***attached
, zval
***finished
)
180 if ((count
= zend_llist_count(&h
->clients
.attached
))) {
181 *attached
= ecalloc(count
+ 1 /* terminating NULL */, sizeof(zval
*));
183 for (i
= 0, handle
= zend_llist_get_first(&h
->clients
.attached
); handle
; handle
= zend_llist_get_next(&h
->clients
.attached
)) {
185 (*attached
)[i
++] = *handle
;
193 if ((count
= zend_llist_count(&h
->clients
.finished
))) {
194 *finished
= ecalloc(count
+ 1 /* terminating NULL */, sizeof(zval
*));
196 for (i
= 0, handle
= zend_llist_get_first(&h
->clients
.finished
); handle
; handle
= zend_llist_get_next(&h
->clients
.finished
)) {
198 (*finished
)[i
++] = *handle
;
208 #define PHP_HTTP_BEGIN_ARGS(method, req_args) PHP_HTTP_BEGIN_ARGS_EX(HttpClientPool, method, 0, req_args)
209 #define PHP_HTTP_EMPTY_ARGS(method) PHP_HTTP_EMPTY_ARGS_EX(HttpClientPool, method, 0)
210 #define PHP_HTTP_REQPOOL_ME(method, visibility) PHP_ME(HttpClientPool, method, PHP_HTTP_ARGS(HttpClientPool, method), visibility)
212 PHP_HTTP_EMPTY_ARGS(__destruct
);
213 PHP_HTTP_EMPTY_ARGS(reset
);
215 PHP_HTTP_BEGIN_ARGS(attach
, 1)
216 PHP_HTTP_ARG_OBJ(http
\\Client
, client
, 0)
219 PHP_HTTP_BEGIN_ARGS(detach
, 1)
220 PHP_HTTP_ARG_OBJ(http
\\Client
, client
, 0)
223 PHP_HTTP_EMPTY_ARGS(send
);
224 PHP_HTTP_EMPTY_ARGS(once
);
225 PHP_HTTP_BEGIN_ARGS(wait
, 0)
226 PHP_HTTP_ARG_VAL(timeout
, 0)
229 PHP_HTTP_EMPTY_ARGS(valid
);
230 PHP_HTTP_EMPTY_ARGS(current
);
231 PHP_HTTP_EMPTY_ARGS(key
);
232 PHP_HTTP_EMPTY_ARGS(next
);
233 PHP_HTTP_EMPTY_ARGS(rewind
);
235 PHP_HTTP_EMPTY_ARGS(count
);
237 PHP_HTTP_EMPTY_ARGS(getAttachedRequests
);
238 PHP_HTTP_EMPTY_ARGS(getFinishedRequests
);
240 PHP_HTTP_BEGIN_ARGS(enablePipelining
, 0)
241 PHP_HTTP_ARG_VAL(enable
, 0)
244 PHP_HTTP_BEGIN_ARGS(enableEvents
, 0)
245 PHP_HTTP_ARG_VAL(enable
, 0)
248 zend_class_entry
*php_http_client_pool_class_entry
;
249 zend_function_entry php_http_client_pool_method_entry
[] = {
250 PHP_HTTP_REQPOOL_ME(__destruct
, ZEND_ACC_PUBLIC
|ZEND_ACC_DTOR
)
251 PHP_HTTP_REQPOOL_ME(attach
, ZEND_ACC_PUBLIC
)
252 PHP_HTTP_REQPOOL_ME(detach
, ZEND_ACC_PUBLIC
)
253 PHP_HTTP_REQPOOL_ME(send
, ZEND_ACC_PUBLIC
)
254 PHP_HTTP_REQPOOL_ME(reset
, ZEND_ACC_PUBLIC
)
256 PHP_HTTP_REQPOOL_ME(once
, ZEND_ACC_PROTECTED
)
257 PHP_HTTP_REQPOOL_ME(wait
, ZEND_ACC_PROTECTED
)
259 /* implements Iterator */
260 PHP_HTTP_REQPOOL_ME(valid
, ZEND_ACC_PUBLIC
)
261 PHP_HTTP_REQPOOL_ME(current
, ZEND_ACC_PUBLIC
)
262 PHP_HTTP_REQPOOL_ME(key
, ZEND_ACC_PUBLIC
)
263 PHP_HTTP_REQPOOL_ME(next
, ZEND_ACC_PUBLIC
)
264 PHP_HTTP_REQPOOL_ME(rewind
, ZEND_ACC_PUBLIC
)
266 /* implmenents Countable */
267 PHP_HTTP_REQPOOL_ME(count
, ZEND_ACC_PUBLIC
)
269 PHP_HTTP_REQPOOL_ME(getAttachedRequests
, ZEND_ACC_PUBLIC
)
270 PHP_HTTP_REQPOOL_ME(getFinishedRequests
, ZEND_ACC_PUBLIC
)
272 PHP_HTTP_REQPOOL_ME(enablePipelining
, ZEND_ACC_PUBLIC
)
273 PHP_HTTP_REQPOOL_ME(enableEvents
, ZEND_ACC_PUBLIC
)
278 static zend_object_handlers php_http_client_pool_object_handlers
;
280 extern zend_object_handlers
*php_http_client_pool_get_object_handlers(void)
282 return &php_http_client_pool_object_handlers
;
285 zend_object_value
php_http_client_pool_object_new(zend_class_entry
*ce TSRMLS_DC
)
287 return php_http_client_pool_object_new_ex(ce
, NULL
, NULL TSRMLS_CC
);
290 zend_object_value
php_http_client_pool_object_new_ex(zend_class_entry
*ce
, php_http_client_pool_t
*p
, php_http_client_pool_object_t
**ptr TSRMLS_DC
)
292 zend_object_value ov
;
293 php_http_client_pool_object_t
*o
;
295 o
= ecalloc(1, sizeof(php_http_client_pool_object_t
));
296 zend_object_std_init((zend_object
*) o
, ce TSRMLS_CC
);
297 object_properties_init((zend_object
*) o
, ce
);
299 if (!(o
->pool
= p
)) {
300 o
->pool
= php_http_client_pool_init(NULL
, NULL
, NULL
, NULL TSRMLS_CC
);
307 ov
.handle
= zend_objects_store_put(o
, NULL
, php_http_client_pool_object_free
, NULL TSRMLS_CC
);
308 ov
.handlers
= &php_http_client_pool_object_handlers
;
313 void php_http_client_pool_object_free(void *object TSRMLS_DC
)
315 php_http_client_pool_object_t
*o
= (php_http_client_pool_object_t
*) object
;
317 php_http_client_pool_free(&o
->pool
);
318 zend_object_std_dtor((zend_object
*) o TSRMLS_CC
);
322 static void php_http_client_pool_object_llist2array(zval
**req
, zval
*array TSRMLS_DC
)
325 add_next_index_zval(array
, *req
);
328 PHP_METHOD(HttpClientPool
, __destruct
)
330 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
332 if (SUCCESS
!= zend_parse_parameters_none()) {
333 ; /* we always want to clean up */
335 /* FIXME: move to php_http_client_pool_dtor */
336 php_http_client_pool_reset(obj
->pool
);
339 PHP_METHOD(HttpClientPool
, reset
)
341 if (SUCCESS
== zend_parse_parameters_none()) {
342 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
344 obj
->iterator
.pos
= 0;
345 php_http_client_pool_reset(obj
->pool
);
347 RETVAL_ZVAL(getThis(), 1, 0);
350 PHP_METHOD(HttpClientPool
, attach
)
352 with_error_handling(EH_THROW
, php_http_exception_class_entry
) {
355 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "O", &request
, php_http_client_class_entry
)) {
356 with_error_handling(EH_THROW
, php_http_exception_class_entry
) {
357 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
359 if (obj
->iterator
.pos
> 0 && obj
->iterator
.pos
< zend_llist_count(&obj
->pool
->clients
.attached
)) {
360 php_http_error(HE_THROW
, PHP_HTTP_E_CLIENT_POOL
, "Cannot attach to the HttpClientPool while the iterator is active");
362 php_http_client_pool_attach(obj
->pool
, request
);
364 } end_error_handling();
366 } end_error_handling();
368 RETVAL_ZVAL(getThis(), 1, 0);
371 PHP_METHOD(HttpClientPool
, detach
)
375 with_error_handling(EH_THROW
, php_http_exception_class_entry
) {
378 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "O", &request
, php_http_client_class_entry
)) {
379 with_error_handling(EH_THROW
, php_http_exception_class_entry
) {
380 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
382 obj
->iterator
.pos
= -1;
383 php_http_client_pool_detach(obj
->pool
, request
);
384 } end_error_handling();
386 } end_error_handling();
388 RETVAL_ZVAL(getThis(), 1, 0);
391 PHP_METHOD(HttpClientPool
, send
)
395 with_error_handling(EH_THROW
, php_http_exception_class_entry
) {
396 if (SUCCESS
== zend_parse_parameters_none()) {
397 with_error_handling(EH_THROW
, php_http_exception_class_entry
) {
398 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
400 php_http_client_pool_exec(obj
->pool
);
401 } end_error_handling();
403 } end_error_handling();
405 RETVAL_ZVAL(getThis(), 1, 0);
408 PHP_METHOD(HttpClientPool
, once
)
410 if (SUCCESS
== zend_parse_parameters_none()) {
411 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
413 if (0 < php_http_client_pool_once(obj
->pool
)) {
420 PHP_METHOD(HttpClientPool
, wait
)
424 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|d", &timeout
)) {
425 struct timeval timeout_val
;
426 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
428 timeout_val
.tv_sec
= (time_t) timeout
;
429 timeout_val
.tv_usec
= PHP_HTTP_USEC(timeout
) % PHP_HTTP_MCROSEC
;
431 RETURN_SUCCESS(php_http_client_pool_wait(obj
->pool
, timeout
> 0 ? &timeout_val
: NULL
));
436 PHP_METHOD(HttpClientPool
, valid
)
438 if (SUCCESS
== zend_parse_parameters_none()) {
439 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
441 RETURN_BOOL(obj
->iterator
.pos
>= 0 && obj
->iterator
.pos
< zend_llist_count(&obj
->pool
->clients
.attached
));
446 PHP_METHOD(HttpClientPool
, current
)
448 if (SUCCESS
== zend_parse_parameters_none()) {
449 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
451 if (obj
->iterator
.pos
< zend_llist_count(&obj
->pool
->clients
.attached
)) {
453 zval
**current
= NULL
;
454 zend_llist_position lpos
;
456 for ( current
= zend_llist_get_first_ex(&obj
->pool
->clients
.attached
, &lpos
);
457 current
&& obj
->iterator
.pos
!= pos
++;
458 current
= zend_llist_get_next_ex(&obj
->pool
->clients
.attached
, &lpos
));
460 RETURN_OBJECT(*current
, 1);
467 PHP_METHOD(HttpClientPool
, key
)
469 if (SUCCESS
== zend_parse_parameters_none()) {
470 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
472 RETURN_LONG(obj
->iterator
.pos
);
477 PHP_METHOD(HttpClientPool
, next
)
479 if (SUCCESS
== zend_parse_parameters_none()) {
480 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
486 PHP_METHOD(HttpClientPool
, rewind
)
488 if (SUCCESS
== zend_parse_parameters_none()) {
489 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
491 obj
->iterator
.pos
= 0;
495 PHP_METHOD(HttpClientPool
, count
)
497 if (SUCCESS
== zend_parse_parameters_none()) {
498 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
500 RETURN_LONG((long) zend_llist_count(&obj
->pool
->clients
.attached
));
504 PHP_METHOD(HttpClientPool
, getAttachedRequests
)
506 if (SUCCESS
== zend_parse_parameters_none()) {
507 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
509 array_init(return_value
);
510 zend_llist_apply_with_argument(&obj
->pool
->clients
.attached
,
511 (llist_apply_with_arg_func_t
) php_http_client_pool_object_llist2array
,
512 return_value TSRMLS_CC
);
518 PHP_METHOD(HttpClientPool
, getFinishedRequests
)
520 if (SUCCESS
== zend_parse_parameters_none()) {
521 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
523 array_init(return_value
);
524 zend_llist_apply_with_argument(&obj
->pool
->clients
.finished
,
525 (llist_apply_with_arg_func_t
) php_http_client_pool_object_llist2array
,
526 return_value TSRMLS_CC
);
532 PHP_METHOD(HttpClientPool
, enablePipelining
)
534 zend_bool enable
= 1;
536 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|b", &enable
)) {
537 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
539 php_http_client_pool_setopt(obj
->pool
, PHP_HTTP_CLIENT_POOL_OPT_ENABLE_PIPELINING
, &enable
);
541 RETVAL_ZVAL(getThis(), 1, 0);
544 PHP_METHOD(HttpClientPool
, enableEvents
)
546 zend_bool enable
= 1;
548 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|b", &enable
)) {
549 php_http_client_pool_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
551 php_http_client_pool_setopt(obj
->pool
, PHP_HTTP_CLIENT_POOL_OPT_USE_EVENTS
, &enable
);
553 RETVAL_ZVAL(getThis(), 1, 0);
556 PHP_MINIT_FUNCTION(http_client_pool
)
558 PHP_HTTP_REGISTER_CLASS(http
\\Client
\\Pool
, AbstractPool
, http_client_pool
, php_http_object_class_entry
, 0);
559 php_http_client_pool_class_entry
->create_object
= php_http_object_new
; //php_http_client_pool_object_new;
560 memcpy(&php_http_client_pool_object_handlers
, zend_get_std_object_handlers(), sizeof(zend_object_handlers
));
561 php_http_client_pool_object_handlers
.clone_obj
= NULL
;
563 zend_class_implements(php_http_client_pool_class_entry TSRMLS_CC
, 2, spl_ce_Countable
, zend_ce_iterator
);
574 * vim600: noet sw=4 ts=4 fdm=marker
575 * vim<600: noet sw=4 ts=4