|
|
|
|
#!/usr/bin/php -q
|
|
|
|
|
<?php
|
|
|
|
|
error_reporting(E_ERROR);
|
|
|
|
|
ini_set('display_errors', "Off");
|
|
|
|
|
include("util/util.php");
|
|
|
|
|
|
|
|
|
|
$display = isset($argv[1]) && $argv[1] == "D";
|
|
|
|
|
/*
|
|
|
|
|
* Tamanho do pacote de dados inserido no banco de uma vez.
|
|
|
|
|
*/
|
|
|
|
|
define("NUM_PACK_INSERT", 1000);
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Nome dos campos no banco de dados e as posi<EFBFBD><EFBFBD>es nos arrays $arLen e $arPos, que cont<EFBFBD>m informa<EFBFBD><EFBFBD>es para leitura do arquivo.
|
|
|
|
|
*/
|
|
|
|
|
$arCampos = array("prefixo" => 0, "prestadora" => 1, "ini" => 2, "fim" => 3, "spid" => 5);
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Quantidade de carecteres do campo referido.
|
|
|
|
|
*/
|
|
|
|
|
$arLen = array(0 => 7, 1 => 30, 2 => 4, 3 => 4);
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Posi<EFBFBD><EFBFBD>o do campo no arquivo.
|
|
|
|
|
*/
|
|
|
|
|
$arPos = array(0 => 0, 1 => 7, 2 => 37, 3 => 41);
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Campos que n<EFBFBD>o constam no arquivo e s<EFBFBD>o obtidos atrav<EFBFBD>s de um campo lido no arquivo.
|
|
|
|
|
*/
|
|
|
|
|
$arCompl = array();
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Diretorio da aplica<EFBFBD><EFBFBD>o.
|
|
|
|
|
*/
|
|
|
|
|
$baseDir = dirname(__FILE__);
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Diretorio para download dos arquivos.
|
|
|
|
|
*/
|
|
|
|
|
$dir = "arquivos_cnl";
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Nome para o arquivo remoto.
|
|
|
|
|
*/
|
|
|
|
|
$remoteFile = sprintf("cnl_movel_%s.zip", date('Y-m-d')); //Arqjuivo compactado.
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Contera o nome do arquivo de dados descompactados, sempre um txt.
|
|
|
|
|
*/
|
|
|
|
|
$workFile = ''; //Arqjuivo txt.
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* url para o arquivo na anatel.
|
|
|
|
|
*/
|
|
|
|
|
MsgCnl("acessando local do arquivo!");
|
|
|
|
|
$urlFile = "http://sistemas.anatel.gov.br/areaarea/N_Download/Tela.asp?varTIPO=CentralCNL&varPRESTADORA=&varCENTRAL=M&varUF=&varPERIODO=&acao=c&cmd=&varMOD=Publico";
|
|
|
|
|
//$urlFile = "http://127.0.0.1/tmp/CE_M_185012.ZIP";
|
|
|
|
|
MsgCnl("local do arquivo encontrado!");
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Caminho completo para o diret<EFBFBD>rio de download.
|
|
|
|
|
*/
|
|
|
|
|
$workDir = sprintf("%s/%s/", $baseDir, $dir);
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Caminho completo para o arquivo baixado.
|
|
|
|
|
*/
|
|
|
|
|
$remoteFile = sprintf("%s%s", $workDir, $remoteFile);
|
|
|
|
|
|
|
|
|
|
try {
|
|
|
|
|
/*
|
|
|
|
|
* Verifica se o diretorio exitir apaga seu conteudo do contrario ir<EFBFBD> cria-lo.
|
|
|
|
|
*/
|
|
|
|
|
MsgCnl("Verificando diretorios para download!");
|
|
|
|
|
if (!file_exists($workDir)) {
|
|
|
|
|
mkdir($workDir);
|
|
|
|
|
} else {
|
|
|
|
|
system(sprintf("rm -rf %s/*", $workDir));
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Baixa o aquivo remoto.
|
|
|
|
|
*/
|
|
|
|
|
MsgCnl("Baixando o arquivo remoto!");
|
|
|
|
|
downloadFile($urlFile, $remoteFile);
|
|
|
|
|
if (!file_exists($remoteFile)) {
|
|
|
|
|
GeraExcept("N<EFBFBD>o foi poss<EFBFBD>vel baixar o arquivo!");
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Desconpacta o arquivo baixado.
|
|
|
|
|
*/
|
|
|
|
|
MsgCnl("Descompactando o arquivo remoto!");
|
|
|
|
|
system(sprintf("unzip -q %s -d %s", $remoteFile, $workDir));
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Pega o nome do arquivo que ser<EFBFBD> im?ortado.
|
|
|
|
|
*/
|
|
|
|
|
$workFile = sprintf("%s%s", $workDir, GetFileByStr($workDir, ".txt"));
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Verifica se o arquivo foi descompactado.
|
|
|
|
|
*/
|
|
|
|
|
if (!file_exists($workFile)) {
|
|
|
|
|
GeraExcept("N<EFBFBD>o foi poss<EFBFBD>vel descompactar o arquivo!");
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Importa o arquivo para o banco de dados
|
|
|
|
|
*/
|
|
|
|
|
MsgCnl("Iniciando a leitura do arquivo!");
|
|
|
|
|
if (!($handle = fopen($workFile, 'r'))) {
|
|
|
|
|
GeraExcept("N<EFBFBD>o foi poss<EFBFBD>vel abrir o arquivo! $workFile ");
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Comando para o banco de dados.
|
|
|
|
|
*/
|
|
|
|
|
$cmd = sprintf("insert into prefixos(%s)values(%s);\n", GetArrayKey($arCampos), '%s');
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Conex<EFBFBD>o para o banco de daods;
|
|
|
|
|
*/
|
|
|
|
|
$connStr = sprintf("host='%s' port='%s' dbname='%s' user='%s' password='%s'", '192.168.115.12', '5432', 'portabilidade', 'contacte', 'ctepgSQL');
|
|
|
|
|
//$connStr = sprintf("host='%s' port='%s' dbname='%s' user='%s' password='%s'", '127.0.0.1', '5432', 'pbx', 'contacte', 'ctepgSQL');
|
|
|
|
|
|
|
|
|
|
$conn = CnpFGetConnection($connStr);
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Inicia transa<EFBFBD><EFBFBD>o com o banco de dados.
|
|
|
|
|
*/
|
|
|
|
|
if (!pg_query($conn, "begin")) {
|
|
|
|
|
GeraExcept("N<EFBFBD>o foi poss<EFBFBD>vel iniciar uma transa<EFBFBD><EFBFBD>o!");
|
|
|
|
|
}
|
|
|
|
|
MsgCnl("Transa<EFBFBD><EFBFBD>o com banco de dados iniciada!");
|
|
|
|
|
|
|
|
|
|
MsgCnl("Removendo registros existentes!");
|
|
|
|
|
if (!pg_query($conn, "truncate table prefixos")) {
|
|
|
|
|
GeraExcept("N<EFBFBD>o foi poss<EFBFBD>vel remover os registros existentes!");
|
|
|
|
|
}
|
|
|
|
|
MsgCnl("Registros existentes removidos!");
|
|
|
|
|
|
|
|
|
|
MsgCnl("Zerando contadores!");
|
|
|
|
|
if (!pg_query($conn, "SELECT setval('public.prefixos_id_reg_seq', 1, true)")) {
|
|
|
|
|
GeraExcept("N<EFBFBD>o foi poss<EFBFBD>vel zerar contadores!");
|
|
|
|
|
}
|
|
|
|
|
MsgCnl("Contadores zerados!");
|
|
|
|
|
$i = 0;
|
|
|
|
|
|
|
|
|
|
$numLines = 0;
|
|
|
|
|
$query = "";
|
|
|
|
|
while (!feof($handle)) {
|
|
|
|
|
$buffer = trim(fgets($handle));
|
|
|
|
|
if (!$buffer) {
|
|
|
|
|
continue;
|
|
|
|
|
}
|
|
|
|
|
$values = '';
|
|
|
|
|
|
|
|
|
|
//Define a operadora
|
|
|
|
|
$prestadora = trim(substr($buffer, 7, 30));
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
foreach ($arCampos as $key => $value) {
|
|
|
|
|
|
|
|
|
|
if ($value <= 3) {
|
|
|
|
|
$pos = GetPosLine($value);
|
|
|
|
|
$tam = GetPosLine($value, false);
|
|
|
|
|
$str = trim(substr($buffer, $pos, $tam));
|
|
|
|
|
} else {
|
|
|
|
|
$str = spid($conn, $prestadora);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
$values .= !$values ? QuotedStr($str) : ',' . QuotedStr($str);
|
|
|
|
|
}
|
|
|
|
|
$query .= sprintf($cmd, $values);
|
|
|
|
|
|
|
|
|
|
$numLines++;
|
|
|
|
|
|
|
|
|
|
if (++$i >= NUM_PACK_INSERT) {
|
|
|
|
|
if (!pg_query($conn, $query)) {
|
|
|
|
|
GeraExcept("N<EFBFBD>o foi poss<EFBFBD>vel inserir os registros na base de dados!");
|
|
|
|
|
}
|
|
|
|
|
MsgCnl(sprintf("Inserido %s registros no banco de dados!", str_pad($numLines, 6, '0', STR_PAD_LEFT)), true);
|
|
|
|
|
$query = '';
|
|
|
|
|
$i = 0;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
/*
|
|
|
|
|
* Se $i < 500 ainda devem ter registros para inserir.
|
|
|
|
|
*/
|
|
|
|
|
if ($query) {
|
|
|
|
|
if (!pg_query($conn, $query)) {
|
|
|
|
|
GeraExcept("N<EFBFBD>o foi poss<EFBFBD>vel inserir os registros finais na base de dados!");
|
|
|
|
|
}
|
|
|
|
|
MsgCnl(sprintf("Inserido %s registros no banco de dados!", str_pad($numLines, 6, '0', STR_PAD_LEFT)));
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* verifica se h<EFBFBD> algum registro na tabela sem SIPD
|
|
|
|
|
*/
|
|
|
|
|
$qtde = verificaPrefixo($conn);
|
|
|
|
|
if ($qtde > 0)
|
|
|
|
|
MsgCnl("ALERTA: foram inseridos $qtde registros sem SPID, favor verificar!");
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Finaliza a transa<EFBFBD><EFBFBD>o.
|
|
|
|
|
*/
|
|
|
|
|
if (!pg_query($conn, "commit")) {
|
|
|
|
|
GeraExcept("N<EFBFBD>o foi poss<EFBFBD>vel finalizar a transa<EFBFBD><EFBFBD>o!");
|
|
|
|
|
}
|
|
|
|
|
MsgCnl("Opera<EFBFBD><EFBFBD>o finalizada com sucesso!");
|
|
|
|
|
|
|
|
|
|
fclose($handle);
|
|
|
|
|
} catch (Exception $ex) {
|
|
|
|
|
$path = '/var/log/asterisk/importa_cnlm.log';
|
|
|
|
|
$log = trim($ex->getMessage() . "\n" . GetLasterror() . "\n");
|
|
|
|
|
MsgCnl("Erro ao realizar opera<EFBFBD><EFBFBD>o: \n" . $log);
|
|
|
|
|
WriteLog(str_repeat("-", 255) . "\n", $path);
|
|
|
|
|
WriteLog(sprintf("[Data: %s]\n", date('Y-m-d H:i:s')), $path);
|
|
|
|
|
WriteLog($log, $path);
|
|
|
|
|
WriteLog($query, $path);
|
|
|
|
|
WriteLog(str_repeat("-", 255) . "\n", $path);
|
|
|
|
|
MsgCnl("Para mais informa<EFBFBD><EFBFBD>es consulte o log: $path\n");
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
function GetPosLine($key, $pos = true) {
|
|
|
|
|
global $arLen, $arPos;
|
|
|
|
|
if ($pos)
|
|
|
|
|
return $arPos[$key];
|
|
|
|
|
else
|
|
|
|
|
return $arLen[$key];
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
function CnpFGetConnection($connStr = '') {
|
|
|
|
|
/*
|
|
|
|
|
* Se precisar de uma conex<EFBFBD>o diferente da padr<EFBFBD>o, espcifique sua propria connection string.
|
|
|
|
|
* $connStr = sprintf("host='%s' port='%s' dbname='%s' user='%s' password='%s'", '127.0.0.1', '5432', 'pbx', 'contacte', 'ctepgSQL');
|
|
|
|
|
*/
|
|
|
|
|
$connStr = !$connStr ? GetDefStrDb() : $connStr;
|
|
|
|
|
$conn = pg_pconnect($connStr);
|
|
|
|
|
if (!$conn) {
|
|
|
|
|
GeraExcept("N<EFBFBD>o foi poss<EFBFBD>vel estabelecer uma conex<EFBFBD>o com o banco de dados!");
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
return $conn;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
function MsgCnl($msg, $bLine = false) {
|
|
|
|
|
global $display;
|
|
|
|
|
|
|
|
|
|
if ($display) {
|
|
|
|
|
echo "\r";
|
|
|
|
|
echo "\033[K"; // Erase to the end of the line
|
|
|
|
|
echo $bLine ? trim(RemoveAcentos($msg)) : ( RemoveAcentos($msg) . "\n");
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
function spid($conn, $oper) {
|
|
|
|
|
$dados = explode(" ", $oper);
|
|
|
|
|
$operadora = $dados[0];
|
|
|
|
|
$sql = "select spid from atualiza_routing where upper(prestadora) like(upper('%$operadora%')) limit 1";
|
|
|
|
|
$result = pg_query($conn, $sql);
|
|
|
|
|
$row = pg_fetch_row($result);
|
|
|
|
|
return $row[0];
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
function verificaPrefixo($conn) {
|
|
|
|
|
$sql = "select count(*) from prefixos where (spid is null or spid = '')";
|
|
|
|
|
$result = pg_query($conn, $sql);
|
|
|
|
|
$row = pg_fetch_row($result);
|
|
|
|
|
return $row[0];
|
|
|
|
|
}
|