elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Guía actualizada para evitar que un ransomware ataque tu empresa


+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting
| | |-+  Batch para guardar un registro de cada ping realizado con la hora en una linea
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] 2 Ir Abajo Respuesta Imprimir
Autor Tema: Batch para guardar un registro de cada ping realizado con la hora en una linea  (Leído 4,984 veces)
Nucleorion

Desconectado Desconectado

Mensajes: 71


Ver Perfil
Batch para guardar un registro de cada ping realizado con la hora en una linea
« en: 21 Enero 2019, 10:46 am »

He encontrado una manera de guardar en cada linea la hora del ping y el resultado.

Código
  1. @echo off
  2.  
  3. for /F "delims=" %%i in ('ping 127.0.0.1 -t') do call :format "%%i"
  4. goto :done
  5.  
  6. :format
  7. echo %date% %time% %1 1>> output.txt
  8.  
  9. :done

De esta forma se guarda todo en una linea en un archivo de texto, pero hay que depender de que el usuario le de a Ctrl+C y a S.
Tengo otro codigo en el que se va guardando en tiempo real, asi aunque se apague el equipo o se cierre directamente la ventana el archivo tiene todo el registro.

Ademas hago que cada dia cree un archivo nuevo con la fecha y hora, ya que hay que dejarlo todo el dia corriendo.

Código
  1. rem @echo off
  2.  
  3. set Any=%Date:~-4%
  4. set Mes=%Date:~3,2%
  5. set Dia=%Date:~0,2%
  6.  
  7. set Hor=%Time:~0,2%
  8. set Min=%Time:~3,2%
  9. set Seg=%Time:~6,2%
  10.  
  11. REM Creamos el archivo cada vez que se ejecuta el programa con la fecha y hora en el nombre y la primera linea
  12. set nombre=%Any%-%Mes%-%Dia%__%Hor%-%Min%-%Seg%
  13. echo %nombre% >%nombre%.txt
  14.  
  15. REM Hacemos ping y lo añadimos poniendo la fecha delante linea a linea
  16.  
  17. :LOOPSTART
  18.  
  19. set Any=%Date:~8%
  20. set Mes=%Date:~3,2%
  21. set Dia=%Date:~0,2%
  22.  
  23. set Hor=%Time:~0,2%
  24. set Min=%Time:~3,2%
  25. set Seg=%Time:~6,2%
  26.  
  27. rem set Respuesta=ping 192.168.1.4
  28. echo %Any%-%Mes%-%Dia%__%Hor%-%Min%-%Seg% >>%nombre%.txt
  29. ping 8.8.8.8 -n 1 >>%nombre%.txt
  30.  
  31. REM tiempo que queremos que pase entre ping y ping en segundos
  32. timeout 2 > NUL
  33.  
  34. GOTO LOOPSTART
  35.  

Lo que no consigo es que me meta cada ping con su hora en una linea. He mirado la documentacion del for, pero lo empleado en el primer ejemplo, que si que guarda cada ping en una linea, tiene bastantes cosas mas que no entiendo. ¿Hay forma de combinar los dos ejemplos de algun modo para meta cada linea en tiempo real?



« Última modificación: 29 Abril 2019, 09:53 am por Nucleorion » En línea

**Aincrad**


Desconectado Desconectado

Mensajes: 573



Ver Perfil WWW
Re: Batch para guardar un registro de cada ping realizado con la hora en una linea
« Respuesta #1 en: 21 Enero 2019, 22:18 pm »

Código
  1. @echo off
  2. color a
  3. goto kill
  4. :format
  5.  
  6. Rem by **Aincrad**
  7. seto=%date%
  8. Set hora=%time:~0,8%
  9.  
  10. Set nombre= [%año%]-[%hora%]
  11. set Ip=127.0.0.1
  12.  
  13. if not exist log.txt goto Createlog >nul
  14.  
  15.  echo Haciendo Ping a %Ip% ... (Revisar el Archivo LOG).
  16. (
  17.    echo/
  18.     echo %nombre%
  19.    echo/
  20.    echo/
  21.     ping %Ip% -n 1
  22.    echo/
  23.   echo/
  24.  echo/
  25. echo ---------------------------------------------------------------------------------------------- )>>log.txt
  26. goto format
  27.  
  28.  
  29. :Createlog
  30. echo Foro el hacker.NET >log.txt
  31. goto format
  32.  
  33. :kill
  34. tasklist | find /i "PING.exe" && (
  35. TASKKILL /IM "PING.exe" /F
  36. goto format
  37. ) || (
  38. goto format
  39. )

Aveces no puedes eliminar el log.txt por que queda abierto el Proceso Ping.exe Solo abre el administrador de tareas y cierralo . o usa >

Código
  1. TASKKILL /IM "PING.exe" /F


« Última modificación: 21 Enero 2019, 22:36 pm por **Aincrad** » En línea



Nucleorion

Desconectado Desconectado

Mensajes: 71


Ver Perfil
Re: Batch para guardar un registro de cada ping realizado con la hora en una linea
« Respuesta #2 en: 22 Enero 2019, 14:07 pm »

Gracias. Aunque eso no guarda en una linea la información veo cosas interesantes.

Si alguien entiende como lo hace el del primer ejemplo igual se podia implementar

El resultado que consigo es:
Citar
Foro el hacker.NET

 [22/01/2019]-[12:41:43]



Haciendo ping a 127.0.0.1 con 32 bytes de datos:
Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128

Estad¡sticas de ping para 127.0.0.1:
    Paquetes: enviados = 1, recibidos = 1, perdidos = 0
    (0% perdidos),
Tiempos aproximados de ida y vuelta en milisegundos:
    M¡nimo = 0ms, M ximo = 0ms, Media = 0ms



----------------------------------------------------------------------------------------------

 [22/01/2019]-[12:41:43]



Haciendo ping a 127.0.0.1 con 32 bytes de datos:
Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128

Estad¡sticas de ping para 127.0.0.1:
    Paquetes: enviados = 1, recibidos = 1, perdidos = 0
    (0% perdidos),
Tiempos aproximados de ida y vuelta en milisegundos:
    M¡nimo = 0ms, M ximo = 0ms, Media = 0ms

Y lo deseado es:
Citar
26/10/2009 13:53:54.31 "Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128"
26/10/2009 13:53:54.31 "Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128"
26/10/2009 13:53:54.31 "Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128"
26/10/2009 13:53:54.31 "Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128"
26/10/2009 13:53:54.32 "Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128"
26/10/2009 13:53:54.32 "Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128"
26/10/2009 13:53:54.32 "Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128"
26/10/2009 13:53:54.34 "Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128"
26/10/2009 13:53:54.34 "Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128"
26/10/2009 13:53:54.34 "Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128"
26/10/2009 13:53:54.34 "Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128"
26/10/2009 13:53:54.35 "Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128"
26/10/2009 13:53:54.35 "Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128"
26/10/2009 13:53:54.35 "Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128"

Aunque ahora estoy viendo que tampoco me fucniona el codigo del primer ejemplo. No crea ningun archivo  :o

Bueno, pues ese es el resultado que me gustaria conseguir.

Quisiera ademas evitar tener que estar generando un archivo a cada ping para tomar de ahi el resultado.
En línea

EdePC
Moderador Global
***
Desconectado Desconectado

Mensajes: 1.792



Ver Perfil
Re: Batch para guardar un registro de cada ping realizado con la hora en una linea
« Respuesta #3 en: 22 Enero 2019, 16:10 pm »

Saludos,

Código
  1. @ECHO Off
  2. (
  3.  FOR /L %%i in (1,1,5) do (
  4.    <nul (set /p tm=%date% %time:~,-3% )
  5.    PING -n 1 127.0.0.1 | FIND "TTL"
  6.  )
  7. ) >> pg.txt

- Devuelve un fichero pg.txt con:

Código
  1. 22/01/2019 10:09:17 Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128
  2. 22/01/2019 10:09:17 Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128
  3. 22/01/2019 10:09:17 Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128
  4. 22/01/2019 10:09:17 Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128
  5. 22/01/2019 10:09:17 Respuesta desde 127.0.0.1: bytes=32 tiempo<1m TTL=128
  6.  
En línea

Nucleorion

Desconectado Desconectado

Mensajes: 71


Ver Perfil
Re: Batch para guardar un registro de cada ping realizado con la hora en una linea
« Respuesta #4 en: 24 Enero 2019, 13:34 pm »

Genial!!

Muchisimas gracias.

Va perfecto. Ahi lo mando tal como ha quedado implementado al codigo para hacer un archivo por dia, que se cargue al iniciar windows y que quede guardado al cerrar windows.

Código
  1. @echo off
  2. rem set datetimef=%date:~-4%_%date:~3,2%_%date:~0,2%__%time:~0,2%_%time:~3,2%_%time:~6,2%
  3. set Any=%Date:~-4%
  4. set Mes=%Date:~3,2%
  5. set Dia=%Date:~0,2%
  6.  
  7. set Hor=%Time:~0,2%
  8. set Min=%Time:~3,2%
  9. set Seg=%Time:~6,2%
  10.  
  11. REM Creamos el archivo cada vez que se ejecuta el programa con la fecha y hora en el nombre y la primera linea
  12. set nombre=%Any%-%Mes%-%Dia%__%Hor%-%Min%-%Seg%
  13. echo %nombre% >%nombre%.txt
  14.  
  15. REM Hacemos ping y lo añadimos poniendo la fecha delante linea a linea
  16.  
  17. :LOOPSTART
  18.  
  19.    (
  20.      FOR /L %%i in (1,1,1) do (
  21.        <nul (set /p tm=%date% %time:~,-3% )
  22.        PING -n 1 8.8.8.8 | FIND "TTL"
  23.        PING -n 1 8.8.8.8 | FIND "error"
  24.      )
  25.    ) >> %nombre%.txt
  26.  
  27. rem set Respuesta=ping 192.168.1.4
  28.  
  29. REM tiempo que queremos que pase entre ping y ping en segundos
  30. timeout 1 > NUL
  31.  
  32. GOTO LOOPSTART
  33.  



He añadido un segundo ping para que cuando haya un error lo indique y haya salto de linea. Claro que si falla de manera muy puntual el primero podria no anotar nada y al hacer el segundo obtener respuesta y no anotar nada tampoco.

El problema cuando no anota nada es que no cambia de linea dando este resultado que aunque muy util es poco elegante

Código
  1. 24/01/2019 13:11:44 Respuesta desde 192.168.1.4: bytes=32 tiempo<1m TTL=128
  2. 24/01/2019 13:11:46 Respuesta desde 192.168.1.4: bytes=32 tiempo<1m TTL=128
  3. 24/01/2019 13:11:48 24/01/2019 13:11:50 24/01/2019 13:11:52 24/01/2019 13:11:54 24/01/2019 13:11:56 24/01/2019 13:11:58 24/01/2019 13:12:00 Respuesta desde 192.168.1.4: bytes=32 tiempo<1m TTL=128
  4. 24/01/2019 13:12:02 Respuesta desde 192.168.1.4: bytes=32 tiempo<1m TTL=128
« Última modificación: 25 Enero 2019, 10:28 am por Nucleorion » En línea

Nucleorion

Desconectado Desconectado

Mensajes: 71


Ver Perfil
Re: Batch para guardar un registro de cada ping realizado con la hora en una linea
« Respuesta #5 en: 24 Enero 2019, 13:42 pm »

Efectivamente probando a cortar la conexion a la primera he obtenido el resultado predecible. Ha habido una anotacion de solo la hora y sin salto de linea:

Devuelve:
Código
  1. 2019-01-24__13-36-14
  2. 24/01/2019 13:36:17 Respuesta desde 192.168.1.4: bytes=32 tiempo<1m TTL=128
  3. 24/01/2019 13:36:18 Respuesta desde 192.168.1.4: bytes=32 tiempo<1m TTL=128
  4. 24/01/2019 13:36:19 Respuesta desde 192.168.1.4: bytes=32 tiempo<1m TTL=128
  5. 24/01/2019 13:36:20 Respuesta desde 192.168.1.4: bytes=32 tiempo<1m TTL=128
  6. 24/01/2019 13:36:21 24/01/2019 13:36:22 PING: error en la transmisi¢n. Error general.
  7. 24/01/2019 13:36:23 PING: error en la transmisi¢n. Error general.
  8. 24/01/2019 13:36:24 PING: error en la transmisi¢n. Error general.
  9. 24/01/2019 13:36:25 PING: error en la transmisi¢n. Error general.
  10. 24/01/2019 13:36:32 PING: error en la transmisi¢n. Error general.
  11. 24/01/2019 13:36:33 PING: error en la transmisi¢n. Error general.
  12. 24/01/2019 13:36:34 PING: error en la transmisi¢n. Error general.
  13. 24/01/2019 13:36:35 Respuesta desde 192.168.1.4: bytes=32 tiempo<1m TTL=128
  14. 24/01/2019 13:36:36 Respuesta desde 192.168.1.4: bytes=32 tiempo<1m TTL=128
  15. 24/01/2019 13:36:37 Respuesta desde 192.168.1.4: bytes=32 tiempo<1m TTL=128
  16. 24/01/2019 13:36:38 Respuesta desde 192.168.1.4: bytes=32 tiempo<1m TTL=128

A ver si encuentro la manera de hacerlo con un solo ping y que guarde en cada linea el resultado, aun cuando haya error.
En línea

EdePC
Moderador Global
***
Desconectado Desconectado

Mensajes: 1.792



Ver Perfil
Re: Batch para guardar un registro de cada ping realizado con la hora en una linea
« Respuesta #6 en: 25 Enero 2019, 03:49 am »

- Revisas el ERRORLEVEL, si este es 1 es que a habido un error, si es 0 es que todo ha ido bien:

Código
  1. @ECHO Off
  2. (
  3.  FOR /L %%i in (1,1,5) do (
  4.    <nul (set /p tm=%date% %time:~,-3% )
  5.    PING -n 1 8.8.8.8 | FIND "TTL"
  6.    IF ERRORLEVEL 1 ECHO Error, destino inaccesible
  7.  )
  8. ) >> pg.txt
En línea

Nucleorion

Desconectado Desconectado

Mensajes: 71


Ver Perfil
Re: Batch para guardar un registro de cada ping realizado con la hora en una linea
« Respuesta #7 en: 25 Enero 2019, 10:27 am »

Funciona a la perfeccion. Que monton de cosas tiene el Batch que no se. He visto que hay buenos tutoriales aquí. Cuando pueda les dare un repaso.

Eres un crack! Muchas gracias!
 ;-)

Así queda el programa completo


Código
  1. @echo off
  2. REM Curiosamente si meto el formato de fecha y hora como en la siguiente linea, luego no se repite el loop
  3. rem set datetimef=%date:~-4%_%date:~3,2%_%date:~0,2%__%time:~0,2%_%time:~3,2%_%time:~6,2%
  4.  
  5. REM damos formato a la fecha y la hora y lo guardamos en cada variable
  6. set Any=%Date:~-4%
  7. set Mes=%Date:~3,2%
  8. set Dia=%Date:~0,2%
  9.  
  10. set Hor=%Time:~0,2%
  11. set Min=%Time:~3,2%
  12. set Seg=%Time:~6,2%
  13.  
  14. REM Creamos el archivo cada vez que se ejecuta el programa con la fecha y hora en el nombre y la primera linea
  15. set nombre=%Any%-%Mes%-%Dia%__%Hor%-%Min%-%Seg%
  16. echo %nombre% >%nombre%.txt
  17.  
  18. REM Hacemos ping y lo añadimos poniendo la fecha delante linea a linea
  19.  
  20. :LOOPSTART
  21.  
  22.    (
  23.      FOR /L %%i in (1,1,1) do (
  24.        <nul (set /p tm=%date% %time:~,-3% )
  25.        PING -n 1 8.8.8.8 | FIND "TTL"
  26.        IF ERRORLEVEL 1 ECHO Error, Tiempo de espera agotado. No se ha podido conectar con la IP.
  27.      )
  28.    ) >> %nombre%.txt
  29.  
  30. REM tiempo que queremos que pase entre ping y ping en segundos
  31. timeout 1 > NUL
  32.  
  33. GOTO LOOPSTART
  34.  

Y así el archivo que crea


Código
  1. 25/01/2019 10:50:26 Respuesta desde 8.8.8.8: bytes=32 tiempo=16ms TTL=119
  2. 25/01/2019 10:50:28 Respuesta desde 8.8.8.8: bytes=32 tiempo=14ms TTL=119
  3. 25/01/2019 10:50:30 Respuesta desde 8.8.8.8: bytes=32 tiempo=14ms TTL=119
  4. 25/01/2019 10:50:32 Error, Tiempo de espera agotado. No se ha podido conectar con la IP.
  5. 25/01/2019 10:50:41 Error, Tiempo de espera agotado. No se ha podido conectar con la IP.
  6. 25/01/2019 10:50:43 Error, Tiempo de espera agotado. No se ha podido conectar con la IP.
  7. 25/01/2019 10:50:45 Respuesta desde 8.8.8.8: bytes=32 tiempo=14ms TTL=119
  8. 25/01/2019 10:50:47 Respuesta desde 8.8.8.8: bytes=32 tiempo=14ms TTL=119
  9. 25/01/2019 10:50:49 Respuesta desde 8.8.8.8: bytes=32 tiempo=17ms TTL=119
  10. 25/01/2019 10:50:51 Respuesta desde 8.8.8.8: bytes=32 tiempo=14ms TTL=119

« Última modificación: 25 Enero 2019, 10:57 am por Nucleorion » En línea

Nucleorion

Desconectado Desconectado

Mensajes: 71


Ver Perfil
Re: Batch para guardar un registro de cada ping realizado con la hora en una linea
« Respuesta #8 en: 22 Marzo 2019, 10:15 am »

He tenido problemas al poner 6 variables asisgandolas a otra variable. Se cortaba la asignación y me decia que no se habia podido crear.

Os dejo como ha quedado finalmente con los comentarios del modo anterior para que se entienda mejor.

Código
  1. @echo off
  2.  
  3. REM Si queremos retrasar el incio del test habilitamos la linea del timeout
  4. REM timeout 240 > NUL
  5.  
  6. echo El test de conexion a 192.168.1.10 cada 4 segundos ha comenzado
  7.  
  8.  
  9. REM Creamos el archivo cada vez que se ejecuta el programa con la fecha y hora en el nombre y la primera linea
  10.  
  11. REM Al poner muchas variables seguidas asignadas a otra variable parece que daba fallo
  12. REM set Any=%Date:~-4%
  13. REM set Mes=%Date:~3,2%
  14. REM set Dia=%Date:~0,2%
  15.  
  16. REM set Hor=%Time:~0,2%
  17. REM set Min=%Time:~3,2%
  18. REM set Seg=%Time:~6,2%
  19. REM set nombre=%Any%-%Mes%-%Dia%__%Hor%-%Min%-%Seg%
  20.  
  21. REM Preparamos el nombre del archivo con solo 3 variables para que no de fallo
  22. set fecha=%Date:~-4%-%Date:~3,2%-%Date:~0,2%
  23. set Separador=__
  24. set hora=%Time:~0,2%-%Time:~3,2%-%Time:~6,2%
  25.  
  26. set nombre=%fecha%%Separador%%hora%
  27. echo %nombre% > %nombre%.txt
  28.  
  29. REM Hacemos ping y lo anadimos poniendo la fecha delante linea a linea
  30. :LOOPSTART
  31.  
  32.    (
  33.      FOR /L %%i in (1,1,1) do (
  34.        <nul (set /p tm=%date% %time:~,-3% )
  35.        PING -n 1 192.168.1.10 | FIND "TTL"
  36.        IF ERRORLEVEL 1 ECHO Error, Tiempo de espera agotado. No se ha podido conectar con la IP.
  37.      )
  38.    ) >> %nombre%.txt
  39.  
  40. REM tiempo que queremos que pase entre ping y ping en segundos
  41. timeout 4 > NUL
  42.  
  43. GOTO LOOPSTART
  44.  
En línea

Nucleorion

Desconectado Desconectado

Mensajes: 71


Ver Perfil
Re: Batch para guardar un registro de cada ping realizado con la hora en una linea
« Respuesta #9 en: 1 Abril 2019, 10:35 am »

Al probarlo en un ordenador con windows 7 home premium, conectado por wifi, el resultado que tengo es este:

Código:
2019-04-01__10-21-53

C:\asisrem\pinglog>(
(set /p tm=01/04/2019 10:21:53  ) 0<nul 
 PING -n 1 asisrem.com   | FIND "TTL" 
 IF ERRORLEVEL 1 ECHO Error, Tiempo de espera agotado. No se ha podido conectar con la IP.
)
01/04/2019 10:21:53 Respuesta desde 31.47.74.215: bytes=32 tiempo=14ms TTL=52

Hay algun comando del script que no funcione en esa version?
No consigo que imprima el resultado. Me imprime en el txt el propio codigo, mientras que otros ordenadores con windows pro funciona bien.
En línea

Páginas: [1] 2 Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines