Se agrega funcion lock_pid para obtener el PID de un programa lockeado (y algo de...

diff --git a/inst/util.sh b/inst/util.sh
index 3f1246d6eeb94733822ac6a4086725a4cd76bbac..1cfb6c1e2acaa6ee6a43aa3ca0feb4df8867f4e5 100755 (executable)
--- a/inst/util.sh
+++ b/inst/util.sh
@@ -70,6 +70,7 @@ validar_solo_numeros () {
 
 # Crea un archivo de lock para un script
 # Devuelve: 0 si ok, 1 si ya esta lockeado, 2 si no pudo crear lock.
+# Uso: lock programa
 lock () {
        # si ya esta loqueado, no lo vuelvo a crear
        is_lock "$1" && return 1
@@ -80,12 +81,14 @@ lock () {
 }
 
 # Desbloquea el script
+# Uso: unlock programa
 unlock () {
        rm -rf "$LOCK_DIR/$1.pid"
 }
                        
 
 # Consulta si un script esta lockeado
+# Uso: is_lock programa
 is_lock () {
        if [ -e "$LOCK_DIR/$1.pid" ] ; then
                # Lock file encontrado!
@@ -95,6 +98,13 @@ is_lock () {
        return 1
 }
 
+# Obtiene el pid de un programa lockeado
+# Uso: lock_pid programa
+lock_pid()
+{
+       is_lock "$1" && cat "$LOCK_DIR/$1.pid"
+}
+
 # Verifica que un valor este entre otros 2 .... $1 pertecezca  a [$2,$3]
 # $1 Numero a validar
 # $2 Cota inferior