source: admin/WebConsole/comandos/Particionar.php @ e02f9b4

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 e02f9b4 was 6e9cc32, checked in by ramon <ramongomez@…>, 15 years ago

Borrar caracteres BOM de UTF-8 en ficheros PHP de WebConsole?.

git-svn-id: https://opengnsys.es/svn/trunk@514 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 17.6 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: Configurar.php
8// Descripción :
9//              Implementaci� del comando "Configurar"
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/constantes.php");
14include_once("../includes/comunes.php");
15include_once("../includes/CreaComando.php");
16include_once("../includes/HTMLSELECT.php");
17include_once("../includes/HTMLCTESELECT.php");
18include_once("../idiomas/php/".$idioma."/comandos/configurar_".$idioma.".php");
19//________________________________________________________________________________________________________
20$identificador=0;
21$nombrefuncion="";
22$ejecutor="";
23$tipotrama="";
24$ambito=0;
25$idambito=0;
26$nombreambito="";
27$cadenaip="";
28$tbconfigur="";
29
30$fp = fopen($fileparam,"r");
31$parametros= fread ($fp, filesize ($fileparam));
32fclose($fp);
33
34$ValorParametros=extrae_parametros($parametros,chr(13),'=');
35$identificador=$ValorParametros["identificador"];
36$nombrefuncion=$ValorParametros["nombrefuncion"];
37$ejecutor=$ValorParametros["ejecutor"];
38$tipotrama=$ValorParametros["tipotrama"];
39$ambito=$ValorParametros["ambito"];
40$idambito=$ValorParametros["idambito"];
41$nombreambito=$ValorParametros["nombreambito"];
42$cadenaip=$ValorParametros["cadenaip"];
43
44$cmd=CreaComando($cadenaconexion);
45if (!$cmd)
46        Header('Location: '.$pagerror.'?herror=2'); // Error de conexióncon servidor B.D.
47//___________________________________________________________________________________________________
48?>
49<HTML>
50<TITLE>Administración web de aulas</TITLE>
51<HEAD>
52<LINK rel="stylesheet" type="text/css" href="../estilos.css">
53<SCRIPT language="javascript" src="./jscripts/Configurar.js"></SCRIPT>
54<SCRIPT language="javascript" src="./jscripts/comunescomandos.js"></SCRIPT>
55<? echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/comandos/configurar_'.$idioma.'.js"></SCRIPT>'?>
56<? echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/comandos/comunescomandos_'.$idioma.'.js"></SCRIPT>'?>
57</HEAD>
58<BODY>
59<FORM name="fdatosocultos"> 
60        <INPUT type=hidden name=identificador value=<? echo $identificador ?>>
61        <INPUT type=hidden name=nombrefuncion value=<? echo $nombrefuncion ?>>
62        <INPUT type=hidden name=ejecutor value=<? echo $ejecutor ?>>
63        <INPUT type=hidden name=tipotrama value=<? echo $tipotrama ?>>
64        <INPUT type=hidden name=ambito value=<? echo $ambito ?>>
65        <INPUT type=hidden name=idambito value=<? echo $idambito ?>>
66        <INPUT type=hidden name=cadenaip value=<? echo $cadenaip ?>>
67</FORM>
68<?
69switch($ambito){
70                case $AMBITO_CENTROS :
71                        $urlimg='../images/iconos/centros.gif';
72                        $textambito=$TbMsg[0];
73                        break;
74                case $AMBITO_GRUPOSAULAS :
75                        $urlimg='../images/iconos/carpeta.gif';
76                        $textambito=$TbMsg[1];
77                        break;
78                case $AMBITO_AULAS :
79                        $urlimg='../images/iconos/aula.gif';
80                        $textambito=$TbMsg[2];
81                        break;
82                case $AMBITO_GRUPOSORDENADORES :
83                        $urlimg='../images/iconos/carpeta.gif';
84                        $textambito=$TbMsg[3];
85                        break;
86                case $AMBITO_ORDENADORES :
87                        $urlimg='../images/iconos/ordenador.gif';
88                        $textambito=$TbMsg[4];
89                        break;
90        }
91        echo '<p align=center><span class=cabeceras>'.$TbMsg[5].'&nbsp;</span><br>';
92        echo '<IMG src="'.$urlimg.'">&nbsp;&nbsp;<span align=center class=subcabeceras><U>'.$TbMsg[6].': '.$textambito.','.$nombreambito.'</U></span>&nbsp;&nbsp;</span></p>';
93//________________________________________________________________________________________________________
94?>     
95<BR>
96        <FORM  name="fdatos">
97                        <?
98                                echo tabla_configuraciones($cmd,$idcentro,$idambito,$ambito);
99                                echo '<TABLE border=0 style="visibility: hidden" id=patron_contenidoparticion>'.Patrontabla_Particion().'</TABLE>';
100                                echo '<INPUT type=hidden id=tbconfigur value="'.$tbconfigur.'">';
101                        ?>
102        </FORM>
103<?
104//________________________________________________________________________________________________________
105include_once("../includes/opcionesacciones.php");
106//________________________________________________________________________________________________________
107//________________________________________________________________________________________________________
108include_once("../includes/opcionesbotones.php");
109//________________________________________________________________________________________________________
110//________________________________________________________________________________________________________
111include_once("../includes/iframecomun.php");
112//________________________________________________________________________________________________________
113?>
114</BODY>
115</HTML>
116<?
117// *************************************************************************************************************************************************
118function tabla_configuraciones($cmd,$idcentro,$idambito,$ambito){
119        global $cadenaip;
120        global $AMBITO_AULAS;
121        global $AMBITO_GRUPOSORDENADORES;
122        global $AMBITO_ORDENADORES;
123       
124        $tablaHtml="";
125        $rs=new Recordset;
126        $numorde=0;
127
128        switch($ambito){
129                case $AMBITO_AULAS :
130                        $cmd->texto="SELECT COUNT(*) AS numorde FROM ordenadores WHERE idaula=".$idambito;
131                        break;
132                case $AMBITO_GRUPOSORDENADORES :
133                        $cmd->texto="SELECT COUNT(*) AS numorde FROM ordenadores WHERE grupoid=".$idambito;
134                        break;
135                case $AMBITO_ORDENADORES :
136                        $cmd->texto="SELECT COUNT(*) AS numorde FROM ordenadores WHERE idordenador=".$idambito;
137                        break;
138        }
139        $rs->Comando=&$cmd;
140        if (!$rs->Abrir()) return(""); // Error al abrir recordset
141        if(!$rs->EOF)
142                $numorde=$rs->campos["numorde"];
143        $idconfiguracion="";
144
145        switch($ambito){
146                case $AMBITO_AULAS :
147                        $cmd->texto="SELECT COUNT(*) AS cuenta,configuraciones.descripcion,configuraciones.idconfiguracion FROM aulas";
148                        $cmd->texto.=" INNER JOIN ordenadores ON aulas.idaula = ordenadores.idaula";
149                        $cmd->texto.=" INNER JOIN configuraciones ON ordenadores.idconfiguracion = configuraciones.idconfiguracion";
150                        $cmd->texto.=" WHERE aulas.idaula = ".$idambito;
151                        $cmd->texto.=" GROUP BY configuraciones.descripcion, configuraciones.idconfiguracion";
152                        $cmd->texto.=" HAVING configuraciones.idconfiguracion>0";
153                        $cmd->texto.=" ORDER BY configuraciones.descripcion";
154                        break;
155                case $AMBITO_GRUPOSORDENADORES :
156                        $cmd->texto="SELECT COUNT(*) AS cuenta,configuraciones.descripcion,configuraciones.idconfiguracion FROM gruposordenadores";
157                        $cmd->texto.=" INNER JOIN ordenadores ON gruposordenadores.idgrupo = ordenadores.grupoid";
158                        $cmd->texto.=" INNER JOIN configuraciones ON ordenadores.idconfiguracion = configuraciones.idconfiguracion";
159                        $cmd->texto.=" WHERE (gruposordenadores.idgrupo = ".$idambito.") AND configuraciones.idconfiguracion>0";
160                        $cmd->texto.=" GROUP BY configuraciones.descripcion, configuraciones.idconfiguracion";
161                        $cmd->texto.=" HAVING configuraciones.idconfiguracion>0";
162                        $cmd->texto.=" ORDER BY configuraciones.descripcion";
163                        break;
164                case $AMBITO_ORDENADORES :
165                        $cmd->texto="SELECT COUNT(*) AS cuenta,configuraciones.descripcion,configuraciones.idconfiguracion FROM ordenadores";
166                        $cmd->texto.=" INNER JOIN configuraciones ON ordenadores.idconfiguracion = configuraciones.idconfiguracion";
167                        $cmd->texto.=" WHERE ordenadores.idordenador = ".$idambito;
168                        $cmd->texto.=" GROUP BY configuraciones.descripcion, configuraciones.idconfiguracion";
169                        $cmd->texto.=" HAVING configuraciones.idconfiguracion>0";
170                        $cmd->texto.=" ORDER BY configuraciones.descripcion";
171                        break;
172        }
173        $rs->Comando=&$cmd;
174        if (!$rs->Abrir()) return(""); // Error al abrir recordset
175        if(!$rs->EOF){
176                if($numorde!=$rs->campos["cuenta"]){ // El numero de ordenadores del aula no coincide con los que tienen el mismo perfil hardware
177                        while (!$rs->EOF){
178                                if($idconfiguracion!=$rs->campos["idconfiguracion"]){
179                                        if($idconfiguracion!=0) $tablaHtml.="</TABLE>";
180                                        $tablaHtml.= '<TABLE  align=center border=0 cellPadding=1 cellSpacing=1';
181                                        $descripcion=$rs->campos["descripcion"];
182                                        $tablaHtml.= "<TR>";
183                                        $tablaHtml.= '<TD align=center ><IMG  style="cursor:hand" oncontextmenu="resalta(this,'.$rs->campos["idconfiguracion"].')" src="../images/iconos/configuraciones.gif">';
184                                        $tablaHtml.='&nbsp;&nbsp<span style="COLOR: #000000;FONT-FAMILY: Verdana;FONT-SIZE: 12px; "><U><b>Configuration</b>&nbsp;'.$rs->campos["descripcion"].'</U></SPAN></TD>';
185                                        $tablaHtml.= "</TR>";
186                                }
187                                $tablaHtml.= '<TR><TD>';
188                                $tablaHtml.=PintaOrdenadores($cmd,$idambito,$ambito,$rs->campos["idconfiguracion"],$rs->campos["cuenta"]);
189                                $tablaHtml.= '</TD></TR>';
190                                $tablaHtml.= '<TR><TD>';
191                                $tablaHtml.=tabla_particiones($cmd,$idcentro,$idambito,$rs->campos["idconfiguracion"],$rs->campos["cuenta"]);
192                                $tablaHtml.= '</TD></TR>';
193                                $rs->Siguiente();
194                        }
195                        $tablaHtml.="</TABLE>";
196                }
197                else{
198                        $tablaHtml.=tabla_particiones($cmd,$idcentro,$idambito,$rs->campos["idconfiguracion"],$rs->campos["cuenta"]);
199                        $tablaHtml.='<INPUT type=hidden name="nuevasipes" id="ipes_'.$rs->campos["idconfiguracion"].'" value="'.$cadenaip.'">';
200                }
201        }
202        echo $tablaHtml;
203        $rs->Cerrar();
204}
205//________________________________________________________________________________________________________
206function PintaOrdenadores($cmd,$idambito,$ambito,$idconfiguracion){
207        global $AMBITO_AULAS;
208        global $AMBITO_GRUPOSORDENADORES;
209        $ipidpidc="";
210        $rs=new Recordset;
211        $contor=0;
212        $maxcontor=10;
213        switch($ambito){
214                case $AMBITO_AULAS :
215                        $cmd->texto=" SELECT nombreordenador,ip FROM ordenadores WHERE  idconfiguracion=".$idconfiguracion." AND idaula=".$idambito." ORDER BY nombreordenador";
216                        break;
217                case $AMBITO_GRUPOSORDENADORES :
218                        $cmd->texto=" SELECT nombreordenador,ip FROM ordenadores WHERE  idconfiguracion=".$idconfiguracion." AND grupoid=".$idambito." ORDER BY nombreordenador";
219                        break;
220        }
221        $rs->Comando=&$cmd;
222        if (!$rs->Abrir()) return(""); // Error al abrir recordset
223        $tablaHtml='<TABLE align=center border=0><TR>';
224        while (!$rs->EOF){
225                $contor++;
226                $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>';
227                if($contor>$maxcontor){
228                        $contor=0;
229                        $tablaHtml.='</TR><TR>';
230                }
231                $ipidpidc.=$rs->campos["ip"].";";
232                $rs->Siguiente();
233        }
234        $ipidpidc=      substr($ipidpidc,0,strlen($ipidpidc)-1); // Quita la coma
235        $tablaHtml.='</TR>';
236        $tablaHtml.= '</TR></TABLE>';
237        $tablaHtml.='<INPUT type=hidden name="nuevasipes" id="ipes_'.$idconfiguracion.'" value="'.$ipidpidc.'">';
238        return($tablaHtml);
239}
240//________________________________________________________________________________________________________
241function tabla_particiones($cmd,$idcentro,$idambito,$idconfiguracion,$cuenta){
242        global $tbconfigur;
243        global $TbMsg;
244        $tablaHtml="";
245        $configuracion="";
246        $rs=new Recordset;
247        $cmd->texto="SELECT idconfiguracion, configuracion FROM configuraciones WHERE idconfiguracion=".$idconfiguracion;
248        $rs->Comando=&$cmd;
249        if (!$rs->Abrir()) return(""); // Error al abrir recordset
250        if(!$rs->EOF)
251                $idc=$rs->campos["idconfiguracion"];
252                $configuracion=$rs->campos["configuracion"];
253        $rs->Cerrar();
254        $auxsplit=split("\t",$configuracion);
255        $tablaHtml.= '<TABLE align=center  id=tabla_contenidoparticion_'.$idc.'  value=0><TR><TD>';
256        $tablaHtml.= '<TABLE id=tb_particiones_'.$idc.' class=tabla_listados_sin  align=center value=0 cellPadding=1 cellSpacing=1 >';
257        $tablaHtml.= '<TR>';
258        $tablaHtml.= '<TH align=center ><IMG src="../images/iconos/eliminar.gif"></TH>';
259        $tablaHtml.= '<TH align=center>&nbsp;'.$TbMsg[8].'&nbsp;</TH>';
260        $tablaHtml.= '<TH align=center>&nbsp;'.$TbMsg[9].'&nbsp</TH>';
261        $tablaHtml.= '<TH align=center>&nbsp;'.$TbMsg[10].'&nbsp;</TH>';
262        $tablaHtml.= '<TH align=center>&nbsp;'.$TbMsg[11].'&nbsp;</TH>';
263        $tablaHtml.= '<TH align=center>&nbsp;'.$TbMsg[12].'&nbsp;</TH>';
264        $tablaHtml.= '</TR>';
265        $ultpa=0;
266        for($j=0;$j<sizeof($auxsplit)-1;$j++){
267                $ValorParametros=extrae_parametros($auxsplit[$j],chr(10),'=');
268                $particion=$ValorParametros["numpart"]; // Toma la partici�
269                $p=$particion;
270                $tipopart=$ValorParametros["tipopart"]; // Toma tama� la partici�
271                $tamapart=$ValorParametros["tamapart"]; // Toma tama� la partici�
272                $nombreso=$ValorParametros["nombreso"]; // Toma nombre del sistema operativo
273                $tiposo=$ValorParametros["tiposo"];
274                $valocul=0;
275                $codpar=0;
276echo "<BR>tipopart=".$tipopart;
277                switch($tipopart){
278                                        case "EMPTY":
279                                                $codpar=0;
280                                                if(empty($tiposo))
281                                                        $nombreso='<span style="COLOR:red"> Espacio sin particionar !!</span>';
282                                                break;
283                                        case "EXT":
284                                                $codpar=0;
285                                                if(empty($tiposo))
286                                                        $nombreso='<span style="COLOR:red"> Partici� extendida !!</span>';
287                                                break;
288                                        case "BIGDOS":
289                                                $codpar=1;
290                                                if(empty($tiposo))
291                                                        $nombreso='<span style="COLOR:red">Msdos</span>';
292                                                break;
293                                        case "FAT32":
294                                                $codpar=2;
295                                                if(empty($tiposo))
296                                                        $nombreso='<span style="COLOR:red">Windows 98, Millenium</span>';
297                                                break;
298                                        case "HFAT32":
299                                                $codpar=2;
300                                                $valocul=2;
301                                                if(empty($tiposo))
302                                                                $nombreso='<span style="COLOR:red">Windows 98, Millenium<span style="COLOR:green;font-weight:600">&nbsp;('.$TbMsg[7].')</span></span>';
303                                                else
304                                                                $nombreso.='<span style="COLOR:green;font-weight:600">&nbsp;(Partici� oculta)</span>';
305                                                break;
306                                        case "NTFS":
307                                                $codpar=3;
308                                                if(empty($tiposo))
309                                                        $nombreso='<span style="COLOR:red">Windows XP, Windows 2000, Windows 2003</span>';
310                                                break;
311                                        case "HNTFS":
312                                                $codpar=3;
313                                                $valocul=2;
314                                                if(empty($tiposo))
315                                                        $nombreso='<span style="COLOR:red">Windows XP, Windows 2000, Windows 2003<span style="COLOR:green;font-weight:600">&nbsp;('.$TbMsg[7].')</span></span>';
316                                                else
317                                                        $nombreso.='<span style="COLOR:green;font-weight:600">&nbsp;('.$TbMsg[7].')</span>';
318                                                break;
319                                        case "EXT2":
320                                                $codpar=4;
321                                                if(empty($tiposo))
322                                                        $nombreso='<span style="COLOR:red">Linux</span>';
323                                                break;
324                                        case "EXT3":
325                                                $codpar=6;
326                                                if(empty($tiposo))
327                                                        $nombreso='<span style="COLOR:red">Linux</span>';
328                                                break;
329                                        case "LINUX-SWAP":
330                                                $codpar=5;
331                                                $nombreso='<span style="COLOR:blue">Linux-swap</span>';
332                                                break;
333                }
334                $ultpa=$p; // Valor de la ultima particion de esa configuraci�
335                $tablaHtml.='<TR id=TRparticion_'.$p."_".$idc.'>'.chr(13);
336                $tablaHtml.='<TD><input type=checkbox onclick="elimina_particion(this,'.$idc.')" id=eliminarparticion_'.$p."_".$idc.' value=0></TD>'.chr(13);
337                $opciones="";
338                for($i=1;$i<8;$i++){
339                         $opciones.=$i."=".$i.chr(13);
340                }
341                $opciones.="8=8";
342                $tablaHtml.='<TD>'.HTMLCTESELECT($opciones,"numpar_".$p."_".$idc,"estilodesple","",$p,35,"chgpar").'</TD>'.chr(13);
343                $opciones="1=BIGDOS".chr(13);
344                $opciones.="2=FAT32".chr(13);
345                $opciones.="3=NTFS".chr(13);
346                $opciones.="4=EXT2".chr(13);
347                $opciones.="5=LINUX-SWAP";
348                $tablaHtml.='<TD>'.HTMLCTESELECT($opciones,"tipospar_".$p."_".$idc,"estilodesple","EMPTY",$codpar,100,"chgtipopar").'</TD>'.chr(13);
349                $tablaHtml.='<TD><span id=tiposo_'.$p."_".$idc.' value=0>&nbsp;'.$nombreso.'&nbsp;</span></TD>'.chr(13);
350                $tablaHtml.='<TD align=center>&nbsp<input type=text onchange="chgtama('.$idc.')" id="tamano_'.$p."_".$idc.'" style="width=70" value='.$tamapart.' >&nbsp</TD>'.chr(13);
351                $opciones="1=".$TbMsg[14]."".chr(13);
352                $opciones.="2=".$TbMsg[15]."".chr(13);
353                $opciones.="3=".$TbMsg[16]."";
354                $tablaHtml.='<TD>&nbsp'.HTMLCTESELECT($opciones,"acciones_".$p."_".$idc,"estilodesple",$TbMsg[13],$valocul,100,"chgaccion").'&nbsp</TD>'.chr(13);
355                $tablaHtml.='</TR>'.chr(13);
356        }
357        $tablaHtml.='</TABLE>';
358        $tablaHtml.= '</TD></TR></TABLE>';
359
360  // Boton de insercion
361        $tablaHtml.= '<INPUT type=hidden id="ultpa_'.$idc.'" value='.$ultpa.'>';
362        $tablaHtml.= '<div align=center>';
363        $tablaHtml.= '<br><IMG style="cursor:hand" name="btanade_"'.$idc.'  src="../images/boton_annadir.gif" onclick="annadir_particion('.$idc.')" WIDTH="73" HEIGHT="22">';
364        $tablaHtml.= '</div><br>';
365        $tbconfigur.=$idc.";";
366        return($tablaHtml);
367}
368//________________________________________________________________________________________________________
369//      Crea la patron de linea de la tabla Particiones
370//________________________________________________________________________________________________________
371function Patrontabla_Particion(){
372        global $TbMsg;
373        $p="_upa_";
374        $idc="_cfg_";
375        $tablaHtml='<TR id=TRparticion_'.$p."_".$idc.'>'.chr(13);
376        $tablaHtml.='<TD><input type=checkbox onclick="elimina_particion(this,'.$idc.')" id=eliminarparticion_'.$p."_".$idc.' value=0></TD>'.chr(13);
377        $opciones="";
378                for($i=1;$i<8;$i++){
379                        $opciones.=$i."=".$i.chr(13);
380                }
381                $opciones.="8=8";
382                $tablaHtml.='<TD>'.HTMLCTESELECT($opciones,"numpar_".$p."_".$idc,"estilodesple","",$p,35,"chgpar").'</TD>'.chr(13);
383                $opciones="1=BIGDOS".chr(13);
384                $opciones.="2=FAT32".chr(13);
385                $opciones.="3=NTFS".chr(13);
386                $opciones.="4=EXT2".chr(13);
387                $opciones.="5=LINUX-SWAP";
388                $tablaHtml.='<TD>'.HTMLCTESELECT($opciones,"tipospar_".$p."_".$idc,"estilodesple","EMPTY",0,100,"chgtipopar").'</TD>'.chr(13);
389                $tablaHtml.='<TD><span id=tiposo_'.$p."_".$idc.' value=0>&nbsp;<span style="COLOR:red">'.$TbMsg[17].'</span>&nbsp;</span></TD>'.chr(13);
390                $tablaHtml.='<TD align=center>&nbsp<input type=text onchange="chgtama('.$idc.')" id="tamano_'.$p."_".$idc.'" style="width=70" value=0 >&nbsp</TD>'.chr(13);
391                $opciones="1=".$TbMsg[14]."".chr(13);
392                $opciones.="2=".$TbMsg[15]."".chr(13);
393                $opciones.="3=".$TbMsg[16]."";
394                $tablaHtml.='<TD>&nbsp'.HTMLCTESELECT($opciones,"acciones_".$p."_".$idc,"estilodesple",$TbMsg[13],0,100,"chgaccion").'&nbsp</TD>'.chr(13);
395                $tablaHtml.='</TR>'.chr(13);
396                $tablaHtml.='</TABLE>';
397                $tablaHtml.= '</TD></TR></TABLE>';
398                return($tablaHtml);
399}
400?>
Note: See TracBrowser for help on using the repository browser.