testcases/kernel/syscalls/fcntl/fcntl26.c - platform/external/ltp - Gitiles

 /*
  *
  *   Copyright (C) Bull S.A. 2005
  *   Copyright (c) International Business Machines  Corp., 2005
  *
  *   This program is free software;  you can redistribute it and/or modify
  *   it under the terms of the GNU General Public License as published by
  *   the Free Software Foundation; either version 2 of the License, or
  *   (at your option) any later version.
  *
  *   This program is distributed in the hope that it will be useful,
  *   but WITHOUT ANY WARRANTY;  without even the implied warranty of
  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
  *   the GNU General Public License for more details.
  *
  *   You should have received a copy of the GNU General Public License
  *   along with this program;  if not, write to the Free Software
  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  */

 /**********************************************************
  *
  *    TEST IDENTIFIER		 : fcntl26
  *
  *    EXECUTED BY		 : anyone
  *
  *    TEST TITLE		 : Basic test for fcntl(2) using F_SETLEASE & F_WRLCK argument.
  *
  *    TEST CASE TOTAL		 : 1
  *
  *    WALL CLOCK TIME		 : 1
  *
  *    CPU TYPES				 : ALL
  *
  *    AUTHOR				 : Jacky Malcles
  *
  *    TEST CASES
  *
  *		 1.) fcntl(2) returns...(See Description)
  *
  *    INPUT SPECIFICATIONS
  *		 The standard options for system call tests are accepted.
  *		 (See the parse_opts(3) man page).
  *
  *    OUTPUT SPECIFICATIONS
  *
  *    DURATION
  *		 Terminates - with frequency and infinite modes.
  *
  *    SIGNALS
  *		 Uses SIGUSR1 to pause before test if option set.
  *		 (See the parse_opts(3) man page).
  *
  *    RESOURCES
  *		 None
  *
  *    ENVIRONMENTAL NEEDS
  *      No run-time environmental needs.
  *
  *    SPECIAL PROCEDURAL REQUIREMENTS
  *		 None
  *
  *    INTERCASE DEPENDENCIES
  *		 None
  *
  *    DETAILED DESCRIPTION
  *		 This is a Phase I test for the fcntl(2) system call.  It is intended
  *		 to provide a limited exposure of the system call, for now.  It
  *		 should/will be extended when full functional tests are written for
  *		 fcntl(2).
  *
  *		 Setup:
  *		   Setup signal handling.
  *		   Pause for SIGUSR1 if option specified.
  *
  *		 Test:
  *		  Loop if the proper options are given.
  *		   Execute system call
  *		   Check return code, if system call failed (return=-1)
  *				 Log the errno and Issue a FAIL message.
  *		   Otherwise, Issue a PASS message.
  *
  *		 Cleanup:
  *		   Print errno log and/or timing stats if options given
  *
  *
  *#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#**/

 #include <sys/types.h>
 #include <sys/stat.h>
 #include <fcntl.h>
 #include <unistd.h>
 #include <errno.h>
 #include <string.h>
 #include <signal.h>
 #include "test.h"
 #include "usctest.h"

 void setup();
 void cleanup();

 char *TCID = "fcntl26";		/* Test program identifier.    */
 int TST_TOTAL = 1;		/* Total number of test cases. */
 extern int Tst_count;		/* Test Case counter for tst_* routines */

 int exp_enos[] = { 0, 0 };

 char fname[255];
 int fd;

 int main(int ac, char **av)
 {
 	int lc;			/* loop counter */
 	char *msg;		/* message returned from parse_opts */

     /***************************************************************
      * parse standard options
      ***************************************************************/
 	if ((msg = parse_opts(ac, av, NULL, NULL)) != NULL)
 		tst_brkm(TBROK, NULL, "OPTION PARSING ERROR - %s", msg);

     /***************************************************************
      * perform global setup for test
      ***************************************************************/
 	setup();

 	/*
 	 * check if the current filesystem is nfs
 	 */
 	if (tst_is_cwd_nfs()) {
 		tst_brkm(TCONF, cleanup,
 			 "Cannot do fcntl on a file located on an NFS filesystem");
 	}

 	/*
 	 * check if the current filesystem is tmpfs
 	 */
 	if (tst_is_cwd_tmpfs()) {
 		tst_brkm(TCONF, cleanup,
 			 "Cannot do fcntl on a file located on an TMPFS filesystem");
 	}

 	/*
 	 * check if the current filesystem is ramfs
 	 */
 	if (tst_is_cwd_ramfs()) {
 		tst_brkm(TCONF, cleanup,
 			 "Cannot do fcntl on a file located on an RAMFS filesystem");
 	}

 	/* set the expected errnos... */
 	TEST_EXP_ENOS(exp_enos);

     /***************************************************************
      * check looping state if -c option given
      ***************************************************************/
 	for (lc = 0; TEST_LOOPING(lc); lc++) {

 		/* reset Tst_count in case we are looping. */
 		Tst_count = 0;

 #ifdef F_SETLEASE
 		/*
 		 * Call fcntl(2) with F_SETLEASE & F_WRLCK argument on fname
 		 */
 		TEST(fcntl(fd, F_SETLEASE, F_WRLCK));

 		/* check return code */
 		if (TEST_RETURN == -1) {
 			TEST_ERROR_LOG(TEST_ERRNO);
 			tst_resm(TFAIL,
 				 "fcntl(%s, F_SETLEASE, F_WRLCK) Failed, errno=%d : %s",
 				 fname, TEST_ERRNO, strerror(TEST_ERRNO));
 		} else {
 			if (STD_FUNCTIONAL_TEST) {
 				TEST(fcntl(fd, F_GETLEASE));
 				if (TEST_RETURN != F_WRLCK)
 					tst_resm(TFAIL,
 						 "fcntl(%s, F_GETLEASE) did not return F_WRLCK, returned %ld",
 						 fname, TEST_RETURN);
 				else {
 					TEST(fcntl(fd, F_SETLEASE, F_UNLCK));
 					if (TEST_RETURN != 0)
 						tst_resm(TFAIL,
 							 "fcntl(%s, F_SETLEASE, F_UNLCK) did not return 0, returned %ld",
 							 fname, TEST_RETURN);
 					else
 						tst_resm(TPASS,
 							 "fcntl(%s, F_SETLEASE, F_WRLCK)",
 							 fname);
 				}
 			}
 		}
 #else
 		tst_resm(TINFO, "F_SETLEASE not defined, skipping test");
 #endif
 	}			/* End for TEST_LOOPING */

     /***************************************************************
      * cleanup and exit
      ***************************************************************/
 	cleanup();

 	return 0;
 }				/* End main */

 /***************************************************************
  * setup() - performs all ONE TIME setup for this test.
  ***************************************************************/
 void setup()
 {
 	/* capture signals */
 	tst_sig(NOFORK, DEF_HANDLER, cleanup);

 	/* Pause if that option was specified */
 	TEST_PAUSE;

 	/* make a temp directory and cd to it */
 	tst_tmpdir();

 	sprintf(fname, "tfile_%d", getpid());
 	if ((fd = open(fname, O_WRONLY | O_CREAT, 0777)) == -1) {
 		tst_brkm(TBROK, cleanup,
 			 "open(%s, O_WRONLY|O_CREAT,0777) Failed, errno=%d : %s",
 			 fname, errno, strerror(errno));
 	}
 }				/* End setup() */

 /***************************************************************
  * cleanup() - performs all ONE TIME cleanup for this test at
  *				 completion or premature exit.
  ***************************************************************/
 void cleanup()
 {
 	/*
 	 * print timing stats if that option was specified.
 	 * print errno log if that option was specified.
 	 */
 	TEST_CLEANUP;

 	/* close the file we've had open */
 	if (close(fd) == -1) {
 		tst_resm(TWARN, "close(%s) Failed, errno=%d : %s", fname, errno,
 			 strerror(errno));
 	}

 	/* Remove tmp dir and all files in it */
 	tst_rmdir();

 	/* exit with return code appropriate for results */
 	tst_exit();
 }				/* End cleanup() */
	/*
	*
	* Copyright (C) Bull S.A. 2005
	* Copyright (c) International Business Machines Corp., 2005
	*
	* This program is free software; you can redistribute it and/or modify
	* it under the terms of the GNU General Public License as published by
	* the Free Software Foundation; either version 2 of the License, or
	* (at your option) any later version.
	*
	* This program is distributed in the hope that it will be useful,
	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See
	* the GNU General Public License for more details.
	*
	* You should have received a copy of the GNU General Public License
	* along with this program; if not, write to the Free Software
	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	*/

	/**********************************************************
	*
	* TEST IDENTIFIER : fcntl26
	*
	* EXECUTED BY : anyone
	*
	* TEST TITLE : Basic test for fcntl(2) using F_SETLEASE & F_WRLCK argument.
	*
	* TEST CASE TOTAL : 1
	*
	* WALL CLOCK TIME : 1
	*
	* CPU TYPES : ALL
	*
	* AUTHOR : Jacky Malcles
	*
	* TEST CASES
	*
	* 1.) fcntl(2) returns...(See Description)
	*
	* INPUT SPECIFICATIONS
	* The standard options for system call tests are accepted.
	* (See the parse_opts(3) man page).
	*
	* OUTPUT SPECIFICATIONS
	*
	* DURATION
	* Terminates - with frequency and infinite modes.
	*
	* SIGNALS
	* Uses SIGUSR1 to pause before test if option set.
	* (See the parse_opts(3) man page).
	*
	* RESOURCES
	* None
	*
	* ENVIRONMENTAL NEEDS
	* No run-time environmental needs.
	*
	* SPECIAL PROCEDURAL REQUIREMENTS
	* None
	*
	* INTERCASE DEPENDENCIES
	* None
	*
	* DETAILED DESCRIPTION
	* This is a Phase I test for the fcntl(2) system call. It is intended
	* to provide a limited exposure of the system call, for now. It
	* should/will be extended when full functional tests are written for
	* fcntl(2).
	*
	* Setup:
	* Setup signal handling.
	* Pause for SIGUSR1 if option specified.
	*
	* Test:
	* Loop if the proper options are given.
	* Execute system call
	* Check return code, if system call failed (return=-1)
	* Log the errno and Issue a FAIL message.
	* Otherwise, Issue a PASS message.
	*
	* Cleanup:
	* Print errno log and/or timing stats if options given
	*
	*
	#############################*/

	#include <sys/types.h>
	#include <sys/stat.h>
	#include <fcntl.h>
	#include <unistd.h>
	#include <errno.h>
	#include <string.h>
	#include <signal.h>
	#include "test.h"
	#include "usctest.h"

	void setup();
	void cleanup();

	char TCID = "fcntl26"; / Test program identifier. */
	int TST_TOTAL = 1; /* Total number of test cases. */
	extern int Tst_count; /* Test Case counter for tst_* routines */

	int exp_enos[] = { 0, 0 };

	char fname[255];
	int fd;

	int main(int ac, char **av)
	{
	int lc; /* loop counter */
	char msg; / message returned from parse_opts */

	/***************************************************************
	* parse standard options
	***************************************************************/
	if ((msg = parse_opts(ac, av, NULL, NULL)) != NULL)
	tst_brkm(TBROK, NULL, "OPTION PARSING ERROR - %s", msg);

	/***************************************************************
	* perform global setup for test
	***************************************************************/
	setup();

	/*
	* check if the current filesystem is nfs
	*/
	if (tst_is_cwd_nfs()) {
	tst_brkm(TCONF, cleanup,
	"Cannot do fcntl on a file located on an NFS filesystem");
	}

	/*
	* check if the current filesystem is tmpfs
	*/
	if (tst_is_cwd_tmpfs()) {
	tst_brkm(TCONF, cleanup,
	"Cannot do fcntl on a file located on an TMPFS filesystem");
	}

	/*
	* check if the current filesystem is ramfs
	*/
	if (tst_is_cwd_ramfs()) {
	tst_brkm(TCONF, cleanup,
	"Cannot do fcntl on a file located on an RAMFS filesystem");
	}

	/* set the expected errnos... */
	TEST_EXP_ENOS(exp_enos);

	/***************************************************************
	* check looping state if -c option given
	***************************************************************/
	for (lc = 0; TEST_LOOPING(lc); lc++) {

	/* reset Tst_count in case we are looping. */
	Tst_count = 0;

	#ifdef F_SETLEASE
	/*
	* Call fcntl(2) with F_SETLEASE & F_WRLCK argument on fname
	*/
	TEST(fcntl(fd, F_SETLEASE, F_WRLCK));

	/* check return code */
	if (TEST_RETURN == -1) {
	TEST_ERROR_LOG(TEST_ERRNO);
	tst_resm(TFAIL,
	"fcntl(%s, F_SETLEASE, F_WRLCK) Failed, errno=%d : %s",
	fname, TEST_ERRNO, strerror(TEST_ERRNO));
	} else {
	if (STD_FUNCTIONAL_TEST) {
	TEST(fcntl(fd, F_GETLEASE));
	if (TEST_RETURN != F_WRLCK)
	tst_resm(TFAIL,
	"fcntl(%s, F_GETLEASE) did not return F_WRLCK, returned %ld",
	fname, TEST_RETURN);
	else {
	TEST(fcntl(fd, F_SETLEASE, F_UNLCK));
	if (TEST_RETURN != 0)
	tst_resm(TFAIL,
	"fcntl(%s, F_SETLEASE, F_UNLCK) did not return 0, returned %ld",
	fname, TEST_RETURN);
	else
	tst_resm(TPASS,
	"fcntl(%s, F_SETLEASE, F_WRLCK)",
	fname);
	}
	}
	}
	#else
	tst_resm(TINFO, "F_SETLEASE not defined, skipping test");
	#endif
	} /* End for TEST_LOOPING */

	/***************************************************************
	* cleanup and exit
	***************************************************************/
	cleanup();

	return 0;
	} /* End main */

	/***************************************************************
	* setup() - performs all ONE TIME setup for this test.
	***************************************************************/
	void setup()
	{
	/* capture signals */
	tst_sig(NOFORK, DEF_HANDLER, cleanup);

	/* Pause if that option was specified */
	TEST_PAUSE;

	/* make a temp directory and cd to it */
	tst_tmpdir();

	sprintf(fname, "tfile_%d", getpid());
	if ((fd = open(fname, O_WRONLY \| O_CREAT, 0777)) == -1) {
	tst_brkm(TBROK, cleanup,
	"open(%s, O_WRONLY\|O_CREAT,0777) Failed, errno=%d : %s",
	fname, errno, strerror(errno));
	}
	} /* End setup() */

	/***************************************************************
	* cleanup() - performs all ONE TIME cleanup for this test at
	* completion or premature exit.
	***************************************************************/
	void cleanup()
	{
	/*
	* print timing stats if that option was specified.
	* print errno log if that option was specified.
	*/
	TEST_CLEANUP;

	/* close the file we've had open */
	if (close(fd) == -1) {
	tst_resm(TWARN, "close(%s) Failed, errno=%d : %s", fname, errno,
	strerror(errno));
	}

	/* Remove tmp dir and all files in it */
	tst_rmdir();

	/* exit with return code appropriate for results */
	tst_exit();
	} /* End cleanup() */