xref: /freebsd/contrib/netbsd-tests/lib/libc/net/t_servent.sh (revision c22165b4f1f5d38b681921797a44b3ba8c13b7e0)
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