#640: Evitar errores duplicados en llamadas a {{{ogMount}}} y comprobar error de montaje en script {{{bootOs}}}.

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

5 files changed, 33 insertions, 33 deletions

diff --git a/client/engine/Boot.lib b/client/engine/Boot.lib
index bc176b85..1bb04735 100755
--- a/client/engine/Boot.lib
+++ b/client/engine/Boot.lib
@@ -47,9 +47,8 @@ fi
 # Detectar tipo de sistema de archivos y montarlo.
 PART=$(ogDiskToDev $1 $2) || return $?
 TYPE=$(ogGetFsType $1 $2) || return $?
-MNTDIR=$(ogMount $1 $2) 2>/dev/null
 # Error si no puede montar sistema de archivos.
-[ -n "$MNTDIR" ] || ogRaiseError OG_ERR_PARTITION "$1, $2" || return $?
+MNTDIR=$(ogMount $1 $2) || return $?
 
 case "$TYPE" in
     EXT[234]|REISERFS|REISER4|JFS|XFS)
@@ -128,8 +127,7 @@ fi
 [ $# == 2 ] || ogRaiseError $OG_ERR_FORMAT || return $?
 
 # Montar el sistema de archivos.
-MNTDIR=$(ogMount $1 $2) 2>/dev/null
-[ -n "$MNTDIR" ] || ogRaiseError OG_ERR_PARTITION "$1, $2" || return $?
+MNTDIR=$(ogMount $1 $2) || return $?
 
 # Obtener dato del valor de registro.
 ogGetRegistryValue $MNTDIR system '\ControlSet001\Control\ComputerName\ComputerName\ComputerName'
@@ -171,8 +169,7 @@ fi
 [ $# == 2 ] || ogRaiseError $OG_ERR_FORMAT || return $?
 
 # Detectar id. de tipo de partición y codificar al mnemonico.
-MNTDIR=$(ogMount $1 $2) 2>/dev/null
-[ -n "$MNTDIR" ] || ogRaiseError OG_ERR_PARTITION "$1, $2" || return $?
+MNTDIR=$(ogMount $1 $2) || return $?
 
 # Fichero de configuración de GRUB.
 CONFDIR=$MNTDIR                               # Partición de arranque /boot.
@@ -240,8 +237,9 @@ fi
 [ ${#3} -le 15 ] || ogRaiseError $OG_ERR_OUTOFLIMIT "\"${3:0:15}...\"" || return $?
 
 # Montar el sistema de archivos.
-MNTDIR=$(ogMount $1 $2) 2>/dev/null
-[ -n "$MNTDIR" ] || ogRaiseError OG_ERR_PARTITION "$1, $2" || return $?
+MNTDIR=$(ogMount $1 $2) || return $?
+
+# Asignar nombre.
 NAME="$3"
 
 # Modificar datos de los valores de registro.
@@ -282,8 +280,9 @@ fi
 [ $# == 3 ] || ogRaiseError $OG_ERR_FORMAT || return $?
 
 # Montar el sistema de archivos.
-MNTDIR=$(ogMount $1 $2) 2>/dev/null
-[ -n "$MNTDIR" ] || ogRaiseError OG_ERR_PARTITION "$1, $2" || return $?
+MNTDIR=$(ogMount $1 $2) || return $?
+
+# Asignar nombre.
 NAME="$3"
 
 # Modificar datos en el registro.
@@ -908,8 +907,7 @@ case $# in
 esac
 
 # Montar el sistema de archivos.
-MNTDIR=$(ogMount $1 $2) 2>/dev/null
-[ -n "$MNTDIR" ] || ogRaiseError OG_ERR_PARTITION "$1, $2" || return $?
+MNTDIR=$(ogMount $1 $2) || return $?
 
 ETC=$(ogGetPath $1 $2 /etc)
 
@@ -965,8 +963,7 @@ fi
 [ $# == 2 ] || ogRaiseError $OG_ERR_FORMAT || return $?
 
 # Montar el sistema de archivos.
-MNTDIR=$(ogMount $1 $2) 2>/dev/null
-[ -n "$MNTDIR" ] || ogRaiseError OG_ERR_PARTITION "$1, $2" || return $?
+MNTDIR=$(ogMount $1 $2) || return $?
 
 # Eliminar fichero de configuración de udev para dispositivos fijos de red.
 rm -f ${MNTDIR}/etc/udev/rules.d/70-persistent-net.rules
diff --git a/client/engine/FileSystem.lib b/client/engine/FileSystem.lib
index af003ac3..18eea3d7 100755
--- a/client/engine/FileSystem.lib
+++ b/client/engine/FileSystem.lib
@@ -157,8 +157,7 @@ esac
 [ -z "$PROG" ] && return
 # Error si el sistema de archivos no se queda en el estado de montaje adecuado.
 if [ "$DOMOUNT" ]; then
-    PART=$(ogMount $1 $2)
-    [ -n "$PART" ] || ogRaiseError $OG_ERR_PARTITION "$1 $2" || return $?   # Indicar nuevo error
+    PART=$(ogMount $1 $2) || return $?                      # Indicar nuevo error
 else
     ogUnmount $1 $2 2>/dev/null
     if ogIsMounted $1 $2; then
@@ -481,7 +480,7 @@ fi
 # Falso, en caso de error.
 [ $# == 2 ] || return 1
 
-test -n "$(ogMount "$1" "$2")"
+test -n "$(ogMount "$1" "$2" 2>/dev/null)"
 }
 
 
diff --git a/client/engine/PostConf.lib b/client/engine/PostConf.lib
index f85b239f..24fb00d8 100755
--- a/client/engine/PostConf.lib
+++ b/client/engine/PostConf.lib
@@ -278,7 +278,7 @@ EOF
 function ogInstallLinuxClient ()
 {
 # Variables locales.
-local PART MNTDIR CLIENTFILE i SBINDIR ETCDIR RCLOCAL
+local MNTDIR CLIENTFILE i SBINDIR ETCDIR RCLOCAL
 # Si se solicita, mostrar ayuda.
 if [ "$*" == "help" ]; then
     ogHelp "$FUNCNAME" "$FUNCNAME int_ndisk int_filesys" \
@@ -289,10 +289,8 @@ fi
 # Error si no se reciben 2 parámetros.
 [ $# == 2 ] || ogRaiseError $OG_ERR_FORMAT || return $?
 # Obtener sistema de archvios.
-PART="$(ogDiskToDev $1 $2)" || return $?
-# Comprobar si el sistema de archivos no está bloqueado.
-MNTDIR=$(ogMount $1 $2) 2>/dev/null
-[ -n "$MNTDIR" ] || ogRaiseError OG_ERR_PARTITION "$1, $2" || return $?
+MNTDIR=$(ogMount $1 $2) || return $?
+
 # Comprobar si existe el cliente y los directorios y ficheros destino.
 CLIENTFILE=$OGLIB/ogclient/ogAdmLnxClient
 [ -f $CLIENTFILE ] || ogRaiseError $OG_ERR_FOUND "$CLIENTFILE" || return $?
@@ -355,7 +353,7 @@ ogUnlock $1 $2
 function ogInstallWindowsClient ()
 {
 # Variables locales.
-local PART MNTDIR CLIENTFILE i SBINDIR ETCDIR RCLOCAL
+local MNTDIR CLIENTFILE i SBINDIR ETCDIR RCLOCAL
 # Si se solicita, mostrar ayuda.
 if [ "$*" == "help" ]; then
     ogHelp "$FUNCNAME" "$FUNCNAME int_ndisk int_filesys" \
@@ -365,10 +363,8 @@ fi
 # Error si no se reciben 3 parámetros.
 [ $# == 3 ] || ogRaiseError $OG_ERR_FORMAT || return $?
 # Obtener sistema de archvios.
-PART="$(ogDiskToDev $1 $2)" || return $?
-# Comprobar si el sistema de archivos no está bloqueado.
-MNTDIR=$(ogMount $1 $2) 2>/dev/null
-[ -n "$MNTDIR" ] || ogRaiseError OG_ERR_PARTITION "$1, $2" || return $?
+MNTDIR=$(ogMount $1 $2) || return $?
+
 # Comprobar si existe el cliente y los directorios y ficheros destino.
 CLIENTFILE=$OGLIB/ogclient/ogAdmWinClient.exe
 [ -f $CLIENTFILE ] || ogRaiseError $OG_ERR_FOUND "$CLIENTFILE" || return $?
diff --git a/client/engine/Rsync.lib b/client/engine/Rsync.lib
index a47dec83..2a5472e0 100755
--- a/client/engine/Rsync.lib
+++ b/client/engine/Rsync.lib
@@ -134,6 +134,10 @@ if [ $# -lt 3 ]; then
     return $?
 fi
 
+# Comprobar errores.
+PART=$(ogDiskToDev "$1" "$2") || return $?
+ORIG=$(ogMount $1 $2) || return $?
+
 if [ $3 == "img" ]; then
    IMGTYPE="img"
 else
@@ -157,9 +161,7 @@ else
 fi
 
 
-ORIG=$(ogMount $1 $2)
 FSTYPE=$(ogGetFsType $1 $2)
-PART=$(ogDiskToDev "$1" "$2" 2>/dev/null)
 
 # Creamos la lista del contenido y lo situamos en la particion a copiar.
 DIREMPTY="/tmp/empty$$"
@@ -294,8 +296,10 @@ if [ $# -lt 2 ]; then
     return $?
 fi
 
-DEST=$(ogMount $1 $2)
-PART=$(ogDiskToDev "$1" "$2" 2>/dev/null)
+# Control de errores.
+PART=$(ogDiskToDev "$1" "$2") || return $?
+DEST=$(ogMount $1 $2) || return $?
+
 IMGACL="ogimg.acl"
 IMGLN="ogimg.ln"
 
@@ -371,7 +375,8 @@ if [ $# -lt 4 ]; then
     return $?
 fi
 
-ORIG=$(ogMount $1 $2)
+ORIG=$(ogMount $1 $2) || return $?
+
 DIRMOUNT="$(ogGetMountImageDir "$4" $5)"
 # Si la imagen es diferencial la lista de ficheros a transferir esta dentro de la imagen.
 if [ "$5" == "diff" ]; then
diff --git a/client/engine/System.lib b/client/engine/System.lib
index acc78406..e652d3cb 100755
--- a/client/engine/System.lib
+++ b/client/engine/System.lib
@@ -128,8 +128,11 @@ case "$CODE" in
      *)                  MSG="$MSG_ERR_GENERIC"; CODE=$OG_ERR_GENERIC ;;
 esac
 
-# Mostrar mensaje de error y salir con el código indicado.
+# Obtener lista de funciones afectadas, incluyendo el script que las llama.
 FUNCS="${FUNCNAME[@]:1}"
+FUNCS="${FUNCS/main/$(basename $0 2>/dev/null)}"
+
+# Mostrar mensaje de error y salir con el código indicado.
 ogEcho $LOGS error "${FUNCS// /<-}: $MSG" >&2
 return $CODE
 }