* * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. * * $Id: presel_active_view.php,v 1.1 2005/11/09 14:31:52 rodolphe Exp $ * $Source: /srv/cvs/sources/dolibarr/dolibarr/htdocs/telephonie/script/Attic/presel_active_view.php,v $ * * * Visualisation de l'etat des lignes preselectionnées * */ require ("../../master.inc.php"); require_once DOL_DOCUMENT_ROOT."/telephonie/lignetel.class.php"; set_time_limit(0); $host = CMD_PRESEL_WEB_HOST; $user_login = CMD_PRESEL_WEB_USER; $user_passwd = CMD_PRESEL_WEB_PASS; $sql = "SELECT rowid,ligne"; $sql .= " FROM ".MAIN_DB_PREFIX."telephonie_societe_ligne"; $sql .= " WHERE fk_fournisseur = 4"; $sql .= " AND statut = 3;"; $resql = $db->query($sql); if ($resql) { $ids = array(); while ($row = $db->fetch_row($resql)) { array_push($ids, $row[1]); } } else { exit(1); } GetPreselection_byRef($db, $host, $user_login, $user_passwd, $ids); /* * Fonctions * */ function GetPreselection_byRef($db, $host, $user_login, $user_passwd, $ids) { $numcli = sizeof($ids); $i = 0; foreach($ids as $cli) { $i++; $fp = @fsockopen($host, 80, $errno, $errstr, 30); if (!$fp) { print "Impossible de se connecter au server $errstr ($errno)"; } else { $ligne_numero = ""; $ligne_service = ""; $ligne_presel = ""; //GetPreselection_byRef $url = "/AzurApp_websvc_b3gdb/account.asmx/GetPreselection_byRef?"; $url .= "user_login=". $user_login; $url .= "&user_passwd=".$user_passwd; $url .= "&telnum=".$cli; $out = "GET $url HTTP/1.1\r\n"; $out .= "Host: $host\r\n"; $out .= "Connection: Close\r\n\r\n"; fwrite($fp, $out); while (!feof($fp)) { $line = fgets($fp, 1024); if (preg_match("//",$line)) { $results = split(" ",trim($line)); //print_r($results); $array = array(); preg_match('/telnum="([0123456789]*)"/', $line, $array); $ligne_numero = $array[1]; $array = array(); preg_match('/Service_Statut="([\S]*)"/i', $line, $array); $ligne_service = $array[1]; $array = array(); preg_match('/PreSelection_Statut="([\S]*)"/i', $line, $array); $ligne_presel = $array[1]; print "$i/$numcli "; print $ligne_numero." "; print substr($ligne_service.str_repeat(" ",20),0,20); print substr($ligne_presel.str_repeat(" ",20),0,20); print "\n"; } if (preg_match("//",$line)) { $array = array(); preg_match('/libelle="(.*)" xmlns:d4p1/', $line, $array); print "$i/$numcli "; print "$cli ErreurAPI ".$array[1]."\n"; } } fclose($fp); } } } ?>