diff options
Diffstat (limited to 'src/Ivy.pm')
-rw-r--r-- | src/Ivy.pm | 17 |
1 files changed, 3 insertions, 14 deletions
@@ -104,9 +104,8 @@ use constant VERSION => 3; use constant MSG_FMT => "%d %d\002%s\n"; # par defaut, on diffuse le bonjour en local -# (sauf pour l'instant, pour rester compatible) -#use constant BROADCAST_ADDRS => "127.255.255.255" ; -use constant BROADCAST_ADDRS => "143.196.1.255, 143.196.2.255, 143.196.53.255"; +use constant BROADCAST_ADDRS => "127.255.255.255" ; +use constant BROADCAST_PORT => "2010"; use constant BYE => 0; use constant REGEXP => 1; @@ -230,7 +229,7 @@ sub start (@) # ou valeur cablee, a defaut my $default_domains = $ENV{"IVYDOMAINS"}; $default_domains = BROADCAST_ADDRS unless defined ($default_domains); - my $default_ivyBus = defined $ENV{"IVYBUS"} ? $ENV{"IVYBUS"} : ""; + my $default_ivyBus = defined $ENV{"IVYBUS"} ? $ENV{"IVYBUS"} : BROADCAST_ADDRS.BROADCAST_PORT; my %defaultOptions = ( #PARAMETRES OBLIGATOIRES @@ -240,16 +239,6 @@ sub start (@) -appName => undef, # nom de l'appli - # PARAMETRES FACULTATIFS (avec valeurs par defaut) -# -broadcastPort => $ENV{"BUS"}, - # No de port UDP Si non specifie la variable - # d'environnement BUS sera examinee - -# -domains => $default_domains, - # Liste des domaines ou se fait le broadcast - # si non specifie, on utilise la variable - # d'environnement ou la valeur par defaut - -ivyBus => $default_ivyBus, # les adresses de reseau sur lesquelles ont broadcaste # suivies du No de port : |