1272343Sngie# $NetBSD: t_servent.sh,v 1.1 2011/01/12 17:32:27 pgoyette Exp $ 2272343Sngie# 3272343Sngie# Copyright (c) 2008 The NetBSD Foundation, Inc. 4272343Sngie# All rights reserved. 5272343Sngie# 6272343Sngie# Redistribution and use in source and binary forms, with or without 7272343Sngie# modification, are permitted provided that the following conditions 8272343Sngie# are met: 9272343Sngie# 1. Redistributions of source code must retain the above copyright 10272343Sngie# notice, this list of conditions and the following disclaimer. 11272343Sngie# 2. Redistributions in binary form must reproduce the above copyright 12272343Sngie# notice, this list of conditions and the following disclaimer in the 13272343Sngie# documentation and/or other materials provided with the distribution. 14272343Sngie# 15272343Sngie# THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 16272343Sngie# ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 17272343Sngie# TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 18272343Sngie# PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 19272343Sngie# BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 20272343Sngie# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 21272343Sngie# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 22272343Sngie# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 23272343Sngie# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 24272343Sngie# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 25272343Sngie# POSSIBILITY OF SUCH DAMAGE. 26272343Sngie# 27272343Sngie 28272343Sngieatf_test_case servent 29272343Sngieservent_head() 30272343Sngie{ 31272343Sngie atf_set "descr" "Checks {get,set,end}servent(3)" 32272343Sngie} 33272343Sngieservent_body() 34272343Sngie{ 35272343Sngie # 36272343Sngie # Munge original to: 37272343Sngie # (1) match output format of the test program 38272343Sngie # (2) fold all names for the same port/proto together 39272343Sngie # (3) prune duplicates 40272343Sngie # 41272343Sngie tr '\t' ' ' </etc/services | awk ' 42272343Sngie function add(key, name, i, n, ar) { 43272343Sngie n = split(names[key], ar); 44272343Sngie for (i=1; i<=n; i++) { 45272343Sngie if (name == ar[i]) { 46272343Sngie return; 47272343Sngie } 48272343Sngie } 49272343Sngie delete ar; 50272343Sngie names[key] = names[key] " " name; 51272343Sngie } 52272343Sngie 53272343Sngie { 54272343Sngie sub("#.*", "", $0); 55272343Sngie gsub(" *", " ", $0); 56272343Sngie if (NF==0) { 57272343Sngie next; 58272343Sngie } 59272343Sngie add($2, $1, 0); 60272343Sngie for (i=3; i<=NF; i++) { 61272343Sngie add($2, $i, 1); 62272343Sngie } 63272343Sngie } 64272343Sngie END { 65272343Sngie for (key in names) { 66272343Sngie portproto = key; 67272343Sngie sub("/", ", proto=", portproto); 68272343Sngie portproto = "port=" portproto; 69272343Sngie 70272343Sngie n = split(names[key], ar); 71272343Sngie printf "name=%s, %s, aliases=", ar[1], portproto; 72272343Sngie for (i=2; i<=n; i++) { 73272343Sngie if (i>2) { 74272343Sngie printf " "; 75272343Sngie } 76272343Sngie printf "%s", ar[i]; 77272343Sngie } 78272343Sngie printf "\n"; 79272343Sngie delete ar; 80272343Sngie } 81272343Sngie } 82272343Sngie ' | sort >exp 83272343Sngie 84276478Sngie case "$(uname)" in 85276478Sngie FreeBSD) 86276478Sngie # (3) Don't prune duplicates 87276478Sngie tr '\t' ' ' < /etc/services | 88276478Sngie sed 's/#.*//;s/ */ /g; /^$/d;s#\([0-9]\)/#\1 #;s/ *$//' | 89276478Sngie sort | 90276478Sngie while read l; do 91276478Sngie set $l 92276478Sngie name=$1; shift 93276478Sngie port=$1; shift 94276478Sngie proto=$1; shift 95276478Sngie alias="$@" 96276478Sngie printf "name=%s, port=%s, proto=%s, aliases=%s\n" \ 97276478Sngie $name $port $proto "$alias" 98276478Sngie done > exp 99276478Sngie ;; 100276478Sngie esac 101276478Sngie 102272343Sngie # run test program 103272343Sngie "$(atf_get_srcdir)/h_servent" | sed 's/ *$//' | sort >out 104272343Sngie 105272343Sngie diff -u exp out || atf_fail "Observed output does not match reference output" 106272343Sngie} 107272343Sngie 108272343Sngieatf_init_test_cases() 109272343Sngie{ 110272343Sngie atf_add_test_case servent 111272343Sngie} 112