source: admin/WebConsole/gestores/gestor_ordenadorestandar.php @ 5d05b06

Last change on this file since 5d05b06 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: 4.8 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: gestor_ordenadorestandar.php
8// Descripción :
9//              Gestiona la actualización de los ordenadores de un aula a través de la plantilla
10// *************************************************************************************************************************************************
11include_once("../includes/ctrlacc.php");
12include_once("../clases/AdoPhp.php");
13include_once("../includes/comunes.php");
14include_once("../includes/CreaComando.php");
15//________________________________________________________________________________________________________
16$idaula=0;
17$nombreordenador="";
18$ip="";
19$mac="";
20$cache=0;
21$idperfilhard=0;
22$idservidordhcp=0;
23$idservidorrembo=0;
24$numorde=0;
25
26if (isset($_GET["idaula"])) $idaula=$_GET["idaula"];
27if (isset($_GET["nombreordenador"])) $nombreordenador=$_GET["nombreordenador"];
28if (isset($_GET["ip"])) $ip=$_GET["ip"];
29if (isset($_GET["mac"])) $mac=$_GET["mac"];
30if (isset($_GET["cache"])) $cache=$_GET["cache"];
31if (isset($_GET["idperfilhard"])) $idperfilhard=$_GET["idperfilhard"];
32if (isset($_GET["idservidordhcp"])) $idservidordhcp=$_GET["idservidordhcp"];
33if (isset($_GET["idservidorrembo"])) $idservidorrembo=$_GET["idservidorrembo"];
34if (isset($_GET["numorde"])) $numorde=$_GET["numorde"];
35
36if(empty($cache)) $cache=0;
37
38$cmd=CreaComando($cadenaconexion); // Crea objeto comando
39$resul=false;
40if ($cmd){
41        $resul=Gestiona();
42        $cmd->Conexion->Cerrar();
43}
44//________________________________________________________________________________________________________
45?>
46<HTML>
47<HEAD>
48        <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
49<BODY>
50<?php
51$literal="resultado_ordenadorestandar";
52if ($resul){
53        echo '<SCRIPT language="javascript">'.chr(13);
54        echo 'var oHTML'.chr(13);
55        echo 'var cTBODY=document.getElementsByTagName("TBODY");'.chr(13);
56        echo 'o=cTBODY.item(1);'.chr(13);
57        echo 'window.parent.'.$literal."(1,'".$cmd->DescripUltimoError()."');".chr(13);
58        echo '</SCRIPT>';
59}
60else{
61        echo '<SCRIPT language="javascript">';
62        echo "  window.parent.".$literal."(0,'".$cmd->DescripUltimoError()."')";
63        echo '</SCRIPT>';
64}
65?>
66</BODY>
67</HTML>
68<?php
69// *************************************************************************************************************************************************
70function Gestiona(){
71        global  $cmd;
72        global $idaula;
73        global $nombreordenador;
74        global $ip;
75        global $mac;
76        global $cache;
77        global $idaula;
78        global $idperfilhard;
79        global $idservidordhcp;
80        global $idservidorrembo;
81        global $numorde;
82
83        if($numorde>0){
84                $auxIP=explode("[.]",$ip);
85                $swip=false;
86                $litnwip="";
87                $nwip=0;
88                if(isset($auxIP[3])){
89                        $nwip=$auxIP[3];
90                        if(empty($nwip)) $nwip=0;
91                        $litnwip=$auxIP[0].".".$auxIP[1].".".$auxIP[2].".";
92                        $swip=true;
93                }
94                $swnom=false;
95                if(substr($nombreordenador,strlen($nombreordenador)-1,1)=="$"){
96                        $swnom=true;
97                        $nombreordenador=substr($nombreordenador,0,strlen($nombreordenador)-1);
98                }
99                $cmd->CreaParametro("@grupoid",0,1);
100                $cmd->CreaParametro("@idaula",$idaula,1);
101                $cmd->CreaParametro("@nombreordenador",$nombreordenador,0);
102                $cmd->CreaParametro("@ip",$ip,0);
103                $cmd->CreaParametro("@mac",$mac,0);
104                $cmd->CreaParametro("@cache",$cache,1);
105                $cmd->CreaParametro("@idperfilhard",$idperfilhard,1);
106                $cmd->CreaParametro("@idservidordhcp",$idservidordhcp,1);
107                $cmd->CreaParametro("@idservidorrembo",$idservidorrembo,1);
108
109                for($i=0;$i<$numorde;$i++){
110                        if($swip)
111                                $cmd->ParamSetValor("@ip",$litnwip.$nwip);
112                        if($swnom && $swip)
113                                $cmd->ParamSetValor("@nombreordenador",$nombreordenador.$nwip);
114                        $cmd->texto="INSERT INTO ordenadores(nombreordenador,ip,mac,cache,idperfilhard,idservidordhcp,idservidorrembo,idaula,grupoid,idconfiguracion) VALUES (@nombreordenador,@ip,@mac,@cache,@idperfilhard,@idservidordhcp,@idservidorrembo,@idaula,@grupoid,0)";
115                        if($swip) $nwip++;
116                        $resul=$cmd->Ejecutar();
117                        if (!$resul) return(false);
118                }
119        }
120        else{
121                $strsql="UPDATE ordenadores SET ";
122                if (!empty($nombreordenador))   $strsql.=" nombreordenador='".$nombreordenador."',";
123                if (!empty($ip))        $strsql.=" ip='".$ip."',";
124                if (!empty($mac))       $strsql.=" mac='".$mac."',";
125                $strsql.=" cache='".$cache."',";
126                if ($idperfilhard>0)    $strsql.=" idperfilhard=".$idperfilhard.",";
127                if ($idservidordhcp>0)  $strsql.=" idservidordhcp=".$idservidordhcp.",";
128                if ($idservidorrembo>0) $strsql.=" idservidorrembo=".$idservidorrembo.",";
129                $strsql=substr($strsql,0,strlen($strsql)-1); // Quita la coma final
130                $strsql.=" WHERE idaula=".$idaula;
131                $cmd->texto=$strsql;
132                $resul=$cmd->Ejecutar();
133        }
134        return($resul);
135}
136?>z
Note: See TracBrowser for help on using the repository browser.