Home | History | Annotate | Download | only in fcntl
      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 
    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  ***************************************************************/
    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  ***************************************************************/
    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