source: admin/WebConsole/varios/informacion_imagenes.php

qndtest
Last change on this file was 6694784, checked in by Ramón M. Gómez <ramongomez@…>, 5 years ago

#834: Fixing more code cleanup: CSS units, HTML tags; Javascript comparisons, and PHP variables.
  • Property mode set to 100644
File size: 8.0 KB
Line 
1<?php
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: Agosto-2010
7// Nombre del fichero: informacion_imagenes.php
8// Descripción :
9//              Muestra los perfiles que forman parte de una imagen  y los ordenadores que tienen instalada dicha imagen
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/CreaComando.php");
14include_once("../clases/XmlPhp.php");
15include_once("../clases/ArbolVistaXML.php");
16include_once("../idiomas/php/".$idioma."/informacion_imagenes_".$idioma.".php");
17//________________________________________________________________________________________________________
18$idimagen=0; 
19$descripcionimagen=""; 
20if (isset($_GET["idimagen"])) $idimagen=$_GET["idimagen"]; // Recoge parametros
21if (isset($_GET["descripcionimagen"])) $descripcionimagen=$_GET["descripcionimagen"]; // Recoge parametros
22
23$cmd=CreaComando($cadenaconexion);
24if (!$cmd)
25        Header('Location: '.$pagerror.'?herror=2'); // Error de conexióncon servidor B.D.
26else
27        $arbolXML=CreaArbol($cmd,$idimagen); // Crea el arbol XML
28
29// Creación del árbol
30$baseurlimg="../images/tsignos"; // Url de las imágenes de signo
31$clasedefault="tabla_listados_sin";
32$titulotabla=$TbMsg[3]; 
33$arbol=new ArbolVistaXml($arbolXML,0,$baseurlimg,$clasedefault,1,20,130,1,$titulotabla);
34//________________________________________________________________________________________________________
35?>
36<HTML>
37<TITLE>Administración web de aulas</TITLE>
38<HEAD>
39        <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
40        <LINK rel="stylesheet" type="text/css" href="../estilos.css">
41        <SCRIPT language="javascript" src="../clases/jscripts/ArbolVistaXML.js"></SCRIPT>
42</HEAD>
43<BODY>
44        <P align=center class=cabeceras><?php echo $TbMsg[0]?><BR>
45        <SPAN align=center class=subcabeceras><?php echo $TbMsg[1]?></SPAN>&nbsp;<IMG src="../images/iconos/imagenes.gif"><BR><BR>
46        <IMG src="../images/iconos/imagen.gif"><SPAN class=presentaciones>&nbsp;&nbsp;<U><?php echo $TbMsg[2]?></U>:    <?php echo $descripcionimagen?></SPAN></P>
47        <?php echo $arbol->CreaArbolVistaXml(); // Crea arbol de configuraciones
48?>
49</BODY>
50</HTML>
51<?php
52/**
53 * @param Comando $cmd      Comando ya operativo (con conexión abierta)
54 * @param integer $idimagen Identificador del perfil hardware
55 * @return string           Cadena en formato XML con toda la información de las imágenes_____
56 */
57function CreaArbol($cmd,$idimagen){
58        $cadenaXML=SubarbolXML_Imagenes($cmd,$idimagen);
59        return($cadenaXML);
60}
61//________________________________________________________________________________________________________
62function SubarbolXML_Imagenes($cmd,$idimagen){
63        global $TbMsg;
64        $cadenaXML="";
65        $rs=new Recordset; 
66        $cmd->texto="SELECT idimagen,descripcion,comentarios, idperfilsoft  FROM imagenes WHERE idimagen=".$idimagen;
67        $rs->Comando=&$cmd; 
68        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
69        $rs->Primero(); 
70        while (!$rs->EOF){
71                $cadenaXML.='<IMAGEN';
72                // Atributos
73                $cadenaXML.=' imagenodo="../images/iconos/imagen.gif"';
74                $cadenaXML.=' infonodo="'.$rs->campos["descripcion"].'"';
75                $cadenaXML.='>';
76                $cadenaXML.=SubarbolXML_PerfilImagen($cmd,$rs->campos["idperfilsoft"]);
77                $cadenaXML.=SubarbolXML_Ordenadores($cmd,$rs->campos["idimagen"]);
78                $cadenaXML.='</IMAGEN>';
79                $rs->Siguiente();
80        }
81        $rs->Cerrar();
82        return($cadenaXML);
83}
84//________________________________________________________________________________________________________
85function SubarbolXML_PerfilImagen($cmd,$idperfilsoft)
86{
87        global $TbMsg;
88       
89        $cadenaXML="";
90        $gidperfilsoft=null;
91
92        $cmd->texto="SELECT perfilessoft.idperfilsoft ,perfilessoft.descripcion as pdescripcion ,perfilessoft.comentarios,
93                                                                 softwares.idsoftware,softwares.descripcion as hdescripcion,tiposoftwares.urlimg
94                                                                 FROM perfilessoft  ";
95        $cmd->texto.=" LEFT OUTER JOIN  perfilessoft_softwares  ON perfilessoft.idperfilsoft=perfilessoft_softwares.idperfilsoft";
96        $cmd->texto.=" LEFT OUTER JOIN  softwares  ON softwares.idsoftware=perfilessoft_softwares.idsoftware";
97        $cmd->texto.=" LEFT OUTER JOIN  tiposoftwares  ON softwares.idtiposoftware=tiposoftwares.idtiposoftware" ;
98        $cmd->texto.=" WHERE perfilessoft.idperfilsoft=".$idperfilsoft;
99        $cmd->texto.=" ORDER by perfilessoft.descripcion,tiposoftwares.idtiposoftware,softwares.descripcion";
100        $rs=new Recordset;     
101        $rs->Comando=&$cmd; 
102        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
103        $rs->Primero(); 
104        if ($rs->EOF) return($cadenaXML); 
105
106        $cadenaXML.='<CARPETAPERFILES';
107        $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
108        $cadenaXML.=' infonodo="'.$TbMsg[6].'"';
109        $cadenaXML.='>';
110
111        while (!$rs->EOF){
112                if ($gidperfilsoft!=$rs->campos["idperfilsoft"]){
113                        if ($gidperfilsoft){
114                                $cadenaXML.='</COMPONENTES>';
115                                $cadenaXML.='</PERFILESSOFTWARES>';
116                        }
117                        $gidperfilsoft=$rs->campos["idperfilsoft"];
118                        $cadenaXML.='<PERFILESSOFTWARES';
119                        // Atributos
120                        $cadenaXML.=' imagenodo="../images/iconos/perfilsoftware.gif"';
121                        $cadenaXML.=' infonodo="'.$rs->campos["pdescripcion"].'"';
122                        $cadenaXML.='>';
123
124                        if($rs->campos["comentarios"]>" "){
125                                $cadenaXML.='<PROPIEDAD';
126                                $cadenaXML.=' imagenodo="../images/iconos/propiedad.gif"';
127                                $cadenaXML.=' infonodo="[b]'.$TbMsg[9].' :[/b] '.$rs->campos["comentarios"].'"';
128                                $cadenaXML.='>';
129                                $cadenaXML.='</PROPIEDAD>';
130                        }
131
132                        $cadenaXML.='<COMPONENTES';
133                        $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
134                        $cadenaXML.=' infonodo="'.$TbMsg[4].'"';
135                        $cadenaXML.='>';
136                }
137                if ($rs->campos["idsoftware"]){
138                        $cadenaXML.='<COMPONENTE';
139                        // Atributos
140                        $cadenaXML.=' imagenodo='.$rs->campos["urlimg"];
141                        $cadenaXML.=' infonodo="'.$rs->campos["hdescripcion"].'"';
142                        $cadenaXML.='>';
143                        $cadenaXML.='</COMPONENTE>';
144                }
145                $rs->Siguiente();
146        }
147        $cadenaXML.='</COMPONENTES>';
148        $cadenaXML.='</PERFILESSOFTWARES>';
149        $cadenaXML.='</CARPETAPERFILES>';
150        $rs->Cerrar();
151        return($cadenaXML);
152}
153//________________________________________________________________________________________________________
154function SubarbolXML_Ordenadores($cmd,$idimagen)
155{
156        global $TbMsg;
157
158        $cadenaXML="";
159        $gidaula=null;
160        $cmd->texto="SELECT DISTINCT aulas.idaula, aulas.nombreaula, ordenadores.idordenador,
161                            ordenadores.nombreordenador, ordenadores.idperfilhard,
162                            ordenadores_particiones.numdisk, ordenadores_particiones.numpar
163                       FROM ordenadores
164                      INNER JOIN aulas ON ordenadores.idaula=aulas.idaula
165                      INNER JOIN ordenadores_particiones ON ordenadores_particiones.idordenador=ordenadores.idordenador
166                      WHERE ordenadores_particiones.idimagen='$idimagen'
167                      ORDER BY aulas.idaula, ordenadores.nombreordenador";
168        $rs=new Recordset; 
169        $rs->Comando=&$cmd; 
170        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
171        $rs->Primero(); 
172        if ($rs->numeroderegistros>0){
173                $cadenaXML.='<ORDENADORES';
174                $cadenaXML.=' imagenodo="../images/iconos/carpeta.gif"';
175                $cadenaXML.=' infonodo="'.$TbMsg[7].'"';
176                $cadenaXML.='>';
177        }
178        while (!$rs->EOF){
179                if ($gidaula!=$rs->campos["idaula"]){
180                        if ($gidaula)
181                                $cadenaXML.='</AULA>';
182                        $cadenaXML.='<AULA ';
183                        // Atributos           
184
185                        $cadenaXML.=' imagenodo="../images/iconos/aula.gif"';
186                        $cadenaXML.=' infonodo="'.$rs->campos["nombreaula"].'"';
187                        $cadenaXML.='>';
188                        $gidaula=$rs->campos["idaula"];
189                }
190                $cadenaXML.='<ORDENADOR';
191                // Atributos                   
192                $cadenaXML.=' imagenodo="../images/iconos/ordenador.gif"';
193                $litpar="(Par:".$rs->campos["numdisk"].",".$rs->campos["numpar"].")";
194                $cadenaXML.=' infonodo="'.$rs->campos["nombreordenador"].' '.$litpar.'"' ;
195                $cadenaXML.='></ORDENADOR>';
196                $rs->Siguiente();
197        }
198        if ($gidaula)
199                $cadenaXML.='</AULA>';
200        if ($rs->numeroderegistros>0)
201                $cadenaXML.='</ORDENADORES>';
202        $rs->Cerrar();
203        return($cadenaXML);
204}
205?>
Note: See TracBrowser for help on using the repository browser.