1 #!/bin/bash 2 # 3 # dhclient-script for Linux. 4 # 5 # This program is free software; you can redistribute it and/or 6 # modify it under the terms of the GNU General Public License 7 # as published by the Free Software Foundation; either version 8 # 2 of the License, or (at your option) any later version. 9 # 10 # Authors: Alexey Kuznetsov, <kuznet (at] ms2.inr.ac.ru> 11 # 12 # Probably, I did not understand, what this funny feature as "alias" 13 # means exactly. For now I suppose, that it is a static address, which 14 # we should install and preserve. 15 # 16 17 exec >> /tmp/DHS.log 2>&1 18 19 echo dhc-script $* reason=$reason 20 set | grep "^\(old_\|new_\|check_\)" 21 22 LOG () { 23 echo LOG $* ; 24 } 25 26 # convert 8bit mask to length 27 # arg: $1 = mask 28 # 29 Mask8ToLen() { 30 local l=0; 31 32 while [ $l -le 7 ]; do 33 if [ $[ ( 1 << $l ) + $1 ] -eq 256 ]; then 34 return $[ 8 - $l ] 35 fi 36 l=$[ $l + 1 ] 37 done 38 return 0; 39 } 40 41 # convert inet dotted quad mask to length 42 # arg: $1 = dotquad mask 43 # 44 MaskToLen() { 45 local masklen=0 46 local mask8=$1 47 48 case $1 in 49 0.0.0.0) 50 return 0; 51 ;; 52 255.*.0.0) 53 masklen=8 54 mask8=${mask8#255.} 55 mask8=${mask8%.0.0} 56 ;; 57 255.255.*.0) 58 masklen=16 59 mask8=${mask8#255.255.} 60 mask8=${mask8%.0} 61 ;; 62 255.255.255.*) 63 masklen=24 64 mask8=${mask8#255.255.255.} 65 ;; 66 *) 67 return 255 68 ;; 69 esac 70 Mask8ToLen $mask8 71 return $[ $? + $masklen ] 72 } 73 74 # calculate ABC "natural" mask 75 # arg: $1 = dotquad address 76 # 77 ABCMask () { 78 local class; 79 80 class=${1%%.*} 81 82 if [ "$1" = "255.255.255.255" ]; then 83 echo $1 84 elif [ "$1" = "0.0.0.0" ]; then 85 echo $1 86 elif [ $class -ge 224 ]; then 87 echo 240.0.0.0 88 elif [ $class -ge 192 ]; then 89 echo 255.255.255.0 90 elif [ $class -ge 128 ]; then 91 echo 255.255.0.0 92 else 93 echo 255.0.0.0 94 fi 95 } 96 97 # calculate ABC "natural" mask length 98 # arg: $1 = dotquad address 99 # 100 ABCMaskLen () { 101 local class; 102 103 class=${1%%.*} 104 105 if [ "$1" = "255.255.255.255" ]; then 106 return 32 107 elif [ "$1" = "0.0.0.0" ]; then 108 return 0 109 elif [ $class -ge 224 ]; then 110 return 4; 111 elif [ $class -ge 192 ]; then 112 return 24; 113 elif [ $class -ge 128 ]; then 114 return 16; 115 else 116 return 8; 117 fi 118 } 119 120 # Delete IP address 121 # args: $1 = interface 122 # $2 = address 123 # $3 = mask 124 # $4 = broadcast 125 # $5 = label 126 # 127 DelINETAddr () { 128 local masklen=32 129 local addrid=$1 130 131 LOG DelINETAddr $* 132 133 if [ "$5" ]; then 134 addrid=$addrid:$5 135 fi 136 LOG ifconfig $addrid down 137 ifconfig $addrid down 138 } 139 140 # Add IP address 141 # args: $1 = interface 142 # $2 = address 143 # $3 = mask 144 # $4 = broadcast 145 # $5 = label 146 # 147 AddINETAddr () { 148 local mask_arg 149 local brd_arg 150 local addrid=$1 151 152 LOG AddINETAddr $* 153 154 if [ "$5" ]; then 155 addrid=$addrid:$5 156 fi 157 if [ "$3" ]; then 158 mask_arg="netmask $3" 159 fi 160 if [ "$4" ]; then 161 brd_arg="broadcast $4" 162 fi 163 164 LOG ifconfig $addrid $2 $mask_arg $brd_arg up 165 ifconfig $addrid $2 $mask_arg $brd_arg up 166 } 167 168 # Add default routes 169 # args: $1 = routers list 170 # 171 AddDefaultRoutes() { 172 local router 173 174 if [ "$1" ]; then 175 LOG AddDefaultRoutes $* 176 for router in $1; do 177 LOG route add default gw $router 178 route add default gw $router 179 done ; 180 fi 181 } 182 183 # Delete default routes 184 # args: $1 = routers list 185 # 186 DelDefaultRoutes() { 187 local router 188 189 if [ "$1" ]; then 190 LOG DelDefaultRoutes $* 191 192 for router in $1; do 193 LOG route del default gw $router 194 route del default gw $router 195 done 196 fi 197 } 198 199 # ping a host 200 # args: $1 = dotquad address of the host 201 # 202 PingNode() { 203 LOG PingNode $* 204 if ping -q -c 1 -w 2 $1 ; then 205 return 0; 206 fi 207 return 1; 208 } 209 210 # Check (and add route, if alive) default routers 211 # args: $1 = routers list 212 # returns: 0 if at least one router is alive. 213 # 214 CheckRouterList() { 215 local router 216 local succeed=1 217 218 LOG CheckRouterList $* 219 220 for router in $1; do 221 if PingNode $router ; then 222 succeed=0 223 route add default gw $router 224 fi 225 done 226 return $succeed 227 } 228 229 # Delete/create static routes. 230 # args: $1 = operation (del/add) 231 # $2 = routes list in format "dst1 nexthop1 dst2 ..." 232 # 233 # BEWARE: this feature of DHCP is obsolete, because does not 234 # support subnetting. 235 # 236 X-StaticRouteList() { 237 local op=$1 238 local lst="$2" 239 local masklen 240 241 LOG X-StaticRouteList $* 242 243 if [ "$lst" ]; then 244 set $lst 245 while [ $# -gt 1 ]; do 246 route $op -net $1 netmask `ABCMask "$1"` gw $2 247 shift; shift; 248 done 249 fi 250 } 251 252 # Create static routes. 253 # arg: $1 = routes list in format "dst1 nexthop1 dst2 ..." 254 # 255 AddStaticRouteList() { 256 LOG AddStaticRouteList $* 257 X-StaticRouteList add "$1" 258 } 259 260 # Delete static routes. 261 # arg: $1 = routes list in format "dst1 nexthop1 dst2 ..." 262 # 263 DelStaticRouteList() { 264 LOG DelStaticRouteList $* 265 X-StaticRouteList del "$1" 266 } 267 268 # Broadcast unsolicited ARP to update neighbours' caches. 269 # args: $1 = interface 270 # $2 = address 271 # 272 UnsolicitedARP() { 273 if [ -f /sbin/arping ]; then 274 /sbin/arping -A -c 1 -I "$1" "$2" & 275 (sleep 2 ; /sbin/arping -U -c 1 -I "$1" "$2" ) & 276 fi 277 } 278 279 # Duplicate address detection. 280 # args: $1 = interface 281 # $2 = test address 282 # returns: 0, if DAD succeeded. 283 DAD() { 284 if [ -f /sbin/arping ]; then 285 /sbin/arping -c 2 -w 3 -D -I "$1" "$2" 286 return $? 287 fi 288 return 0 289 } 290 291 292 # Setup resolver. 293 # args: NO 294 # domain and nameserver list are passed in global variables. 295 # 296 # NOTE: we try to be careful and not to break user supplied resolv.conf. 297 # The script mangles it, only if it has dhcp magic signature. 298 # 299 UpdateDNS() { 300 local nameserver 301 local idstring="#### Generated by DHCPCD" 302 303 LOG UpdateDNS $* 304 305 if [ "$new_domain_name" = "" -a "$new_domain_name_servers" = "" ]; then 306 return 0; 307 fi 308 309 echo $idstring > /etc/resolv.conf.dhcp 310 if [ "$new_domain_name" ]; then 311 echo search $new_domain_name >> /etc/resolv.conf.dhcp 312 fi 313 echo options ndots:1 >> /etc/resolv.conf.dhcp 314 315 if [ "$new_domain_name_servers" ]; then 316 for nameserver in $new_domain_name_servers; do 317 echo nameserver $nameserver >> /etc/resolv.conf.dhcp 318 done 319 else 320 echo nameserver 127.0.0.1 >> /etc/resolv.conf.dhcp 321 fi 322 323 if [ -f /etc/resolv.conf ]; then 324 if [ "`head -1 /etc/resolv.conf`" != "$idstring" ]; then 325 return 0 326 fi 327 if [ "$old_domain_name" = "$new_domain_name" -a 328 "$new_domain_name_servers" = "$old_domain_name_servers" ]; then 329 return 0 330 fi 331 fi 332 mv /etc/resolv.conf.dhcp /etc/resolv.conf 333 } 334 335 case $reason in 336 NBI) 337 exit 1 338 ;; 339 340 MEDIUM) 341 exit 0 342 ;; 343 344 PREINIT) 345 ifconfig $interface:dhcp down 346 ifconfig $interface:dhcp1 down 347 if [ -d /proc/sys/net/ipv4/conf/$interface ]; then 348 ifconfig $interface:dhcp 10.10.10.10 netmask 255.255.255.255 349 ifconfig $interface:dhcp down 350 if [ -d /proc/sys/net/ipv4/conf/$interface ]; then 351 LOG The interface $interface already configured. 352 fi 353 fi 354 ifconfig $interface:dhcp up 355 exit 0 356 ;; 357 358 ARPSEND) 359 exit 0 360 ;; 361 362 ARPCHECK) 363 if DAD "$interface" "$check_ip_address" ; then 364 exit 0 365 fi 366 exit 1 367 ;; 368 369 BOUND|RENEW|REBIND|REBOOT) 370 if [ "$old_ip_address" -a "$alias_ip_address" -a \ 371 "$alias_ip_address" != "$old_ip_address" ]; then 372 DelINETAddr "$interface" "$alias_ip_address" "$alias_subnet_mask" "$alias_broadcast_address" dhcp1 373 fi 374 if [ "$old_ip_address" -a "$old_ip_address" != "$new_ip_address" ]; then 375 DelINETAddr "$interface" "$old_ip_address" "$old_subnet_mask" "$old_broadcast_address" dhcp 376 DelDefaultRoutes "$old_routers" 377 DelStaticRouteList "$old_static_routes" 378 fi 379 if [ "$old_ip_address" = "" -o "$old_ip_address" != "$new_ip_address" -o \ 380 "$reason" = "BOUND" -o "$reason" = "REBOOT" ]; then 381 AddINETAddr "$interface" "$new_ip_address" "$new_subnet_mask" "$new_broadcast_address" dhcp 382 AddStaticRouteList "$new_static_routes" 383 AddDefaultRoutes "$new_routers" 384 UnsolicitedARP "$interface" "$new_ip_address" 385 fi 386 if [ "$new_ip_address" != "$alias_ip_address" -a "$alias_ip_address" ]; then 387 AddINETAddr "$interface" "$alias_ip_address" "$alias_subnet_mask" "$alias_broadcast_address" dhcp1 388 fi 389 UpdateDNS 390 exit 0 391 ;; 392 393 EXPIRE|FAIL) 394 if [ "$alias_ip_address" ]; then 395 DelINETAddr "$interface" "$alias_ip_address" "$alias_subnet_mask" "$alias_broadcast_address" dhcp1 396 fi 397 if [ "$old_ip_address" ]; then 398 DelINETAddr "$interface" "$old_ip_address" "$old_subnet_mask" "$old_broadcast_address" dhcp 399 DelDefaultRoutes "$old_routers" 400 DelStaticRouteList "$old_static_routes" 401 fi 402 if [ "$alias_ip_address" ]; then 403 AddINETAddr "$interface" "$alias_ip_address" "$alias_subnet_mask" "$alias_broadcast_address" dhcp1 404 fi 405 exit 0 406 ;; 407 408 TIMEOUT) 409 if [ "$alias_ip_address" ]; then 410 DelINETAddr "$interface" "$alias_ip_address" "$alias_subnet_mask" "$alias_broadcast_address" dhcp1 411 fi 412 # Seems, <null address> means, that no more old leases found. 413 # Or does it mean bug in dhcpcd? 8) Fail for now. 414 if [ "$new_ip_address" = "<null address>" ]; then 415 if [ "$old_ip_address" ]; then 416 DelINETAddr "$interface" "$old_ip_address" "$old_subnet_mask" "$old_broadcast_address" dhcp 417 fi 418 if [ "$alias_ip_address" ]; then 419 AddINETAddr "$interface" "$alias_ip_address" "$alias_subnet_mask" "$alias_broadcast_address" dhcp1 420 fi 421 exit 1 422 fi 423 if DAD "$interface" "$new_ip_address" ; then 424 AddINETAddr "$interface" "$new_ip_address" "$new_subnet_mask" "$new_broadcast_address" dhcp 425 UnsolicitedARP "$interface" "$new_ip_address" 426 if [ "$alias_ip_address" -a "$alias_ip_address" != "$new_ip_address" ]; then 427 AddINETAddr "$interface" "$alias_ip_address" "$alias_subnet_mask" "$alias_broadcast_address" dhcp1 428 UnsolicitedARP "$interface" "$alias_ip_address" 429 fi 430 if CheckRouterList "$new_routers" ; then 431 AddStaticRouteList "$new_static_routes" 432 UpdateDNS 433 exit 0 434 fi 435 fi 436 DelINETAddr "$interface" "$new_ip_address" "$new_subnet_mask" "$new_broadcast_address" dhcp 437 DelDefaultRoutes "$old_routers" 438 DelStaticRouteList "$old_static_routes" 439 if [ "$alias_ip_address" ]; then 440 AddINETAddr "$interface" "$alias_ip_address" "$alias_subnet_mask" "$alias_broadcast_address" dhcp1 441 fi 442 exit 1 443 ;; 444 esac 445 446 exit 0 447
