1*640235e2SEnji Cooper# $NetBSD: t_servent.sh,v 1.2 2016/03/08 08:34:17 joerg Exp $ 257718be8SEnji Cooper# 357718be8SEnji Cooper# Copyright (c) 2008 The NetBSD Foundation, Inc. 457718be8SEnji Cooper# All rights reserved. 557718be8SEnji Cooper# 657718be8SEnji Cooper# Redistribution and use in source and binary forms, with or without 757718be8SEnji Cooper# modification, are permitted provided that the following conditions 857718be8SEnji Cooper# are met: 957718be8SEnji Cooper# 1. Redistributions of source code must retain the above copyright 1057718be8SEnji Cooper# notice, this list of conditions and the following disclaimer. 1157718be8SEnji Cooper# 2. Redistributions in binary form must reproduce the above copyright 1257718be8SEnji Cooper# notice, this list of conditions and the following disclaimer in the 1357718be8SEnji Cooper# documentation and/or other materials provided with the distribution. 1457718be8SEnji Cooper# 1557718be8SEnji Cooper# THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 1657718be8SEnji Cooper# ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 1757718be8SEnji Cooper# TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 1857718be8SEnji Cooper# PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 1957718be8SEnji Cooper# BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 2057718be8SEnji Cooper# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 2157718be8SEnji Cooper# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 2257718be8SEnji Cooper# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 2357718be8SEnji Cooper# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 2457718be8SEnji Cooper# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 2557718be8SEnji Cooper# POSSIBILITY OF SUCH DAMAGE. 2657718be8SEnji Cooper# 2757718be8SEnji Cooper 2857718be8SEnji Cooperatf_test_case servent 2957718be8SEnji Cooperservent_head() 3057718be8SEnji Cooper{ 3157718be8SEnji Cooper atf_set "descr" "Checks {get,set,end}servent(3)" 32*640235e2SEnji Cooper # libc doesn't include aliases 33*640235e2SEnji Cooper atf_set "require.files" "/var/db/services.cdb" 3457718be8SEnji Cooper} 3557718be8SEnji Cooperservent_body() 3657718be8SEnji Cooper{ 3757718be8SEnji Cooper # 3857718be8SEnji Cooper # Munge original to: 3957718be8SEnji Cooper # (1) match output format of the test program 4057718be8SEnji Cooper # (2) fold all names for the same port/proto together 4157718be8SEnji Cooper # (3) prune duplicates 4257718be8SEnji Cooper # 4357718be8SEnji Cooper tr '\t' ' ' </etc/services | awk ' 4457718be8SEnji Cooper function add(key, name, i, n, ar) { 4557718be8SEnji Cooper n = split(names[key], ar); 4657718be8SEnji Cooper for (i=1; i<=n; i++) { 4757718be8SEnji Cooper if (name == ar[i]) { 4857718be8SEnji Cooper return; 4957718be8SEnji Cooper } 5057718be8SEnji Cooper } 5157718be8SEnji Cooper delete ar; 5257718be8SEnji Cooper names[key] = names[key] " " name; 5357718be8SEnji Cooper } 5457718be8SEnji Cooper 5557718be8SEnji Cooper { 5657718be8SEnji Cooper sub("#.*", "", $0); 5757718be8SEnji Cooper gsub(" *", " ", $0); 5857718be8SEnji Cooper if (NF==0) { 5957718be8SEnji Cooper next; 6057718be8SEnji Cooper } 6157718be8SEnji Cooper add($2, $1, 0); 6257718be8SEnji Cooper for (i=3; i<=NF; i++) { 6357718be8SEnji Cooper add($2, $i, 1); 6457718be8SEnji Cooper } 6557718be8SEnji Cooper } 6657718be8SEnji Cooper END { 6757718be8SEnji Cooper for (key in names) { 6857718be8SEnji Cooper portproto = key; 6957718be8SEnji Cooper sub("/", ", proto=", portproto); 7057718be8SEnji Cooper portproto = "port=" portproto; 7157718be8SEnji Cooper 7257718be8SEnji Cooper n = split(names[key], ar); 7357718be8SEnji Cooper printf "name=%s, %s, aliases=", ar[1], portproto; 7457718be8SEnji Cooper for (i=2; i<=n; i++) { 7557718be8SEnji Cooper if (i>2) { 7657718be8SEnji Cooper printf " "; 7757718be8SEnji Cooper } 7857718be8SEnji Cooper printf "%s", ar[i]; 7957718be8SEnji Cooper } 8057718be8SEnji Cooper printf "\n"; 8157718be8SEnji Cooper delete ar; 8257718be8SEnji Cooper } 8357718be8SEnji Cooper } 8457718be8SEnji Cooper ' | sort >exp 8557718be8SEnji Cooper 86b6fbc510SEnji Cooper case "$(uname)" in 87b6fbc510SEnji Cooper FreeBSD) 88b6fbc510SEnji Cooper # (3) Don't prune duplicates 89b6fbc510SEnji Cooper tr '\t' ' ' < /etc/services | 90b6fbc510SEnji Cooper sed 's/#.*//;s/ */ /g; /^$/d;s#\([0-9]\)/#\1 #;s/ *$//' | 91b6fbc510SEnji Cooper sort | 92b6fbc510SEnji Cooper while read l; do 93b6fbc510SEnji Cooper set $l 94b6fbc510SEnji Cooper name=$1; shift 95b6fbc510SEnji Cooper port=$1; shift 96b6fbc510SEnji Cooper proto=$1; shift 97b6fbc510SEnji Cooper alias="$@" 98b6fbc510SEnji Cooper printf "name=%s, port=%s, proto=%s, aliases=%s\n" \ 99b6fbc510SEnji Cooper $name $port $proto "$alias" 100b6fbc510SEnji Cooper done > exp 101b6fbc510SEnji Cooper ;; 102b6fbc510SEnji Cooper esac 103b6fbc510SEnji Cooper 10457718be8SEnji Cooper # run test program 10557718be8SEnji Cooper "$(atf_get_srcdir)/h_servent" | sed 's/ *$//' | sort >out 10657718be8SEnji Cooper 10757718be8SEnji Cooper diff -u exp out || atf_fail "Observed output does not match reference output" 10857718be8SEnji Cooper} 10957718be8SEnji Cooper 11057718be8SEnji Cooperatf_init_test_cases() 11157718be8SEnji Cooper{ 11257718be8SEnji Cooper atf_add_test_case servent 11357718be8SEnji Cooper} 114