busybox: udhcpc script

2 files changed, 158 insertions, 14 deletions

diff --git a/core/busybox/files/.config b/core/busybox/files/.config
index 87c7b94f..6d7a181b 100644
--- a/core/busybox/files/.config
+++ b/core/busybox/files/.config
@@ -1,7 +1,7 @@
 #
 # Automatically generated make config: don't edit
 # Busybox version: 1.31.1
-# Mon Jun  1 11:10:36 2020
+# Fri Jun  5 11:32:04 2020
 #
 CONFIG_HAVE_DOT_CONFIG=y
 
@@ -979,20 +979,24 @@ CONFIG_WHOIS=y
 CONFIG_DHCPD_LEASES_FILE=""
 # CONFIG_DUMPLEASES is not set
 # CONFIG_DHCPRELAY is not set
-# CONFIG_UDHCPC is not set
-# CONFIG_FEATURE_UDHCPC_ARPING is not set
-# CONFIG_FEATURE_UDHCPC_SANITIZEOPT is not set
-CONFIG_UDHCPC_DEFAULT_SCRIPT=""
-# CONFIG_UDHCPC6 is not set
-# CONFIG_FEATURE_UDHCPC6_RFC3646 is not set
-# CONFIG_FEATURE_UDHCPC6_RFC4704 is not set
-# CONFIG_FEATURE_UDHCPC6_RFC4833 is not set
-# CONFIG_FEATURE_UDHCPC6_RFC5970 is not set
+CONFIG_UDHCPC=y
+CONFIG_FEATURE_UDHCPC_ARPING=y
+CONFIG_FEATURE_UDHCPC_SANITIZEOPT=y
+CONFIG_UDHCPC_DEFAULT_SCRIPT="/etc/udhcpc"
+CONFIG_UDHCPC6=y
+CONFIG_FEATURE_UDHCPC6_RFC3646=y
+CONFIG_FEATURE_UDHCPC6_RFC4704=y
+CONFIG_FEATURE_UDHCPC6_RFC4833=y
+CONFIG_FEATURE_UDHCPC6_RFC5970=y
+
+#
+# Common options for DHCP applets
+#
 # CONFIG_FEATURE_UDHCP_PORT is not set
-CONFIG_UDHCP_DEBUG=0
-CONFIG_UDHCPC_SLACK_FOR_BUGGY_SERVERS=0
-# CONFIG_FEATURE_UDHCP_RFC3397 is not set
-# CONFIG_FEATURE_UDHCP_8021Q is not set
+CONFIG_UDHCP_DEBUG=2
+CONFIG_UDHCPC_SLACK_FOR_BUGGY_SERVERS=80
+CONFIG_FEATURE_UDHCP_RFC3397=y
+CONFIG_FEATURE_UDHCP_8021Q=y
 CONFIG_IFUPDOWN_UDHCPC_CMD_OPTIONS="-R -n"
 
 #
diff --git a/core/busybox/files/udhcpc.script b/core/busybox/files/udhcpc.script
new file mode 100644
index 00000000..b3003cd0
--- /dev/null
+++ b/core/busybox/files/udhcpc.script
@@ -0,0 +1,140 @@
+#!/bin/sh
+# shellcheck source=/dev/null
+# shellcheck disable=1090
+
+# script for udhcpc
+# Copyright (c) 2008 Natanael Copa <natanael.copa@gmail.com>
+# Copyright (c) 2020 Cem Keylan <cem@ckyln.com>
+
+# I have made some minor changes, POSIX shell fixes, and linting.
+# Rest of the script is pretty much the same.
+# - Cem
+
+[ -f "${UDHCPC:=/etc/udhcpc.d}/udhcpc.conf" ] && . "$UDHCPC/udhcpc.conf"
+
+RESOLV_CONF="/etc/resolv.conf"
+
+# Export variables so that hooks can also make use of them.
+export broadcast
+export dns
+export domain
+export interface
+export ip
+export mask
+export metric
+export router
+export search
+export subnet
+
+run_scripts() {
+    for file in "$1/"*; do
+        [ -f "$file" ] && "$file"
+    done
+}
+
+deconfig() { ip -4 addr flush dev "$interface" ;}
+
+is_wifi() { [ -e "/sys/class/net/$interface/phy80211" ] ;}
+
+if_index() {
+    if [ -e "/sys/class/net/$interface/ifindex" ]; then
+	read -r ifindex < "/sys/class/net/$interface/ifindex"
+    else
+	ifindex="$(ip -4 link show dev "$interface")"
+    fi
+    printf '%s\n' "${ifindex%%:*}"
+}
+
+calc_metric() {
+    is_wifi && { printf '%s\n' "$(( 300 + $(if_index) ))"; return ;}
+    printf '%s\n' "$(( 200 + $(if_index) ))"
+}
+
+routes() {
+    [ "$router" ] || return
+    for i in $NO_GATEWAY; do
+	[ "$i" = "$interface" ] && return
+    done
+    while ip -4 route del default via dev "$interface" 2>/dev/null; do
+	:
+    done
+    num=-1
+    for gw in $router; do
+	if [ "$subnet" = "255.255.255.255" ]; then
+	    # special case for /32 subnets:
+	    # /32 instructs kernel to always use routing for all outgoing packets
+	    # (they can never be sent to local subnet - there is no local subnet for /32).
+	    # Used in datacenters, avoids the need for private ip-addresses between two hops.
+	    ip -4 route add "$gw" dev "$interface"
+	fi
+	ip -4 route add 0.0.0.0/0 via "$gw" dev "$interface" \
+	   metric $(( (num += 1) + ${IF_METRIC:-$(calc_metric)} ))
+    done
+}
+
+resolvconf() {
+    case "$IF_PEER_DNS" in yes|'') ;; *) return; esac
+    case "$RESOLV_CONF" in [Nn][Oo]|'') return; esac
+    case " $NO_DNS " in *" $interface "*) return; esac
+    :> "$RESOLV_CONF.$$"
+    if [ "$search" ]; then
+        printf 'search %s\n' "$search" >> "$RESOLV_CONF.$$"
+    elif [ "$domain" ]; then
+        printf 'search %s\n' "$domain" >> "$RESOLV_CONF.$$"
+    fi
+
+    # Word-splitting is intentional
+    # shellcheck disable=2086
+    printf 'nameserver %s\n' $dns >> "$RESOLV_CONF.$$"
+    chmod a+r "$RESOLV_CONF.$$"
+    mv "$RESOLV_CONF.$$" "$RESOLV_CONF"
+}
+
+bound() {
+    ip -4 addr add "$ip/$mask" ${broadcast:+broadcast $broadcast} dev "$interface"
+    ip -4 link set dev "$interface" up
+    routes
+    resolvconf
+}
+
+renew() {
+    ip -4 addr show dev "$interface" | grep -q "$ip/$mask" || {
+        ip -4 addr flush dev "$interface"
+        ip -4 addr add "$ip/$mask" ${broadcast:+broadcast $broadcast} dev "$interface"
+    }
+    for i in $router; do
+        ip -4 route show | grep ^default | grep -q "$i" || {
+            routes
+            break
+        }
+    done
+    if ! grep -q "^search $domain" "$RESOLV_CONF" ; then
+	resolvconf
+	return
+    fi
+    for i in $dns; do
+	if ! grep -q "^nameserver $i" "$RESOLV_CONF" ; then
+	    resolvconf
+	    return
+	fi
+    done
+}
+
+case "$1" in
+    deconfig|renew|bound)
+	run_scripts "$UDHCPC/pre-$1"
+	$1
+	run_scripts "$UDHCPC/post-$1"
+	;;
+    leasefail)
+	echo "udhcpc failed to get a DHCP lease" >&2
+	;;
+    nak)
+	echo "udhcpc received DHCP NAK" >&2
+	;;
+    *)
+	echo "Error: this script should be called from udhcpc" >&2
+	exit 1
+	;;
+esac
+exit 0