kyopages/scripts/getIp

#!/bin/bash

version=2.00.0
date="24/12/2017"
projet="simpledeb"
contact="IRC freenode ##sdeb ou https://framagit.org/kyodev/kyopages/issues/"
script="getIp"

##### license LPRAB/WTFPL
#  auteur: simpledeb
#    contributeurs: kyodev
#####

	# $1=commande à tester, return localisation cmd si existe, return 1 si absent avec aucun message (ala debian)
	# pour un test concis genre  [ "$(f__cmd_exist $cmd)" ] && echo "$cmd existe"
	# utilisation `type -p` pour le test, pour une bonne portabilité
f__cmd_exist(){		# 22/10/2017
#	command -v
	if type -p "$1" &>/dev/null ; then
		echo $(type -p $1)
	else
		return 1
	fi
}

f__color(){		# 08/10/2017
	YELLOW=$(tput setaf 3)		# question
	 GREEN=$(tput setaf 2)		# ok
	  BLUE=$(tput setaf 4)		# info
	   RED=$(tput setaf 1)		# alerte
	   STD=$(tput sgr0)			# retour normal
		MAGENTA=$(tput setaf 5)
		CYAN=$(tput setaf 6)
	BOLD=$(tput bold)
	ITAL=$(tput sitm)
	SOUL=$(tput smul)
}

	# $1=-c|-l|-lc, $2 répertoire, [$3] motif exclusion sur nom fichier,  affiche 0|null si répertoire inexistant
	# -c: compte du nombre de fichiers dans un répertoire
	# -l: liste inline des noms de fichiers seuls
	# -lc: liste en colonne des noms de fichiers seuls
	# si joker (*?) sur chemin, le motif d'exclusion ne s'applique pas à un répertoire listé, juste sur le nom du fichier
	# attention, les jokers sont interprétés à l'appel de la fonction 
	# exemple: f__dir -l "$dir" "lock|partial" ou "\.list"
f__dir(){		 # 12/12/2017
	local i=0 action="-c" stock=''

	[[ "$1" =~ - ]] && action="$1" || action="-c"	# si option en erreur: -c
	while read -r ; do 
		if [[ ! "$REPLY" =~ $3 ]] || [ -z "$3" ]; then
			REPLY=${REPLY#*:}				# suppression du titre de répertoire listé
			[ -z "$REPLY" ] && continue		# ligne vide, on passe
			((i++))
			stock+="$REPLY "
#echo "$REPLY  $i"
		fi
	done <<< $( ls $2 2>/dev/null )
	if [ "$action" == "-c" ]; then
		echo "$i"
	elif [ "$action" == "-l" ]; then
		echo ${stock% }
	elif [ "$action" == "-lc" ]; then
		stock=${stock% }
		echo -e "${stock// /$'\n'}"
	fi
}

	# affichage $1 en rouge, $1++ optionnels en bleu, sortie script sur erreur, log $1 si $operation=upgrade
f__error(){		# 18/12/2017
	local depart=1 i

	echo -e "\n$RED  $script $version, erreur critique: $1 $STD"
	for (( i=2 ; i<=$# ; i++ )); do
		echo -e "  $BLUE${!i}$STD"
	done
	echo
	[ "$operation" == "upgrade" ] && f__log "$script $version: $1"
	exit 1
}

	# affichage des paramètres en bleu, si $1=raw pas de ligne vide à la fin, si $1=log alors uniquement $2 logué
f__info(){		# 18/12/2017
	local depart=1 i

	[[ "$1" == "raw"  ||  "$1" == "log" ]] && depart=2
	[ "$1" == "log" ] && f__log "$(sed -E 's/\\t//;s/\\n// ' <<< $2 | xargs )"
	for (( i=$depart ; i<=$# ; i++ )); do
		echo -e "  $BLUE${!i}$STD"
	done
	[ "$1" == raw ] || echo 
}

	# log spécifique, fichier log limité à 10000 octets, $1 message à loguer
f__log(){		# 4/12/2017

	if [ -w "$script_logs" ];  then 
		if [ "$(stat -c %s  $script_logs)" -ge "10000" ]; then
			echo "$(date +%Y%m%d\ %H%M%S) $1"  &>/dev/null > "$script_logs"
		else 
			echo "$(date +%Y%m%d\ %H%M%S) $1"  &>/dev/null >> "$script_logs"
		fi
	fi
}

	# test dépendances/paquets, $1 liste commande[>paquet] (ex: killall>psmisc)
	# si manque, return 1 & info commandes manquantes, si debian proposition paquet à installer 
	# si $2=debOnly et si paquets manquants: return 1 et $debOnlyAbsent ( $1=liste paquets )
	# si $2=debOnly et si paquets présent: return 0 et $debOnlyPresent ( $1=liste paquets )
	# attention priorité $debOnlyAbsent sur $debOnlyPresent
f__requis(){		# 4/12/2017
	local dependsMissing packagesMissing command package ireq compteur pluriel

	unset debOnlyAbsent debOnlyPresent
	for ireq in $1; do
		command="$(cut -d '>' -f 1 <<< $ireq)"
		package="$(cut -d '>' -f 2 <<< $ireq)"
		if [ "$2" == "debOnly" ]; then
			if type -p "dpkg" &>/dev/null ; then	# package only et debian
				LC_ALL=C dpkg --get-selections | grep -qE "^$package[[:space:]]+install" \
					&& debOnlyPresent+="$package " || debOnlyAbsent+="$package " 
			fi
		elif ! type -p "$command" &>/dev/null ; then
			dependsMissing+="$command "
			packagesMissing+="$package "
		fi
	done
	[ "$debOnlyAbsent" ] && debOnlyAbsent="$(xargs <<< $debOnlyAbsent)"		# trim début & fin
	[ "$debOnlyPresent" ] && debOnlyPresent="$(xargs <<< $debOnlyPresent)"		# trim début & fin
	[ "$debOnlyAbsent" ] && return 1 
	[ "$debOnlyPresent" ] && return 0
	if [ "$dependsMissing" ]; then
		compteur="$(wc -w <<< $dependsMissing)"
		[ "$compteur" -gt "1" ] && pluriel="s" || unset pluriel
		if [ -e /etc/debian_version ]; then 
			f__info "$RED""erreur critique: $compteur paquet"$pluriel" manquant"$pluriel": $STD$BOLD$dependsMissing" \
				"\n  vous devriez exécuter:$GREEN apt install $packagesMissing"
		else 
			f__info "$RED""erreur critique: $compteur commande"$pluriel" manquante"$pluriel": $STD$BOLD$dependsMissing"
		fi
		return 1
	fi
}

	# $1=cmd si $2: nb de tentatives pour s'identifier, sinon 2 tentatives par défaut, suppose bash existant
f__sudo(){		# 23/12/2017
	local nb=2 sudo isudo toBash

	type -p bash &>/dev/null && toBash=$( type -p bash ) || return 2
		# sudo --shell bash		équivalent su ?
	if sudo -v &>/dev/null && [ $EUID -ne 0 ] ; then
		sudo="sudo su --shell $toBash --preserve-environment -c "
	else
		sudo="su --shell $toBash --preserve-environment -c "
	fi
	[ "$2" ] && nb=$(( "$2" ))
	for (( isudo=1 ; isudo<="$nb" ; isudo++ )); do 
		$sudo " $1"
		[ "$?" == 0 ] && break
		[ "$isudo" == "$nb" ] && return 1
	done
}

	# user ayant initié la session graphique, assigne $fu_user
	# return 1 sur échec identification user, return 2 sur absence home/
	# gestion variable environnement user avec: USER_INSTALL=<user> script
f__user(){		# 3/12/2017
	local user userid test root_login

	root_login="$(grep ':0:' /etc/passwd | cut -d':' -f1)" || root_login="root"
	if [ "$USER_INSTALL" ]; then 	# user via variable environnement, moyen d'injecter root si pb 
		fu_user="$USER_INSTALL"; 
		return 0
	elif [[ "$TERM" =~ linux ]]; then	#debian 9 recovery ou nomodeset TERM=linux
		if [ "$USER" ]; then
			user="$USER"
		elif [ "$EUID" -eq 0 ]; then
			fu_user="$root_login"
			return 0
		fi
	fi
	if [ "$SUDO_UID" ]; then 
		userid="$SUDO_UID"; 
	elif grep -qEo '[0-9]+' <<< "$XDG_RUNTIME_DIR" ; then 
		userid="$(grep -Eo '[0-9]+' <<< $XDG_RUNTIME_DIR | cut -d'/' -f4)"
	elif grep -qEo '[0-9]+' <<< "$XAUTHORITY" ; then 
		userid="$(grep -Eo '[0-9]+' <<< $XAUTHORITY | cut -d'/' -f4)"
	fi
	[ "$userid" ] && user="$(grep $userid /etc/passwd | cut -d ":" -f 1 )"
	if [ "$user" ] && [ "$user" != "$root_login" ]; then
		fu_user="$user"
		return 0
	else
		if [ "$SUDO_USER" ] && [ "$SUDO_USER" != "$root_login" ]; then 
			user="$SUDO_USER"; 
		elif grep -qv 'root' <<< "$(who)"; then 
			user="$(grep -v 'root' <<< $(who) | head -n1 | cut -d ' ' -f1)";	# grep -v 'root' <<< $(who) | gawk 'FNR==1{print $1}'
		elif grep -q 'hourly.*get[A-Z].*\.anacrontab.*\.config/anacron/spool' /etc/crontab; then 
			user="$(grep 'hourly.*get[A-Z].*\.anacrontab.*\.config/anacron/spool' /etc/crontab | head -n1 | cut -d' ' -f2)"; # grep 'hourly.*get[A-Z].*\.anacrontab.*\.config/anacron/spool' /etc/crontab | gawk 'FNR==1{print $2}
		fi
	fi
	fu_user="$user"
	[ "$fu_user" ] || return 1
	[ -d "/home/$fu_user" ] || return 2
	return 0
}

	# $1='-l' comptage ligne dans variable $2, affiche quantité
	# $1='-w' comptage dans variable $2 des mots
	# $1='-wv' comptage dans variable $2, des mots $3, affiche quantité
	# f__wcv -l $var ;  f__wcv -w $var  ;  f__wcv -wv $var "mot"
f__wcv(){		# 09/11/2017
	[[ "$1" =~ -l|-wv|-w  ]] || display="erreur f__wcv \$1 ($1) incorrect  \n"
	[ "$1" == "-l"  ] && echo "$2" | grep -cEv '^[[:space:]]*$'		# (wc -l compterait 1 pour une variable vide)
	[ "$1" == "-w"  ] && echo "$(xargs <<< $2) " | grep -o " " |  grep -c  . # echo $(( $(grep -c  .)+1 ))
	[ "$1" == "-wv"  ] && echo "$2" | grep -o "$3" | grep -c  .
}

	# test wget, $1=url à tester, sortie du script (même si url testée ok) avec affichage erreur ou ok
	# si $2=print affiche url testée & entêtes http & location, return 0
	# si $2=loc affiche seulement location, return 0
	# si $2=test return 0 si ok, return 1 si KO
f__wget_test(){		# 23/12/2017
	local file_test_wget="/tmp/testWget-$script" retourWget retourHttp location wget_log="/tmp/testWget_$RANDOM.log"

	wget -Sq --timeout=5 --tries=2 --user-agent="$user_agent" -o "$wget_log" --spider --save-headers "$1" &>"$file_test_wget"
	retourWget="$?"
	rm "$wget_log"
	[ "$retourWget" == 1 ] && retourWget="1: code erreur générique"
	[ "$retourWget" == 2 ] && retourWget="2: parse erreur (ligne de commande?)"
	[ "$retourWget" == 3 ] && retourWget="3: erreur Entrée/sortie fichier"
	[ "$retourWget" == 4 ] && retourWget="4: défaut réseau"
	[ "$retourWget" == 5 ] && retourWget="5: défaut vérification SSL"
	[ "$retourWget" == 6 ] && retourWget="6: défaut authentification"
	[ "$retourWget" == 7 ] && retourWget="7: erreur de protocole"
	[ "$retourWget" == 8 ] && retourWget="8: réponse serveur en erreur"
	retourHttp=$( grep -i 'HTTP/' "$file_test_wget" | tr -d '\n' | xargs )
	location=$( grep -i 'location' $file_test_wget | xargs )
	if [ "$2" == "test" ]; then
		rm -f "$file_test_wget"
		rm -f "$wget_log"
			# spécial maintenance frama.link, pas de redirection sur page status framalink
		grep -q '303' <<< $retourHttp && return 1			# 303 See Other
		[ "$retourWget" == "0" ] && return 0 || return 1
	fi
	if [ "$2" == "print" ]; then
		if [ "$retourWget" != "0" ]; then
			echo "erreur wget: erreur $RED$retourWget" 
			echo -e "$BLUE  $1$STD\t$RED  $retourHttp"
		else
			echo -e "$BLUE  $1$STD\t$GREEN  $retourHttp" 
		fi
		echo "$STD"
	fi
	if [ "$2" == "print" ] || [ "$2" == "loc" ]; then
		[ "$location" ] && echo -n "$YELLOW  $location" || echo -n "$YELLOW  no location"
		echo "$STD"
		rm -f "$file_test_wget"
		rm -f "$wget_log"
		return 0
	fi
	if [ "$retourWget" != "0" ]; then
		rm  "$file_test_wget"
		rm -f "$wget_log"
		f__error "wget, erreur $retourWget" "$1" "$YELLOW$retourHttp" "$location"
		echo -e "$RED   erreur wget, $retourWget \n  $1 \n  $YELLOW$retourHttp \n  $location$STD" # pour les diags
		return 1
	fi
	if grep -q '200' <<< $retourHttp; then 
		echo -e "$GREEN\ntout est ok, réessayer$STD\n"
	fi
	rm  "$file_test_wget"
	rm -f "$wget_log"
	exit 0
}

	# $1=commande à tester, return localisation cmd si existe, return 1 si absent avec aucun message (à là debian)
	# pour un test concis genre  [ "$(f__which $cmd)" ] && echo "$cmd existe"
	# utilisation `type -p` pour le test, pour une bonne portabilité
f__which(){		# 27/11/2017
	if type -p "$1" &>/dev/null ; then
		echo $( type -p $1 2>/dev/null ) # équivalent: command -v
	else
		return 1
	fi
}

f_affichage(){
	local affichage_text="            _   ___       
  __ _  ___| |_|_ _|_ __  
 / _' |/ _ \ __|| || '_ \ 
| (_| |  __/ |_ | || |_) |
 \__, |\___|\__|___| .__/ 
 |___/             |_|    "
	echo -e "$GREEN$affichage_text\n  $YELLOW$version$STD - $YELLOW$date$STD\n"
}

f_help(){		# 4/12/2017

cat << 'EOF'
  ----------------------------------------------------------------------
  ./getIp      : exécution normale
  getIp        : exécution normale si script installé dans le système

  ce script requiert une des commandes suivantes pour déterminer l'ip publique :
    dig (dnsutils) / wget / curl / telnet / nc

  options:
     -h, --help    : affichage aide
 
     -4, --ip4     : affiche ipv4 public
     -6, --ip6     : affiche ipv6 public

     -46 --public  : afiche ipv4 & ipv6 public
     '', --local   : affiche adresses mac / ip privées / passerelle

     -us           : upgrade spécial du script (pas de mise à jour auto, maj du script en place)

     -i, --install : installation du script dans le système
     -r, --remove  : suppression du script dans le système
     -u, --upgrade : upgrade script installé si maj possible
     -v, --version : version du script, en ligne et en cours d'exécution
EOF
echo -e "$STD  plus d'infos: $GREEN$url_notice\n$STD"
}

	# f_pr "1|2|3|titre1|titre2|hl|quote|flush" "texte" '[CONDITION test]'
	# 	$1: 
	# 		1|2|3 indentation, liste à puce, une puce par ligne
	# 		l1|l2|l3 ligne, indentation, avec espaces
	# 		titre1|titre2|titre3
	# 		quote|hl|flush
	# 	$2 texte à afficher
	# 	$3 test éventuel, Si CONDITION ok -> affichage
	# 	ATTENTION aux éventuelles collision $x dans ce cas:
	#	"[ \"$1\" != \"notitre\" ]"	ou	"[ $1 != notitre ]" (attention au manque de ")
	# flush (f_pr flush) inutile si f_d(x) final
	# $1 type, $2 texte, [$3] test	/!\ assigne la variable parent $text
f_pr(){		# 10/12/2017
	local preline='' line='' endline="  \n" 

	[[ "$1" == 'titre1' ]] && preline="        $GREEN"
	[[ "$1" == 'titre1' ]] && endline+="$STD"
	[[ "$1" == 'titre2' ]] && preline+="$BOLD"
	[[ "$1" == 'titre2' ]] && endline+="$STD"
#	[[ "$1" =~ titre ]] && endline+="\n"
	[[ "$1" == 'l1' ]] && line="$( sed -E 's/(.*)/\1/  ' <<<$2 )"
	[[ "$1" == 'l2' ]] && line="$( sed -E 's/(.*)/  \1/  ' <<<$2 )"
	[[ "$1" == 'l3' ]] && line="$( sed -E 's/(.*)/    \1/  ' <<<$2 )"
	[[ "$line" ]] || line="$2"			# utilisation $2 sans traitement à faire

	if [[ "$3" ]]; then
		eval $3 || return 0				# évaluation de la CONDITION, si erreur: sortie
	fi
	if [[ "$1" == "hl" ]]; then			# <hl>
		text+="\n---\n\n"
	elif [[ "$1" ]]; then
		text+="$preline$line$endline"	# ligne formatée
	else
		text+="\n"						# newline
	fi
}

	# $1=-4|-6|-46 protocole
fi_ip_pub(){		#v 14/12/2017
	local itest option="$1"

	option=${option//46/4 6}
	for itest in $option; do
		itest=-${itest//-}
		if figet_ip_pub "$itest" ; then
			echo "$BOLD$fg_ip_pub$STD"
		else
			echo "pas de connectivité ipv${itest#-}"
		fi
	done
}

	# $1=-4|-6, assigne $fg_ip, $fg_gws6, $fg_ifn, $fg_mac
figet_ip(){		# 15/12/2017
	local target ifn

	x_ip=1
	[ $( f__which ip ) ] || return 1
	[ "$1" ] && proto="$1" || proto="-4"
		# adresses ip
	fg_ip=$( 
		gawk -v proto="$proto" '
			BEGIN { if (proto == -6) esp=41; else esp=16 }
			/scope global/ {
				sub(/wl.*/,$2" (wifi)",$2); sub(/.*en.*|.*eth.*/,$2" (ethernet)",$2); 
				match($0,/scope .*\\/); scope=substr($0,RSTART,RLENGTH)
					sub(/scope /,"",scope); sub(/\\/,"",scope)
				match($0,/preferred_lft .*sec/); lft=substr($0,RSTART,RLENGTH)
					sub(/sec/,"s",lft); sub(/preferred_lft/,"lft",lft)
				printf "%-17s: %-"esp"s (%s) %s \n",$2,$4,lft,scope }
			/fe80::/ {
				sub(/wl.*/,$2" (wifi)",$2)
				match($0,/scope .* \\/); scope=substr($0,RSTART,RLENGTH); sub(/scope /,"",scope); sub(/ \\/,"",scope)
				link=link"\n"sprintf("%-17s: %-22s  %s",$2,$4,scope) }
			/ lo / { lo=sprintf("%s (loopback)    : %s",$2,$4) }
			END { printf "%s\n%s",link,lo }
		' <<< $( ip $proto -o address )
	)
		# passerelles
	fg_gws=$(
		gawk '
			BEGIN { if (proto == -6) esp=42; else esp=12 }
			/default via/ { printf "%-"esp"s  (%s)\n",$3,$5 }
		' <<< $( ip $proto route )
	)
		# interface sortante
	if [ "$proto" == "-6" ]; then
		target=$( gawk '/proto ra / { print $1; exit}' <<< $( ip $proto -o route ) )
		fg_ifn_prior=$( ip $proto route get $target )
		fg_ifn_prior=$( ip $proto route get $target | sed -En 's/.*dev (.*) proto.*src ([0-9a-f:]+).*/\1 (\2)/p' )
	else
		fg_ifn_prior=$( ip $proto route get 255.255.255.255 | sed -En 's/.*dev (.*) src ([0-9.]+) .*/\1 (\2)/p' )
	fi
		# ifnames & mac
	fg_ifn="" fg_mac=""
	for ifn in $( f__dir -l /sys/class/net/ ) ; do 
		if [ "$ifn" != "lo" ]; then
			fg_ifn+="$ifn "
			fg_mac+="$ifn: $( cat /sys/class/net/$ifn/address )"$'\n'
		fi
	done
	fg_ifn=${fg_ifn% }					# suppression dernier espace
	fg_mac=${fg_mac%[[:cntrl:]]}		# suppression dernier $'\n'
}

	# $1=-4|-6, assigne $fg_ip_pub
figet_ip_pub(){		#v 24/12/2017
	local dig_test ip_test iip

	list_ip4(){		# testé 11/12/2017

		ip_test=(	# pas de https
			http://whatismyip.akamai.com
			http://eth0.me
			ipinfo.io/ip					# http & https
			http://alma.ch/myip.cgi			# peu fiable curl
			http://checkip.amazonaws.com	# peu fiable wget
			api.infoip.io/ip				# http & https fiable wget
			api.ipify.org					# http & https fiable wget
			http://ipecho.net/plain			# peu fiable wget / curl
		#	http://ipof.in/txt				# fail wget
		)
	}

	list_ip4_dig(){		# testé 11/12/2017

		dig_test=(
			whoami.akamai.net/@ns1-1.akamaitech.net
			myip.opendns.com/@resolver1.opendns.com
			myip.opendns.com/@resolver2.opendns.com
			myip.opendns.com/@resolver3.opendns.com
			myip.opendns.com/@resolver4.opendns.com
		)
	}

	list_ip6(){		# testé 11/12/2017

		ip_test=(
			http://ipv6.whatismyip.akamai.com
			ip.tyk.nu							# http & https
			wgetip.com							# http & https
			l2.io/ip							# http & https peu fiable wget
			icanhazip.com						# http & https peu fiable wget
			http://bot.whatismyipaddress.com	# peu fiable wget
			https://canhazip.com				# peu fiable wget
			https://tnx.nl/ip					# peu fiable wget
			ident.me							# http & https peu fiable curl
		)
	}

	list_ip6_dig(){		# testé 11/12/2017

		dig_test=(
		-6/myip.opendns.com/aaaa/@resolver1.ipv6-sandbox.opendns.com
		-6/myip.opendns.com/aaaa/@resolver2.ipv6-sandbox.opendns.com
		)
	}

	x_ip_pub=1
	option="$1"
	unset fg_ip_pub
		# assignation variables
	if [ "$1" == "-4" ]; then
		ping -4 -c1 conncheck.opensuse.org &>/dev/null || ping -4 -c1 free.fr &>/dev/null || return 1	# test connectivité
		list_ip4_dig
		list_ip4
		ip_telnet=4.ifcfg.me
	elif [ "$1" == "-6" ]; then
		ping -6 -c1 conncheck.opensuse.org &>/dev/null || ping -6 -c1 free.fr &>/dev/null || return 1	# test connectivité
		list_ip6_dig
		list_ip6
		ip_telnet=6.ifcfg.me
	fi
		# DIG
	if type -p dig &>/dev/null && [ -z "$fg_ip_pub" ]; then
		for iip in ${dig_test[*]}; do
			fg_ip_pub=$( dig +short ${iip//\// } )
			[ "$fg_ip_pub" ] && break
		done
	fi
		# WGET
	if type -p wget &>/dev/null && [ -z "$fg_ip_pub" ]; then 
		cmd="wget --quiet --timeout=2 --tries=1 -o /dev/null -O - "
		for iip in ${ip_test[*]}; do
			fg_ip_pub=$( $cmd $iip )
			[ "$fg_ip_pub" ] && break
		done
	fi
		# CURL
	if type -p curl &>/dev/null && [ -z "$fg_ip_pub" ]; then
		cmd="curl --silent --location --retry 0 --max-time 5"
		for iip in ${ip_test[*]}; do
			fg_ip_pub=$( $cmd $iip )
			[ "$fg_ip_pub" ] && break
		done
	fi
		# TELNET
	if type -p telnet &>/dev/null && [ -z "$fg_ip_pub" ]; then
		fg_ip_pub=$( telnet $ip_telnet 23 2>/dev/null | grep "Your IPv${option/-}" )
		fg_ip_pub=${fg_ip_pub##* }
	fi

		# NC
	if type -p nc &>/dev/null && [ -z "$fg_ip_pub" ] && [ "$option" != "-6" ]; then
		fg_ip_pub=$( nc $ip_telnet 23 2>/dev/null | grep "Your IPv${option/-}" )
		fg_ip_pub=${fg_ip_pub##* }
	fi

	if [ -z "$fg_ip_pub" ]; then 
		f__error "il manque une des commandes suivantes:\n" \
			"dig / wget / curl / telnet / nc \n" \
			"ou les ip de test sont devenues défaillantes\n" \
			"réessayer après avoir installé dig (dnsutils) et wget"
	fi
}

	# inscription dans tache upgrade en anacron hebdomadaire, via cron horaire, $1=upgrade|install|remove
fscript_cronAnacron(){		# 22/12/2017
	local dirAnacron dirSpool fileAnacron

	[ "$( type -t fscript_cronAnacron_special )" ] && fscript_cronAnacron_special		# test, si fonction spécifique, appel
	dirAnacron="/home/$fu_user/.config/anacron"
	dirSpool="$dirAnacron/spool"
	fileAnacron="$dirAnacron/$script.anacrontab"
	[ "$EUID" -eq 0 ] && sed -i "/$script.anacrontab/d" /etc/crontab
	case "$1" in 
		install | upgrade )
			mkdir -p  "$dirAnacron"
				# table anacron
			echo "7 10 $script nice $script_install --upgrade 1>/dev/null" > "$fileAnacron"	# juste erreurs en syslog
				## anacron journalier pour dev logname 
			if [ -e "$fileDev" ]; then
				echo "1 00 $script""Dev nice $script_install --upgrade 1>/dev/null" >> "$fileAnacron"
			fi
				# création spool anacron utilisateur
			mkdir -p "$dirSpool"
			chown -R "$fu_user:" "$dirAnacron" "$dirSpool"
			if [ "$EUID" -eq 0 ]; then
					# crontab pour activation horaire anacron
				echo "@hourly $fu_user /usr/sbin/anacron -t $fileAnacron -S $dirSpool" >> /etc/crontab
			fi
			grep -q "$script" "/etc/crontab" || echo f__error "inscription crontab"
		;;
		remove )
			rm "$dirSpool/$script"* &>/dev/null
			rm "$fileAnacron" &>/dev/null
			rmdir "$dirSpool" "$dirAnacron" &>/dev/null
		;;
	esac
}

	# version script en ligne, [$1=update], assigne $ver_script_install, $ver_script_online, $script_aJour=ok|KO
fscript_get_version(){		# 23/12/2017
	local wget_log="/tmp/wget_$RANDOM.log"

	x_script_get_version=1
	if [ -e "$script_install" ]; then
		ver_script_install=$( grep -m1 '^version=' $script_install | cut -d'=' -f2 )
	fi
	[ "$ver_script_install" ] || ver_script_install="Non installé"
	f__info "raw" "script en place: $GREEN$ver_script_install"
	ver_script_online=$( wget -q --timeout=15 -o "$wget_log" -O - "$url_script" | grep -m1 '^version=' | cut -d'=' -f2 )
	if [ "$?" -ne 0 ]; then
		rm "$wget_log"
		f__wget_test "$url_script"
	fi
	if [ "$ver_script_online" ]; then 
		if [ "$ver_script_install" != "$ver_script_online" ]; then 
			script_aJour="KO"
		else
			script_aJour="ok"
		fi
		f__info "script en ligne: $YELLOW$ver_script_online"
	else 
		f__info "version script en ligne$RED non accessible"
	fi
	rm "$wget_log"
}

	# installation du script dans le système, fscript_install_special possible
fscript_install(){		# 22/12/2017

	if grep -q 'bin' <<< "$( dirname $0 )" ; then
		f__info "$RED""l'installation dans le système doit se faire depuis un script local $GREEN(./$script -i )"
		return 1
	fi
	if [ "$EUID" -ne 0 ]; then
		f__info "vous devez être$RED ROOT$BLUE pour installer ce script dans le système"
		f__sudo "exec $0 -i"
		return $?
	fi
	[ "$( type -t fscript_install_special )" ] && fscript_install_special		# test, si fonction spécifique, appel
	f__requis "wget anacron cron" || exit 1 
		# install /opt
	mkdir -p /opt/bin/
	cp -d "$0" "$script_install"
	ln -s "$script_install" "/usr/bin/$script" &>/dev/null
	chmod 775 "$script_install"	# rwx rwx r-x, proprio fu_user
		# cron/anacron install
	fscript_cronAnacron "install"
		# création fichier log
	touch "$script_logs"
	chmod 664 "$script_logs"	# rw- rw- r--, proprio fu_user
	chown "$fu_user:" "$script_logs" "$script_install"
	[ -e "$fileDev" ] || rm "$0" &>/dev/null	## on efface pas si fileDev (dev)
	f__info "log" "$script $version installé dans le système." "maintenant, appel du script par: $GREEN$script$BLUE (sans ./)"
}

	# suppression du script dans le système, fscript_remove_special possible
fscript_remove(){		# 22/12/2017

	if ! grep -q 'bin' <<< "$( dirname $0 )" ; then
		f__info "$RED""cette fonction doit être appelée depuis le script installé dans le système $GREEN($script -r)"
		return 1
	fi
	if [ ! -x "$script_install" ];then
		f__info "$RED$script n'est pas installé"
		return 1
	fi
	if [ "$EUID" -ne 0 ]; then
		f__info "vous devez être$RED ROOT$BLUE pour supprimer ce script dans le système"
		f__sudo "exec $0 -r"
		return $?
	fi
	[ "$( type -t fscript_remove_special )" ] && fscript_remove_special		# test, si fonction spécifique, appel
		# suppression de /opt lien /usr/bin
	rm "$script_install" &>/dev/null
	unlink "/usr/bin/$script" &>/dev/null
		# cron/anacron remove
	fscript_cronAnacron "remove"
	f__info "log" "$script $version supprimé du système."
}

	# mise à jour script
fscript_update(){		# 23/12/2017
	local dirTemp="/tmp/$script-maj" wget_log="/tmp/wget_$RANDOM.log"

	[ "$(type -t fscript_update_special)" ] && fscript_update_special		# test, si fonction spécifique, appel
	if [ -z "$updateSpecial" ] && ! grep -q 'bin' <<< "$( dirname $0 )" ; then
		f__info "$RED""cette fonction doit être appelée depuis le script installé dans le système $GREEN($script -u)"
		return 1
	fi
	(( x_script_get_version == 1 )) || fscript_get_version
	if [ "$script_aJour" == "ok" ]; then 
		f__info "log" "pas de mise à jour disponible pour $script $version"
		return 0
	else
		f__info "mise à jour en cours"
	fi
	mkdir -p "$dirTemp"
	wget -q --tries=2 --timeout=15 -o "$wget_log" -O "$dirTemp/$script" "$url_script"
	if [ "$?" -ne 0 ]; then
		rm -rf "$dirTemp/"
		rm -f "$wget_log"
		f__wget_test "$url_script"
	fi
	if grep -q '#!/bin/bash' "$dirTemp/$script" && grep -q '^### END CONTROL' "$dirTemp/$script"; then 
		cp -d "$dirTemp/$script" "$script_install"
		chmod 775 "$script_install"	# rwx rwx r-x, proprio fu_user
		chown "$fu_user:" "$script_install"
		[ -z "$updateSpecial" ] && fscript_cronAnacron "upgrade"
		f__info "log" "$script mis à jour en version $ver_script_online $updateSpecial"
	else
		f_info "log" "$script: échec update" "mauvais téléchargement, réessayer plus tard"
	fi
	rm -rf "$dirTemp/"
	rm -f "$wget_log"
}

print_local(){		#v 15/12/2017
	local ifn_p4 text

	figet_ip "-4" || f__error "iproute2 doit être installé" "il remplace net-tools qui n'est plus développé"
	ifn_p4="$fg_ifn_prior"
	f_pr titre1 "IPv4"
	f_pr l2 "$fg_ip" 
	f_pr
						[ "$(f__wcv "-l" "$fg_gws")" -gt 1 ] && pluriel="s" || unset pluriel
	f_pr l2 "passerelle"$pluriel": ${fg_gws//$'\n'/ ⊗ }"
	f_pr
	figet_ip "-6"
	f_pr titre1 "IPv6"
	f_pr l2 "$fg_ip" 
	f_pr
						[ "$(f__wcv "-l" "$fg_gws")" -gt 1 ] && pluriel="s" || unset pluriel
	f_pr l2 "passerelle"$pluriel": ${fg_gws//$'\n'/ ⊗ }"
	f_pr
						[ "$(f__wcv "-w" "$fg_ifn_prior")" -gt 1 ] && pluriel="s" || unset pluriel
	f_pr l2 "interface"$pluriel" sortante"$pluriel" ipv6: $fg_ifn_prior" '[ "$fg_ifn_prior" ]'
						[ "$(f__wcv "-w" "$ifn_p4")" -gt 1 ] && pluriel="s" || unset pluriel
	f_pr l2 "interface"$pluriel" sortante"$pluriel" ipv4: $ifn_p4" '[ "$ifn_p4" ]'
	f_pr
						[ "$(f__wcv "-l" "$fg_mac")" -gt 1 ] && pluriel="s" || unset pluriel
	f_pr titre1 "adresse"$pluriel" Mac:"
	f_pr l2 "$fg_mac" 

	echo -en "$text\n" #>> "$fileOutput"
}

testuser(){		# 4/12/2017
	f__user
	retourFUser="$?"
	[ "$retourFUser" -eq 1 ] && f__error "user indéterminé" \
		"pour contourner, lancer le script avec:\n$GREEN  USER_INSTALL=<user> $0 \n"
	if [ "$retourFUser" -eq 2 ]; then
		[ "$EUID" -eq 0 ] && fu_user="root" || f__error "user détecté, mais pas de home: /home/$fu_user"
		f__info "user root"
	fi
}

prg_init(){		# 4/12/2017

	PATH='/usr/sbin:/usr/bin:/sbin:/bin' 
	TERM=xterm  
	IFS_INI="$IFS"
	IFS=$' \t\n'
	export PATH TERM IFS

		# whereis script		retourne vide si installé
	DIRNAME=$( dirname $0 )
	DIRNAME=${DIRNAME#/usr/bin}		# suppression /usr/bin éventuel au début ( lien )
	DIRNAME=${DIRNAME#/opt/bin}		# suppression /opt/bin éventuel au début ( install )
	[ "$DIRNAME" ] && DIRNAME+="/"

		# test bash v4
	[ "$BASH_VERSINFO" == 4 ] || f__error "bash v4 requis" "version installée: $BASH_VERSION"

		# détermination user derrière root
	f__user
	retourFUser="$?"
	[ "$retourFUser" -eq 1 ] && f__error "user indéterminé" \
		"pour contourner, lancer le script avec:\n$GREEN  USER_INSTALL=<user> $0 \n"
	if [ "$retourFUser" -eq 2 ]; then
		[ "$EUID" -eq 0 ] && fu_user="root" || f__error "user détecté, mais pas de home: /home/$fu_user"
		f__info "user root"
	fi

		# requis pour fonctionnement programme
	f__requis "gawk wget ip>iproute2" || exit 1

		# définition couleurs
	f__color
}

######## début script / initialisation

	# tests au démarrage
prg_init

	# paramètres généraux
user_agent="Mozilla/5.0 Firefox"
fileDev="/opt/bin/fileDev"
script_install="/opt/bin/$script"
script_logs="/var/log/sdeb_$script.log"
url_script="https://frama.link/getip"
url_notice="https://frama.link/doc-getip"

	# actions
options="$@"
if [[ "$options" =~ -i|-r|-u|--install|--remove|--update|-us ]]; then
	testuser
fi
if [[ ! "$options" =~ -46|-4|-6|--public ]]; then
	f_affichage
fi
for j in "$options"; do
	case $j  in
		-4 | --ip4 )
			fi_ip_pub "-4"
			;;											# affiche ip v4 public
		-6 | --ip6 )
			fi_ip_pub "-6"
			;;											# affiche ip v6 public
		-46 | --public )
			fi_ip_pub "-46"
			;;											# ip v4 & v6
		"" | --local )
				print_local
			;;											# affiche ip locales
		-i | --install )
			fscript_install
			;;											# installation du script dans le système
		-r | --remove )
			fscript_remove
			;;											# suppression du script dans le système
		-u | --upgrade )
			opType="upgrade"	# log si f__error
			fscript_update
			exit ;;										# upgrade script si maj possible
		-us )
			opType="upgrade"	# log si f__error
			updateSpecial="update spécial actif"
			script_install="$(dirname $0)/$script"
			fscript_update
			exit ;;								# upgrade spécial
		-v | --version )
			fscript_get_version
			;;											# version du script, en ligne et exécuté
		-h | --help | * )
			f_help
			;;											# affichage help
	esac
done

exit 0

### END CONTROL (contrôle chargement)

wget -nv -O getIp https://frama.link/getip
chmod +x getIp && ./getIp

wget -nv -O getIp https://framagit.org/kyodev/kyopages/raw/master/scripts/getIp