| [3ec149c] | 1 | <? | 
|---|
 | 2 | // ************************************************************************************************************************************************* | 
|---|
 | 3 | // Aplicación WEB: ogAdmWebCon | 
|---|
 | 4 | // Autor: José Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla | 
|---|
 | 5 | // Fecha Creación: Año 2009-2010 | 
|---|
 | 6 | // Fecha Última modificación: Abril-2010 | 
|---|
 | 7 | // Nombre del fichero: purgar.php | 
|---|
 | 8 | // Descripción :  | 
|---|
 | 9 | //              Obliga a los clientes a reiniciar la sesión en el sistema | 
|---|
 | 10 | // ************************************************************************************************************************************************* | 
|---|
 | 11 |         include_once("../includes/ctrlacc.php"); | 
|---|
 | 12 |         include_once("../clases/SockHidra.php"); | 
|---|
 | 13 |         include_once("../clases/AdoPhp.php"); | 
|---|
 | 14 |         include_once("../includes/constantes.php"); | 
|---|
 | 15 |         include_once("../includes/comunes.php"); | 
|---|
 | 16 |         include_once("../includes/CreaComando.php"); | 
|---|
 | 17 |         include_once("../includes/RecopilaIpesMacs.php"); | 
|---|
 | 18 |         //________________________________________________________________________________________________________ | 
|---|
 | 19 |         $ambito=0;  | 
|---|
 | 20 |         $idambito=0;  | 
|---|
 | 21 |  | 
|---|
 | 22 |         if (isset($_POST["ambito"])) $ambito=$_POST["ambito"];  | 
|---|
 | 23 |         if (isset($_POST["idambito"])) $idambito=$_POST["idambito"];  | 
|---|
 | 24 |         //________________________________________________________________________________________________________ | 
|---|
 | 25 |         $cmd=CreaComando($cadenaconexion); | 
|---|
 | 26 |         if (!$cmd) | 
|---|
 | 27 |                 Header('Location: '.$pagerror.'?herror=2'); // Error de conexión con servidor B.D. | 
|---|
 | 28 |         //________________________________________________________________________________________________________ | 
|---|
 | 29 |         $funcion="Purgar"; // Nombre de la función que procesa la petición | 
|---|
 | 30 |         $atributos=""; // Parametros adicionales  la petición | 
|---|
 | 31 |         $aplicacion=""; // Ámbito de aplicación (cadena de ipes separadas por ";" y de identificadores de ordenadores por "," | 
|---|
 | 32 |         $acciones=""; // Cadena de identificadores de acciones separadas por ";" para seguimiento  | 
|---|
 | 33 |         //________________________________________________________________________________________________________ | 
|---|
 | 34 |         // Ámbito de aplicación de la petición | 
|---|
 | 35 |         //________________________________________________________________________________________________________ | 
|---|
 | 36 |         $cadenaid=""; | 
|---|
 | 37 |         $cadenaip=""; | 
|---|
 | 38 |         $cadenamac=""; | 
|---|
 | 39 |         RecopilaIpesMacs($cmd,$ambito,$idambito); // Ámbito de aplicación | 
|---|
 | 40 |         $aplicacion="ido=".$cadenaid.chr(13)."iph=".$cadenaip.chr(13); | 
|---|
 | 41 |         //________________________________________________________________________________________________________ | 
|---|
 | 42 |         // Envio al servidor de la petición | 
|---|
 | 43 |         //________________________________________________________________________________________________________ | 
|---|
 | 44 |         $trama=""; | 
|---|
 | 45 |         $shidra=new SockHidra($servidorhidra,$hidraport);  | 
|---|
 | 46 |         if ($shidra->conectar()){ // Se ha establecido la conexión con el servidor hidra | 
|---|
 | 47 |                 $parametros="nfn=".$funcion.chr(13); | 
|---|
 | 48 |                 $parametros.=$aplicacion; | 
|---|
 | 49 |                 $parametros.=$atributos; | 
|---|
 | 50 |                 $parametros.=$acciones; | 
|---|
 | 51 |                 $shidra->envia_comando($parametros); | 
|---|
 | 52 |                 $trama=$shidra->recibe_respuesta(); | 
|---|
 | 53 |                 $shidra->desconectar(); | 
|---|
 | 54 |                 $hlonprm=hexdec(substr($trama,$LONCABECERA,$LONHEXPRM)); | 
|---|
 | 55 |                 $parametros=substr($trama,$LONCABECERA+$LONHEXPRM,$hlonprm); | 
|---|
 | 56 |                 $ValorParametros=extrae_parametros($parametros,chr(13),'='); | 
|---|
 | 57 |                 $trama_notificacion=$ValorParametros["res"]; | 
|---|
 | 58 |                 echo $trama_notificacion; // Devuelve respuesta  | 
|---|
 | 59 |         } | 
|---|
 | 60 |         else | 
|---|
 | 61 |                 echo "0"; // Error de conexión | 
|---|
 | 62 | ?> | 
|---|
 | 63 |  | 
|---|