etc/network.subr

   1 #
   2 # Copyright (c) 2003 The FreeBSD Project. All rights reserved.
   3 #
   4 # Redistribution and use in source and binary forms, with or without
   5 # modification, are permitted provided that the following conditions
   6 # are met:
   7 # 1. Redistributions of source code must retain the above copyright
   8 #    notice, this list of conditions and the following disclaimer.
   9 # 2. Redistributions in binary form must reproduce the above copyright
  10 #    notice, this list of conditions and the following disclaimer in the
  11 #    documentation and/or other materials provided with the distribution.
  12 #
  13 # THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
  14 # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  15 # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  16 # ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
  17 # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  18 # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  19 # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  20 # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  21 # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  22 # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  23 # SUCH DAMAGE.
  24 #
  25 # $FreeBSD$
  26 #
  27 IFCONFIG_CMD="/sbin/ifconfig"
  28
  29 # Maximum number of addresses expanded from a address range specification.
  30 _IPEXPANDMAX=31
  31
  32 #
  33 # Subroutines commonly used from network startup scripts.
  34 # Requires that rc.conf be loaded first.
  35 #
  36
  37 # ifn_start ifn
  38 #       Bring up and configure an interface.  If some configuration is
  39 #       applied, print the interface configuration.
  40 #
  41 ifn_start()
  42 {
  43         local ifn cfg
  44         ifn="$1"
  45         cfg=1
  46
  47         [ -z "$ifn" ] && err 1 "ifn_start called without an interface"
  48
  49         ifscript_up ${ifn} && cfg=0
  50         ifconfig_up ${ifn} && cfg=0
  51         if ! noafif $ifn; then
  52                 afexists inet && ipv4_up ${ifn} && cfg=0
  53                 afexists inet6 && ipv6_up ${ifn} && cfg=0
  54                 afexists ipx && ipx_up ${ifn} && cfg=0
  55         fi
  56         childif_create ${ifn} && cfg=0
  57
  58         return $cfg
  59 }
  60
  61 # ifn_stop ifn
  62 #       Shutdown and de-configure an interface.  If action is taken,
  63 #       print the interface name.
  64 #
  65 ifn_stop()
  66 {
  67         local ifn cfg
  68         ifn="$1"
  69         cfg=1
  70
  71         [ -z "$ifn" ] && err 1 "ifn_stop called without an interface"
  72
  73         if ! noafif $ifn; then
  74                 afexists ipx && ipx_down ${ifn} && cfg=0
  75                 afexists inet6 && ipv6_down ${ifn} && cfg=0
  76                 afexists inet && ipv4_down ${ifn} && cfg=0
  77         fi
  78         ifconfig_down ${ifn} && cfg=0
  79         ifscript_down ${ifn} && cfg=0
  80         childif_destroy ${ifn} && cfg=0
  81
  82         return $cfg
  83 }
  84
  85 # ifn_vnetup ifn
  86 #       Move ifn to the specified vnet jail.
  87 #
  88 ifn_vnetup()
  89 {
  90
  91         ifn_vnet0 $1 vnet
  92 }
  93
  94 # ifn_vnetdown ifn
  95 #       Reclaim ifn from the specified vnet jail.
  96 #
  97 ifn_vnetdown()
  98 {
  99
 100         ifn_vnet0 $1 -vnet
 101 }
 102
 103 # ifn_vnet0 ifn action
 104 #       Helper function for ifn_vnetup and ifn_vnetdown.
 105 #
 106 ifn_vnet0()
 107 {
 108         local _ifn _cfg _action _vnet
 109         _ifn="$1"
 110         _action="$2"
 111         _cfg=1
 112
 113         if _vnet=$(vnetif $_ifn); then
 114                 ${IFCONFIG_CMD} $_ifn $_action $_vnet && _cfg=0
 115         fi
 116
 117         return $_cfg
 118 }
 119
 120 # ifconfig_up if
 121 #       Evaluate ifconfig(8) arguments for interface $if and
 122 #       run ifconfig(8) with those arguments. It returns 0 if
 123 #       arguments were found and executed or 1 if the interface
 124 #       had no arguments.  Pseudo arguments DHCP and WPA are handled
 125 #       here.
 126 #
 127 ifconfig_up()
 128 {
 129         local _cfg _ipv6_opts ifconfig_args
 130         _cfg=1
 131
 132         # Make sure lo0 always comes up.
 133         if [ "$1" = "lo0" ]; then
 134                 _cfg=0
 135         fi
 136
 137         # ifconfig_IF
 138         ifconfig_args=`ifconfig_getargs $1`
 139         if [ -n "${ifconfig_args}" ]; then
 140                 eval ${IFCONFIG_CMD} $1 ${ifconfig_args}
 141                 _cfg=0
 142         fi
 143
 144         # inet6 specific
 145         if ! noafif $1 && afexists inet6; then
 146                 if checkyesno ipv6_activate_all_interfaces; then
 147                         _ipv6_opts="-ifdisabled"
 148                 elif [ "$1" != "lo0" ]; then
 149                         _ipv6_opts="ifdisabled"
 150                 fi
 151
 152                 # backward compatibility: $ipv6_enable
 153                 case $ipv6_enable in
 154                 [Yy][Ee][Ss]|[Tt][Rr][Uu][Ee]|[Oo][Nn]|1)
 155                         case $1 in
 156                         bridge[0-9]*)
 157                                 # No accept_rtadv by default on if_bridge(4)
 158                                 # to avoid a conflict with the member
 159                                 # interfaces.
 160                         ;;
 161                         *)
 162                                 if ! checkyesno ipv6_gateway_enable; then
 163                                         _ipv6_opts="${_ipv6_opts} accept_rtadv"
 164                                 fi
 165                         ;;
 166                         esac
 167                 ;;
 168                 esac
 169
 170                 case $ipv6_cpe_wanif in
 171                 $1)
 172                         _ipv6_opts="${_ipv6_opts} -no_radr accept_rtadv"
 173                 ;;
 174                 esac
 175
 176                 if [ -n "${_ipv6_opts}" ]; then
 177                         ${IFCONFIG_CMD} $1 inet6 ${_ipv6_opts}
 178                 fi
 179
 180                 # ifconfig_IF_ipv6
 181                 ifconfig_args=`ifconfig_getargs $1 ipv6`
 182                 if [ -n "${ifconfig_args}" ]; then
 183                         # backward compatibility: inet6 keyword
 184                         case "${ifconfig_args}" in
 185                         :*|[0-9a-fA-F]*:*)
 186                                 warn "\$ifconfig_$1_ipv6 needs " \
 187                                     "\"inet6\" keyword for an IPv6 address."
 188                                 ifconfig_args="inet6 ${ifconfig_args}"
 189                         ;;
 190                         esac
 191                         ${IFCONFIG_CMD} $1 inet6 -ifdisabled
 192                         eval ${IFCONFIG_CMD} $1 ${ifconfig_args}
 193                         _cfg=0
 194                 fi
 195
 196                 # $ipv6_prefix_IF will be handled in
 197                 # ipv6_prefix_hostid_addr_common().
 198                 ifconfig_args=`get_if_var $1 ipv6_prefix_IF`
 199                 if [ -n "${ifconfig_args}" ]; then
 200                         ${IFCONFIG_CMD} $1 inet6 -ifdisabled
 201                         _cfg=0
 202                 fi
 203
 204                 # backward compatibility: $ipv6_ifconfig_IF
 205                 ifconfig_args=`get_if_var $1 ipv6_ifconfig_IF`
 206                 if [ -n "${ifconfig_args}" ]; then
 207                         warn "\$ipv6_ifconfig_$1 is obsolete." \
 208                             "  Use ifconfig_$1_ipv6 instead."
 209                         ${IFCONFIG_CMD} $1 inet6 -ifdisabled
 210                         eval ${IFCONFIG_CMD} $1 inet6 ${ifconfig_args}
 211                         _cfg=0
 212                 fi
 213         fi
 214
 215         ifalias $1 link alias
 216         ifalias $1 ether alias
 217
 218         if [ ${_cfg} -eq 0 ]; then
 219                 ${IFCONFIG_CMD} $1 up
 220         fi
 221
 222         if wpaif $1; then
 223                 /etc/rc.d/wpa_supplicant start $1
 224                 _cfg=0          # XXX: not sure this should count
 225         elif hostapif $1; then
 226                 /etc/rc.d/hostapd start $1
 227                 _cfg=0
 228         fi
 229
 230         if dhcpif $1; then
 231                 if [ $_cfg -ne 0 ] ; then
 232                         ${IFCONFIG_CMD} $1 up
 233                 fi
 234                 if syncdhcpif $1; then
 235                         /etc/rc.d/dhclient start $1
 236                 fi
 237                 _cfg=0
 238         fi
 239
 240         return $_cfg
 241 }
 242
 243 # ifconfig_down if
 244 #       returns 1 if wpa_supplicant or dhclient was stopped or
 245 #       the interface exists.
 246 #
 247 ifconfig_down()
 248 {
 249         local _cfg
 250         _cfg=1
 251
 252         if wpaif $1; then
 253                 /etc/rc.d/wpa_supplicant stop $1
 254                 _cfg=0
 255         elif hostapif $1; then
 256                 /etc/rc.d/hostapd stop $1
 257                 _cfg=0
 258         fi
 259
 260         if dhcpif $1; then
 261                 /etc/rc.d/dhclient stop $1
 262                 _cfg=0
 263         fi
 264
 265         if ifexists $1; then
 266                 ${IFCONFIG_CMD} $1 down
 267                 _cfg=0
 268         fi
 269
 270         return $_cfg
 271 }
 272
 273 # get_if_var if var [default]
 274 #       Return the value of the pseudo-hash corresponding to $if where
 275 #       $var is a string containg the sub-string "IF" which will be
 276 #       replaced with $if after the characters defined in _punct are
 277 #       replaced with '_'. If the variable is unset, replace it with
 278 #       $default if given.
 279 get_if_var()
 280 {
 281         local _if _punct _punct_c _var _default prefix suffix
 282
 283         if [ $# -ne 2 -a $# -ne 3 ]; then
 284                 err 3 'USAGE: get_if_var name var [default]'
 285         fi
 286
 287         _if=$1
 288         _punct=".-/+"
 289         ltr ${_if} "${_punct}" '_' _if
 290         _var=$2
 291         _default=$3
 292
 293         prefix=${_var%%IF*}
 294         suffix=${_var##*IF}
 295         eval echo \${${prefix}${_if}${suffix}-${_default}}
 296 }
 297
 298 # _ifconfig_getargs if [af]
 299 #       Prints the arguments for the supplied interface to stdout.
 300 #       Returns 1 if empty.  In general, ifconfig_getargs should be used
 301 #       outside this file.
 302 _ifconfig_getargs()
 303 {
 304         local _ifn _af
 305         _ifn=$1
 306         _af=${2+_$2}
 307
 308         if [ -z "$_ifn" ]; then
 309                 return 1
 310         fi
 311
 312         get_if_var $_ifn ifconfig_IF$_af "$ifconfig_DEFAULT"
 313 }
 314
 315 # ifconfig_getargs if [af]
 316 #       Takes the result from _ifconfig_getargs and removes pseudo
 317 #       args such as DHCP and WPA.
 318 ifconfig_getargs()
 319 {
 320         local _tmpargs _arg _args _vnet
 321         _tmpargs=`_ifconfig_getargs $1 $2`
 322         if [ $? -eq 1 ]; then
 323                 return 1
 324         fi
 325         _args=
 326         _vnet=0
 327
 328         for _arg in $_tmpargs; do
 329                 case $_arg:$_vnet in
 330                 [Dd][Hh][Cc][Pp]:0) ;;
 331                 [Nn][Oo][Aa][Uu][Tt][Oo]:0) ;;
 332                 [Nn][Oo][Ss][Yy][Nn][Cc][Dd][Hh][Cc][Pp]:0) ;;
 333                 [Ss][Yy][Nn][Cc][Dd][Hh][Cc][Pp]:0) ;;
 334                 [Ww][Pp][Aa]:0) ;;
 335                 [Hh][Oo][Ss][Tt][Aa][Pp]:0) ;;
 336                 vnet:0) _vnet=1 ;;
 337                 *:1)    _vnet=0 ;;
 338                 *:0)
 339                         _args="$_args $_arg"
 340                 ;;
 341                 esac
 342         done
 343
 344         echo $_args
 345 }
 346
 347 # autoif
 348 #       Returns 0 if the interface should be automatically configured at
 349 #       boot time and 1 otherwise.
 350 autoif()
 351 {
 352         local _tmpargs _arg
 353         _tmpargs=`_ifconfig_getargs $1`
 354
 355         for _arg in $_tmpargs; do
 356                 case $_arg in
 357                 [Nn][Oo][Aa][Uu][Tt][Oo])
 358                         return 1
 359                         ;;
 360                 esac
 361         done
 362
 363         return 0
 364 }
 365
 366 # dhcpif if
 367 #       Returns 0 if the interface is a DHCP interface and 1 otherwise.
 368 dhcpif()
 369 {
 370         local _tmpargs _arg
 371         _tmpargs=`_ifconfig_getargs $1`
 372
 373         case $1 in
 374         lo[0-9]*|\
 375         stf[0-9]*|\
 376         faith[0-9]*|\
 377         lp[0-9]*|\
 378         sl[0-9]*)
 379                 return 1
 380                 ;;
 381         esac
 382         if noafif $1; then
 383                 return 1
 384         fi
 385
 386         for _arg in $_tmpargs; do
 387                 case $_arg in
 388                 [Dd][Hh][Cc][Pp])
 389                         return 0
 390                         ;;
 391                 [Nn][Oo][Ss][Yy][Nn][Cc][Dd][Hh][Cc][Pp])
 392                         return 0
 393                         ;;
 394                 [Ss][Yy][Nn][Cc][Dd][Hh][Cc][Pp])
 395                         return 0
 396                         ;;
 397                 esac
 398         done
 399
 400         return 1
 401 }
 402
 403 # syncdhcpif
 404 #       Returns 0 if the interface should be configured synchronously and
 405 #       1 otherwise.
 406 syncdhcpif()
 407 {
 408         local _tmpargs _arg
 409         _tmpargs=`_ifconfig_getargs $1`
 410
 411         if noafif $1; then
 412                 return 1
 413         fi
 414
 415         for _arg in $_tmpargs; do
 416                 case $_arg in
 417                 [Nn][Oo][Ss][Yy][Nn][Cc][Dd][Hh][Cc][Pp])
 418                         return 1
 419                         ;;
 420                 [Ss][Yy][Nn][Cc][Dd][Hh][Cc][Pp])
 421                         return 0
 422                         ;;
 423                 esac
 424         done
 425
 426         checkyesno synchronous_dhclient
 427 }
 428
 429 # wpaif if
 430 #       Returns 0 if the interface is a WPA interface and 1 otherwise.
 431 wpaif()
 432 {
 433         local _tmpargs _arg
 434         _tmpargs=`_ifconfig_getargs $1`
 435
 436         for _arg in $_tmpargs; do
 437                 case $_arg in
 438                 [Ww][Pp][Aa])
 439                         return 0
 440                         ;;
 441                 esac
 442         done
 443
 444         return 1
 445 }
 446
 447 # hostapif if
 448 #       Returns 0 if the interface is a HOSTAP interface and 1 otherwise.
 449 hostapif()
 450 {
 451         local _tmpargs _arg
 452         _tmpargs=`_ifconfig_getargs $1`
 453
 454         for _arg in $_tmpargs; do
 455                 case $_arg in
 456                 [Hh][Oo][Ss][Tt][Aa][Pp])
 457                         return 0
 458                         ;;
 459                 esac
 460         done
 461
 462         return 1
 463 }
 464
 465 # vnetif if
 466 #       Returns 0 and echo jail if "vnet" keyword is specified on the
 467 #       interface, and 1 otherwise.
 468 vnetif()
 469 {
 470         local _tmpargs _arg _vnet
 471         _tmpargs=`_ifconfig_getargs $1`
 472
 473         _vnet=0
 474         for _arg in $_tmpargs; do
 475                 case $_arg:$_vnet in
 476                 vnet:0) _vnet=1 ;;
 477                 *:1)    echo $_arg; return 0 ;;
 478                 esac
 479         done
 480
 481         return 1
 482 }
 483
 484 # afexists af
 485 #       Returns 0 if the address family is enabled in the kernel
 486 #       1 otherwise.
 487 afexists()
 488 {
 489         local _af
 490         _af=$1
 491
 492         case ${_af} in
 493         inet|inet6)
 494                 check_kern_features ${_af}
 495                 ;;
 496         ipx)
 497                 ${SYSCTL_N} net.ipx > /dev/null 2>&1
 498                 ;;
 499         atm)
 500                 if [ -x /sbin/atmconfig ]; then
 501                         /sbin/atmconfig diag list > /dev/null 2>&1
 502                 else
 503                         return 1
 504                 fi
 505                 ;;
 506         link|ether)
 507                 return 0
 508                 ;;
 509         *)
 510                 err 1 "afexists(): Unsupported address family: $_af"
 511                 ;;
 512         esac
 513 }
 514
 515 # noafif if
 516 #       Returns 0 if the interface has no af configuration and 1 otherwise.
 517 noafif()
 518 {
 519         local _if
 520         _if=$1
 521
 522         case $_if in
 523         pflog[0-9]*|\
 524         pfsync[0-9]*|\
 525         usbus[0-9]*|\
 526         an[0-9]*|\
 527         ath[0-9]*|\
 528         ipw[0-9]*|\
 529         ipfw[0-9]*|\
 530         iwi[0-9]*|\
 531         iwn[0-9]*|\
 532         ral[0-9]*|\
 533         wi[0-9]*|\
 534         wl[0-9]*|\
 535         wpi[0-9]*)
 536                 return 0
 537                 ;;
 538         esac
 539
 540         return 1
 541 }
 542
 543 # ipv6if if
 544 #       Returns 0 if the interface should be configured for IPv6 and
 545 #       1 otherwise.
 546 ipv6if()
 547 {
 548         local _if _tmpargs i
 549         _if=$1
 550
 551         if ! afexists inet6; then
 552                 return 1
 553         fi
 554
 555         # lo0 is always IPv6-enabled
 556         case $_if in
 557         lo0)
 558                 return 0
 559                 ;;
 560         esac
 561
 562         case "${ipv6_network_interfaces}" in
 563         $_if|"$_if "*|*" $_if"|*" $_if "*|[Aa][Uu][Tt][Oo])
 564                 # True if $ifconfig_IF_ipv6 is defined.
 565                 _tmpargs=`_ifconfig_getargs $_if ipv6`
 566                 if [ -n "${_tmpargs}" ]; then
 567                         return 0
 568                 fi
 569
 570                 # True if $ipv6_prefix_IF is defined.
 571                 _tmpargs=`get_if_var $_if ipv6_prefix_IF`
 572                 if [ -n "${_tmpargs}" ]; then
 573                         return 0
 574                 fi
 575
 576                 # backward compatibility: True if $ipv6_ifconfig_IF is defined.
 577                 _tmpargs=`get_if_var $_if ipv6_ifconfig_IF`
 578                 if [ -n "${_tmpargs}" ]; then
 579                         return 0
 580                 fi
 581                 ;;
 582         esac
 583
 584         return 1
 585 }
 586
 587 # ipv6_autoconfif if
 588 #       Returns 0 if the interface should be configured for IPv6 with
 589 #       Stateless Address Configuration; 1 otherwise.
 590 ipv6_autoconfif()
 591 {
 592         local _if _tmpargs _arg
 593         _if=$1
 594
 595         case $_if in
 596         lo[0-9]*|\
 597         stf[0-9]*|\
 598         faith[0-9]*|\
 599         lp[0-9]*|\
 600         sl[0-9]*)
 601                 return 1
 602                 ;;
 603         esac
 604         if noafif $_if; then
 605                 return 1
 606         fi
 607         if ! ipv6if $_if; then
 608                 return 1
 609         fi
 610         if checkyesno ipv6_gateway_enable; then
 611                 return 1
 612         fi
 613         _tmpargs=`get_if_var $_if ipv6_prefix_IF`
 614         if [ -n "${_tmpargs}" ]; then
 615                 return 1
 616         fi
 617         # backward compatibility: $ipv6_enable
 618         case $ipv6_enable in
 619         [Yy][Ee][Ss]|[Tt][Rr][Uu][Ee]|[Oo][Nn]|1)
 620                 if checkyesno ipv6_gateway_enable; then
 621                         return 1
 622                 fi
 623                 case $1 in
 624                 bridge[0-9]*)
 625                         # No accept_rtadv by default on if_bridge(4)
 626                         # to avoid a conflict with the member
 627                         # interfaces.
 628                         return 1
 629                 ;;
 630                 *)
 631                         return 0
 632                 ;;
 633                 esac
 634         ;;
 635         esac
 636
 637         _tmpargs=`_ifconfig_getargs $_if ipv6`
 638         for _arg in $_tmpargs; do
 639                 case $_arg in
 640                 accept_rtadv)
 641                         return 0
 642                         ;;
 643                 esac
 644         done
 645
 646         # backward compatibility: $ipv6_ifconfig_IF
 647         _tmpargs=`get_if_var $_if ipv6_ifconfig_IF`
 648         for _arg in $_tmpargs; do
 649                 case $_arg in
 650                 accept_rtadv)
 651                         return 0
 652                         ;;
 653                 esac
 654         done
 655
 656         return 1
 657 }
 658
 659 # ifexists if
 660 #       Returns 0 if the interface exists and 1 otherwise.
 661 ifexists()
 662 {
 663         [ -z "$1" ] && return 1
 664         ${IFCONFIG_CMD} -n $1 > /dev/null 2>&1
 665 }
 666
 667 # ipv4_up if
 668 #       add IPv4 addresses to the interface $if
 669 ipv4_up()
 670 {
 671         local _if _ret
 672         _if=$1
 673         _ret=1
 674
 675         # Add 127.0.0.1/8 to lo0 unless otherwise specified.
 676         if [ "${_if}" = "lo0" ]; then
 677                 ifconfig_args=`get_if_var ${_if} ifconfig_IF`
 678                 if [ -z "${ifconfig_args}" ]; then
 679                         ${IFCONFIG_CMD} ${_if} inet 127.0.0.1/8 alias
 680                 fi
 681         fi
 682         ifalias ${_if} inet alias && _ret=0
 683
 684         return $_ret
 685 }
 686
 687 # ipv6_up if
 688 #       add IPv6 addresses to the interface $if
 689 ipv6_up()
 690 {
 691         local _if _ret
 692         _if=$1
 693         _ret=1
 694
 695         if ! ipv6if $_if; then
 696                 return 0
 697         fi
 698
 699         ifalias ${_if} inet6 alias && _ret=0
 700         ipv6_prefix_hostid_addr_common ${_if} alias && _ret=0
 701         ipv6_accept_rtadv_up ${_if} && _ret=0
 702
 703         return $_ret
 704 }
 705
 706 # ipv4_down if
 707 #       remove IPv4 addresses from the interface $if
 708 ipv4_down()
 709 {
 710         local _if _ifs _ret inetList oldifs _inet
 711         _if=$1
 712         _ifs="^"
 713         _ret=1
 714
 715         ifalias ${_if} inet -alias && _ret=0
 716
 717         inetList="`${IFCONFIG_CMD} ${_if} | grep 'inet ' | tr "\n\t" "$_ifs"`"
 718
 719         oldifs="$IFS"
 720         IFS="$_ifs"
 721         for _inet in $inetList ; do
 722                 # get rid of extraneous line
 723                 case $_inet in
 724                 inet\ *)        ;;
 725                 *)              continue ;;
 726                 esac
 727
 728                 _inet=`expr "$_inet" : '.*\(inet \([0-9]\{1,3\}\.\)\{3\}[0-9]\{1,3\}\).*'`
 729
 730                 IFS="$oldifs"
 731                 ${IFCONFIG_CMD} ${_if} ${_inet} delete
 732                 IFS="$_ifs"
 733                 _ret=0
 734         done
 735         IFS="$oldifs"
 736
 737         return $_ret
 738 }
 739
 740 # ipv6_down if
 741 #       remove IPv6 addresses from the interface $if
 742 ipv6_down()
 743 {
 744         local _if _ifs _ret inetList oldifs _inet6
 745         _if=$1
 746         _ifs="^"
 747         _ret=1
 748
 749         if ! ipv6if $_if; then
 750                 return 0
 751         fi
 752
 753         ipv6_accept_rtadv_down ${_if} && _ret=0
 754         ipv6_prefix_hostid_addr_common ${_if} -alias && _ret=0
 755         ifalias ${_if} inet6 -alias && _ret=0
 756
 757         inetList="`${IFCONFIG_CMD} ${_if} | grep 'inet6 ' | tr "\n\t" "$_ifs"`"
 758
 759         oldifs="$IFS"
 760         IFS="$_ifs"
 761         for _inet6 in $inetList ; do
 762                 # get rid of extraneous line
 763                 case $_inet in
 764                 inet6\ *)       ;;
 765                 *)              continue ;;
 766                 esac
 767
 768                 _inet6=`expr "$_inet6" : '.*\(inet6 \([0-9a-f:]*\)\).*'`
 769
 770                 IFS="$oldifs"
 771                 ${IFCONFIG_CMD} ${_if} ${_inet6} -alias
 772                 IFS="$_ifs"
 773                 _ret=0
 774         done
 775         IFS="$oldifs"
 776
 777         return $_ret
 778 }
 779
 780 # ifalias if af action
 781 #       Configure or remove aliases for network interface $if.
 782 #       It returns 0 if at least one alias was configured or
 783 #       removed, or 1 if there were none.
 784 #
 785 ifalias()
 786 {
 787         local _ret
 788         _ret=1
 789
 790         afexists $2 || return $_ret
 791
 792         case "$2" in
 793         inet|inet6|link|ether)
 794                 ifalias_af_common $1 $2 $3 && _ret=0
 795                 ;;
 796         esac
 797
 798         return $_ret
 799 }
 800
 801 # ifalias_expand_addr af action addr
 802 #       Expand address range ("N-M") specification in addr.
 803 #       "addr" must not include an address-family keyword.
 804 #       The results will include an address-family keyword.
 805 #
 806 ifalias_expand_addr()
 807 {
 808         local _af _action
 809
 810         _af=$1
 811         _action=$2
 812         shift 2
 813
 814         afexists $_af || return
 815         ifalias_expand_addr_$_af $_action $*
 816 }
 817
 818 # ifalias_expand_addr_inet action addr
 819 #       Helper function for ifalias_expand_addr().  Handles IPv4.
 820 #
 821 ifalias_expand_addr_inet()
 822 {
 823         local _action _arg _cidr _cidr_addr _exargs
 824         local _ipaddr _plen _range _iphead _iptail _iplow _iphigh _ipcount
 825         local _retstr _c
 826         _action=$1
 827         _arg=$2
 828         shift 2
 829         _exargs=$*
 830         _retstr=
 831
 832         case $_action:$_arg:$_exargs in
 833         *:*--*)         return ;;       # invalid
 834         tmp:*[0-9]-[0-9]*:*)            # to be expanded
 835                 _action="alias"
 836         ;;
 837         *:*[0-9]-[0-9]*:*)              # to be expanded
 838         ;;
 839         tmp:*:*netmask*)                # already expanded w/ netmask option
 840                 echo ${_arg%/[0-9]*} $_exargs && return
 841         ;;
 842         tmp:*:*)                        # already expanded w/o netmask option
 843                 echo $_arg $_exargs && return
 844         ;;
 845         *:*:*netmask*)                  # already expanded w/ netmask option
 846                 echo inet ${_arg%/[0-9]*} $_exargs && return
 847         ;;
 848         *:*:*)                          # already expanded w/o netmask option
 849                 echo inet $_arg $_exargs && return
 850         ;;
 851         esac
 852
 853         for _cidr in $_arg; do
 854                 _ipaddr=${_cidr%%/*}
 855                 _plen=${_cidr##*/}
 856                 # When subnet prefix length is not specified, use /32.
 857                 case $_plen in
 858                 $_ipaddr)       _plen=32 ;;     # "/" character not found
 859                 esac
 860
 861                 OIFS=$IFS
 862                 IFS=. set -- $_ipaddr
 863                 _range=
 864                 _iphead=
 865                 _iptail=
 866                 for _c in $@; do
 867                         case $_range:$_c in
 868                         :[0-9]*-[0-9]*)
 869                                 _range=$_c
 870                         ;;
 871                         :*)
 872                                 _iphead="${_iphead}${_iphead:+.}${_c}"
 873                         ;;
 874                         *:*)
 875                                 _iptail="${_iptail}${_iptail:+.}${_c}"
 876                         ;;
 877                         esac
 878                 done
 879                 IFS=$OIFS
 880                 _iplow=${_range%-*}
 881                 _iphigh=${_range#*-}
 882
 883                 # clear netmask when removing aliases
 884                 if [ "$_action" = "-alias" ]; then
 885                         _plen=""
 886                 fi
 887
 888                 _ipcount=$_iplow
 889                 while [ "$_ipcount" -le "$_iphigh" ]; do
 890                         _retstr="${_retstr} ${_iphead}${_iphead:+.}${_ipcount}${_iptail:+.}${_iptail}${_plen:+/}${_plen}"
 891                         if [ $_ipcount -gt $(($_iplow + $_IPEXPANDMAX)) ]; then
 892                                 warn "Range specification is too large (${_iphead}${_iphead:+.}${_iplow}${_iptail:+.}${_iptail}-${_iphead}${_iphead:+.}${_iphigh}${_iptail:+.}${_iptail}).  ${_iphead}${_iphead:+.}${_iplow}${_iptail:+.}${_iptail}-${_iphead}${_iphead:+.}${_ipcount}${_iptail:+.}${_iptail} was processed."
 893                                 break
 894                         else
 895                                 _ipcount=$(($_ipcount + 1))
 896                         fi
 897                         # Forcibly set /32 for remaining aliases.
 898                         _plen=32
 899                 done
 900         done
 901
 902         for _c in $_retstr; do
 903                 ifalias_expand_addr_inet $_action $_c $_exargs
 904         done
 905 }
 906
 907 # ifalias_expand_addr_inet6 action addr
 908 #       Helper function for ifalias_expand_addr().  Handles IPv6.
 909 #
 910 ifalias_expand_addr_inet6()
 911 {
 912         local _action _arg _cidr _cidr_addr _exargs
 913         local _ipaddr _plen _ipleft _ipright _iplow _iphigh _ipcount
 914         local _ipv4part
 915         local _retstr _c
 916         _action=$1
 917         _arg=$2
 918         shift 2
 919         _exargs=$*
 920         _retstr=
 921
 922         case $_action:$_arg:$_exargs in
 923         *:*--*:*)       return ;;       # invalid
 924         tmp:*[0-9a-zA-Z]-[0-9a-zA-Z]*:*)# to be expanded
 925                 _action="alias"
 926         ;;
 927         *:*[0-9a-zA-Z]-[0-9a-zA-Z]*:*)  # to be expanded
 928         ;;
 929         tmp:*:*prefixlen*)      # already expanded w/ prefixlen option
 930                 echo ${_arg%/[0-9]*} $_exargs && return
 931         ;;
 932         tmp:*:*)                # already expanded w/o prefixlen option
 933                 echo $_arg $_exargs && return
 934         ;;
 935         *:*:*prefixlen*)        # already expanded w/ prefixlen option
 936                 echo inet6 ${_arg%/[0-9]*} $_exargs && return
 937         ;;
 938         *:*:*)                  # already expanded w/o prefixlen option
 939                 echo inet6 $_arg $_exargs && return
 940         ;;
 941         esac
 942
 943         for _cidr in $_arg; do
 944                 _ipaddr="${_cidr%%/*}"
 945                 _plen="${_cidr##*/}"
 946
 947                 case $_action:$_ipaddr:$_cidr in
 948                 -alias:*:*)             unset _plen ;;
 949                 *:$_cidr:$_ipaddr)      unset _plen ;;
 950                 esac
 951
 952                 if [ "${_ipaddr%:*.*.*.*}" = "$_ipaddr" ]; then
 953                         # Handle !v4mapped && !v4compat addresses.
 954
 955                         # The default prefix length is 64.
 956                         case $_ipaddr:$_cidr in
 957                         $_cidr:$_ipaddr)        _plen="64" ;;
 958                         esac
 959                         _ipleft=${_ipaddr%-*}
 960                         _ipright=${_ipaddr#*-}
 961                         _iplow=${_ipleft##*:}
 962                         _iphigh=${_ipright%%:*}
 963                         _ipleft=${_ipleft%:*}
 964                         _ipright=${_ipright#*:}
 965
 966                         if [ "$_iphigh" = "$_ipright" ]; then
 967                                 unset _ipright
 968                         else
 969                                 _ipright=:$_ipright
 970                         fi
 971
 972                         if [ -n "$_iplow" -a -n "$_iphigh" ]; then
 973                                 _iplow=$((0x$_iplow))
 974                                 _iphigh=$((0x$_iphigh))
 975                                 _ipcount=$_iplow
 976                                 while [ $_ipcount -le $_iphigh ]; do
 977                                         _r=`printf "%s:%04x%s%s" \
 978                                             $_ipleft $_ipcount $_ipright \
 979                                             ${_plen:+/}$_plen`
 980                                         _retstr="$_retstr $_r"
 981                                         if [ $_ipcount -gt $(($_iplow + $_IPEXPANDMAX)) ]
 982                                         then
 983                                                 warn "Range specification is too large $(printf '(%s:%04x%s-%s:%04x%s)' $_ipleft $_iplow $_ipright $_ipleft $_iphigh $_ipright). $(printf '%s:%04x%s-%s:%04x%s' $_ipleft $_iplow $_ipright $_ipleft $_ipcount $_ipright) was processed."
 984                                                 break
 985                                         else
 986                                                 _ipcount=$(($_ipcount + 1))
 987                                         fi
 988                                 done
 989                         else
 990                                 _retstr="${_ipaddr}${_plen:+/}${_plen}"
 991                         fi
 992
 993                         for _c in $_retstr; do
 994                                 ifalias_expand_addr_inet6 $_action $_c $_exargs
 995                         done
 996                 else
 997                         # v4mapped/v4compat should handle as an IPv4 alias
 998                         _ipv4part=${_ipaddr##*:}
 999
1000                         # Adjust prefix length if any.  If not, set the
1001                         # default prefix length as 32.
1002                         case $_ipaddr:$_cidr in
1003                         $_cidr:$_ipaddr)        _plen=32 ;;
1004                         *)                      _plen=$(($_plen - 96)) ;;
1005                         esac
1006
1007                         _retstr=`ifalias_expand_addr_inet \
1008                             tmp ${_ipv4part}${_plen:+/}${_plen}`
1009                         for _c in $_retstr; do
1010                                 ifalias_expand_addr_inet $_action $_c $_exargs
1011                         done
1012                 fi
1013         done
1014 }
1015
1016 # ifalias_af_common_handler if af action args
1017 #       Helper function for ifalias_af_common().
1018 #
1019 ifalias_af_common_handler()
1020 {
1021         local _ret _if _af _action _args _c _tmpargs
1022
1023         _ret=1
1024         _if=$1
1025         _af=$2
1026         _action=$3
1027         shift 3
1028         _args=$*
1029
1030         case $_args in
1031         ${_af}\ *)      ;;
1032         *)      return  ;;
1033         esac
1034
1035         # link(ether) does not support address removal.
1036         case $_af:$_action in
1037         link:-alias|ether:-alias)       return ;;
1038         esac
1039
1040         _tmpargs=
1041         for _c in $_args; do
1042                 case $_c in
1043                 ${_af})
1044                         case $_tmpargs in
1045                         ${_af}\ *-*)
1046                                 ifalias_af_common_handler $_if $_af $_action \
1047                                 `ifalias_expand_addr $_af $_action ${_tmpargs#${_af}\ }`
1048                         ;;
1049                         ${_af}\ *)
1050                                 ${IFCONFIG_CMD} $_if $_tmpargs $_action && _ret=0
1051                         ;;
1052                         esac
1053                         _tmpargs=$_af
1054                 ;;
1055                 *)
1056                         _tmpargs="$_tmpargs $_c"
1057                 ;;
1058                 esac
1059         done
1060         # Process the last component if any.
1061         if [ -n "$_tmpargs}" ]; then
1062                 case $_tmpargs in
1063                 ${_af}\ *-*)
1064                         ifalias_af_common_handler $_if $_af $_action \
1065                         `ifalias_expand_addr $_af $_action ${_tmpargs#${_af}\ }`
1066                 ;;
1067                 ${_af}\ *)
1068                         ${IFCONFIG_CMD} $_if $_tmpargs $_action && _ret=0
1069                 ;;
1070                 esac
1071         fi
1072
1073         return $_ret
1074 }
1075
1076 # ifalias_af_common if af action
1077 #       Helper function for ifalias().
1078 #
1079 ifalias_af_common()
1080 {
1081         local _ret _if _af _action alias ifconfig_args _aliasn _c _tmpargs _iaf
1082         local _punct=".-/+"
1083
1084         _ret=1
1085         _aliasn=
1086         _if=$1
1087         _af=$2
1088         _action=$3
1089
1090         # Normalize $_if before using it in a pattern to list_vars()
1091         ltr "$_if" "$_punct" "_" _if
1092
1093         # ifconfig_IF_aliasN which starts with $_af
1094         for alias in `list_vars ifconfig_${_if}_alias[0-9]\* |
1095                 sort_lite -nk1.$((9+${#_if}+7))`
1096         do
1097                 eval ifconfig_args=\"\$$alias\"
1098                 _iaf=
1099                 case $ifconfig_args in
1100                 inet\ *)        _iaf=inet ;;
1101                 inet6\ *)       _iaf=inet6 ;;
1102                 ipx\ *)         _iaf=ipx ;;
1103                 link\ *)        _iaf=link ;;
1104                 ether\ *)       _iaf=ether ;;
1105                 esac
1106
1107                 case ${_af}:${_action}:${_iaf}:"${ifconfig_args}" in
1108                 ${_af}:*:${_af}:*)
1109                         _aliasn="$_aliasn $ifconfig_args"
1110                         ;;
1111                 ${_af}:*:"":"")
1112                         break
1113                         ;;
1114                 inet:alias:"":*)
1115                         _aliasn="$_aliasn inet $ifconfig_args"
1116                         warn "\$ifconfig_${_if}_alias${alias} needs " \
1117                             "\"inet\" keyword for an IPv4 address."
1118                 esac
1119         done
1120
1121         # backward compatibility: ipv6_ifconfig_IF_aliasN.
1122         case $_af in
1123         inet6)
1124                 for alias in `list_vars ipv6_ifconfig_${_if}_alias[0-9]\* |
1125                         sort_lite -nk1.$((14+${#_if}+7))`
1126                 do
1127                         eval ifconfig_args=\"\$$alias\"
1128                         case ${_action}:"${ifconfig_args}" in
1129                         *:"")
1130                                 break
1131                         ;;
1132                         alias:*)
1133                                 _aliasn="${_aliasn} inet6 ${ifconfig_args}"
1134                                 warn "\$ipv6_ifconfig_${_if}_alias${alias} " \
1135                                     "is obsolete.  Use ifconfig_$1_aliasN " \
1136                                     "instead."
1137                         ;;
1138                         esac
1139                 done
1140         esac
1141
1142         # backward compatibility: ipv4_addrs_IF.
1143         for _tmpargs in `get_if_var $_if ipv4_addrs_IF`; do
1144                 _aliasn="$_aliasn inet $_tmpargs"
1145         done
1146
1147         # Handle ifconfig_IF_aliases, ifconfig_IF_aliasN, and the others.
1148         _tmpargs=
1149         for _c in `get_if_var $_if ifconfig_IF_aliases` $_aliasn; do
1150                 case $_c in
1151                 inet|inet6|ipx|link|ether)
1152                         case $_tmpargs in
1153                         ${_af}\ *)
1154                                 eval ifalias_af_common_handler $_if $_af $_action $_tmpargs && _ret=0
1155                         ;;
1156                         esac
1157                         _tmpargs=$_c
1158                 ;;
1159                 *)
1160                         _tmpargs="$_tmpargs $_c"
1161                 esac
1162         done
1163         # Process the last component
1164         case $_tmpargs in
1165         ${_af}\ *)
1166                 ifalias_af_common_handler $_if $_af $_action $_tmpargs && _ret=0
1167         ;;
1168         esac
1169
1170         return $_ret
1171 }
1172
1173 # ipv6_prefix_hostid_addr_common if action
1174 #       Add or remove IPv6 prefix + hostid addr on the interface $if
1175 #
1176 ipv6_prefix_hostid_addr_common()
1177 {
1178         local _if _action prefix j
1179         _if=$1
1180         _action=$2
1181         prefix=`get_if_var ${_if} ipv6_prefix_IF`
1182
1183         if [ -n "${prefix}" ]; then
1184                 for j in ${prefix}; do
1185                         # The default prefixlen is 64.
1186                         plen=${j#*/}
1187                         case $j:$plen in
1188                         $plen:$j)       plen=64 ;;
1189                         *)              j=${j%/*} ;;
1190                         esac
1191
1192                         # Normalize the last part by removing ":"
1193                         j=${j%::*}
1194                         j=${j%:}
1195                         ${IFCONFIG_CMD} ${_if} inet6 $j:: \
1196                                 prefixlen $plen eui64 ${_action}
1197
1198                         # if I am a router, add subnet router
1199                         # anycast address (RFC 2373).
1200                         if checkyesno ipv6_gateway_enable; then
1201                                 ${IFCONFIG_CMD} ${_if} inet6 $j:: \
1202                                         prefixlen $plen ${_action} anycast
1203                         fi
1204                 done
1205         fi
1206 }
1207
1208 # ipv6_accept_rtadv_up if
1209 #       Enable accepting Router Advertisement and send Router
1210 #       Solicitation message
1211 ipv6_accept_rtadv_up()
1212 {
1213         if ipv6_autoconfif $1; then
1214                 ${IFCONFIG_CMD} $1 inet6 accept_rtadv up
1215                 if ! checkyesno rtsold_enable; then
1216                         rtsol ${rtsol_flags} $1
1217                 fi
1218         fi
1219 }
1220
1221 # ipv6_accept_rtadv_down if
1222 #       Disable accepting Router Advertisement
1223 ipv6_accept_rtadv_down()
1224 {
1225         if ipv6_autoconfif $1; then
1226                 ${IFCONFIG_CMD} $1 inet6 -accept_rtadv
1227         fi
1228 }
1229
1230 # ifscript_up if
1231 #       Evaluate a startup script for the $if interface.
1232 #       It returns 0 if a script was found and processed or
1233 #       1 if no script was found.
1234 #
1235 ifscript_up()
1236 {
1237         if [ -r /etc/start_if.$1 ]; then
1238                 . /etc/start_if.$1
1239                 return 0
1240         else
1241                 return 1
1242         fi
1243 }
1244
1245 # ifscript_down if
1246 #       Evaluate a shutdown script for the $if interface.
1247 #       It returns 0 if a script was found and processed or
1248 #       1 if no script was found.
1249 #
1250 ifscript_down()
1251 {
1252         if [ -r /etc/stop_if.$1 ]; then
1253                 . /etc/stop_if.$1
1254                 return 0
1255         else
1256                 return 1
1257         fi
1258 }
1259
1260 # clone_up
1261 #       Create cloneable interfaces.
1262 #
1263 clone_up()
1264 {
1265         local _list ifn ifopt _iflist _n tmpargs
1266         _list=
1267         _iflist=$*
1268
1269         # create_args_IF
1270         for ifn in ${cloned_interfaces}; do
1271                 # Parse ifn:ifopt.
1272                 OIFS=$IFS; IFS=:; set -- $ifn; ifn=$1; ifopt=$2; IFS=$OIFS
1273                 case $_iflist in
1274                 ""|$ifn|$ifn\ *|*\ $ifn\ *|*\ $ifn)     ;;
1275                 *)      continue ;;
1276                 esac
1277                 case $ifn in
1278                 epair[0-9]*)
1279                         # epair(4) uses epair[0-9] for creation and
1280                         # epair[0-9][ab] for configuration.
1281                         #
1282                         # Skip if ${ifn}a or ${ifn}b already exist.
1283                         if ${IFCONFIG_CMD} ${ifn}a > /dev/null 2>&1; then
1284                                 continue
1285                         elif ${IFCONFIG_CMD} ${ifn}b > /dev/null 2>&1; then
1286                                 continue
1287                         fi
1288                         ${IFCONFIG_CMD} ${ifn} create \
1289                             `get_if_var ${ifn} create_args_IF`
1290                         if [ $? -eq 0 ]; then
1291                                 _list="$_list ${ifn}a ${ifn}b"
1292                         fi
1293                 ;;
1294                 *)
1295                         # Skip if ${ifn} already exists.
1296                         if ${IFCONFIG_CMD} $ifn > /dev/null 2>&1; then
1297                                 continue
1298                         fi
1299                         ${IFCONFIG_CMD} ${ifn} create \
1300                             `get_if_var ${ifn} create_args_IF`
1301                         if [ $? -eq 0 ]; then
1302                                 _list="$_list $ifn"
1303                         fi
1304                 esac
1305         done
1306         if [ -n "$gif_interfaces" ]; then
1307                 warn "\$gif_interfaces is obsolete.  Use \$cloned_interfaces instead."
1308         fi
1309         for ifn in ${gif_interfaces}; do
1310                 # Parse ifn:ifopt.
1311                 OIFS=$IFS; IFS=:; set -- $ifn; ifn=$1; ifopt=$2; IFS=$OIFS
1312                 case $_iflist in
1313                 ""|$ifn|$ifn\ *|*\ $ifn\ *|*\ $ifn)     ;;
1314                 *)      continue ;;
1315                 esac
1316                 # Skip if ifn already exists.
1317                 if ${IFCONFIG_CMD} $ifn > /dev/null 2>&1; then
1318                         continue
1319                 fi
1320                 case $ifn in
1321                 gif[0-9]*)
1322                         ${IFCONFIG_CMD} $ifn create
1323                 ;;
1324                 *)
1325                         _n=$(${IFCONFIG_CMD} gif create)
1326                         ${IFCONFIG_CMD} $_n name $ifn
1327                 ;;
1328                 esac
1329                 if [ $? -eq 0 ]; then
1330                         _list="$_list $ifn"
1331                 fi
1332                 tmpargs=$(get_if_var $ifn gifconfig_IF)
1333                 eval ifconfig_${ifn}=\"tunnel \$tmpargs\"
1334         done
1335         if [ -n "${_list# }" ]; then
1336                 echo "Created clone interfaces: ${_list# }."
1337         fi
1338         debug "Cloned: ${_list# }"
1339 }
1340
1341 # clone_down
1342 #       Destroy cloned interfaces. Destroyed interfaces are echoed to
1343 #       standard output.
1344 #
1345 clone_down()
1346 {
1347         local _list ifn _difn ifopt _iflist _sticky
1348         _list=
1349         _iflist=$*
1350
1351         : ${cloned_interfaces_sticky:=NO}
1352         if checkyesno cloned_interfaces_sticky; then
1353                 _sticky=1
1354         else
1355                 _sticky=0
1356         fi
1357         for ifn in ${cloned_interfaces} ${gif_interfaces}; do
1358                 # Parse ifn:ifopt.
1359                 OIFS=$IFS; IFS=:; set -- $ifn; ifn=$1; ifopt=$2; IFS=$OIFS
1360                 case $ifopt:$_sticky in
1361                 sticky:*)       continue ;;     # :sticky => not destroy
1362                 nosticky:*)     ;;              # :nosticky => destroy
1363                 *:1)            continue ;;     # global sticky knob == 1
1364                 esac
1365                 case $_iflist in
1366                 ""|$ifn|$ifn\ *|*\ $ifn\ *|*\ $ifn)     ;;
1367                 *)      continue ;;
1368                 esac
1369                 case $ifn in
1370                 epair[0-9]*)
1371                         # Note: epair(4) uses epair[0-9] for removal and
1372                         # epair[0-9][ab] for configuration.
1373                         #
1374                         # Skip if both of ${ifn}a and ${ifn}b do not exist.
1375                         if ${IFCONFIG_CMD} ${ifn}a > /dev/null 2>&1; then
1376                                 _difn=${ifn}a
1377                         elif ${IFCONFIG_CMD} ${ifn}b > /dev/null 2>&1; then
1378                                 _difn=${ifn}b
1379                         else
1380                                 continue
1381                         fi
1382                         ${IFCONFIG_CMD} -n $_difn destroy
1383                         if [ $? -eq 0 ]; then
1384                                 _list="$_list ${ifn}a ${ifn}b"
1385                         fi
1386                 ;;
1387                 *)
1388                         # Skip if ifn does not exist.
1389                         if ! ${IFCONFIG_CMD} $ifn > /dev/null 2>&1; then
1390                                 continue
1391                         fi
1392                         ${IFCONFIG_CMD} -n ${ifn} destroy
1393                         if [ $? -eq 0 ]; then
1394                                 _list="$_list $ifn"
1395                         fi
1396                 ;;
1397                 esac
1398         done
1399         if [ -n "${_list# }" ]; then
1400                 echo "Destroyed clone interfaces: ${_list# }."
1401         fi
1402         debug "Destroyed clones: ${_list# }"
1403 }
1404
1405 # childif_create
1406 #       Create and configure child interfaces.  Return 0 if child
1407 #       interfaces are created.
1408 #
1409 childif_create()
1410 {
1411         local cfg child child_vlans child_wlans create_args debug_flags ifn i
1412         cfg=1
1413         ifn=$1
1414
1415         # Create wireless interfaces
1416         child_wlans=`get_if_var $ifn wlans_IF`
1417
1418         for child in ${child_wlans}; do
1419                 create_args="wlandev $ifn `get_if_var $child create_args_IF`"
1420                 debug_flags="`get_if_var $child wlandebug_IF`"
1421
1422                 if expr $child : 'wlan[0-9][0-9]*$' >/dev/null 2>&1; then
1423                         ${IFCONFIG_CMD} $child create ${create_args} && cfg=0
1424                         if [ -n "${debug_flags}" ]; then
1425                                 wlandebug -i $child ${debug_flags}
1426                         fi
1427                 else
1428                         i=`${IFCONFIG_CMD} wlan create ${create_args}`
1429                         if [ -n "${debug_flags}" ]; then
1430                                 wlandebug -i $i ${debug_flags}
1431                         fi
1432                         ${IFCONFIG_CMD} $i name $child && cfg=0
1433                 fi
1434                 if autoif $child; then
1435                         ifn_start $child
1436                 fi
1437         done
1438
1439         # Create vlan interfaces
1440         child_vlans=`get_if_var $ifn vlans_IF`
1441
1442         if [ -n "${child_vlans}" ]; then
1443                 load_kld if_vlan
1444         fi
1445
1446         for child in ${child_vlans}; do
1447                 if expr $child : '[1-9][0-9]*$' >/dev/null 2>&1; then
1448                         child="${ifn}.${child}"
1449                         create_args=`get_if_var $child create_args_IF`
1450                         ${IFCONFIG_CMD} $child create ${create_args} && cfg=0
1451                 else
1452                         create_args="vlandev $ifn `get_if_var $child create_args_IF`"
1453                         if expr $child : 'vlan[0-9][0-9]*$' >/dev/null 2>&1; then
1454                                 ${IFCONFIG_CMD} $child create ${create_args} && cfg=0
1455                         else
1456                                 i=`${IFCONFIG_CMD} vlan create ${create_args}`
1457                                 ${IFCONFIG_CMD} $i name $child && cfg=0
1458                         fi
1459                 fi
1460                 if autoif $child; then
1461                         ifn_start $child
1462                 fi
1463         done
1464
1465         return ${cfg}
1466 }
1467
1468 # childif_destroy
1469 #       Destroy child interfaces.
1470 #
1471 childif_destroy()
1472 {
1473         local cfg child child_vlans child_wlans ifn
1474         cfg=1
1475
1476         child_wlans=`get_if_var $ifn wlans_IF`
1477         for child in ${child_wlans}; do
1478                 if ! ifexists $child; then
1479                         continue
1480                 fi
1481                 ${IFCONFIG_CMD} -n $child destroy && cfg=0
1482         done
1483
1484         child_vlans=`get_if_var $ifn vlans_IF`
1485         for child in ${child_vlans}; do
1486                 if expr $child : '[1-9][0-9]*$' >/dev/null 2>&1; then
1487                         child="${ifn}.${child}"
1488                 fi
1489                 if ! ifexists $child; then
1490                         continue
1491                 fi
1492                 ${IFCONFIG_CMD} -n $child destroy && cfg=0
1493         done
1494
1495         return ${cfg}
1496 }
1497
1498 # ng_mkpeer
1499 #       Create netgraph nodes.
1500 #
1501 ng_mkpeer()
1502 {
1503         ngctl -f - 2> /dev/null <<EOF
1504 mkpeer $*
1505 msg dummy nodeinfo
1506 EOF
1507 }
1508
1509 # ng_create_one
1510 #       Create netgraph nodes.
1511 #
1512 ng_create_one()
1513 {
1514         local t
1515
1516         ng_mkpeer $* | while read line; do
1517                 t=`expr "${line}" : '.* name="\([a-z]*[0-9]*\)" .*'`
1518                 if [ -n "${t}" ]; then
1519                         echo ${t}
1520                         return
1521                 fi
1522         done
1523 }
1524
1525 # ng_fec_create ifn
1526 #       Configure Fast EtherChannel for interface $ifn. Returns 0 if
1527 #       FEC arguments were found and configured; returns !0 otherwise.
1528 ng_fec_create()
1529 {
1530          local req_iface iface bogus
1531          req_iface="$1"
1532
1533          ngctl shutdown ${req_iface}: > /dev/null 2>&1
1534
1535          bogus=""
1536          while true; do
1537                  iface=`ng_create_one fec dummy fec`
1538                  if [ -z "${iface}" ]; then
1539                          exit 2
1540                  fi
1541                  if [ "${iface}" = "${req_iface}" ]; then
1542                          break
1543                  fi
1544                  bogus="${bogus} ${iface}"
1545          done
1546
1547          for iface in ${bogus}; do
1548                  ngctl shutdown ${iface}:
1549          done
1550 }
1551
1552 # fec_up
1553 #       Create Fast EtherChannel interfaces.
1554 fec_up()
1555 {
1556         local i j
1557
1558         for i in ${fec_interfaces}; do
1559                 ng_fec_create $i
1560                 for j in `get_if_var $i fecconfig_IF`; do
1561                         case ${j} in
1562                         '')
1563                                 continue
1564                                 ;;
1565                         *)
1566                                 ngctl msg ${i}: add_iface "\"${j}\""
1567                                 ;;
1568                         esac
1569                 done
1570         done
1571 }
1572
1573 # ipx_up ifn
1574 #       Configure any IPX addresses for interface $ifn. Returns 0 if
1575 #       IPX arguments were found and configured; returns 1 otherwise.
1576 #
1577 ipx_up()
1578 {
1579         local ifn
1580         ifn="$1"
1581
1582         # ifconfig_IF_ipx
1583         ifconfig_args=`_ifconfig_getargs $ifn ipx`
1584         if [ -n "${ifconfig_args}" ]; then
1585                 ${IFCONFIG_CMD} ${ifn} ${ifconfig_args}
1586                 return 0
1587         fi
1588
1589         return 1
1590 }
1591
1592 # ipx_down ifn
1593 #       Remove IPX addresses for interface $ifn. Returns 0 if IPX
1594 #       addresses were found and unconfigured. It returns 1, otherwise.
1595 #
1596 ipx_down()
1597 {
1598         local _if _ifs _ret ipxList oldifs _ipx
1599         _if=$1
1600         _ifs="^"
1601         _ret=1
1602         ipxList="`${IFCONFIG_CMD} ${_if} | grep 'ipx ' | tr "\n" "$_ifs"`"
1603         oldifs="$IFS"
1604
1605         IFS="$_ifs"
1606         for _ipx in $ipxList ; do
1607                 # get rid of extraneous line
1608                 [ -z "$_ipx" ] && break
1609
1610                 _ipx=`expr "$_ipx" : '.*\(ipx [0-9a-h]\{1,8\}H*\.[0-9a-h]\{1,12\}\).*'`
1611
1612                 IFS="$oldifs"
1613                 ${IFCONFIG_CMD} ${_if} ${_ipx} delete
1614                 IFS="$_ifs"
1615                 _ret=0
1616         done
1617         IFS="$oldifs"
1618
1619         return $_ret
1620 }
1621
1622 # ifnet_rename [ifname]
1623 #       Rename interfaces if ifconfig_IF_name is defined.
1624 #
1625 ifnet_rename()
1626 {
1627         local _if _ifname
1628
1629         # ifconfig_IF_name
1630         for _if in ${*:-$(${IFCONFIG_CMD} -l)}; do
1631                 _ifname=`get_if_var $_if ifconfig_IF_name`
1632                 if [ ! -z "$_ifname" ]; then
1633                         ${IFCONFIG_CMD} $_if name $_ifname
1634                 fi
1635         done
1636
1637         return 0
1638 }
1639
1640 # list_net_interfaces type
1641 #       List all network interfaces. The type of interface returned
1642 #       can be controlled by the type argument. The type
1643 #       argument can be any of the following:
1644 #               nodhcp  - all interfaces, excluding DHCP configured interfaces
1645 #               dhcp    - list only DHCP configured interfaces
1646 #               noautoconf      - all interfaces, excluding IPv6 Stateless
1647 #                                 Address Autoconf configured interfaces
1648 #               autoconf        - list only IPv6 Stateless Address Autoconf
1649 #                                 configured interfaces
1650 #       If no argument is specified all network interfaces are output.
1651 #       Note that the list will include cloned interfaces if applicable.
1652 #       Cloned interfaces must already exist to have a chance to appear
1653 #       in the list if ${network_interfaces} is set to `auto'.
1654 #
1655 list_net_interfaces()
1656 {
1657         local type _tmplist _list _autolist _lo _if
1658         type=$1
1659
1660         # Get a list of ALL the interfaces and make lo0 first if it's there.
1661         #
1662         _tmplist=
1663         case ${network_interfaces} in
1664         [Aa][Uu][Tt][Oo])
1665                 _autolist="`${IFCONFIG_CMD} -l`"
1666                 _lo=
1667                 for _if in ${_autolist} ; do
1668                         if autoif $_if; then
1669                                 if [ "$_if" = "lo0" ]; then
1670                                         _lo="lo0 "
1671                                 else
1672                                         _tmplist="${_tmplist} ${_if}"
1673                                 fi
1674                         fi
1675                 done
1676                 _tmplist="${_lo}${_tmplist# }"
1677         ;;
1678         *)
1679                 for _if in ${network_interfaces} ${cloned_interfaces}; do
1680                         # epair(4) uses epair[0-9] for creation and
1681                         # epair[0-9][ab] for configuration.
1682                         case $_if in
1683                         epair[0-9]*)
1684                                 _tmplist="$_tmplist ${_if}a ${_if}b"
1685                         ;;
1686                         *)
1687                                 _tmplist="$_tmplist $_if"
1688                         ;;
1689                         esac
1690                 done
1691                 #
1692                 # lo0 is effectively mandatory, so help prevent foot-shooting
1693                 #
1694                 case "$_tmplist" in
1695                 lo0|'lo0 '*|*' lo0'|*' lo0 '*)
1696                         # This is fine, do nothing
1697                         _tmplist="${_tmplist# }"
1698                 ;;
1699                 *)
1700                         _tmplist="lo0 ${_tmplist# }"
1701                 ;;
1702                 esac
1703         ;;
1704         esac
1705
1706         _list=
1707         case "$type" in
1708         nodhcp)
1709                 for _if in ${_tmplist} ; do
1710                         if ! dhcpif $_if && \
1711                            [ -n "`_ifconfig_getargs $_if`" ]; then
1712                                 _list="${_list# } ${_if}"
1713                         fi
1714                 done
1715         ;;
1716         dhcp)
1717                 for _if in ${_tmplist} ; do
1718                         if dhcpif $_if; then
1719                                 _list="${_list# } ${_if}"
1720                         fi
1721                 done
1722         ;;
1723         noautoconf)
1724                 for _if in ${_tmplist} ; do
1725                         if ! ipv6_autoconfif $_if && \
1726                            [ -n "`_ifconfig_getargs $_if ipv6`" ]; then
1727                                 _list="${_list# } ${_if}"
1728                         fi
1729                 done
1730         ;;
1731         autoconf)
1732                 for _if in ${_tmplist} ; do
1733                         if ipv6_autoconfif $_if; then
1734                                 _list="${_list# } ${_if}"
1735                         fi
1736                 done
1737         ;;
1738         *)
1739                 _list=${_tmplist}
1740         ;;
1741         esac
1742
1743         echo $_list
1744
1745         return 0
1746 }
1747
1748 # get_default_if -address_family
1749 #       Get the interface of the default route for the given address family.
1750 #       The -address_family argument must be suitable passing to route(8).
1751 #
1752 get_default_if()
1753 {
1754         local routeget oldifs defif line
1755         defif=
1756         oldifs="$IFS"
1757         IFS="
1758 "
1759         for line in `route -n get $1 default 2>/dev/null`; do
1760                 case $line in
1761                 *interface:*)
1762                         defif=${line##*: }
1763                         ;;
1764                 esac
1765         done
1766         IFS=${oldifs}
1767
1768         echo $defif
1769 }
1770
1771 # hexdigit arg
1772 #       Echo decimal number $arg (single digit) in hexadecimal format.
1773 hexdigit()
1774 {
1775         printf '%x\n' "$1"
1776 }
1777
1778 # hexprint arg
1779 #       Echo decimal number $arg (multiple digits) in hexadecimal format.
1780 hexprint()
1781 {
1782         printf '%x\n' "$1"
1783 }
1784
1785 is_wired_interface()
1786 {
1787         local media
1788
1789         case `${IFCONFIG_CMD} $1 2>/dev/null` in
1790         *media:?Ethernet*) media=Ethernet ;;
1791         esac
1792
1793         test "$media" = "Ethernet"
1794 }
1795
1796 # network6_getladdr if [flag]
1797 #       Echo link-local address from $if if any.
1798 #       If flag is defined, tentative ones will be excluded.
1799 network6_getladdr()
1800 {
1801         local _if _flag proto addr rest
1802         _if=$1
1803         _flag=$2
1804
1805         ${IFCONFIG_CMD} $_if 2>/dev/null | while read proto addr rest; do
1806                 case "${proto}/${addr}/${_flag}/${rest}" in
1807                 inet6/fe80::*//*)
1808                         echo ${addr}
1809                 ;;
1810                 inet6/fe80:://*tentative*)      # w/o flag
1811                         sleep `${SYSCTL_N} net.inet6.ip6.dad_count`
1812                         network6_getladdr $_if $_flags
1813                 ;;
1814                 inet6/fe80::/*/*tentative*)     # w/ flag
1815                         echo ${addr}
1816                 ;;
1817                 *)
1818                         continue
1819                 ;;
1820                 esac
1821
1822                 return
1823         done
1824 }