Archivo del Autor: Gonzalo Reiser A.

BATCH – Scripts Windows para chequear disponibilidad de red internet.-

Publicada el 03/02/2015 por Gonzalo Reiser A.

Este SCRIPT realizado en MS-DOS para ejecutarlo en WINDOWS, me sirve para poder reclamar a mi proveedor de internet, las veces en que no tengo red durante el día (son bastantes en que el router se resetea solo).

@echo off 

:comienzo
set log=conect.log
set url=www.sii.cl
call :fechor
echo %fecha% %hora% Comienza chequeo de red operativa. Ping a www.sii.cl cada 20 segundos >> %log%

:consulta
call :pinger
ping -n 20 127.0.0.1 > nul
if %resp%==0 (goto :consulta)
call :fechor
set redoff=%fecha% %hora%

:sinred
call :pinger
if %resp%==1 (goto :sinred)
call :fechor
echo %redoff% hasta %fecha% %hora% sin acceso a red. >> %log%
goto :consulta

:fechor
SET dia=%DATE:~,2%
SET mes=%DATE:~3,2%
SET ano=%DATE:~6,4%
SET hor=%TIME:~,2%
SET min=%TIME:~3,2%
SET seg=%TIME:~6,2%
set fecha=%dia%-%mes%-%ano%
set hora=%hor%:%min%:%seg%
goto:EOF

:pinger
ping %url% -w 700 2>nul | find "TTL=" >NUL && set resp=0 || set resp=1
goto:EOF

@echo off

:comienzo

set log=conect.log

set url=www.sii.cl

call :fechor

echo %fecha% %hora% Comienza chequeo de red operativa. Ping a www.sii.cl cada 20 segundos >> %log%

:consulta

call :pinger

ping -n 20 127.0.0.1 > nul

if %resp%==0 (goto :consulta)

call :fechor

set redoff=%fecha% %hora%

:sinred

call :pinger

if %resp%==1 (goto :sinred)

call :fechor

echo %redoff% hasta %fecha% %hora% sin acceso a red. >> %log%

goto :consulta

:fechor

SET dia=%DATE:~,2%

SET mes=%DATE:~3,2%

SET ano=%DATE:~6,4%

SET hor=%TIME:~,2%

SET min=%TIME:~3,2%

SET seg=%TIME:~6,2%

set fecha=%dia%-%mes%-%ano%

set hora=%hor%:%min%:%seg%

goto:EOF

:pinger

ping %url% -w 700 2>nul | find "TTL=" >NUL && set resp=0 || set resp=1

goto:EOF

El … Sigue leyendo →

Publicado en BATCH - DOS | Comentarios desactivados

UNIX – Script cuenta las lineas de un archivo.-

Publicada el 29/01/2015 por Gonzalo Reiser A.

#!/bin/bash 
count=0 
while read line 
do 
    count=$(($count+1)) 
done < $1 
echo "El fichero $1 tiene $count líneas"

#!/bin/bash

count=0

while read line

count=$(($count+1))

done < $1

echo "El fichero $1 tiene $count líneas"

Publicado en Unix - Linux | Comentarios desactivados

Unix – Script con retorno valor de función.-

Publicada el 29/01/2015 por Gonzalo Reiser A.

Después de llamar a una función, $? tiene el código se salida del último comando ejecutado : podemos ponerlo de forma explícita usando return :

#!/bin/bash 
funcion2() { 
    if [ -f /bin/ls -a -f /bin/ln ]; then 
        return 0 
    else 
        return 1 
    fi 
} 
# Programa principal 
if funcion2; then 
    echo "Los dos ficheros existen" 
else 
    echo "Falta uno de los ficheros - adiós" 
    exit 1 
fi

#!/bin/bash

funcion2() {

if [ -f /bin/ls -a -f /bin/ln ]; then

return 0

else

return 1

}

# Programa principal

if funcion2; then

echo "Los dos ficheros existen"

else

echo "Falta uno de los ficheros - adiós"

exit 1

Publicado en Unix - Linux | Comentarios desactivados

UNIX – Scripts muestra solo lineas de menos de 80 caracteres.-

Publicada el 29/01/2015 por Gonzalo Reiser A.

# Muestra un fichero pero no las líneas de más 
# de 80 caracteres 
while read buf 
do 
    cuenta=`echo $buf | wc -c` 
    if [ $cuenta -gt 80 ] 
    then 
        continue 
    fi 
    echo $buf 
done < $1

# Muestra un fichero pero no las líneas de más

# de 80 caracteres

while read buf

cuenta=`echo $buf | wc -c`

if [ $cuenta -gt 80 ]

then

continue

echo $buf

done < $1

Publicado en Unix - Linux | Comentarios desactivados

UNIX – Script para recorrer los archivos .bak de un directorio.-

Publicada el 29/01/2015 por Gonzalo Reiser A.

dir="/var/tmp" 
for file in $dir/*.bak 
do 
    rm -f $file 
done

dir="/var/tmp"

for file in $dir/*.bak

rm -f $file

done

Publicado en Unix - Linux | Comentarios desactivados

Archivo del Autor: Gonzalo Reiser A.

BATCH – Scripts Windows para chequear disponibilidad de red internet.-

UNIX – Script cuenta las lineas de un archivo.-

Unix – Script con retorno valor de función.-

UNIX – Scripts muestra solo lineas de menos de 80 caracteres.-

UNIX – Script para recorrer los archivos .bak de un directorio.-

Si te gusta este contenido, se agradece tu apoyo en su mantenimiento. Cualquier cantidad por pequeña que sea será bien recibida.

Comentarios recientes

Archivos