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)
72 if ($cds->dbg_get() > 2) { printf("CURL: curl_init\n"); }
73 if (($ch = curl_init()) == FALSE)
75 curl_setopt($ch, CURLOPT_URL, $url);
76 curl_setopt($ch, CURLOPT_HEADER, 0);
77 curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
78 curl_setopt($ch, CURLOPT_FORBID_REUSE, true);
79 curl_setopt($ch, CURLOPT_HTTPHEADER, array('Connection: close'));
83 function create($cds, $ch)
86 printf("CDS_cmd_cls::create - begin\n");
87 printf("CURL: curl_multi_add_handle\n");
89 if (($ret = curl_multi_add_handle($cds->mh, $ch)) != 0) {
90 // INFO: $ret is a CURLM_XXX errors code
93 if ($cds->dbg > 2) { printf("CDS_cmd_cls::create - end\n"); }
97 function process($cmd, $ret)
100 fprintf(STDERR, "process MUST BE IMPLEMENTED");
104 function timeout($cmd)
106 fprintf(STDERR, "timeout MUST BE IMPLEMENTED");
112 return $this->cds->dbg;
122 function Curl_de_sac($dbg=0) {
123 if ($dbg > 2) { printf("CURL: curl_multi_init\n"); }
124 $this->mh = curl_multi_init();
125 $this->cmd_cls = array();
126 $this->cmd = array();
130 function dbg_set($dbg)
140 function cmd_cls_register($cmd_cls)
142 if (get_class($cmd_cls) != 'CDS_cmd_cls' && is_subclass_of($cmd_cls, 'CDS_cmd_cls') == FALSE)
145 if (isset($this->cmd_cls[$cmd_cls->name]))
148 $this->cmd_cls[$cmd_cls->name] = $cmd_cls;
149 $cmd_cls->cds_set($this);
154 function cmd_cls_deregister($cmd_cls)
156 if (get_class($cmd_cls) != 'CDS_cmd_cls' && is_subclass_of($cmd_cls, 'CDS_cmd_cls') == FALSE)
158 if (!isset($this->cmd_cls[$cmd_cls->name]))
161 $this->cmd_cls[$cmd_cls->name]->cds_set(NULL);
163 unset($this->cmd_cls[$cmd_cls->name]);
167 function cmd_cls_deregister_all()
169 foreach($this->cmd_cls as $cmd_cls) {
170 $cmd_cls->cds_set(NULL);
173 $this->cmd_cls = array();
177 function cleanup($key)
179 $cmd = $this->cmd[$key];
181 if ($this->dbg > 2) {
183 printf("CURL: curl_multi_remove_handle:\n");
184 print_r($cmd->ch_get());
187 // return 0 on SUCCESS or CURLM_XXX in other cases
188 if (($ret = curl_multi_remove_handle($this->mh, $cmd->ch_get())) != 0) {
189 fprintf(STDERR, "CURL: curl_multi_remove_handle FAILED (%d)\n", $ret);
191 if ($this->dbg > 2) { printf("CURL: curl_close\n"); }
192 curl_close($cmd->ch_get());
193 unset($this->cmd[$key]);
198 $args = func_get_args();
200 if ($this->dbg > 1) {
201 printf("CDS_cmd_cls::execute ARGS:\n");
205 if (($name = array_shift($args)) === NULL)
207 array_unshift($args, $this);
209 if (!isset($this->cmd_cls[$name]))
212 $cmd_cls = $this->cmd_cls[$name];
214 if (($inst = call_user_func_array(array($cmd_cls, "create"), $args)) == FALSE)
217 array_push($this->cmd, $inst);
218 if ($this->dbg > 1) { printf("CDS_cmd_cls::process - execute push cmd\n"); }
219 if (($this->dbg & 1) == 1) { print_r($this); }
227 function process($curtime=0)
232 if ($this->dbg > 1) { printf("CDS_cmd_cls::process - begin\n"); }
235 if ($this->dbg > 2) { printf("CURL: curl_multi_exec\n"); }
236 $ret = curl_multi_exec($this->mh, $running);
237 $msgs_in_queue = NULL;
240 if ($this->dbg > 2) { printf("CURL: curl_multi_info_read\n"); }
242 if ($ret = curl_multi_info_read ($this->mh, $msgs_in_queue)) {
243 if ($this->dbg > 1) { printf("Info_read miq: %d\n", $msgs_in_queue); }
244 if ($this->dbg > 2) { printf("CURL: curl_getinfo\n"); }
246 $info = curl_getinfo($ret['handle']);
247 if ($this->dbg > 1) {
248 printf("Getinfo:\n");
252 foreach($this->cmd as $key => $cmd) {
253 if ($cmd->ch == $ret['handle']) {
254 if ($cmd->cmd_cls->process($cmd, $ret) == TRUE) {
255 $this->cleanup($key);
261 } while ($msgs_in_queue > 0);
262 foreach ($this->cmd as $key => $cmd) {
263 if ($this->dbg > 2) { printf("Check tout, curr: %d tlimit %d\n", $curtime, $cmd->tlimit); }
264 if ($curtime > $cmd->tlimit) {
265 if ($this->dbg > 2) { printf("TIMEOUT REACHED!\n"); }
266 $cmd->cmd_cls->timeout($cmd);
267 $this->cleanup($key);
270 if ($this->dbg > 1) { printf("CDS_cmd_cls::process - end (queue: %d)\n", $msgs_in_queue); }