source: admin/ogAdmSources/ogAdmWebCon/principal/configuraciongrupoordenador.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: 9.5 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: Marzo-2005
7// Nombre del fichero: configuraciongrupoordenador.php
8// Descripción :
9//              Muestra la configuraci� de las particiones de los ordenadores de un grupo de ordenadores
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/CreaComando.php");
14include_once("../includes/comunes.php");
15include_once("../includes/constantes.php");
16include_once("../includes/switchparticiones.php");
17include_once("../idiomas/php/".$idioma."/configuraciongrupoordenador_".$idioma.".php");
18//________________________________________________________________________________________________________
19$idgrupo=0;
20if (isset($_GET["idgrupo"])) $idgrupo=$_GET["idgrupo"];
21//________________________________________________________________________________________________________
22$nombregrupoordenador="";
23$ordenadores=0;
24
25$cmd=CreaComando($cadenaconexion); // Crea objeto comando
26if (!$cmd)
27        Header('Location: '.$pagerror.'?herror=2'); // Error de conexióncon servidor B.D.
28$resul=TomaPropiedades($cmd,$idgrupo);
29if (!$resul)
30        Header('Location: '.$pagerror.'?herror=3'); // Error de recuperaci� de datos.
31//________________________________________________________________________________________________________
32?>
33<HTML>
34<TITLE>Administraci� web de aulas</TITLE>
35<HEAD>
36<LINK rel="stylesheet" type="text/css" href="../estilos.css">
37</HEAD>
38<BODY>
39<FORM name="fdatos"> 
40        <P align=center class=cabeceras><?echo $TbMsg[0]?></P>
41        <P align=center><SPAN align=center class=subcabeceras><? echo $TbMsg[1]?></SPAN></P>
42        <TABLE  align=center border=0 cellPadding=1 cellSpacing=1 class=tabla_datos  style="width=425">
43<!------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
44                <TR>
45                        <TH align=center>&nbsp;<?echo $TbMsg[2]?>&nbsp;</TD>
46                        <?
47                                        echo '<TD>'. $nombregrupoordenador.'</TD><TD colspan=2 valign=top align=center rowspan=2><IMG border=3 style="border-color:#63676b" src="../images/aula.jpg"';
48                                        echo '"><br><center>&nbsp;'.$TbMsg[7].':&nbsp;'. $ordenadores.'</center></TD>';
49                        ?>
50        </TABLE>
51</FORM>
52<!------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
53        <p align=center>
54        <span align=center class=subcabeceras><? echo $TbMsg[3]?></span>
55        <FORM  name="fdatos">
56                        <? echo tabla_perfiles($cmd,$idcentro,$idgrupo);?>
57        </FORM>
58<!------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------->
59</BODY>
60</HTML>
61<?
62// *************************************************************************************************************************************************
63function TomaPropiedades($cmd,$idg){
64        global $idgrupo;
65        global $nombregrupoordenador;
66        global $ordenadores;
67        $rs=new Recordset;
68        $cmd->texto="SELECT * FROM gruposordenadores WHERE idgrupo=".$idg;
69        $rs->Comando=&$cmd;
70        if (!$rs->Abrir()) return(0); // Error al abrir recordset
71        $rs->Primero();
72        if (!$rs->EOF){
73                $nombregrupoordenador=$rs->campos["nombregrupoordenador"];
74                $rs->Cerrar();
75                $cmd->texto="SELECT count(*) as numordenadores FROM ordenadores WHERE grupoid=".$idg;
76                $rs->Comando=&$cmd;
77                if (!$rs->Abrir()) return(false); // Error al abrir recordset
78                $rs->Primero();
79                if (!$rs->EOF)
80                        $ordenadores=$rs->campos["numordenadores"];
81                return(true);
82        }
83        else
84                return(false);
85}
86//________________________________________________________________________________________________________
87function tabla_perfiles($cmd,$idcentro,$idgrupo){
88        global $cadenaip;
89        $tablaHtml="";
90        $rs=new Recordset;
91        $numorde=0;
92        $cmd->texto="SELECT COUNT(*) AS numorde FROM ordenadores WHERE grupoid=".$idgrupo;
93        $rs->Comando=&$cmd;
94        if (!$rs->Abrir()) return(""); // Error al abrir recordset
95        if(!$rs->EOF)
96                $numorde=$rs->campos["numorde"];
97        $idconfiguracion="";
98        $cmd->texto="SELECT COUNT(*) AS cuenta,configuraciones.descripcion,configuraciones.idconfiguracion FROM gruposordenadores";
99        $cmd->texto.=" INNER JOIN ordenadores ON gruposordenadores.idgrupo = ordenadores.grupoid";
100        $cmd->texto.=" INNER JOIN configuraciones ON ordenadores.idconfiguracion = configuraciones.idconfiguracion";
101        $cmd->texto.=" WHERE (gruposordenadores.idgrupo = ".$idgrupo.") AND configuraciones.idconfiguracion>0";
102        $cmd->texto.=" GROUP BY configuraciones.descripcion, configuraciones.idconfiguracion";
103        $cmd->texto.=" HAVING configuraciones.idconfiguracion>0";
104        $cmd->texto.=" ORDER BY configuraciones.descripcion";
105        $rs->Comando=&$cmd;
106        if (!$rs->Abrir()) return(""); // Error al abrir recordset
107        if(!$rs->EOF){
108                if($numorde!=$rs->campos["cuenta"]){
109                        while (!$rs->EOF){
110                                if($idconfiguracion!=$rs->campos["idconfiguracion"]){
111                                        if($idconfiguracion!=0)
112                                                $tablaHtml.="</TABLE>";
113
114                                        $tablaHtml.= '<TABLE  align=center border=0 cellPadding=1 cellSpacing=1';
115                                        $descripcion=$rs->campos["descripcion"];
116                                        $tablaHtml.= "<TR>";
117                                        $tablaHtml.= '<TD align=center ><IMG  src="../images/iconos/configuraciones.gif">';
118                                        $tablaHtml.='&nbsp;&nbsp<span style="COLOR: #000000;FONT-FAMILY: Verdana;FONT-SIZE: 12px; "><U><b>Configuraci�:</b>&nbsp;'.$rs->campos["descripcion"].'</U></SPAN></TD>';
119                                        $tablaHtml.= "</TR>";
120                                }
121                                $tablaHtml.= '<TR><TD>';
122                                $tablaHtml.=PintaOrdenadores($cmd,$idgrupo,$rs->campos["idconfiguracion"],$rs->campos["cuenta"]);
123                                $tablaHtml.= '</TD></TR>';
124                       
125                                $tablaHtml.= '<TR><TD>';
126                                $tablaHtml.=tabla_ConfiguracionGrupo($cmd,$idcentro,$idgrupo,$rs->campos["idconfiguracion"],$rs->campos["cuenta"]);
127                                $tablaHtml.= '</TD></TR>';
128                                $rs->Siguiente();
129                        }
130                        $tablaHtml.="</TABLE>";
131                }
132                else{
133                        $tablaHtml.=tabla_ConfiguracionGrupo($cmd,$idcentro,$idgrupo,$rs->campos["idconfiguracion"],$rs->campos["cuenta"]);
134                        $tablaHtml.='<INPUT type=hidden name="nuevasipes" id="ipes_'.$rs->campos["idconfiguracion"].'" value="'.$cadenaip.'">';
135                }
136        }
137        echo $tablaHtml;
138        $rs->Cerrar();
139}
140//________________________________________________________________________________________________________
141function PintaOrdenadores($cmd,$idgrupo,$idconfiguracion){
142        $ipidpidc="";
143        $rs=new Recordset;
144        $contor=0;
145        $maxcontor=10;
146        $cmd->texto=" SELECT nombreordenador,ip FROM ordenadores WHERE  idconfiguracion=".$idconfiguracion." AND grupoid=".$idgrupo." ORDER BY nombreordenador";
147        $rs->Comando=&$cmd;
148        if (!$rs->Abrir()) return(""); // Error al abrir recordset
149        $tablaHtml='<TABLE align=center border=0><TR>';
150        while (!$rs->EOF){
151                $contor++;
152                $tablaHtml.= '<TD align=center style="FONT-FAMILY: Arial, Helvetica, sans-serif;FONT-SIZE: 8px"><br><IMG src="../images/iconos/ordenador.gif"><br><span style="FONT-SIZE:9px" >'.$rs->campos["nombreordenador"].'</TD>';
153                if($contor>$maxcontor){
154                        $contor=0;
155                        $tablaHtml.='</TR><TR>';
156                }
157                $ipidpidc.=$rs->campos["ip"].";";
158                $rs->Siguiente();
159        }
160        $ipidpidc=      substr($ipidpidc,0,strlen($ipidpidc)-1); // Quita la coma
161        $tablaHtml.='</TR>';
162        $tablaHtml.= '</TR></TABLE>';
163        $tablaHtml.='<INPUT type=hidden name="nuevasipes" id="ipes_'.$idconfiguracion.'" value="'.$ipidpidc.'">';
164        return($tablaHtml);
165}
166//________________________________________________________________________________________________________
167function tabla_ConfiguracionGrupo($cmd,$idcentro,$idgrupo,$idconfiguracion,$cuenta){
168        global $TbMsg;
169        $tablaHtml="";
170        $configuracion="";
171        $rs=new Recordset;
172        $cmd->texto="SELECT configuracion FROM configuraciones WHERE idconfiguracion=".$idconfiguracion;
173        $rs->Comando=&$cmd;
174        if (!$rs->Abrir()) return(""); // Error al abrir recordset
175        if(!$rs->EOF)
176                $configuracion=$rs->campos["configuracion"];
177        $rs->Cerrar();
178        $auxsplit=split("\t",$configuracion);
179        $tablaHtml.= '<TABLE  class=tabla_listados_sin  align=center border=0 cellPadding=1 cellSpacing=1 >';
180                $tablaHtml.= '<TR>';
181        $tablaHtml.= '<TH align=center>&nbsp;'.$TbMsg[4].'&nbsp;</TH>';
182        $tablaHtml.= '<TH align=center>&nbsp;'.$TbMsg[5].'&nbsp;</TH>';
183        $tablaHtml.= '<TH align=center>&nbsp;'.$TbMsg[6].'&nbsp;</TH>';
184        $tablaHtml.= '</TR>';
185        for($j=0;$j<sizeof($auxsplit)-1;$j++){
186                $ValorParametros=extrae_parametros($auxsplit[$j],chr(10),'=');
187                $particion=$ValorParametros["numpart"]; // Toma la partici�
188                $nombreso=$ValorParametros["nombreso"]; // Toma nombre del sistema operativo
189                $tiposo=$ValorParametros["tiposo"];
190                $tipopart=$ValorParametros["tipopart"];
191                $tamapart=$ValorParametros["tamapart"];
192                $tablaHtml.='<TR>'.chr(13);
193                $tablaHtml.='<TD align=center>&nbsp;'.$particion.'&nbsp;</TD>'.chr(13);
194                $tablaHtml.='<TD>&nbsp;'. nombreSO($tipopart,$tiposo,$nombreso).'&nbsp;</TD>'.chr(13);
195                $tablaHtml.='<TD align=rigth>&nbsp;'. formatomiles( $tamapart).'&nbsp;</TD>'.chr(13);
196                $tablaHtml.='</TR>'.chr(13);
197        }
198        $tablaHtml.='</TABLE><br><br>';
199        return($tablaHtml);
200}
201//________________________________________________________________________________________________________
202function formatomiles($cadena){
203        $len=strlen($cadena);
204        $cadenafinal="";
205        $m=1;
206        for($i=$len-1;$i>=0;$i--){
207                $cadenafinal=substr($cadena,$i,1).$cadenafinal;
208                if($m%3==0 && $i>0){
209                                $cadenafinal=".".$cadenafinal;
210                                $m=0;
211                }
212                $m++;
213        }
214        return($cadenafinal);
215}
Note: See TracBrowser for help on using the repository browser.