Bonjour,
Voici celui que j'utilise. Il utilise le script adsl qui fait parti de la distribution
de
Benoit pour relancer pppd et/ou l'USB
Vincent
Benjamin Laurans wrote:
> Bonjour,
>
> J'utilise la mandrake 8.0 (bientot 8.1) avec les drivers de Benoit
> (speedtouch-21062001.tar.gz).
>
> Je recherche un script / programme du style adslautoconnect, c'est a
> dire qui me connecte au demarrage et qui en cas de deconnexion me
> reconnecte.
>
> De plus, 1 fois sur 5 lors de la deconnexion ou du redemarrage mon
> linux plante en creant plein de processus (c vrai je n'utilies pas la
> derniere version je vais l'utiliser.
>
> Si ca interesse quelqu'un je joint le script que j'utilise pour
> installer le driver ainsi que le script d'arret /redemarrage
>
> #############################################################################
>
> #!/usr/bin/perl
> # Speedtouch USB Install 2.0
> # De B.Laurans d'apres les drivers de B.Papillaut et l'aide de Doudou
> # Decompresser tous les fichiers dans /root
> # Le fichier install.pl installe le modem ( a ne lancer qu'une fois )
> # Le fichier start.sh lance la connection ( a lancer a chaque demarrage )
> # Le fichier stop.sh stop la connection ( a lancer avant d'eteindre la machine )
>
> # Ne pas oublier la compil
> # make
> # make install
>
> # Copier mgmt.o
> # `cp mgmt.o /usr/local/bin/mgmt.o`;
> $message="Bienvenue dans l'install du Speedtouch USB";
> print "$message\n";
> print "tapez votre login\n";
> $login=<STDIN>;
> print "tapez votre password\n";
> $password=<STDIN>;
> chomp($login);
> chomp($password);
> print "login : $login password : $password\n";
>
> $module="/etc/modules.conf";
>
> # Rajouter dans /etc/modules.conf
> @res=`grep "alias tty-ldisc-13 n_hdlc" $module`;
> if ($res[0] eq undef)
> {
> print "HDLC non present : Install\n";
> `echo alias tty-ldisc-13 n_hdlc >>"$module"`;
> }
> else
> {
> print "HDLS deja present : Rien a faire\n";
> }
> # Creer le fichier /etc/ppp/peers/adsl
> if (-e "/etc/ppp/peers/adsl")
> {
> print "le fichier adsl existe : Aucune action\n";
> }
> else
> {
> open(ADSL,">/etc/ppp/peers/adsl") || die("Pb de fichier\n");
> print "le fichier adsl n existe pas\n";
> print "creation du fichier\n";
> print ADSL "debug\n";
> print ADSL "kdebug 1\n";
> print ADSL "noipdefault\n";
> print ADSL "defaultroute\n";
> print ADSL "pty \"/usr/local/bin/pppoa2 -vpi 8 -vci 35\"\n";
> print ADSL "sync\n";
> print ADSL "user \"$login\"\n";
> print ADSL "novjccomp\n";
> print ADSL "noaccomp\n";
> print ADSL "nopcomp\n";
> print ADSL "nomagic\n";
> print ADSL "noccp \n";
> print ADSL "asyncmap 0\n";
> print ADSL "usepeerdns\n";
> print ADSL "holdoff 1\n";
> print ADSL "persist\n";
> print ADSL "maxfail 0\n";
> close(ADSL);
> }
>
> # Rajouter le password dans /etc/ppp/chap-secrets
> @res=`grep $login /etc/ppp/chap-secrets`;
> if ($res[0] eq undef)
> {
> print "mise a jour du fichier password\n";
> open (PASS,">>/etc/ppp/chap-secrets") || die ("PB de fichier chap");
> print PASS "$login * $password\n";
> close(PASS);
> }
> else
> {
> print "Rien a faire sur le fichier password\n";
> }
> print "Un reboot est maintenant necessaire\n";
>
> ##############################################################################
> #!/usr/bin/perl
> @param=@ARGV;
> $fichier_log="/var/log/adsl.log";
> $adsl=`ps -aef | grep adsl|grep -v grep| cut -d ' ' -f 7`;
> $modem=`ps -aef | grep modem|grep -v grep| cut -d ' ' -f 7`;
> open(LOG,">>$fichier_log");
> chomp($adsl);
> chomp($modem);
> if ($param[0] eq "stop")
> {
> print "stop demande\n" ;
> `kill $adsl`;
> $heure=localtime();
> print LOG "$heure : STOP demande\n";
> }
> elsif ($param[0] eq "start")
> {
> print "start demande\n" ;
> if ($modem eq undef)
> {
> $heure=localtime();
> print LOG "$heure : modem pas encore lance\n";
> print "modem pas encore lance\n";
> system "/usr/local/bin/modem_run -f /usr/local/bin/mgmt.o -m";
> }
> @res=`pppd call adsl`;
> print LOG "result pppd:@res\n";
> @res=`samba start`;
> print "@res\n";
> print LOG "Samba : @res\n";
> # mise a jour du dynamic dns
> @res=`wget -O - --http-user=name --http-passwd=password
> 'http://dynamic.zoneedit.com/auth/dynamic.html?host=name'`;
> print "@res\n";
> system "/usr/local/bin/noip";
> }
> elsif ($param[0] eq "reload")
> {
> print "reload demande\n";
> $heure=localtime();
> print LOG "$heure : reload demande\n";
> `kill $adsl`;
> sleep 6;
> @res=`pppd call adsl`;
> print "@res\n";
> @res=`/usr/local/bin/noip`;
> print "@res\n";
> @res=`samba start`;
> print "@res\n";
> @res=`/usr/local/bin/noip`;
> print "@res\n";
> }
> elsif ($param[0] eq "restart")
> {
> print "restart demande\n";
> `kill $adsl`;
> sleep 6;
> @res=`pppd call adsl`;
> print "@res\n";
> @res=`/usr/local/bin/noip`;
> print "@res\n";
> @res=`samba start`;
> print "@res\n";
> @res=`/usr/local/bin/noip`;
> print "@res\n";
> }
> else { print "usage : $0 start | stop\n" }
>
>
>#########################################################################################
>
> --
> Cordialement,
> Benjamin mailto:[EMAIL PROTECTED]
>
> Liste de diffusion modem ALCATEL SpeedTouch USB
> Pour se désinscrire : mailto:[EMAIL PROTECTED]?subject=unsubscribe
>
>
--
__________________________________________________________
Vincent THINSELIN - [EMAIL PROTECTED]
Cap Gemini Ernst & Young - Telecom Media & Networks France
Office : +33 (0)4.76.52.63.37 - Fax : +33 (0)4.76.52.62.01
checkpeer.pl
