1*ecae8bc5Sisaki /* $NetBSD: t_atomic_cas.c,v 1.1 2019/02/17 12:24:17 isaki Exp $ */
2*ecae8bc5Sisaki
3*ecae8bc5Sisaki /*
4*ecae8bc5Sisaki * Copyright (C) 2019 Tetsuya Isaki. All rights reserved.
5*ecae8bc5Sisaki *
6*ecae8bc5Sisaki * Redistribution and use in source and binary forms, with or without
7*ecae8bc5Sisaki * modification, are permitted provided that the following conditions
8*ecae8bc5Sisaki * are met:
9*ecae8bc5Sisaki * 1. Redistributions of source code must retain the above copyright
10*ecae8bc5Sisaki * notice, this list of conditions and the following disclaimer.
11*ecae8bc5Sisaki * 2. Redistributions in binary form must reproduce the above copyright
12*ecae8bc5Sisaki * notice, this list of conditions and the following disclaimer in the
13*ecae8bc5Sisaki * documentation and/or other materials provided with the distribution.
14*ecae8bc5Sisaki *
15*ecae8bc5Sisaki * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16*ecae8bc5Sisaki * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17*ecae8bc5Sisaki * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18*ecae8bc5Sisaki * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
19*ecae8bc5Sisaki * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
20*ecae8bc5Sisaki * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
21*ecae8bc5Sisaki * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
22*ecae8bc5Sisaki * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
23*ecae8bc5Sisaki * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24*ecae8bc5Sisaki * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25*ecae8bc5Sisaki * SUCH DAMAGE.
26*ecae8bc5Sisaki */
27*ecae8bc5Sisaki
28*ecae8bc5Sisaki #include <sys/cdefs.h>
29*ecae8bc5Sisaki __RCSID("$NetBSD: t_atomic_cas.c,v 1.1 2019/02/17 12:24:17 isaki Exp $");
30*ecae8bc5Sisaki
31*ecae8bc5Sisaki #include <atf-c.h>
32*ecae8bc5Sisaki #include <inttypes.h>
33*ecae8bc5Sisaki #include <sys/atomic.h>
34*ecae8bc5Sisaki
35*ecae8bc5Sisaki /*
36*ecae8bc5Sisaki * These tests don't examine the atomicity.
37*ecae8bc5Sisaki */
38*ecae8bc5Sisaki
39*ecae8bc5Sisaki #define OLDVAL (0x1122334455667788UL)
40*ecae8bc5Sisaki #define NEWVAL (0x8090a0b0c0d0e0f0UL)
41*ecae8bc5Sisaki
42*ecae8bc5Sisaki /*
43*ecae8bc5Sisaki * atomic_cas_*{,_ni}()
44*ecae8bc5Sisaki */
45*ecae8bc5Sisaki #define atf_cas(NAME, TYPE, FMT) \
46*ecae8bc5Sisaki ATF_TC(NAME); \
47*ecae8bc5Sisaki ATF_TC_HEAD(NAME, tc) \
48*ecae8bc5Sisaki { \
49*ecae8bc5Sisaki atf_tc_set_md_var(tc, "descr", #NAME); \
50*ecae8bc5Sisaki } \
51*ecae8bc5Sisaki ATF_TC_BODY(NAME, tc) \
52*ecae8bc5Sisaki { \
53*ecae8bc5Sisaki volatile TYPE val; \
54*ecae8bc5Sisaki TYPE oldval; \
55*ecae8bc5Sisaki TYPE newval; \
56*ecae8bc5Sisaki TYPE expval; \
57*ecae8bc5Sisaki TYPE expres; \
58*ecae8bc5Sisaki TYPE res; \
59*ecae8bc5Sisaki /* If successful */ \
60*ecae8bc5Sisaki val = (TYPE)OLDVAL; \
61*ecae8bc5Sisaki oldval = (TYPE)OLDVAL; \
62*ecae8bc5Sisaki newval = (TYPE)NEWVAL; \
63*ecae8bc5Sisaki expval = (TYPE)NEWVAL; \
64*ecae8bc5Sisaki expres = (TYPE)OLDVAL; \
65*ecae8bc5Sisaki res = NAME(&val, oldval, newval); \
66*ecae8bc5Sisaki ATF_REQUIRE_MSG(val == expval, \
67*ecae8bc5Sisaki "successful case: val expects " FMT " but " FMT, expval, val); \
68*ecae8bc5Sisaki ATF_REQUIRE_MSG(res == expres, \
69*ecae8bc5Sisaki "successful case: res expects " FMT " but " FMT, expres, res); \
70*ecae8bc5Sisaki /* If failure */ \
71*ecae8bc5Sisaki val = (TYPE)OLDVAL; \
72*ecae8bc5Sisaki oldval = (TYPE)(OLDVAL + 1); \
73*ecae8bc5Sisaki newval = (TYPE)NEWVAL; \
74*ecae8bc5Sisaki expval = (TYPE)OLDVAL; \
75*ecae8bc5Sisaki expres = (TYPE)OLDVAL; \
76*ecae8bc5Sisaki res = NAME(&val, oldval, newval); \
77*ecae8bc5Sisaki ATF_REQUIRE_MSG(val == expval, \
78*ecae8bc5Sisaki "failure case: val expects " FMT " but " FMT, expval, val); \
79*ecae8bc5Sisaki ATF_REQUIRE_MSG(res == expres, \
80*ecae8bc5Sisaki "failure case: res expects " FMT " but " FMT, expres, res); \
81*ecae8bc5Sisaki }
82*ecae8bc5Sisaki
83*ecae8bc5Sisaki atf_cas(atomic_cas_32, uint32_t, "0x%" PRIx32);
84*ecae8bc5Sisaki atf_cas(atomic_cas_uint, unsigned int, "0x%x");
85*ecae8bc5Sisaki atf_cas(atomic_cas_ulong, unsigned long, "0x%lx");
86*ecae8bc5Sisaki atf_cas(atomic_cas_ptr, void *, "%p");
87*ecae8bc5Sisaki #if defined(__HAVE_ATOMIC64_OPS)
88*ecae8bc5Sisaki atf_cas(atomic_cas_64, uint64_t, "0x%" PRIx64);
89*ecae8bc5Sisaki #endif
90*ecae8bc5Sisaki
91*ecae8bc5Sisaki atf_cas(atomic_cas_32_ni, uint32_t, "0x%" PRIx32);
92*ecae8bc5Sisaki atf_cas(atomic_cas_uint_ni, unsigned int, "0x%x");
93*ecae8bc5Sisaki atf_cas(atomic_cas_ulong_ni, unsigned long, "0x%lx");
94*ecae8bc5Sisaki atf_cas(atomic_cas_ptr_ni, void *, "%p");
95*ecae8bc5Sisaki #if defined(__HAVE_ATOMIC64_OPS)
96*ecae8bc5Sisaki atf_cas(atomic_cas_64_ni, uint64_t, "0x%" PRIx64);
97*ecae8bc5Sisaki #endif
98*ecae8bc5Sisaki
ATF_TP_ADD_TCS(tp)99*ecae8bc5Sisaki ATF_TP_ADD_TCS(tp)
100*ecae8bc5Sisaki {
101*ecae8bc5Sisaki ATF_TP_ADD_TC(tp, atomic_cas_32);
102*ecae8bc5Sisaki ATF_TP_ADD_TC(tp, atomic_cas_uint);
103*ecae8bc5Sisaki ATF_TP_ADD_TC(tp, atomic_cas_ulong);
104*ecae8bc5Sisaki ATF_TP_ADD_TC(tp, atomic_cas_ptr);
105*ecae8bc5Sisaki #if defined(__HAVE_ATOMIC64_OPS)
106*ecae8bc5Sisaki ATF_TP_ADD_TC(tp, atomic_cas_64);
107*ecae8bc5Sisaki #endif
108*ecae8bc5Sisaki
109*ecae8bc5Sisaki ATF_TP_ADD_TC(tp, atomic_cas_32_ni);
110*ecae8bc5Sisaki ATF_TP_ADD_TC(tp, atomic_cas_uint_ni);
111*ecae8bc5Sisaki ATF_TP_ADD_TC(tp, atomic_cas_ulong_ni);
112*ecae8bc5Sisaki ATF_TP_ADD_TC(tp, atomic_cas_ptr_ni);
113*ecae8bc5Sisaki #if defined(__HAVE_ATOMIC64_OPS)
114*ecae8bc5Sisaki ATF_TP_ADD_TC(tp, atomic_cas_64_ni);
115*ecae8bc5Sisaki #endif
116*ecae8bc5Sisaki
117*ecae8bc5Sisaki return atf_no_error();
118*ecae8bc5Sisaki }
119