Autor Tema: Ping Y -w (Leído 3358 veces)

arielb · « **en:** Martes 24 de Octubre de 2006, 21:40 »

Se han encontrado que al hacer un ping con -w no sea consistente. es decir si coloco -w 1 a veces lo hace uno y aveces hace dos

tambien lo he hecho asi
ping 1.2.3 -w 2 > archivo.txt
y a veces lo da 2 veces y aveces 3

y al hacer esto

Citar

cat archivo.txt | grep "2 received"

me da problemas

su -

Como yo lo haria en Perl....
Si quieres te pongo un codigo pequeño para hacer lo que quieres.

arielb

Bueno realmente lo que hice fue agregarle un OR( || ) y ya no me da problema si varia.
pero me deja con la duda, porque hace eso.
Lo que estoy haciendo es creando dos listados de un grupo de maquinas que estan en linea y las que no, y ya lo hace.

su -

Bueno...
En Perl era facil, si tener que usar comandos ni nada de eso, hace rato tambien hice algo parecido y un robot que chequeava links rotos en paginas y relamete creo que sh/bash/ksh/csh/ash no es para este trabajo pero como ya lo lograste.

arielb

Bueno es para algo que estoy haciendo en java para quitarme un poco el trabajo de andar maquina por maquina para actualizar aplicaciones. y claro no estar esperando que los programadores hagan algo para eso porque si no .......................

Bueno en java ejecuto el shell

Código: Text

void Ejecuta(String pNombre){
    //Ejecutar los shell creados
    try{
      Runtime oSh = Runtime.getRuntime();
      Process p = oSh.exec(pNombre);
      p.waitFor();
      
    }catch(IOException vEr){
      System.out.println(&#34;Error durante la ejecucion &#34;+vEr);
    }catch(InterruptedException vE12){
      System.out.println(&#34;Ejecucion de archivo Afectada.. &#34; +
          &#34;Error; &#34;+ vE12);
    }
    }
 

y el shell me deja dos listados uno de las maquinas que est'an en linea y otro de las que no estan.
Luego los que estan en linea los empiezo a procesar con java.

su -

No se, pero yo habria hecho todo en Perl, al menos en un mismo lenguaje, un mismo programa para hacer todo mas facil, pero si te funciona asi, ¡¡Perfecto!!
En Perl se podia hacer el ping de dos formas (las mas faciles) sin ejecutar nada:
Usar el modulo Net::Ping o hacer una pequeña coneccion con Socket tal como Net::Ping lo hace solo para ver si esta o no vivo, despues se hace resto...
Lo que no entiendo es como vas a actualizar y para que el ping, supongo que le haces ping a los servers que contienen los programas/datos para actualizar

arielb

Bueno mira hago el ping porque he visto en algunas aplicaciones que cuando estan tratando de conectarse (por decirlo asi) a una maquina que este fuera de linea demora mucho en eso. Por eso pense en hacerlo asi por ping para saber cuales estaban y procesar las que estan en linea.
Para actualizarla pense hacerlo como un launcher, desde la maquina donde esta linux o la aplicacion de java colocarlo en un directorio que estara compartido en la otra maquina(win). Luego en la maquina donde esta la aplicacion (exe) en el escritorio el acceso directo de la aplicacion ,en ves de estar apuntando al exe apuntara a un .bat, ese .bat revisara si en el directorio hay algo para el y si hay lo actualiza al directorio y lo ejecuta. y para el usuario debe ser transparente osea no darse cuenta al menos que se le envie un correo al actualizarlo.
Hablando de Perl, no conozco como se maneja ni tampoco lo he visto, voy a descargarlo para verlo.

su -

Cita de: "juez"

Bueno mira hago el ping porque he visto en algunas aplicaciones que cuando estan tratando de conectarse (por decirlo asi) a una maquina que este fuera de linea demora mucho en eso

No, realmente no, de hecho asi funciona el comando ping es solo que tambien imprime los paquetes de entrada.

Cita de: "juez"

Para actualizarla pense hacerlo como un launcher, desde la maquina donde esta linux o la aplicacion de java colocarlo en un directorio que estara compartido en la otra maquina(win). Luego en la maquina donde esta la aplicacion (exe) en el escritorio el acceso directo de la aplicacion ,en ves de estar apuntando al exe apuntara a un .bat, ese .bat revisara si en el directorio hay algo para el y si hay lo actualiza al directorio y lo ejecuta.

Huuy! muy complicado, por eso me gusta Perl, totalmente multiplataforma, bueno casi

Hay algo que no entiendo, la actualizacion es de programas?
Porque no usar un FTP automatico o un HTPP?
Haci no habria que hacer ping...
Lo idela seria hacer un programa para las dos plataformas, asi no habria que hacer tanta cosa.

Cita de: "juez"

Hablando de Perl, no conozco como se maneja ni tampoco lo he visto, voy a descargarlo para verlo.

Si estas en GNU/Linux o cualquier UNIX no hay porque, Windows es el unico OS para estacion que no lo trae.

El codigo puede ser muy sencillo pero no se como es eso de actualizacion, lo del ping es facil el resto depende, incluso en Perl hay herramientas para trabajar los makefiles, hay que recordar que Perl tiene muchos propocitos y la administracion es una de estos, aunque Java bien puede con el trabajo, supongo que por tiempo decides hacerlo por el comando ping pero creo que todo hecho desde el codigo seria mas viable y justo pero es solo una opinion.

arielb

Citar

Hay algo que no entiendo, la actualizacion es de programas?
Porque no usar un FTP automatico o un HTPP?

Bueno lo que pasa hay algo que le llaman "jefe", no quiere que utilizen ftp para eso la verdad no se porque no quiere eso, pero si no se deciden yo me canse de esperar y andar de maquina en maquina

y tome la decicion de hacer eso y a la ves estoy practicando a algo que me gusta mucho (programacion), ya que laboralmente no soy programador.

su -

Cita de: "juez"

Citar
Hay algo que no entiendo, la actualizacion es de programas?
Porque no usar un FTP automatico o un HTPP?

Bueno lo que pasa hay algo que le llaman "jefe", no quiere que utilizen ftp para eso la verdad no se porque no quiere eso, pero si no se deciden yo me canse de esperar y andar de maquina en maquina y tome la decicion de hacer eso y a la ves estoy practicando a algo que me gusta mucho (programacion), ya que laboralmente no soy programador.

Ok, creo que seria mejor SFTP o algo como kerberos.
Aun no entiendo ¿Que tienes que actualizar, el sistema o una base de datos?
Creo que hay una manera mas facil de hacer tal cosa, lo mejor seria hacerlo por un protocolo hecho para esto solo habria que hacer un robot para comprobar la version (Eso souna mas mal de lo que realmente es) y el resto es pan comido.

arielb

son programas, existe un grupo de programadores que trabaja en el desarrollo y la nueva version que tiene cambios según lo solicitado por el usuario o corregido hay que actualizarlo.

su -

Bueno en ese caso todo cambia.
Bien en Perl el ping se programaria hasi:

Código: Text

#!/usr/bin/env perl
use strict;
use Socket;
sub Ping {
  my &#036;ip = shift;
  my &#036;proto = getprotobyname('tcp'); #Este es el protocolo, obvio
  socket(Socket_Handle, AF_INET, SOCK_STREAM, &#036;proto);
  my &#036;port = getservbyname(&#34;pueto&#34;, &#34;tcp&#34;);
  my &#036;sin  = sockaddr_in(&#036;port, inet_aton(&#34;&#036;ip&#34;));
  if(connect(Socket_Handle, &#036;sin)){
   return &#34;En linea&#34;;
  }
  else {
   return &#34;&#036;ip muerto&#34;;
  }
  close Socket_Handle;
}
sub HacerSync {
  print &#34;Aqui seria el codigo para hacer la actualizacion&#092;n&#34;;
  print &#34;El problema es que no se como lo quieres hacer&#092;n&#34;;
}
oepn FL, &#34;Archivo_con_ips.txt&#34; or die &#34;Problemas con el archivo: &#036;!&#092;n&#34;;
  foreach my &#036;ip (&#60;FL&#62;){
    print &#34;Mirando ip &#036;ip&#092;n&#34;;
    my &#036;return = Ping(&#036;ip);
    if(&#036;return eq &#34;En linea&#34;){
      HacerSybc();
    }
   else { print &#34;&#036;return&#092;n&#34;; }
  }
close FL;
 
 

Bueno era algo como eso

SoloCodigo

Autor Tema: Ping Y -w (Leído 3358 veces)

arielb

Ping Y -w

su -

Re: Ping Y -w

arielb

Re: Ping Y -w

su -

Re: Ping Y -w

arielb

Re: Ping Y -w

su -

Re: Ping Y -w

arielb

Re: Ping Y -w

su -

Re: Ping Y -w

arielb

Re: Ping Y -w

su -

Re: Ping Y -w

arielb

Re: Ping Y -w

su -

Re: Ping Y -w