1# $NetBSD: t_protoent.sh,v 1.2 2012/09/03 15:32:18 christos Exp $ 2# 3# Copyright (c) 2008 The NetBSD Foundation, Inc. 4# All rights reserved. 5# 6# Redistribution and use in source and binary forms, with or without 7# modification, are permitted provided that the following conditions 8# are met: 9# 1. Redistributions of source code must retain the above copyright 10# notice, this list of conditions and the following disclaimer. 11# 2. Redistributions in binary form must reproduce the above copyright 12# notice, this list of conditions and the following disclaimer in the 13# documentation and/or other materials provided with the distribution. 14# 15# THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 16# ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 17# TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 18# PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 19# BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 20# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 21# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 22# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 23# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 24# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 25# POSSIBILITY OF SUCH DAMAGE. 26# 27 28atf_test_case protoent 29protoent_head() 30{ 31 atf_set "descr" "Checks {get,set,end}protoent(3)" 32} 33protoent_body() 34{ 35 # 36 # Munge original to: 37 # (1) match output format of the test program 38 # (2) fold all names for the same port/proto together 39 # (3) prune duplicates 40 # 41 tr '\t' ' ' </etc/protocols | awk ' 42 function add(key, name, i, n, ar) { 43 n = split(names[key], ar); 44 for (i = 1; i <= n; i++) { 45 if (name == ar[i]) { 46 return; 47 } 48 } 49 delete ar; 50 names[key] = names[key] " " name; 51 } 52 { 53 sub("#.*", "", $0); 54 gsub(" *", " ", $0); 55 if (NF == 0) { 56 next; 57 } 58 add($2, $1, 0); 59 for (i = 3; i <= NF; i++) { 60 add($2, $i, 1); 61 } 62 } 63 END { 64 for (key in names) { 65 proto = key; 66 67 n = split(names[key], ar); 68 printf "name=%s, proto=%s, aliases=", ar[1], proto; 69 for (i=2; i<=n; i++) { 70 if (i>2) { 71 printf " "; 72 } 73 printf "%s", ar[i]; 74 } 75 printf "\n"; 76 delete ar; 77 } 78 } 79 ' | sort >exp 80 81 # run test program 82 "$(atf_get_srcdir)/h_protoent" | sed 's/ *$//' | sort >out 83 84 diff -u exp out || \ 85 atf_fail "Observed output does not match reference output" 86} 87 88atf_init_test_cases() 89{ 90 atf_add_test_case protoent 91} 92