693 lines
		
	
	
		
			22 KiB
		
	
	
	
		
			Bash
		
	
	
	
	
	
			
		
		
	
	
			693 lines
		
	
	
		
			22 KiB
		
	
	
	
		
			Bash
		
	
	
	
	
	
| ##@cooked comments # -*- coding: utf-8 mode: sh -*- vim:sw=4:sts=4:et:ai:si:sta:fenc=utf-8
 | |
| ## Calculateur d'adresse IP
 | |
| ##@cooked nocomments
 | |
| ##@require base
 | |
| uprovide ipcalc
 | |
| urequire base
 | |
| 
 | |
| function get_random_kvm_macaddr() {
 | |
|     # Obtenir une adresse mac au hasard commençant par 52:54:00 pour KVM
 | |
|     echo "52:54:00:$(awk 'BEGIN {srand(); printf("%02X:%02X:%02X", rand()*256, rand()*256, rand()*256)}' 2>/dev/null)"
 | |
| }
 | |
| 
 | |
| function ipcalc_splitipmask() {
 | |
|     # Découper $1 de la forme ip[/mask] entre l'adresse ip, qui est placé dans
 | |
|     # la variable $2(=ip) et le masque, qui est placée dans la variable
 | |
|     # $3(=mask)
 | |
|     if [[ "$1" == */* ]]; then
 | |
|         _setv "${2:-ip}" "${1%%/*}"
 | |
|         _setv "${3:-mask}" "${1#*/}"
 | |
|     else
 | |
|         _setv "${2:-ip}" "$1"
 | |
|         _setv "${3:-mask}"
 | |
|     fi
 | |
| }
 | |
| 
 | |
| function ipcalc_checkip() {
 | |
|     # Vérifier l'adresse ip $1 pour voir si elle est valide. Si l'adresse est
 | |
|     # valide, l'afficher. Sinon, retourner 1
 | |
|     awkrun status=0 '{
 | |
|   # si l"adresse ne fait pas la taille voulue, rajouter des .0
 | |
|   ip = $0
 | |
|   gsub(/[^.]/, "", ip)
 | |
|   count = length(ip)
 | |
|   while (count < 3) {
 | |
|     $0 = $0 ".0"
 | |
|     count++
 | |
|   }
 | |
| 
 | |
|   # puis tester la validité
 | |
|   if ($0 !~ /^[0-9]+\.[0-9]+\.[0-9]+\.[0-9]+$/) {
 | |
|     status = 1
 | |
|     exit
 | |
|   }
 | |
|   match($0, /([0-9]+)\.([0-9]+)\.([0-9]+)\.([0-9]+)/, ps)
 | |
|   for (i = 1; i <= 4; i++) {
 | |
|     p = 0 + ps[i]
 | |
|     if (p > 255) {
 | |
|       status = 1
 | |
|       exit
 | |
|     }
 | |
|   }
 | |
|   print $0
 | |
| }
 | |
| END { exit status }' <<<"$1"
 | |
| }
 | |
| 
 | |
| function ipcalc_checkmask() {
 | |
|     # vérifier le masque de sous-réseau $1 pour voir si elle est valide. Si oui,
 | |
|     # afficher le suffixe (0, 8, 16, 24, 32) associé. Sinon retourner 1
 | |
|     case "$1" in
 | |
|     0|0.0.0.0) echo 0;;
 | |
|     8|255.0.0.0) echo 8;;
 | |
|     16|255.255.0.0) echo 16;;
 | |
|     24|255.255.255.0) echo 24;;
 | |
|     32|255.255.255.255) echo 32;;
 | |
|     *) return 1;;
 | |
|     esac
 | |
|     return 0
 | |
| }
 | |
| 
 | |
| function ipcalc_netmask() {
 | |
|     # à partir d'un suffixe (0, 8, 16, 24, 32) ou d'un masque de sous-réseau,
 | |
|     # afficher le masque de sous-réseau. si le suffixe ou le masque ne sont pas
 | |
|     # reconnus, retourner 1
 | |
|     case "$1" in
 | |
|     0|0.0.0.0) echo 0.0.0.0;;
 | |
|     8|255.0.0.0) echo 255.0.0.0;;
 | |
|     16|255.255.0.0) echo 255.255.0.0;;
 | |
|     24|255.255.255.0) echo 255.255.255.0;;
 | |
|     32|255.255.255.255) echo 255.255.255.255;;
 | |
|     *) return 1;;
 | |
|     esac
 | |
|     return 0
 | |
| }
 | |
| 
 | |
| function ipcalc_network() {
 | |
|     # Calculer l'adresse de réseau correspondant à l'adresse ip $1. Le masque
 | |
|     # de sous-réseau peut-être indiqué dans l'adresse ip avec le suffixe /n ou
 | |
|     # /x.x.x.x ou donné dans l'argument $2. Seuls les suffixes 0, 8, 16, 24, 32
 | |
|     # sont supportés.
 | |
|     # Retourner 1 si un erreur s'est produite, par exemple si l'adresse ou le
 | |
|     # suffixe sont invalides ou non supportés.
 | |
|     [ -n "$1" ] || return
 | |
|     local ip mask
 | |
| 
 | |
|     ipcalc_splitipmask "$1" ip mask
 | |
|     [ -n "$mask" ] || mask="$2"
 | |
|     [ -n "$mask" ] || mask=24
 | |
| 
 | |
|     ip="$(ipcalc_checkip "$ip")" || return
 | |
|     mask="$(ipcalc_checkmask "$mask")" || return
 | |
| 
 | |
|     case "$mask" in
 | |
|     0) echo "0.0.0.0";;
 | |
|     8) ip="${ip%.*.*.*}"; echo "$ip.0.0.0";;
 | |
|     16) ip="${ip%.*.*}"; echo "$ip.0.0";;
 | |
|     24) ip="${ip%.*}"; echo "$ip.0";;
 | |
|     32) echo "$ip";;
 | |
|     esac
 | |
| }
 | |
| 
 | |
| function ipcalc_broadcast() {
 | |
|     # Calculer l'adresse de broadcast correspondant à l'adresse ip $1. Le masque
 | |
|     # de sous-réseau peut-être indiqué dans l'adresse ip avec le suffixe /n ou
 | |
|     # /x.x.x.x ou donné dans l'argument $2. Seuls les suffixes 0, 8, 16, 24, 32
 | |
|     # sont supportés.
 | |
|     # Retourner 1 si un erreur s'est produite, par exemple si l'adresse ou le
 | |
|     # suffixe sont invalides ou non supportés.
 | |
|     [ -n "$1" ] || return
 | |
|     local ip mask
 | |
| 
 | |
|     ipcalc_splitipmask "$1" ip mask
 | |
|     [ -n "$mask" ] || mask="$2"
 | |
|     [ -n "$mask" ] || mask=24
 | |
| 
 | |
|     ip="$(ipcalc_checkip "$ip")" || return
 | |
|     mask="$(ipcalc_checkmask "$mask")" || return
 | |
| 
 | |
|     case "$mask" in
 | |
|     0) echo "255.255.255.255";;
 | |
|     8) ip="${ip%.*.*.*}"; echo "$ip.255.255.255";;
 | |
|     16) ip="${ip%.*.*}"; echo "$ip.255.255";;
 | |
|     24) ip="${ip%.*}"; echo "$ip.255";;
 | |
|     32) echo "$ip";;
 | |
|     esac
 | |
| }
 | |
| 
 | |
| function ipcalc_gateway() {
 | |
|     # Calculer l'adresse du gateway correspondant à l'adresse ip $1, en
 | |
|     # considérant que le gateway est la première adresse du réseau. Le masque de
 | |
|     # sous-réseau peut-être indiqué dans l'adresse ip avec le suffixe /n ou
 | |
|     # /x.x.x.x ou donné dans l'argument $2. Seuls les suffixes 0, 8, 16, 24, 32
 | |
|     # sont supportés.
 | |
|     # Retourner 1 si un erreur s'est produite, par exemple si l'adresse ou le
 | |
|     # suffixe sont invalides ou non supportés.
 | |
|     [ -n "$1" ] || return
 | |
|     local ip mask
 | |
| 
 | |
|     ipcalc_splitipmask "$1" ip mask
 | |
|     [ -n "$mask" ] || mask="$2"
 | |
|     [ -n "$mask" ] || mask=24
 | |
| 
 | |
|     ip="$(ipcalc_checkip "$ip")" || return
 | |
|     mask="$(ipcalc_checkmask "$mask")" || return
 | |
| 
 | |
|     case "$mask" in
 | |
|     0) echo "0.0.0.1";;
 | |
|     8) ip="${ip%.*.*.*}"; echo "$ip.0.0.1";;
 | |
|     16) ip="${ip%.*.*}"; echo "$ip.0.1";;
 | |
|     24) ip="${ip%.*}"; echo "$ip.1";;
 | |
|     32) echo "$ip";;
 | |
|     esac
 | |
| }
 | |
| 
 | |
| function ipcalc_match() {
 | |
|     # Vérifier si l'adresse $1 correspond au modèle $2, e.g.:
 | |
|     #     ipcalc_match 10.75.0.23 10/8         --> TRUE
 | |
|     #     ipcalc_match 10.75.0.23 10.75.0.0/24 --> TRUE
 | |
|     #     ipcalc_match 10.75.0.23 10.75.0.28   --> FALSE
 | |
|     [ -n "$1" -a -n "$2" ] || return
 | |
|     local ip tip tmask
 | |
| 
 | |
|     ipcalc_splitipmask "$2" tip tmask
 | |
|     [ -n "$tmask" ] || tmask=32
 | |
| 
 | |
|     ip="$(ipcalc_checkip "$1")" || return
 | |
|     tip="$(ipcalc_checkip "$tip")" || return
 | |
|     tmask="$(ipcalc_checkmask "$tmask")" || return
 | |
| 
 | |
|     case "$tmask" in
 | |
|     0) return 0;;
 | |
|     8) [ "${ip%.*.*.*}" == "${tip%.*.*.*}" ];;
 | |
|     16) [ "${ip%.*.*}" == "${tip%.*.*}" ];;
 | |
|     24) [ "${ip%.*}" == "${tip%.*}" ];;
 | |
|     32) [ "$ip" == "$tip" ];;
 | |
|     esac
 | |
| }
 | |
| 
 | |
| function ipcalc_fqdn() {
 | |
|     # Calculer si possible le nom pleinement qualifié correspondant à l'hôte $1.
 | |
|     # Dans tous les cas, afficher l'hôte, mais retourner 1 si la calcul n'a pas
 | |
|     # pu être effectué.
 | |
|     local -a ips hosts
 | |
|     local ip host
 | |
|     if ! ips=("$(ipcalc_checkip "$1")"); then
 | |
|         resolv_ips ips "$1"
 | |
|         if [ -z "${ips[*]}" ]; then
 | |
|             echo "$1"
 | |
|             return 1
 | |
|         fi
 | |
|     fi
 | |
|     for ip in "${ips[@]}"; do
 | |
|         resolv_hosts hosts "$ip"
 | |
|         if [ -n "${hosts[*]}" ]; then
 | |
|             echo "${hosts[0]}"
 | |
|             return 0
 | |
|         fi
 | |
|     done
 | |
|     echo "$1"
 | |
|     return 1
 | |
| }
 | |
| 
 | |
| function ipcalc_fqdn_maybe() {
 | |
|     # Si $1 *semble* déjà être un nom d'hôte pleinement qualifié, l'afficher tel
 | |
|     # quel. Sinon utiliser ipcalc_fqdn() pour afficher le nom d'hôte pleinement
 | |
|     # qualifié correspondant.
 | |
|     if ipcalc_checkip "$1" >/dev/null; then
 | |
|         ipcalc_fqdn "$1"
 | |
|     elif [[ "$1" == *.* ]]; then
 | |
|         echo "$1"
 | |
|     else
 | |
|         ipcalc_fqdn "$1"
 | |
|     fi
 | |
| }
 | |
| 
 | |
| ################################################################################
 | |
| # Fonctions génériques pour la gestion du réseau
 | |
| 
 | |
| __NETWORK_DEVEL_SHOW_MODIFS=
 | |
| 
 | |
| function __network_parse_confbr() {
 | |
|     local br; local -a ifaces
 | |
|     splitpair "$1" br ifaces
 | |
|     array_split ifaces "$ifaces" ,
 | |
| 
 | |
|     __npc_destbr="$br"
 | |
|     array_copy __npc_destifaces ifaces
 | |
| }
 | |
| function network_parse_confbr() {
 | |
|     # network_parse_confbr "$confbr" br ifaces
 | |
|     local __npc_destbr; local -a __npc_destifaces
 | |
|     __network_parse_confbr "$1"
 | |
| 
 | |
|     _setv "${2:-br}" "$__npc_destbr"
 | |
|     array_copy "${3:-ifaces}" __npc_destifaces
 | |
| }
 | |
| 
 | |
| function network_format_confbr() {
 | |
|     # network_format_confbr "$br" ifaces --> "br:ifaces"
 | |
|     echo "$1:$(array_join "${2:-ifaces}" ,)"
 | |
| }
 | |
| 
 | |
| function __network_parse_confip() {
 | |
|     local tmpig iface gateway; local -a ipsuffixes
 | |
|     splitfsep2 "$1" : tmpig ipsuffixes
 | |
|     splitfsep "$tmpig" // iface gateway
 | |
|     array_split ipsuffixes "$ipsuffixes" ,
 | |
| 
 | |
|     __npc_destiface="$iface"
 | |
|     __npc_destgateway="$gateway"
 | |
|     array_copy __npc_destipsuffixes ipsuffixes
 | |
| }
 | |
| function network_parse_confip() {
 | |
|     # network_parse_confip "$confip" iface gateway ipsuffixes
 | |
|     local __npc_destiface __npc_destgateway; local -a __npc_destipsuffixes
 | |
|     __network_parse_confip "$1"
 | |
| 
 | |
|     _setv "${2:-iface}" "$__npc_destiface"
 | |
|     _setv "${3:-gateway}" "$__npc_destgateway"
 | |
|     array_copy "${4:-ipsuffixes}" __npc_destipsuffixes
 | |
| }
 | |
| 
 | |
| function network_parse_ipsuffix() {
 | |
|     # network_parse_ipsuffix "$ipsuffix" ip suffix
 | |
|     splitfsep "$1" / "${2:-ip}" "${3:-suffix}"
 | |
| }
 | |
| 
 | |
| function network_format_confip() {
 | |
|     # network_format_confip "$iface" "$gateway" ipsuffixes --> "iface//gateway:ipsuffixes"
 | |
|     local tmpig="$1${2:+//$2}"
 | |
|     echo "${tmpig:+$tmpig:}$(array_join "${3:-ipsuffixes}" ,)"
 | |
| }
 | |
| 
 | |
| function network_format_ipsuffix() {
 | |
|     # network_format_ipsuffix "$ip" "$suffix" --> "ip/suffix"
 | |
|     local ip="$(strlower "$1")"
 | |
|     if [ "$ip" == "dhcp" ]; then
 | |
|         echo "$ip"
 | |
|     else
 | |
|         echo "$1${2:+/$2}"
 | |
|     fi
 | |
| }
 | |
| 
 | |
| function __network_fix_confbrs() {
 | |
|     local -a confbrs ifaces brs ips
 | |
|     local confbr br iface
 | |
| 
 | |
|     # recenser les bridges et créer les tableaux __BR_ifaces
 | |
|     for confbr in "${__nfc_confbrs[@]}"; do
 | |
|         network_parse_confbr "$confbr" br ifaces
 | |
|         array_addu brs "$br"
 | |
|         eval "local -a ${br}_ifaces"
 | |
|     done
 | |
|     # puis constuire la liste des interfaces associées à chaque bridge
 | |
|     for confbr in "${__nfc_confbrs[@]}"; do
 | |
|         network_parse_confbr "$confbr" br ifaces
 | |
|         array_extendu "${br}_ifaces" ifaces
 | |
|     done
 | |
|     # puis construire le tableau final
 | |
|     array_new confbrs
 | |
|     for br in "${brs[@]}"; do
 | |
|         array_add confbrs "$(network_format_confbr "$br" "${br}_ifaces")"
 | |
|     done
 | |
| 
 | |
|     array_copy __nfc_destconfbrs confbrs
 | |
| }
 | |
| function network_fix_confbrs() {
 | |
|     # normaliser le tableau $1(=confbrs): fusionner les doublons
 | |
|     local -a __nfc_confbrs __nfc_destconfbrs
 | |
|     array_copy __nfc_confbrs "${1:-confbrs}"
 | |
|     __network_fix_confbrs
 | |
| 
 | |
|     array_copy "${1:-confbrs}" __nfc_destconfbrs
 | |
| }
 | |
| 
 | |
| function __network_fix_confips() {
 | |
|     local -a confips ipsuffixes ifaces ips
 | |
|     local confip iface gateway network ip suffix mainip
 | |
| 
 | |
|     local mainiface="$1"
 | |
| 
 | |
|     # recenser les interfaces et créer les tableaux __IFACE_ipspecs
 | |
|     for confip in "${__nfc_confips[@]}"; do
 | |
|         network_parse_confip "$confip" iface gateway ipsuffixes
 | |
|         if [ -n "$iface" ]; then
 | |
|             network="${iface}_network"
 | |
|             if ! array_contains ifaces "$iface"; then
 | |
|                 array_add ifaces "$iface"
 | |
|                 eval "local ${iface}_gateway $network; local -a ${iface}_ipsuffixes"
 | |
|             fi
 | |
|             if [ -z "${!network}" -a -n "${ipsuffixes[0]}" ]; then
 | |
|                 _setv "$network" "$(ipcalc_network "${ipsuffixes[0]}")"
 | |
|             fi
 | |
|         fi
 | |
|     done
 | |
|     if [ -n "$mainiface" ]; then
 | |
|         iface="$mainiface"
 | |
|         if ! array_contains ifaces "$iface"; then
 | |
|             array_add ifaces "$iface"
 | |
|             eval "local ${iface}_gateway $network; local -a ${iface}_ipsuffixes"
 | |
|         fi
 | |
|     fi
 | |
|     # puis construire la liste des adresses IP associées à chaque interface
 | |
|     for confip in "${__nfc_confips[@]}"; do
 | |
|         network_parse_confip "$confip" iface gateway ipsuffixes
 | |
|         # si aucune interface n'est spécifiée, sélectionner celle correspondant
 | |
|         # à la même adresse de réseau. sinon prendre $mainiface
 | |
|         if [ -z "$iface" ]; then
 | |
|             network="$(ipcalc_network "${ipsuffixes[0]}")"
 | |
|             local ip_iface ip_network
 | |
|             for ip_iface in "${ifaces[@]}"; do
 | |
|                 ip_network="${ip_iface}_network"
 | |
|                 if [ "${!ip_network}" == "$network" ]; then
 | |
|                     iface="$ip_iface"
 | |
|                     break
 | |
|                 fi
 | |
|             done
 | |
|         fi
 | |
|         [ -n "$iface" ] || iface="$mainiface"
 | |
|         # si la passerelle a déjà été spécifiée, la récupérer
 | |
|         local tmpgw="${iface}_gateway"
 | |
|         [ -n "${!tmpgw}" ] && gateway="${!tmpgw}"
 | |
|         # calculer l'adresse ip principale, pour pouvoir traiter le cas où
 | |
|         # l'adresse ip principale est l'adresse de la passerelle.
 | |
|         mainip=
 | |
|         for ipsuffix in "${ipsuffixes[@]}"; do
 | |
|             network_parse_ipsuffix "$ipsuffix" ip suffix
 | |
|             if ! array_contains ips "$ip"; then
 | |
|                 [ -n "$suffix" ] || suffix=24
 | |
|                 if [ -z "$mainip" ]; then
 | |
|                     [ -n "$gateway" ] || gateway="$(ipcalc_gateway "$ip" "$suffix")"
 | |
|                     mainip="$ip"
 | |
|                 fi
 | |
|                 array_add "${iface}_ipsuffixes" "$(network_format_ipsuffix "$ip" "$suffix")"
 | |
|                 array_add ips "$ip"
 | |
|             fi
 | |
|         done
 | |
|         [ "$gateway" == "$mainip" ] && gateway=
 | |
|         # si l'adresse ip principale est obtenue par dhcp, il ne faut pas
 | |
|         # spécifier la passerelle: elle sera fournie par le serveur DHCP.
 | |
|         # Utiliser le marqueur "none" pour que la valeur ne soit pas modifiée.
 | |
|         [ "${ipsuffixes[0]}" == "dhcp" ] && gateway=none
 | |
|         _setv "${iface}_gateway" "$gateway"
 | |
|     done
 | |
|     # puis construire le tableau final
 | |
|     array_new confips
 | |
|     for iface in "${ifaces[@]}"; do
 | |
|         gateway="${iface}_gateway"; gateway="${!gateway}"
 | |
|         [ "$gateway" == "none" ] && gateway=
 | |
|         array_add confips "$(network_format_confip "$iface" "$gateway" "${iface}_ipsuffixes")"
 | |
|     done
 | |
| 
 | |
|     array_copy __nfc_destconfips confips
 | |
| }
 | |
| function network_fix_confips() {
 | |
|     # normaliser le tableau $1(=confips): fusionner les doublons, spécifier le
 | |
|     # suffixe /24 par défaut, etc. $2 est le cas échéant l'interface associée
 | |
|     # aux adresses ip non qualifiées
 | |
|     local -a __nfc_confips __nfc_destconfips
 | |
|     array_copy __nfc_confips "${1:-confips}"
 | |
|     __network_fix_confips "$2"
 | |
| 
 | |
|     array_copy "${1:-confips}" __nfc_destconfips
 | |
| }
 | |
| 
 | |
| function __network_fix_mainiface() {
 | |
|     local -a confips ifaces ipsuffixes
 | |
|     local br iface gateway confip mainconfip
 | |
| 
 | |
|     local mainiface="$1"
 | |
| 
 | |
|     # déterminer mainiface
 | |
|     if [ -z "$mainiface" -a -n "${__nfm_confbrs[0]}" ]; then
 | |
|         network_parse_confbr "${__nfm_confbrs[0]}" br ifaces
 | |
|         mainiface="$br"
 | |
|     fi
 | |
|     if [ -z "$mainiface" -a -n "${__nfm_confips[0]}" ]; then
 | |
|         network_parse_confip "${__nfm_confips[0]}" iface gateway ipsuffixes
 | |
|         mainiface="$iface"
 | |
|     fi
 | |
|     [ -n "$mainiface" ] || mainiface=eth0
 | |
| 
 | |
|     # ensuite, il faut reécrire confips avec la valeur de mainiface
 | |
|     array_new confips
 | |
|     for confip in "${__nfm_confips[@]}"; do
 | |
|         network_parse_confip "$confip" iface gateway ipsuffixes
 | |
|         [ -n "$iface" ] || iface="$mainiface"
 | |
|         confip="$(network_format_confip "$iface" "$gateway" ipsuffixes)"
 | |
|         if [ "$iface" == "$mainiface" ]; then
 | |
|             mainconfip="$confip"
 | |
|         else
 | |
|             array_add confips "$confip"
 | |
|         fi
 | |
|     done
 | |
|     [ -n "$mainconfip" ] && array_ins confips "$mainconfip"
 | |
| 
 | |
|     array_copy __nfm_destconfips confips
 | |
| }
 | |
| function network_fix_mainiface() {
 | |
|     # A partir des valeurs des tableaux $1(=confbrs) et $2(=confips), et de
 | |
|     # l'interface principale $3, déterminer l'interface principale. Si $3 est
 | |
|     # spécifié, c'est la valeur sélectionnée. Sinon, si un bridge existe, c'est
 | |
|     # le premier bridge qui est sélectionné. Sinon, la première interface est
 | |
|     # sélectionnée. Sinon, on prend eth0.
 | |
|     # Ensuite, réorganiser les tableaux de façon que confips[0] devienne la
 | |
|     # configuration ip de l'interface principale.
 | |
|     local -a __nfm_confbrs __nfm_confips __nfm_destconfips
 | |
|     array_copy __nfm_confbrs "${1:-confbrs}"
 | |
|     array_copy __nfm_confips "${2:-confips}"
 | |
|     __network_fix_mainiface "$3"
 | |
| 
 | |
|     array_copy "${2:-confips}" __nfm_destconfips
 | |
| }
 | |
| 
 | |
| function network_fix_confs() {
 | |
|     network_fix_confbrs "${1:-confbrs}"
 | |
|     network_fix_confips "${2:-confips}"
 | |
|     network_fix_mainiface "${1:-confbrs}" "${2:-confips}" "$3"
 | |
| }
 | |
| 
 | |
| function __network_valid_ifaces() {
 | |
|     ip link | awk '/<.*>/ {
 | |
|   flags = $0; sub(/^.*</, ",", flags); sub(/>.*$/, ",", flags)
 | |
|   if (flags ~ /,LOOPBACK,/) next
 | |
|   if (flags !~ /,UP,/) next
 | |
|   sub(/:$/, "", $2); print $2
 | |
| }'
 | |
| }
 | |
| 
 | |
| function __network_set_confbrs() {
 | |
|     local -a ifaces tmpconfbrs confbrs
 | |
|     local confbr br iface
 | |
|     array_from_lines ifaces "$(__network_valid_ifaces)"
 | |
|     array_from_lines tmpconfbrs "$(brctl show 2>/dev/null | awk '
 | |
| BEGIN { confbrs = "" }
 | |
| NR == 1 { next }
 | |
| {
 | |
|   if ($1 != "" && $2 != "") {
 | |
|     if (confbr != "") print confbr
 | |
|     confbr = $1 ":" $4
 | |
|   } else {
 | |
|     confbr = confbr "," $1
 | |
|   }
 | |
| }
 | |
| END {
 | |
|     if (confbr != "") print confbr
 | |
| }
 | |
| ')"
 | |
|     for confbr in "${tmpconfbrs[@]}"; do
 | |
|         splitpair "$confbr" br iface
 | |
|         array_contains ifaces "$br" || continue
 | |
|         array_add confbrs "$confbr"
 | |
|     done
 | |
| 
 | |
|     array_copy __nsc_destconfbrs confbrs
 | |
| }
 | |
| function network_set_confbrs() {
 | |
|     # initialiser $1(=confbrs) avec l'état des bridges sur le système courant
 | |
|     local -a __nsc_destconfbrs
 | |
|     __network_set_confbrs
 | |
| 
 | |
|     array_copy "${1:-confbrs}" __nsc_destconfbrs
 | |
| }
 | |
| 
 | |
| function __network_set_gateway() {
 | |
|     # initialiser la variable gateway avec la passerelle associée à l'interface
 | |
|     # $1
 | |
|     gateway="$(ip route | awk -v iface="$1" '$1 == "default" {
 | |
|   via = ""
 | |
|   dev = ""
 | |
|   for (i = 2; i <= NF; i++) {
 | |
|     if ($i == "via") via = $(i+1)
 | |
|     else if ($i == "dev") dev = $(i+1)
 | |
|     if (via != "" && dev != "") break
 | |
|   }
 | |
|   if (dev == iface && via != "") {
 | |
|     print via
 | |
|   }
 | |
| }')"
 | |
|     # le code précédent utilisait route, mais ce n'est pas toujours disponible
 | |
|     #gateway="$(route -n | awk -v iface="$1" '$1 == "0.0.0.0" && $8 == iface { print $2 }')"
 | |
| }
 | |
| function __network_set_confip() {
 | |
|     # initialiser la variable confip avec l'état de l'interface $1, en assumant
 | |
|     # que la passerelle vaut $2.
 | |
|     # retourner 1 si l'interface n'a pas d'adresse ip associée
 | |
|     local -a ipsuffixes
 | |
|     array_from_lines ipsuffixes "$(ip addr show dev "$1" | awk '$1 == "inet" { print $2 }')"
 | |
|     confip="$(network_format_confip "$1" "$2" ipsuffixes)"
 | |
|     [ "${#ipsuffixes[*]}" -gt 0 ]
 | |
| }
 | |
| function __network_set_confips() {
 | |
|     local -a confips ifaces
 | |
|     local iface gateway
 | |
|     array_from_lines ifaces "$(__network_valid_ifaces)"
 | |
|     for iface in "${ifaces[@]}"; do
 | |
|         __network_set_gateway "$iface"
 | |
|         [ -n "$gateway" ] || gateway=-
 | |
|         __network_set_confip "$iface" "$gateway" || continue
 | |
|         array_add confips "$confip"
 | |
|     done
 | |
| 
 | |
|     array_copy __nsc_destconfips confips
 | |
| }
 | |
| function network_set_confips() {
 | |
|     # initialiser le tableau $1(=confips) avec l'état des interfaces sur le
 | |
|     # système courant
 | |
|     local -a __nsc_destconfips
 | |
|     __network_set_confips
 | |
| 
 | |
|     array_copy "${1:-confips}" __nsc_destconfips
 | |
| }
 | |
| 
 | |
| function __network_backup() {
 | |
|     local file="$1"
 | |
|     local backup="$file.orig$(date +%Y%m%d)"
 | |
|     [ -f "$backup" ] || cat "$file" >"$backup" 2>/dev/null
 | |
| }
 | |
| 
 | |
| function network_fix_exim4() {
 | |
|     local host="$1" oldhost="$2"
 | |
|     local tmpfile; ac_set_tmpfile tmpfile
 | |
|     local modified
 | |
| 
 | |
|     sed </etc/exim4/update-exim4.conf.conf >"$tmpfile" "
 | |
| /^dc_other_hostnames=/c\\
 | |
| dc_other_hostnames='$host'"
 | |
|     if [ -n "$__NETWORK_DEVEL_SHOW_MODIFS" ]; then
 | |
|         if testdiff "$tmpfile" /etc/exim4/update-exim4.conf.conf; then
 | |
|             uecho "Setting /etc/exim4/update-exim4.conf.conf to:"
 | |
|             cat "$tmpfile" | sed 's/^/    /g' 1>&2
 | |
|         else
 | |
|             uecho "/etc/exim4/update-exim4.conf.conf: pas de modifications"
 | |
|         fi
 | |
|     elif testdiff "$tmpfile" /etc/exim4/update-exim4.conf.conf; then
 | |
|         __network_backup /etc/exim4/update-exim4.conf.conf
 | |
|         if show_debug; then
 | |
|             edebug "Setting /etc/exim4/update-exim4.conf.conf to:"
 | |
|             cat "$tmpfile" | sed 's/^/    /g' 1>&2
 | |
|         else
 | |
|             estep /etc/exim4/update-exim4.conf.conf
 | |
|         fi
 | |
|         cat "$tmpfile" >/etc/exim4/update-exim4.conf.conf
 | |
|         update-exim4.conf
 | |
|         modified=1
 | |
|     fi
 | |
|     ac_clean "$tmpfile"
 | |
|     [ -n "$modified" ]
 | |
| }
 | |
| 
 | |
| function network_fix_postfix() {
 | |
|     local host="$1" oldhost="$2"
 | |
|     local tmpfile; ac_set_tmpfile tmpfile
 | |
|     local modified
 | |
| 
 | |
|     awkrun </etc/postfix/main.cf >"$tmpfile" host="$host" oldhost="$oldhost" '
 | |
| /^myhostname *=/ { $0 = "myhostname = " host }
 | |
| /^mydestination *=/ {
 | |
|   gsub(" *" oldhost " *,? *", "")
 | |
|   if ($0 !~ (" *" host " *,? *")) {
 | |
|     sub(/^mydestination *= */, "mydestination = " host ", ")
 | |
|   }
 | |
| }
 | |
| { print }'
 | |
|     if [ -n "$__NETWORK_DEVEL_SHOW_MODIFS" ]; then
 | |
|         if testdiff "$tmpfile" /etc/postfix/main.cf; then
 | |
|             uecho "Setting /etc/postfix/main.cf to:"
 | |
|             cat "$tmpfile" | sed 's/^/    /g' 1>&2
 | |
|         else
 | |
|             uecho "/etc/postfix/main.cf: pas de modifications"
 | |
|         fi
 | |
|     elif testdiff "$tmpfile" /etc/postfix/main.cf; then
 | |
|         __network_backup /etc/postfix/main.cf
 | |
|         if show_debug; then
 | |
|             edebug "Setting /etc/postfix/main.cf to:"
 | |
|             cat "$tmpfile" | sed 's/^/    /g' 1>&2
 | |
|         else
 | |
|             estep /etc/postfix/main.cf
 | |
|         fi
 | |
|         cat "$tmpfile" >/etc/postfix/main.cf
 | |
|         modified=1
 | |
|     fi
 | |
|     ac_clean "$tmpfile"
 | |
|     [ -n "$modified" ]
 | |
| }
 | |
| 
 | |
| function network_fix_hosts() {
 | |
|     local host="$1" hostname="${1%%.*}"; local shost="${host//./\\.}"
 | |
|     local ip="$2"; local sip="${ip//./\\.}"
 | |
|     local oldhost="$3" oldhostname="${3%%.*}"; soldhost="${host//./\\.}"
 | |
|     local tmpfile; ac_set_tmpfile tmpfile
 | |
|     local modified
 | |
| 
 | |
|     awkrun </etc/hosts >"$tmpfile" \
 | |
|         host="$host" hostname="$hostname" \
 | |
|         ip="$ip" \
 | |
|         oldhost="$oldhost" oldhostname="$oldhostname" \
 | |
|         '
 | |
| /^[^# \t]/ {
 | |
|   gsub("[ \\t]+" host "[ \\t]*", " ")
 | |
|   gsub("[ \\t]+" hostname "[ \\t]*", " ")
 | |
|   gsub("[ \\t]+" oldhost "[ \\t]*", " ")
 | |
|   gsub("[ \\t]+" oldhostname "[ \\t]*", " ")
 | |
|   if ($0 ~ /^[^ \t]+[ \t]*$/) next
 | |
|   gsub(/[ \t]*$/, "")
 | |
| }
 | |
| { print }'
 | |
|     if quietgrep "^$sip[ $TAB]\\+$shost[ $TAB]\\+$hostname" "$tmpfile"; then
 | |
|         sed -i "\
 | |
| s/\$/ /
 | |
| /^[ $TAB]$oldhost[ $TAB]/d
 | |
| /^[ $TAB]$oldhostname[ $TAB]/d
 | |
| s/ \$//
 | |
| " "$tmpfile"
 | |
|     fi
 | |
|     if ! quietgrep "^$sip[ $TAB]\\+$shost[ $TAB]\\+$hostname" "$tmpfile"; then
 | |
|         sed -i "/^$sip[ $TAB]/d" "$tmpfile"
 | |
|         sed -i "1i\\
 | |
| $ip$TAB$host $hostname" "$tmpfile"
 | |
|     fi
 | |
| 
 | |
|     if [ -n "$__NETWORK_DEVEL_SHOW_MODIFS" ]; then
 | |
|         if testdiff "$tmpfile" /etc/hosts; then
 | |
|             uecho "Setting /etc/hosts to:"
 | |
|             cat "$tmpfile" | sed 's/^/    /g' 1>&2
 | |
|         else
 | |
|             uecho "/etc/hosts: pas de modifications"
 | |
|         fi
 | |
|     elif testdiff "$tmpfile" /etc/hosts; then
 | |
|         __network_backup /etc/hosts
 | |
|         if show_debug; then
 | |
|             edebug "Setting /etc/hosts to:"
 | |
|             cat "$tmpfile" | sed 's/^/    /g' 1>&2
 | |
|         else
 | |
|             estep /etc/hosts
 | |
|         fi
 | |
|         cat "$tmpfile" >/etc/hosts
 | |
|         modified=1
 | |
|     fi
 | |
|     ac_clean "$tmpfile"
 | |
|     [ -n "$modified" ]
 | |
| }
 |