modulos/Telecom.php+0

   1 <?php\r
   2 function Telecom_Nombre() {\r
   3   return "Telecom:Claro/Personal";\r
   4 }\r
   5 \r
   6 function Telecom_Enviar($telefono,$mensaje,$firma) {\r
   7 //echo "-Funcionando en modo de pruebas-<BR>";\r
   8   $snoopy = new Snoopy;\r
   9   // Opciones de Snoopy (Mensajitos se muestra como IExplore 6.0)\r
  10   // Esto es por las paginas que bloquean a navegadores que no\r
  11   // sean Internet Explorer\r
  12   $snoopy->agent = "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)";\r
  13   //Configuramos el Proxy.\r
  14   //**************************************************\r
  15   $Datos_Proxy = explode(":",cProxy());\r
  16   //echo "0:".$Datos_Proxy[0]."<br>";\r
  17   //echo "1:".$Datos_Proxy[1]."<br>";\r
  18   $snoopy->proxy_host = $Datos_Proxy[0];\r
  19   $snoopy->proxy_port = $Datos_Proxy[1];\r
  20   //echo "Servidor usado: $Datos_Proxy[0]:$Datos_Proxy[1]<br>";\r
  21   //**************************************************\r
  22   $submit_url = "http://sms.telecom.com.sv/pages/claro.aspx";\r
  23   $snoopy->referer = "http://www.claro.com.sv/";\r
  24   $snoopy->set_submit_normal;\r
  25   $snoopy->fetch($submit_url);\r
  26 \r
  27 //echo "<xmp>".$snoopy->results."</xmp>";\r
  28   //1era proteccion: Cookie -> ASP.NET SessionID\r
  29   //Si no concuerda entonces el mensaje es invalido\r
  30   //Obtenemos las cookies\r
  31   foreach($snoopy->headers as $i=>$val) {\r
  32       if(strstr($val,"Set-Cookie")) {\r
  33         preg_match("/Set\-Cookie: (.*)=(.*);/",$val,$matches);\r
  34         $snoopy->cookies[$matches[1]] = $matches[2];\r
  35         //echo $matches[1]."=".$matches[2]."<br>";\r
  36       }\r
  37   }\r
  38 \r
  39   // Valores del formulario\r
  40 //ViewState\r
  41 $iPos = strpos($snoopy->results,"__VIEWSTATE") + 20 ;\r
  42 $fPos = strpos($snoopy->results, "\" />", $iPos);\r
  43 $ViewState = substr($snoopy->results, $iPos, $fPos - $iPos);\r
  44 //echo "VS:".$ViewState."<br>";\r
  45 //echo "#VSf:".$fPos."<br>";\r
  46 //echo "#VSi:".$iPos."<br>";\r
  47 \r
  48 //Codigo\r
  49 $iPos = strpos($snoopy->results,'FILTER:Wave(Freq=2, Phase=100, Strength=1); HEIGHT:12px">') + 57 ;\r
  50 $Codigo = substr($snoopy->results, $iPos, 5);\r
  51 //echo "VC:".$Codigo."<br>";\r
  52 //echo "#VCi:".$iPos."<br>";\r
  53 \r
  54 \r
  55   $submit_vars["__VIEWSTATE"] = $ViewState;\r
  56   $submit_vars['Enviosms2:txtTel'] = $telefono;\r
  57   $submit_vars['Enviosms2:txtmsg'] = $mensaje." F. ".$firma;\r
  58   $submit_vars['Enviosms2:txtCG'] = $Codigo;\r
  59   $submit_vars['Enviosms2:btnenviar'] = "Enviar";\r
  60 \r
  61 $snoopy->submit($submit_url,$submit_vars);\r
  62 //echo "----------------------------------------------------------";\r
  63 //echo "<xmp>".$snoopy->results."</xmp>";\r
  64 //echo "----------------------------------------------------------";\r
  65 \r
  66 //Evaluar la salida\r
  67 if(strstr($snoopy->results,'exito')===FALSE){\r
  68 return false;\r
  69 }else{\r
  70 return true;\r
  71 }\r
  72 }\r
  73 ?>\r