Connexion à Internet multi-comptes - Historique des versions

Lea le 14 décembre 2023 à 20:30

2023-12-14T20:30:02Z

← Version précédente		Version du 14 décembre 2023 à 20:30
Ligne 1 :		Ligne 1 :
	~~[[Category:Se connecter à Internet]]~~
	= Connexion à Internet multi-comptes <br />Partie 4 : connexion multi-comptes =		= Connexion à Internet multi-comptes <br />Partie 4 : connexion multi-comptes =

Ligne 244 :		Ligne 243 :
	<br/>		<br/>
	<br/>		<br/>
	'''<b>[[~~Reseau-index~~\|@ Retour à la rubrique Réseau ~~et sécurité~~]]</b>'''		'''<b>[[Réseau\|@ Retour à la rubrique Réseau]]</b>'''
	<br/>		<br/>

Ligne 252 :		Ligne 251 :
	Copyright © 30/05/2000, Frédéric Bonnaud		Copyright © 30/05/2000, Frédéric Bonnaud
	{{CC-BY-SA}}		{{CC-BY-SA}}

			[[Catégorie:Réseau]]

Lea : Lea a déplacé la page Reseau-cxion net-multi4 compte vers Connexion à Internet multi-comptes

2023-12-12T11:44:23Z

Lea a déplacé la page Reseau-cxion net-multi4 compte vers Connexion à Internet multi-comptes

← Version précédente	Version du 12 décembre 2023 à 11:44
(Aucune différence)

Jiel le 31 décembre 2010 à 14:18

2010-12-31T14:18:50Z

← Version précédente		Version du 31 décembre 2010 à 14:18
Ligne 240 :		Ligne 240 :

	Reste le problème des spammers ! La suppression automatique des mails dits "spam", mails de publicité non sollicités, fera l'objet d'un prochain article.		Reste le problème des spammers ! La suppression automatique des mails dits "spam", mails de publicité non sollicités, fera l'objet d'un prochain article.


			<br/>
			<br/>
			'''<b>[[Reseau-index\|@ Retour à la rubrique Réseau et sécurité]]</b>'''
			<br/>

	<div class="merci">Cette page est issue de la documentation 'pré-wiki' de Léa a été convertie avec HTML::WikiConverter. Elle fut créée par Frédéric Bonnaud le 30/05/2000.</div>		<div class="merci">Cette page est issue de la documentation 'pré-wiki' de Léa a été convertie avec HTML::WikiConverter. Elle fut créée par Frédéric Bonnaud le 30/05/2000.</div>
Ligne 246 :		Ligne 252 :
	Copyright © 30/05/2000, Frédéric Bonnaud		Copyright © 30/05/2000, Frédéric Bonnaud
	{{CC-BY-SA}}		{{CC-BY-SA}}


	~~=Autres ressources=~~

Legranblon : /* Les permissions */

2006-08-07T07:48:52Z

Les permissions

← Version précédente		Version du 7 août 2006 à 07:48
Ligne 231 :		Ligne 231 :
	''pour faire appartenir tout ce que contient /etc/ppp à pppusers :''<br /><tt>chown -R root:pppusers /etc/ppp/</tt><br />''pour autoriser les membres du groupe pppusers à modifier les fichiers /etc/ppp/peers/auto etc. :''<br /><tt>chmod -R g+rwx /etc/ppp/scripts/ /etc/ppp/chat /etc/ppp/pap-secrets</tt><br />''pour que les étrangers le reste :''<br /><tt>chmod -R o-rwx /etc/ppp/ /etc/ppp.conf /etc/sendmail.BASE</tt>		''pour faire appartenir tout ce que contient /etc/ppp à pppusers :''<br /><tt>chown -R root:pppusers /etc/ppp/</tt><br />''pour autoriser les membres du groupe pppusers à modifier les fichiers /etc/ppp/peers/auto etc. :''<br /><tt>chmod -R g+rwx /etc/ppp/scripts/ /etc/ppp/chat /etc/ppp/pap-secrets</tt><br />''pour que les étrangers le reste :''<br /><tt>chmod -R o-rwx /etc/ppp/ /etc/ppp.conf /etc/sendmail.BASE</tt>

	Attention : seuls les utilisateurs ayant établi la connexion auront le droit de la ~~coupée~~ : ce qui est somme toute assez logique. Le root ayant lui, comme toujours, tous les droits.		Attention : seuls les utilisateurs ayant établi la connexion auront le droit de la couper : ce qui est somme toute assez logique. Le root ayant lui, comme toujours, tous les droits.

	== Utilisation ==		== Utilisation ==

Legranblon : /* /etc/ppp/scripts/initcnx */

2006-08-07T07:47:25Z

/etc/ppp/scripts/initcnx

Legranblon : /* Pré requis, Introduction */

2006-08-07T07:44:51Z

Pré requis, Introduction

Voir les modifications

PingouinMigrateur : conversion de la documentation originale de Léa par HTML::WikiConverter

2005-10-14T18:00:27Z

conversion de la documentation originale de Léa par HTML::WikiConverter

← Version précédente		Version du 14 octobre 2005 à 18:00
Ligne 246 :		Ligne 246 :
	Copyright © 30/05/2000, Fr�d�ric Bonnaud		Copyright © 30/05/2000, Fr�d�ric Bonnaud
	{{CC-BY-SA}}		{{CC-BY-SA}}


			=Autres ressources=

PingouinMigrateur : conversion de la documentation originale de Léa par HTML::WikiConverter

2005-09-07T11:12:45Z

conversion de la documentation originale de Léa par HTML::WikiConverter

← Version précédente		Version du 7 septembre 2005 à 11:12
Ligne 242 :		Ligne 242 :

	<div class="merci">Cette page est issue de la documentation 'pré-wiki' de Léa a été convertie avec HTML::WikiConverter. Elle fut créée par Frédéric Bonnaud le 30/05/2000.</div>		<div class="merci">Cette page est issue de la documentation 'pré-wiki' de Léa a été convertie avec HTML::WikiConverter. Elle fut créée par Frédéric Bonnaud le 30/05/2000.</div>

			= Copyright =
			Copyright © 30/05/2000, Fr�d�ric Bonnaud
			{{CC-BY-SA}}

ST : Correction du titre

2005-09-03T14:51:25Z

Correction du titre

← Version précédente		Version du 3 septembre 2005 à 14:51
Ligne 1 :		Ligne 1 :
	[[Category:Se connecter à Internet]]		[[Category:Se connecter à Internet]]
			= Connexion à Internet multi-comptes <br />Partie 4 : connexion multi-comptes =

	<div class="leatitre">Connexion à Internet multi-comptes <br />Partie 4 : connexion multi-comptes</div><div class="leapar">par [mailto:tux.le.pengouin@free.fr Fred]</div><div class="leadesc">Nous allons, dans ce chapitre, voir comment il est possible de rendre "simple" pour l'utilisateur la gestion de plusieurs connexions (plusieurs ISP) à internet</div>		<div class="leatitre">Connexion à Internet multi-comptes <br />Partie 4 : connexion multi-comptes</div><div class="leapar">par [mailto:tux.le.pengouin@free.fr Fred]</div><div class="leadesc">Nous allons, dans ce chapitre, voir comment il est possible de rendre "simple" pour l'utilisateur la gestion de plusieurs connexions (plusieurs ISP) à internet</div>
	----		----

PingouinMigrateur : conversion de la documentation originale de Léa par HTML::WikiConverter

2005-09-02T17:09:27Z

conversion de la documentation originale de Léa par HTML::WikiConverter

Nouvelle page

[[Category:Se connecter à Internet]]
<div class="leatitre">Connexion à Internet multi-comptes Partie 4 : connexion multi-comptes</div><div class="leapar">par [mailto:tux.le.pengouin@free.fr Fred]</div><div class="leadesc">Nous allons, dans ce chapitre, voir comment il est possible de rendre "simple" pour l'utilisateur la gestion de plusieurs connexions (plusieurs ISP) à internet</div>
----

== Pré requis, Introduction ==

Pour pouvoir comprendre ce chapitre, vous devez savoir comment établir une connexion à internet, comment récupérer du courrier d'internet sur plusieurs comptes en même temps et savoir quels sont les scripts qui sont lancés lors de l'établissement de la connexion. Tous ces points sont le sujet des articles précédents (voir les parties [multi1_pppd-config.php3 1], [multi2_sendmail-config.php3 2] et [multi3_ipupdown.php3 3]).

Avec la prolifération actuelle des ISP, notamment les gratuits, nous sommes souvent tentés de nous connecter via un nouvel ISP, ne serait-ce que pour l'essayer (vérifier l'état de sa ligne, sa rapidité, etc.).

En utilisant ce que nous avons vu, il n'est pas très difficile de créer plusieurs scripts de connexion à Internet. Mais cette méthode oblige l'administrateur à modifier ou créer plusieurs scripts (en tout au moins 4 par fournisseur d'accès) pour pouvoir ajouter un nouvel ISP. Ce n'est pas très souple. De plus il nous faut modifier pour chaque ISP le fichier <tt>/etc/sendmail.cf</tt> ; en effet dans celui-ci nous avons mis l'adresse de notre serveur de mail sortant, mais le serveur de mail sortant n'accepte pas en général de connexion depuis un PC qui n'est pas relier localement au réseau "local" de l'ISP. Il est assez évident que la modification de ce fichier devra se faire depuis <tt>/etc/ppp/ip-up</tt>, car elle doit se faire à chaque connexion.

Note : tout ce qui suit, sauf indication contraire, est exécuté avec les droits de root.

== Le principe retenu ==

Voici la solution que j'ai retenue. Toutes les informations relatives à toutes les connexions sont stockées dans le même et unique fichier : <tt>/etc/ppp.conf</tt>. Le fichier est en ASCII pur pour que l'on puisse l'éditer facilement.

L'établissement de la connexion à Internet se fera par un seul script : <tt>/etc/ppp/scripts/pppconnect</tt>. Celui-ci devra ouvrir une boite de dialogue dans laquelle on pourra choisir l'une quelconque des connexions configurées dans <tt>/etc/ppp.conf</tt>.

La rupture de la liaison se fera via le script <tt>/etc/ppp/scripts/pppdisconnect</tt>.

== Syntaxe du fichier <tt>/etc/ppp.conf</tt> ==

Comme un dessin vaut mieux qu'un long discours, voici mon fichier /<tt>etc/ppp.conf</tt> : 

----

 <tt>{free name}Free (max 20h)</tt> <tt>{free smtp}smtp.free.fr</tt> <tt>{free search}free.fr</tt> <tt>{free autodns}</tt> <tt>{free login}yyyyyyyyyyy</tt> <tt>{free password}xxxxxxxx</tt> <tt>{free telephone}0359602000</tt>

<tt>{wanadoo name}wanadoo (max 36h)</tt> <tt>{wanadoo smtp}smtp.wanadoo.fr</tt> <tt>{wanadoo search}wanadoo.fr</tt> <tt>{wanadoo dns}193.252.19.3</tt> <tt>{wanadoo dns}193.252.19.4</tt> <tt>{wanadoo login}yyyyyyyyyyy</tt> <tt>{wanadoo password}xxxxxxxx</tt> <tt>{wanadoo telephone}0860888080</tt>

<tt>{offline smtp}</tt> <tt>{offline search}tux</tt>

<tt>{global modeminit}ATM0L0</tt> 

----

 Chaque ligne de ce fichier est de la forme :

<blockquote><tt>{ident motclef}valeur</tt></blockquote>

<tt>ident</tt> peut être n'importe quoi (du moment que ça ne contient pas d'espace), mais il y a deux valeurs particulières :

* <tt>offline</tt> : pour indiquer que les paramètres qui suivent ne s'appliquent que lorsque la connexion est inactive.
* <tt>global</tt> : pour indiquer que ces paramètres s'appliquent pour toutes les connexions (même <tt>offline</tt>).

<tt>motclef</tt> est une valeur parmi : 

{| border="BORDER"
| '''Mot clef '''
| '''Type de la valeur'''
| '''Utilisation'''
|-
| <tt>name</tt>
| chaîne de caractère quelconque
| le nom de la connexion <tt>ident</tt>
|-
| <tt>dns</tt>
| une adresse IP
| adresse d'un DNS (serveur de noms de domaine), vous pouvez en mettre autant que vous le souhaitez (sur des lignes distinctes).
|-
| <tt>autodns</tt>
| rien
| si vous précisez cette option pour une connexion (ou pour toutes via <tt>global</tt>), <tt>pppd</tt> demandera à votre ISP les adresses de deux DNS. Dans ce cas (que cela fonctionne ou pas) les DNS que vous précisez par l'option <tt>dns</tt> sont ignorés.
|-
| <tt>search</tt>
| nom de domaine (valide ?)
| un nom de domaine qui sera ajouté automatiquement aux noms qui n'auront pu être résolus sans celui-ci.
|-
| <tt>smtp</tt>
| nom d'un serveur smtp ou une adresse IP
| ce nom doit alors être le nom du serveur de mails ''sortant'' de l'ISP correspondant à cette connexion.
|-
| <tt>login</tt>
| chaîne de caractère
| le login correspondant à cet ISP.
|-
| <tt>password</tt>
| chaîne de caractère
| le mot de passe de ce login (attention au propriétaire de ce fichier : il doit être en clair !)
|-
| <tt>telephone</tt>
| numéro de téléphone
| de l'ISP
|-
| <tt>modeminit</tt>
| chaîne de caractère
| ce doit alors être une chaîne d'initialisation de votre modem renvoyant 'OK' ; vous pouvez avoir autant de chaîne d'initialisation que vous le souhaitez.
|}

'''Attention :''' le parseur distingue les majuscules des minuscules. '''Attention :''' l'ordre des différentes lignes de ce fichiers sont essentielles : elles détermine la validité des diverses options (c'est à dire : si vous préciser deux fois la même option, seule la dernière valeurs est prise en compte).

== /etc/ppp/scripts/initcnx ==

Maintenant, il nous faut un script capable de lire un tel fichier, et de générer les fichiers nécessaires à la connexion à Internet :

* <tt>/etc/ppp/chat/auto</tt> : le script de numérotation de l'isp.
* <tt>/etc/ppp/peers/auto</tt> : le script de commande de pppd.
* <tt>/etc/ppp/pap-secrets</tt> : le fichier contenant les mots de passe pour l'isp.
* <tt>/etc/resolv.conf</tt> : le fichier charger de la résolution des noms (association adresse IP <-> nom de machine).

Voici un tel script (appelez le <tt>/etc/ppp/scripts/initcnx</tt>) : 

----

 ''<tt><nowiki>#!/usr/bin/perl</nowiki></tt>''

''<tt><nowiki># lecture du fichier de configuration /etc/ppp.conf pour</nowiki></tt>'' ''<tt><nowiki># la création des paramètres de configurations !</nowiki></tt>'' ''<tt><nowiki># /etc/ppp/chat/auto</nowiki></tt>'' ''<tt><nowiki># /etc/ppp/peers/auto</nowiki></tt>'' ''<tt><nowiki># /etc/ppp/pap-secrets</nowiki></tt>'' ''<tt><nowiki># /etc/resolv.conf</nowiki></tt>''

<tt>($cnx,$ipup) = @ARGV ;</tt>

<tt>open(PPPCONF,"/etc/ppp.conf") ;</tt>

<tt>@modeminit = () ;</tt> <tt>@resolv = () ;</tt> <tt>$search = "org" ;</tt> <tt>$autodns = 0 ;</tt>

<tt>while (<PPPCONF>) {</tt> <tt> if (($p) = /{$cnx login}(.*)/) { $login = $p ; }</tt> <tt> if (($p) = /{global login}(.*)/) { $login = $p ; }</tt> <tt> if (($p) = /{$cnx password}(.*)/) { $password = $p ; }</tt> <tt> if (($p) = /{global password}(.*)/) { $password = $p ; }</tt> <tt> if (($p) = /{$cnx smtp}(.*)/) { $smtp = $p ; }</tt> <tt> if (($p) = /{global smtp}(.*)/) { $smtp = $p ; }</tt> <tt> if (($p) = /{$cnx telephone}(.*)/) { $telephone = $p ; }</tt> <tt> if (($p) = /{global telephone}(.*)/) { $telephone = $p ; }</tt> <tt> if (($p) = /{$cnx modeminit}(.*)/) { push(@modeminit,$p) ; }</tt> <tt> if (($p) = /{global modeminit}(.*)/) { push(@modeminit,$p) ; }</tt> <tt> if (($p) = /{$cnx dns}(.*)/) { push(@resolv,$p) ; }</tt> <tt> if (($p) = /{global dns}(.*)/) { push(@resolv,$p) ; }</tt> <tt> if (($p) = /{$cnx search}(.*)/) { $search = $p ; }</tt> <tt> if (($p) = /{global search}(.*)/) { $search = $p ; }</tt> <tt> if (($p) = /{$cnx autodns}(.*)/) { $autodns = 1 ; }</tt> <tt> if (($p) = /{global autodns}(.*)/) { $autodns = 1 ; }</tt> <tt>}</tt>

'''<tt>if ($autodns) {</tt>''' '''<tt> $resolv = () ;</tt>''' '''<tt>}</tt>''' '''<tt>if ($ENV{"DNS1"} ne "") {</tt>''' '''<tt> push(@resolv,$ENV{"DNS1"}) ;</tt>''' '''<tt>}</tt>''' '''<tt>if ($ENV{"DNS2"} ne "") {</tt>''' '''<tt> push(@resolv,$ENV{"DNS2"}) ;</tt>''' '''<tt>}</tt>'''

<tt>open(CHAT,">/etc/ppp/chat/auto") ;</tt>

<tt>print CHAT "'ABORT' 'BUSY'</tt> <tt>'ABORT' 'ERROR'</tt> <tt>'ABORT' 'NO CARRIER'</tt> <tt>'ABORT' 'NO DIALTONE'</tt> <tt>'ABORT' 'Invalid Login'</tt> <tt>'ABORT' 'Login incorrect'</tt> <tt><nowiki>'' 'ATZ'</nowiki></tt> <tt>'OK' " ;</tt> <tt>foreach (@modeminit) { print CHAT "'$_'\n'OK' " ; }</tt> <tt>print CHAT "'ATDT$telephone'</tt> <tt><nowiki>'CONNECT' ''</nowiki></tt> <tt>'TIMEOUT' '5'</tt> <tt><nowiki>'~--' ''</nowiki></tt> <tt>" ;</tt> <tt>close CHAT ;</tt>

<tt>open (PEERS,">/etc/ppp/peers/auto");</tt> <tt>print PEERS "connect '/usr/sbin/chat -v -f /etc/ppp/chat/auto'</tt> <tt>user $login</tt> <tt>ipparam $cnx</tt> <tt>" ;</tt> '''<tt>if ($autodns) {</tt>''' '''<tt> print PEERS "usepeerdns\n" ;</tt>''' '''<tt>}</tt>''' <tt>close PEERS ;</tt>

<tt>open (PAP,"/etc/ppp/pap-secrets") ;</tt> <tt>$file = "" ;</tt> <tt>while (<PAP>) { $file .= $_ ; }</tt> <tt>close PAP ;</tt> <tt>open (PAP,">/etc/ppp/pap-secrets") ;</tt> ''<tt><nowiki># on supprime les occurrences précédentes :</nowiki></tt>'' <tt>$file =~ s/<nowiki>#AUTOBEGIN#.*#AUTOEND#</nowiki>//s ;</tt> <tt>if ($login ne "") {</tt> <tt> $file .= "<nowiki>#AUTOBEGIN#\n$login * $password\n#AUTOEND#</nowiki>";</tt> <tt>}</tt> <tt>print PAP $file ;</tt> <tt>close PAP ;</tt>

<tt>open (SENDSRC,"/etc/sendmail.BASE") ;</tt> <tt>open (SENDDST,">/etc/sendmail.cf") ;</tt> <tt>while (<SENDSRC>) {</tt> <tt> s/{MAILHOST}/$smtp/g ;</tt> <tt> print SENDDST ;</tt> <tt>}</tt> <tt>close SENDSRC ;</tt> <tt>close SENDDST ;</tt>

''<tt><nowiki># on modifie le ns :</nowiki></tt>'' <tt>open (RESOLV,">/etc/resolv.conf") ;</tt> <tt>print RESOLV "search $search\n" ;</tt> <tt>foreach $nameserver (@resolv) {</tt> <tt> print RESOLV "nameserver $nameserver\n" ;</tt> <tt>}</tt> <tt>close RESOLV ;</tt>

''<tt><nowiki># on relance sendmail (seulement si</nowiki></tt>'' ''<tt><nowiki># c'est ip-up ou ip-down qui à lancé le</nowiki></tt>'' ''<tt><nowiki># script, en effet il faut être root) :</nowiki></tt>'' ''<tt>if ($ipup =~ /ip(up|down)/) {</tt>'' <tt> `/etc/rc.d/init.d/sendmail restart`</tt> <tt>} ;</tt> 

----

 Ce script est un compromis : je ne voulais pas écrire plusieurs fois la lecture de <tt>/etc/ppp.conf</tt> (je ne sais pas écrire de bibliothèque en <tt>perl</tt> !) pour des raisons évidentes de maintenance, donc j'ai écrit ce script qui fait, pour chaque opération, bien plus que ce qui est nécessaire. Mais cela ne doit être pénalisant que si vous avez des dizaines de connexions ;).

Le script n'appel pas de commentaire particulier, si ce n'est pour les 12 lignes en gras. Ce sont ces lignes qui vont demander à l'isp des adresses de ses dns. Les 9 premières regardent si les variables d'environnement <tt>DNS1</tt> et <tt>DNS2</tt> existent (quand on est en mode <tt>autodns</tt>). Les 3 dernières ajoutent au script de commande de pppd l'option qui lui réclame ces information.

Pour que ce script puisse fonctionner, il faut que vous créiez un fichier <tt>/etc/sendmail.BASE</tt> dont le nom de serveur smtp est <tt>{MAILHOST}</tt> (à la place du nom du serveur de mail sortant d'un de vos isp). Si votre serveur de sendmail est configuré et fonctionne, il suffit de copier <tt>/etc/sendmail.cf</tt> dans <tt>/etc/sendmail.BASE</tt> et cherchez dans <tt>/etc/sendmail.BASE</tt> la ligne (ou quelque chose de semblable...) :

<blockquote>DSsmtp:'''smtp.isp.fr'''</blockquote>

et vous la changez en :

<blockquote>DSsmtp:'''{MAILHOST}'''</blockquote>

'''Attention : '''le fichier <tt>/etc/sendmail.cf</tt> est très sensible, ne le modifiez que si vous savez ce que vous faites.

== Un fichier /etc/ppp/ip-up à peine plus complexe ==

(que celui de la partie 3) 

----

 <tt><nowiki>#!/bin/sh</nowiki></tt> <tt><nowiki># le paramètre $6 correspond au paramètre ipparam</nowiki></tt> <tt><nowiki># du fichier /etc/ppp/peers/script</nowiki></tt>

<tt><nowiki># ceci nécessite que l'option usepeerdns</nowiki></tt> <tt><nowiki># soit activée dans /etc/ppp/peers/script</nowiki></tt> <tt><nowiki># dans ce cas DNS1 et DNS2 reçoivent les</nowiki></tt> <tt><nowiki># adresse des deux dns du provider.</nowiki></tt> <tt><nowiki># dans le cas où ces variables ne sont pas</nowiki></tt> <tt><nowiki># initialisées, les options {connexion dns}***</nowiki></tt> <tt><nowiki># doivent être utilisées pour préciser le dns !</nowiki></tt> <tt><nowiki># en lieu et place de autodns</nowiki></tt> <tt>export DNS1</tt> <tt>export DNS2</tt> <tt>/etc/ppp/scripts/initcnx $6 ipup</tt>

<tt><nowiki># récupération des mail et envoie des mails en attente :</nowiki></tt> <tt>/usr/bin/fetchmail</tt> <tt>/usr/sbin/sendmail -q</tt>

<tt><nowiki># on récupère automatiquement les mails toutes les 11 minutes</nowiki></tt> <tt><nowiki># (11 minutes car netcourrier n'aime pas qu'on consulte</nowiki></tt> <tt><nowiki># les comptes pop trop souvent !)</nowiki></tt> <tt>/usr/bin/fetchmail --daemon 660</tt>

<tt><nowiki># mettons notre pc à l'heure :</nowiki></tt> <tt>ntpdate ntp-sop.inria.fr</tt> 

----

 Vu ce que l'on a déjà dit, ce script ce passe de commentaire.

== Un fichier /etc/ppp/ip-down ==

----

 <tt><nowiki>#!/bin/sh</nowiki></tt>

<tt><nowiki># comme on n'est plus connecté au net, on quitte fetchmail</nowiki></tt> <tt>/usr/bin/fetchmail --quit</tt> <tt><nowiki># y'a plus de dns a priori...</nowiki></tt> <tt>export DNS1=""</tt> <tt>export DNS2=""</tt> <tt>/etc/ppp/scripts/initcnx offline ipdown</tt> <tt><nowiki># on peut effacer les fichiers auto :</nowiki></tt> <tt>rm -f /etc/ppp/chat/auto</tt> <tt>rm -f /etc/ppp/peers/auto</tt> 

----

 Idem.

== /etc/ppp/scripts/pppconnect ==

Pour ce script, nous allons un peu compliquer les choses : en effet, c'est lui qui doit permettre le choix de l'isp que nous souhaitons contacter. Comme, dans la partie 3, nous allons utiliser Xdialog pour nous permettre ce choix. Voici le script : 

----

 <tt><nowiki>#!/usr/bin/perl</nowiki></tt>

<tt>open(PPPCONF,"/etc/ppp.conf") ||</tt> <tt>`/opt/apps/bin/Xdialog --title Erreur --msgbox\</tt> <tt>"impossible d\'ouvrir /etc/ppp.conf\nchangez\</tt> <tt>les droits de ce fichier\nou bien créez le."\</tt> <tt>0 0` ||</tt> <tt>die "/etc/ppp.conf illisible.\n" ;</tt>

<tt><nowiki># on cherche les lignes : {connexion name}isp</nowiki></tt> <tt>while (<PPPCONF>) {</tt> <tt> if (($tag,$name) = /{(.*?) name}(.*)/) {</tt> <tt> $cnx{$tag} = $name ;</tt> <tt> }</tt> <tt>}</tt>

<tt>$cmdline = "" ;</tt> <tt>$num = 0 ;</tt>

<tt>foreach $key (sort keys %cnx) {</tt> <tt> $cmdline .= "\"$key\" \"$cnx{$key}\" false " ;</tt> <tt> $num++ ;</tt> <tt>}</tt>

<tt>$cnx = `/opt/apps/bin/Xdialog --stdout\</tt> <tt>--radiolist Connexion 0 0 $num $cmdline` ;</tt> <tt>chop($cnx);</tt>

<tt>if ($cnx ne "") {</tt>

<tt> # initialisation (sauf le dns !) qui est fait par</tt> <tt> # ip-up</tt> <tt> `/etc/ppp/scripts/initcnx $cnx` ;</tt>

<tt> # connexion !</tt> <tt> `/usr/sbin/pppd call auto` ;</tt>

<tt> # ce qui suit n'est pas nécessaire, mais</tt> <tt> # agréable :</tt> <tt> # attendons l'établissement de la liaison</tt> <tt> `sleep 60s`</tt> <tt> # et rapatrions les mails de l'utilisateur</tt> <tt> # pour peu qu'il ai configuré fetchmail</tt> <tt> `fetchmail`</tt> <tt> # ceci permet à un utilisateur de se configurer</tt> <tt> # un compte que le root ne connait pas.</tt> <tt>} else {</tt> <tt>`/opt/apps/bin/Xdialog --title Information\</tt> <tt>--infobox "Aucune connexion n'a été sélectionnée."\</tt> <tt>0 0 1500` ;</tt> <tt>}</tt> 

----

 (note(pour jcc), je ne me rappelle plus si perl comprend la continuation des lignes par \ ?) (note : saisissez les lignes terminés par \ sur une seule ligne !) (note : en lieu et place de /opt/apps/bin précisez le path complet de Xdialog) Vous pouvez, dès maintenant, vérifier que l'établissement est fonctionnel (si vous avez un fichier <tt>/etc/ppp.conf</tt>) en tapant : <tt>/etc/ppp/scripts/pppconnect</tt>. Si vous aviez des mails en attente et si vous aviez configuré fetchmail, ce script doit établir la connexion, envoyer les mails en attente, et rapatrier vos mails (et ceux de vos utilisateurs).

== /etc/ppp/scripts/pppdisconnect ==

La déconnexion est semblable à ce que nous avons déjà fait : 

----

 <tt><nowiki>#!/bin/sh</nowiki></tt> <tt>if [ -e /var/run/ppp*.pid ] ; then</tt> <tt> kill `cat /var/run/ppp*.pid` 2>&1 > /dev/null</tt> <tt>fi</tt> <tt>/opt/apps/bin/Xdialog --title "Informations:"\</tt> <tt>--infobox "La liaison internet est maintenant\</tt> <tt>coupée." 0 0 2000</tt> 

----

 Sans commentaire.

== Les permissions ==

Pour l'instant, cet ensemble de script, ne fonctionne que si vous êtes root. C'est un peu limitatif. Pour arranger les choses, je vous conseille de créer un groupe pppusers auquel vous ferez appartenir les utilisateurs ayant le droit de choisir leur connexion. Puis, dans le répertoire /etc/ppp faites :

''pour faire appartenir tout ce que contient /etc/ppp à pppusers :'' <tt>chown -R root:pppusers /etc/ppp/*</tt> ''pour autoriser les membres du groupe pppusers à modifier les fichiers /etc/ppp/peers/auto etc. :'' <tt>chmod -R g+rwx /etc/ppp/scripts/ /etc/ppp/chat /etc/ppp/pap-secrets</tt> ''pour que les étrangers le reste :'' <tt>chmod -R o-rwx /etc/ppp/* /etc/ppp.conf /etc/sendmail.BASE</tt>

Attention : seuls les utilisateurs ayant établi la connexion auront le droit de la coupée : ce qui est somme toute assez logique. Le root ayant lui, comme toujours, tous les droits.

== Utilisation ==

Chez moi, j'ai mis deux icônes sur mon bureau, une vers pppconnect et l'autre vers pppdisconnect. Comme ça, je peux établir et couper la liaison à Internet de manière très simple.

Voilà, bon surf.

Reste le problème des spammers ! La suppression automatique des mails dits "spam", mails de publicité non sollicités, fera l'objet d'un prochain article.

<div class="merci">Cette page est issue de la documentation 'pré-wiki' de Léa a été convertie avec HTML::WikiConverter. Elle fut créée par Frédéric Bonnaud le 30/05/2000.</div>

← Version précédente		Version du 7 août 2006 à 07:47
Ligne 117 :		Ligne 117 :
	<tt>@modeminit = () ;</tt><br /><tt>@resolv = () ;</tt><br /><tt>$search = "org" ;</tt><br /><tt>$autodns = 0 ;</tt>		<tt>@modeminit = () ;</tt><br /><tt>@resolv = () ;</tt><br /><tt>$search = "org" ;</tt><br /><tt>$autodns = 0 ;</tt>

	<tt>while (<PPPCONF>) {</tt><br /><tt>~~Â if~~ (($p) = /{$cnx login}(.)/) { $login = $p ; }</tt><br /><tt>~~Â if~~ (($p) = /{global login}(.)/) { $login = $p ; }</tt><br /><tt>~~Â if~~ (($p) = /{$cnx password}(.)/) { $password = $p ; }</tt><br /><tt>~~Â if~~ (($p) = /{global password}(.)/) { $password = $p ; }</tt><br /><tt>~~Â if~~ (($p) = /{$cnx smtp}(.)/) { $smtp = $p ; }</tt><br /><tt>~~Â if~~ (($p) = /{global smtp}(.)/) { $smtp = $p ; }</tt><br /><tt>~~Â if~~ (($p) = /{$cnx telephone}(.)/) { $telephone = $p ; }</tt><br /><tt>~~Â if~~ (($p) = /{global telephone}(.)/) { $telephone = $p ; }</tt><br /><tt>~~Â if~~ (($p) = /{$cnx modeminit}(.)/) { push(@modeminit,$p) ; }</tt><br /><tt>~~Â if~~ (($p) = /{global modeminit}(.)/) { push(@modeminit,$p) ; }</tt><br /><tt>~~Â if~~ (($p) = /{$cnx dns}(.)/) { push(@resolv,$p) ; }</tt><br /><tt>~~Â if~~ (($p) = /{global dns}(.)/) { push(@resolv,$p) ; }</tt><br /><tt>~~Â if~~ (($p) = /{$cnx search}(.)/) { $search = $p ; }</tt><br /><tt>~~Â if~~ (($p) = /{global search}(.)/) { $search = $p ; }</tt><br /><tt>~~Â if~~ (($p) = /{$cnx autodns}(.)/) { $autodns = 1 ; }</tt><br /><tt>~~Â if~~ (($p) = /{global autodns}(.)/) { $autodns = 1 ; }</tt><br /><tt>}</tt>		<tt>while (<PPPCONF>) {</tt><br /><tt> if (($p) = /{$cnx login}(.)/) { $login = $p ; }</tt><br /><tt> if (($p) = /{global login}(.)/) { $login = $p ; }</tt><br /><tt> if (($p) = /{$cnx password}(.)/) { $password = $p ; }</tt><br /><tt> if (($p) = /{global password}(.)/) { $password = $p ; }</tt><br /><tt> if (($p) = /{$cnx smtp}(.)/) { $smtp = $p ; }</tt><br /><tt> if (($p) = /{global smtp}(.)/) { $smtp = $p ; }</tt><br /><tt> if (($p) = /{$cnx telephone}(.)/) { $telephone = $p ; }</tt><br /><tt> if (($p) = /{global telephone}(.)/) { $telephone = $p ; }</tt><br /><tt> if (($p) = /{$cnx modeminit}(.)/) { push(@modeminit,$p) ; }</tt><br /><tt> if (($p) = /{global modeminit}(.)/) { push(@modeminit,$p) ; }</tt><br /><tt> if (($p) = /{$cnx dns}(.)/) { push(@resolv,$p) ; }</tt><br /><tt> if (($p) = /{global dns}(.)/) { push(@resolv,$p) ; }</tt><br /><tt> if (($p) = /{$cnx search}(.)/) { $search = $p ; }</tt><br /><tt> if (($p) = /{global search}(.)/) { $search = $p ; }</tt><br /><tt> if (($p) = /{$cnx autodns}(.)/) { $autodns = 1 ; }</tt><br /><tt> if (($p) = /{global autodns}(.)/) { $autodns = 1 ; }</tt><br /><tt>}</tt>

	'''<tt>if ($autodns) {</tt>'''<br />'''<tt>Â $resolv = () ;</tt>'''<br />'''<tt>}</tt>'''<br />'''<tt>if ($ENV{"DNS1"} ne "") {</tt>'''<br />'''<tt>~~Â push~~(@resolv,$ENV{"DNS1"}) ;</tt>'''<br />'''<tt>}</tt>'''<br />'''<tt>if ($ENV{"DNS2"} ne "") {</tt>'''<br />'''<tt>~~Â push~~(@resolv,$ENV{"DNS2"}) ;</tt>'''<br />'''<tt>}</tt>'''		'''<tt>if ($autodns) {</tt>'''<br />'''<tt> $resolv = () ;</tt>'''<br />'''<tt>}</tt>'''<br />'''<tt>if ($ENV{"DNS1"} ne "") {</tt>'''<br />'''<tt> push(@resolv,$ENV{"DNS1"}) ;</tt>'''<br />'''<tt>}</tt>'''<br />'''<tt>if ($ENV{"DNS2"} ne "") {</tt>'''<br />'''<tt> push(@resolv,$ENV{"DNS2"}) ;</tt>'''<br />'''<tt>}</tt>'''

	<tt>open(CHAT,">/etc/ppp/chat/auto") ;</tt>		<tt>open(CHAT,">/etc/ppp/chat/auto") ;</tt>
Ligne 125 :		Ligne 125 :
	<tt>print CHAT "<font color="#FF0000">'ABORT' 'BUSY'</font></tt><br /><tt><font color="#FF0000">'ABORT' 'ERROR'</font></tt><br /><tt><font color="#FF0000">'ABORT' 'NO CARRIER'</font></tt><br /><tt><font color="#FF0000">'ABORT' 'NO DIALTONE'</font></tt><br /><tt><font color="#FF0000">'ABORT' 'Invalid Login'</font></tt><br /><tt><font color="#FF0000">'ABORT' 'Login incorrect'</font></tt><br /><tt><font color="#FF0000"><nowiki>'' 'ATZ'</nowiki></font></tt><br /><tt><font color="#FF0000">'OK' </font>" ;</tt><br /><tt>foreach (@modeminit) { print CHAT "<font color="#FF0000">'$_'\n'OK' </font>" ; }</tt><br /><tt>print CHAT "<font color="#FF0000">'ATDT$telephone'</font></tt><br /><tt><font color="#FF0000"><nowiki>'CONNECT' ''</nowiki></font></tt><br /><tt><font color="#FF0000">'TIMEOUT' '5'</font></tt><br /><tt><font color="#FF0000"><nowiki>'~--' ''</nowiki></font></tt><br /><tt>" ;</tt><br /><tt>close CHAT ;</tt>		<tt>print CHAT "<font color="#FF0000">'ABORT' 'BUSY'</font></tt><br /><tt><font color="#FF0000">'ABORT' 'ERROR'</font></tt><br /><tt><font color="#FF0000">'ABORT' 'NO CARRIER'</font></tt><br /><tt><font color="#FF0000">'ABORT' 'NO DIALTONE'</font></tt><br /><tt><font color="#FF0000">'ABORT' 'Invalid Login'</font></tt><br /><tt><font color="#FF0000">'ABORT' 'Login incorrect'</font></tt><br /><tt><font color="#FF0000"><nowiki>'' 'ATZ'</nowiki></font></tt><br /><tt><font color="#FF0000">'OK' </font>" ;</tt><br /><tt>foreach (@modeminit) { print CHAT "<font color="#FF0000">'$_'\n'OK' </font>" ; }</tt><br /><tt>print CHAT "<font color="#FF0000">'ATDT$telephone'</font></tt><br /><tt><font color="#FF0000"><nowiki>'CONNECT' ''</nowiki></font></tt><br /><tt><font color="#FF0000">'TIMEOUT' '5'</font></tt><br /><tt><font color="#FF0000"><nowiki>'~--' ''</nowiki></font></tt><br /><tt>" ;</tt><br /><tt>close CHAT ;</tt>

	<tt>open (PEERS,">/etc/ppp/peers/auto");</tt><br /><tt>print PEERS "<font color="#FF0000">connect '/usr/sbin/chat -v -f /etc/ppp/chat/auto'</font></tt><br /><tt><font color="#FF0000">user $login</font></tt><br /><tt><font color="#FF0000">ipparam $cnx</font></tt><br /><tt>" ;</tt><br />'''<tt>if ($autodns) {</tt>'''<br />'''<tt>~~Â print~~ PEERS "usepeerdns\n" ;</tt>'''<br />'''<tt>}</tt>'''<br /><tt>close PEERS ;</tt>		<tt>open (PEERS,">/etc/ppp/peers/auto");</tt><br /><tt>print PEERS "<font color="#FF0000">connect '/usr/sbin/chat -v -f /etc/ppp/chat/auto'</font></tt><br /><tt><font color="#FF0000">user $login</font></tt><br /><tt><font color="#FF0000">ipparam $cnx</font></tt><br /><tt>" ;</tt><br />'''<tt>if ($autodns) {</tt>'''<br />'''<tt> print PEERS "usepeerdns\n" ;</tt>'''<br />'''<tt>}</tt>'''<br /><tt>close PEERS ;</tt>

	<tt>open (PAP,"/etc/ppp/pap-secrets") ;</tt><br /><tt>$file = "" ;</tt><br /><tt>while (<PAP>) { $file .= $_ ; }</tt><br /><tt>close PAP ;</tt><br /><tt>open (PAP,">/etc/ppp/pap-secrets") ;</tt><br />''<tt><nowiki># on supprime les occurrences précédentes :</nowiki></tt>''<br /><tt>$file =~ s/<font color="#FF0000"><nowiki>#AUTOBEGIN#.#AUTOEND#</nowiki></font>//s ;</tt><br /><tt>if ($login ne "") {</tt><br /><tt>Â $file .= "<font color="#FF0000"><nowiki>#AUTOBEGIN#\n$login $password\n#AUTOEND#</nowiki></font>";</tt><br /><tt>}</tt><br /><tt>print PAP $file ;</tt><br /><tt>close PAP ;</tt>		<tt>open (PAP,"/etc/ppp/pap-secrets") ;</tt><br /><tt>$file = "" ;</tt><br /><tt>while (<PAP>) { $file .= $_ ; }</tt><br /><tt>close PAP ;</tt><br /><tt>open (PAP,">/etc/ppp/pap-secrets") ;</tt><br />''<tt><nowiki># on supprime les occurrences précédentes :</nowiki></tt>''<br /><tt>$file =~ s/<font color="#FF0000"><nowiki>#AUTOBEGIN#.#AUTOEND#</nowiki></font>//s ;</tt><br /><tt>if ($login ne "") {</tt><br /><tt> $file .= "<font color="#FF0000"><nowiki>#AUTOBEGIN#\n$login $password\n#AUTOEND#</nowiki></font>";</tt><br /><tt>}</tt><br /><tt>print PAP $file ;</tt><br /><tt>close PAP ;</tt>

	<tt>open (SENDSRC,"/etc/sendmail.BASE") ;</tt><br /><tt>open (SENDDST,">/etc/sendmail.cf") ;</tt><br /><tt>while (<SENDSRC>) {</tt><br /><tt>~~Â s~~/<font color="#FF0000">{MAILHOST}</font>/$smtp/g ;</tt><br /><tt>~~Â print~~ SENDDST ;</tt><br /><tt>}</tt><br /><tt>close SENDSRC ;</tt><br /><tt>close SENDDST ;</tt>		<tt>open (SENDSRC,"/etc/sendmail.BASE") ;</tt><br /><tt>open (SENDDST,">/etc/sendmail.cf") ;</tt><br /><tt>while (<SENDSRC>) {</tt><br /><tt> s/<font color="#FF0000">{MAILHOST}</font>/$smtp/g ;</tt><br /><tt> print SENDDST ;</tt><br /><tt>}</tt><br /><tt>close SENDSRC ;</tt><br /><tt>close SENDDST ;</tt>

	''<tt><nowiki># on modifie le ns :</nowiki></tt>''<br /><tt>open (RESOLV,">/etc/resolv.conf") ;</tt><br /><tt>print RESOLV "<font color="#FF0000">search $search\n</font>" ;</tt><br /><tt>foreach $nameserver (@resolv) {</tt><br /><tt>~~Â print~~ RESOLV "<font color="#FF0000">nameserver $nameserver\n</font>" ;</tt><br /><tt>}</tt><br /><tt>close RESOLV ;</tt>		''<tt><nowiki># on modifie le ns :</nowiki></tt>''<br /><tt>open (RESOLV,">/etc/resolv.conf") ;</tt><br /><tt>print RESOLV "<font color="#FF0000">search $search\n</font>" ;</tt><br /><tt>foreach $nameserver (@resolv) {</tt><br /><tt> print RESOLV "<font color="#FF0000">nameserver $nameserver\n</font>" ;</tt><br /><tt>}</tt><br /><tt>close RESOLV ;</tt>

	''<tt><nowiki># on relance sendmail (seulement si</nowiki></tt>''<br />''<tt><nowiki># c'est ip-up ou ip-down qui à lancé le</nowiki></tt>''<br />''<tt><nowiki># script, en effet il faut être root) :</nowiki></tt>''<br />''<tt>if ($ipup =~ /ip(up\|down)/) {</tt>''<br /><tt>Â `/etc/rc.d/init.d/sendmail restart`</tt><br /><tt>} ;</tt><br />		''<tt><nowiki># on relance sendmail (seulement si</nowiki></tt>''<br />''<tt><nowiki># c'est ip-up ou ip-down qui à lancé le</nowiki></tt>''<br />''<tt><nowiki># script, en effet il faut être root) :</nowiki></tt>''<br />''<tt>if ($ipup =~ /ip(up\|down)/) {</tt>''<br /><tt> `/etc/rc.d/init.d/sendmail restart`</tt><br /><tt>} ;</tt><br />

	----		----
Ligne 139 :		Ligne 139 :
	<br />Ce script est un compromis : je ne voulais pas écrire plusieurs fois la lecture de <tt>/etc/ppp.conf</tt> (je ne sais pas écrire de bibliothèque en <tt>perl</tt> !) pour des raisons évidentes de maintenance, donc j'ai écrit ce script qui fait, pour chaque opération, bien plus que ce qui est nécessaire. Mais cela ne doit être pénalisant que si vous avez des dizaines de connexions ;).		<br />Ce script est un compromis : je ne voulais pas écrire plusieurs fois la lecture de <tt>/etc/ppp.conf</tt> (je ne sais pas écrire de bibliothèque en <tt>perl</tt> !) pour des raisons évidentes de maintenance, donc j'ai écrit ce script qui fait, pour chaque opération, bien plus que ce qui est nécessaire. Mais cela ne doit être pénalisant que si vous avez des dizaines de connexions ;).

	Le script n'~~appel~~ pas de commentaire particulier, si ce n'est pour les 12 lignes en gras. Ce sont ces lignes qui vont demander à l'isp des adresses de ses dns. Les 9 premières regardent si les variables d'environnement <tt>DNS1</tt> et <tt>DNS2</tt> existent (quand on est en mode <tt>autodns</tt>). Les 3 dernières ajoutent au script de commande de pppd l'option qui lui réclame ces information.		Le script n'appelle pas de commentaire particulier, si ce n'est pour les 12 lignes en gras. Ce sont ces lignes qui vont demander à l'isp des adresses de ses dns. Les 9 premières regardent si les variables d'environnement <tt>DNS1</tt> et <tt>DNS2</tt> existent (quand on est en mode <tt>autodns</tt>). Les 3 dernières ajoutent au script de commande de pppd l'option qui lui réclame ces information.

	Pour que ce script puisse fonctionner, il faut que vous créiez un fichier <tt>/etc/sendmail.BASE</tt> dont le nom de serveur smtp est <tt><font color="#FF0000">{MAILHOST}</font></tt> (à la place du nom du serveur de mail sortant d'un de vos isp). Si votre serveur de sendmail est configuré et fonctionne, il suffit de copier <tt>/etc/sendmail.cf</tt> dans <tt>/etc/sendmail.BASE</tt> et cherchez dans <tt>/etc/sendmail.BASE</tt> la ligne (ou quelque chose de semblable...) :		Pour que ce script puisse fonctionner, il faut que vous créiez un fichier <tt>/etc/sendmail.BASE</tt> dont le nom de serveur smtp est <tt><font color="#FF0000">{MAILHOST}</font></tt> (à la place du nom du serveur de mail sortant d'un de vos isp). Si votre serveur sendmail est configuré et fonctionne, il suffit de copier <tt>/etc/sendmail.cf</tt> dans <tt>/etc/sendmail.BASE</tt> et cherchez dans <tt>/etc/sendmail.BASE</tt> la ligne (ou quelque chose de semblable...) :

	<blockquote>DSsmtp:'''<font color="#FF0000">smtp.isp.fr</font>'''</blockquote>		<blockquote>DSsmtp:'''<font color="#FF0000">smtp.isp.fr</font>'''</blockquote>

Connexion à Internet multi-comptes - Historique des versions

Lea le 14 décembre 2023 à 20:30

Lea : Lea a déplacé la page Reseau-cxion net-multi4 compte vers Connexion à Internet multi-comptes

Jiel le 31 décembre 2010 à 14:18

Legranblon : /* Les permissions */

Legranblon : /* /etc/ppp/scripts/initcnx */

Legranblon : /* Pré requis, Introduction */

PingouinMigrateur : conversion de la documentation originale de Léa par HTML::WikiConverter

PingouinMigrateur : conversion de la documentation originale de Léa par HTML::WikiConverter

ST : Correction du titre

PingouinMigrateur : conversion de la documentation originale de Léa par HTML::WikiConverter

Lea : Lea a déplacé la page Reseau-cxion net-multi4 compte vers Connexion à Internet multi-comptes

Legranblon : /* Les permissions */

Legranblon : /* /etc/ppp/scripts/initcnx */

Legranblon : /* Pré requis, Introduction */

PingouinMigrateur : conversion de la documentation originale de Léa par HTML::WikiConverter

PingouinMigrateur : conversion de la documentation originale de Léa par HTML::WikiConverter

ST : Correction du titre

PingouinMigrateur : conversion de la documentation originale de Léa par HTML::WikiConverter