From: Leandro Lucarella <llucax@gmail.com>
Date: Sun, 24 Oct 2004 22:55:43 +0000 (+0000)
Subject: Se agrega funcion lock_pid para obtener el PID de un programa lockeado (y algo de... 
X-Git-Tag: svn_import~46
X-Git-Url: https://git.llucax.com/z.facultad/75.08/llamadas.git/commitdiff_plain/b2fdb3bf930fe5c733a580a813e095f5e600a2e2?hp=7d5d536d23cfcf84b10def316ced75a5df6cb3b1

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

diff --git a/inst/util.sh b/inst/util.sh
index 3f1246d..1cfb6c1 100755
--- 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