source: admin/ogAdmSources/ogAdmWebCon/principal/purgar.php @ e42f34e

918-git-images-111dconfigfileconfigure-oglivegit-imageslgromero-new-oglivemainmaint-cronmount-efivarfsmultivmmultivm-ogboot-installerogClonningEngineogboot-installer-jenkinsoglive-ipv6test-python-scriptsticket-301ticket-50ticket-50-oldticket-577ticket-585ticket-611ticket-612ticket-693ticket-700ubu24tplunification2use-local-agent-oglivevarios-instalacionwebconsole3
Last change on this file since e42f34e was 8964f9b, checked in by ramon <ramongomez@…>, 16 years ago

Resstructuración de trunk.

git-svn-id: https://opengnsys.es/svn/trunk@390 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 6.0 KB
Line 
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 2003-2004
6// Fecha Última modificación: Febrero-2005
7// Nombre del fichero: actualizar.php
8// Descripción :
9//              Actualiza la visualización de los ordenadores de un ámbito concreto
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/SockHidra.php");
13include_once("../clases/AdoPhp.php");
14include_once("../includes/constantes.php");
15include_once("../includes/CreaComando.php");
16include_once("../idiomas/php/".$idioma."/purgar_".$idioma.".php");
17//________________________________________________________________________________________________________
18$litambito=0;
19$idambito=0;
20
21if (isset($_GET["litambito"])) $litambito=$_GET["litambito"]; // Recoge parametros
22if (isset($_GET["idambito"])) $idambito=$_GET["idambito"];
23
24$cmd=CreaComando($cadenaconexion);
25if (!$cmd)
26        Header('Location: '.$pagerror.'?herror=2'); // Error de conexión con servidor B.D.
27//________________________________________________________________________________________________________
28$cadenaip="";
29switch($litambito){
30        case $LITAMBITO_CENTROS :
31                $cmd->texto="SELECT idcentro,nombrecentro FROM centros WHERE idcentro=".$idambito;
32                RecorreCentro($cmd);
33                break;
34        case $LITAMBITO_GRUPOSAULAS :
35                $cmd->texto="SELECT idgrupo,nombregrupo FROM grupos WHERE idgrupo=".$idambito." AND tipo=".$AMBITO_GRUPOSAULAS;
36                RecorreGruposAulas($cmd);
37                break;
38        case $LITAMBITO_AULAS :
39                $cmd->texto="SELECT idaula,nombreaula FROM aulas WHERE idaula=".$idambito;
40                RecorreAulas($cmd);
41                break;
42        case $LITAMBITO_GRUPOSORDENADORES :
43                $cmd->texto="SELECT idgrupo,nombregrupoordenador FROM gruposordenadores WHERE idgrupo=".$idambito;
44                RecorreGruposOrdenadores($cmd);
45                break;
46        case $LITAMBITO_ORDENADORES :
47                $cmd->texto="SELECT ip FROM ordenadores WHERE idordenador=".$idambito;
48                RecorreOrdenadores($cmd);
49                break;
50}
51$shidra=new SockHidra($servidorhidra,$hidraport);
52$parametros="1"; // Ejecutor
53$parametros.="nfn=Purgar".chr(13);
54$parametros.="iph=".$cadenaip.chr(13);
55$resul=manda_trama();
56// *************************************************************************************************************************************************
57?>
58<HTML>
59<TITLE>" Administración web de aulas"</TITLE>
60<HEAD>
61</HEAD>
62<BODY>
63<?
64        echo '<SCRIPT language="javascript">';
65         if($resul)
66                echo "alert('".$TbMsg[0]."');";
67         else
68                echo "alert('".$TbMsg[1]."');";
69        echo '  self.close();';
70        echo '</SCRIPT>';
71?>
72</BODY>
73</HTML>
74<?
75//________________________________________________________________________________________________________
76//
77//      Manda una trama del comando Actualizar
78//________________________________________________________________________________________________________
79function manda_trama(){
80        global $parametros;
81        global $shidra;
82        if ($shidra->conectar()){ // Se ha establecido la conexión con el servidor hidra
83                $shidra->envia_comando($parametros);
84                $shidra->desconectar();
85                return(true);
86        }
87        return(false);
88}
89//________________________________________________________________________________________________________
90function RecorreCentro($cmd){
91        global $AMBITO_GRUPOSAULAS;
92        $rs=new Recordset;
93        $rs->Comando=&$cmd;
94        if (!$rs->Abrir()) return; // Error al abrir recordset
95        $rs->Primero();
96        if(!$rs->EOF){
97                $idcentro=$rs->campos["idcentro"];
98                $cmd->texto="SELECT idgrupo,nombregrupo FROM grupos WHERE idcentro=".$idcentro." AND grupoid=0 AND tipo=".$AMBITO_GRUPOSAULAS." ORDER BY nombregrupo";
99                RecorreGruposAulas($cmd);
100                $cmd->texto="SELECT idaula,nombreaula FROM aulas WHERE idcentro=".$idcentro." AND grupoid=0 ORDER BY nombreaula";
101                RecorreAulas($cmd);
102        }
103        $rs->Cerrar();
104}
105//________________________________________________________________________________________________________
106function RecorreGruposAulas($cmd){
107        global $AMBITO_GRUPOSAULAS;
108        $rs=new Recordset;
109        $rs->Comando=&$cmd;
110        if (!$rs->Abrir()) return; // Error al abrir recordset
111        $rs->Primero();
112        while (!$rs->EOF){
113                $idgrupo=$rs->campos["idgrupo"];
114                $cmd->texto="SELECT idgrupo,nombregrupo FROM gruposaulas WHERE grupoid=".$idgrupo." AND tipo=".$AMBITO_GRUPOSAULAS." ORDER BY nombregrupo";
115                RecorreGruposAulas($cmd);
116                $cmd->texto="SELECT idaula,nombreaula FROM aulas WHERE  grupoid=".$idgrupo." ORDER BY nombreaula";
117                RecorreAulas($cmd);
118                $rs->Siguiente();
119        }
120        $rs->Cerrar();
121}
122//________________________________________________________________________________________________________
123function RecorreAulas($cmd){
124        $rs=new Recordset;
125        $rs->Comando=&$cmd;
126        if (!$rs->Abrir()) return; // Error al abrir recordset
127        $rs->Primero();
128        while (!$rs->EOF){
129                $idaula=$rs->campos["idaula"];
130                $cmd->texto="SELECT idordenador,nombreordenador,ip,mac FROM ordenadores WHERE  idaula=".$idaula;
131                $k=0;
132                RecorreOrdenadores($cmd);
133                $rs->Siguiente();
134        }
135        $rs->Cerrar();
136}
137//________________________________________________________________________________________________________
138function RecorreGruposOrdenadores($cmd){
139        $rs=new Recordset;
140        $rs->Comando=&$cmd;
141        if (!$rs->Abrir()) return; // Error al abrir recordset
142        $rs->Primero();
143        while (!$rs->EOF){
144                $idgrupo=$rs->campos["idgrupo"];
145                $cmd->texto="SELECT idgrupo,nombregrupoordenador FROM gruposOrdenadores WHERE grupoid=".$idgrupo." ORDER BY nombregrupoordenador";
146                RecorreGruposOrdenadores($cmd);
147                $cmd->texto="SELECT idordenador,nombreordenador,ip,mac FROM ordenadores WHERE  grupoid=".$idgrupo;
148                RecorreOrdenadores($cmd);
149                $rs->Siguiente();
150        }
151        $rs->Cerrar();
152}
153//________________________________________________________________________________________________________
154function RecorreOrdenadores($cmd){
155        global $cadenaip;
156        $rs=new Recordset;
157        $rs->Comando=&$cmd;
158        if (!$rs->Abrir()) return; // Error al abrir recordset
159        $rs->Primero();
160        while (!$rs->EOF){
161                $cadenaip.=$rs->campos["ip"].";";
162                $rs->Siguiente();
163        }
164        $rs->Cerrar();
165}
166?>
Note: See TracBrowser for help on using the repository browser.