source: admin/WebConsole/varios/tareascomandos.php @ dbc9bab

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 dbc9bab was 1b92629, checked in by ramon <ramongomez@…>, 16 years ago

Reorganización directorios OpenGNSys Admin.

git-svn-id: https://opengnsys.es/svn/trunk@455 a21b9725-9963-47de-94b9-378ad31fedc9

  • Property mode set to 100644
File size: 11.1 KB
Line 
1<?
2// *************************************************************************************************************************************************
3// Aplicación WEB: ogAdmWebCon
4// Copyright 200-2005 José Manuel Alonso. Todos los derechos reservados.
5// Fecha Creación: Año 2003-2004
6// Fecha Última modificación: Febrero-2005
7// Nombre del fichero: tareascomandos.php
8// Descripción :
9//              Administra los comandos que forman parte de una tarea
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."/tareascomandos_".$idioma.".php");
18//________________________________________________________________________________________________________
19$idtarea=0;
20$descripciontarea="";
21if (isset($_GET["idtarea"])) $idtarea=$_GET["idtarea"]; // Recoge parametros
22if (isset($_GET["descripciontarea"])) $descripciontarea=$_GET["descripciontarea"]; // Recoge parametros
23
24$cmd=CreaComando($cadenaconexion); // Crea objeto comando
25if (!$cmd)
26        Header('Location: '.$pagerror.'?herror=2'); // Error de conexión con servidor B.D.
27//________________________________________________________________________________________________________
28?>
29<HTML>
30<HEAD>
31<LINK rel="stylesheet" type="text/css" href="../estilos.css">
32<SCRIPT language="javascript" src="../jscripts/tareascomandos.js"></SCRIPT>
33<SCRIPT language="javascript" src="../jscripts/opciones.js"></SCRIPT>
34<? echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/tareascomandos_'.$idioma.'.js"></SCRIPT>'?>
35</HEAD>
36<BODY>
37<FORM name="fdatos"> 
38        <INPUT type=hidden value="<? echo $idcentro?>" id=idcentro>     
39        <P align=center class=cabeceras><IMG src="../images/iconos/tareas.gif">&nbsp;<?echo $TbMsg[0]?><BR>
40        <SPAN align=center class=subcabeceras><?echo $TbMsg[1]?></SPAN>&nbsp;<IMG src="../images/iconos/comandos.gif"><BR><BR>
41        <SPAN align=center class=presentaciones><B><?echo $TbMsg[2]?>:&nbsp;</B><? echo $descripciontarea?></SPAN></P>
42        <DIV align=center id="Layer_componentes">
43                <TABLE class="tabla_listados" cellspacing=1 cellpadding=0 id="TABLACOMANDOS" width="90%">
44                                <TR height=20>
45                                        <TH>&nbsp;</TH>
46                                        <TH><IMG src="../images/iconos/eliminar.gif"></TH>
47                                        <TH colspan=2 align=left>&nbsp;<?echo $TbMsg[3]?></TH>
48                                        <TH><?echo $TbMsg[4]?></TH>
49                                        <TH>A</TH>
50                        </TR>
51                <?
52                        $rs=new Recordset;
53                        $cmd->texto='SELECT     tareas_comandos.*, comandos.descripcion,comandos.visuparametros FROM tareas_comandos INNER JOIN comandos ON tareas_comandos.idcomando = comandos.idcomando WHERE tareas_comandos.idtarea='.$idtarea.' ORDER BY tareas_comandos.orden';
54                        $rs->Comando=&$cmd;
55                        if ($rs->Abrir()){
56                                $rs->Primero();
57                                $tabla_parametros=""; // Tabla  para localizar parametros
58                                $cont_parametros=0; // Contador de la tabla
59                                CreaTablaParametros($cmd); // Crea tabla  especificaciones de parametros
60                                while (!$rs->EOF){
61                                                 echo '<TR style="display:block" id=TR-'.$rs->campos["idtareacomando"].'>';
62                                                echo '<TD  align=center><IMG onclick="ver_parametros(this,0,'.$rs->campos["idtareacomando"].');" style="cursor:hand;display:block" src="../images/tsignos/contra.gif"><IMG onclick="ver_parametros(this,1,'.$rs->campos["idtareacomando"].');"style="cursor:hand;display:none" src="../images/tsignos/desple.gif"></TD>';
63                                                 echo '<TD align=center ><INPUT  id=checkbox-'.$rs->campos["idtareacomando"].' type=checkbox                                             onclick="gestion_comandos('.$rs->campos["idtareacomando"].',this)" checked ></INPUT></TD>';
64                                                // Descripcion de la comando
65                                                 echo '<TD colspan=2>&nbsp;'.$rs->campos["descripcion"].'</TD>';
66                                                // Orden del item del item
67                                                echo '<TD align=center >&nbsp;<INPUT class="formulariodatos" id=orden-'.$rs->campos["idtareacomando"].' style="WIDTH:20px" type=text value="'.$rs->campos["orden"].'"></INPUT></TD>';
68                                                echo '<TD width="10%" align=center id="imgact-'.$rs->campos["idtareacomando"].'"><IMG src="../images/iconos/actualizar.gif" style="cursor:hand" onclick="ActualizarAccion('.$rs->campos["idtareacomando"].')"></TD>';
69                                                echo '</TR>';
70                                                pintacomandos($cmd,$rs);
71                                                $rs->Siguiente();
72                                }
73                        }
74                        $rs->Cerrar();
75                ?>
76                </TABLE>
77        </DIV>         
78        <DIV id="Layer_nota"  align=center>
79                <br>
80                <span align=left class=notas><I><?echo $TbMsg[7]?>.</I></span>
81        </DIV>
82</FORM>
83<?
84//________________________________________________________________________________________________________
85include_once("../includes/iframecomun.php");
86//________________________________________________________________________________________________________
87?>
88</BODY>
89</HTML>
90<?
91// *************************************************************************************************************************************************
92function pintacomandos($cmd,$rs){
93        global $TbMsg;
94        global $AMBITO_CENTROS;
95        global $AMBITO_GRUPOSAULAS;
96        global $AMBITO_AULAS;
97        global $AMBITO_GRUPOSORDENADORES;
98        global $AMBITO_ORDENADORES;
99        global  $tabla_parametros;
100        global  $cont_parametros;
101
102        $HTMLparametros='<TR  id="PAR-'.$rs->campos["idtareacomando"].'" style="display:block">'.chr(13);
103        $HTMLparametros.= '<TD>&nbsp;</TD>'.chr(13);
104        $HTMLparametros.= '<TD>&nbsp;</TD>'.chr(13);
105        $HTMLparametros.=  '<TH style="FONT-WEIGHT: 700;COLOR: #000000;BACKGROUND-COLOR: #D4D4D4; " >'.$TbMsg[5].'</TH>'.chr(13);
106        $HTMLparametros.=  '<TH style="FONT-WEIGHT: 700;COLOR: #000000;BACKGROUND-COLOR: #D4D4D4;" >'.$TbMsg[6].'</TH>'.chr(13);
107        $HTMLparametros.=  '<TH style="FONT-WEIGHT: 700;COLOR: #000000;BACKGROUND-COLOR: #D4D4D4;" >&nbsp;</TH>'.chr(13);
108        $HTMLparametros.=  '<TH style="FONT-WEIGHT: 700;COLOR: #000000;BACKGROUND-COLOR: #D4D4D4;" >&nbsp;</TH>'.chr(13);
109        $HTMLparametros.=  '</TR>'.chr(13);
110
111        $textambito="";
112        $urlimg="";
113        $nombre="";
114        switch($rs->campos["ambito"]){
115                case $AMBITO_CENTROS :
116                        $urlimg='../images/iconos/centros.gif';
117                        $textambito="Center";
118                        $nombre=TomaDato($cmd,0,'centros',$rs->campos["idambito"],'idcentro','nombrecentro');
119                        break;
120                case $AMBITO_GRUPOSAULAS :
121                        $urlimg='../images/iconos/carpeta.gif';
122                        $textambito="Group of labs";
123                        $nombre=TomaDato($cmd,0,'grupos',$rs->campos["idambito"],'idgrupo','nombregrupo');
124                        break;
125                case $AMBITO_AULAS :
126                        $urlimg='../images/iconos/aula.gif';
127                        $textambito="Labs";
128                        $nombre=TomaDato($cmd,0,'aulas',$rs->campos["idambito"],'idaula','nombreaula');
129                        break;
130                case $AMBITO_GRUPOSORDENADORES :
131                        $urlimg='../images/iconos/carpeta.gif';
132                        $textambito="Group of computers";
133                        $nombre=TomaDato($cmd,0,'gruposordenadores',$rs->campos["idambito"],'idgrupo','nombregrupoordenador');
134                        break;
135                case $AMBITO_ORDENADORES :
136                        $urlimg='../images/iconos/ordenador.gif';
137                        $textambito="Computers";
138                        $nombre=TomaDato($cmd,0,'ordenadores',$rs->campos["idambito"],'idordenador','nombreordenador');
139                        break;
140        }
141        $HTMLparametros.='<TR  id="PAR-'.$rs->campos["idtareacomando"].'" style="display:block">'.chr(13);
142        $HTMLparametros.= '<TD>&nbsp;</TD>'.chr(13);
143        $HTMLparametros.= '<TD>&nbsp;</TD>'.chr(13);
144        $HTMLparametros.= '<TD style="BACKGROUND-COLOR: #b5daad;">&nbsp;Environment&nbsp;</TD>'.chr(13);
145        $HTMLparametros.= '<TD style="BACKGROUND-COLOR: #b5daad;">&nbsp;'.$textambito.'&nbsp;';
146        $HTMLparametros.= '<IMG src="'.$urlimg.'">&nbsp;</TD>'.chr(13);
147        $HTMLparametros.=  '<TH style="FONT-WEIGHT: 700;COLOR: #000000;BACKGROUND-COLOR: #b5daad;" >&nbsp;</TH>'.chr(13);
148        $HTMLparametros.=  '<TH style="FONT-WEIGHT: 700;COLOR: #000000;BACKGROUND-COLOR: #b5daad;" >&nbsp;</TH>'.chr(13);
149        $HTMLparametros.=       '</TR>';
150
151        $HTMLparametros.='<TR  id="PAR-'.$rs->campos["idtareacomando"].'" style="display:block">'.chr(13);
152        $HTMLparametros.= '<TD>&nbsp;</TD>'.chr(13);
153        $HTMLparametros.= '<TD>&nbsp;</TD>'.chr(13);
154        $HTMLparametros.= '<TD style="BACKGROUND-COLOR: #b5daad;">&nbsp;Name&nbsp;</TD>'.chr(13);
155        $HTMLparametros.= '<TD style="BACKGROUND-COLOR: #b5daad;">&nbsp;'.$nombre.'&nbsp;</TD>'.chr(13);
156        $HTMLparametros.=  '<TH style="FONT-WEIGHT: 700;COLOR: #000000;BACKGROUND-COLOR: #b5daad;" >&nbsp;</TH>'.chr(13);
157        $HTMLparametros.=  '<TH style="FONT-WEIGHT: 700;COLOR: #000000;BACKGROUND-COLOR: #b5daad;" >&nbsp;</TH>'.chr(13);
158        $HTMLparametros.=       '</TR>';
159
160        $auxVP=split(";",$rs->campos["visuparametros"]); // Parametros visualizables
161        $auxP=split(chr(13),$rs->campos["parametros"]); // Recorre parametros para visualizar los que así sean
162        for ($i=0;$i<sizeof($auxP);$i++){
163                $dualparam=split("=",$auxP[$i]);
164                for ($k=0;$k<sizeof($auxVP);$k++){
165                         if($auxVP[$k]==$dualparam[0]){
166                                $posp=busca_indicebinariodual($dualparam[0],$tabla_parametros,$cont_parametros); // Busca datos del parámetro en la tabla cargada previamentre con todos los parámetros
167                                if ($posp>=0){
168                                        $auxtabla_parametros=$tabla_parametros[$posp][1];
169                                        $HTMLparametros.='<TR  id="PAR-'.$rs->campos["idtareacomando"].'" style="display:block">'.chr(13);
170                                        $HTMLparametros.= '<TD>&nbsp;</TD>'.chr(13);
171                                        $HTMLparametros.= '<TD>&nbsp;</TD>'.chr(13);
172                                        $HTMLparametros.=  '<TD style="BACKGROUND-COLOR: #b5daad;">&nbsp;'.$auxtabla_parametros["descripcion"].'&nbsp;</TD>'.chr(13);
173                                        if($auxtabla_parametros["tipopa"]==1){
174                                        $valor=TomaDato($cmd,0,$auxtabla_parametros["nomtabla"],$dualparam[1],$auxtabla_parametros["nomidentificador"],$auxtabla_parametros["nomliteral"]);
175                                        }else
176                                                $valor=$dualparam[1];
177                                        if($dualparam[0]!="iph")
178                                                        $HTMLparametros.=  '<TD style="BACKGROUND-COLOR: #b5daad;">&nbsp;'.$valor.'&nbsp;</TD>'.chr(13);
179                                        else{
180                                                        $tablaipes=PintaOrdenadores($cmd,$valor);
181                                                        $HTMLparametros.=  '<TD style="BACKGROUND-COLOR: #b5daad;">&nbsp;'.$tablaipes.'&nbsp;</TD>'.chr(13);
182                                        }
183                                        $HTMLparametros.=  '<TH style="FONT-WEIGHT: 700;COLOR: #000000;BACKGROUND-COLOR: #b5daad;" >&nbsp;</TH>'.chr(13);
184                                        $HTMLparametros.=  '<TH style="FONT-WEIGHT: 700;COLOR: #000000;BACKGROUND-COLOR: #b5daad;" >&nbsp;</TH>'.chr(13);
185                                        $HTMLparametros.=  '</TR>'.chr(13);
186                                }
187                        }
188                }
189        }
190        echo  $HTMLparametros;
191}
192//________________________________________________________________________________________________________
193function PintaOrdenadores($cmd,$cadenaip){
194        $auxP=split(";",$cadenaip);
195        if(sizeof($auxP)<1) return("");
196        $clauslaIN="'".$auxP[0]."'";
197        for ($i=1;$i<sizeof($auxP);$i++)
198                $clauslaIN.=",'".$auxP[$i]."'";
199        $rs=new Recordset;
200        $contor=0;
201        $maxord=7; // Máximos ordenadores por linea
202        $cmd->texto=" SELECT nombreordenador,ip FROM ordenadores  INNER JOIN aulas ON aulas.idaula=ordenadores.idaula WHERE ip IN(".$clauslaIN.") ORDER by nombreaula,nombreordenador";
203        $rs->Comando=&$cmd;
204        if (!$rs->Abrir()) return(""); // Error al abrir recordset
205        $tablaHtml='<TABLE align=left border=0><TR>';
206        while (!$rs->EOF){
207                $contor++;
208                $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>';
209                if($contor>$maxord){
210                        $contor=0;
211                        $tablaHtml.='</TR><TR>';
212                }
213                $rs->Siguiente();
214        }
215        $tablaHtml.='</TR>';
216        $tablaHtml.= '</TR></TABLE>';
217        return($tablaHtml);
218}
Note: See TracBrowser for help on using the repository browser.