[Ltp-cvs] ltp/testcases/kernel/syscalls/swapon Makefile,NONE,1.1 swapon02.c,NONE,1.1

[<ro...@us...>]

Update of /cvsroot/ltp/ltp/testcases/kernel/syscalls/swapon
In directory sc8-pr-cvs1:/tmp/cvs-serv10007/testcases/kernel/syscalls/swapon

Added Files:
	Makefile swapon02.c 
Log Message:
Added swapon() test created by Aniruddha Marathe.


--- NEW FILE: Makefile ---
#
#  Copyright (c) International Business Machines  Corp., 2001
#
#  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
#

###########################################################################
# name of file	: Makefile						  #
###########################################################################
CFLAGS+=	-I../../../../include -O -g -Wall
LOADLIBES+=	-L../../../../lib -lltp 

SRCS=$(wildcard *.c)
TARGETS=$(patsubst %.c,%,$(SRCS))

all: $(TARGETS)

install:
	@for i in $(TARGETS); do ln -f $$i ../../../bin/$$i ; done

clean:
	rm -f $(TARGETS)



--- NEW FILE: swapon02.c ---
/*
 * Copyright (c) Wipro Technologies Ltd, 2002.  All Rights Reserved.
 *
 * This program is free software; you can redistribute it and/or modify it
 * under the terms of version 2 of the GNU General Public License as
 * published by the Free Software Foundation.
 *
 * This program is distributed in the hope that it would be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 *
 * You should have received a copy of the GNU General Public License along
 * with this program; if not, write the Free Software Foundation, Inc., 59
 * Temple Place - Suite 330, Boston MA 02111-1307, USA.
 *
 */
/**************************************************************************
 * 
 *    TEST IDENTIFIER	: swapon02
 *
 * 
 *    EXECUTED BY	: root / superuser
 * 
 *    TEST TITLE	: Test checking for basic error conditions
 *    				 for swapon(2)
 * 
 *    TEST CASE TOTAL	: 4 
 * 
 *    AUTHOR		: Aniruddha Marathe <ani...@wi...>
 * 
 *    SIGNALS
 * 	Uses SIGUSR1 to pause before test if option set.
 * 	(See the parse_opts(3) man page).
 *
 *    DESCRIPTION
 *	This test case checks whether swapon(2) system call  returns 
 *	1. ENOENT when the path exists but is invalid
 *	2. EINVAL when the path does not exist
 *	3. EPERM when there more than MAX_SWAPFILES are already in use.
 *	4. EPERM when user is not a superuser
 *	 
 * 	Setup:
 *	  Setup signal handling.
 *	  Pause for SIGUSR1 if option specified.
 * 	 1. For checking condition 3, make MAX_SWAPFILES  swapfiles
 *	 2. For testing error on invalid user, change the effective uid
 * 	 	
 * 	Test:
 *	  Loop if the proper options are given.
 *	  Execute system call.
 *	  Check return code, if system call fails with errno == expected errno
 *		Issue syscall passed with expected errno
 *	  Otherwise, 
 *	  Issue syscall failed to produce expected errno
 * 
 * 	Cleanup:
 * 	  Do cleanup for the test.
 * 	   
 * USAGE:  <for command-line>
 *  swapon02 [-e] [-i n] [-I x] [-p x] [-t] [-h] [-f] [-p]
 *  where 
 *	-e   : Turn on errno logging.
 *	-i n : Execute test n times.
 *	-I x : Execute test for x seconds.
 *	-p   : Pause for SIGUSR1 before starting
 *	-P x : Pause for x seconds between iterations.
 *	-t   : Turn on syscall timing.
 *		
 *RESTRICTIONS:
 *Incompatible with kernel versions below 2.1.35.
 *Incompatible if MAX_SWAPFILES definition in later kernels is changed
 * -c option can't be used.
 *
 *CHANGES:
 *  01/02/03  Added code to handle SIGSEGV generated when the intentional EPERM error 
 *            for hitting MAX_SWAPFILES is hit. -Robbie Williamson <ro...@us...>
 *****************************************************************************/

#include <unistd.h>
#include <errno.h>
#include <stdlib.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <sys/stat.h>
#include <sys/swap.h>
#include <asm/page.h>
#include <linux/swap.h>
#include <fcntl.h>
#include <pwd.h>
#include <string.h>
#include <signal.h>
#include "test.h"
#include "usctest.h"

/* The value below should be defined in /linux/swap.h.  However, if using glibc 2.2.5, you should remove 
 * the include of /linux/swap.h and use the definition instead...due to compile problems with 2.2.5.
 *
 * Kernel > 2.4.6
 *#define MAX_SWAPFILES 32 
 *
 * Kernel < 2.4.6
 *#define MAX_SWAPFILES 8 
*/

static void setup();
static void cleanup();
static int setup01();
static int cleanup01();
static int setup02();
static int cleanup02();
static int setup03();
static int cleanup03();
int set_handler(int, int);
void handler(int);

char *TCID = "swapon02";	/* Test program identifier.    */
int TST_TOTAL = 4;		/* Total number of test cases. */
extern int Tst_count;		/* Test Case counter for tst_* routines */
char nobody_uid[] = "nobody";
struct passwd *ltpuser;
static int swapfile;		/* Number of swapfiles turned on*/

static char *path[] = {"./abcd", "/dev/mouse",
			"./swapfilenext", "./swapfile01"};

static int exp_enos[] = {EPERM, EINVAL, ENOENT, 0};

static struct test_case_t {
	char *err_desc;		/* error description */
	int  exp_errno;		/* expected error number*/
	char *exp_errval;	/* Expected errorvalue string*/
	int (*setupfunc)();	/* Test setup function */
	int (*cleanfunc)();	/* Test cleanup function */
} testcase[] = {
	{"path does not exist", ENOENT, "ENOENT ", setup02,  cleanup02},
	{"Invalid path", EINVAL, "EINVAL ", setup02, cleanup02},
	{"Permission denied: more than MAX_SWAPFILES  swapfiles in use",
		EPERM, "EPERM ", setup03, cleanup03},
	{"Permission denied", EPERM, "EPERM ", setup01, cleanup01}
};


int
main(int ac, char **av)
{

	int lc, i;	   /* loop counter */
	char *msg;	   /* message returned from parse_opts */

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

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

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

		Tst_count = 0;
		for(i = 0; i < TST_TOTAL; i++) {

			/* reset Tst_count in case we are looping. */
			if(testcase[i].setupfunc() == -1) {
				tst_resm(TWARN, "Failed to setup test %d."
						" Skipping test", i);
				continue;
			} else {
				TEST(swapon(path[i], 0));
			}

			if(testcase[i].cleanfunc() == -1) {
				tst_brkm(TBROK, cleanup, "Cleanup failed,"
							" quitting the test");
	 		}
			/* check return code */
			if ((TEST_RETURN == -1) && (TEST_ERRNO == testcase[i].
					exp_errno)) {
				tst_resm(TPASS, "swapon(2) expected failure;"
						" Got errno - %s : %s",
						testcase[i].exp_errval,
						testcase[i].err_desc);
			} else {
				tst_resm(TFAIL, "swapon(2) failed to produce"
						" expected error: %d, errno"
						": %s and got %d. "
						" System reboot after"
						" execution of LTP"
						" test suite is"
						" recommended.",
						testcase[i].exp_errno,
						testcase[i].exp_errval,
						TEST_ERRNO);

				/*If swapfile is turned on, turn it off*/
				if(TEST_RETURN == 0) {
					if(swapoff(path[i]) != 0) {
						tst_resm(TWARN, "Failed to"
							" turn off swapfile"
							" swapfile. System" 
							" reboot after"
							" execution of LTP"
							" test suite is"
							" recommended.");
					}
				}
			}

			TEST_ERROR_LOG(TEST_ERRNO);
		}	/*End of TEST LOOPS*/
	}		/* End of TEST_LOOPING*/

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

	/*NOTREACHED*/
	return 0;
}	/*End of main*/

/*
 * setup01() - This function sets the user as nobody
 */
int
setup01()
{
	if((ltpuser = getpwnam(nobody_uid)) == NULL) {
		tst_resm(TWARN, "\"nobody\" user not present. skipping test");
		return -1;
	}

	if (seteuid(ltpuser->pw_uid) == -1) {
		tst_resm(TWARN, "seteuid failed to "
			"to set the effective uid to %d", ltpuser->pw_uid);
		perror("seteuid");
		return -1;
	}
	return 0;	/* user switched to nobody*/
}

/*
 * cleanup01() - switch back to user root
 */
int
cleanup01()
{
	if(seteuid(0) == -1) {
		tst_brkm(TBROK, cleanup, "seteuid failed to set uid to root");
		perror("seteuid");
		return -1;
	}
	return 0;
}

int
setup02()
{
	return 0;
}

int
cleanup02()
{
	return 0;
}

/*
 * setup03() - Determine how many swapfiles already exist in system.
 * determine how many more swapfiles need to be created to test the limit.
 * create and turn on those many swapfiles.
 * Create one more swapfile for test.
 */
int
setup03()
{
	int j, fd;		/*j is loop counter, fd is file descriptor*/
	int pid;	   	/* used for fork */
	int *status=NULL;	/* used for fork */
	char cmd_buffer[55];	/* array to hold command line*/
	char filename[15];	/* array to store new filename*/
	char decimal[3];	/* array for digits at end of filename*/
	char temp[7];		/* to store wc -l output*/

	/*Find out how many swapfiles (1 line per entry) already exist*/
	if(system("cat /proc/swaps | wc -l > ./linecount") != 0) {
		tst_resm(TWARN, "Failed to find out existing number of swap"
				" files");
		return -1;
	}

	/*open linecount file to know the number of entries*/
	if((fd = open("./linecount", O_RDONLY)) == -1) {
		tst_resm(TWARN, "Failed to find out existing number of swap"
				" files");
		return -1;
	}

	/* 6th and 7th character in the file contains output of wc -l*/
	if( read(fd, temp, 7) != 7) {
		tst_resm(TWARN, "Failed to find out existing number of swap"
				" files");
		return -1;
	}

	/*check if number of lines are less than 10 in /proc/swaps*/
	if(temp[5] == ' ') {
		decimal[0] = '0';
	} else {
		decimal[0] = temp[5];
	}

	decimal[1] = temp[6];	/*temp[6] unit digit of wc -l result*/

	swapfile = atoi(decimal);

	if(swapfile < 0) {
		tst_resm(TWARN, "Failed to find existing number of swapfiles");
		return -1;
	}

	/* Determine how many more files are to be created*/
	swapfile = MAX_SWAPFILES - swapfile + 1;

	pid=fork();
        if (pid == 0){
	  /*create and turn on remaining swapfiles*/
	  for(j = 0; j < swapfile; j++) {

		/*prepare filename for the iteration*/
		if(sprintf(filename, "swapfile%d%d", (j+2)/10, (j+2)) < 0) {
			tst_resm(TWARN, "sprintf() failed to create filename");
			return -1;
		}
		
		/*prepare the path string for dd command and dd command*/
		if(sprintf(cmd_buffer, "dd if=/dev/zero of=%s  bs=1048"
				" count=40 > tmpfile 2>&1", filename) < 0) {
			tst_resm(TWARN, "dd command failed to create file");
			return -1;
		}

		if(system(cmd_buffer) != 0) {
			tst_resm(TWARN, "sprintf() failed to create swapfiles");
			return -1;
		}

		/* make the file swapfile*/
		if(sprintf(cmd_buffer, "mkswap %s > tmpfile 2>&1", filename)
				< 0) {
			tst_resm(TWARN, "Failed to make swap %s", filename);
			return -1;
		}

		if(system(cmd_buffer) != 0) {
			tst_resm(TWARN, "failed to make swap file %s",
					filename); 
			return -1;
		}

		/* turn on the swap file*/
		if(swapon(filename, 0) != 0) {
			tst_resm(TWARN, "Failed swapon for file %s"
					"returned %d", filename);
			/* must cleanup already swapon files */
			cleanup03();
			return -1;
		}
	  }
	}
	else
	  waitpid(pid,status,0);
	/*create extra swapfile for testing*/
	if(system("dd if=/dev/zero of=swapfilenext bs=1048 count=40 > tmpfile"
				" 2>&1") != 0) {
		tst_resm(TWARN, "Failed to create extra file for swap");
		return -1;
	}

	if(system("mkswap ./swapfilenext > tmpfle 2>&1") != 0) {
		tst_resm(TWARN, "Failed to make extra swapfile");
		return -1;
	}

	return 0;
}

/*
 * cleanup03() - clearing all turned on swapfiles
 */ 
int
cleanup03()
{
	int j;			/* loop counter*/
	char filename[15];

	for(j = 0; j < swapfile; j++) {
		if( sprintf(filename, "swapfile%d%d", (j+2)/10, (j+2)) < 0) {
			tst_resm(TWARN, "sprintf() failed to create filename");
			tst_resm(TWARN, "Failed to turn off swap files. System"
					" reboot after execution of LTP test"
					" suite is recommended");
			return -1;
		}
		if( swapoff(filename) != 0) {
			tst_resm(TWARN, "Failed to turn off swap files. system"
					" reboot after execution of LTP test"
					" suite is recommended");
			return -1;
		}
	}
	return 0;
}

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

	set_handler(SIGSEGV,0);
	/* set the expected errnos... */
	TEST_EXP_ENOS(exp_enos);

	/* Check whether we are root*/
	if (geteuid() != 0) {
		tst_brkm(TBROK, tst_exit, "Test must be run as root");
	}

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

	/*create file*/
	if(system("dd if=/dev/zero of=swapfile01 bs=1048  count=40 > tmpfile"
			" 2>&1") != 0) {
		tst_brkm(TBROK, cleanup, "Failed to create file for swap");
	}

	/* make above file a swap file*/
	if( system("mkswap swapfile01 > tmpfile 2>&1") != 0) {
		tst_brkm(TBROK, cleanup, "Failed to make swapfile");
	}

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

}	/* End setup() */

/*
* cleanup() - Performs 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;

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

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

/*
 * handler()
 *      A dummy signal handler for attempting to catch signals.
 */
void
handler(int sig)
{
        tst_exit();
}

/*
 * set_handler()
 *      Establish a signal handler for "sig" with the specified flags and
 *      signal to mask while the handler executes.
 * Returns
 *      0 on success, errno on failure
 */
int
set_handler(int sig, int sig_to_mask)
{
        struct sigaction sa;
        int err;

        sa.sa_sigaction = (void *)handler;
        sa.sa_flags = SA_NOMASK;
        sigemptyset(&sa.sa_mask);
        sigaddset(&sa.sa_mask, sig_to_mask);
        err = sigaction(sig, &sa, NULL);

        if (err == 0) {
                return 0;
        } else {
                return errno;
        }
}