#!/bin/ksh
#
# $Revision: 1.6 $ $Date: 2012-08-24 23:52:51-04 $
# $Source: /home/vogelke/bin/RCS/host,v $
# $Host: sys7.com $
# $UUID: 64336324-6904-338c-8abf-854dd9783ada $
#
#<host: look up a name or IP address
# exec /usr/sbin/host ${1+"$@"}   # if you trust "host"
#
# Use DJB routines so we don't go through stupid Solaris door:
#   me% dir /var/run/name_service_door
#   Dr--r--r-- 1 root root 0 Jan 30 17:56 /var/run/name_service_door>
#
# Examples:
#   me% dnsip cmswfs004.com
#   192.168.185.85
#
#   me% dnsname 192.168.185.85
#   cmswfs004.com

PATH=/usr/local/bin:/bin:/usr/bin
export PATH
name=$1

# pass in question, answer; blank lines mean DNS program
# did not find anything.

check () {
    q=$1; a=$2
    case "$a" in
        "") ;;
         *) echo $q $a && exit 0 ;;
    esac
}

set X $(grep '^search ' /etc/resolv.conf)
shift 2
dlist="$*"

case "$name" in
    [1-9][1-9]*\.[1-9])
        a=$(dnsname $name); check $name $a ;;

    *.*)
        a=$(dnsip $name); check $name $a ;;

    *) 
        for domain in $dlist; do
            a=$(dnsip $name.$domain)
            check $name.$domain $a
        done
        ;;
esac

exit 0