summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xclient/engine/System.lib47
1 files changed, 45 insertions, 2 deletions
diff --git a/client/engine/System.lib b/client/engine/System.lib
index 203a6a64..31c15294 100755
--- a/client/engine/System.lib
+++ b/client/engine/System.lib
@@ -49,7 +49,7 @@ fi
#@brief Devuelve el mensaje y el código de error correspondiente.
#@param int_errcode código de error.
#@param str_errmessage mensajes complementarios de error.
-#@return Mensaje de error.
+#@return str_message - Mensaje de error.
#@warning No definidas
#@note Mensajes internacionales del fichero de idiomas.
#@version 0.9 - Primera versión para OpenGnSys.
@@ -84,6 +84,50 @@ return $CODE
#/**
+# ogGetCaller
+#@brief Devuelve nombre del programa o script ejecutor (padre).
+#@param No.
+#@return str_name - Nombre del programa ejecutor.
+#@version 0.10 - Primera versión para OpenGnSys.
+#@author Ramon Gomez, ETSII Universidad de Sevilla
+#@date 2011-01-17
+#*/
+function ogGetCaller () {
+
+# Obtener el nombre del programa o del script que ha llamado al proceso actual.
+basename $(ps | grep $PPID | \
+ awk -v P=$PPID '{if ($1==P) {
+ if ($5~/bash/ && $6!="") print $6
+ else print $5; } }')
+}
+
+
+#/**
+# ogIsRepoLocked
+#@brief Comprueba si el repositorio está siendo usado (tiene ficheros abiertos).
+#@param No.
+#@return Código de salida: 0 - sin bloquear (libre), 1 - bloqueado.
+#@version 0.10 - Primera versión para OpenGnSys.
+#@author Ramon Gomez, ETSII Universidad de Sevilla
+#@date 2011-01-17
+#*/
+function ogIsRepoLocked () {
+
+# Variables locales.
+local f FILES
+
+# No hacer nada, si no está definido el punto de montaje del repositorio.
+[ -z "$OGIMG" ] && return
+
+# Comprobar si alguno de los ficheros abiertos por los procesos activos está en el
+# punto de montaje del repositorio de imágenes.
+FILES=$(for f in /proc/[0-9]*/fd/*; do readlink -f "$f"; done | grep "^$OGIMG")
+[ -n "$FILES" ]
+}
+
+
+
+#/**
# ogHelp ["str_function" ["str_format" ["str_example" ... ]]]
#@brief Muestra mensaje de ayuda para una función determinda.
#@param str_function Nombre de la función.
@@ -114,4 +158,3 @@ while [ $# -gt 0 ]; do
shift
done
}
-