fix

[z.facultad/75.08/llamadas.git] / inst / util.sh

diff --git a/inst/util.sh b/inst/util.sh
index d4a5dcfaa1dd99b95701544c78917cb8c94a7a88..1cfb6c1e2acaa6ee6a43aa3ca0feb4df8867f4e5 100755 (executable)
--- a/inst/util.sh
+++ b/inst/util.sh
@@ -1,4 +1,4 @@
-#/bin/sh
+#/bin/bash

 
 ## Los scrips que incluyan deben definir BASE_DIR antes de incluirme!
 #BASE_DIR="$PWD"
 
 ## Los scrips que incluyan deben definir BASE_DIR antes de incluirme!
 #BASE_DIR="$PWD"


@@ -31,12 +31,25 @@ leer () {
 #  $1 = Leyeda a mostrar de preguntar
 #  $2 = string con las opciones validas
 #  $3 = Variable donde guardar el valor ingresado
 #  $1 = Leyeda a mostrar de preguntar
 #  $2 = string con las opciones validas
 #  $3 = Variable donde guardar el valor ingresado

+#  $4 = Valor por defecto si se apreta ENTER

 #
 preguntar () {
 #
 preguntar () {

-       PREGUNTA=$1
-       OPCIONES=$2
-       while [ true ] ; do
+       PREGUNTA="$1"
+       OPCIONES="$2"
+       DEFAULT="$4"
+       while true; do

                read -p "$PREGUNTA [$OPCIONES]: " RTA
                read -p "$PREGUNTA [$OPCIONES]: " RTA

+
+               # Si me pasaron un default y la respuesta es vacía
+               if [ -n "$DEFAULT" -a -z "$RTA" ]; then
+                       # devuelvo default
+                       RTA="$DEFAULT"
+                       return 0
+               fi
+
+               # Escapeo el caracter '-' por '\-'
+               RTA=$(echo $RTA | sed "s/\-/\\\-/")
+

                IS_OK=`echo "$OPCIONES" | grep "$RTA"`
                if [ ! -z "$IS_OK" ] && [ ! -z "$RTA" ] ; then
                        eval "$3=$RTA"
                IS_OK=`echo "$OPCIONES" | grep "$RTA"`
                if [ ! -z "$IS_OK" ] && [ ! -z "$RTA" ] ; then
                        eval "$3=$RTA"


@@ -56,22 +69,26 @@ validar_solo_numeros () {
 }
 
 # Crea un archivo de lock para un script
 }
 
 # 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 () {
 lock () {

-       if is_lock "$1" ; then
-               # Ya esta loqueado, no lo vuelvo a crear
-               echo "No"
-               return
-       fi
-       echo "$$" > "$LOCK_DIR/$1.pid"
+       # si ya esta loqueado, no lo vuelvo a crear
+       is_lock "$1" && return 1
+       # Si no puedo escribir en el dir de lock, da error
+       [ -w "$LOCK_DIR" ] || return 2
+       echo $$ > "$LOCK_DIR/$1.pid"
+       return 0

 }
 
 # Desbloquea el script
 }
 
 # Desbloquea el script

+# Uso: unlock programa

 unlock () {
        rm -rf "$LOCK_DIR/$1.pid"
 }
                        
 
 # Consulta si un script esta lockeado
 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!
 is_lock () {
        if [ -e "$LOCK_DIR/$1.pid" ] ; then
                # Lock file encontrado!


@@ -81,6 +98,13 @@ is_lock () {
        return 1
 }
 
        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 
 # Verifica que un valor este entre otros 2 .... $1 pertecezca  a [$2,$3]
 # $1 Numero a validar
 # $2 Cota inferior 


@@ -93,21 +117,19 @@ validar_rango(){
                return 1
        fi
 }
                return 1
        fi
 }

-               
-#leer "Ingrese un directorio" "/tmp" ALGO
-
-#echo "Ingresaste : $ALGO"

 
 

-# Test de preguntanto
-#preguntar "Sos hombre (s/n)" "sn" OPT
-
-#if [ "$OPT" == "s" ] ; then
-#      echo "Sos un mentiroso!!!"
-#else
-#      echo "Jaja ... Trola!"
-#fi
+# Muestra mensaje y sale con código de error
+# Uso: die mensaje [código de error = 1]
+die()
+{
+       echo "$1" >&2
+       exit ${2:-1}
+}

 
 

-# Test de preguntanto
-#preguntar "Que preferis (drogas/cafe/vino/coca cola)" "drogas cafe vino \"coca cola\"" OPT
+# Imprime mensaje por salida de error
+# Uso: perr mensajes
+perr()
+{
+       echo $@ >&2
+}

 
 

-#echo "Vos decidis : $OPT"