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: fcntl10.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 : fcntl10
39 *
40 * EXECUTED BY : anyone
41 *
42 * TEST TITLE : Basic test for fcntl(2) using F_SETLKW 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 = "fcntl10";
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_SETLKW flocks.l_type = F_UNLCK argument on fname
158 */
159 TEST(fcntl(fd, F_SETLKW, &flocks));
160
161 /* check return code */
162 if (TEST_RETURN == -1) {
163 tst_resm(TFAIL,
164 "fcntl(%s, F_SETLKW, &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 tst_resm(TPASS,
169 "fcntl(%s, F_SETLKW, &flocks) flocks.l_type = %s returned %ld",
170 fname, type ? "F_RDLCK" : "F_WRLCK",
171 TEST_RETURN);
172 }
173
174 flocks.l_type = F_UNLCK;
175 /*
176 * Call fcntl(2) with F_SETLKW flocks.l_type = F_UNLCK argument on fname
177 */
178 TEST(fcntl(fd, F_SETLKW, &flocks));
179
180 /* check return code */
181 if (TEST_RETURN == -1) {
182 tst_resm(TFAIL,
183 "fcntl(%s, F_SETLKW, &flocks) flocks.l_type = F_UNLCK Failed, errno=%d : %s",
184 fname, TEST_ERRNO,
185 strerror(TEST_ERRNO));
186 } else {
187
188 tst_resm(TPASS,
189 "fcntl(%s, F_SETLKW, &flocks) flocks.l_type = F_UNLCK returned %ld",
190 fname, TEST_RETURN);
191 }
192
193 }
194 }
195
196 cleanup();
197 tst_exit();
198 }
199
200 /***************************************************************
201 * setup() - performs all ONE TIME setup for this test.
202 ***************************************************************/
setup(void)203 void setup(void)
204 {
205
206 tst_sig(NOFORK, DEF_HANDLER, cleanup);
207
208 TEST_PAUSE;
209
210 tst_tmpdir();
211
212 sprintf(fname, "tfile_%d", getpid());
213 if ((fd = creat(fname, 0644)) == -1) {
214 tst_brkm(TBROK, cleanup,
215 "creat(%s, 0644) Failed, errno=%d : %s", fname, errno,
216 strerror(errno));
217 } else if (close(fd) == -1) {
218 tst_brkm(TBROK, cleanup, "close(%s) Failed, errno=%d : %s",
219 fname, errno, strerror(errno));
220 } else if ((fd = open(fname, O_RDWR, 0700)) == -1) {
221 tst_brkm(TBROK, cleanup,
222 "open(%s, O_RDWR,0700) Failed, errno=%d : %s", fname,
223 errno, strerror(errno));
224 }
225
226 /* set needed fields in the flocks structure */
227 flocks.l_whence = 1;
228 flocks.l_start = 0;
229 flocks.l_len = 0;
230 flocks.l_pid = getpid();
231 }
232
233 /***************************************************************
234 * cleanup() - performs all ONE TIME cleanup for this test at
235 * completion or premature exit.
236 ***************************************************************/
cleanup(void)237 void cleanup(void)
238 {
239
240 if (close(fd) == -1) {
241 tst_resm(TWARN, "close(%s) Failed, errno=%d : %s", fname, errno,
242 strerror(errno));
243 } else if (unlink(fname) == -1) {
244 tst_resm(TWARN, "unlink(%s) Failed, errno=%d : %s", fname,
245 errno, strerror(errno));
246 }
247
248 tst_rmdir();
249
250 }
251