#804 En los asistentes se elimina la librería de ajax antigua

git-svn-id: https://opengnsys.es/svn/branches/version1.1@5625 a21b9725-9963-47de-94b9-378ad31fedc9

9 files changed, 150 insertions, 166 deletions

diff --git a/admin/WebConsole/asistentes/AsistenteCloneRemotePartition.php b/admin/WebConsole/asistentes/AsistenteCloneRemotePartition.php
index f0481d5b..a69f69b2 100644
--- a/admin/WebConsole/asistentes/AsistenteCloneRemotePartition.php
+++ b/admin/WebConsole/asistentes/AsistenteCloneRemotePartition.php
@@ -3,11 +3,9 @@
 // Aplicacion WEB: ogAdmWebCon
 // Autor: Antonio J. Doblas Viso
 // Baso en Codigo  Comando.php de : Jose Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla
-//	Xajax
 // *************************************************************************************************************************************************
 
 
-require_once('xajax.common.php'); 
 //Haciendo referencia a las funciones registradas y que seran interpretadas como funciones javascript
 
 
@@ -40,12 +38,10 @@ if (!$cmd)
 	<SCRIPT language="javascript" src="./jscripts/EjecutarScripts.js"></SCRIPT>
 	<SCRIPT language="javascript" src="../comandos/jscripts/comunescomandos.js"></SCRIPT>
 	<SCRIPT language="javascript" src="./jscripts/asistentes.js"></SCRIPT>
+	<SCRIPT language="javascript" src="./jscripts/OrigenesMaster.js"></SCRIPT>
 	<?php echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/comandos/ejecutarscripts_'.$idioma.'.js"></SCRIPT>'?>
 	<?php echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/comandos/comunescomandos_'.$idioma.'.js"></SCRIPT>'?>
-<?php 
-//indicamos al objeto xajax se encargue de generar el javascript de las funciones registradas por ejm: ListarParticionesXip
-$xajax->printJavascript('../xajax/'); 
-?>
+
 </head>
 
 
diff --git a/admin/WebConsole/asistentes/AsistenteDeployImage.php b/admin/WebConsole/asistentes/AsistenteDeployImage.php
index 84215eb7..b7f3596d 100644
--- a/admin/WebConsole/asistentes/AsistenteDeployImage.php
+++ b/admin/WebConsole/asistentes/AsistenteDeployImage.php
@@ -3,11 +3,9 @@
 // Aplicacion WEB: ogAdmWebCon
 // Autor: 
 // Baso en Codigo  Comando.php de : Jose Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla
-//	Xajax
 // *************************************************************************************************************************************************
 
 
-require_once('xajax.common.php'); 
 //Haciendo referencia a las funciones registradas y que seran interpretadas como funciones javascript
 
 
@@ -49,11 +47,6 @@ if (!$cmd)
 	<?php echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/comandos/ejecutarscripts_'.$idioma.'.js"></SCRIPT>'?>
 	<?php echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/comandos/comunescomandos_'.$idioma.'.js"></SCRIPT>'?>
 
-
-<?php 
-//indicamos al objeto xajax se encargue de generar el javascript de las funciones registradas por ejm: ListarParticionesXip
-$xajax->printJavascript('../xajax/'); 
-?>
 </head>
 
 
diff --git a/admin/WebConsole/asistentes/AsistenteParticionado.php b/admin/WebConsole/asistentes/AsistenteParticionado.php
index f1ecc803..f47631a5 100644
--- a/admin/WebConsole/asistentes/AsistenteParticionado.php
+++ b/admin/WebConsole/asistentes/AsistenteParticionado.php
@@ -3,14 +3,12 @@
 // Aplicacion WEB: ogAdmWebCon
 // Autor: Antonio J. Doblas Viso
 // Baso en Codigo  Comando.php de : Jose Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla
-//	Xajax
 // version 1.1: Se incluye aviso para particiones GTP.
 // autor: Irina Gomez, ETSII Universidad de Sevilla
 // fecha: 2016-06-21
 // *************************************************************************************************************************************************
 
 
-require_once('xajax.common.php'); 
 //Haciendo referencia a las funciones registradas y que seran interpretadas como funciones javascript
 
 
@@ -57,11 +55,6 @@ if (!$cmd)
 	<?php echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/comandos/comunescomandos_'.$idioma.'.js"></SCRIPT>'?>
 	<?php echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/asistentes_'.$idioma.'.js"></SCRIPT>'?>
 
-
-<?php 
-//indicamos al objeto xajax se encargue de generar el javascript de las funciones registradas por ejm: ListarParticionesXip
-$xajax->printJavascript('../xajax/'); 
-?>
 <script>
 function doOnload(){
 	calculateFreeDisk(document.fdatos);
diff --git a/admin/WebConsole/asistentes/AsistenteUpdateCache.php b/admin/WebConsole/asistentes/AsistenteUpdateCache.php
index 4d6d0f61..ea7e7d73 100644
--- a/admin/WebConsole/asistentes/AsistenteUpdateCache.php
+++ b/admin/WebConsole/asistentes/AsistenteUpdateCache.php
@@ -3,15 +3,8 @@
 // Aplicacion WEB: ogAdmWebCon
 // Autor: 
 // Baso en Codigo  Comando.php de : Jose Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla
-//	Xajax
 // *************************************************************************************************************************************************
 
-
-require_once('xajax.common.php'); 
-//Haciendo referencia a las funciones registradas y que seran interpretadas como funciones javascript
-
-
-
 /********HACIENDO CONSULTA A LA TABLA ordenadores***********/
 include_once("../includes/ctrlacc.php");
 include_once("../clases/AdoPhp.php");
@@ -53,11 +46,6 @@ if (!$cmd)
 	<?php echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/comandos/ejecutarscripts_'.$idioma.'.js"></SCRIPT>'?>
 	<?php echo '<SCRIPT language="javascript" src="../idiomas/javascripts/'.$idioma.'/comandos/comunescomandos_'.$idioma.'.js"></SCRIPT>'?>
 
-
-<?php 
-//indicamos al objeto xajax se encargue de generar el javascript de las funciones registradas por ejm: ListarParticionesXip
-$xajax->printJavascript('../xajax/'); 
-?>
 </head>
 
 
diff --git a/admin/WebConsole/asistentes/includes/asistentes/ListarOrigenesMaster.php b/admin/WebConsole/asistentes/includes/asistentes/ListarOrigenesMaster.php
new file mode 100644
index 00000000..802d3258
--- /dev/null
+++ b/admin/WebConsole/asistentes/includes/asistentes/ListarOrigenesMaster.php
@@ -0,0 +1,113 @@
+<?php
+// ListarOrigenesMaster.php: Devuelve las particiones e imágenes en cache en el equipo master
+//    disponibles para CloneRemotePartition
+
+include_once("../../../includes/ctrlacc.php");
+include_once("../../../clases/AdoPhp.php");
+include_once("../../../includes/CreaComando.php");
+
+// Obtener información de la petición
+$ip = $_GET['ip'];
+
+$options  = '<select name="source"> ';
+$warnings = '<ul>';
+
+$cmd = CreaComando($cadenaconexion);
+$rs = new Recordset;
+
+// Primera consulta: particiones del MASTER potencialmente clonables.
+$cmd->texto = 'SELECT ordenadores_particiones.numdisk as DISK,
+                      ordenadores_particiones.numpar as PART,
+                      nombresos.nombreso as OS
+               FROM ordenadores_particiones
+               INNER JOIN tipospar ON tipospar.codpar = ordenadores_particiones.codpar
+               INNER JOIN nombresos ON ordenadores_particiones.idnombreso = nombresos.idnombreso
+               INNER JOIN ordenadores ON ordenadores_particiones.idordenador = ordenadores.idordenador
+               WHERE ordenadores.ip = "'.$ip.'"
+               AND tipospar.clonable > 0
+               AND ordenadores_particiones.idnombreso > 0
+               ORDER BY ordenadores_particiones.numdisk, ordenadores_particiones.numpar';
+$rs->Comando = &$cmd;
+
+if ($rs->Abrir()) {
+    $cantRegistros = $rs->numeroderegistros;
+    if ($cantRegistros>0) {
+        $rs->Primero();
+        while (!$rs->EOF) {
+            $options .= '<OPTION value=" '.$rs->campos["DISK"].' '.$rs->campos["PART"].'">';
+            $options .= 'DISK '.$rs->campos["DISK"].',PART '.$rs->campos["PART"].': '.$rs->campos["OS"];
+            $options .= '</OPTION>';
+            $rs->Siguiente();
+        }
+    } else {
+        $warnings .= '<li>No hay particiones clonables.</li>';
+    }
+    $rs->Cerrar();
+}
+
+// Segunda consulta: imágenes en la caché del MASTER
+$cmd->texto = 'SELECT cache FROM ordenadores_particiones
+               WHERE codpar = 202
+               AND idordenador = (SELECT idordenador
+                                  FROM ordenadores
+                                  WHERE ip = "'.$ip.'")';
+$rs->Comando = &$cmd;
+
+if ($rs->Abrir()) {
+    $cantRegistros = $rs->numeroderegistros;
+    if ($cantRegistros>0) {
+        $rs->Primero();
+        while (!$rs->EOF) {
+            $files = explode(",", $rs->campos["cache"]);
+            foreach ($files as $file) {
+                if (preg_match("/img$/", $file)) {
+                    $imgname = rtrim($file, ".img");
+                    $options .= '<OPTION value=" CACHE /'.ltrim($imgname).'"';
+                    $options .= '>';
+                    $options .= 'IMG-CACHE: '.ltrim($imgname).'</OPTION>';
+                }
+            }
+            $rs->Siguiente();
+        }
+    } else {
+        $warnings .= '<li>No hay imágenes en la caché.</li>';
+    }
+    $rs->Cerrar();
+}
+
+//Tercera consulta: imágenes del REPO que el MASTER se encargara de enviar
+$cmd->texto = 'SELECT *, repositorios.ip as iprepositorio
+               FROM imagenes
+               INNER JOIN repositorios
+               ON repositorios.idrepositorio = imagenes.idrepositorio
+               WHERE repositorios.idrepositorio = (SELECT idrepositorio
+                                                   FROM ordenadores
+                                                   WHERE ordenadores.ip = "'.$ip.'")
+               ORDER BY imagenes.descripcion';
+
+$rs->Comando = &$cmd;
+
+if ($rs->Abrir()) {
+    $cantRegistros = $rs->numeroderegistros;
+    if ($cantRegistros>0) {
+        $rs->Primero();
+        while (!$rs->EOF) {
+            $options .= '<OPTION value=" REPO /'.$rs->campos["nombreca"].'">';
+            $options .= 'IMG-REPO: '.$rs->campos["descripcion"];
+            $options .= '</OPTION>';
+            $rs->Siguiente();
+        }
+    } else {
+        $warnings .= '<li>No hay imágenes del repositorio.</li>';
+    }
+    $rs->Cerrar();
+}
+
+$options  .= '</select>';
+$warnings .= '</ul>';
+
+// Costruir respuesta
+$ajaxResponse = $options . $warnings;
+
+// Devolver respuesta AJAX
+echo $ajaxResponse;
diff --git a/admin/WebConsole/asistentes/includes/asistentes/formCloneRemotePartition.php b/admin/WebConsole/asistentes/includes/asistentes/formCloneRemotePartition.php
index d9b1cfa1..0b0282b9 100644
--- a/admin/WebConsole/asistentes/includes/asistentes/formCloneRemotePartition.php
+++ b/admin/WebConsole/asistentes/includes/asistentes/formCloneRemotePartition.php
@@ -4,14 +4,14 @@
 <tr>
 	<td class="op_basic">
 	    <?php echo $TbMsg["WCRP32"] ?> 
-		<select name="ipMaster" id="ipMaster" style="width:220" onChange="xajax_ListarOrigenMaster(this.value);">
+		<select name="ipMaster" id="ipMaster" style="width:220" onChange="ListarOrigenesMaster(this.value);">
 				<option value=""> -- <?php echo $TbMsg["WCRP32"] ?> -- </option>
 				<?php echo ''.htmlOPTION_equipos($cmd,$ambito,$idambito).'';   ?>
 		</select>		
 		<br />		
 		<!--DIV donde se mostrara la respuesta AJAX sobre las particiones clonables del equipo-->
 		<?php echo $TbMsg["WCRP33"] ?>
-		<div id="divListado"></div>
+		<div id="ajaxDiv"></div>
 		<br />
 		<?php echo $TbMsg["WCRP34"] ?> 
 		<select name="targetpart" id="targetpart" style="width:220;">
diff --git a/admin/WebConsole/asistentes/jscripts/OrigenesMaster.js b/admin/WebConsole/asistentes/jscripts/OrigenesMaster.js
new file mode 100644
index 00000000..b7200a8f
--- /dev/null
+++ b/admin/WebConsole/asistentes/jscripts/OrigenesMaster.js
@@ -0,0 +1,33 @@
+// ListarOrigenesMaster.js: Solicita al servidor las particiones e imágenes en cache en el equipo master
+//    disponibles para CloneRemotePartition y las devuelve en una lista de selección.
+function ListarOrigenesMaster(ip) {
+    var ajaxRequest;
+
+    // Soporte a distintos navegadores
+    try {
+        // Navegadores modernos
+        ajaxRequest = new XMLHttpRequest();
+    } catch (e) {
+        // Internet Explorer
+        try {
+            ajaxRequest = new ActiveXObject("Msxml2.XMLHTTP");
+        } catch (e) {
+            try {
+                ajaxRequest = new ActiveXObject("Microsoft.XMLHTTP");
+            } catch (e) {
+                alert("Este navegador no soporta la operación.");
+                return false;
+            }
+        }
+    }
+
+    ajaxRequest.onreadystatechange = function() {
+        if (this.readyState == 4 && this.status == 200) {
+            var ajaxDisplay = document.getElementById('ajaxDiv');
+            ajaxDisplay.innerHTML = this.responseText;
+        }
+    }
+
+    ajaxRequest.open("GET", "includes/asistentes/ListarOrigenesMaster.php?ip=" + ip, true);
+    ajaxRequest.send();
+}
diff --git a/admin/WebConsole/asistentes/xajax.common.php b/admin/WebConsole/asistentes/xajax.common.php
deleted file mode 100644
index 7a97f2e8..00000000
--- a/admin/WebConsole/asistentes/xajax.common.php
+++ /dev/null
@@ -1,7 +0,0 @@
-<?php

-//importando las librerias XAJAX

-require ("/opt/opengnsys/www/xajax/xajax_core/xajax.inc.php");

-$xajax = new xajax("xajax.server.php");

-//asociamos la funci�n creada en index.server.php al objeto XAJAX

-$xajax->registerFunction("ListarOrigenMaster");

-?>
\ No newline at end of file
diff --git a/admin/WebConsole/asistentes/xajax.server.php b/admin/WebConsole/asistentes/xajax.server.php
deleted file mode 100644
index b4f26585..00000000
--- a/admin/WebConsole/asistentes/xajax.server.php
+++ /dev/null
@@ -1,125 +0,0 @@
-<?php
-//importando nuestras las referencias XAJAX
-require ("xajax.common.php");
-
-
-//funcion que lista las Particiones segun la IP elegida
-function ListarOrigenMaster($ip){ 
-
-	include_once("../includes/ctrlacc.php");
-	include_once("../clases/AdoPhp.php");
-	include_once("../includes/constantes.php");
-	include_once("../includes/comunes.php");
-	include_once("../includes/CreaComando.php");
-	include_once("../includes/HTMLSELECT.php");
-	
-	
-		//instanciamos el objeto para la respuesta AJAX
-	 $objResponse = new xajaxResponse();	
-	
-	 $SelectHtml=" ";
-	 $SelectHtml='<select name="source"> ';
-	 
-	 $cmd=CreaComando($cadenaconexion);
-	 $rs=new Recordset; 
-	 
-	//Primera consulta: Particiones del MASTER potencialmente clonables.
-    $cmd->texto='SELECT ordenadores_particiones.numdisk as DISK,ordenadores_particiones.numpar as PART,nombresos.nombreso as OS 
-	FROM ordenadores_particiones INNER JOIN tipospar ON tipospar.codpar=ordenadores_particiones.codpar
-	INNER JOIN nombresos ON ordenadores_particiones.idnombreso=nombresos.idnombreso 	
-	INNER JOIN ordenadores ON ordenadores_particiones.idordenador=ordenadores.idordenador 
-	WHERE ordenadores.ip="' .$ip . '"   
-	AND tipospar.clonable>0  
-	AND ordenadores_particiones.idnombreso>0
-	ORDER BY ordenadores_particiones.numdisk,ordenadores_particiones.numpar';
-	$rs->Comando=&$cmd; 
-
-	if ($rs->Abrir()){
-		$cantRegistros=$rs->numeroderegistros;
-		if($cantRegistros>0){
-			 $rs->Primero(); 
-			while (!$rs->EOF){
-				$SelectHtml.='<OPTION value=" '.$rs->campos["DISK"].' '.$rs->campos["PART"].'"';				
-				$SelectHtml.='>';
-				$SelectHtml.='DISK '.$rs->campos["DISK"].',PART '.$rs->campos["PART"].': '. $rs->campos["OS"].'</OPTION>';
-				$rs->Siguiente();
-			}
-		}
-		else
-		{			
-		$objResponse->alert("No partion found in this host for use it to cloning other computers.");
-		}
-		$rs->Cerrar();
-	}
-	//Segunda consulta: Imagenes del MASTER registradas como si fuese un repo.
-
-#	$cmd->texto='SELECT *,repositorios.ip as iprepositorio FROM  imagenes
-#INNER JOIN repositorios ON repositorios.idrepositorio=imagenes.idrepositorio
-#where repositorios.ip="' .$ip .'"';
-
-	$cmd->texto='select cache  from ordenadores_particiones where codpar = 202 and  idordenador = (SELECT idordenador from ordenadores where ip="' .$ip . '")';
-	$rs->Comando=&$cmd;
-	
-	if ($rs->Abrir()){
-		$cantRegistros=$rs->numeroderegistros;
-		if($cantRegistros>0){
-			$rs->Primero(); 
-			while (!$rs->EOF){
-				$files = explode(",", $rs->campos["cache"]);
-				foreach ($files as $file) {
-					if ( preg_match ( "/img$/", $file ) )  {					
-					$imgname = rtrim($file, ".img");
-					$SelectHtml.='<OPTION value=" CACHE /'.ltrim($imgname).'"';				
-					$SelectHtml.='>';
-					$SelectHtml.='IMG-CACHE: ' . ltrim($imgname).'</OPTION>';
-					}
-				}
-				$rs->Siguiente();
-			}
-		}
-		else
-		{			
-		$objResponse->alert("No image found in CACHE in this host for use it to cloning other compuers.");
-		}
-		$rs->Cerrar();
-	}
-	
-//Tercera consulta: Imagenes del REPO, que el MASTER se encargara de enivarlas
-	$cmd->texto='SELECT *,repositorios.ip as iprepositorio FROM  imagenes
-INNER JOIN repositorios ON repositorios.idrepositorio=imagenes.idrepositorio
-where repositorios.idrepositorio=(select idrepositorio from ordenadores where ordenadores.ip="' .$ip .'") ORDER BY imagenes.descripcion';
-   
-	$rs->Comando=&$cmd;
-	
-	if ($rs->Abrir()){
-		$cantRegistros=$rs->numeroderegistros;
-		if($cantRegistros>0){
-			$rs->Primero(); 
-			while (!$rs->EOF){
-				$SelectHtml.='<OPTION value=" REPO /'.$rs->campos["nombreca"].'"';				
-				$SelectHtml.='>';
-				$SelectHtml.='IMG-REPO: ' . $rs->campos["descripcion"].'</OPTION>';
-				$rs->Siguiente();
-			}
-		}
-		else
-		{			
-		$objResponse->alert("No image found in REPO from this host for use it to cloning other computers.");
-		}
-		$rs->Cerrar();
-	}
-	
-	$SelectHtml.= '</SELECT>';
- 
-	 //asignando el contenido de la varabiale $SelectHTML al div que esta en la paquina inicial
-	 $objResponse->assign("divListado","innerHTML",$SelectHtml);
-
-	 return $objResponse; //retornamos la respuesta AJAX
-}
-	
-$xajax->processRequest(); //procesando cualquier peticion AJAX
-
-
-
-
-?>