Archivo de la categoría: BATCH – DOS

BATCH SCRIPt DOS WINDOS

BATCH – Chequeo ping.

Publicada el 25/09/2013 por Gonzalo Reiser A.

@echo off  
set nom=VULCANO
set dip=20.210.75.150 
set out=C:\SNMP-monitoreo\offline\
:comienzo
for /f "tokens=1-4 delims=- " %%a in ('date/t') do (set dia=%%a& set mes=%%b& set ano=%%c)
set fecha=%dia%-%mes%-%ano%
SET hor=%TIME:~,2%
SET min=%TIME:~3,2%
SET seg=%TIME:~6,2%
set hora=%hor%:%min%
set dip0=0
set dip1=0
:consulta
if exist %out%%dip% set dip0=1
ping %dip% -w 700 2>nul | find "TTL=" >NUL || set dip1=1
if %dip0%==0 if %dip1%==0 (goto :salida)
if %dip0%==1 if %dip1%==0 (del /f /q %out%%dip%
                           goto :salida)
echo %nom% > %out%%dip%
:salida
exit

@echo off

set nom=VULCANO

set dip=20.210.75.150

set out=C:\SNMP-monitoreo\offline\

:comienzo

for /f "tokens=1-4 delims=- " %%a in ('date/t') do (set dia=%%a& set mes=%%b& set ano=%%c)

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

SET hor=%TIME:~,2%

SET min=%TIME:~3,2%

SET seg=%TIME:~6,2%

set hora=%hor%:%min%

set dip0=0

set dip1=0

:consulta

if exist %out%%dip% set dip0=1

ping %dip% -w 700 2>nul | find "TTL=" >NUL || set dip1=1

if %dip0%==0 if %dip1%==0 (goto :salida)

if %dip0%==1 if %dip1%==0 (del /f /q %out%%dip%

goto :salida)

echo %nom% > %out%%dip%

:salida

exit

Publicado en BATCH - DOS | Deja un comentario

BATCH – Sumar o restar dias.

Publicada el 25/09/2013 por Gonzalo Reiser A.

@echo off
setlocal ENABLEEXTENSIONS
call :dias 4
set /a j+=%2
call :inc %j%
echo %dd%/%mm%/%yy%
pause
endlocal
goto :EOF

:dias
for /f "tokens=1,2,3 delims=-/." %%a in ("%1") do (
   set dd=%%a&set mm=%%b&set yy=%%c)
set /a dd=100%dd%%%100,mm=100%mm%%%100
set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2
set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633
goto :EOF

:inc
set /a a=%1+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a
set /a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5
set /a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10
(if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%)
goto :EOF

@echo off

setlocal ENABLEEXTENSIONS

call :dias 4

set /a j+=%2

call :inc %j%

echo %dd%/%mm%/%yy%

pause

endlocal

goto :EOF

:dias

for /f "tokens=1,2,3 delims=-/." %%a in ("%1") do (

set dd=%%a&set mm=%%b&set yy=%%c)

set /a dd=100%dd%%%100,mm=100%mm%%%100

set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2

set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633

goto :EOF

:inc

set /a a=%1+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a

set /a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5

set /a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10

(if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%)

goto :EOF

Publicado en BATCH - DOS | Deja un comentario

BATCH – Manejo de variables.

Publicada el 25/09/2013 por Gonzalo Reiser A.

@echo off
set prueba=ESTA ES UNA PRUEBA
ECHO.
ECHO.
echo La variable completa es "%prueba%"
SET DIA=%DATE:~,2%
SET MES=%DATE:~3,2%
SET AÑO=%DATE:~6,4%
SET prueba=%prueba:~7,11%
ECHO.
ECHO PUEDO MANEJAR EL DIA, MES Y ANO EN FORMA SEPARADA
echo La fecha actual es %DIA% %MES% %AÑO%
ECHO.
ECHO.
ECHO PUEDO RESCATAR CUALQUIER POSICION DE LA VARIABLE EN EL FORMATO DESDE - HASTA
echo Rescato solo desle del 8vo caracter y 11 caracteres "%prueba%"
ECHO.
SET HOR=%TIME:~,2%
SET MIN=%TIME:~3,2%
SET SEG=%TIME:~6,2%
ECHO PUEDO MANEJAR LAS HORAS, MINUTOS Y SEGUNDOS EN FORMA SEPARADA
ECHO SON LAS %HOR% %MIN% %SEG%
ECHO.
ECHO.
pause
exit

@echo off

set prueba=ESTA ES UNA PRUEBA

ECHO.

echo La variable completa es "%prueba%"

SET DIA=%DATE:~,2%

SET MES=%DATE:~3,2%

SET AÑO=%DATE:~6,4%

SET prueba=%prueba:~7,11%

ECHO.

ECHO PUEDO MANEJAR EL DIA, MES Y ANO EN FORMA SEPARADA

echo La fecha actual es %DIA% %MES% %AÑO%

ECHO.

ECHO PUEDO RESCATAR CUALQUIER POSICION DE LA VARIABLE EN EL FORMATO DESDE - HASTA

echo Rescato solo desle del 8vo caracter y 11 caracteres "%prueba%"

ECHO.

SET HOR=%TIME:~,2%

SET MIN=%TIME:~3,2%

SET SEG=%TIME:~6,2%

ECHO PUEDO MANEJAR LAS HORAS, MINUTOS Y SEGUNDOS EN FORMA SEPARADA

ECHO SON LAS %HOR% %MIN% %SEG%

ECHO.

pause

exit

Publicado en BATCH - DOS | Deja un comentario

BATCH – Lee archivos en memoria y luego los imprime (array).

Publicada el 25/09/2013 por Gonzalo Reiser A.

@echo off
setlocal enabledelayedexpansion

:lee-unico
set c=0
for /f "tokens=*" %%a in (unico.txt) do (
            set /a c+=1
            call set unico!c!=%%a
)
set i-unico=!c!

:lee-up
set c=0
for /f "tokens=*" %%a in (up.txt) do (
            set /a c+=1
            call set up!c!=%%a
)
set i-up=!c!

:lee-down
set c=0
for /f "tokens=*" %%a in (down.txt) do (
            set /a c+=1
            call set down!c!=%%a
)
set i-down=!c!
echo todos los Archivos Leidos unico - up - down
pause
for /l %%n in (1,1,!c!) do (echo !unico%%n!)
echo "Indice Unico=%i-unico%"
pause
for /l %%n in (1,1,!c!) do (echo !up%%n!)
echo "Indice up=%i-up%"
pause
for /l %%n in (1,1,!c!) do (echo !down%%n!)
echo "Indice Down=%i-down%"
pause
endlocal
exit

@echo off

setlocal enabledelayedexpansion

:lee-unico

set c=0

for /f "tokens=*" %%a in (unico.txt) do (

set /a c+=1

call set unico!c!=%%a

)

set i-unico=!c!

:lee-up

set c=0

for /f "tokens=*" %%a in (up.txt) do (

set /a c+=1

call set up!c!=%%a

)

set i-up=!c!

:lee-down

set c=0

for /f "tokens=*" %%a in (down.txt) do (

set /a c+=1

call set down!c!=%%a

)

set i-down=!c!

echo todos los Archivos Leidos unico - up - down

pause

for /l %%n in (1,1,!c!) do (echo !unico%%n!)

echo "Indice Unico=%i-unico%"

pause

for /l %%n in (1,1,!c!) do (echo !up%%n!)

echo "Indice up=%i-up%"

pause

for /l %%n in (1,1,!c!) do (echo !down%%n!)

echo "Indice Down=%i-down%"

pause

endlocal

exit

Publicado en BATCH - DOS | Deja un comentario

BATCH – Puertos en escucha en el sistema.

Publicada el 25/09/2013 por Gonzalo Reiser A.

@echo off
setlocal enabledelayedexpansion

if exist %temp%\puertos.tmp del %temp%\puertos.tmp >nul
tasklist > %temp%\tareas.tmp

for /F "usebackq tokens=2,3,4,5,6,7 delims=: " %%g in (`netstat -nao ^| find "LISTENING"`) do ( 
set sz1=%%h: 0
for /f "tokens=1,2 delims=:" %%s in ("!sz1:~,6!") do set sz1=%%t%%s
for /F "usebackq skip=4 tokens=1,2" %%m in (%temp%\tareas.tmp) do if %%l == %%n ( 
set sz3=%%n: 0
for /f "tokens=1,2 delims=:" %%s in ("!sz3:~,6!") do set sz3=%%t%%s
set sz2=%%m: =
for /f "tokens=1,2 delims=:" %%s in ("!sz2:~,16!") do set sz2=%%s%%t
echo !sz1! !sz2!!sz3! >>%temp%\puertos.tmp
)
)

echo.
echo Puertos en escucha en el sistema
echo.
echo Puerto Programa PID
echo ------ ------------ ----

set iant=
for /F "tokens=1* delims=" %%i in ('SORT %temp%\puertos.tmp') do if %%i NEQ !iant! (echo %%i) & set iant=%%i

echo.
del %temp%\puertos.tmp >nul
del %temp%\tareas.tmp >nul

endlocal

pause
goto :EOF

@echo off

setlocal enabledelayedexpansion

if exist %temp%\puertos.tmp del %temp%\puertos.tmp >nul

tasklist > %temp%\tareas.tmp

for /F "usebackq tokens=2,3,4,5,6,7 delims=: " %%g in (`netstat -nao ^| find "LISTENING"`) do (

set sz1=%%h: 0

for /f "tokens=1,2 delims=:" %%s in ("!sz1:~,6!") do set sz1=%%t%%s

for /F "usebackq skip=4 tokens=1,2" %%m in (%temp%\tareas.tmp) do if %%l == %%n (

set sz3=%%n: 0

for /f "tokens=1,2 delims=:" %%s in ("!sz3:~,6!") do set sz3=%%t%%s

set sz2=%%m: =

for /f "tokens=1,2 delims=:" %%s in ("!sz2:~,16!") do set sz2=%%s%%t

echo !sz1! !sz2!!sz3! >>%temp%\puertos.tmp

)

echo.

echo Puertos en escucha en el sistema

echo.

echo Puerto Programa PID

echo ------ ------------ ----

set iant=

for /F "tokens=1* delims=" %%i in ('SORT %temp%\puertos.tmp') do if %%i NEQ !iant! (echo %%i) & set iant=%%i

echo.

del %temp%\puertos.tmp >nul

del %temp%\tareas.tmp >nul

endlocal

pause

goto :EOF

Publicado en BATCH - DOS | Deja un comentario

Archivo de la categoría: BATCH – DOS

BATCH – Chequeo ping.

BATCH – Sumar o restar dias.

BATCH – Manejo de variables.

BATCH – Lee archivos en memoria y luego los imprime (array).

BATCH – Puertos en escucha en el sistema.

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