osdl.org!shemminger | aba5acd | 2004-04-15 20:56:59 +0000 | [diff] [blame] | 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@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 |