CONF="/etc/zoneeditupdate.conf"
test $# -eq 1 && CONF=$1

# Chequea que el archivo de configuracion exista
test -e $CONF || exit 1
. $CONF

# Inicializa
IP='123456789'
LISTO=NO
PID=999999
INIT=0
MD5='123456789'

# Toma la ultima IP y las variables del archivo STATE, si existe
if [ -e $STATE ]; then
  . $STATE
  IP=$IP_ADDR
  # Si LISTO es NO el proceso se está ejecutando, se espera TTL segundos
  # y si aún no termino se mata el proceso
  if [ +$LISTO = "+NO" ]; then
    let AUX=${INIT}+${TTL}
    if [ `date +%s` -gt $AUX ]; then
      # Hay que matar el proceso
      echo `date "+%d %b %r"`"$$ ATENCION: Segun el archivo $STATE el proceso $0 (PID ${PID}) se encuentra aún activo. Lleva demasiado tiempo en ejecucion, terminandolo" >> $LOG
      if [ $PID -eq "`pgrep -o $0`" ]; then
        kill -9 $PID
      else
        echo `date "+%d %b %r"`"$$ ATENCION: Imposible matar el proceso $0 (PID ${PID}): El proceso no existe o su nombre no es $0 " >> $LOG
      fi
    else
      echo `date "+%d %b %r"`"$$ El proceso ya se está ejecutando, saliendo" >> $LOG
      exit 0
    fi
  fi
fi

# Obtiene la IP Actual desde dyndns
IP_ADDR=`lynx -dump checkip.dyndns.com | grep "Current IP Address:" | awk '{ print $4}' | grep  -E '([0-9]{1,3}\.){3}[0-9]{1,3}'`

# Obtiene el hash md5 del archivo de configuracion
MD5_NUEVO=`md5sum $CONF | awk '{ print $1}'`

# Si la IP publica no se pudo determinar se loguea y se sale
test -z $IP_ADDR && echo `date "+%d %b %r"`"$$ No se pudo determinar la dirección IP actual" >> $LOG && exit 0

# Sobreescribe el archivo STATE
echo 'PID='$$ > $STATE
echo 'INIT='`date +%s` >> $STATE
echo 'IP_ADDR='${IP_ADDR} >> $STATE
echo 'MD5='${MD5_NUEVO} >> $STATE

# Si el archivo de configuracion fue modificado se cambia el estado LISTO a MD5
test +$MD5 != +$MD5_NUEVO && LISTO=MD5

# Chequea si la respuesta de dyndns ha cambiado, si no es asi sale
if [ "$IP_ADDR" = "$IP" -a +$LISTO = '+SI' -a +$MD5 = +$MD5_NUEVO ]; then
  echo `date "+%d %b %r"`"$$ La IP pública es: ${IP_ADDR}, no es necesario actualizar registros" >> $LOG
  echo 'LISTO=SI' >> $STATE
  exit 0
fi

if [ +$LISTO = '+SI' ]; then
  echo `date "+%d %b %r"`"$$ La IP pública es: ${IP_ADDR}, es necesario actualizar los registros" >> $LOG
fi

if [ +$LISTO = '+FALLO' ]; then
  echo `date "+%d %b %r"`"$$ La IP pública es: ${IP_ADDR}, la última actualización no fue exitosa, forzando la actualización de registros" >> $LOG
fi

if [ +$LISTO = '+MD5' ]; then
  echo `date "+%d %b %r"`"$$ La IP pública es: ${IP_ADDR}. \"$CONF\" ha cambiado, forzando la actualización de registros" >> $LOG
fi

ERROR=0
# Actualizaciones
for HOST in ${HOSTS}; do
  OUT=`lynx -source -auth=${USER}:${PASSWORD} ${WEB}?host=$HOST`
  AUX=$(echo $OUT | awk '{print $2}')
  case "$AUX" in
  'CODE="200"')
    echo `date "+%d %b %r"`"$$ Actualizando ${HOST}: registro actualizado correctamente" >> $LOG
  ;;
  'CODE="201"')
         echo `date "+%d %b %r"`"$$ Actualizando ${HOST}: no fue necesario actualizar el registro" >> $LOG
  ;;
  *)
    ERROR=1
    echo `date "+%d %b %r"`"$$ Actualizando ${HOST}: Falló la actualización del registro" >> $LOG
  ;;
  esac
done