3 * curl-de-sac - curl-de-sac.phh
5 * Copyright (C) 2014 Matteo Nastasi
6 * mailto: nastasi@alternativeoutput.it
7 * matteo.nastasi@gmail.com
8 * web: http://www.alternativeoutput.it
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 2 of the License, or
13 * (at your option) any later version.
15 * This program is distributed in the hope that it will be useful, but
16 * WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABLILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 * General Public License for more details. You should have received a
19 * copy of the GNU General Public License along with this program; if
20 * not, write to the Free Software Foundation, Inc, 59 Temple Place -
21 * Suite 330, Boston, MA 02111-1307, USA.
25 $G_curl_de_sac_version = "0.1";
32 function CDS_cmd($cmd_cls, $ch)
34 $this->cmd_cls = $cmd_cls;
36 $this->tlimit = time() + $cmd_cls->tout;
46 // NOTE: cmd_cls must be valid by definition
47 if ($this->cmd_cls->cds == NULL)
49 return $this->cmd_cls->cds->dbg_get();
58 function CDS_cmd_cls($name, $tout)
65 function cds_set($cds)
70 static function pre_create($cds, $url, $opts=NULL)
72 if ($cds->dbg_get() > 2) { printf("CURL: curl_init\n"); }
73 if (($ch = curl_init()) == FALSE)
75 curl_setopt($ch, CURLOPT_URL, $url);
77 curl_setopt($ch, CURLOPT_HEADER, 0);
78 curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
79 curl_setopt($ch, CURLOPT_FORBID_REUSE, true);
80 curl_setopt($ch, CURLOPT_HTTPHEADER, array('Connection: close'));
83 foreach($opts as $opt => $value) {
84 curl_setopt($ch, $opt, $value);
90 function create($cds, $ch)
93 printf("CDS_cmd_cls::create - begin\n");
94 printf("CURL: curl_multi_add_handle\n");
96 if (($ret = curl_multi_add_handle($cds->mh, $ch)) != 0) {
97 // INFO: $ret is a CURLM_XXX errors code
100 if ($cds->dbg > 2) { printf("CDS_cmd_cls::create - end\n"); }
104 function process($cmd, $ret)
107 fprintf(STDERR, "process MUST BE IMPLEMENTED");
111 function timeout($cmd)
113 fprintf(STDERR, "timeout MUST BE IMPLEMENTED");
119 return $this->cds->dbg;
129 function Curl_de_sac($dbg=0) {
130 if ($dbg > 2) { printf("CURL: curl_multi_init\n"); }
131 $this->mh = curl_multi_init();
132 $this->cmd_cls = array();
133 $this->cmd = array();
137 function dbg_set($dbg)
147 function cmd_cls_register($cmd_cls)
149 if (get_class($cmd_cls) != 'CDS_cmd_cls' && is_subclass_of($cmd_cls, 'CDS_cmd_cls') == FALSE)
152 if (isset($this->cmd_cls[$cmd_cls->name]))
155 $this->cmd_cls[$cmd_cls->name] = $cmd_cls;
156 $cmd_cls->cds_set($this);
161 function cmd_cls_deregister($cmd_cls)
163 if (get_class($cmd_cls) != 'CDS_cmd_cls' && is_subclass_of($cmd_cls, 'CDS_cmd_cls') == FALSE)
165 if (!isset($this->cmd_cls[$cmd_cls->name]))
168 $this->cmd_cls[$cmd_cls->name]->cds_set(NULL);
170 unset($this->cmd_cls[$cmd_cls->name]);
174 function cmd_cls_deregister_all()
176 foreach($this->cmd_cls as $cmd_cls) {
177 $cmd_cls->cds_set(NULL);
180 $this->cmd_cls = array();
184 function cleanup($key)
186 $cmd = $this->cmd[$key];
188 if ($this->dbg > 2) {
190 printf("CURL: curl_multi_remove_handle:\n");
191 print_r($cmd->ch_get());
194 // return 0 on SUCCESS or CURLM_XXX in other cases
195 if (($ret = curl_multi_remove_handle($this->mh, $cmd->ch_get())) != 0) {
196 fprintf(STDERR, "CURL: curl_multi_remove_handle FAILED (%d)\n", $ret);
198 if ($this->dbg > 2) { printf("CURL: curl_close\n"); }
199 curl_close($cmd->ch_get());
200 unset($this->cmd[$key]);
205 $args = func_get_args();
207 if ($this->dbg > 1) {
208 printf("CDS_cmd_cls::execute ARGS:\n");
212 if (($name = array_shift($args)) === NULL)
214 array_unshift($args, $this);
216 if (!isset($this->cmd_cls[$name]))
219 $cmd_cls = $this->cmd_cls[$name];
221 if (($inst = call_user_func_array(array($cmd_cls, "create"), $args)) == FALSE)
224 array_push($this->cmd, $inst);
225 if ($this->dbg > 1) { printf("CDS_cmd_cls::process - execute push cmd\n"); }
226 if (($this->dbg & 1) == 1) { print_r($this); }
234 function process($curtime=0)
239 if ($this->dbg > 1) { printf("CDS_cmd_cls::process - begin\n"); }
242 if ($this->dbg > 2) { printf("CURL: curl_multi_exec\n"); }
243 $ret = curl_multi_exec($this->mh, $running);
244 $msgs_in_queue = NULL;
247 if ($this->dbg > 2) { printf("CURL: curl_multi_info_read\n"); }
249 if ($ret = curl_multi_info_read ($this->mh, $msgs_in_queue)) {
250 if ($this->dbg > 1) { printf("Info_read miq: %d\n", $msgs_in_queue); }
251 if ($this->dbg > 2) { printf("CURL: curl_getinfo\n"); }
253 $info = curl_getinfo($ret['handle']);
254 if ($this->dbg > 1) {
255 printf("Getinfo:\n");
259 foreach($this->cmd as $key => $cmd) {
260 if ($cmd->ch == $ret['handle']) {
261 if ($cmd->cmd_cls->process($cmd, $ret) == TRUE) {
262 $this->cleanup($key);
268 } while ($msgs_in_queue > 0);
269 foreach ($this->cmd as $key => $cmd) {
270 if ($this->dbg > 2) { printf("Check tout, curr: %d tlimit %d\n", $curtime, $cmd->tlimit); }
271 if ($curtime > $cmd->tlimit) {
272 if ($this->dbg > 2) { printf("TIMEOUT REACHED!\n"); }
273 $cmd->cmd_cls->timeout($cmd);
274 $this->cleanup($key);
277 if ($this->dbg > 1) { printf("CDS_cmd_cls::process - end (queue: %d)\n", $msgs_in_queue); }