newlib-cygwin/winsup/testsuite/winsup.api/ltp/unlink08.c

434 lines
11 KiB
C

/*
* Copyright (c) 2000 Silicon Graphics, Inc. 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.
*
* Further, this software is distributed without any warranty that it is
* free of the rightful claim of any third person regarding infringement
* or the like. Any license provided herein, whether implied or
* otherwise, applies only to this software file. Patent licenses, if
* any, provided herein do not apply to combinations of this program with
* other software, or any other product whatsoever.
*
* 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.
*
* Contact information: Silicon Graphics, Inc., 1600 Amphitheatre Pkwy,
* Mountain View, CA 94043, or:
*
* http://www.sgi.com
*
* For further information regarding this notice, see:
*
* http://oss.sgi.com/projects/GenInfo/NoticeExplan/
*
*/
/* $Id$ */
/**********************************************************
*
* OS Test - Silicon Graphics, Inc.
*
* TEST IDENTIFIER : unlink08
*
* EXECUTED BY : anyone
*
* TEST TITLE : unlink(2) negative testcases
*
* PARENT DOCUMENT : usctpl01
*
* TEST CASE TOTAL : 3
*
* WALL CLOCK TIME : 1
*
* CPU TYPES : ALL
*
* AUTHOR : Richard Logan
*
* CO-PILOT : William Roske
*
* DATE STARTED : 03/30/94
*
* INITIAL RELEASE : UNICOS 7.0
*
* TEST CASES
*
* 1-3) See Testcases structure below.
*
* 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 unlink(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
* unlink(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/fcntl.h>
#include <sys/stat.h>
#include <errno.h>
#include <signal.h>
#include <unistd.h>
#include <string.h>
#include "test.h"
#include "usctest.h"
void setup();
void cleanup();
char *TCID="unlink08"; /* Test program identifier. */
int TST_TOTAL=3; /* Total number of test cases. */
extern int Tst_count; /* Test Case counter for tst_* routines */
int exp_enos[]={0, 0};
int unwrite_dir_setup();
int unsearch_dir_setup();
int dir_setup();
int no_setup();
struct test_case_t {
char *pathname;
char *desc;
int (*setupfunc)();
int exp_ret; /* -1 means error, 0 means != -1 */
int exp_errno;
} Test_cases[] = {
{ "unwrite_dir/file", "unwritable directory", unwrite_dir_setup,
-1, EACCES},
{ "unsearch_dir/file", "unsearchable directory", unsearch_dir_setup,
-1, EACCES },
#ifdef linux
{ "regdir", "directory", dir_setup, -1, EISDIR},
#else
{ "regdir", "directory", dir_setup, -1, EPERM},
#endif
{ NULL, NULL, no_setup, -1, 0 }
};
/***********************************************************************
* Main
***********************************************************************/
int
main(int ac, char **av)
{
int lc; /* loop counter */
const char *msg; /* message returned from parse_opts */
char *fname;
char *desc;
int ind;
/***************************************************************
* parse standard options
***************************************************************/
if ( (msg=parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *) NULL ) {
tst_brkm(TBROK, NULL, "OPTION PARSING ERROR - %s", msg);
tst_exit();
}
/***************************************************************
* perform global setup for test
***************************************************************/
setup();
/* 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;
for (ind=0; Test_cases[ind].desc != NULL; ind++ ) {
fname = Test_cases[ind].pathname;
desc = Test_cases[ind].desc;
/*
* Call unlink(2)
*/
TEST(unlink(fname));
/* check return code */
if ( TEST_RETURN == -1 ) {
if ( Test_cases[ind].exp_ret == -1 ) { /* neg test */
if ( STD_FUNCTIONAL_TEST ) {
if ( TEST_ERRNO == Test_cases[ind].exp_errno )
tst_resm(TPASS, "unlink(<%s>) Failed, errno=%d",
desc, TEST_ERRNO);
else
tst_resm(TFAIL,
"unlink(<%s>) Failed, errno=%d, expected errno:%d",
desc, TEST_ERRNO, Test_cases[ind].exp_errno);
}
else
Tst_count++;
}
else {
tst_resm(TFAIL, "unlink(<%s>) Failed, errno=%d",
desc, TEST_ERRNO);
}
} else {
if ( Test_cases[ind].exp_ret == -1 ) {
tst_resm(TFAIL,
"unlink(<%s>) returned %d, expected -1, errno:%d",
desc, TEST_RETURN, Test_cases[ind].exp_errno);
}
else if ( STD_FUNCTIONAL_TEST ) {
tst_resm(TPASS,
"unlink(<%s>) returned %d",
desc, TEST_RETURN);
}
else
Tst_count++;
Test_cases[ind].setupfunc(1);
}
}
} /* End for TEST_LOOPING */
/***************************************************************
* cleanup and exit
***************************************************************/
cleanup();
return 0;
} /* End main */
/***************************************************************
* setup() - performs all ONE TIME setup for this test.
***************************************************************/
void
setup()
{
int ind;
int postest = 0;
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* make a temp directory and cd to it */
tst_tmpdir();
/* Pause if that option was specified */
TEST_PAUSE;
if ( geteuid() == 0 ) {
postest++;
}
for (ind=0; Test_cases[ind].desc != NULL; ind++ ) {
if ( Test_cases[ind].exp_errno == EACCES && postest )
Test_cases[ind].exp_ret=0; /* set as a pos test */
Test_cases[ind].setupfunc(0);
}
} /* End setup() */
/***************************************************************
* cleanup() - performs all ONE TIME cleanup for this test at
* completion or premature exit.
***************************************************************/
void
cleanup()
{
chmod("unwrite_dir", 0777);
chmod("unsearch_dir", 0777);
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* Remove tmp dir and all files in it */
tst_rmdir();
/* exit with return code appropriate for results */
tst_exit();
} /* End cleanup() */
/******************************************************************
*
******************************************************************/
int
unwrite_dir_setup(flag)
int flag;
{
int fd;
if ( ! flag ) { /* initial setup */
if (mkdir("unwrite_dir", 0777) == -1 ) {
tst_brkm(TBROK, cleanup,
"mkdir(unwrite_dir, 0777) failed, errno:%d %s",
errno, strerror(errno));
}
if ( (fd=creat("unwrite_dir/file", 0777)) == -1 ) {
tst_brkm(TBROK, cleanup,
"creat(unwrite_dir/file, 0777) failed, errno:%d %s",
errno, strerror(errno));
}
close(fd);
if ( chmod("unwrite_dir", 0555) == -1 ) {
tst_brkm(TBROK, cleanup,
"chmod(unwrite_dir, 0555) failed, errno:%d %s",
errno, strerror(errno));
}
}
else { /* resetup */
if ( chmod("unwrite_dir", 0777) == -1 ) {
tst_brkm(TBROK, cleanup,
"chmod(unwrite_dir, 0777) failed, errno:%d %s",
errno, strerror(errno));
}
if ( (fd=creat("unwrite_dir/file", 0777)) == -1 ) {
tst_brkm(TBROK, cleanup,
"creat(unwrite_dir/file, 0777) failed, errno:%d %s",
errno, strerror(errno));
}
close(fd);
if ( chmod("unwrite_dir", 0555) == -1 ) {
tst_brkm(TBROK, cleanup,
"chmod(unwrite_dir, 0555) failed, errno:%d %s",
errno, strerror(errno));
}
}
return 0;
}
/******************************************************************
*
******************************************************************/
int
unsearch_dir_setup(flag)
int flag;
{
int fd;
if ( ! flag ) { /* initial setup */
if (mkdir("unsearch_dir", 0777) == -1 ) {
tst_brkm(TBROK, cleanup,
"mkdir(unsearch_dir, 0777) failed, errno:%d %s",
errno, strerror(errno));
}
if ( (fd=creat("unsearch_dir/file", 0777)) == -1 ) {
tst_brkm(TBROK, cleanup,
"creat(unsearch_dir/file, 0777) failed, errno:%d %s",
errno, strerror(errno));
}
close(fd);
if ( chmod("unsearch_dir", 0666) == -1 ) {
tst_brkm(TBROK, cleanup,
"chmod(unsearch_dir, 0666) failed, errno:%d %s",
errno, strerror(errno));
}
}
else { /* resetup */
if ( chmod("unsearch_dir", 0777) == -1 ) {
tst_brkm(TBROK, cleanup,
"chmod(unsearch_dir, 0777) failed, errno:%d %s",
errno, strerror(errno));
}
if ( (fd=creat("unsearch_dir/file", 0777)) == -1 ) {
tst_brkm(TBROK, cleanup,
"creat(unsearch_dir/file, 0777) failed, errno:%d %s",
errno, strerror(errno));
}
close(fd);
if ( chmod("unsearch_dir", 0666) == -1 ) {
tst_brkm(TBROK, cleanup,
"chmod(unsearch_dir, 0666) failed, errno:%d %s",
errno, strerror(errno));
}
}
return 0;
}
/******************************************************************
*
******************************************************************/
int
dir_setup(flag)
int flag;
{
if (mkdir("regdir", 0777) == -1 ) {
tst_brkm(TBROK, cleanup,
"mkdir(unwrite_dir, 0777) failed, errno:%d %s",
errno, strerror(errno));
}
return 0;
}
/******************************************************************
*
******************************************************************/
int
no_setup(flag)
int flag;
{
return 0;
}