1 /*
2 * Copyright (c) 2000 Silicon Graphics, Inc. All Rights Reserved.
3 *
4 * This program is free software; you can redistribute it and/or modify it
5 * under the terms of version 2 of the GNU General Public License as
6 * published by the Free Software Foundation.
7 *
8 * This program is distributed in the hope that it would be useful, but
9 * WITHOUT ANY WARRANTY; without even the implied warranty of
10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
11 *
12 * Further, this software is distributed without any warranty that it is
13 * free of the rightful claim of any third person regarding infringement
14 * or the like. Any license provided herein, whether implied or
15 * otherwise, applies only to this software file. Patent licenses, if
16 * any, provided herein do not apply to combinations of this program with
17 * other software, or any other product whatsoever.
18 *
19 * You should have received a copy of the GNU General Public License along
20 * with this program; if not, write the Free Software Foundation, Inc.,
21 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
22 *
23 * Contact information: Silicon Graphics, Inc., 1600 Amphitheatre Pkwy,
24 * Mountain View, CA 94043, or:
25 *
26 * http://www.sgi.com
27 *
28 * For further information regarding this notice, see:
29 *
30 * http://oss.sgi.com/projects/GenInfo/NoticeExplan/
31 *
32 */
33 /* $Id: fcntl09.c,v 1.8 2009/10/26 14:55:46 subrata_modak Exp $ */
34 /**********************************************************
35 *
36 * OS Test - Silicon Graphics, Inc.
37 *
38 * TEST IDENTIFIER : fcntl09
39 *
40 * EXECUTED BY : anyone
41 *
42 * TEST TITLE : Basic test for fcntl(2) using F_SETLK argument.
43 *
44 * PARENT DOCUMENT : usctpl01
45 *
46 * TEST CASE TOTAL : 2
47 *
48 * WALL CLOCK TIME : 1
49 *
50 * CPU TYPES : ALL
51 *
52 * AUTHOR : William Roske
53 *
54 * CO-PILOT : Dave Fenner
55 *
56 * DATE STARTED : 03/30/92
57 *
58 * INITIAL RELEASE : UNICOS 7.0
59 *
60 * TEST CASES
61 *
62 * 1.) fcntl(2) returns...(See Description)
63 *
64 * INPUT SPECIFICATIONS
65 * The standard options for system call tests are accepted.
66 * (See the parse_opts(3) man page).
67 *
68 * OUTPUT SPECIFICATIONS
69 *
70 * DURATION
71 * Terminates - with frequency and infinite modes.
72 *
73 * SIGNALS
74 * Uses SIGUSR1 to pause before test if option set.
75 * (See the parse_opts(3) man page).
76 *
77 * RESOURCES
78 * None
79 *
80 * ENVIRONMENTAL NEEDS
81 * No run-time environmental needs.
82 *
83 * SPECIAL PROCEDURAL REQUIREMENTS
84 * None
85 *
86 * INTERCASE DEPENDENCIES
87 * None
88 *
89 * DETAILED DESCRIPTION
90 * This is a Phase I test for the fcntl(2) system call. It is intended
91 * to provide a limited exposure of the system call, for now. It
92 * should/will be extended when full functional tests are written for
93 * fcntl(2).
94 *
95 * Setup:
96 * Setup signal handling.
97 * Pause for SIGUSR1 if option specified.
98 *
99 * Test:
100 * Loop if the proper options are given.
101 * Execute system call
102 * Check return code, if system call failed (return=-1)
103 * Log the errno and Issue a FAIL message.
104 * Otherwise, Issue a PASS message.
105 *
106 * Cleanup:
107 * Print errno log and/or timing stats if options given
108 *
109 *
110 *#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#**/
111
112 #include <sys/types.h>
113 #include <fcntl.h>
114 #include <unistd.h>
115 #include <sys/stat.h>
116 #include <errno.h>
117 #include <string.h>
118 #include <signal.h>
119 #include "test.h"
120
121 void setup();
122 void cleanup();
123
124 char *TCID = "fcntl09";
125 int TST_TOTAL = 2;
126
127 char fname[255];
128 int fd;
129 struct flock flocks;
130
main(int ac,char ** av)131 int main(int ac, char **av)
132 {
133 int lc;
134
135 /***************************************************************
136 * parse standard options
137 ***************************************************************/
138 tst_parse_opts(ac, av, NULL, NULL);
139
140 /***************************************************************
141 * perform global setup for test
142 ***************************************************************/
143 setup();
144
145 /***************************************************************
146 * check looping state if -c option given
147 ***************************************************************/
148 for (lc = 0; TEST_LOOPING(lc); lc++) {
149 int type;
150 for (type = 0; type < 2; type++) {
151
152 tst_count = 0;
153
154 flocks.l_type = type ? F_RDLCK : F_WRLCK;
155
156 /*
157 * Call fcntl(2) with F_SETLK argument on fname
158 */
159 TEST(fcntl(fd, F_SETLK, &flocks));
160
161 /* check return code */
162 if (TEST_RETURN == -1) {
163 tst_resm(TFAIL,
164 "fcntl(%s, F_SETLK, &flocks) flocks.l_type = %s Failed, errno=%d : %s",
165 fname, type ? "F_RDLCK" : "F_WRLCK",
166 TEST_ERRNO, strerror(TEST_ERRNO));
167 } else {
168
169 tst_resm(TPASS,
170 "fcntl(%s, F_SETLK, &flocks) flocks.l_type = %s returned %ld",
171 fname,
172 type ? "F_RDLCK" : "F_WRLCK",
173 TEST_RETURN);
174 }
175
176 flocks.l_type = F_UNLCK;
177 /*
178 * Call fcntl(2) with F_SETLK argument on fname
179 */
180 TEST(fcntl(fd, F_SETLK, &flocks));
181
182 /* check return code */
183 if (TEST_RETURN == -1) {
184 tst_resm(TFAIL,
185 "fcntl(%s, F_SETLK, &flocks) flocks.l_type = F_UNLCK Failed, errno=%d : %s",
186 fname, TEST_ERRNO,
187 strerror(TEST_ERRNO));
188 } else {
189 tst_resm(TPASS,
190 "fcntl(%s, F_SETLK, &flocks) flocks.l_type = F_UNLCK returned %ld",
191 fname, TEST_RETURN);
192 }
193 }
194
195 }
196
197 cleanup();
198 tst_exit();
199 }
200
201 /***************************************************************
202 * setup() - performs all ONE TIME setup for this test.
203 ***************************************************************/
setup(void)204 void setup(void)
205 {
206
207 tst_sig(NOFORK, DEF_HANDLER, cleanup);
208
209 TEST_PAUSE;
210
211 tst_tmpdir();
212
213 sprintf(fname, "./file_%d", getpid());
214 if ((fd = creat(fname, 0644)) == -1) {
215 tst_brkm(TBROK, cleanup,
216 "creat(%s, 0644) Failed, errno=%d : %s", fname, errno,
217 strerror(errno));
218 } else if (close(fd) == -1) {
219 tst_brkm(TBROK, cleanup, "close(%s) Failed, errno=%d : %s",
220 fname, errno, strerror(errno));
221 } else if ((fd = open(fname, O_RDWR, 0700)) == -1) {
222 tst_brkm(TBROK, cleanup,
223 "open(%s, O_RDWR,0700) Failed, errno=%d : %s", fname,
224 errno, strerror(errno));
225 }
226 flocks.l_whence = 1;
227 flocks.l_start = 0;
228 flocks.l_len = 0;
229 flocks.l_pid = getpid();
230 }
231
232 /***************************************************************
233 * cleanup() - performs all ONE TIME cleanup for this test at
234 * completion or premature exit.
235 ***************************************************************/
cleanup(void)236 void cleanup(void)
237 {
238
239 if (close(fd) == -1) {
240 tst_resm(TWARN, "close(%s) Failed, errno=%d : %s", fname, errno,
241 strerror(errno));
242 } else if (unlink(fname) == -1) {
243 tst_resm(TWARN, "unlink(%s) Failed, errno=%d : %s", fname,
244 errno, strerror(errno));
245
246 }
247
248 tst_rmdir();
249
250 }
251