xref: /minix3/tests/lib/libc/string/t_swab.c (revision 11be35a165022172ed3cea20f2b5df0307540b0e)
1*11be35a1SLionel Sambuc /*	$NetBSD: t_swab.c,v 1.2 2011/07/07 08:27:36 jruoho Exp $ */
2*11be35a1SLionel Sambuc 
3*11be35a1SLionel Sambuc /*-
4*11be35a1SLionel Sambuc  * Copyright (c) 2001 The NetBSD Foundation, Inc.
5*11be35a1SLionel Sambuc  * All rights reserved.
6*11be35a1SLionel Sambuc  *
7*11be35a1SLionel Sambuc  * This code was contributed to The NetBSD Foundation by Christos Zoulas.
8*11be35a1SLionel Sambuc  *
9*11be35a1SLionel Sambuc  * Redistribution and use in source and binary forms, with or without
10*11be35a1SLionel Sambuc  * modification, are permitted provided that the following conditions
11*11be35a1SLionel Sambuc  * are met:
12*11be35a1SLionel Sambuc  * 1. Redistributions of source code must retain the above copyright
13*11be35a1SLionel Sambuc  *    notice, this list of conditions and the following disclaimer.
14*11be35a1SLionel Sambuc  * 2. Redistributions in binary form must reproduce the above copyright
15*11be35a1SLionel Sambuc  *    notice, this list of conditions and the following disclaimer in the
16*11be35a1SLionel Sambuc  *    documentation and/or other materials provided with the distribution.
17*11be35a1SLionel Sambuc  *
18*11be35a1SLionel Sambuc  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
19*11be35a1SLionel Sambuc  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
20*11be35a1SLionel Sambuc  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
21*11be35a1SLionel Sambuc  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
22*11be35a1SLionel Sambuc  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
23*11be35a1SLionel Sambuc  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
24*11be35a1SLionel Sambuc  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
25*11be35a1SLionel Sambuc  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
26*11be35a1SLionel Sambuc  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
27*11be35a1SLionel Sambuc  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
28*11be35a1SLionel Sambuc  * POSSIBILITY OF SUCH DAMAGE.
29*11be35a1SLionel Sambuc  */
30*11be35a1SLionel Sambuc #include <atf-c.h>
31*11be35a1SLionel Sambuc 
32*11be35a1SLionel Sambuc #include <stdio.h>
33*11be35a1SLionel Sambuc #include <stdlib.h>
34*11be35a1SLionel Sambuc #include <string.h>
35*11be35a1SLionel Sambuc #include <unistd.h>
36*11be35a1SLionel Sambuc 
37*11be35a1SLionel Sambuc #include <err.h>
38*11be35a1SLionel Sambuc 
39*11be35a1SLionel Sambuc #define MAXCHK	100
40*11be35a1SLionel Sambuc 
41*11be35a1SLionel Sambuc static void
build(char * a,char * b,size_t n)42*11be35a1SLionel Sambuc build(char *a, char *b, size_t n) {
43*11be35a1SLionel Sambuc 	size_t i;
44*11be35a1SLionel Sambuc 
45*11be35a1SLionel Sambuc 	n >>= 1;
46*11be35a1SLionel Sambuc 	for (i = 0; i < n; i += 2) {
47*11be35a1SLionel Sambuc 		b[i+1] = a[i] = (char)i;
48*11be35a1SLionel Sambuc 		b[i] = a[i+1] = (char)(i+1);
49*11be35a1SLionel Sambuc 	}
50*11be35a1SLionel Sambuc 	for (n <<= 1; n < MAXCHK; n++)
51*11be35a1SLionel Sambuc 		a[n] = b[n] = (char)~0;
52*11be35a1SLionel Sambuc }
53*11be35a1SLionel Sambuc 
54*11be35a1SLionel Sambuc static void
dump(const char * f,char * b,size_t l)55*11be35a1SLionel Sambuc dump(const char *f, char *b, size_t l)
56*11be35a1SLionel Sambuc {
57*11be35a1SLionel Sambuc 
58*11be35a1SLionel Sambuc 	printf("%s ", f);
59*11be35a1SLionel Sambuc 	while (l--)
60*11be35a1SLionel Sambuc 		printf("%.2x ", (unsigned char)*b++);
61*11be35a1SLionel Sambuc 	printf("\n");
62*11be35a1SLionel Sambuc }
63*11be35a1SLionel Sambuc 
64*11be35a1SLionel Sambuc ATF_TC(swab_basic);
ATF_TC_HEAD(swab_basic,tc)65*11be35a1SLionel Sambuc ATF_TC_HEAD(swab_basic, tc)
66*11be35a1SLionel Sambuc {
67*11be35a1SLionel Sambuc 
68*11be35a1SLionel Sambuc 	atf_tc_set_md_var(tc, "descr", "Test swab results");
69*11be35a1SLionel Sambuc }
70*11be35a1SLionel Sambuc 
ATF_TC_BODY(swab_basic,tc)71*11be35a1SLionel Sambuc ATF_TC_BODY(swab_basic, tc)
72*11be35a1SLionel Sambuc {
73*11be35a1SLionel Sambuc 	char a[MAXCHK], b[MAXCHK], r[MAXCHK];
74*11be35a1SLionel Sambuc 	size_t i;
75*11be35a1SLionel Sambuc 
76*11be35a1SLionel Sambuc 	for (i = 0; i < MAXCHK; i += 2) {
77*11be35a1SLionel Sambuc 		build(a, b, i);
78*11be35a1SLionel Sambuc 		(void)memset(r, ~0, MAXCHK);
79*11be35a1SLionel Sambuc 		swab(a, r, i);
80*11be35a1SLionel Sambuc 		if (memcmp(b, r, MAXCHK) != 0) {
81*11be35a1SLionel Sambuc 			fprintf(stderr, "pattern mismatch at %lu bytes",
82*11be35a1SLionel Sambuc 			    (unsigned long)i);
83*11be35a1SLionel Sambuc 			dump("expect:", b, MAXCHK);
84*11be35a1SLionel Sambuc 			dump("result:", r, MAXCHK);
85*11be35a1SLionel Sambuc 			atf_tc_fail("Check stderr for details");
86*11be35a1SLionel Sambuc 		}
87*11be35a1SLionel Sambuc 	}
88*11be35a1SLionel Sambuc }
89*11be35a1SLionel Sambuc 
ATF_TP_ADD_TCS(tp)90*11be35a1SLionel Sambuc ATF_TP_ADD_TCS(tp)
91*11be35a1SLionel Sambuc {
92*11be35a1SLionel Sambuc 	ATF_TP_ADD_TC(tp, swab_basic);
93*11be35a1SLionel Sambuc 
94*11be35a1SLionel Sambuc 	return atf_no_error();
95*11be35a1SLionel Sambuc }
96