1*11be35a1SLionel Sambuc /* $NetBSD: t_alarm.c,v 1.2 2011/05/10 06:58:17 jruoho Exp $ */
2*11be35a1SLionel Sambuc
3*11be35a1SLionel Sambuc /*-
4*11be35a1SLionel Sambuc * Copyright (c) 2011 The NetBSD Foundation, Inc.
5*11be35a1SLionel Sambuc * All rights reserved.
6*11be35a1SLionel Sambuc *
7*11be35a1SLionel Sambuc * This code is derived from software contributed to The NetBSD Foundation
8*11be35a1SLionel Sambuc * by Jukka Ruohonen.
9*11be35a1SLionel Sambuc *
10*11be35a1SLionel Sambuc * Redistribution and use in source and binary forms, with or without
11*11be35a1SLionel Sambuc * modification, are permitted provided that the following conditions
12*11be35a1SLionel Sambuc * are met:
13*11be35a1SLionel Sambuc * 1. Redistributions of source code must retain the above copyright
14*11be35a1SLionel Sambuc * notice, this list of conditions and the following disclaimer.
15*11be35a1SLionel Sambuc * 2. Redistributions in binary form must reproduce the above copyright
16*11be35a1SLionel Sambuc * notice, this list of conditions and the following disclaimer in the
17*11be35a1SLionel Sambuc * documentation and/or other materials provided with the distribution.
18*11be35a1SLionel Sambuc *
19*11be35a1SLionel Sambuc * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20*11be35a1SLionel Sambuc * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21*11be35a1SLionel Sambuc * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22*11be35a1SLionel Sambuc * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23*11be35a1SLionel Sambuc * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24*11be35a1SLionel Sambuc * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25*11be35a1SLionel Sambuc * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26*11be35a1SLionel Sambuc * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27*11be35a1SLionel Sambuc * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28*11be35a1SLionel Sambuc * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29*11be35a1SLionel Sambuc * POSSIBILITY OF SUCH DAMAGE.
30*11be35a1SLionel Sambuc */
31*11be35a1SLionel Sambuc #include <sys/cdefs.h>
32*11be35a1SLionel Sambuc __RCSID("$NetBSD: t_alarm.c,v 1.2 2011/05/10 06:58:17 jruoho Exp $");
33*11be35a1SLionel Sambuc
34*11be35a1SLionel Sambuc #include <sys/wait.h>
35*11be35a1SLionel Sambuc
36*11be35a1SLionel Sambuc #include <atf-c.h>
37*11be35a1SLionel Sambuc #include <stdlib.h>
38*11be35a1SLionel Sambuc #include <signal.h>
39*11be35a1SLionel Sambuc #include <unistd.h>
40*11be35a1SLionel Sambuc
41*11be35a1SLionel Sambuc static bool fail;
42*11be35a1SLionel Sambuc static void handler(int);
43*11be35a1SLionel Sambuc
44*11be35a1SLionel Sambuc static void
handler(int signo)45*11be35a1SLionel Sambuc handler(int signo)
46*11be35a1SLionel Sambuc {
47*11be35a1SLionel Sambuc
48*11be35a1SLionel Sambuc if (signo == SIGALRM)
49*11be35a1SLionel Sambuc fail = false;
50*11be35a1SLionel Sambuc }
51*11be35a1SLionel Sambuc
52*11be35a1SLionel Sambuc ATF_TC(alarm_basic);
ATF_TC_HEAD(alarm_basic,tc)53*11be35a1SLionel Sambuc ATF_TC_HEAD(alarm_basic, tc)
54*11be35a1SLionel Sambuc {
55*11be35a1SLionel Sambuc atf_tc_set_md_var(tc, "descr", "A basic test of alarm(3)");
56*11be35a1SLionel Sambuc }
57*11be35a1SLionel Sambuc
ATF_TC_BODY(alarm_basic,tc)58*11be35a1SLionel Sambuc ATF_TC_BODY(alarm_basic, tc)
59*11be35a1SLionel Sambuc {
60*11be35a1SLionel Sambuc
61*11be35a1SLionel Sambuc ATF_REQUIRE(signal(SIGALRM, handler) == 0);
62*11be35a1SLionel Sambuc
63*11be35a1SLionel Sambuc fail = true;
64*11be35a1SLionel Sambuc
65*11be35a1SLionel Sambuc (void)alarm(1);
66*11be35a1SLionel Sambuc (void)sleep(2);
67*11be35a1SLionel Sambuc
68*11be35a1SLionel Sambuc if (fail != false)
69*11be35a1SLionel Sambuc atf_tc_fail("alarm(3) failed to deliver signal");
70*11be35a1SLionel Sambuc }
71*11be35a1SLionel Sambuc
72*11be35a1SLionel Sambuc ATF_TC(alarm_fork);
ATF_TC_HEAD(alarm_fork,tc)73*11be35a1SLionel Sambuc ATF_TC_HEAD(alarm_fork, tc)
74*11be35a1SLionel Sambuc {
75*11be35a1SLionel Sambuc atf_tc_set_md_var(tc, "descr", "Does fork(2) clear a pending alarm?");
76*11be35a1SLionel Sambuc }
77*11be35a1SLionel Sambuc
ATF_TC_BODY(alarm_fork,tc)78*11be35a1SLionel Sambuc ATF_TC_BODY(alarm_fork, tc)
79*11be35a1SLionel Sambuc {
80*11be35a1SLionel Sambuc unsigned int rv;
81*11be35a1SLionel Sambuc pid_t pid;
82*11be35a1SLionel Sambuc int sta;
83*11be35a1SLionel Sambuc
84*11be35a1SLionel Sambuc /*
85*11be35a1SLionel Sambuc * Any pending alarms should be
86*11be35a1SLionel Sambuc * cleared in the child process.
87*11be35a1SLionel Sambuc */
88*11be35a1SLionel Sambuc (void)alarm(60);
89*11be35a1SLionel Sambuc
90*11be35a1SLionel Sambuc pid = fork();
91*11be35a1SLionel Sambuc ATF_REQUIRE(pid >= 0);
92*11be35a1SLionel Sambuc
93*11be35a1SLionel Sambuc if (pid == 0) {
94*11be35a1SLionel Sambuc
95*11be35a1SLionel Sambuc rv = alarm(0);
96*11be35a1SLionel Sambuc
97*11be35a1SLionel Sambuc if (rv != 0)
98*11be35a1SLionel Sambuc _exit(EXIT_FAILURE);
99*11be35a1SLionel Sambuc
100*11be35a1SLionel Sambuc _exit(EXIT_SUCCESS);
101*11be35a1SLionel Sambuc }
102*11be35a1SLionel Sambuc
103*11be35a1SLionel Sambuc (void)alarm(0);
104*11be35a1SLionel Sambuc (void)wait(&sta);
105*11be35a1SLionel Sambuc
106*11be35a1SLionel Sambuc if (WIFEXITED(sta) == 0 || WEXITSTATUS(sta) != EXIT_SUCCESS)
107*11be35a1SLionel Sambuc atf_tc_fail("pending alarm was not cleared for child");
108*11be35a1SLionel Sambuc }
109*11be35a1SLionel Sambuc
110*11be35a1SLionel Sambuc ATF_TC(alarm_previous);
ATF_TC_HEAD(alarm_previous,tc)111*11be35a1SLionel Sambuc ATF_TC_HEAD(alarm_previous, tc)
112*11be35a1SLionel Sambuc {
113*11be35a1SLionel Sambuc atf_tc_set_md_var(tc, "descr", "Test return value from alarm(3)");
114*11be35a1SLionel Sambuc }
115*11be35a1SLionel Sambuc
ATF_TC_BODY(alarm_previous,tc)116*11be35a1SLionel Sambuc ATF_TC_BODY(alarm_previous, tc)
117*11be35a1SLionel Sambuc {
118*11be35a1SLionel Sambuc unsigned int rv;
119*11be35a1SLionel Sambuc
120*11be35a1SLionel Sambuc /*
121*11be35a1SLionel Sambuc * See that alarm(3) returns the amount
122*11be35a1SLionel Sambuc * left on the timer from the previous call.
123*11be35a1SLionel Sambuc */
124*11be35a1SLionel Sambuc rv = alarm(60);
125*11be35a1SLionel Sambuc
126*11be35a1SLionel Sambuc if (rv != 0)
127*11be35a1SLionel Sambuc goto fail;
128*11be35a1SLionel Sambuc
129*11be35a1SLionel Sambuc rv = alarm(0);
130*11be35a1SLionel Sambuc
131*11be35a1SLionel Sambuc if (rv < 50)
132*11be35a1SLionel Sambuc goto fail;
133*11be35a1SLionel Sambuc
134*11be35a1SLionel Sambuc (void)alarm(0);
135*11be35a1SLionel Sambuc
136*11be35a1SLionel Sambuc return;
137*11be35a1SLionel Sambuc
138*11be35a1SLionel Sambuc fail:
139*11be35a1SLionel Sambuc atf_tc_fail("invalid return value from alarm(3)");
140*11be35a1SLionel Sambuc }
141*11be35a1SLionel Sambuc
ATF_TP_ADD_TCS(tp)142*11be35a1SLionel Sambuc ATF_TP_ADD_TCS(tp)
143*11be35a1SLionel Sambuc {
144*11be35a1SLionel Sambuc
145*11be35a1SLionel Sambuc ATF_TP_ADD_TC(tp, alarm_basic);
146*11be35a1SLionel Sambuc ATF_TP_ADD_TC(tp, alarm_fork);
147*11be35a1SLionel Sambuc ATF_TP_ADD_TC(tp, alarm_previous);
148*11be35a1SLionel Sambuc
149*11be35a1SLionel Sambuc return atf_no_error();
150*11be35a1SLionel Sambuc }
151