diff --git a/htdocs/telephonie/script/commande_presel.php b/htdocs/telephonie/script/commande_presel.php new file mode 100644 index 00000000000..bd87429337f --- /dev/null +++ b/htdocs/telephonie/script/commande_presel.php @@ -0,0 +1,293 @@ + + * + * 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$ + * $Source$ + * + * + * Recupération des fichiers CDR + * + */ +require ("../../master.inc.php"); +require_once DOL_DOCUMENT_ROOT."/telephonie/lignetel.class.php"; + +$user = new User($db); +$user->id = 1; // C'est sale je sais ! + +$host = CMD_PRESEL_WEB_HOST; +$user_login = CMD_PRESEL_WEB_USER; +$user_passwd = CMD_PRESEL_WEB_PASS; +$user_contract = CMD_PRESEL_WEB_CONTRACT; + +/* + * Lecture des lignes a commander + * + */ +$sql = "SELECT s.nom, s.idp as socid, s.address, s.cp, s.ville"; +$sql .= ", l.ligne, l.statut, l.rowid"; + +$sql .= " FROM ".MAIN_DB_PREFIX."societe as s"; +$sql .= " , ".MAIN_DB_PREFIX."telephonie_societe_ligne as l"; +$sql .= " , ".MAIN_DB_PREFIX."telephonie_fournisseur as f"; +$sql .= " WHERE l.fk_soc = s.idp AND l.fk_fournisseur = f.rowid"; +$sql .= " AND f.rowid = 4 AND l.statut = 9 ORDER BY l.statut ASC"; + +$resql = $db->query($sql); +$result = 1; +if ($resql) +{ + $i = 0; + $num = $db->num_rows($resql); + + while ($i < $num) + { + $obj = $db->fetch_object($resql); + + $num_abo = GetNumAbonne($db, $obj->socid, 4); + + if ($num_abo == 0) + { + $societe_nom = $obj->nom; + $societe_adresse = $obj->address; + $societe_codepostal = $obj->cp; + $societe_ville = $obj->ville; + + $num_abo = CreateAbonne($host, + $user_login, + $user_passwd, + $user_contract, + $societe_nom, + $societe_adresse, + $societe_codepostal, + $societe_ville); + + if ($num_abo > 0) + { + $result = SetNumAbonne($db, $obj->socid, $num_abo, 4); + } + else + { + $result = 1; + } + } + else + { + $result = 0; + } + + if ($result == 0) + { + $result = CreatePreselection($host, $user_login, $user_passwd, $obj->ligne, $num_abo); + } + + if ($result == 0) + { + $lint = new LigneTel($db); + $lint->fetch_by_id($obj->rowid); + if ($lint->statut == 9) + { + $lint->set_statut($user, 2); + } + } + + $i++; + } +} + +function CreatePreselection($host, $user_login, $user_passwd, $ligne, $id_person) +{ + dolibarr_syslog("Appel de CreatePreselection($host, $user_login, $user_passwd, $ligne, $id_person)"); + + $url = "/AzurApp_websvc_b3gdb/account.asmx/CreatePreselection?"; + + $url .= "user_login=". $user_login; + $url .= "&user_passwd=".$user_passwd; + $url .= "&id_person=".$id_person; + $url .= "&telnum=".$ligne; + $url .= "&okCollecte=true"; + $url .= "&okPreselection=true"; + + + $fp = fsockopen($host, 80, $errno, $errstr, 30); + if (!$fp) + { + dolibarr_syslog("$errstr ($errno)"); + } + else + { + $out = "GET $url HTTP/1.1\r\n"; + $out .= "Host: $host\r\n"; + $out .= "Connection: Close\r\n\r\n"; + + fwrite($fp, $out); + + $parse = 0; + $result = "error"; + + while (!feof($fp)) + { + $line = fgets($fp, 1024); + + if ($parse == 1) + { + preg_match('/^(.*)<\/string>$/', $line, $results); + + $result = $results[1]; + dolibarr_syslog($line); + $parse = 0; + } + + if (substr($line,0,38) == '') + { + $parse = 1; + } + } + fclose($fp); + } + + if (substr($result,0,2) == "OK") + { + dolibarr_syslog("Presel réussie ligne ".$ligne." id client ".$id_person." $result\n"); + return 0; + } + else + { + dolibarr_syslog("Presel échouée ligne ".$ligne." id client ".$id_person." $result\n"); + return -1; + } +} + +function GetNumAbonne($db, $socid, $fournid) +{ + dolibarr_syslog("Appel de GetNumAbonne($socid, $fournid)"); + + $sql = "SELECT fourn_id"; + $sql .= " FROM ".MAIN_DB_PREFIX."telephonie_societe_fournid"; + $sql .= " WHERE fk_soc = ".$socid; + $sql .= " AND fk_fourn = ".$fournid; + + $resql = $db->query($sql); + + if ($resql) + { + if ($db->num_rows($resql) > 0) + { + $row = $db->fetch_row($resql); + return $row[0]; + } + else + { + return 0; + } + } + else + { + dolibarr_syslog("Erreur dans GetNumAbonne($socid, $fournid)"); + return -1; + } +} + +function SetNumAbonne($db, $socid, $soc_fourn_id, $fournid) +{ + $sql = "INSERT INTO ".MAIN_DB_PREFIX."telephonie_societe_fournid"; + $sql .= " (fk_soc, fourn_id, fk_fourn, datec) "; + $sql .= " VALUES ($socid, $soc_fourn_id, $fournid, now()) ;"; + + $resql = $db->query($sql); + + if ($resql) + { + return 0; + } + else + { + dolibarr_syslog("Erreur dans SetNumAbonne($socid, $soc_fourn_id, $fournid)"); + return -1; + } +} + +function CreateAbonne($host, $user_login, $user_passwd, $user_contract, $societe_nom, $societe_adresse, $societe_codepostal, $societe_ville) +{ + $result = "error"; + + $civilite = 1; + + $url = "/AzurApp_websvc_b3gdb/account.asmx/CreateAbonne?"; + + $url .= "user_login=". $user_login; + $url .= "&user_passwd=".$user_passwd; + $url .= "&civilite=". urlencode($civilite); + $url .= "&id_contract=".$user_contract; + $url .= "&firstname=". urlencode("Societe"); + $url .= "&lastname=". urlencode($societe_nom); + $url .= "&adresse=". urlencode($societe_adresse); + $url .= "&codepostal=". urlencode($societe_codepostal); + $url .= "&ville=". urlencode($societe_ville); + $url .= "&pays=". urlencode("NULL"); + $url .= "&telnum=". urlencode("NULL"); + + $fp = fsockopen($host, 80, $errno, $errstr, 30); + if (!$fp) + { + dolibarr_syslog("$errstr ($errno)"); + } + else + { + $out = "GET $url HTTP/1.1\r\n"; + $out .= "Host: $host\r\n"; + $out .= "Connection: Close\r\n\r\n"; + + fwrite($fp, $out); + + $parse = 0; + + while (!feof($fp)) + { + $line = fgets($fp, 1024); + + if ($parse == 1) + { + //print $line."\n"; + + preg_match('/^(.*):(.*)<\/string>$/', $line, $results); + + $result = $results[1]; + $client_id = $results[2]; + dolibarr_syslog($line); + } + + if (substr($line,0,38) == '') + { + $parse = 1; + } + } + fclose($fp); + } + + dolibarr_syslog("$result:$client_id"); + + if ($result == "OK") + { + dolibarr_syslog("Commande réussie id client ".$client_id); + return $client_id; + } + else + { + return 0; + } +} +?>