source: admin/WebConsole/varios/informacion_tareas.php @ 6bd2e1e

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 6bd2e1e was 9f1274e, checked in by ramon <ramongomez@…>, 7 years ago

#804: Sustituir funciones para compatibilidad con PHP 7 (split por explode y ereg... por preg_...).

git-svn-id: https://opengnsys.es/svn/branches/version1.1@5619 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 7.4 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_tareas.php
8// Descripción :
9//              Muestra los comandos que forman parte de una tarea  y sus valores
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/TomaDato.php");
17include_once("../idiomas/php/".$idioma."/informacion_tareas_".$idioma.".php");
18//________________________________________________________________________________________________________
19$idtarea="";
20$descripcioncomando="";
21
22if (isset($_GET["idtarea"]))    $idtarea=$_GET["idtarea"];
23if (isset($_GET["descripciontarea"]))   $descripciontarea=$_GET["descripciontarea"];
24//________________________________________________________________________________________________________
25?>
26<HTML>
27<TITLE>Administración web de aulas</TITLE>
28<HEAD>
29        <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
30        <LINK rel="stylesheet" type="text/css" href="../estilos.css">
31</HEAD>
32<BODY>
33        <?php
34        $cmd=CreaComando($cadenaconexion);
35        if ($cmd){
36                $rs=new Recordset;
37                $cmd->texto="SELECT idtareacomando FROM tareas_comandos  WHERE idtarea=".$idtarea. " ORDER BY orden";
38                $rs->Comando=&$cmd;
39                if ($rs->Abrir()){
40                        echo '<br><p align=center><IMG src="../images/iconos/tareas.gif">&nbsp;&nbsp;<U><span class=cabeceras>'.$TbMsg[0].'</span></U><br><span class=subcabeceras>'.$descripciontarea.'</span></p>';
41                        $tabla_parametros=""; // Tabla  para localizar parametros
42                        $cont_parametros=0; // Contador de la tabla
43                        CreaTablaParametros($cmd); // Crea tabla  especificaciones de parametros
44                        while (!$rs->EOF){
45                                pintacomandos($cmd,$rs->campos["idtareacomando"]);
46                                $rs->Siguiente();
47                        }
48                }
49        }
50        ?>
51</BODY>
52</HTML>
53<?php
54// *************************************************************************************************************************************************
55function pintacomandos($cmd,$idtareacomando){
56        global $TbMsg;
57        global $AMBITO_CENTROS;
58        global $AMBITO_GRUPOSAULAS;
59        global $AMBITO_AULAS;
60        global $AMBITO_GRUPOSORDENADORES;
61        global $AMBITO_ORDENADORES;
62        global  $tabla_parametros;
63        global  $cont_parametros;
64
65        $rs=new Recordset;
66        $cmd->texto="SELECT tareas_comandos.*, comandos.visuparametros FROM tareas_comandos ";
67        $cmd->texto.=" INNER JOIN comandos ON comandos.idcomando=tareas_comandos.idcomando";
68        $cmd->texto.=" WHERE tareas_comandos.idtareacomando=".$idtareacomando;
69        $rs->Comando=&$cmd;
70        if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset
71        if ($rs->EOF) return("");
72
73        $HTMLparametros='<TABLE class="tabla_parametros" align=center  border=0 cellspacing=1 cellpadding=0 width="90%">'.chr(13);
74        $HTMLparametros.='<TR>'.chr(13);
75        $HTMLparametros.=  '<TH>&nbsp;'.$TbMsg[1].'&nbsp;</TH>'.chr(13);
76        $HTMLparametros.=  '<TH>&nbsp;'.$TbMsg[2].'</TH>&nbsp;'.chr(13);
77        $HTMLparametros.=  '</TR>'.chr(13);
78
79        $textambito="";
80        $urlimg="";
81
82        switch($rs->campos["ambito"]){
83                case $AMBITO_CENTROS :
84                        $urlimg='../images/iconos/centros.gif';
85                        $textambito="Center";
86                        $nombre=TomaDato($cmd,0,'centros',$rs->campos["idambito"],'idcentro','nombrecentro');
87                        break;
88                case $AMBITO_GRUPOSAULAS :
89                        $urlimg='../images/iconos/carpeta.gif';
90                        $textambito="Group of labs";
91                        $nombre=TomaDato($cmd,0,'grupos',$rs->campos["idambito"],'idgrupo','nombregrupo');
92                        break;
93                case $AMBITO_AULAS :
94                        $urlimg='../images/iconos/aula.gif';
95                        $textambito="Labs";
96                        $nombre=TomaDato($cmd,0,'aulas',$rs->campos["idambito"],'idaula','nombreaula');
97                        break;
98                case $AMBITO_GRUPOSORDENADORES :
99                        $urlimg='../images/iconos/carpeta.gif';
100                        $textambito="Group of computers";
101                        $nombre=TomaDato($cmd,0,'gruposordenadores',$rs->campos["idambito"],'idgrupo','nombregrupoordenador');
102                        break;
103                case $AMBITO_ORDENADORES :
104                        $urlimg='../images/iconos/ordenador.gif';
105                        $textambito="Computers";
106                        $nombre=TomaDato($cmd,0,'ordenadores',$rs->campos["idambito"],'idordenador','nombreordenador');
107                        break;
108        }
109        $HTMLparametros.= '<TD>&nbsp;'.$TbMsg[3].'&nbsp;</TD>'.chr(13);
110        $HTMLparametros.= '<TD>&nbsp;'.$textambito.'&nbsp;';
111        $HTMLparametros.= '<IMG src="'.$urlimg.'">&nbsp;</TD>'.chr(13);
112        $HTMLparametros.=       '</TR><TR>';
113        $HTMLparametros.= '<TD>&nbsp;'.$TbMsg[4].'&nbsp;</TD>'.chr(13);
114        $HTMLparametros.= '<TD>&nbsp;'.$nombre.'&nbsp;</TD>'.chr(13);
115        $HTMLparametros.=       '</TR>';
116
117        $auxVP=explode(";",$rs->campos["visuparametros"]); // Parametros visualizables
118        $auxP=explode(chr(13),$rs->campos["parametros"]); // Recorre parametros para visualizar los que así sean
119        for ($i=0;$i<sizeof($auxP);$i++){
120                $dualparam=explode("=",$auxP[$i]);
121                for ($k=0;$k<sizeof($auxVP);$k++){
122                         if($auxVP[$k]==$dualparam[0]){
123                                $posp=busca_indicebinariodual($dualparam[0],$tabla_parametros,$cont_parametros); // Busca datos del parámetro en la tabla cargada previamentre con todos los parámetros
124                                if ($posp>=0){
125                                        $auxtabla_parametros=$tabla_parametros[$posp][1];
126                                        $HTMLparametros.='<TR>'.chr(13);
127                                        $HTMLparametros.=  '<TD>&nbsp;'.$auxtabla_parametros["descripcion"].'&nbsp;</TD>'.chr(13);
128                                        if($auxtabla_parametros["tipopa"]==1){
129                                        $valor=TomaDato($cmd,0,$auxtabla_parametros["nomtabla"],$dualparam[1],$auxtabla_parametros["nomidentificador"],$auxtabla_parametros["nomliteral"]);
130                                        }else
131                                                $valor=$dualparam[1];
132                                        if($dualparam[0]!="iph")
133                                                        $HTMLparametros.=  '<TD>&nbsp;'.Urldecode($valor).'&nbsp;</TD>'.chr(13);
134                                        else{
135                                                        $tablaipes=PintaOrdenadores($cmd,$valor);
136                                                        $HTMLparametros.=  '<TD>&nbsp;'.$tablaipes.'&nbsp;</TD>'.chr(13);
137                                        }
138                                        $HTMLparametros.=  '</TR>'.chr(13);
139                                }
140                        }
141                }
142        }
143        $HTMLparametros.=  '</TABLE>'.chr(13);
144        $descripcioncomando=TomaDato($cmd,0,"comandos",$rs->campos["idcomando"],"idcomando","descripcion");
145        echo '<br><p align=center><IMG src="../images/iconos/comandos.gif">&nbsp;&nbsp;<span class=presentaciones>'.$descripcioncomando.'</span>';
146        echo $HTMLparametros;
147        echo '</p>';
148}
149//________________________________________________________________________________________________________
150function PintaOrdenadores($cmd,$cadenaip){
151        $auxP=explode(";",$cadenaip);
152        if(sizeof($auxP)<1) return("");
153        $clauslaIN="'".$auxP[0]."'";
154        for ($i=1;$i<sizeof($auxP);$i++)
155                $clauslaIN.=",'".$auxP[$i]."'";
156        $rs=new Recordset;
157        $contor=0;
158        $maxord=7; // Máximos ordenadores por linea
159        $cmd->texto=" SELECT nombreordenador,ip FROM ordenadores  INNER JOIN aulas ON aulas.idaula=ordenadores.idaula WHERE ip IN(".$clauslaIN.") ORDER by nombreaula,nombreordenador";
160        $rs->Comando=&$cmd;
161        if (!$rs->Abrir()) return(""); // Error al abrir recordset
162        $tablaHtml='<TABLE align=left border=0><TR>';
163        while (!$rs->EOF){
164                $contor++;
165                $tablaHtml.= '<TD align=center style="BACKGROUND-COLOR: #b5daad;FONT-FAMILY: Arial, Helvetica, sans-serif;      BORDER-BOTTOM:#000000 none;FONT-SIZE: 8px"><IMG src="../images/iconos/ordenador.gif"><br><span style="FONT-SIZE:9px" >'.$rs->campos["nombreordenador"].'</TD>';
166                if($contor>$maxord){
167                        $contor=0;
168                        $tablaHtml.='</TR><TR>';
169                }
170                $rs->Siguiente();
171        }
172        $tablaHtml.='</TR>';
173        $tablaHtml.= '</TR></TABLE>';
174        return($tablaHtml);
175}
176?>
Note: See TracBrowser for help on using the repository browser.