source: admin/WebConsole/comandos/gestores/gestor_RestaurarImagenAula.php @ 8d5ffb2

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 8d5ffb2 was 90f061f6, checked in by alonso <alonso@…>, 15 years ago

git-svn-id: https://opengnsys.es/svn/trunk@921 a21b9725-9963-47de-94b9-378ad31fedc9
  • Property mode set to 100644
File size: 6.2 KB
RevLine 
[6e9cc32]1<?
[b0dc2e4]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: gestor_RestaurarImagenAula.php
8// Descripción :
9//              Gestor del comando "RestaurarImagenAula"
10// *************************************************************************************************************************************************
11include_once("../../includes/ctrlacc.php");
12include_once("../../clases/AdoPhp.php");
13include_once("../../clases/SockHidra.php");
14include_once("../../includes/constantes.php");
15include_once("../../includes/comunes.php");
16include_once("../../includes/cuestionacciones.php");
17include_once("../../includes/CreaComando.php");
18//________________________________________________________________________________________________________
19$identificador=0;
20$nombrefuncion="";
21$ejecutor="";
22$tipotrama="";
23$ambito=0;
24$idambito=0;
25$cadenaip="";
26$perfiles="";
27$pathrmb="";
[90f061f6]28$protclona="";
[b0dc2e4]29
30$parametros="";
31if (isset($_GET["parametros"])) $parametros=$_GET["parametros"];
32
33include_once("../../includes/cuestionaccionescab.php");
34
35$resul=false;
36$cmd=CreaComando($cadenaconexion); // Crea objeto comando
37if ($cmd){
38                $auxsplit=split("\t",$parametros);
39                $numpar=sizeof($auxsplit);
40                for($j=0;$j<$numpar-1;$j++){
41                        $ValorParametros=extrae_parametros($auxsplit[$j],chr(13),'=');
42                        $identificador=$ValorParametros["identificador"];
43                        $nombrefuncion=$ValorParametros["nombrefuncion"];
44                        $ejecutor=$ValorParametros["ejecutor"];
45                        $tipotrama=$ValorParametros["tipotrama"];
46                        $ambito=$ValorParametros["ambito"];
47                        $idambito=$ValorParametros["idambito"];
48                        $cadenaip=$ValorParametros["cadenaip"];
49                        $perfiles=$ValorParametros["perfiles"];
50                        $pathrmb=$ValorParametros["pathrmb"];
[90f061f6]51                        $protclona=$ValorParametros["protclona"];
[b0dc2e4]52                        $resul=false;
53                        $resul=Gestiona($cmd);
54                        if(!$resul) break;
55                }
56}
57$cmd->Conexion->Cerrar();
58//________________________________________________________________________________________________________
59?>
60<HTML>
61<HEAD>
[a6b881e]62        <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
[b0dc2e4]63<BODY>
64<?
65if ($resul){
66        echo '<SCRIPT language="javascript">';
67        echo 'window.parent.resultado_RestaurarImagenAula(1)'.chr(13);
68        echo '</SCRIPT>';
69}
70else{
71        echo '<SCRIPT language="javascript">';
72        echo 'window.parent.resultado_RestaurarImagenAula(0)'.chr(13);
73        echo '</SCRIPT>';
74}
75?>
76</BODY>
77</HTML>
78<?
79// *************************************************************************************************************************************************
80function Gestiona($cmd){
81        global $ACCION_EXITOSA; // Finalizada con exito
82        global $ACCION_FALLIDA; // Finalizada con errores
83        global $ACCION_TERMINADA; // Finalizada manualmente con indicacion de exito
84        global $ACCION_ABORTADA; // Finalizada manualmente con indicacion de errores
85        global $ACCION_SINERRORES; // Activa y con algún error
86        global $ACCION_CONERRORES; // Activa y sin error
87        global $ACCION_DETENIDA;
88        global $ACCION_INICIADA;
89        global $ACCION_FINALIZADA;
90        global $idcentro;
91        global $cadenaip;
92        global $identificador;
93        global $nombrefuncion;
94        global $ejecutor;
95        global $tipotrama;
96        global $ambito;
97        global $idambito;
98        global $perfiles;
99        global $pathrmb;
[90f061f6]100        global $protclona;
[b0dc2e4]101        global $EJECUCION_COMANDO;
102        global $PROCESOS;
103        global $servidorhidra;
104        global $hidraport;
105
106        $swvez=true;
107        $auxsplit=split(";",$perfiles); // Toma las distintas particiones con sus perfiles
108        $auxpsplit=split(";",$pathrmb); // Toma los distintas path de imagens
[90f061f6]109        $auxcsplit=split(";",$protclona); //Toma el protocolo de clonación de las imágenes
[b0dc2e4]110        $shidra=new SockHidra($servidorhidra,$hidraport);
111       
112        $cmd->CreaParametro("@tipoaccion",$EJECUCION_COMANDO,1);
113        $cmd->CreaParametro("@idtipoaccion",$identificador,1);
114        $cmd->CreaParametro("@cateaccion",$PROCESOS,1);
115        $cmd->CreaParametro("@ambito",$ambito,1);
116        $cmd->CreaParametro("@idambito",$idambito,1);
117        $cmd->CreaParametro("@fechahorareg",date("y/m/d H:i:s"),0);
118        $cmd->CreaParametro("@estado",$ACCION_INICIADA,0);
119        $cmd->CreaParametro("@resultado",$ACCION_SINERRORES,0);
120        $cmd->CreaParametro("@idcentro",$idcentro,1);
121        $cmd->CreaParametro("@parametros","",0);
122        $cmd->CreaParametro("@descripcion","",0);
123        $cmd->CreaParametro("@idtarea",0,1);
124        $cmd->CreaParametro("@idprocedimiento",0,1);
125        $cmd->CreaParametro("@idcomando",0,1);
126
127        for($j=0;$j<sizeof($auxsplit)-1;$j++){
128                        $dualperfil=split("_",$auxsplit[$j]);
129                        $particion=$dualperfil[0];
130                        $swresimg=$dualperfil[1];
131                        $idimagen=$dualperfil[2];
132                        $idperfilhard=$dualperfil[3];
133                        $idperfilsoft=$dualperfil[4];
134                        $tipopar=$dualperfil[5];
135                        $nemonico=$dualperfil[6];
136                        $parametros=$ejecutor;
137                        $parametros.="nfn=".$nombrefuncion.chr(13);
138                        $parametros.="par=".$particion.chr(13);
139                        $parametros.="idi=".$idimagen.chr(13);
140                        $parametros.="ifs=".$idperfilsoft.chr(13);
141                        $parametros.="ifh=".$idperfilhard.chr(13);
142                        $parametros.="nem=".$nemonico.chr(13);
143                        $parametros.="idc=".$idcentro.chr(13);
144                        $parametros.="swr=".$swresimg.chr(13);
145                        $parametros.="icr=".CuestionIncrementales($cmd,$idperfilhard,$idperfilsoft,$idimagen).chr(13);;
146                        $parametros.="tpa=".$tipopar.chr(13);
147                        $parametros.="pth=".$auxpsplit[$j].chr(13);
[90f061f6]148                        $parametros.="mcl=".$auxcsplit[$j].chr(13);
[b0dc2e4]149                        $parametros.="iph=".$cadenaip.chr(13);
150                        $cmd->ParamSetValor("@parametros",$parametros);
151                        if(!CuestionAcciones($cmd,$shidra,$parametros)) return(false);
152        }
153        return(true);
154}
155//________________________________________________________________________________________________________
156//      Comprueba que la imagen no tiene incrementales o si la tiene que existen para el perfil hardware del ordenador
157//________________________________________________________________________________________________________
158function CuestionIncrementales($cmd,$idperfilhard,$idperfilsoft,$idimagen){
159        $wrs=new Recordset;
160        $cmd->texto=" SELECT idsoftincremental FROM imagenes_softincremental WHERE idimagen=".$idimagen;
161        $wrs->Comando=&$cmd;
162        if (!$wrs->Abrir()) return(""); // Error al abrir recordset
163        $strInc="";
164        while (!$wrs->EOF){
165                $strInc.=$wrs->campos["idsoftincremental"].";";
166                $wrs->Siguiente();
167        }
168        return($strInc);
169}
[90f061f6]170?>
Note: See TracBrowser for help on using the repository browser.