1416770e3b
Assuming the following dns zone configuration for kresin.me: . 1800 IN NS ns.inwx.de. home.kresin.me. 1800 IN NS gw.home.kresin.me. gw.home.kresin.me. 60 IN A 198.51.100.1 Using the example, gw.home.kresin.me is a glue record and used as DDNS record as well. gw.home.kresin.me points to the OpenWrt installation where the ddns-scripts are running. Since ns.inwx.de isn't the authoritative server for home.kresin.me, a query for the the A record of gw.home.kresin.me will be "forwarded" to and replied by the authoritative server 198.51.100.1. If the authoritative server can't be reached, the query times out without any address returned. The only way to get the A record of the glue record is to use bind host in verbose output mode, query ns.inwx.de for gw.home.kresin.me and evaluate the additional section of the response. To my knowledge, only bind host in verbose output mode shows the additional section of the response. Therefore, this features depends on bind host. It is not possible to use the bind host verbose mode for all queries. In verbose mode the "has address" line isn't returned. Grepping for the hostname might fail if the hostname is CNAME. Grepping for the first occurrence of an ip-address is way to error prone, since it could return the ip address of a different record type. Signed-off-by: Mathias Kresin <dev@kresin.me>
1277 lines
44 KiB
Bash
Executable file
1277 lines
44 KiB
Bash
Executable file
#!/bin/sh
|
|
# /usr/lib/ddns/dynamic_dns_functions.sh
|
|
#
|
|
#.Distributed under the terms of the GNU General Public License (GPL) version 2.0
|
|
# Original written by Eric Paul Bishop, January 2008
|
|
# (Loosely) based on the script on the one posted by exobyte in the forums here:
|
|
# http://forum.openwrt.org/viewtopic.php?id=14040
|
|
# extended and partial rewritten
|
|
#.2014-2016 Christian Schoenebeck <christian dot schoenebeck at gmail dot com>
|
|
#
|
|
# function timeout
|
|
# copied from http://www.ict.griffith.edu.au/anthony/software/timeout.sh
|
|
# @author Anthony Thyssen 6 April 2011
|
|
#
|
|
# variables in small chars are read from /etc/config/ddns
|
|
# variables in big chars are defined inside these scripts as global vars
|
|
# variables in big chars beginning with "__" are local defined inside functions only
|
|
# set -vx #script debugger
|
|
|
|
. /lib/functions.sh
|
|
. /lib/functions/network.sh
|
|
|
|
# GLOBAL VARIABLES #
|
|
VERSION="2.6.4-1"
|
|
SECTION_ID="" # hold config's section name
|
|
VERBOSE_MODE=1 # default mode is log to console, but easily changed with parameter
|
|
|
|
LOGFILE="" # logfile - all files are set in dynamic_dns_updater.sh
|
|
PIDFILE="" # pid file
|
|
UPDFILE="" # store UPTIME of last update
|
|
DATFILE="" # save stdout data of WGet and other external programs called
|
|
ERRFILE="" # save stderr output of WGet and other external programs called
|
|
TLDFILE=/usr/lib/ddns/tld_names.dat.gz # TLD file used by split_FQDN
|
|
|
|
CHECK_SECONDS=0 # calculated seconds out of given
|
|
FORCE_SECONDS=0 # interval and unit
|
|
RETRY_SECONDS=0 # in configuration
|
|
|
|
LAST_TIME=0 # holds the uptime of last successful update
|
|
CURR_TIME=0 # holds the current uptime
|
|
NEXT_TIME=0 # calculated time for next FORCED update
|
|
EPOCH_TIME=0 # seconds since 1.1.1970 00:00:00
|
|
|
|
REGISTERED_IP="" # holds the IP read from DNS
|
|
LOCAL_IP="" # holds the local IP read from the box
|
|
|
|
URL_USER="" # url encoded $username from config file
|
|
URL_PASS="" # url encoded $password from config file
|
|
URL_PENC="" # url encoded $param_enc from config file
|
|
|
|
SRV_ANSWER="" # Answer given by service on success
|
|
|
|
ERR_LAST=0 # used to save $? return code of program and function calls
|
|
ERR_UPDATE=0 # error counter on different local and registered ip
|
|
|
|
PID_SLEEP=0 # ProcessID of current background "sleep"
|
|
|
|
# allow NON-public IP's
|
|
ALLOW_LOCAL_IP=$(uci -q get ddns.global.allow_local_ip) || ALLOW_LOCAL_IP=0
|
|
|
|
# directory to store run information to.
|
|
RUNDIR=$(uci -q get ddns.global.run_dir) || RUNDIR="/var/run/ddns"
|
|
[ -d $RUNDIR ] || mkdir -p -m755 $RUNDIR
|
|
|
|
# directory to store log files
|
|
LOGDIR=$(uci -q get ddns.global.log_dir) || LOGDIR="/var/log/ddns"
|
|
[ -d $LOGDIR ] || mkdir -p -m755 $LOGDIR
|
|
|
|
# number of lines to before rotate logfile
|
|
LOGLINES=$(uci -q get ddns.global.log_lines) || LOGLINES=250
|
|
LOGLINES=$((LOGLINES + 1)) # correct sed handling
|
|
|
|
# format to show date information in log and luci-app-ddns default ISO 8601 format
|
|
DATE_FORMAT=$(uci -q get ddns.global.date_format) || DATE_FORMAT="%F %R"
|
|
DATE_PROG="date +'$DATE_FORMAT'"
|
|
|
|
# regular expression to detect IPv4 / IPv6
|
|
# IPv4 0-9 1-3x "." 0-9 1-3x "." 0-9 1-3x "." 0-9 1-3x
|
|
IPV4_REGEX="[0-9]\{1,3\}\.[0-9]\{1,3\}\.[0-9]\{1,3\}\.[0-9]\{1,3\}"
|
|
# IPv6 ( ( 0-9a-f 1-4char ":") min 1x) ( ( 0-9a-f 1-4char )optional) ( (":" 0-9a-f 1-4char ) min 1x)
|
|
IPV6_REGEX="\(\([0-9A-Fa-f]\{1,4\}:\)\{1,\}\)\(\([0-9A-Fa-f]\{1,4\}\)\{0,1\}\)\(\(:[0-9A-Fa-f]\{1,4\}\)\{1,\}\)"
|
|
|
|
# detect if called by dynamic_dns_lucihelper.sh script, disable retrys (empty variable == false)
|
|
[ "$(basename $0)" = "dynamic_dns_lucihelper.sh" ] && LUCI_HELPER="TRUE" || LUCI_HELPER=""
|
|
|
|
# USE_CURL if GNU Wget and cURL installed normally Wget is used by do_transfer()
|
|
# to change this use global option use_curl '1'
|
|
USE_CURL=$(uci -q get ddns.global.use_curl) || USE_CURL=0 # read config
|
|
[ -x /usr/bin/curl ] || USE_CURL=0 # check for cURL
|
|
|
|
# loads all options for a given package and section
|
|
# also, sets all_option_variables to a list of the variable names
|
|
# $1 = ddns, $2 = SECTION_ID
|
|
load_all_config_options()
|
|
{
|
|
local __PKGNAME="$1"
|
|
local __SECTIONID="$2"
|
|
local __VAR
|
|
local __ALL_OPTION_VARIABLES=""
|
|
|
|
# this callback loads all the variables in the __SECTIONID section when we do
|
|
# config_load. We need to redefine the option_cb for different sections
|
|
# so that the active one isn't still active after we're done with it. For reference
|
|
# the $1 variable is the name of the option and $2 is the name of the section
|
|
config_cb()
|
|
{
|
|
if [ ."$2" = ."$__SECTIONID" ]; then
|
|
option_cb()
|
|
{
|
|
__ALL_OPTION_VARIABLES="$__ALL_OPTION_VARIABLES $1"
|
|
}
|
|
else
|
|
option_cb() { return 0; }
|
|
fi
|
|
}
|
|
|
|
config_load "$__PKGNAME"
|
|
|
|
# Given SECTION_ID not found so no data, so return 1
|
|
[ -z "$__ALL_OPTION_VARIABLES" ] && return 1
|
|
|
|
for __VAR in $__ALL_OPTION_VARIABLES
|
|
do
|
|
config_get "$__VAR" "$__SECTIONID" "$__VAR"
|
|
done
|
|
return 0
|
|
}
|
|
|
|
# read's all service sections from ddns config
|
|
# $1 = Name of variable to store
|
|
load_all_service_sections() {
|
|
local __DATA=""
|
|
config_cb()
|
|
{
|
|
# only look for section type "service", ignore everything else
|
|
[ "$1" = "service" ] && __DATA="$__DATA $2"
|
|
}
|
|
config_load "ddns"
|
|
|
|
eval "$1=\"$__DATA\""
|
|
return
|
|
}
|
|
|
|
# starts updater script for all given sections or only for the one given
|
|
# $1 = interface (Optional: when given only scripts are started
|
|
# configured for that interface)
|
|
# used by /etc/hotplug.d/iface/25-ddns on IFUP
|
|
# and by /etc/init.d/ddns start
|
|
start_daemon_for_all_ddns_sections()
|
|
{
|
|
local __EVENTIF="$1"
|
|
local __SECTIONS=""
|
|
local __SECTIONID=""
|
|
local __IFACE=""
|
|
|
|
load_all_service_sections __SECTIONS
|
|
for __SECTIONID in $__SECTIONS; do
|
|
config_get __IFACE "$__SECTIONID" interface "wan"
|
|
[ -z "$__EVENTIF" -o "$__IFACE" = "$__EVENTIF" ] || continue
|
|
/usr/lib/ddns/dynamic_dns_updater.sh $__SECTIONID 0 >/dev/null 2>&1 &
|
|
done
|
|
}
|
|
|
|
# stop sections process incl. childs (sleeps)
|
|
# $1 = section
|
|
stop_section_processes() {
|
|
local __PID=0
|
|
local __PIDFILE="$RUNDIR/$1.pid"
|
|
[ $# -ne 1 ] && write_log 12 "Error calling 'stop_section_processes()' - wrong number of parameters"
|
|
|
|
[ -e "$__PIDFILE" ] && {
|
|
__PID=$(cat $__PIDFILE)
|
|
ps | grep "^[\t ]*$__PID" >/dev/null 2>&1 && kill $__PID || __PID=0 # terminate it
|
|
}
|
|
[ $__PID -eq 0 ] # report if process was running
|
|
}
|
|
|
|
# stop updater script for all defines sections or only for one given
|
|
# $1 = interface (optional)
|
|
# used by /etc/hotplug.d/iface/25-ddns on 'ifdown'
|
|
# and by /etc/init.d/ddns stop
|
|
# needed because we also need to kill "sleep" child processes
|
|
stop_daemon_for_all_ddns_sections() {
|
|
local __EVENTIF="$1"
|
|
local __SECTIONS=""
|
|
local __SECTIONID=""
|
|
local __IFACE=""
|
|
|
|
load_all_service_sections __SECTIONS
|
|
for __SECTIONID in $__SECTIONS; do
|
|
config_get __IFACE "$__SECTIONID" interface "wan"
|
|
[ -z "$__EVENTIF" -o "$__IFACE" = "$__EVENTIF" ] || continue
|
|
stop_section_processes "$__SECTIONID"
|
|
done
|
|
}
|
|
|
|
# reports to console, logfile, syslog
|
|
# $1 loglevel 7 == Debug to 0 == EMERG
|
|
# value +10 will exit the scripts
|
|
# $2..n text to report
|
|
write_log() {
|
|
local __LEVEL __EXIT __CMD __MSG
|
|
local __TIME=$(date +%H%M%S)
|
|
[ $1 -ge 10 ] && {
|
|
__LEVEL=$(($1-10))
|
|
__EXIT=1
|
|
} || {
|
|
__LEVEL=$1
|
|
__EXIT=0
|
|
}
|
|
shift # remove loglevel
|
|
[ $__EXIT -eq 0 ] && __MSG="$*" || __MSG="$* - TERMINATE"
|
|
case $__LEVEL in # create log message and command depending on loglevel
|
|
0) __CMD="logger -p user.emerg -t ddns-scripts[$$] $SECTION_ID: $__MSG"
|
|
__MSG=" $__TIME EMERG : $__MSG" ;;
|
|
1) __CMD="logger -p user.alert -t ddns-scripts[$$] $SECTION_ID: $__MSG"
|
|
__MSG=" $__TIME ALERT : $__MSG" ;;
|
|
2) __CMD="logger -p user.crit -t ddns-scripts[$$] $SECTION_ID: $__MSG"
|
|
__MSG=" $__TIME CRIT : $__MSG" ;;
|
|
3) __CMD="logger -p user.err -t ddns-scripts[$$] $SECTION_ID: $__MSG"
|
|
__MSG=" $__TIME ERROR : $__MSG" ;;
|
|
4) __CMD="logger -p user.warn -t ddns-scripts[$$] $SECTION_ID: $__MSG"
|
|
__MSG=" $__TIME WARN : $__MSG" ;;
|
|
5) __CMD="logger -p user.notice -t ddns-scripts[$$] $SECTION_ID: $__MSG"
|
|
__MSG=" $__TIME note : $__MSG" ;;
|
|
6) __CMD="logger -p user.info -t ddns-scripts[$$] $SECTION_ID: $__MSG"
|
|
__MSG=" $__TIME info : $__MSG" ;;
|
|
7) __MSG=" $__TIME : $__MSG";;
|
|
*) return;;
|
|
esac
|
|
|
|
# verbose echo
|
|
[ $VERBOSE_MODE -gt 0 -o $__EXIT -gt 0 ] && echo -e "$__MSG"
|
|
# write to logfile
|
|
if [ ${use_logfile:-1} -eq 1 -o $VERBOSE_MODE -gt 1 ]; then
|
|
echo -e "$__MSG" >> $LOGFILE
|
|
# VERBOSE_MODE > 1 then NO loop so NO truncate log to $LOGLINES lines
|
|
[ $VERBOSE_MODE -gt 1 ] || sed -i -e :a -e '$q;N;'$LOGLINES',$D;ba' $LOGFILE
|
|
fi
|
|
[ $LUCI_HELPER ] && return # nothing else todo when running LuCI helper script
|
|
[ $__LEVEL -eq 7 ] && return # no syslog for debug messages
|
|
__CMD=$(echo -e "$__CMD" | tr -d '\n' | tr '\t' ' ') # remove \n \t chars
|
|
[ $__EXIT -eq 1 ] && {
|
|
$__CMD # force syslog before exit
|
|
exit 1
|
|
}
|
|
[ $use_syslog -eq 0 ] && return
|
|
[ $((use_syslog + __LEVEL)) -le 7 ] && $__CMD
|
|
return
|
|
}
|
|
|
|
# replace all special chars to their %hex value
|
|
# used for USERNAME and PASSWORD in update_url
|
|
# unchanged: "-"(minus) "_"(underscore) "."(dot) "~"(tilde)
|
|
# to verify: "'"(single quote) '"'(double quote) # because shell delimiter
|
|
# "$"(Dollar) # because used as variable output
|
|
# tested with the following string stored via Luci Application as password / username
|
|
# A B!"#AA$1BB%&'()*+,-./:;<=>?@[\]^_`{|}~ without problems at Dollar or quotes
|
|
urlencode() {
|
|
# $1 Name of Variable to store encoded string to
|
|
# $2 string to encode
|
|
local __STR __LEN __CHAR __OUT
|
|
local __ENC=""
|
|
local __POS=1
|
|
|
|
[ $# -ne 2 ] && write_log 12 "Error calling 'urlencode()' - wrong number of parameters"
|
|
|
|
__STR="$2" # read string to encode
|
|
__LEN=${#__STR} # get string length
|
|
|
|
while [ $__POS -le $__LEN ]; do
|
|
# read one chat of the string
|
|
__CHAR=$(expr substr "$__STR" $__POS 1)
|
|
|
|
case "$__CHAR" in
|
|
[-_.~a-zA-Z0-9] )
|
|
# standard char
|
|
__OUT="${__CHAR}"
|
|
;;
|
|
* )
|
|
# special char get %hex code
|
|
__OUT=$(printf '%%%02x' "'$__CHAR" )
|
|
;;
|
|
esac
|
|
__ENC="${__ENC}${__OUT}" # append to encoded string
|
|
__POS=$(( $__POS + 1 )) # increment position
|
|
done
|
|
|
|
eval "$1=\"$__ENC\"" # transfer back to variable
|
|
return 0
|
|
}
|
|
|
|
# extract url or script for given DDNS Provider from
|
|
# file /usr/lib/ddns/services for IPv4 or from
|
|
# file /usr/lib/ddns/services_ipv6 for IPv6
|
|
# $1 Name of Variable to store url to
|
|
# $2 Name of Variable to store script to
|
|
# $3 Name of Variable to store service answer to
|
|
get_service_data() {
|
|
[ $# -ne 3 ] && write_log 12 "Error calling 'get_service_data()' - wrong number of parameters"
|
|
|
|
__FILE="/usr/lib/ddns/services" # IPv4
|
|
[ $use_ipv6 -ne 0 ] && __FILE="/usr/lib/ddns/services_ipv6" # IPv6
|
|
|
|
# workaround with variables; pipe create subshell with no give back of variable content
|
|
mkfifo pipe_$$
|
|
# only grep without # or whitespace at linestart | remove "
|
|
# grep -v -E "(^#|^[[:space:]]*$)" $__FILE | sed -e s/\"//g > pipe_$$ &
|
|
sed '/^#/d/^[ \t]*$/ds/\"//g' $__FILE > pipe_$$ &
|
|
|
|
while read __SERVICE __DATA __ANSWER; do
|
|
if [ "$__SERVICE" = "$service_name" ]; then
|
|
# check if URL or SCRIPT is given
|
|
__URL=$(echo "$__DATA" | grep "^http")
|
|
[ -z "$__URL" ] && __SCRIPT="/usr/lib/ddns/$__DATA"
|
|
|
|
eval "$1=\"$__URL\""
|
|
eval "$2=\"$__SCRIPT\""
|
|
eval "$3=\"$__ANSWER\""
|
|
rm pipe_$$
|
|
return 0
|
|
fi
|
|
done < pipe_$$
|
|
rm pipe_$$
|
|
|
|
eval "$1=\"\"" # no service match clear variables
|
|
eval "$2=\"\""
|
|
eval "$3=\"\""
|
|
return 1
|
|
}
|
|
|
|
# Calculate seconds from interval and unit
|
|
# $1 Name of Variable to store result in
|
|
# $2 Number and
|
|
# $3 Unit of time interval
|
|
get_seconds() {
|
|
[ $# -ne 3 ] && write_log 12 "Error calling 'get_seconds()' - wrong number of parameters"
|
|
case "$3" in
|
|
"days" ) eval "$1=$(( $2 * 86400 ))";;
|
|
"hours" ) eval "$1=$(( $2 * 3600 ))";;
|
|
"minutes" ) eval "$1=$(( $2 * 60 ))";;
|
|
* ) eval "$1=$2";;
|
|
esac
|
|
return 0
|
|
}
|
|
|
|
timeout() {
|
|
#.copied from http://www.ict.griffith.edu.au/anthony/software/timeout.sh
|
|
# only did the following changes
|
|
# - commented out "#!/bin/bash" and usage section
|
|
# - replace exit by return for usage as function
|
|
# - some reformatting
|
|
#
|
|
# timeout [-SIG] time [--] command args...
|
|
#
|
|
# Run the given command until completion, but kill it if it runs too long.
|
|
# Specifically designed to exit immediately (no sleep interval) and clean up
|
|
# nicely without messages or leaving any extra processes when finished.
|
|
#
|
|
# Example use
|
|
# timeout 5 countdown
|
|
#
|
|
# Based on notes in my "Shell Script Hints", section "Command Timeout"
|
|
# http://www.ict.griffith.edu.au/~anthony/info/shell/script.hints
|
|
#
|
|
# This script uses a lot of tricks to terminate both the background command,
|
|
# the timeout script, and even the sleep process. It also includes trap
|
|
# commands to prevent sub-shells reporting expected "Termination Errors".
|
|
#
|
|
# It took years of occasional trials, errors and testing to get a pure bash
|
|
# timeout command working as well as this does.
|
|
#
|
|
#.Anthony Thyssen 6 April 2011
|
|
#
|
|
# PROGNAME=$(type $0 | awk '{print $3}') # search for executable on path
|
|
# PROGDIR=$(dirname $PROGNAME) # extract directory of program
|
|
# PROGNAME=$(basename $PROGNAME) # base name of program
|
|
|
|
# output the script comments as docs
|
|
# Usage() {
|
|
# echo >&2 "$PROGNAME:" "$@"
|
|
# sed >&2 -n '/^###/q; /^#/!q; s/^#//; s/^ //; 3s/^/Usage: /; 2,$ p' "$PROGDIR/$PROGNAME"
|
|
# exit 10;
|
|
# }
|
|
|
|
SIG=-TERM
|
|
|
|
while [ $# -gt 0 ]; do
|
|
case "$1" in
|
|
--)
|
|
# forced end of user options
|
|
shift;
|
|
break ;;
|
|
# -\?|--help|--doc*)
|
|
# Usage ;;
|
|
[0-9]*)
|
|
TIMEOUT="$1" ;;
|
|
-*)
|
|
SIG="$1" ;;
|
|
*)
|
|
# unforced end of user options
|
|
break ;;
|
|
esac
|
|
shift # next option
|
|
done
|
|
|
|
# run main command in backgrounds and get its pid
|
|
"$@" &
|
|
command_pid=$!
|
|
|
|
# timeout sub-process abort countdown after ABORT seconds! also backgrounded
|
|
sleep_pid=0
|
|
(
|
|
# cleanup sleep process
|
|
trap 'kill -TERM $sleep_pid; return 1' 1 2 3 15
|
|
# sleep timeout period in background
|
|
sleep $TIMEOUT &
|
|
sleep_pid=$!
|
|
wait $sleep_pid
|
|
# Abort the command
|
|
kill $SIG $command_pid >/dev/null 2>&1
|
|
return 1
|
|
) &
|
|
timeout_pid=$!
|
|
|
|
# Wait for main command to finished or be timed out
|
|
wait $command_pid
|
|
status=$?
|
|
|
|
# Clean up timeout sub-shell - if it is still running!
|
|
kill $timeout_pid 2>/dev/null
|
|
wait $timeout_pid 2>/dev/null
|
|
|
|
# Uncomment to check if a LONG sleep still running (no sleep should be)
|
|
# sleep 1
|
|
# echo "-----------"
|
|
# /bin/ps j # uncomment to show if abort "sleep" is still sleeping
|
|
|
|
return $status
|
|
}
|
|
|
|
# verify given host and port is connectable
|
|
# $1 Host/IP to verify
|
|
# $2 Port to verify
|
|
verify_host_port() {
|
|
local __HOST=$1
|
|
local __PORT=$2
|
|
local __IP __IPV4 __IPV6 __RUNPROG __PROG __ERR
|
|
# return codes
|
|
# 1 system specific error
|
|
# 2 nslookup/host error
|
|
# 3 nc (netcat) error
|
|
# 4 unmatched IP version
|
|
|
|
[ $# -ne 2 ] && write_log 12 "Error calling 'verify_host_port()' - wrong number of parameters"
|
|
|
|
# check if ip or FQDN was given
|
|
__IPV4=$(echo $__HOST | grep -m 1 -o "$IPV4_REGEX$") # do not detect ip in 0.0.0.0.example.com
|
|
__IPV6=$(echo $__HOST | grep -m 1 -o "$IPV6_REGEX")
|
|
# if FQDN given get IP address
|
|
[ -z "$__IPV4" -a -z "$__IPV6" ] && {
|
|
if [ -n "$(which host)" ]; then # use BIND host if installed
|
|
__PROG="BIND host"
|
|
__RUNPROG="$(which host) -t ANY $__HOST >$DATFILE 2>$ERRFILE"
|
|
else # use BusyBox nslookup
|
|
__PROG="BusyBox nslookup"
|
|
__RUNPROG="$(which nslookup) $__HOST >$DATFILE 2>$ERRFILE"
|
|
fi
|
|
write_log 7 "#> $__RUNPROG"
|
|
eval $__RUNPROG
|
|
__ERR=$?
|
|
# command error
|
|
[ $__ERR -gt 0 ] && {
|
|
write_log 3 "DNS Resolver Error - $__PROG Error '$__ERR'"
|
|
write_log 7 "$(cat $ERRFILE)"
|
|
return 2
|
|
}
|
|
# extract IP address
|
|
if [ -x /usr/bin/host ]; then # use BIND host if installed
|
|
__IPV4=$(cat $DATFILE | awk -F "address " '/has address/ {print $2; exit}' )
|
|
__IPV6=$(cat $DATFILE | awk -F "address " '/has IPv6/ {print $2; exit}' )
|
|
else # use BusyBox nslookup
|
|
__IPV4=$(cat $DATFILE | sed -ne "/^Name:/,\$ { s/^Address[0-9 ]\{0,\}: \($IPV4_REGEX\).*$/\\1/p }")
|
|
__IPV6=$(cat $DATFILE | sed -ne "/^Name:/,\$ { s/^Address[0-9 ]\{0,\}: \($IPV6_REGEX\).*$/\\1/p }")
|
|
fi
|
|
}
|
|
|
|
# check IP version if forced
|
|
if [ $force_ipversion -ne 0 ]; then
|
|
__ERR=0
|
|
[ $use_ipv6 -eq 0 -a -z "$__IPV4" ] && __ERR=4
|
|
[ $use_ipv6 -eq 1 -a -z "$__IPV6" ] && __ERR=6
|
|
[ $__ERR -gt 0 ] && {
|
|
[ $LUCI_HELPER ] && return 4
|
|
write_log 14 "Verify host Error '4' - Forced IP Version IPv$__ERR don't match"
|
|
}
|
|
fi
|
|
|
|
# verify nc command
|
|
# busybox nc compiled without -l option "NO OPT l!" -> critical error
|
|
/usr/bin/nc --help 2>&1 | grep -i "NO OPT l!" >/dev/null 2>&1 && \
|
|
write_log 12 "Busybox nc (netcat) compiled without '-l' option, error 'NO OPT l!'"
|
|
# busybox nc compiled with extensions
|
|
/usr/bin/nc --help 2>&1 | grep "\-w" >/dev/null 2>&1 && __NCEXT="TRUE"
|
|
|
|
# connectivity test
|
|
# run busybox nc to HOST PORT
|
|
# busybox might be compiled with "FEATURE_PREFER_IPV4_ADDRESS=n"
|
|
# then nc will try to connect via IPv6 if there is any IPv6 available on any host interface
|
|
# not worrying, if there is an IPv6 wan address
|
|
# so if not "force_ipversion" to use_ipv6 then connect test via ipv4, if available
|
|
[ $force_ipversion -ne 0 -a $use_ipv6 -ne 0 -o -z "$__IPV4" ] && __IP=$__IPV6 || __IP=$__IPV4
|
|
|
|
if [ -n "$__NCEXT" ]; then # BusyBox nc compiled with extensions (timeout support)
|
|
__RUNPROG="/usr/bin/nc -w 1 $__IP $__PORT </dev/null >$DATFILE 2>$ERRFILE"
|
|
write_log 7 "#> $__RUNPROG"
|
|
eval $__RUNPROG
|
|
__ERR=$?
|
|
[ $__ERR -eq 0 ] && return 0
|
|
write_log 3 "Connect error - BusyBox nc (netcat) Error '$__ERR'"
|
|
write_log 7 "$(cat $ERRFILE)"
|
|
return 3
|
|
else # nc compiled without extensions (no timeout support)
|
|
__RUNPROG="timeout 2 -- /usr/bin/nc $__IP $__PORT </dev/null >$DATFILE 2>$ERRFILE"
|
|
write_log 7 "#> $__RUNPROG"
|
|
eval $__RUNPROG
|
|
__ERR=$?
|
|
[ $__ERR -eq 0 ] && return 0
|
|
write_log 3 "Connect error - BusyBox nc (netcat) timeout Error '$__ERR'"
|
|
return 3
|
|
fi
|
|
}
|
|
|
|
# verify given DNS server if connectable
|
|
# $1 DNS server to verify
|
|
verify_dns() {
|
|
local __ERR=255 # last error buffer
|
|
local __CNT=0 # error counter
|
|
|
|
[ $# -ne 1 ] && write_log 12 "Error calling 'verify_dns()' - wrong number of parameters"
|
|
write_log 7 "Verify DNS server '$1'"
|
|
|
|
while [ $__ERR -ne 0 ]; do
|
|
# DNS uses port 53
|
|
verify_host_port "$1" "53"
|
|
__ERR=$?
|
|
if [ $LUCI_HELPER ]; then # no retry if called by LuCI helper script
|
|
return $__ERR
|
|
elif [ $__ERR -ne 0 -a $VERBOSE_MODE -gt 1 ]; then # VERBOSE_MODE > 1 then NO retry
|
|
write_log 4 "Verify DNS server '$1' failed - Verbose Mode: $VERBOSE_MODE - NO retry on error"
|
|
return $__ERR
|
|
elif [ $__ERR -ne 0 ]; then
|
|
__CNT=$(( $__CNT + 1 )) # increment error counter
|
|
# if error count > retry_count leave here
|
|
[ $retry_count -gt 0 -a $__CNT -gt $retry_count ] && \
|
|
write_log 14 "Verify DNS server '$1' failed after $retry_count retries"
|
|
|
|
write_log 4 "Verify DNS server '$1' failed - retry $__CNT/$retry_count in $RETRY_SECONDS seconds"
|
|
sleep $RETRY_SECONDS &
|
|
PID_SLEEP=$!
|
|
wait $PID_SLEEP # enable trap-handler
|
|
PID_SLEEP=0
|
|
fi
|
|
done
|
|
return 0
|
|
}
|
|
|
|
# analyze and verify given proxy string
|
|
# $1 Proxy-String to verify
|
|
verify_proxy() {
|
|
# complete entry user:password@host:port
|
|
# inside user and password NO '@' of ":" allowed
|
|
# host and port only host:port
|
|
# host only host ERROR unsupported
|
|
# IPv4 address instead of host 123.234.234.123
|
|
# IPv6 address instead of host [xxxx:....:xxxx] in square bracket
|
|
local __TMP __HOST __PORT
|
|
local __ERR=255 # last error buffer
|
|
local __CNT=0 # error counter
|
|
|
|
[ $# -ne 1 ] && write_log 12 "Error calling 'verify_proxy()' - wrong number of parameters"
|
|
write_log 7 "Verify Proxy server 'http://$1'"
|
|
|
|
# try to split user:password "@" host:port
|
|
__TMP=$(echo $1 | awk -F "@" '{print $2}')
|
|
# no "@" found - only host:port is given
|
|
[ -z "$__TMP" ] && __TMP="$1"
|
|
# now lets check for IPv6 address
|
|
__HOST=$(echo $__TMP | grep -m 1 -o "$IPV6_REGEX")
|
|
# IPv6 host address found read port
|
|
if [ -n "$__HOST" ]; then
|
|
# IPv6 split at "]:"
|
|
__PORT=$(echo $__TMP | awk -F "]:" '{print $2}')
|
|
else
|
|
__HOST=$(echo $__TMP | awk -F ":" '{print $1}')
|
|
__PORT=$(echo $__TMP | awk -F ":" '{print $2}')
|
|
fi
|
|
# No Port detected - EXITING
|
|
[ -z "$__PORT" ] && {
|
|
[ $LUCI_HELPER ] && return 5
|
|
write_log 14 "Invalid Proxy server Error '5' - proxy port missing"
|
|
}
|
|
|
|
while [ $__ERR -gt 0 ]; do
|
|
verify_host_port "$__HOST" "$__PORT"
|
|
__ERR=$?
|
|
if [ $LUCI_HELPER ]; then # no retry if called by LuCI helper script
|
|
return $__ERR
|
|
elif [ $__ERR -gt 0 -a $VERBOSE_MODE -gt 1 ]; then # VERBOSE_MODE > 1 then NO retry
|
|
write_log 4 "Verify Proxy server '$1' failed - Verbose Mode: $VERBOSE_MODE - NO retry on error"
|
|
return $__ERR
|
|
elif [ $__ERR -gt 0 ]; then
|
|
__CNT=$(( $__CNT + 1 )) # increment error counter
|
|
# if error count > retry_count leave here
|
|
[ $retry_count -gt 0 -a $__CNT -gt $retry_count ] && \
|
|
write_log 14 "Verify Proxy server '$1' failed after $retry_count retries"
|
|
|
|
write_log 4 "Verify Proxy server '$1' failed - retry $__CNT/$retry_count in $RETRY_SECONDS seconds"
|
|
sleep $RETRY_SECONDS &
|
|
PID_SLEEP=$!
|
|
wait $PID_SLEEP # enable trap-handler
|
|
PID_SLEEP=0
|
|
fi
|
|
done
|
|
return 0
|
|
}
|
|
|
|
do_transfer() {
|
|
# $1 # URL to use
|
|
local __URL="$1"
|
|
local __ERR=0
|
|
local __CNT=0 # error counter
|
|
local __PROG __RUNPROG
|
|
|
|
[ $# -ne 1 ] && write_log 12 "Error in 'do_transfer()' - wrong number of parameters"
|
|
|
|
# lets prefer GNU Wget because it does all for us - IPv4/IPv6/HTTPS/PROXY/force IP version
|
|
if [ -n "$(which wget-ssl)" -a $USE_CURL -eq 0 ]; then # except global option use_curl is set to "1"
|
|
__PROG="$(which wget-ssl) -nv -t 1 -O $DATFILE -o $ERRFILE" # non_verbose no_retry outfile errfile
|
|
# force network/ip to use for communication
|
|
if [ -n "$bind_network" ]; then
|
|
local __BINDIP
|
|
# set correct program to detect IP
|
|
[ $use_ipv6 -eq 0 ] && __RUNPROG="network_get_ipaddr" || __RUNPROG="network_get_ipaddr6"
|
|
eval "$__RUNPROG __BINDIP $bind_network" || \
|
|
write_log 13 "Can not detect local IP using '$__RUNPROG $bind_network' - Error: '$?'"
|
|
write_log 7 "Force communication via IP '$__BINDIP'"
|
|
__PROG="$__PROG --bind-address=$__BINDIP"
|
|
fi
|
|
# force ip version to use
|
|
if [ $force_ipversion -eq 1 ]; then
|
|
[ $use_ipv6 -eq 0 ] && __PROG="$__PROG -4" || __PROG="$__PROG -6" # force IPv4/IPv6
|
|
fi
|
|
# set certificate parameters
|
|
if [ $use_https -eq 1 ]; then
|
|
if [ "$cacert" = "IGNORE" ]; then # idea from Ticket #15327 to ignore server cert
|
|
__PROG="$__PROG --no-check-certificate"
|
|
elif [ -f "$cacert" ]; then
|
|
__PROG="$__PROG --ca-certificate=${cacert}"
|
|
elif [ -d "$cacert" ]; then
|
|
__PROG="$__PROG --ca-directory=${cacert}"
|
|
elif [ -n "$cacert" ]; then # it's not a file and not a directory but given
|
|
write_log 14 "No valid certificate(s) found at '$cacert' for HTTPS communication"
|
|
fi
|
|
fi
|
|
# disable proxy if no set (there might be .wgetrc or .curlrc or wrong environment set)
|
|
[ -z "$proxy" ] && __PROG="$__PROG --no-proxy"
|
|
|
|
__RUNPROG="$__PROG '$__URL'" # build final command
|
|
__PROG="GNU Wget" # reuse for error logging
|
|
|
|
# 2nd choice is cURL IPv4/IPv6/HTTPS
|
|
# libcurl might be compiled without Proxy or HTTPS Support
|
|
elif [ -n "$(which curl)" ]; then
|
|
__PROG="$(which curl) -RsS -o $DATFILE --stderr $ERRFILE"
|
|
# check HTTPS support
|
|
/usr/bin/curl -V | grep "Protocols:" | grep -F "https" >/dev/null 2>&1
|
|
[ $? -eq 1 -a $use_https -eq 1 ] && \
|
|
write_log 13 "cURL: libcurl compiled without https support"
|
|
# force network/interface-device to use for communication
|
|
if [ -n "$bind_network" ]; then
|
|
local __DEVICE
|
|
network_get_physdev __DEVICE $bind_network || \
|
|
write_log 13 "Can not detect local device using 'network_get_physdev $bind_network' - Error: '$?'"
|
|
write_log 7 "Force communication via device '$__DEVICE'"
|
|
__PROG="$__PROG --interface $__DEVICE"
|
|
fi
|
|
# force ip version to use
|
|
if [ $force_ipversion -eq 1 ]; then
|
|
[ $use_ipv6 -eq 0 ] && __PROG="$__PROG -4" || __PROG="$__PROG -6" # force IPv4/IPv6
|
|
fi
|
|
# set certificate parameters
|
|
if [ $use_https -eq 1 ]; then
|
|
if [ "$cacert" = "IGNORE" ]; then # idea from Ticket #15327 to ignore server cert
|
|
__PROG="$__PROG --insecure" # but not empty better to use "IGNORE"
|
|
elif [ -f "$cacert" ]; then
|
|
__PROG="$__PROG --cacert $cacert"
|
|
elif [ -d "$cacert" ]; then
|
|
__PROG="$__PROG --capath $cacert"
|
|
elif [ -n "$cacert" ]; then # it's not a file and not a directory but given
|
|
write_log 14 "No valid certificate(s) found at '$cacert' for HTTPS communication"
|
|
fi
|
|
fi
|
|
# disable proxy if no set (there might be .wgetrc or .curlrc or wrong environment set)
|
|
# or check if libcurl compiled with proxy support
|
|
if [ -z "$proxy" ]; then
|
|
__PROG="$__PROG --noproxy '*'"
|
|
else
|
|
# if libcurl has no proxy support and proxy should be used then force ERROR
|
|
# libcurl currently no proxy support by default
|
|
grep -i "all_proxy" /usr/lib/libcurl.so* >/dev/null 2>&1 || \
|
|
write_log 13 "cURL: libcurl compiled without Proxy support"
|
|
fi
|
|
|
|
__RUNPROG="$__PROG '$__URL'" # build final command
|
|
__PROG="cURL" # reuse for error logging
|
|
|
|
# uclient-fetch possibly with ssl support if /lib/libustream-ssl.so installed
|
|
elif [ -n "$(which uclient-fetch)" ]; then
|
|
__PROG="$(which uclient-fetch) -q -O $DATFILE"
|
|
# force network/ip not supported
|
|
[ -n "$__BINDIP" ] && \
|
|
write_log 14 "uclient-fetch: FORCE binding to specific address not supported"
|
|
# force ip version to use
|
|
if [ $force_ipversion -eq 1 ]; then
|
|
[ $use_ipv6 -eq 0 ] && __PROG="$__PROG -4" || __PROG="$__PROG -6" # force IPv4/IPv6
|
|
fi
|
|
# https possibly not supported
|
|
[ $use_https -eq 1 -a ! -f /lib/libustream-ssl.so ] && \
|
|
write_log 14 "uclient-fetch: no HTTPS support! Additional install one of ustream-ssl packages"
|
|
# proxy support
|
|
[ -z "$proxy" ] && __PROG="$__PROG -Y off" || __PROG="$__PROG -Y on"
|
|
# https & certificates
|
|
if [ $use_https -eq 1 ]; then
|
|
if [ "$cacert" = "IGNORE" ]; then
|
|
__PROG="$__PROG --no-check-certificate"
|
|
elif [ -f "$cacert" ]; then
|
|
__PROG="$__PROG --ca-certificate=$cacert"
|
|
elif [ -n "$cacert" ]; then # it's not a file; nothing else supported
|
|
write_log 14 "No valid certificate file '$cacert' for HTTPS communication"
|
|
fi
|
|
fi
|
|
__RUNPROG="$__PROG '$__URL' 2>$ERRFILE" # build final command
|
|
__PROG="uclient-fetch" # reuse for error logging
|
|
|
|
# Busybox Wget or any other wget in search $PATH (did not support neither IPv6 nor HTTPS)
|
|
elif [ -n "$(which wget)" ]; then
|
|
__PROG="$(which wget) -q -O $DATFILE"
|
|
# force network/ip not supported
|
|
[ -n "$__BINDIP" ] && \
|
|
write_log 14 "BusyBox Wget: FORCE binding to specific address not supported"
|
|
# force ip version not supported
|
|
[ $force_ipversion -eq 1 ] && \
|
|
write_log 14 "BusyBox Wget: Force connecting to IPv4 or IPv6 addresses not supported"
|
|
# https not supported
|
|
[ $use_https -eq 1 ] && \
|
|
write_log 14 "BusyBox Wget: no HTTPS support"
|
|
# disable proxy if no set (there might be .wgetrc or .curlrc or wrong environment set)
|
|
[ -z "$proxy" ] && __PROG="$__PROG -Y off"
|
|
|
|
__RUNPROG="$__PROG '$__URL' 2>$ERRFILE" # build final command
|
|
__PROG="Busybox Wget" # reuse for error logging
|
|
|
|
else
|
|
write_log 13 "Neither 'Wget' nor 'cURL' nor 'uclient-fetch' installed or executable"
|
|
fi
|
|
|
|
while : ; do
|
|
write_log 7 "#> $__RUNPROG"
|
|
eval $__RUNPROG # DO transfer
|
|
__ERR=$? # save error code
|
|
[ $__ERR -eq 0 ] && return 0 # no error leave
|
|
[ $LUCI_HELPER ] && return 1 # no retry if called by LuCI helper script
|
|
|
|
write_log 3 "$__PROG Error: '$__ERR'"
|
|
write_log 7 "$(cat $ERRFILE)" # report error
|
|
|
|
[ $VERBOSE_MODE -gt 1 ] && {
|
|
# VERBOSE_MODE > 1 then NO retry
|
|
write_log 4 "Transfer failed - Verbose Mode: $VERBOSE_MODE - NO retry on error"
|
|
return 1
|
|
}
|
|
|
|
__CNT=$(( $__CNT + 1 )) # increment error counter
|
|
# if error count > retry_count leave here
|
|
[ $retry_count -gt 0 -a $__CNT -gt $retry_count ] && \
|
|
write_log 14 "Transfer failed after $retry_count retries"
|
|
|
|
write_log 4 "Transfer failed - retry $__CNT/$retry_count in $RETRY_SECONDS seconds"
|
|
sleep $RETRY_SECONDS &
|
|
PID_SLEEP=$!
|
|
wait $PID_SLEEP # enable trap-handler
|
|
PID_SLEEP=0
|
|
done
|
|
# we should never come here there must be a programming error
|
|
write_log 12 "Error in 'do_transfer()' - program coding error"
|
|
}
|
|
|
|
send_update() {
|
|
# $1 # IP to set at DDNS service provider
|
|
local __IP
|
|
|
|
[ $# -ne 1 ] && write_log 12 "Error calling 'send_update()' - wrong number of parameters"
|
|
|
|
if [ $ALLOW_LOCAL_IP -eq 0 ]; then
|
|
# verify given IP / no private IPv4's / no IPv6 addr starting with fxxx of with ":"
|
|
[ $use_ipv6 -eq 0 ] && __IP=$(echo $1 | grep -v -E "(^0|^10\.|^100\.6[4-9]\.|^100\.[7-9][0-9]\.|^100\.1[0-1][0-9]\.|^100\.12[0-7]\.|^127|^169\.254|^172\.1[6-9]\.|^172\.2[0-9]\.|^172\.3[0-1]\.|^192\.168)")
|
|
[ $use_ipv6 -eq 1 ] && __IP=$(echo $1 | grep "^[0-9a-eA-E]")
|
|
[ -z "$__IP" ] && write_log 14 "Private or invalid or no IP '$1' given! Please check your configuration"
|
|
else
|
|
__IP="$1"
|
|
fi
|
|
|
|
if [ -n "$update_script" ]; then
|
|
write_log 7 "parsing script '$update_script'"
|
|
. $update_script
|
|
else
|
|
local __URL __ERR
|
|
|
|
# do replaces in URL
|
|
__URL=$(echo $update_url | sed -e "s#\[USERNAME\]#$URL_USER#g" -e "s#\[PASSWORD\]#$URL_PASS#g" \
|
|
-e "s#\[PARAMENC\]#$URL_PENC#g" -e "s#\[PARAMOPT\]#$param_opt#g" \
|
|
-e "s#\[DOMAIN\]#$domain#g" -e "s#\[IP\]#$__IP#g")
|
|
[ $use_https -ne 0 ] && __URL=$(echo $__URL | sed -e 's#^http:#https:#')
|
|
|
|
do_transfer "$__URL" || return 1
|
|
|
|
write_log 7 "DDNS Provider answered:\n$(cat $DATFILE)"
|
|
|
|
[ -z "$SRV_ANSWER" ] && return 0 # not set then ignore
|
|
|
|
grep -i -E "$SRV_ANSWER" $DATFILE >/dev/null 2>&1
|
|
return $? # "0" if found
|
|
fi
|
|
}
|
|
|
|
get_local_ip () {
|
|
# $1 Name of Variable to store local IP (LOCAL_IP)
|
|
local __CNT=0 # error counter
|
|
local __RUNPROG __DATA __URL __ERR
|
|
|
|
[ $# -ne 1 ] && write_log 12 "Error calling 'get_local_ip()' - wrong number of parameters"
|
|
write_log 7 "Detect local IP on '$ip_source'"
|
|
|
|
while : ; do
|
|
case $ip_source in
|
|
network)
|
|
# set correct program
|
|
[ $use_ipv6 -eq 0 ] && __RUNPROG="network_get_ipaddr" \
|
|
|| __RUNPROG="network_get_ipaddr6"
|
|
eval "$__RUNPROG __DATA $ip_network" || \
|
|
write_log 13 "Can not detect local IP using $__RUNPROG '$ip_network' - Error: '$?'"
|
|
[ -n "$__DATA" ] && write_log 7 "Local IP '$__DATA' detected on network '$ip_network'"
|
|
;;
|
|
interface)
|
|
write_log 7 "#> ifconfig $ip_interface >$DATFILE 2>$ERRFILE"
|
|
ifconfig $ip_interface >$DATFILE 2>$ERRFILE
|
|
__ERR=$?
|
|
if [ $__ERR -eq 0 ]; then
|
|
if [ $use_ipv6 -eq 0 ]; then
|
|
__DATA=$(awk '
|
|
/inet addr:/ { # Filter IPv4
|
|
# inet addr:192.168.1.1 Bcast:192.168.1.255 Mask:255.255.255.0
|
|
$1=""; # remove inet
|
|
$3=""; # remove Bcast: ...
|
|
$4=""; # remove Mask: ...
|
|
FS=":"; # separator ":"
|
|
$0=$0; # reread to activate separator
|
|
$1=""; # remove addr
|
|
FS=" "; # set back separator to default " "
|
|
$0=$0; # reread to activate separator (remove whitespaces)
|
|
print $1; # print IPv4 addr
|
|
}' $DATFILE
|
|
)
|
|
else
|
|
__DATA=$(awk '
|
|
/inet6/ && /: [0-9a-eA-E]/ { # Filter IPv6 exclude fxxx
|
|
# inet6 addr: 2001:db8::xxxx:xxxx/32 Scope:Global
|
|
FS="/"; # separator "/"
|
|
$0=$0; # reread to activate separator
|
|
$2=""; # remove everything behind "/"
|
|
FS=" "; # set back separator to default " "
|
|
$0=$0; # reread to activate separator
|
|
print $3; # print IPv6 addr
|
|
}' $DATFILE
|
|
)
|
|
fi
|
|
[ -n "$__DATA" ] && write_log 7 "Local IP '$__DATA' detected on interface '$ip_interface'"
|
|
else
|
|
write_log 3 "ifconfig Error: '$__ERR'"
|
|
write_log 7 "$(cat $ERRFILE)" # report error
|
|
fi
|
|
;;
|
|
script)
|
|
write_log 7 "#> $ip_script >$DATFILE 2>$ERRFILE"
|
|
eval $ip_script >$DATFILE 2>$ERRFILE
|
|
__ERR=$?
|
|
if [ $__ERR -eq 0 ]; then
|
|
__DATA=$(cat $DATFILE)
|
|
[ -n "$__DATA" ] && write_log 7 "Local IP '$__DATA' detected via script '$ip_script'"
|
|
else
|
|
write_log 3 "$ip_script Error: '$__ERR'"
|
|
write_log 7 "$(cat $ERRFILE)" # report error
|
|
fi
|
|
;;
|
|
web)
|
|
do_transfer "$ip_url"
|
|
# use correct regular expression
|
|
[ $use_ipv6 -eq 0 ] \
|
|
&& __DATA=$(grep -m 1 -o "$IPV4_REGEX" $DATFILE) \
|
|
|| __DATA=$(grep -m 1 -o "$IPV6_REGEX" $DATFILE)
|
|
[ -n "$__DATA" ] && write_log 7 "Local IP '$__DATA' detected on web at '$ip_url'"
|
|
;;
|
|
*)
|
|
write_log 12 "Error in 'get_local_ip()' - unhandled ip_source '$ip_source'"
|
|
;;
|
|
esac
|
|
# valid data found return here
|
|
[ -n "$__DATA" ] && {
|
|
eval "$1=\"$__DATA\""
|
|
return 0
|
|
}
|
|
|
|
[ $LUCI_HELPER ] && return 1 # no retry if called by LuCI helper script
|
|
|
|
write_log 7 "Data detected:\n$(cat $DATFILE)"
|
|
|
|
[ $VERBOSE_MODE -gt 1 ] && {
|
|
# VERBOSE_MODE > 1 then NO retry
|
|
write_log 4 "Get local IP via '$ip_source' failed - Verbose Mode: $VERBOSE_MODE - NO retry on error"
|
|
return 1
|
|
}
|
|
|
|
__CNT=$(( $__CNT + 1 )) # increment error counter
|
|
# if error count > retry_count leave here
|
|
[ $retry_count -gt 0 -a $__CNT -gt $retry_count ] && \
|
|
write_log 14 "Get local IP via '$ip_source' failed after $retry_count retries"
|
|
write_log 4 "Get local IP via '$ip_source' failed - retry $__CNT/$retry_count in $RETRY_SECONDS seconds"
|
|
sleep $RETRY_SECONDS &
|
|
PID_SLEEP=$!
|
|
wait $PID_SLEEP # enable trap-handler
|
|
PID_SLEEP=0
|
|
done
|
|
# we should never come here there must be a programming error
|
|
write_log 12 "Error in 'get_local_ip()' - program coding error"
|
|
}
|
|
|
|
get_registered_ip() {
|
|
# $1 Name of Variable to store public IP (REGISTERED_IP)
|
|
# $2 (optional) if set, do not retry on error
|
|
local __CNT=0 # error counter
|
|
local __ERR=255
|
|
local __REGEX __PROG __RUNPROG __DATA __IP
|
|
local __MUSL=$(nslookup localhost 2>&1 | grep -qF "(null)"; echo $?) # 0 == busybox compiled with musl "(null)" found
|
|
# return codes
|
|
# 1 no IP detected
|
|
|
|
[ $# -lt 1 -o $# -gt 2 ] && write_log 12 "Error calling 'get_registered_ip()' - wrong number of parameters"
|
|
[ $is_glue -eq 1 ] && [ -z "$(which host)" ] && write_log 12 "Update of glue records is only supported using BIND host"
|
|
write_log 7 "Detect registered/public IP"
|
|
|
|
# set correct regular expression
|
|
[ $use_ipv6 -eq 0 ] && __REGEX="$IPV4_REGEX" || __REGEX="$IPV6_REGEX"
|
|
|
|
if [ -n "$(which host)" ]; then
|
|
__PROG="$(which host)"
|
|
[ $use_ipv6 -eq 0 ] && __PROG="$__PROG -t A" || __PROG="$__PROG -t AAAA"
|
|
if [ $force_ipversion -eq 1 ]; then # force IP version
|
|
[ $use_ipv6 -eq 0 ] && __PROG="$__PROG -4" || __PROG="$__PROG -6"
|
|
fi
|
|
[ $force_dnstcp -eq 1 ] && __PROG="$__PROG -T" # force TCP
|
|
[ $is_glue -eq 1 ] && __PROG="$__PROG -v" # use verbose output to get additional section
|
|
|
|
__RUNPROG="$__PROG $lookup_host $dns_server >$DATFILE 2>$ERRFILE"
|
|
__PROG="BIND host"
|
|
elif [ -n "$(which khost)" ]; then
|
|
__PROG="$(which khost)"
|
|
[ $use_ipv6 -eq 0 ] && __PROG="$__PROG -t A" || __PROG="$__PROG -t AAAA"
|
|
if [ $force_ipversion -eq 1 ]; then # force IP version
|
|
[ $use_ipv6 -eq 0 ] && __PROG="$__PROG -4" || __PROG="$__PROG -6"
|
|
fi
|
|
[ $force_dnstcp -eq 1 ] && __PROG="$__PROG -T" # force TCP
|
|
|
|
__RUNPROG="$__PROG $lookup_host $dns_server >$DATFILE 2>$ERRFILE"
|
|
__PROG="Knot host"
|
|
elif [ -n "$(which drill)" ]; then
|
|
__PROG="$(which drill) -V0" # drill options name @server type
|
|
if [ $force_ipversion -eq 1 ]; then # force IP version
|
|
[ $use_ipv6 -eq 0 ] && __PROG="$__PROG -4" || __PROG="$__PROG -6"
|
|
fi
|
|
[ $force_dnstcp -eq 1 ] && __PROG="$__PROG -t" || __PROG="$__PROG -u" # force TCP
|
|
__PROG="$__PROG $lookup_host"
|
|
[ -n "$dns_server" ] && __PROG="$__PROG @$dns_server"
|
|
[ $use_ipv6 -eq 0 ] && __PROG="$__PROG A" || __PROG="$__PROG AAAA"
|
|
|
|
__RUNPROG="$__PROG >$DATFILE 2>$ERRFILE"
|
|
__PROG="drill"
|
|
elif [ -n "$(which hostip)" ]; then # hostip package installed
|
|
__PROG="$(which hostip)"
|
|
[ $force_dnstcp -ne 0 ] && \
|
|
write_log 14 "hostip - no support for 'DNS over TCP'"
|
|
|
|
# is IP given as dns_server ?
|
|
__IP=$(echo $dns_server | grep -m 1 -o "$IPV4_REGEX")
|
|
[ -z "$__IP" ] && __IP=$(echo $dns_server | grep -m 1 -o "$IPV6_REGEX")
|
|
|
|
# we got NO ip for dns_server, so build command
|
|
[ -z "$__IP" -a -n "$dns_server" ] && {
|
|
__IP="\`/usr/bin/hostip"
|
|
[ $use_ipv6 -eq 1 -a $force_ipversion -eq 1 ] && __IP="$__IP -6"
|
|
__IP="$__IP $dns_server | grep -m 1 -o"
|
|
[ $use_ipv6 -eq 1 -a $force_ipversion -eq 1 ] \
|
|
&& __IP="$__IP '$IPV6_REGEX'" \
|
|
|| __IP="$__IP '$IPV4_REGEX'"
|
|
__IP="$__IP \`"
|
|
}
|
|
|
|
[ $use_ipv6 -eq 1 ] && __PROG="$__PROG -6"
|
|
[ -n "$dns_server" ] && __PROG="$__PROG -r $__IP"
|
|
__RUNPROG="$__PROG $lookup_host >$DATFILE 2>$ERRFILE"
|
|
__PROG="hostip"
|
|
elif [ -n "$(which nslookup)" ]; then # last use BusyBox nslookup
|
|
[ $force_ipversion -ne 0 -o $force_dnstcp -ne 0 ] && \
|
|
write_log 14 "Busybox nslookup - no support to 'force IP Version' or 'DNS over TCP'"
|
|
[ $__MUSL -eq 0 -a -n "$dns_server" ] && \
|
|
write_log 14 "Busybox compiled with musl - nslookup - no support to set/use DNS Server"
|
|
|
|
__RUNPROG="$(which nslookup) $lookup_host $dns_server >$DATFILE 2>$ERRFILE"
|
|
__PROG="BusyBox nslookup"
|
|
else # there must be an error
|
|
write_log 12 "Error in 'get_registered_ip()' - no supported Name Server lookup software accessible"
|
|
fi
|
|
|
|
while : ; do
|
|
write_log 7 "#> $__RUNPROG"
|
|
eval $__RUNPROG
|
|
__ERR=$?
|
|
if [ $__ERR -ne 0 ]; then
|
|
write_log 3 "$__PROG error: '$__ERR'"
|
|
write_log 7 "$(cat $ERRFILE)"
|
|
else
|
|
if [ "$__PROG" = "BIND host" ]; then
|
|
__DATA=$(cat $DATFILE | awk -F "address " '/has/ {print $2; exit}' )
|
|
|
|
if [ $is_glue -eq 1 ]; then
|
|
__DATA=$(cat $DATFILE | grep "^$lookup_host" | grep -m 1 -o "$__REGEX" )
|
|
else
|
|
__DATA=$(cat $DATFILE | awk -F "address " '/has/ {print $2; exit}' )
|
|
fi
|
|
elif [ "$__PROG" = "Knot host" ]; then
|
|
__DATA=$(cat $DATFILE | awk -F "address " '/has/ {print $2; exit}' )
|
|
elif [ "$__PROG" = "drill" ]; then
|
|
__DATA=$(cat $DATFILE | awk '/^'"$lookup_host"'/ {print $5; exit}' )
|
|
elif [ "$__PROG" = "hostip" ]; then
|
|
__DATA=$(cat $DATFILE | grep -m 1 -o "$__REGEX")
|
|
else
|
|
__DATA=$(cat $DATFILE | sed -ne "/^Name:/,\$ { s/^Address[0-9 ]\{0,\}: \($__REGEX\).*$/\\1/p }" )
|
|
fi
|
|
[ -n "$__DATA" ] && {
|
|
write_log 7 "Registered IP '$__DATA' detected"
|
|
eval "$1=\"$__DATA\"" # valid data found
|
|
return 0 # leave here
|
|
}
|
|
write_log 4 "NO valid IP found"
|
|
__ERR=127
|
|
fi
|
|
|
|
[ $LUCI_HELPER ] && return $__ERR # no retry if called by LuCI helper script
|
|
[ -n "$2" ] && return $__ERR # $2 is given -> no retry
|
|
[ $VERBOSE_MODE -gt 1 ] && {
|
|
# VERBOSE_MODE > 1 then NO retry
|
|
write_log 4 "Get registered/public IP for '$lookup_host' failed - Verbose Mode: $VERBOSE_MODE - NO retry on error"
|
|
return $__ERR
|
|
}
|
|
|
|
__CNT=$(( $__CNT + 1 )) # increment error counter
|
|
# if error count > retry_count leave here
|
|
[ $retry_count -gt 0 -a $__CNT -gt $retry_count ] && \
|
|
write_log 14 "Get registered/public IP for '$lookup_host' failed after $retry_count retries"
|
|
|
|
write_log 4 "Get registered/public IP for '$lookup_host' failed - retry $__CNT/$retry_count in $RETRY_SECONDS seconds"
|
|
sleep $RETRY_SECONDS &
|
|
PID_SLEEP=$!
|
|
wait $PID_SLEEP # enable trap-handler
|
|
PID_SLEEP=0
|
|
done
|
|
# we should never come here there must be a programming error
|
|
write_log 12 "Error in 'get_registered_ip()' - program coding error"
|
|
}
|
|
|
|
get_uptime() {
|
|
# $1 Variable to store result in
|
|
[ $# -ne 1 ] && write_log 12 "Error calling 'verify_host_port()' - wrong number of parameters"
|
|
local __UPTIME=$(cat /proc/uptime)
|
|
eval "$1=\"${__UPTIME%%.*}\""
|
|
}
|
|
|
|
trap_handler() {
|
|
# $1 trap signal
|
|
# $2 optional (exit status)
|
|
local __PIDS __PID
|
|
local __ERR=${2:-0}
|
|
local __OLD_IFS=$IFS
|
|
local __NEWLINE_IFS='
|
|
' # __NEWLINE_IFS
|
|
|
|
[ $PID_SLEEP -ne 0 ] && kill -$1 $PID_SLEEP 2>/dev/null # kill pending sleep if exist
|
|
|
|
case $1 in
|
|
0) if [ $__ERR -eq 0 ]; then
|
|
write_log 5 "PID '$$' exit normal at $(eval $DATE_PROG)\n"
|
|
else
|
|
write_log 4 "PID '$$' exit WITH ERROR '$__ERR' at $(eval $DATE_PROG)\n"
|
|
fi ;;
|
|
1) write_log 6 "PID '$$' received 'SIGHUP' at $(eval $DATE_PROG)"
|
|
# reload config via starting the script again
|
|
eval "/usr/lib/ddns/dynamic_dns_updater.sh $SECTION_ID $VERBOSE_MODE &"
|
|
exit 0 ;; # and leave this one
|
|
2) write_log 5 "PID '$$' terminated by 'SIGINT' at $(eval $DATE_PROG)\n";;
|
|
3) write_log 5 "PID '$$' terminated by 'SIGQUIT' at $(eval $DATE_PROG)\n";;
|
|
15) write_log 5 "PID '$$' terminated by 'SIGTERM' at $(eval $DATE_PROG)\n";;
|
|
*) write_log 13 "Unhandled signal '$1' in 'trap_handler()'";;
|
|
esac
|
|
|
|
__PIDS=$(pgrep -P $$) # get my childs (pgrep prints with "newline")
|
|
IFS=$__NEWLINE_IFS
|
|
for __PID in $__PIDS; do
|
|
kill -$1 $__PID # terminate it
|
|
done
|
|
IFS=$__OLD_IFS
|
|
|
|
# remove out and err file
|
|
[ -f $DATFILE ] && rm -f $DATFILE
|
|
[ -f $ERRFILE ] && rm -f $ERRFILE
|
|
|
|
# exit with correct handling:
|
|
# remove trap handling settings and send kill to myself
|
|
trap - 0 1 2 3 15
|
|
[ $1 -gt 0 ] && kill -$1 $$
|
|
}
|
|
|
|
split_FQDN() {
|
|
# $1 FQDN to split
|
|
# $2 name of variable to store TLD
|
|
# $3 name of variable to store (reg)Domain
|
|
# $4 name of variable to store Host/Subdomain
|
|
|
|
[ $# -ne 4 ] && write_log 12 "Error calling 'split_FQDN()' - wrong number of parameters"
|
|
[ -z "$1" ] && write_log 12 "Error calling 'split_FQDN()' - missing FQDN to split"
|
|
[ -f $TLDFILE ] || write_log 12 "Error calling 'split_FQDN()' - missing file '$TLDFILE'"
|
|
|
|
local _HOST _FDOM _CTLD _FTLD
|
|
local _SET="$@" # save given function parameters
|
|
|
|
local _PAR=$(echo "$1" | tr [A-Z] [a-z] | tr "." " ") # to lower and replace DOT with SPACE
|
|
set -- $_PAR # set new as function parameters
|
|
_PAR="" # clear variable for later reuse
|
|
while [ -n "$1" ] ; do # as long we have parameters
|
|
_PAR="$1 $_PAR" # invert order of parameters
|
|
shift
|
|
done
|
|
set -- $_PAR # use new as function parameters
|
|
_PAR="" # clear variable
|
|
|
|
while [ -n "$1" ] ; do # as long we have parameters
|
|
if [ -z "$_CTLD" ]; then # first loop
|
|
_CTLD="$1" # CURRENT TLD to look at
|
|
shift
|
|
else
|
|
_CTLD="$1.$_CTLD" # Next TLD to look at
|
|
shift
|
|
fi
|
|
# check if TLD exact match in tld_names.dat, save TLD
|
|
zcat $TLDFILE | grep -E "^$_CTLD$" >/dev/null 2>&1 && {
|
|
_FTLD="$_CTLD" # save found
|
|
_FDOM="$1" # save domain next step might be invalid
|
|
continue
|
|
}
|
|
# check if match any "*" in tld_names.dat,
|
|
zcat $TLDFILE | grep -E "^\*.$_CTLD$" >/dev/null 2>&1 && {
|
|
[ -z "$1" ] && break # no more data break
|
|
# check if next level TLD match excludes "!" in tld_names.dat
|
|
if zcat $TLDFILE | grep -E "^!$1.$_CTLD$" >/dev/null 2>&1 ; then
|
|
_FTLD="$_CTLD" # Yes
|
|
else
|
|
_FTLD="$1.$_CTLD"
|
|
shift
|
|
fi
|
|
_FDOM="$1"; shift
|
|
}
|
|
[ -n "$_FTLD" ] && break # we have something valid, break
|
|
done
|
|
|
|
# the leftover parameters are the HOST/SUBDOMAIN
|
|
while [ -n "$1" ]; do
|
|
_HOST="$1 $_HOST" # remember we need to invert
|
|
shift
|
|
done
|
|
_HOST=$(echo $_HOST | tr " " ".") # insert DOT
|
|
|
|
set -- $_SET # set back parameters from function call
|
|
[ -n "$_FTLD" ] && {
|
|
eval "$2=$_FTLD" # set TLD
|
|
eval "$3=$_FDOM" # set registrable domain
|
|
eval "$4=$_HOST" # set HOST/SUBDOMAIN
|
|
return 0
|
|
}
|
|
eval "$2=''" # clear TLD
|
|
eval "$3=''" # clear registrable domain
|
|
eval "$4=''" # clear HOST/SUBDOMAIN
|
|
return 1
|
|
}
|
|
|
|
expand_ipv6() {
|
|
# Original written for bash by
|
|
# Author: Florian Streibelt <florian@f-streibelt.de>
|
|
# Date: 08.04.2012
|
|
# License: Public Domain, but please be fair and
|
|
# attribute the original author(s) and provide
|
|
# a link to the original source for corrections:
|
|
#. https://github.com/mutax/IPv6-Address-checks
|
|
|
|
# $1 IPv6 t0 expand
|
|
# $2 name of variable to store expanded IPv6
|
|
[ $# -ne 2 ] && write_log 12 "Error calling 'expand_ipv6()' - wrong number of parameters"
|
|
|
|
INPUT="$(echo "$1" | tr 'A-F' 'a-f')"
|
|
[ "$INPUT" = "::" ] && INPUT="::0" # special case ::
|
|
|
|
O=""
|
|
|
|
while [ "$O" != "$INPUT" ]; do
|
|
O="$INPUT"
|
|
|
|
# fill all words with zeroes
|
|
INPUT=$( echo "$INPUT" | sed -e 's|:\([0-9a-f]\{3\}\):|:0\1:|g' \
|
|
-e 's|:\([0-9a-f]\{3\}\)$|:0\1|g' \
|
|
-e 's|^\([0-9a-f]\{3\}\):|0\1:|g' \
|
|
-e 's|:\([0-9a-f]\{2\}\):|:00\1:|g' \
|
|
-e 's|:\([0-9a-f]\{2\}\)$|:00\1|g' \
|
|
-e 's|^\([0-9a-f]\{2\}\):|00\1:|g' \
|
|
-e 's|:\([0-9a-f]\):|:000\1:|g' \
|
|
-e 's|:\([0-9a-f]\)$|:000\1|g' \
|
|
-e 's|^\([0-9a-f]\):|000\1:|g' )
|
|
|
|
done
|
|
|
|
# now expand the ::
|
|
ZEROES=""
|
|
|
|
echo "$INPUT" | grep -qs "::"
|
|
if [ "$?" -eq 0 ]; then
|
|
GRPS="$( echo "$INPUT" | sed 's|[0-9a-f]||g' | wc -m )"
|
|
GRPS=$(( GRPS-1 )) # remove carriage return
|
|
MISSING=$(( 8-GRPS ))
|
|
while [ $MISSING -gt 0 ]; do
|
|
ZEROES="$ZEROES:0000"
|
|
MISSING=$(( MISSING-1 ))
|
|
done
|
|
|
|
# be careful where to place the :
|
|
INPUT=$( echo "$INPUT" | sed -e 's|\(.\)::\(.\)|\1'$ZEROES':\2|g' \
|
|
-e 's|\(.\)::$|\1'$ZEROES':0000|g' \
|
|
-e 's|^::\(.\)|'$ZEROES':0000:\1|g;s|^:||g' )
|
|
fi
|
|
|
|
# an expanded address has 39 chars + CR
|
|
if [ $(echo $INPUT | wc -m) != 40 ]; then
|
|
write_log 4 "Error in 'expand_ipv6()' - invalid IPv6 found: '$1' expanded: '$INPUT'"
|
|
eval "$2='invalid'"
|
|
return 1
|
|
fi
|
|
|
|
# echo the fully expanded version of the address
|
|
eval "$2=$INPUT"
|
|
return 0
|
|
}
|