function Tigo_Enviar($telefono, $mensaje, $firma) { global $MiBD_OK; if (!$MiBD_OK) { $MDB = new iniParser(dirname(__FILE__) . "/misc/Tigo.datos.db"); } //************************************************** // Snoop $snoopy = new Snoopy(); $snoopy->agent = "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)"; //************************************************** //************************************************** //Configuramos el Proxy. $Datos_Proxy = explode(":", cProxy()); $snoopy->proxy_host = $Datos_Proxy[0]; $snoopy->proxy_port = $Datos_Proxy[1]; //echo "Servidor usado: $Datos_Proxy[0]:$Datos_Proxy[1]<br>"; //************************************************** //************************************************** $firma = urlencode($firma); $mensaje = urlencode($mensaje); //************************************************** //************************************************** //Verificamos si hay alguna sesión disponible para este número $no_hay_sesion_vigente = true; if ($MiBD_OK) { $ultimo_uso_de_sesion = ObtenerValorSQL("xsms_modulos_tigo", "valor", "rama='{$telefono}.ultimo'"); } else { $ultimo_uso_de_sesion = $MDB->getValue($telefono, "ultimo"); } if ($ultimo_uso_de_sesion) { //echo "Time: " . (time() - $ultimo_uso_de_sesion)."<br />"; if (time() - $ultimo_uso_de_sesion < 120) { $no_hay_sesion_vigente = false; if ($MiBD_OK) { $ultimo_uso_de_sesion = ObtenerValorSQL("xsms_modulos_tigo", "valor", "{$telefono}.sesion"); } else { $session = $MDB->getValue($telefono, "sesion"); } //echo "Sesion reusada: $session <br />" ; } } //************************************************** // --------------------------------------------------------------------------------------- if ($no_hay_sesion_vigente) { // Inicio de sesion en el gateway de mensajes $comando = "http://interactivo.mensajito.com/interactivo_sv/client.php?orden=1&nick=" . $firma . "&foo=" . rand(10000, 90000); //echo "C1: ".$comando."<br />"; $snoopy->fetch($comando); //echo "R1: ".$snoopy->results."<br />"; // Copiando el ID de sesion $iPos = stripos($snoopy->results, "session=") + 8; $session = substr($snoopy->results, $iPos); //echo "Sesion obtenida: ".$session."<br />"; $comando = "http://interactivo.mensajito.com/interactivo_sv/client.php?orden=21&session=" . $session . "&nick=" . $firma . "&dstphone=503" . $telefono . "&pin=undefined&foo=" . rand(10000, 90000); // Agregando al telefono destino //echo "C2: ".$comando."<BR>"; $snoopy->fetch($comando); //Acepto el telefono? //echo "R2: ".$snoopy->results."<br>"; //echo "Sesion creada<br />"; if (!eregi('^invitar.*', $snoopy->results, $textoEncontrado)) { //echo "ERROR: Tigo | No dio invitacion<br />"; return false; } if ($MiBD_OK) { EstablecerValorSQL("xsms_modulos_tigo", "{$telefono}.ultimo='" . time() . "'"); EstablecerValorSQL("xsms_modulos_tigo", "{$telefono}.sesion='" . $session . "'"); } else { $MDB->setValue($telefono, "ultimo", time()); $MDB->setValue($telefono, "sesion", $session); $MDB->save(); } } // --------------------------------------------------------------------------------------- // Se envia el mensaje $comando = "http://interactivo.mensajito.com/interactivo_sv/client.php?orden=3&session={$session}&nick=" . $firma . "&mensaje=" . $mensaje . "&foo=" . rand(999, 7000); //echo $comando."<br />"; $snoopy->fetch($comando); //echo "RESULTADO:<br /><pre>".$snoopy->results."</pre><br />"; $srandom = stripos($snoopy->results, "error=0"); // --------------------------------------------------------------------------------------- //Cerramos la sesion // $comando = "http://interactivo.mensajito.com/interactivo_sv/client.php?orden=6&session=$session&foo=".rand(10000,90000); //echo "Comando:".$comando."<br />"; // $snoopy->fetch($comando); // --------------------------------------------------------------------------------------- if ($srandom !== FALSE) { return true; } else { return false; } }
$graph->labels = "Digicel,Telefonica/Movistar,Telecom/Claro,Telemovil/Tigo"; $graph->values = "{$c_Digicel_OK};{$c_Digicel_NO}, {$c_Telefonica_OK};{$c_Telefonica_NO}, {$c_Telecom_OK};{$c_Telecom_NO}, {$c_Tigo_OK};{$c_Tigo_NO}"; echo $graph->create(); echo "<h3>Comparativa de compañías.</h3>Demanda de envio por compañías.<br />"; $graph->labels = "Digicel,Telefonica/Movistar,Telecom/Claro,Telemovil/Tigo"; $graph->legend = ""; $graph->values = $c_Digicel_OK + $c_Digicel_NO . ", " . ($c_Telefonica_OK + $c_Telefonica_NO) . ", " . ($c_Telecom_OK + $c_Telecom_NO) . ", " . ($c_Tigo_OK + $c_Tigo_NO); echo $graph->create(); echo "<h3>Eficiencia de envio por compañías.</h3>Porcentaje de envios exitosos respecto a total de mensajes por compañia.<br />"; $graph->type = "pBar"; $graph->legend = ""; $graph->showValues = 0; $graph->barColors = "#E0E0E0,#E0E0E0,#E0E0E0,#E0E0E0"; $graph->labels = "Digicel,Telefonica/Movistar,Telecom/Claro,Telemovil/Tigo"; $graph->values = $c_Digicel_OK . ";" . ($c_Digicel_OK + $c_Digicel_NO) . ", " . $c_Telefonica_OK . ";" . ($c_Telefonica_OK + $c_Telefonica_NO) . ", " . $c_Telecom_OK . ";" . ($c_Telecom_OK + $c_Telecom_NO) . ", " . $c_Tigo_OK . ";" . ($c_Tigo_OK + $c_Tigo_NO); echo $graph->create(); if ($MiBD_OK) { echo "<hr /><h2>Estadisticas de visitas</h2>"; $graph->showValues = 1; $graph->type = "hBar"; $c_Visitas_HTML = floatval(ObtenerValorSQL("xsms_estadisticas", "valor", "rama='text/html'")); $c_Visitas_WAP = floatval(ObtenerValorSQL("xsms_estadisticas", "valor", "rama='text/vnd.wap.wml'")); $graph->labels = "HTML,WAP/WML"; $graph->values = $c_Visitas_HTML . ", " . $c_Visitas_WAP; echo $graph->create(); echo "<br />¡<b>" . ceil(($c_Visitas_HTML + $c_Visitas_WAP) / $numdias) . "</b> visitas por dia!<br />"; } echo "<hr /><h2>Copyright</h2>Mensajitos.php es un proyecto creado por <b>mxgxw</b> -> www.nohayrazon.com<br />Este es Mensajitos.php TSV, una version modificada por <b>Vlad</b> del software Mensajitos.php<br />"; echo '</div> </body> </html>';
//$url_bad = $_POST['urlbad']; //************************************************ //Comprobamos que no sea publicidad, cobro, etc. if (DenegarFiltro($mensaje)) { exit("Lo sentimos, publicidad y cobros no son aceptados. <br>Aprenda mas sobre esto aqui:<br>" . ' <A href="http://foro.todosv.com/index.php/topic,95">Filtros... en pro de los salvadoreños y en contra de las compañías tacañas.<A />'); } //Validamos el numero telefonico if ($telefono == "" || !ereg("^((2|7)[0-9]{7})\$", $telefono)) { $estado = "Escriba el numero correctamente"; $ret = "Revise su numero"; } else { if ($MiBD_OK) { $cuentaNum = ObtenerValorSQL("xsms_flood", "valor", "clave='{$telefono}.cuenta'"); $ultimoNum = ObtenerValorSQL("xsms_flood", "valor", "clave='{$telefono}.ultimo'"); $cuentaIP = ObtenerValorSQL("xsms_flood", "valor", "clave='" . $_SERVER['REMOTE_ADDR'] . ".cuenta'"); $ultimoIP = ObtenerValorSQL("xsms_flood", "valor", "clave='" . $_SERVER['REMOTE_ADDR'] . ".ultimo'"); } else { //Comprobamos que no tenga ban. //Cuenta de mensajes a ese numero $cuentaNum = $I_nMDB->getValue($telefono, "cuenta"); //Cuando se envio por ultima vez un mensaje a ese numero $ultimoNum = $I_nMDB->getValue($telefono, "ultimo"); //Cuenta de mensajes desde esa IP $cuentaIP = $I_nMDB->getValue($_SERVER['REMOTE_ADDR'], "cuenta"); //Cuando esa IP nos envio por ultima vez un mensaje $ultimoIP = $I_nMDB->getValue($_SERVER['REMOTE_ADDR'], "ultimo"); } //------------------------------------------------- $flooder = 0; if (time() - $ultimoIP < $intervalo_flood && $cuentaIP > $limite_flood_ip) { //Si no ha pasado una hora desde su ultimo mensaje y ha enviado mas mensajes de la cuenta (IP)