#!/bin/rc
rfork e

fn usage {
	>[2=1] echo $0 dnsname service [proto]
	exit usage
}

if(test $#* -lt 2)
	usage
name=$1
service=$2
proto=$3
if(~ $#proto 0)
	proto='tcp'

<>[9]/net/dns {
	echo _$service._$proto.$name srv >[1=9] || exit NXDOMAIN
	dd -if /fd/9 -seek 0 -quiet 1
} | awk '{
	printf("%s!%s!%s\n", ENVIRON["proto"], $4, $3)
}'