sanchayanmaity/minix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

tests: remove IPC test set

Browse source 
This code appears to be GPL-licensed and thus does not belong in
the MINIX3 source tree.

Change-Id: I1d1060cd159322398284c6bb9716541819706e95
This commit is contained in:
David van Moolenbroek 2015-07-19 17:58:10 +00:00
parent 85fb986ba7
commit 4a1befb81d
70 changed files with 0 additions and 12869 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

32
minix/tests/ipc/Makefile
View file

@ -1,32 +0,0 @@
#
# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
#
all test clean:
$(MAKE) -C ./lib $@
# $(MAKE) -C ./msgctl $@
# $(MAKE) -C ./msgget $@
# $(MAKE) -C ./msgrcv $@
# $(MAKE) -C ./msgsnd $@
$(MAKE) -C ./semctl $@
$(MAKE) -C ./semget $@
$(MAKE) -C ./semop $@
$(MAKE) -C ./shmat $@
$(MAKE) -C ./shmctl $@
$(MAKE) -C ./shmdt $@
$(MAKE) -C ./shmget $@
$(MAKE) -C ./shmt $@

33
minix/tests/ipc/lib/Makefile
View file

@ -1,33 +0,0 @@
#
# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
#
SRCS = libipc.c rmobj.c parse_opts.c tst_res.c tst_sig.c tst_tmpdir.c
OBJS = $(SRCS:.c=.o)
LIBIPC = ../libipc.a
CFLAGS += -I../../../../../include -Wall -D_NETBSD_SOURCE=1
all: $(LIBIPC)
$(LIBIPC): $(OBJS)
$(AR) -rc $@ $(OBJS)
install:
clean:
rm -f $(OBJS) $(LIBIPC)

62
minix/tests/ipc/lib/ipcmsg.h
View file

@ -1,62 +0,0 @@
/*
*
* 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
*/
/*
* ipcmsg.h - common definitions for the IPC message tests.
*/
#ifndef __IPCMSG_H
#define __IPCMSG_H 1
#include <errno.h>
#include <sys/ipc.h>
#include <sys/msg.h>
#include "test.h"
#include "usctest.h"
void cleanup(void);
void setup(void);
#define MSG_RD 0400 /* read permission for the queue */
#define MSG_WR 0200 /* write permission for the queue */
#define MSG_RW MSG_RD | MSG_WR
#define MSGSIZE 1024 /* a resonable size for a message */
#define MSGTYPE 1 /* a type ID for a message */
typedef struct mbuf { /* a generic message structure */
long mtype;
char mtext[MSGSIZE + 1]; /* add 1 here so the message can be 1024 */
} MSGBUF; /* characters long with a '\0' termination */
#if (!defined CONFIG_COLDFIRE || defined LIBIPC)
key_t msgkey; /* the ftok() generated message key */
#else
extern key_t msgkey; /* the ftok() generated message key */
#endif
void check_root();
void init_buf(MSGBUF *, int, int);
void rm_queue(int);
int getipckey();
int getuserid(char *);
#endif /* ipcmsg.h */

64
minix/tests/ipc/lib/ipcsem.h
View file

@ -1,64 +0,0 @@
/*
*
* 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
*/
/*
* ipcsem.h - common definitions for the IPC semaphore tests
*/
#ifndef __IPCSEM_H
#define __IPCSEM_H
#include <errno.h>
#include <sys/ipc.h>
#include <sys/sem.h>
#include "test.h"
#include "usctest.h"
void cleanup(void);
void setup(void);
#define SEM_RD 0400
#define SEM_ALT 0200
#define SEM_RA SEM_RD | SEM_ALT
#define PSEMS 10 /* a reasonable value for the number of */
/* "primitive semaphores" per ID */
#if (!defined CONFIG_COLDFIRE || defined LIBIPC)
key_t semkey; /* an IPC key generated by ftok() */
#else
extern key_t semkey; /* an IPC key generated by ftok() */
#endif
union semun {
int val; /* value for SETVAL */
struct semid_ds *buf; /* buffer for IPC_STAT & IPC_SET */
unsigned short *array; /* array for GETALL & SETALL */
struct seminfo *ipc_buf; /* buffer for IPC_INFO */
};
void rm_sema(int sem_id);
void check_root(void);
int getipckey(void);
int getuserid(char *);
#endif /* ipcsem.h */

56
minix/tests/ipc/lib/ipcshm.h
View file

@ -1,56 +0,0 @@
/*
*
* 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
*/
/*
* ipcshm.h - common definitions for the IPC shared memory tests
*/
#ifndef __IPCSHM_H
#define __IPCSHM_H
#include <errno.h>
#include <sys/wait.h>
#include <sys/ipc.h>
#include <sys/shm.h>
#include "test.h"
#include "usctest.h"
void cleanup(void);
void setup(void);
#define SHM_RD 0400
#define SHM_WR 0200
#define SHM_RW SHM_RD | SHM_WR
#define SHM_SIZE 2048 /* a resonable size for a memory segment */
#define INT_SIZE 4 /* instead of sizeof(int) */
#define MODE_MASK 0x01FF /* to get the lower nine permission bits */
/* from shmid_ds.ipc_perm.mode */
key_t shmkey; /* an IPC key generated by ftok() */
void rm_shm(int shm_id);
void check_root(void);
int getipckey(void);
int getuserid(char*);
#endif /* ipcshm.h */

211
minix/tests/ipc/lib/libipc.c
View file

@ -1,211 +0,0 @@
/*
*
* 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
* libmsg.c
*
* DESCRIPTION
* common routines for the IPC system call tests.
*
* The library contains the following routines:
*
* getipckey()
* rm_queue()
* init_buf()
* rm_sema()
* check_root()
* getuserid()
* rm_shm()
*/
#define LIBIPC
#if 0
#include "ipcmsg.h"
#endif
#include "ipcsem.h"
#include <pwd.h>
#include <sys/time.h>
#include <sys/ipc.h>
#include <sys/shm.h>
#include <sys/sem.h>
/*
* getipckey() - generates and returns a message key used by the "get"
* calls to create an IPC resource.
*/
int
getipckey()
{
const char a = 'a';
int ascii_a = (int)a;
char *curdir = NULL;
char curdira[PATH_MAX];
size_t size = sizeof(curdira);
key_t ipc_key;
struct timeval tv;
if (NULL == (curdir = getcwd(curdira, size))) {
tst_brkm(TBROK, cleanup, "Can't get current directory "
"in getipckey()");
}
/*
* Get a Sys V IPC key
*
* ftok() requires a character as a second argument. This is
* refered to as a "project identifier" in the man page. In
* order to maximize the chance of getting a unique key, the
* project identifier is a "random character" produced by
* generating a random number between 0 and 25 and then adding
* that to the ascii value of 'a'. The "seed" for the random
* number is the microsecond value that is set in the timeval
* structure after calling gettimeofday().
*/
(void) gettimeofday(&tv, NULL);
srandom((unsigned int)tv.tv_usec);
if ((ipc_key = ftok(curdir, ascii_a + random()%26)) == -1) {
tst_brkm(TBROK, cleanup, "Can't get msgkey from ftok()");
}
return(ipc_key);
}
#if 0
/*
* rm_queue() - removes a message queue.
*/
void
rm_queue(int queue_id)
{
if (queue_id == -1) { /* no queue to remove */
return;
}
if (msgctl(queue_id, IPC_RMID, NULL) == -1) {
tst_resm(TINFO, "WARNING: message queue deletion failed.");
tst_resm(TINFO, "This could lead to IPC resource problems.");
tst_resm(TINFO, "id = %d", queue_id);
}
}
#endif
#if 0
/*
* init_buf() - initialize the message buffer with some text and a type.
*/
void
init_buf(MSGBUF *m_buf, int type, int size)
{
int i;
int ascii_a = (int)'a'; /* the ascii value for 'a' */
/* this fills the message with a repeating alphabet string */
for (i=0; i<size; i++) {
m_buf->mtext[i] = ascii_a + (i % 26);
}
/* terminate the message */
m_buf->mtext[i] = (char)NULL;
/* if the type isn't valid, set it to 1 */
if (type < 1) {
m_buf->mtype = 1;
} else {
m_buf->mtype = type;
}
}
#endif
/*
* rm_sema() - removes a semaphore.
*/
void
rm_sema(int sem_id)
{
union semun arr;
if (sem_id == -1) { /* no semaphore to remove */
return;
}
if (semctl(sem_id, 0, IPC_RMID, arr) == -1) {
tst_resm(TINFO, "WARNING: semaphore deletion failed.");
tst_resm(TINFO, "This could lead to IPC resource problems.");
tst_resm(TINFO, "id = %d", sem_id);
}
}
/*
* check_root() - make sure the process ID is root
*/
void
check_root(void)
{
if (geteuid() != 0) {
tst_brkm(TBROK, cleanup, "test must be run as root");
}
}
/*
* getuserid() - return the integer value for the "user" id
*/
int
getuserid(char *user)
{
struct passwd *ent;
/* allocate some space for the passwd struct */
if ((ent = (struct passwd *)malloc(sizeof(struct passwd))) == NULL) {
tst_brkm(TBROK, cleanup, "couldn't allocate space for passwd"
" structure");
}
/* get the uid value for the user */
if ((ent = getpwnam(user)) == NULL) {
tst_brkm(TBROK, cleanup, "Couldn't get password entry for %s",
user);
}
return(ent->pw_uid);
}
/*
* rm_shm() - removes a shared memory segment.
*/
void
rm_shm(int shm_id)
{
if (shm_id == -1) { /* no segment to remove */
return;
}
/*
* check for # of attaches ?
*/
if (shmctl(shm_id, IPC_RMID, NULL) == -1) {
tst_resm(TINFO, "WARNING: shared memory deletion failed.");
tst_resm(TINFO, "This could lead to IPC resource problems.");
tst_resm(TINFO, "id = %d", shm_id);
}
}

896
minix/tests/ipc/lib/parse_opts.c
View file

@ -1,896 +0,0 @@
/*
* 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/
*/
/**********************************************************
*
* OS Testing - Silicon Graphics, Inc.
*
* FUNCTION NAME : parse_opts
*
* FUNCTION TITLE : parse standard & user options for system call tests
*
* SYNOPSIS:
* #include "usctest.h"
*
* char *parse_opts(ac, av, user_optarr, uhf)
* int ac;
* char **av;
* option_t user_optarr[];
* void (*uhf)();
*
* AUTHOR : William Roske/Richard Logan
*
* INITIAL RELEASE : UNICOS 7.0
*
* DESCRIPTION
* The parse_opts library routine takes that argc and argv parameters
* recevied by main() and an array of structures defining user options.
* It parses the command line setting flag and argument locations
* associated with the options. It uses getopt to do the actual cmd line
* parsing. uhf() is a function to print user define help
*
* This module contains the functions usc_global_setup_hook and
* usc_test_looping, which are called by marcos defined in usctest.h.
*
* RETURN VALUE
* parse_opts returns a pointer to an error message if an error occurs.
* This pointer is (char *)NULL if parsing is successful.
*
*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#**/
#include <errno.h>
#include <stdlib.h>
#include <string.h>
#include <sys/param.h>
#include <sys/signal.h>
#include <sys/types.h>
#include <unistd.h>
#include <sys/time.h>
#if UNIT_TEST
#include <time.h>
#endif /* UNIT_TEST */
#include "test.h"
#define _USC_LIB_ 1 /* indicates we are the library to the usctest.h include */
#include "usctest.h"
#ifndef USC_COPIES
#define USC_COPIES "USC_COPIES"
#endif
#ifndef UNIT_TEST
#define UNIT_TEST 0
#endif
#ifndef DEBUG
#define DEBUG 0
#endif
/* The timing information block. */
struct tblock tblock={0,((long) -1)>>1,0,0};
/* Define flags and args for standard options */
int STD_FUNCTIONAL_TEST=1, /* flag indicating to do functional testing code */
STD_TIMING_ON=0, /* flag indicating to print timing stats */
STD_PAUSE=0, /* flag indicating to pause before actual start, */
/* for contention mode */
STD_INFINITE=0, /* flag indciating to loop forever */
STD_LOOP_COUNT=1, /* number of iterations */
STD_COPIES=1, /* number of copies */
STD_ERRNO_LOG=0; /* flag indicating to do errno logging */
float STD_LOOP_DURATION=0.0, /* duration value in fractional seconds */
STD_LOOP_DELAY=0.0; /* loop delay value in fractional seconds */
char **STD_opt_arr = NULL; /* array of option strings */
int STD_nopts=0, /* number of elements in STD_opt_arr */
STD_argind=1; /* argv index to next argv element */
/* (first argument) */
/* To getopt users, it is like optind */
/*
* The following variables are to support system testing additions.
*/
static int STD_TP_barrier=0; /* flag to do barrier in TEST_PAUSE */
/* 2 - wait_barrier(), 3 - set_barrier(), * - barrier() */
static int STD_LP_barrier=0; /* flag to do barrier in TEST_LOOPING */
/* 2 - wait_barrier(), 3 - set_barrier(), * - barrier() */
static int STD_TP_shmem_sz=0; /* shmalloc this many words per pe in TEST_PAUSE */
static int STD_LD_shmem=0; /* flag to do shmem_puts and shmem_gets during delay */
static int STD_LP_shmem=0; /* flag to do shmem_puts and gets during TEST_LOOPING */
static int STD_LD_recfun=0; /* do recressive function calls in loop delay */
static int STD_LP_recfun=0; /* do recressive function calls in TEST_LOOPING */
static int STD_TP_sbrk=0; /* do sbrk in TEST_PAUSE */
static int STD_LP_sbrk=0; /* do sbrk in TEST_LOOPING */
static char *STD_start_break=0; /* original sbrk size */
static int Debug=0;
struct std_option_t {
char *optstr;
char *help;
char *flag;
char **arg;
} std_options[] = {
{ "c:", " -c n Run n copies concurrently\n", NULL, NULL},
{ "e" , " -e Turn on errno logging\n", NULL, NULL},
{ "f" , " -f Turn off functional testing\n", NULL, NULL},
{ "h" , " -h Show this help screen\n", NULL, NULL},
{ "i:", " -i n Execute test n times\n", NULL, NULL},
{ "I:", " -I x Execute test for x seconds\n", NULL, NULL},
{ "p" , " -p Pause for SIGUSR1 before starting\n", NULL, NULL},
{ "P:", " -P x Pause for x seconds between iterations\n", NULL, NULL},
{ "t" , " -t Turn on syscall timing\n", NULL, NULL},
#ifdef UCLINUX
{ "C:", " -C ARG Run the child process with arguments ARG (for internal use)\n",
NULL, NULL},
#endif
{NULL, NULL, NULL, NULL}};
void print_help(void (*user_help)(void));
/*
* Structure for usc_recressive_func argument
*/
struct usc_bigstack_t {
char space[4096];
};
static struct usc_bigstack_t *STD_bigstack=NULL;
/*
* Counter of errnos returned (-e option). Indexed by errno.
* Make the array USC_MAX_ERRNO long. That is the first Fortran
* Lib errno. No syscall should return an errno that high.
*/
int STD_ERRNO_LIST[USC_MAX_ERRNO];
/* define the string length for Mesg and Mesg2 strings */
#define STRLEN 2048
static char Mesg2[STRLEN]; /* holds possible return string */
static void usc_recressive_func(int, int, struct usc_bigstack_t *);
/*
* Define bits for options that might have env variable default
*/
#define OPT_iteration 01
#define OPT_nofunccheck 02
#define OPT_duration 04
#define OPT_delay 010
#define OPT_copies 020
#ifdef UCLINUX
/* Allocated and used in self_exec.c: */
extern char *child_args; /* Arguments to child when -C is used */
#endif
/**********************************************************************
* parse_opts:
**********************************************************************/
char *
parse_opts(int ac, char **av, option_t *user_optarr, void (*uhf)(void))
{
int found; /* flag to indicate that an option specified was */
/* found in the user's list */
int k; /* scratch integer for returns and short time usage */
float ftmp; /* tmp float for parsing env variables */
char *ptr; /* used in getting env variables */
int options=0; /* no options specified */
int optstrlen, i;
char *optionstr;
int opt; /* return of getopt */
/*
* If not the first time this function is called, release the old STD_opt_arr
* vector.
*/
if ( STD_opt_arr != NULL ) {
free(STD_opt_arr);
STD_opt_arr=NULL;
}
/* Calculate how much space we need for the option string */
optstrlen = 0;
for (i = 0; std_options[i].optstr; ++i)
optstrlen += strlen(std_options[i].optstr);
if (user_optarr)
for (i = 0; user_optarr[i].option; ++i) {
if (strlen(user_optarr[i].option) > 2)
return "parse_opts: ERROR - Only short options are allowed";
optstrlen += strlen(user_optarr[i].option);
}
optstrlen += 1;
/* Create the option string for getopt */
optionstr = (char *)malloc(optstrlen);
if (!optionstr)
return "parse_opts: ERROR - Could not allocate memory for optionstr";
optionstr[0] = '\0';
for (i = 0; std_options[i].optstr; ++i)
strcat(optionstr, std_options[i].optstr);
if (user_optarr)
for (i = 0; user_optarr[i].option; ++i)
/* only add the option if it wasn't there already */
if (strchr(optionstr, user_optarr[i].option[0]) == NULL)
strcat(optionstr, user_optarr[i].option);
#if DEBUG > 1
printf("STD_nopts = %d\n", STD_nopts);
#endif
/*
* Loop through av parsing options.
*/
while ( (opt = getopt(ac, av, optionstr)) > 0) {
STD_argind = optind;
#if DEBUG > 0
printf("parse_opts: getopt returned '%c'\n", opt);
#endif
switch (opt) {
case '?': /* Unknown option */
return "Unknown option";
break;
case ':': /* Missing Arg */
return "Missing argument";
break;
case 'i': /* Iterations */
options |= OPT_iteration;
STD_LOOP_COUNT = atoi(optarg);
if (STD_LOOP_COUNT == 0) STD_INFINITE = 1;
break;
case 'P': /* Delay between iterations */
options |= OPT_delay;
STD_LOOP_DELAY = atof(optarg);
break;
case 'I': /* Time duration */
options |= OPT_duration;
STD_LOOP_DURATION = atof(optarg);
if ( STD_LOOP_DURATION == 0.0 ) STD_INFINITE=1;
break;
case 'c': /* Copies */
options |= OPT_copies;
STD_COPIES = atoi(optarg);
break;
case 'f': /* Functional testing */
STD_FUNCTIONAL_TEST = 0;
break;
case 'p': /* Pause for SIGUSR1 */
STD_PAUSE = 1;
break;
case 't': /* syscall timing */
STD_TIMING_ON = 1;
break;
case 'e': /* errno loggin */
STD_ERRNO_LOG = 1;
break;
case 'h': /* Help */
print_help(uhf);
exit(0);
break;
#ifdef UCLINUX
case 'C': /* Run child */
child_args = optarg;
break;
#endif
default:
/* Check all the user specified options */
found=0;
for(i = 0; user_optarr[i].option; ++i) {
if (opt == user_optarr[i].option[0]) {
/* Yup, This is a user option, set the flag and look for argument */
if ( user_optarr[i].flag ) {
*user_optarr[i].flag=1;
}
found++;
/* save the argument at the user's location */
if ( user_optarr[i].option[strlen(user_optarr[i].option)-1] == ':' ) {
*user_optarr[i].arg=optarg;
}
break; /* option found - break out of the for loop */
}
}
/* This condition "should never happen". SO CHECK FOR IT!!!! */
if ( ! found ) {
sprintf(Mesg2,
"parse_opts: ERROR - option:\"%c\" NOT FOUND... INTERNAL ERROR", opt);
return(Mesg2);
}
}
} /* end of while */
free(optionstr);
STD_argind = optind;
/*
* Turn on debug
*/
if ( (ptr=getenv("USC_DEBUG")) != NULL ) {
Debug=1;
printf("env USC_DEBUG is defined, turning on debug\n");
}
if ( (ptr=getenv("USC_VERBOSE")) != NULL ) {
Debug=1;
printf("env USC_VERBOSE is defined, turning on debug\n");
}
/*
* If the USC_ITERATION_ENV environmental variable is set to
* a number, use that number as iteration count (same as -c option).
* The -c option with arg will be used even if this env var is set.
*/
if ( !(options & OPT_iteration) && (ptr=getenv(USC_ITERATION_ENV)) != NULL ) {
if ( sscanf(ptr, "%i", &k) == 1) {
if ( k == 0 ) { /* if arg is 0, set infinite loop flag */
STD_INFINITE=1;
if ( Debug )
printf("Using env %s, set STD_INFINITE to 1\n",
USC_ITERATION_ENV);
} else { /* else, set the loop count to the arguement */
STD_LOOP_COUNT=k;
if ( Debug )
printf("Using env %s, set STD_LOOP_COUNT to %d\n",
USC_ITERATION_ENV, k);
}
}
}
/*
* If the USC_NO_FUNC_CHECK environmental variable is set, we'll
* unset the STD_FUNCTIONAL_TEST variable.
*/
if ( !(options & OPT_nofunccheck) && (ptr=getenv(USC_NO_FUNC_CHECK)) != NULL ) {
STD_FUNCTIONAL_TEST=0; /* Turn off functional testing */
if ( Debug )
printf("Using env %s, set STD_FUNCTIONAL_TEST to 0\n",
USC_NO_FUNC_CHECK);
}
/*
* If the USC_LOOP_WALLTIME environmental variable is set,
* use that number as duration (same as -I option).
* The -I option with arg will be used even if this env var is set.
*/
if ( !(options & OPT_duration) && (ptr=getenv(USC_LOOP_WALLTIME)) != NULL ) {
if ( sscanf(ptr, "%f", &ftmp) == 1 && ftmp >= 0.0 ) {
STD_LOOP_DURATION=ftmp;
if ( Debug )
printf("Using env %s, set STD_LOOP_DURATION to %f\n",
USC_LOOP_WALLTIME, ftmp);
if ( STD_LOOP_DURATION == 0.0 ) { /* if arg is 0, set infinite loop flag */
STD_INFINITE=1;
if ( Debug )
printf("Using env %s, set STD_INFINITE to 1\n", USC_LOOP_WALLTIME);
}
}
}
if ( !(options & OPT_duration) && (ptr=getenv("USC_DURATION")) != NULL ) {
if ( sscanf(ptr, "%f", &ftmp) == 1 && ftmp >= 0.0 ) {
STD_LOOP_DURATION=ftmp;
if ( Debug )
printf("Using env USC_DURATION, set STD_LOOP_DURATION to %f\n", ftmp);
if ( STD_LOOP_DURATION == 0.0 ) { /* if arg is 0, set infinite loop flag */
STD_INFINITE=1;
if ( Debug )
printf("Using env USC_DURATION, set STD_INFINITE to 1\n");
}
}
}
/*
* If the USC_LOOP_DELAY environmental variable is set,
* use that number as delay in factional seconds (same as -P option).
* The -P option with arg will be used even if this env var is set.
*/
if ( !(options & OPT_delay) && (ptr=getenv(USC_LOOP_DELAY)) != NULL ) {
if ( sscanf(ptr, "%f", &ftmp) == 1 && ftmp >= 0.0 ) {
STD_LOOP_DELAY=ftmp;
if ( Debug )
printf("Using env %s, set STD_LOOP_DELAY = %f\n",
USC_LOOP_DELAY, ftmp);
}
}
/*
* If the USC_COPIES environmental variable is set,
* use that number as copies (same as -c option).
* The -c option with arg will be used even if this env var is set.
*/
if ( !(options & OPT_copies) && (ptr=getenv(USC_COPIES)) != NULL ) {
if ( sscanf(ptr, "%d", &STD_COPIES) == 1 && STD_COPIES >= 0 ) {
if ( Debug )
printf("Using env %s, set STD_COPIES = %d\n",
USC_COPIES, STD_COPIES);
}
}
/*
* The following are special system testing envs to turn on special
* hooks in the code.
*/
if ( (ptr=getenv("USC_TP_BARRIER")) != NULL ) {
if ( sscanf(ptr, "%i", &k) == 1 && k >= 0 ) {
STD_TP_barrier=k;
}
else
STD_TP_barrier=1;
if ( Debug )
printf("using env USC_TP_BARRIER, Set STD_TP_barrier to %d\n",
STD_TP_barrier);
}
if ( (ptr=getenv("USC_LP_BARRIER")) != NULL ) {
if ( sscanf(ptr, "%i", &k) == 1 && k >= 0 ) {
STD_LP_barrier=k;
}
else
STD_LP_barrier=1;
if ( Debug )
printf("using env USC_LP_BARRIER, Set STD_LP_barrier to %d\n",
STD_LP_barrier);
}
if ( (ptr=getenv("USC_TP_SHMEM")) != NULL ) {
if ( sscanf(ptr, "%i", &k) == 1 && k >= 0 ) {
STD_TP_shmem_sz=k;
if ( Debug )
printf("Using env USC_TP_SHMEM, Set STD_TP_shmem_sz to %d\n",
STD_TP_shmem_sz);
}
}
if ( (ptr=getenv("USC_LP_SHMEM")) != NULL ) {
if ( sscanf(ptr, "%i", &k) == 1 && k >= 0 ) {
STD_LP_shmem=k;
if ( Debug )
printf("Using env USC_LP_SHMEM, Set STD_LP_shmem to %d\n",
STD_LP_shmem);
}
}
if ( (ptr=getenv("USC_LD_SHMEM")) != NULL ) {
if ( sscanf(ptr, "%i", &k) == 1 && k >= 0 ) {
STD_LD_shmem=k;
if ( Debug )
printf("Using env USC_LD_SHMEM, Set STD_LD_shmem to %d\n",
STD_LD_shmem);
}
}
if ( (ptr=getenv("USC_TP_SBRK")) != NULL ) {
if ( sscanf(ptr, "%i", &k) == 1 && k >= 0 ) {
STD_TP_sbrk=k;
if ( Debug )
printf("Using env USC_TP_SBRK, Set STD_TP_sbrk to %d\n",
STD_TP_sbrk);
}
}
#if !defined(UCLINUX)
if ( (ptr=getenv("USC_LP_SBRK")) != NULL ) {
if ( sscanf(ptr, "%i", &k) == 1 && k >= 0 ) {
STD_LP_sbrk=k;
if ( Debug )
printf("Using env USC_LP_SBRK, Set STD_LP_sbrk to %d\n",
STD_LP_sbrk);
}
}
#endif /* if !defined(UCLINUX) */
if ( (ptr=getenv("USC_LP_RECFUN")) != NULL ) {
if ( sscanf(ptr, "%i", &k) == 1 && k >= 0 ) {
STD_LP_recfun=k;
if ( STD_bigstack != (struct usc_bigstack_t *)NULL )
STD_bigstack=(struct usc_bigstack_t *)
malloc(sizeof(struct usc_bigstack_t));
if ( Debug )
printf("Using env USC_LP_RECFUN, Set STD_LP_recfun to %d\n",
STD_LP_recfun);
}
}
if ( (ptr=getenv("USC_LD_RECFUN")) != NULL ) {
if ( sscanf(ptr, "%i", &k) == 1 && k >= 0 ) {
STD_LD_recfun=k;
if ( STD_bigstack != (struct usc_bigstack_t *)NULL )
STD_bigstack=(struct usc_bigstack_t *)
malloc(sizeof(struct usc_bigstack_t));
if ( Debug )
printf("Using env USC_LD_RECFUN, Set STD_LD_recfun to %d\n",
STD_LD_recfun);
}
}
#if UNIT_TEST
printf("The following variables after option and env parsing:\n");
printf("STD_FUNCTIONAL_TEST = %d\n", STD_FUNCTIONAL_TEST);
printf("STD_LOOP_DURATION = %f\n", STD_LOOP_DURATION);
printf("STD_LOOP_DELAY = %f\n", STD_LOOP_DELAY);
printf("STD_COPIES = %d\n", STD_COPIES);
printf("STD_LOOP_COUNT = %d\n", STD_LOOP_COUNT);
printf("STD_INFINITE = %d\n", STD_INFINITE);
printf("STD_TIMING_ON = %d\n", STD_TIMING_ON);
printf("STD_ERRNO_LOG = %d\n", STD_ERRNO_LOG);
printf("STD_PAUSE = %d\n", STD_PAUSE);
#endif
return((char *) NULL);
} /* end of parse_opts */
/*********************************************************************
* print_help() - print help message and user help message
*********************************************************************/
void print_help(void (*user_help)(void))
{
STD_opts_help();
if (user_help) user_help();
}
/*********************************************************************
* STD_opts_help() - return a help string for the STD_OPTIONS.
*********************************************************************/
void
STD_opts_help(void)
{
int i;
for(i = 0; std_options[i].optstr; ++i) {
if (std_options[i].help)
fputs(std_options[i].help, stdout);
}
}
/*
* routine to goto when we get the SIGUSR1 for STD_PAUSE
*/
void STD_go(int sig)
{
return;
}
/***********************************************************************
* This function will do desired end of global setup test
* hooks.
* Currently it will only do a pause waiting for sigusr1 if
* STD_PAUSE is set.
*
***********************************************************************/
int
usc_global_setup_hook(void)
{
#ifndef UCLINUX
int cnt;
/* temp variable to store old signal action to be restored after pause */
int (*_TMP_FUNC)(void);
/*
* Fork STD_COPIES-1 copies.
*/
for(cnt=1;cnt<STD_COPIES;cnt++) {
switch(fork() ) {
case -1:
fprintf(stderr, "%s: fork() failed, errno:%d %s\n",
__FILE__, errno, strerror(errno));
break;
case 0: /* child */
cnt=STD_COPIES; /* to stop the forking */
break;
default: /* parent */
break;
}
}
/*
* pause waiting for sigusr1.
*/
if ( STD_PAUSE ) {
_TMP_FUNC = (int (*)(void))signal(SIGUSR1, STD_go);
pause();
signal(SIGUSR1, (void (*)(int))_TMP_FUNC);
}
#if !defined(UCLINUX)
if ( STD_TP_sbrk || STD_LP_sbrk) {
STD_start_break=sbrk(0); /* get original sbreak size */
}
if ( STD_TP_sbrk ) {
sbrk(STD_TP_sbrk);
if ( Debug )
printf("after sbrk(%d)\n", STD_TP_sbrk);
}
#endif /* if !defined(UCLINUX) */
#endif
return 0;
}
#define USECS_PER_SEC 1000000 /* microseconds per second */
/***********************************************************************
* This function returns the number of get_current_time()'s return
* per second.
***********************************************************************/
static int
get_timepersec(void)
{
return USECS_PER_SEC; /* microseconds per second */
}
/***********************************************************************
* this function will get current time in microseconds since 1970.
***********************************************************************/
static int
get_current_time(void)
{
struct timeval curtime;
gettimeofday(&curtime, NULL);
/* microseconds since 1970 */
return (curtime.tv_sec*USECS_PER_SEC) + curtime.tv_usec;
}
/***********************************************************************
*
* This function will determine if test should continue iterating
* If the STD_INFINITE flag is set, return 1.
* If the STD_LOOP_COUNT variable is set, compare it against
* the counter.
* If the STD_LOOP_DURATION variable is set, compare current time against
* calculated stop_time.
* This function will return 1 until all desired looping methods
* have been met.
*
* counter integer is supplied by the user program.
***********************************************************************/
int
usc_test_looping(counter)
int counter;
{
static int first_time = 1;
static int stop_time = 0; /* stop time in rtc or usecs */
static int delay; /* delay in clocks or usecs */
int hertz=0; /* clocks per second or usecs per second */
int ct, end; /* current time, end delay time */
int keepgoing=0; /* used to determine return value */
/*
* If this is the first iteration and we are looping for
* duration of STD_LOOP_DURATION seconds (fractional) or
* doing loop delays, get the clocks per second.
*/
if ( first_time ) {
first_time=0;
if ( STD_LOOP_DELAY || STD_LOOP_DURATION ) {
hertz = get_timepersec();
}
/*
* If looping for duration, calculate stop time in
* clocks.
*/
if ( STD_LOOP_DURATION) {
ct=get_current_time();
stop_time=(int)((float)hertz * STD_LOOP_DURATION) + ct;
}
/*
* If doing delay each iteration, calcuate the number
* of clocks for each delay.
*/
if ( STD_LOOP_DELAY ) {
delay=(int)((float)hertz * STD_LOOP_DELAY);
}
}
/*
* if delay each iteration, loop for delay clocks.
* This will not be done on first iteration.
* The delay will happen before determining if
* there will be another iteration.
*/
else if ( STD_LOOP_DELAY ) {
ct=get_current_time();
end=ct+delay;
while ( ct < end ) {
/*
* The following are special test hooks in the delay loop.
*/
if ( STD_LD_recfun ) {
if ( Debug )
printf("calling usc_recressive_func(0, %d, STD_bigstack)\n",
STD_LD_recfun);
usc_recressive_func(0, STD_LD_recfun, STD_bigstack);
}
ct=get_current_time();
}
}
if ( STD_INFINITE ) {
keepgoing++;
}
if ( STD_LOOP_COUNT && counter < STD_LOOP_COUNT ) {
keepgoing++;
}
if ( STD_LOOP_DURATION != 0.0 && get_current_time() < stop_time ) {
keepgoing++;
}
if ( keepgoing == 0 )
return 0;
/*
* The following code allows special system testing hooks.
*/
if ( STD_LP_recfun ) {
if ( Debug )
printf("calling usc_recressive_func(0, %d, STD_bigstack)\n",
STD_LP_recfun);
usc_recressive_func(0, STD_LP_recfun, STD_bigstack);
}
#if !defined(UCLINUX)
if ( STD_LP_sbrk ) {
if ( Debug )
printf("about to do sbrk(%d)\n", STD_LP_sbrk);
sbrk(STD_LP_sbrk);
}
#endif
if ( keepgoing )
return 1;
else
return 0; /* done - stop iterating */
}
/*
* This function recressively calls itself max times.
*/
static void
usc_recressive_func(cnt, max, bstack)
int cnt;
int max;
struct usc_bigstack_t *bstack;
{
if ( cnt < max )
usc_recressive_func(cnt+1, max, bstack);
}
#if UNIT_TEST
/******************************************************************************
* UNIT TEST CODE
* UNIT TEST CODE
*
* this following code is provide so that unit testing can
* be done fairly easily.
******************************************************************************/
int Help = 0;
int Help2 = 0;
char *ptr;
/*
* Code from usctest.h that not part of this file since we are the library.
*/
struct usc_errno_t TEST_VALID_ENO[USC_MAX_ERRNO];
/***********************************************************************
* Globals for returning the return code and errno from the system call
* test macros.
***********************************************************************/
int TEST_RETURN;
int TEST_ERRNO;
/***********************************************************************
* temporary variables for determining max and min times in TEST macro
***********************************************************************/
long btime, etime, tmptime;
/* for test specific parse_opts options */
option_t Options[] = {
{ "help", &Help2, NULL }, /* -help option */
{ "h", &Help, NULL }, /* -h option */
{ TIMING, NULL, NULL}, /* disable -timing option */
#if INVALID_TEST_CASES
{ "missingflag", NULL, &ptr }, /* error */
{ "missingarg:", &Help, NULL }, /* error */
#endif /* INVALID_TEST_CASES */
{ NULL, NULL, NULL }
};
main(argc, argv)
int argc;
char **argv;
{
int lc;
char *msg;
struct timeval t;
int cnt;
if ( (msg=parse_opts(argc, argv,
(option_t *) Options)) != (char *) NULL ) {
printf("ERROR : %s\n", msg);
exit(1);
}
TEST_PAUSE;
for (lc=0; TEST_LOOPING(lc); lc++) {
TEST( gettimeofday(&t, NULL) );
printf("iter=%d: sec:%d, usec:%6.6d %s", lc+1, t.tv_sec,
t.tv_usec, ctime(&t.tv_sec));
}
TEST_CLEANUP;
exit(0);
}
#endif /* UNIT_TEST */

209
minix/tests/ipc/lib/rmobj.c
View file

@ -1,209 +0,0 @@
/*
* 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/
*/
/**********************************************************
*
* OS Testing - Silicon Graphics, Inc.
*
* FUNCTION NAME : rmobj()
*
* FUNCTION TITLE : Remove an object
*
* SYNOPSIS:
* int rmobj(char *obj, char **errmsg)
*
* AUTHOR : Kent Rogers
*
* INITIAL RELEASE : UNICOS 7.0
*
* USER DESCRIPTION
* This routine will remove the specified object. If the specified
* object is a directory, it will recursively remove the directory
* and everything underneath it. It assumes that it has privilege
* to remove everything that it tries to remove. If rmobj() encounters
* any problems, and errmsg is not NULL, errmsg is set to point to a
* string explaining the error.
*
* DETAILED DESCRIPTION
* Allocate space for the directory and its contents
* Open the directory to get access to what is in it
* Loop through the objects in the directory:
* If the object is not "." or "..":
* Determine the file type by calling lstat()
* If the object is not a directory:
* Remove the object with unlink()
* Else:
* Call rmobj(object) to remove the object's contents
* Determine the link count on object by calling lstat()
* If the link count >= 3:
* Remove the directory with unlink()
* Else
* Remove the directory with rmdir()
* Close the directory and free the pointers
*
* RETURN VALUE
* If there are any problems, rmobj() will set errmsg (if it was not
* NULL) and return -1. Otherwise it will return 0.
*
************************************************************/
#include <errno.h> /* for errno */
#include <stdio.h> /* for NULL */
#include <stdlib.h> /* for malloc() */
#include <string.h> /* for string function */
#include <limits.h> /* for PATH_MAX */
#include <sys/types.h> /* for opendir(), readdir(), closedir(), stat() */
#include <sys/stat.h> /* for [l]stat() */
#include <dirent.h> /* for opendir(), readdir(), closedir() */
#include <unistd.h> /* for rmdir(), unlink() */
#include "rmobj.h"
#define SYSERR strerror(errno)
int
rmobj(char *obj, char **errmsg)
{
int ret_val = 0; /* return value from this routine */
DIR *dir; /* pointer to a directory */
struct dirent *dir_ent; /* pointer to directory entries */
char dirobj[PATH_MAX]; /* object inside directory to modify */
struct stat statbuf; /* used to hold stat information */
static char err_msg[1024]; /* error message */
/* Determine the file type */
if ( lstat(obj, &statbuf) < 0 ) {
if ( errmsg != NULL ) {
sprintf(err_msg, "lstat(%s) failed; errno=%d: %s",
obj, errno, SYSERR);
*errmsg = err_msg;
}
return -1;
}
/* Take appropriate action, depending on the file type */
if ( (statbuf.st_mode & S_IFMT) == S_IFDIR ) {
/* object is a directory */
/* Do NOT perform the request if the directory is "/" */
if ( !strcmp(obj, "/") ) {
if ( errmsg != NULL ) {
sprintf(err_msg, "Cannot remove /");
*errmsg = err_msg;
}
return -1;
}
/* Open the directory to get access to what is in it */
if ( (dir = opendir(obj)) == NULL ) {
if ( rmdir(obj) != 0 ) {
if ( errmsg != NULL ) {
sprintf(err_msg, "rmdir(%s) failed; errno=%d: %s",
obj, errno, SYSERR);
*errmsg = err_msg;
}
return -1;
} else {
return 0;
}
}
/* Loop through the entries in the directory, removing each one */
for ( dir_ent = (struct dirent *)readdir(dir);
dir_ent != NULL;
dir_ent = (struct dirent *)readdir(dir)) {
/* Don't remove "." or ".." */
if ( !strcmp(dir_ent->d_name, ".") || !strcmp(dir_ent->d_name, "..") )
continue;
/* Recursively call this routine to remove the current entry */
sprintf(dirobj, "%s/%s", obj, dir_ent->d_name);
if ( rmobj(dirobj, errmsg) != 0 )
ret_val = -1;
}
/* Close the directory */
closedir(dir);
/* If there were problems removing an entry, don't attempt to
remove the directory itself */
if ( ret_val == -1 )
return -1;
/* Get the link count, now that all the entries have been removed */
if ( lstat(obj, &statbuf) < 0 ) {
if ( errmsg != NULL ) {
sprintf(err_msg, "lstat(%s) failed; errno=%d: %s",
obj, errno, SYSERR);
*errmsg = err_msg;
}
return -1;
}
/* Remove the directory itself */
if ( statbuf.st_nlink >= 3 ) {
/* The directory is linked; unlink() must be used */
if ( unlink(obj) < 0 ) {
if ( errmsg != NULL ) {
sprintf(err_msg, "unlink(%s) failed; errno=%d: %s",
obj, errno, SYSERR);
*errmsg = err_msg;
}
return -1;
}
} else {
/* The directory is not linked; rmdir() can be used */
if ( rmdir(obj) < 0 ) {
if ( errmsg != NULL ) {
sprintf(err_msg, "remove(%s) failed; errno=%d: %s",
obj, errno, SYSERR);
*errmsg = err_msg;
}
return -1;
}
}
} else {
/* object is not a directory; just use unlink() */
if ( unlink(obj) < 0 ) {
if ( errmsg != NULL ) {
sprintf(err_msg, "unlink(%s) failed; errno=%d: %s",
obj, errno, SYSERR);
*errmsg = err_msg;
}
return -1;
}
} /* if obj is a directory */
/*
* Everything must have went ok.
*/
return 0;
} /* rmobj() */

12
minix/tests/ipc/lib/rmobj.h
View file

@ -1,12 +0,0 @@
#ifndef _RMOBJ_H_
#define _RMOBJ_H_
/*
* rmobj() - Remove the specified object. If the specified object is a
* directory, recursively remove everything inside of it. If
* there are any problems, set errmsg (if it is not NULL) and
* return -1. Otherwise return 0.
*/
int rmobj( char *object , char **errmesg );
#endif

247
minix/tests/ipc/lib/test.h
View file

@ -1,247 +0,0 @@
/*
* 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/
*/
#ifndef __TEST_H__
#define __TEST_H__
#include <stdio.h>
#include <signal.h>
#include <unistd.h>
#include <string.h>
#include <stdlib.h>
#define TPASS 0 /* Test passed flag */
#define TFAIL 1 /* Test failed flag */
#define TBROK 2 /* Test broken flag */
#define TWARN 4 /* Test warning flag */
#define TRETR 8 /* Test retire flag */
#define TINFO 16 /* Test information flag */
#define TCONF 32 /* Test not appropriate for configuration flag */
/*
* To determine if you are on a Umk or Unicos system,
* use sysconf(_SC_CRAY_SYSTEM). But since _SC_CRAY_SYSTEM
* is not defined until 90, it will be define here if not already
* defined.
* if ( sysconf(_SC_CRAY_SYSTEM) == 1 )
* on UMK
* else # returned 0 or -1
* on Unicos
* This is only being done on CRAY systems.
*/
#ifdef CRAY
#ifndef _SC_CRAY_SYSTEM
#define _SC_CRAY_SYSTEM 140
#endif /* ! _SC_CRAY_SYSTEM */
#endif /* CRAY */
/*
* Ensure that NUMSIGS is defined.
* It should be defined in signal.h or sys/signal.h on
* UNICOS/mk and IRIX systems. On UNICOS systems,
* it is not defined, thus it is being set to UNICOS's NSIG.
* Note: IRIX's NSIG (signals are 1-(NSIG-1))
* is not same meaning as UNICOS/UMK's NSIG (signals 1-NSIG)
*/
#define NSIG _NSIG
#define SIGCLD SIGCHLD
#ifndef NUMSIGS
#define NUMSIGS NSIG
#endif
/* defines for unexpected signal setup routine (set_usig.c) */
#define FORK 1 /* SIGCLD is to be ignored */
#define NOFORK 0 /* SIGCLD is to be caught */
#define DEF_HANDLER 0 /* tells set_usig() to use default signal handler */
/*
* The following defines are used to control tst_res and t_result reporting.
*/
#define TOUTPUT "TOUTPUT" /* The name of the environment variable */
/* that can be set to one of the following */
/* strings to control tst_res output */
/* If not set, TOUT_VERBOSE_S is assumed */
#define TOUT_VERBOSE_S "VERBOSE" /* All test cases reported */
#define TOUT_CONDENSE_S "CONDENSE" /* ranges are used where identical messages*/
/* occur for sequential test cases */
#define TOUT_NOPASS_S "NOPASS" /* No pass test cases are reported */
#define TOUT_DISCARD_S "DISCARD" /* No output is reported */
#define TST_NOBUF "TST_NOBUF" /* The name of the environment variable */
/* that can be set to control whether or not */
/* tst_res will buffer output into 4096 byte */
/* blocks of output */
/* If not set, buffer is done. If set, no */
/* internal buffering will be done in tst_res */
/* t_result does not have internal buffering */
/*
* The following defines are used to control tst_tmpdir, tst_wildcard and t_mkchdir
*/
#define TDIRECTORY "TDIRECTORY" /* The name of the environment variable */
/* that if is set, the value (directory) */
/* is used by all tests as their working */
/* directory. tst_rmdir and t_rmdir will */
/* not attempt to clean up. */
/* This environment variable should only */
/* be set when doing system testing since */
/* tests will collide and break and fail */
/* because of setting it. */
#define TEMPDIR "/tmp" /* This is the default temporary directory. */
/* The environment variable TMPDIR is */
/* used prior to this valid by tempnam(3). */
/* To control the base location of the */
/* temporary directory, set the TMPDIR */
/* environment variable to desired path */
/*
* The following contains support for error message passing.
* See test_error.c for details.
*/
#define TST_ERR_MESG_SIZE 1023 /* max size of error message */
#define TST_ERR_FILE_SIZE 511 /* max size of module name used by compiler */
#define TST_ERR_FUNC_SIZE 127 /* max size of func name */
typedef struct {
int te_line; /* line where last error was reported. Use */
/* "__LINE__" and let compiler do the rest */
int te_level; /* If set, will prevent current stored */
/* error to not be overwritten */
char te_func[TST_ERR_FUNC_SIZE+1]; /* name of function of last error */
/* Name of function or NULL */
char te_file[TST_ERR_FILE_SIZE+1]; /* module of last error. Use */
/* "__FILE__" and let compiler do the rest */
char te_mesg[TST_ERR_MESG_SIZE+1]; /* string of last error */
} _TST_ERROR;
extern _TST_ERROR Tst_error; /* defined in test_error.c */
#if __STDC__
extern void tst_set_error(char *file, int line, char *func, char *fmt, ...);
#else
extern void tst_set_error(void);
#endif
extern void tst_clear_error(void);
/*
* The following define contains the name of an environmental variable
* that can be used to specify the number of iterations.
* It is supported in parse_opts.c and USC_setup.c.
*/
#define USC_ITERATION_ENV "USC_ITERATIONS"
/*
* The following define contains the name of an environmental variable
* that can be used to specify to iteration until desired time
* in floating point seconds has gone by.
* Supported in USC_setup.c.
*/
#define USC_LOOP_WALLTIME "USC_LOOP_WALLTIME"
/*
* The following define contains the name of an environmental variable
* that can be used to specify that no functional checks are wanted.
* It is supported in parse_opts.c and USC_setup.c.
*/
#define USC_NO_FUNC_CHECK "USC_NO_FUNC_CHECK"
/*
* The following define contains the name of an environmental variable
* that can be used to specify the delay between each loop iteration.
* The value is in seconds (fractional numbers are allowed).
* It is supported in parse_opts.c.
*/
#define USC_LOOP_DELAY "USC_LOOP_DELAY"
/*
* fork() can't be used on uClinux systems, so use FORK_OR_VFORK instead,
* which will run vfork() on uClinux.
* mmap() doesn't support MAP_PRIVATE on uClinux systems, so use
* MAP_PRIVATE_EXCEPT_UCLINUX instead, which will skip the option on uClinux.
* If MAP_PRIVATE really is required, the test can not be run on uClinux.
*/
#ifdef UCLINUX
#define FORK_OR_VFORK vfork
#define MAP_PRIVATE_EXCEPT_UCLINUX 0
#else
#define FORK_OR_VFORK fork
#define MAP_PRIVATE_EXCEPT_UCLINUX MAP_PRIVATE
#endif
/*
* The following prototypes are needed to remove compile errors
* on IRIX systems when compiled with -n32 and -64.
*/
extern void tst_res(int ttype, char *fname, char *arg_fmt, ...);
extern void tst_resm(int ttype, char *arg_fmt, ...);
extern void tst_brk(int ttype, char *fname, void (*func)(void),
char *arg_fmt, ...);
extern void tst_brkloop(int ttype, char *fname, void (*func)(void),
char *arg_fmt, ...);
extern void tst_brkm(int ttype, void (*func)(void), char *arg_fmt, ...);
extern void tst_brkloopm(int ttype, void (*func)(void), char *arg_fmt, ...);
extern int tst_environ(void);
extern void tst_exit(void);
extern void tst_flush(void);
/* prototypes for the t_res.c functions */
extern void t_result(char *tcid, int tnum, int ttype, char *tmesg);
extern void tt_exit(void);
extern int t_environ(void);
extern void t_breakum(char *tcid, int total, int typ, char *msg, void (*fnc)(void));
extern void tst_sig(int fork_flag, void (*handler)(int), void (*cleanup)(void));
extern void tst_tmpdir(void);
extern void tst_rmdir(void);
extern char * get_high_address(void);
extern void get_kver(int*, int*, int*);
extern int tst_kvercmp(int, int, int);
extern int tst_is_cwd_tmpfs(void);
extern int tst_cwd_has_free(int required_kib);
extern int Tst_count;
/* self_exec.c functions */
void maybe_run_child(void (*child)(void), char *fmt, ...);
int self_exec(char *argv0, char *fmt, ...);
#endif /* end of __TEST_H__ */

966
minix/tests/ipc/lib/tst_res.c
View file

@ -1,966 +0,0 @@
/*
* 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/
*/
/**********************************************************
*
* OS Testing - Silicon Graphics, Inc.
*
* FUNCTION NAME :
* tst_res() - Print result message (include file contents)
* tst_resm() - Print result message
* tst_brk() - Print result message (include file contents)
* and break remaining test cases
* tst_brkm() - Print result message and break remaining test
* cases
* tst_brkloop() - Print result message (include file contents)
* and break test cases remaining in current loop
* tst_brkloopm() - Print result message and break test case
* remaining in current loop
* tst_flush() - Print any messages pending because of
* CONDENSE mode, and flush output stream
* tst_exit() - Exit test with a meaningful exit value.
* tst_environ() - Keep results coming to original stdout
*
* FUNCTION TITLE : Standard automated test result reporting mechanism
*
* SYNOPSIS:
* #include "test.h"
*
* void tst_res(ttype, fname, tmesg [,arg]...)
* int ttype;
* char *fname;
* char *tmesg;
*
* void tst_resm(ttype, tmesg [,arg]...)
* int ttype;
* char *tmesg;
*
* void tst_brk(ttype, fname, cleanup, tmesg, [,argv]...)
* int ttype;
* char *fname;
* void (*cleanup)();
* char *tmesg;
*
* void tst_brkm(ttype, cleanup, tmesg [,arg]...)
* int ttype;
* void (*cleanup)();
* char *tmesg;
*
* void tst_brkloop(ttype, fname, cleanup, char *tmesg, [,argv]...)
* int ttype;
* char *fname;
* void (*cleanup)();
* char *tmesg;
*
* void tst_brkloopm(ttype, cleanup, tmesg [,arg]...)
* int ttype;
* void (*cleanup)();
* char *tmesg;
*
* void tst_flush()
*
* void tst_exit()
*
* int tst_environ()
*
* AUTHOR : Kent Rogers (from Dave Fenner's original)
*
* CO-PILOT : Rich Logan
*
* DATE STARTED : 05/01/90 (rewritten 1/96)
*
* DESCRIPTION
* See the man page(s).
*
*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#**/
#include <errno.h>
#include <string.h>
#include <stdio.h> /* for I/O functions, BUFSIZ */
#include <stdlib.h> /* for getenv() */
#include <stdarg.h> /* for varargs stuff */
#include <unistd.h> /* for access() */
#include "test.h" /* for output display mode & result type */
/* defines */
/*
* Define some useful macros.
*/
#define VERBOSE 1 /* flag values for the T_mode variable */
#define CONDENSE 2
#define NOPASS 3
#define DISCARD 4
#define MAXMESG 80 /* max length of internal messages */
#define USERMESG 2048 /* max length of user message */
#define TRUE 1
#define FALSE 0
/*
* EXPAND_VAR_ARGS - Expand the variable portion (arg_fmt) of a result
* message into the specified string.
*/
#define EXPAND_VAR_ARGS(arg_fmt, str) { \
va_list ap; /* varargs mechanism */ \
\
if ( arg_fmt != NULL ) { \
if ( Expand_varargs == TRUE ) { \
va_start(ap, arg_fmt); \
vsprintf(str, arg_fmt, ap); \
va_end(ap); \
Expand_varargs = FALSE; \
} else { \
strcpy(str, arg_fmt); \
} \
} else { \
str[0] = '\0'; \
} \
} /* EXPAND_VAR_ARGS() */
/*
* Define local function prototypes.
*/
static void check_env(void);
static void tst_condense(int tnum, int ttype, char *tmesg);
static void tst_print(char *tcid, int tnum, int trange, int ttype, char *tmesg);
static void cat_file(char *filename);
/*
* Define some static/global variables.
*/
static FILE *T_out = NULL; /* tst_res() output file descriptor */
static char *File; /* file whose contents is part of result */
static int T_exitval = 0; /* exit value used by tst_exit() */
static int T_mode = VERBOSE; /* flag indicating print mode: VERBOSE, */
/* CONDENSE, NOPASS, DISCARD */
static int Expand_varargs = TRUE; /* if TRUE, expand varargs stuff */
static char Warn_mesg[MAXMESG]; /* holds warning messages */
/*
* These are used for condensing output when NOT in verbose mode.
*/
static int Buffered = FALSE; /* TRUE if condensed output is currently */
/* buffered (i.e. not yet printed) */
static char *Last_tcid; /* previous test case id */
static int Last_num; /* previous test case number */
static int Last_type; /* previous test result type */
static char *Last_mesg; /* previous test result message */
/*
* These globals may be externed by the test.
*/
int Tst_count = 0; /* current count of test cases executed; NOTE: */
/* Tst_count may be externed by other programs */
int Tst_lptotal = 0; /* tst_brkloop() external */
int Tst_lpstart = 0; /* tst_brkloop() external */
int Tst_range = 1; /* for specifying multiple results */
int Tst_nobuf = 1; /* this is a no-op; buffering is never done, but */
/* this will stay for compatibility reasons */
/*
* These globals must be defined in the test.
*/
extern char *TCID; /* Test case identifier from the test source */
extern int TST_TOTAL; /* Total number of test cases from the test */
/* source */
/*
* This global is used by the temp. dir. maintenance functions,
* tst_tmpdir()/tst_rmdir(), tst_wildcard()/tst_tr_rmdir(). It is the
* name of the directory created (if any). It is defined here, so that
* it only has to be declared once and can then be referenced from more
* than one module. Also, since the temp. dir. maintenance functions
* rely on the tst_res.c package this seemed like a reasonable place.
*/
char *TESTDIR = NULL;
/*
* tst_res() - Main result reporting function. Handle test information
* appropriately depending on output display mode. Call
* tst_condense() or tst_print() to actually print results.
* All result functions (tst_resm(), tst_brk(), etc.)
* eventually get here to print the results.
*/
void
tst_res(int ttype, char *fname, char *arg_fmt, ...)
{
int i;
char tmesg[USERMESG]; /* expanded message */
#if DEBUG
printf("IN tst_res; Tst_count = %d; Tst_range = %d\n",
Tst_count, Tst_range); fflush(stdout);
#endif
/*
* Expand the arg_fmt string into tmesg, if necessary.
*/
EXPAND_VAR_ARGS(arg_fmt, tmesg);
/*
* Save the test result type by ORing ttype into the current exit
* value (used by tst_exit()).
*/
T_exitval |= ttype;
/*
* Unless T_out has already been set by tst_environ(), make tst_res()
* output go to standard output.
*/
if ( T_out == NULL )
T_out = stdout;
/*
* Check TOUTPUT environment variable (if first time) and set T_mode
* flag.
*/
check_env();
/*
* A negative or NULL range is invalid.
*/
if ( Tst_range <= 0 ) {
Tst_range = 1;
tst_print(TCID, 0, 1, TWARN,
"tst_res(): Tst_range must be positive");
}
/*
* If a filename was specified, set 'File' if it exists.
*/
if ( fname != NULL && access(fname, F_OK) == 0 )
File = fname;
/*
* Set the test case number and print the results, depending on the
* display type.
*/
if ( ttype == TWARN || ttype == TINFO ) {
/*
* Handle WARN and INFO results (test case number is 0).
*/
if ( Tst_range > 1 ) {
tst_print(TCID, 0, 1, TWARN,
"tst_res(): Range not valid for TINFO or TWARN types");
}
tst_print(TCID, 0, 1, ttype, tmesg);
} else {
/*
* Handle all other types of results other than WARN and INFO.
*/
if ( Tst_count < 0 )
tst_print(TCID, 0, 1, TWARN,
"tst_res(): Tst_count < 0 is not valid");
/*
* Process each display type.
*/
switch ( T_mode ) {
case DISCARD:
/* do not print any results */
break;
case NOPASS: /* passing result types are filtered by tst_print() */
case CONDENSE:
tst_condense(Tst_count + 1, ttype, tmesg);
break;
default: /* VERBOSE */
for ( i = 1 ; i <= Tst_range ; i++ )
tst_print(TCID, Tst_count + i, Tst_range, ttype, tmesg);
break;
} /* end switch() */
/*
* Increment Tst_count.
*/
Tst_count += Tst_range;
} /* if ( ttype == TWARN || ttype == TINFO ) */
/*
* Reset some values.
*/
Tst_range = 1;
Expand_varargs = TRUE;
} /* tst_res() */
/*
* tst_condense() - Handle test cases in CONDENSE or NOPASS mode (i.e.
* buffer the current result and print the last result
* if different than the current). If a file was
* specified, print the current result and do not
* buffer it.
*/
static void
tst_condense(int tnum, int ttype, char *tmesg)
{
char *file;
#if DEBUG
printf("IN tst_condense: tcid = %s, tnum = %d, ttype = %d, tmesg = %s\n",
TCID, tnum, ttype, tmesg);
fflush(stdout);
#endif
/*
* If this result is the same as the previous result, return.
*/
if ( Buffered == TRUE ) {
if ( strcmp(Last_tcid, TCID) == 0 && Last_type == ttype &&
strcmp(Last_mesg, tmesg) == 0 && File == NULL )
return;
/*
* This result is different from the previous result. First,
* print the previous result.
*/
file = File;
File = NULL;
tst_print(Last_tcid, Last_num, tnum - Last_num, Last_type,
Last_mesg);
free(Last_tcid);
free(Last_mesg);
File = file;
} /* if ( Buffered == TRUE ) */
/*
* If a file was specified, print the current result since we have no
* way of retaining the file contents for comparing with future
* results. Otherwise, buffer the current result info for next time.
*/
if ( File != NULL ) {
tst_print(TCID, tnum, Tst_range, ttype, tmesg);
Buffered = FALSE;
} else {
Last_tcid = (char *)malloc(strlen(TCID) + 1);
strcpy(Last_tcid, TCID);
Last_num = tnum;
Last_type = ttype;
Last_mesg = (char *)malloc(strlen(tmesg) + 1);
strcpy(Last_mesg, tmesg);
Buffered = TRUE;
}
} /* tst_condense() */
/*
* tst_flush() - Print any messages pending because of CONDENSE mode,
* and flush T_out.
*/
void
tst_flush(void)
{
#if DEBUG
printf("IN tst_flush\n");
fflush(stdout);
#endif
/*
* Print out last line if in CONDENSE or NOPASS mode.
*/
if ( Buffered == TRUE && (T_mode == CONDENSE || T_mode == NOPASS) ) {
tst_print(Last_tcid, Last_num, Tst_count - Last_num + 1,
Last_type, Last_mesg);
Buffered = FALSE;
}
fflush(T_out);
} /* tst_flush() */
/*
* tst_print() - Actually print a line or range of lines to the output
* stream.
*/
static void
tst_print(char *tcid, int tnum, int trange, int ttype, char *tmesg)
{
char type[5];
#if DEBUG
printf("IN tst_print: tnum = %d, trange = %d, ttype = %d, tmesg = %s\n",
tnum, trange, ttype, tmesg);
fflush(stdout);
#endif
/*
* Save the test result type by ORing ttype into the current exit
* value (used by tst_exit()). This is already done in tst_res(), but
* is also done here to catch internal warnings. For internal warnings,
* tst_print() is called directly with a case of TWARN.
*/
T_exitval |= ttype;
/*
* If output mode is DISCARD, or if the output mode is NOPASS and
* this result is not one of FAIL, BROK, or WARN, just return. This
* check is necessary even though we check for DISCARD mode inside of
* tst_res(), since occasionally we get to this point without going
* through tst_res() (e.g. internal TWARN messages).
*/
if ( T_mode == DISCARD || (T_mode == NOPASS && ttype != TFAIL &&
ttype != TBROK && ttype != TWARN) )
return;
/*
* Fill in the type string according to ttype.
*/
switch ( ttype ) {
case TPASS:
strcpy(type, "PASS");
break;
case TFAIL:
strcpy(type, "FAIL");
break;
case TBROK:
strcpy(type, "BROK");
break;
case TRETR:
strcpy(type, "RETR");
break;
case TCONF:
strcpy(type, "CONF");
break;
case TWARN:
strcpy(type, "WARN");
break;
case TINFO:
strcpy(type, "INFO");
break;
default:
strcpy(type, "????");
break;
} /* switch ( ttype ) */
/*
* Build the result line and print it.
*/
if ( T_mode == VERBOSE ) {
fprintf(T_out, "%-8s %4d %s : %s\n", tcid, tnum, type, tmesg);
} else {
/* condense results if a range is specified */
if ( trange > 1 )
fprintf(T_out, "%-8s %4d-%-4d %s : %s\n",
tcid, tnum, tnum + trange - 1, type, tmesg);
else
fprintf(T_out, "%-8s %4d %s : %s\n",
tcid, tnum, type, tmesg);
}
/*
* If tst_res() was called with a file, append file contents to the
* end of last printed result.
*/
if ( File != NULL )
cat_file(File);
File = NULL;
} /* tst_print() */
/*
* check_env() - Check the value of the environment variable TOUTPUT and
* set the global variable T_mode. The TOUTPUT environment
* variable should be set to "VERBOSE", "CONDENSE",
* "NOPASS", or "DISCARD". If TOUTPUT does not exist or
* is not set to a valid value, the default is "VERBOSE".
*/
static void
check_env(void)
{
static int first_time = 1;
char *value; /* value of TOUTPUT environment variable */
#if DEBUG
printf("IN check_env\n");
fflush(stdout);
#endif
if ( !first_time )
return;
first_time = 0;
if ( (value = getenv(TOUTPUT)) == NULL ) {
/* TOUTPUT not defined, use default */
T_mode = VERBOSE;
} else if ( strcmp(value, TOUT_CONDENSE_S) == 0 ) {
T_mode = CONDENSE;
} else if ( strcmp(value, TOUT_NOPASS_S) == 0 ) {
T_mode = NOPASS;
} else if ( strcmp(value, TOUT_DISCARD_S) == 0 ) {
T_mode = DISCARD;
} else {
/* default */
T_mode = VERBOSE;
}
return;
} /* check_env() */
/*
* tst_exit() - Call exit() with the value T_exitval, set up by
* tst_res(). T_exitval has a bit set for most of the
* result types that were seen (including TPASS, TFAIL,
* TBROK, TWARN, TCONF). Also, print the last result (if
* necessary) before exiting.
*/
void
tst_exit(void)
{
#if DEBUG
printf("IN tst_exit\n"); fflush(stdout);
fflush(stdout);
#endif
/*
* Call tst_flush() flush any ouput in the buffer or the last
* result not printed because of CONDENSE mode.
*/
tst_flush();
/*
* Mask out TRETR, TINFO, and TCONF results from the exit status.
*/
exit(T_exitval & ~(TRETR | TINFO | TCONF));
} /* tst_exit() */
/*
* tst_environ() - Preserve the tst_res() output location, despite any
* changes to stdout.
*/
int
tst_environ()
{
#if defined UCLINUX && EMBED && CONFIG_BLACKFIN
FILE *fdopen;
#else
FILE *fdopen(int fd, const char *mode);
#endif
if ( (T_out = fdopen(dup(fileno(stdout)), "w")) == NULL )
return(-1);
else
return(0);
} /* tst_environ() */
/*
* tst_brk() - Fail or break current test case, and break the remaining
* tests cases.
*/
void
tst_brk(int ttype, char *fname, void (*func)(void), char *arg_fmt, ...)
{
char tmesg[USERMESG]; /* expanded message */
#if DEBUG
printf("IN tst_brk\n"); fflush(stdout);
fflush(stdout);
#endif
/*
* Expand the arg_fmt string into tmesg, if necessary.
*/
EXPAND_VAR_ARGS(arg_fmt, tmesg);
/*
* Only FAIL, BROK, CONF, and RETR are supported by tst_brk().
*/
if ( ttype != TFAIL && ttype != TBROK && ttype != TCONF &&
ttype != TRETR ) {
sprintf(Warn_mesg, "tst_brk(): Invalid Type: %d. Using TBROK",
ttype);
tst_print(TCID, 0, 1, TWARN, Warn_mesg);
ttype = TBROK;
}
/*
* Print the first result, if necessary.
*/
if ( Tst_count < TST_TOTAL )
tst_res(ttype, fname, tmesg);
/*
* Determine the number of results left to report.
*/
Tst_range = TST_TOTAL - Tst_count;
/*
* Print the rest of the results, if necessary.
*/
if ( Tst_range > 0 ) {
if ( ttype == TCONF )
tst_res(ttype, NULL,
"Remaining cases not appropriate for configuration");
else if ( ttype == TRETR )
tst_res(ttype, NULL, "Remaining cases retired");
else
tst_res(TBROK, NULL, "Remaining cases broken");
} else {
Tst_range = 1;
Expand_varargs = TRUE;
} /* if ( Tst_range > 0 ) */
/*
* If no cleanup function was specified, just return to the caller.
* Otherwise call the specified function. If specified function
* returns, call tst_exit().
*/
if ( func != NULL ) {
(*func)();
tst_exit();
}
return;
} /* tst_brk() */
/*
* tst_brkloop() - Fail or break current test case, and break the
* remaining test cases within test case loop.
*/
void
tst_brkloop(int ttype, char *fname, void (*func)(void), char *arg_fmt, ...)
{
char tmesg[USERMESG]; /* expanded message */
#if DEBUG
printf("IN tst_brkloop\n"); fflush(stdout);
fflush(stdout);
#endif
/*
* Expand the arg_fmt string into tmesg.
*/
EXPAND_VAR_ARGS(arg_fmt, tmesg);
/*
* Verify that Tst_lpstart & Tst_lptotal are valid.
*/
if ( Tst_lpstart < 0 || Tst_lptotal < 0 ) {
tst_print(TCID, 0, 1, TWARN,
"tst_brkloop(): Tst_lpstart & Tst_lptotal must both be assigned non-negative values");
Expand_varargs = TRUE;
return;
}
/*
* Only FAIL, BROK, CONF, and RETR are supported by tst_brkloop().
*/
if ( ttype != TFAIL && ttype != TBROK && ttype != TCONF &&
ttype != TRETR ) {
sprintf(Warn_mesg,
"tst_brkloop(): Invalid Type: %d. Using TBROK",
ttype);
tst_print(TCID, 0, 1, TWARN, Warn_mesg);
ttype = TBROK;
}
/*
* Print the first result, if necessary.
*/
if ( Tst_count < Tst_lpstart + Tst_lptotal )
tst_res(ttype, fname, tmesg);
/*
* Determine the number of results left to report.
*/
Tst_range = Tst_lptotal + Tst_lpstart - Tst_count;
/*
* Print the rest of the results, if necessary.
*/
if ( Tst_range > 0 ) {
if ( ttype == TCONF )
tst_res(ttype, NULL,
"Remaining cases in loop not appropriate for configuration");
else if ( ttype == TRETR )
tst_res(ttype, NULL, "Remaining cases in loop retired");
else
tst_res(TBROK, NULL, "Remaining cases in loop broken");
} else {
Tst_range = 1;
Expand_varargs = TRUE;
} /* if ( Tst_range > 0 ) */
/*
* If a cleanup function was specified, call it.
*/
if ( func != NULL )
(*func)();
} /* tst_brkloop() */
/*
* tst_resm() - Interface to tst_res(), with no filename.
*/
void
tst_resm(int ttype, char *arg_fmt, ...)
{
char tmesg[USERMESG]; /* expanded message */
#if DEBUG
printf("IN tst_resm\n"); fflush(stdout);
fflush(stdout);
#endif
/*
* Expand the arg_fmt string into tmesg.
*/
EXPAND_VAR_ARGS(arg_fmt, tmesg);
/*
* Call tst_res with a null filename argument.
*/
tst_res(ttype, NULL, tmesg);
} /* tst_resm() */
/*
* tst_brkm() - Interface to tst_brk(), with no filename.
*/
void
tst_brkm(int ttype, void (*func)(void), char *arg_fmt, ...)
{
char tmesg[USERMESG]; /* expanded message */
#if DEBUG
printf("IN tst_brkm\n"); fflush(stdout);
fflush(stdout);
#endif
/*
* Expand the arg_fmt string into tmesg.
*/
EXPAND_VAR_ARGS(arg_fmt, tmesg);
/*
* Call tst_brk with a null filename argument.
*/
tst_brk(ttype, NULL, func, tmesg);
} /* tst_brkm() */
/*
* tst_brkloopm() - Interface to tst_brkloop(), with no filename.
*/
void
tst_brkloopm(int ttype, void (*func)(void), char *arg_fmt, ...)
{
char tmesg[USERMESG]; /* expanded message */
#if DEBUG
printf("IN tst_brkloopm\n");
fflush(stdout);
#endif
/*
* Expand the arg_fmt string into tmesg.
*/
EXPAND_VAR_ARGS(arg_fmt, tmesg);
/*
* Call tst_brkloop with a null filename argument.
*/
tst_brkloop(ttype, NULL, func, tmesg);
} /* tst_brkloopm() */
/*
* cat_file() - Print the contents of a file to standard out.
*/
static void
cat_file(char *filename)
{
FILE *fp; /* file pointer */
int b_read; /* number of bytes read with read() */
int b_written; /* number of bytes written with write() */
char buffer[BUFSIZ]; /* read/write buffer; BUFSIZ defined in */
/* stdio.h */
#if DEBUG
printf("IN cat_file\n"); fflush(stdout);
#endif
/*
* Open the file for reading.
*/
if ( (fp = fopen(filename, "r")) == NULL ) {
sprintf(Warn_mesg,
"tst_res(): fopen(%s, \"r\") failed; errno = %d: %s",
filename, errno, strerror(errno));
tst_print(TCID, 0, 1, TWARN, Warn_mesg);
return;
} /* if ( fopen(filename, "r") == -1 ) */
/*
* While something to read, continue to read blocks.
* From fread(3) man page:
* If an error occurs, or the end-of-file is reached, the return
* value is zero.
*/
errno = 0;
while ( (b_read = fread((void *)buffer, 1, BUFSIZ, fp)) != (size_t)0 ) {
/*
* Write what was read to the result output stream.
*/
if ( (b_written = fwrite((void *)buffer, 1, b_read, T_out)) !=
b_read ) {
sprintf(Warn_mesg,
"tst_res(): While trying to cat \"%s\", fwrite() wrote only %d of %d bytes",
filename, b_written, b_read);
tst_print(TCID, 0, 1, TWARN, Warn_mesg);
break;
} /* if ( b_written != b_read ) */
} /* while ( fread() != 0 ) */
/*
* Check for an fread() error.
*/
if ( !feof(fp) ) {
sprintf(Warn_mesg,
"tst_res(): While trying to cat \"%s\", fread() failed, errno = %d: %s",
filename, errno, strerror(errno));
tst_print(TCID, 0, 1, TWARN, Warn_mesg);
} /* if ( !feof() ) */
/*
* Close the file.
*/
if ( fclose(fp) == EOF ) {
sprintf(Warn_mesg,
"tst_res(): While trying to cat \"%s\", fclose() failed, errno = %d: %s",
filename, errno, strerror(errno));
tst_print(TCID, 0, 1, TWARN, Warn_mesg);
} /* if ( fclose(fp) == EOF ) */
} /* cat_file() */
#ifdef UNIT_TEST
/****************************************************************************
* Unit test code: Takes input from stdin and can make the following
* calls: tst_res(), tst_resm(), tst_brk(), tst_brkm(),
* tst_flush_buf(), tst_exit().
****************************************************************************/
int TST_TOTAL = 10;
char *TCID = "TESTTCID";
#define RES "tst_res.c UNIT TEST message; ttype = %d; contents of \"%s\":"
#define RESM "tst_res.c UNIT TEST message; ttype = %d"
main(void)
{
int ttype;
int range;
char *chrptr;
char chr;
char fname[MAXMESG];
printf("UNIT TEST of tst_res.c. Options for ttype:\n\
-1 : call tst_exit()\n\
-2 : call tst_flush()\n\
-3 : call tst_brk()\n\
-4 : call tst_brkloop()\n\
-5 : call tst_res() with a range\n\
0 : call tst_res(TPASS, ...)\n\
1 : call tst_res(TFAIL, ...)\n\
2 : call tst_res(TBROK, ...)\n\
4 : call tst_res(TWARN, ...)\n\
8 : call tst_res(TRETR, ...)\n\
16 : call tst_res(TINFO, ...)\n\
32 : call tst_res(TCONF, ...)\n\n");
while ( 1 ) {
printf("Enter ttype (-5,-4,-3,-2,-1,0,1,2,4,8,16,32): ");
(void) scanf("%d%c", &ttype, &chr);
switch ( ttype ) {
case -1:
tst_exit();
break;
case -2:
tst_flush();
break;
case -3:
printf("Enter the current type (1=FAIL, 2=BROK, 8=RETR, 32=CONF): ");
(void) scanf("%d%c", &ttype, &chr);
printf("Enter file name (<cr> for none): ");
gets(fname);
if ( strcmp(fname, "") == 0 )
tst_brkm(ttype, tst_exit, RESM, ttype);
else
tst_brk(ttype, fname, tst_exit, RES, ttype, fname);
break;
case -4:
printf("Enter the size of the loop: ");
(void) scanf("%d%c", &range, &chr);
Tst_lpstart = Tst_count;
Tst_lptotal = range;
printf("Enter the current type (1=FAIL, 2=BROK, 8=RETR, 32=CONF): ");
(void) scanf("%d%c", &ttype, &chr);
printf("Enter file name (<cr> for none): ");
gets(fname);
if ( strcmp(fname, "") == 0 )
tst_brkloopm(ttype, NULL, RESM, ttype);
else
tst_brkloop(ttype, fname, NULL, RES, ttype, fname);
break;
case -5:
printf("Enter the size of the range: ");
(void) scanf("%d%c", &Tst_range, &chr);
printf("Enter the current type (0,1,2,4,8,16,32): ");
(void) scanf("%d%c", &ttype, &chr);
/* fall through to tst_res() call */
default:
printf("Enter file name (<cr> for none): ");
gets(fname);
if ( strcmp(fname, "") == 0 )
tst_resm(ttype, RESM, ttype);
else
tst_res(ttype, fname, RES, ttype, fname);
break;
} /* switch() */
} /* while() */
}
#endif /* UNIT_TEST */

286
minix/tests/ipc/lib/tst_sig.c
View file

@ -1,286 +0,0 @@
/*
* 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/
*/
/*****************************************************************************
OS Testing - Silicon Graphics, Inc.
FUNCTION IDENTIFIER : tst_sig Set up for unexpected signals.
AUTHOR : David D. Fenner
CO-PILOT : Bill Roske
DATE STARTED : 06/06/90
This module may be linked with c-modules requiring unexpected
signal handling. The parameters to tst_sig are as follows:
fork_flag - set to FORK or NOFORK depending upon whether the
calling program executes a fork() system call. It
is normally the case that the calling program treats
SIGCLD as an expected signal if fork() is being used.
handler - a pointer to the unexpected signal handler to
be executed after an unexpected signal has been
detected. If handler is set to DEF_HANDLER, a
default handler is used. This routine should be
declared as function returning an int.
cleanup - a pointer to a cleanup routine to be executed
by the unexpected signal handler before tst_exit is
called. This parameter is set to NULL if no cleanup
routine is required. An external variable, T_cleanup
is set so that other user-defined handlers have
access to the cleanup routine. This routine should be
declared as returning type void.
***************************************************************************/
#include <errno.h>
#include <string.h>
#include <signal.h>
#include <unistd.h>
#include "test.h"
#define MAXMESG 150 /* size of mesg string sent to tst_res */
void (*T_cleanup)(void); /* pointer to cleanup function */
/****************************************************************************
* STD_COPIES is defined in parse_opts.c but is externed here in order to
* test whether SIGCHILD should be ignored or not.
***************************************************************************/
extern int STD_COPIES;
static void def_handler(int); /* default signal handler */
static void (*tst_setup_signal( int, void (*)(int)))(int);
/****************************************************************************
* tst_sig() : set-up to catch unexpected signals. fork_flag is set to NOFORK
* if SIGCLD is to be an "unexpected signal", otherwise it is set to
* FORK. cleanup points to a cleanup routine to be executed before
* tst_exit is called (cleanup is set to NULL if no cleanup is desired).
* handler is a pointer to the signal handling routine (if handler is
* set to NULL, a default handler is used).
***************************************************************************/
void
tst_sig(int fork_flag, void (*handler)(int), void (*cleanup)(void))
{
char mesg[MAXMESG]; /* message buffer for tst_res */
int sig;
#ifdef _SC_SIGRT_MIN
long sigrtmin, sigrtmax;
#endif
/*
* save T_cleanup and handler function pointers
*/
T_cleanup = cleanup; /* used by default handler */
if (handler == DEF_HANDLER) {
/* use default handler */
handler = def_handler;
}
#ifdef _SC_SIGRT_MIN
sigrtmin = sysconf(_SC_SIGRT_MIN);
sigrtmax = sysconf(_SC_SIGRT_MAX);
#endif
/*
* now loop through all signals and set the handlers
*/
for (sig = 1; sig < NSIG; sig++) {
/*
* SIGKILL is never unexpected.
* SIGCLD is only unexpected when
* no forking is being done.
* SIGINFO is used for file quotas and should be expected
*/
#ifdef _SC_SIGRT_MIN
if (sig >= sigrtmin && sig <= sigrtmax)
continue;
#endif
switch (sig) {
case SIGKILL:
case SIGSTOP:
case SIGCONT:
#if !defined(_SC_SIGRT_MIN) && defined(__SIGRTMIN) && defined(__SIGRTMAX)
/* Ignore all real-time signals */
case __SIGRTMIN:
case __SIGRTMIN+1:
case __SIGRTMIN+2:
case __SIGRTMIN+3:
case __SIGRTMIN+4:
case __SIGRTMIN+5:
case __SIGRTMIN+6:
case __SIGRTMIN+7:
case __SIGRTMIN+8:
case __SIGRTMIN+9:
case __SIGRTMIN+10:
case __SIGRTMIN+11:
case __SIGRTMIN+12:
case __SIGRTMIN+13:
case __SIGRTMIN+14:
case __SIGRTMIN+15:
/* __SIGRTMIN is 37 on HPPA rather than 32 *
* as on i386, etc. */
#if !defined(__hppa__)
case __SIGRTMAX-15:
case __SIGRTMAX-14:
case __SIGRTMAX-13:
case __SIGRTMAX-12:
case __SIGRTMAX-11:
#endif
case __SIGRTMAX-10:
case __SIGRTMAX-9:
case __SIGRTMAX-8:
case __SIGRTMAX-7:
case __SIGRTMAX-6:
case __SIGRTMAX-5:
case __SIGRTMAX-4:
case __SIGRTMAX-3:
case __SIGRTMAX-2:
case __SIGRTMAX-1:
case __SIGRTMAX:
#endif
#ifdef CRAY
case SIGINFO:
case SIGRECOVERY: /* allow chkpnt/restart */
#endif /* CRAY */
#ifdef SIGSWAP
case SIGSWAP:
#endif /* SIGSWAP */
#ifdef SIGCKPT
case SIGCKPT:
#endif
#ifdef SIGRESTART
case SIGRESTART:
#endif
/*
* pthread-private signals SIGPTINTR and SIGPTRESCHED.
* Setting a handler for these signals is disallowed when
* the binary is linked against libpthread.
*/
#ifdef SIGPTINTR
case SIGPTINTR:
#endif /* SIGPTINTR */
#ifdef SIGPTRESCHED
case SIGPTRESCHED:
#endif /* SIGPTRESCHED */
#ifdef _SIGRESERVE
case _SIGRESERVE:
#endif
#ifdef _SIGDIL
case _SIGDIL:
#endif
#ifdef _SIGCANCEL
case _SIGCANCEL:
#endif
#ifdef _SIGGFAULT
case _SIGGFAULT:
#endif
break;
case SIGCLD:
if ( fork_flag == FORK || STD_COPIES > 1)
continue;
default:
if (tst_setup_signal(sig, handler) == SIG_ERR) {
(void) sprintf(mesg,
"signal() failed for signal %d. error:%d %s.",
sig, errno, strerror(errno));
tst_resm(TWARN, mesg);
}
break;
}
#ifdef __sgi
/* On irix (07/96), signal() fails when signo is 33 or higher */
if ( sig+1 >= 33 )
break;
#endif /* __sgi */
} /* endfor */
}
/****************************************************************************
* def_handler() : default signal handler that is invoked when
* an unexpected signal is caught.
***************************************************************************/
static void
def_handler(int sig)
{
/*
* Break remaining test cases, do any cleanup, then exit
*/
tst_brkm(TBROK, 0, "Unexpected signal %d received.", sig);
/* now cleanup and exit */
if (T_cleanup) {
(*T_cleanup)();
}
tst_exit();
}
/*
* tst_setup_signal - A function like signal(), but we have
* control over its personality.
*/
static void (*tst_setup_signal( int sig, void (*handler)(int)))(int)
{
struct sigaction my_act,old_act;
int ret;
my_act.sa_handler = handler;
my_act.sa_flags = SA_RESTART;
sigemptyset(&my_act.sa_mask);
ret = sigaction(sig, &my_act, &old_act);
if ( ret == 0 )
return( old_act.sa_handler );
else
return( SIG_ERR );
}

390
minix/tests/ipc/lib/tst_tmpdir.c
View file

@ -1,390 +0,0 @@
/*
* 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/
*/
/**********************************************************
*
* OS Testing - Silicon Graphics, Inc.
*
* FUNCTION NAME : tst_tmpdir, tst_rmdir
*
* FUNCTION TITLE : Create/remove a testing temp dir
*
* SYNOPSIS:
* void tst_tmpdir();
* void tst_rmdir();
*
* AUTHOR : Dave Fenner
*
* INITIAL RELEASE : UNICOS 8.0
*
* DESCRIPTION
* tst_tmpdir() is used to create a unique, temporary testing
* directory, and make it the current working directory.
* tst_rmdir() is used to remove the directory created by
* tst_tmpdir().
*
* Setting the env variable "TDIRECTORY" will override the creation
* of a new temp dir. The directory specified by TDIRECTORY will
* be used as the temporary directory, and no removal will be done
* in tst_rmdir().
*
* RETURN VALUE
* Neither tst_tmpdir() or tst_rmdir() has a return value.
*
*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#**/
#include <stdio.h>
#include <errno.h>
#include <stdlib.h> /* for getenv() */
#include <string.h> /* for string functions */
#include <unistd.h> /* for sysconf(), getcwd(), rmdir() */
#include <sys/types.h> /* for mkdir() */
#include <sys/stat.h> /* for mkdir() */
#include "test.h"
#include "rmobj.h"
/*
* Define some useful macros.
*/
#define PREFIX_SIZE 4
#define STRING_SIZE 256
#define DIR_MODE 0777 /* mode of tmp dir that will be created */
#ifndef PATH_MAX
#ifdef MAXPATHLEN
#define PATH_MAX MAXPATHLEN
#else
#define PATH_MAX 1024
#endif
#endif
/*
* Define function prototypes.
*/
static void tmpdir_cleanup(void);
/*
* Define global variables.
*/
extern char *TCID; /* defined/initialized in main() */
extern int TST_TOTAL; /* defined/initialized in main() */
extern char *TESTDIR; /* the directory created; defined in */
/* tst_res.c */
/*
* tst_tmpdir() - Create a unique temporary directory and chdir() to it.
* It expects the caller to have defined/initialized the
* TCID/TST_TOTAL global variables. The TESTDIR global
* variable will be set to the directory that gets used
* as the testing directory.
*
* NOTE: This function must be called BEFORE any activity
* that would require CLEANUP. If tst_tmpdir() fails, it
* cleans up afer itself and calls tst_exit() (i.e. does
* not return).
*/
#undef FN_NAME
#define FN_NAME "tst_tmpdir()"
void
tst_tmpdir()
{
char template[PATH_MAX]; /* template for mkstemp, mkdtemp */
int no_cleanup = 0; /* !0 means TDIRECTORY env var was set */
char *env_tmpdir; /* temporary storage for TMPDIR env var */
/* This is an AWEFUL hack to figure out if mkdtemp() is available */
#if defined(__GLIBC_PREREQ)
# if __GLIBC_PREREQ(2,2)
# define HAVE_MKDTEMP 1
# else
# define HAVE_MKDTEMP 0
int tfd;
# endif
#else
# define HAVE_MKDTEMP 0
int tfd;
#endif
/*
* If the TDIRECTORY env variable is not set, a temp dir will be
* created.
*/
if ((TESTDIR = getenv(TDIRECTORY))) {
/*
* The TDIRECTORY env. variable is set, so no temp dir is created.
* Also, no clean up will be done via tst_rmdir().
*/
no_cleanup++;
#if UNIT_TEST
printf("TDIRECTORY env var is set\n");
#endif
} else {
/*
* Create a template for the temporary directory. Use the
* environment variable TMPDIR if it is available, otherwise
* use our default TEMPDIR.
*/
if ((env_tmpdir = getenv("TMPDIR"))) {
snprintf(template, PATH_MAX, "%s/%.3sXXXXXX", env_tmpdir, TCID);
} else {
snprintf(template, PATH_MAX, "%s/%.3sXXXXXX", TEMPDIR, TCID);
}
#if HAVE_MKDTEMP
/*
* Make the temporary directory in one shot using mkdtemp()
*/
if (mkdtemp(template) == NULL)
tst_brkm(TBROK, tmpdir_cleanup,
"%s: mkdtemp(%s) failed; errno = %d: %s",
FN_NAME, template, errno, strerror(errno));
TESTDIR = strdup(template);
#else
/*
* Make the template name, then the directory
*/
if ((tfd = mkstemp(template)) == -1)
tst_brkm(TBROK, tmpdir_cleanup,
"%s: mkstemp(%s) failed; errno = %d: %s",
FN_NAME, template, errno, strerror(errno));
close(tfd);
unlink(template);
TESTDIR = strdup(template);
if (mkdir(TESTDIR, DIR_MODE)) {
/* If we start failing with EEXIST, wrap this section in
* a loop so we can try again.
*/
tst_brkm(TBROK, tmpdir_cleanup,
"%s: mkdir(%s, %#o) failed; errno = %d: %s",
FN_NAME, TESTDIR, DIR_MODE, errno,
strerror(errno));
}
#endif
}
/*
* Change the group on this temporary directory to be that of the
* gid of the person running the tests and permissions to 777.
*/
if ( chown(TESTDIR, -1, getgid()) == -1 )
tst_brkm(TBROK, tmpdir_cleanup,
"chown(%s, -1, %d) failed; errno = %d: %s",
TESTDIR, getgid(), errno, strerror(errno));
if ( chmod(TESTDIR,S_IRWXU | S_IRWXG | S_IRWXO) == -1 )
tst_brkm(TBROK, tmpdir_cleanup,
"chmod(%s,777) failed; errno %d: %s",
TESTDIR, errno, strerror(errno));
#if UNIT_TEST
printf("TESTDIR = %s\n", TESTDIR);
#endif
/*
* Change to the temporary directory. If the chdir() fails, issue
* TBROK messages for all test cases, attempt to remove the
* directory (if it was created), and exit. If the removal also
* fails, also issue a TWARN message.
*/
if ( chdir(TESTDIR) == -1 ) {
tst_brkm(TBROK, NULL, "%s: chdir(%s) failed; errno = %d: %s",
FN_NAME, TESTDIR, errno, strerror(errno) );
/* Try to remove the directory */
if ( !no_cleanup && rmdir(TESTDIR) == -1 )
tst_resm(TWARN, "%s: rmdir(%s) failed; errno = %d: %s",
FN_NAME, TESTDIR, errno, strerror(errno) );
tmpdir_cleanup();
}
#if UNIT_TEST
printf("CWD is %s\n", getcwd((char *)NULL, PATH_MAX));
#endif
/*
* If we made through all this stuff, return.
*/
return;
} /* tst_tmpdir() */
/*
*
* tst_rmdir() - Recursively remove the temporary directory created by
* tst_tmpdir(). This function is intended ONLY as a
* companion to tst_tmpdir(). If the TDIRECTORY
* environment variable is set, no cleanup will be
* attempted.
*/
#undef FN_NAME
#define FN_NAME "tst_rmdir()"
void
tst_rmdir()
{
char *errmsg;
char *tdirectory;
char current_dir[PATH_MAX]; /* current working directory */
char parent_dir[PATH_MAX]; /* directory above TESTDIR */
char *basename; /* basename of the TESTDIR */
/*
* If the TDIRECTORY env variable is set, this indicates that no
* temp dir was created by tst_tmpdir(). Thus no cleanup will be
* necessary.
*/
if ( (tdirectory = getenv(TDIRECTORY)) != NULL ) {
#if UNIT_TEST
printf("\"TDIRECORY\" env variable is set; no cleanup was performed\n");
#endif
return;
}
/*
* Check that TESTDIR is not NULL.
*/
if ( TESTDIR == NULL ) {
tst_resm(TWARN, "%s: TESTDIR was NULL; no removal attempted",
FN_NAME);
return;
}
/*
* Check that the value of TESTDIR is not "*" or "/". These could
* have disastrous effects in a test run by root.
*/
if ( strcmp(TESTDIR, "/") == 0 ) {
tst_resm(TWARN,
"%s: Recursive remove of root directory not attempted",
FN_NAME);
return;
}
if ( strchr(TESTDIR, '*') != NULL ) {
tst_resm(TWARN, "%s: Recursive remove of '*' not attempted",
FN_NAME);
return;
}
/*
* Get the directory name of TESTDIR. If TESTDIR is a relative path,
* get full path.
*/
if ( TESTDIR[0] != '/' ) {
if ( getcwd(current_dir,PATH_MAX) == NULL )
strcpy(parent_dir, TESTDIR);
else
sprintf(parent_dir, "%s/%s", current_dir, TESTDIR);
} else {
strcpy(parent_dir, TESTDIR);
}
if ( (basename = strrchr(parent_dir, '/')) != NULL ) {
*basename='\0'; /* terminate at end of parent_dir */
}
/*
* Change directory to parent_dir (The dir above TESTDIR).
*/
if ( chdir(parent_dir) != 0 )
tst_resm(TWARN,
"%s: chdir(%s) failed; errno = %d: %s\nAttempting to remove temp dir anyway",
FN_NAME, parent_dir, errno, strerror(errno));
/*
* Attempt to remove the "TESTDIR" directory, using rmobj().
*/
if ( rmobj(TESTDIR, &errmsg) == -1 )
tst_resm(TWARN, "%s: rmobj(%s) failed: %s",
FN_NAME, TESTDIR, errmsg);
return;
} /* tst_rmdir() */
/*
* tmpdir_cleanup() - This function is used when tst_tmpdir()
* encounters an error, and must cleanup and exit.
* It prints a warning message via tst_resm(), and
* then calls tst_exit().
*/
#undef FN_NAME
#define FN_NAME "tst_tmpdir()"
static void
tmpdir_cleanup()
{
/*
* Print a warning message and call tst_exit() to exit the test.
*/
tst_resm(TWARN, "%s: No user cleanup function called before exiting",
FN_NAME);
tst_exit();
} /* tmpdir_cleanup() */
#ifdef UNIT_TEST
/****************************************************************************
* Unit test code: Takes input from stdin and can make the following
* calls: tst_tmpdir(), tst_rmdir().
****************************************************************************/
int TST_TOTAL = 10;
char *TCID = "TESTTCID";
main()
{
int option;
char *chrptr;
printf("UNIT TEST of tst_tmpdir.c. Options to try:\n\
-1 : call tst_exit()\n\
0 : call tst_tmpdir()\n\
1 : call tst_rmdir()\n\n");
while ( 1 ) {
printf("Enter options (-1, 0, 1): ");
(void) scanf("%d%c", &option, &chrptr);
switch ( option ) {
case -1:
tst_exit();
break;
case 0:
tst_tmpdir();
break;
case 1:
tst_rmdir();
break;
} /* switch() */
} /* while() */
}
#endif /* UNIT_TEST */

324
minix/tests/ipc/lib/usctest.h
View file

@ -1,324 +0,0 @@
/*
* 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/
*/
/**********************************************************
*
* IRIX/Linux Feature Test and Evaluation - Silicon Graphics, Inc.
*
* FUNCTION NAME : usctest.h
*
* FUNCTION TITLE : System Call Test Macros
*
* SYNOPSIS:
* See DESCRIPTION below.
*
* AUTHOR : William Roske
*
* INITIAL RELEASE : UNICOS 7.0
*
* DESCRIPTION
* TEST(SCALL) - calls a system call
* TEST_VOID(SCALL) - same as TEST() but for syscalls with no return value.
* TEST_CLEANUP - print the log of errno return counts if STD_ERRNO_LOG
* is set.
* TEST_PAUSEF(HAND) - Pause for SIGUSR1 if the pause flag is set.
* Use "hand" as the interrupt handling function
* TEST_PAUSE - Pause for SIGUSR1 if the pause flag is set.
* Use internal function to do nothing on signal and go on.
* TEST_LOOPING(COUNTER) - Conditional to check if test should
* loop. Evaluates to TRUE (1) or FALSE (0).
* TEST_ERROR_LOG(eno) - log that this errno was received,
* if STD_ERRNO_LOG is set.
* TEST_EXP_ENOS(array) - set the bits in TEST_VALID_ENO array at
* positions specified in integer "array"
*
* RETURN VALUE
* TEST(SCALL) - Global Variables set:
* int TEST_RETURN=return code from SCALL
* int TEST_ERRNO=value of errno at return from SCALL
* TEST_VOID(SCALL) - Global Variables set:
* int TEST_ERRNO=value of errno at return from SCALL
* TEST_CLEANUP - None.
* TEST_PAUSEF(HAND) - None.
* TEST_PAUSE - None.
* TEST_LOOPING(COUNTER) - True if COUNTER < STD_LOOP_COUNT or
* STD_INFINITE is set.
* TEST_ERROR_LOG(eno) - None
* TEST_EXP_ENOS(array) - None
*
* KNOWN BUGS
* If you use the TEST_PAUSE or TEST_LOOPING macros, you must
* link in parse_opts.o, which contains the code for those functions.
*
*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#**/
#ifndef __USCTEST_H__
#define __USCTEST_H__ 1
#ifndef _SC_CLK_TCK
#include <unistd.h>
#endif
#include <sys/param.h>
/*
* Ensure that PATH_MAX is defined
*/
#ifndef PATH_MAX
#ifdef MAXPATHLEN
#define PATH_MAX MAXPATHLEN
#else
#define PATH_MAX 1024
#endif
#endif
#ifndef CRAY
#ifndef BSIZE
#define BSIZE BBSIZE
#endif
#endif
/***********************************************************************
* Define option_t structure type.
* Entries in this struct are used by the parse_opts routine
* to indicate valid options and return option arguments
***********************************************************************/
typedef struct {
char *option; /* Valid option string (one option only) like "a:" */
int *flag; /* pointer to location to set true if option given */
char **arg; /* pointer to location to place argument, if needed */
} option_t;
/***********************************************************************
* The following globals are defined in parse_opts.c but must be
* externed here because they are used in the macros defined below.
***********************************************************************/
extern int STD_FUNCTIONAL_TEST, /* turned off by -f to not do functional test */
STD_TIMING_ON, /* turned on by -t to print timing stats */
STD_PAUSE, /* turned on by -p to pause before loop */
STD_INFINITE, /* turned on by -i0 to loop forever */
STD_LOOP_COUNT, /* changed by -in to set loop count to n */
STD_ERRNO_LOG, /* turned on by -e to log errnos returned */
STD_ERRNO_LIST[], /* counts of errnos returned. indexed by errno */
STD_COPIES,
STD_argind;
extern float STD_LOOP_DURATION, /* wall clock time to iterate */
STD_LOOP_DELAY; /* delay time after each iteration */
#define USC_MAX_ERRNO 2000
/**********************************************************************
* Prototype for parse_opts routine
**********************************************************************/
extern char *parse_opts(int ac, char **av, option_t *user_optarr, void (*uhf)(void));
/*
* define a structure
*/
struct usc_errno_t {
int flag;
};
/***********************************************************************
****
****
****
**********************************************************************/
#ifdef _USC_LIB_
extern long TEST_RETURN;
extern long TEST_ERRNO;
extern struct usc_errno_t TEST_VALID_ENO[USC_MAX_ERRNO];
extern long btime, etime, tmptime;
#else
/***********************************************************************
* Global array of bit masks to indicate errnos that are expected.
* Bits set by TEST_EXP_ENOS() macro and used by TEST_CLEANUP() macro.
***********************************************************************/
struct usc_errno_t TEST_VALID_ENO[USC_MAX_ERRNO];
/***********************************************************************
* Globals for returning the return code and errno from the system call
* test macros.
***********************************************************************/
long TEST_RETURN;
long TEST_ERRNO;
/***********************************************************************
* temporary variables for determining max and min times in TEST macro
***********************************************************************/
long btime, etime, tmptime;
#endif /* _USC_LIB_ */
/***********************************************************************
* structure for timing accumulator and counters
***********************************************************************/
struct tblock {
long tb_max;
long tb_min;
long tb_total;
long tb_count;
};
/***********************************************************************
* The following globals are externed here so that they are accessable
* in the macros that follow.
***********************************************************************/
extern struct tblock tblock;
extern void STD_go(int);
extern int (*_TMP_FUNC)(void);
extern void STD_opts_help(void);
/***********************************************************************
* TEST: calls a system call
*
* parameters:
* SCALL = system call and parameters to execute
*
***********************************************************************/
#define TEST(SCALL) \
do { \
errno = 0; \
TEST_RETURN = SCALL; \
TEST_ERRNO = errno; \
} while (0)
/***********************************************************************
* TEST_VOID: calls a system call
*
* parameters:
* SCALL = system call and parameters to execute
*
* Note: This is IDENTICAL to the TEST() macro except that it is intended
* for use with syscalls returning no values (void syscall()). The
* Typecasting nothing (void) into an unsigned integer causes compilation
* errors.
*
***********************************************************************/
#define TEST_VOID(SCALL) errno=0; SCALL; TEST_ERRNO=errno;
/***********************************************************************
* TEST_CLEANUP: print system call timing stats and errno log entries
* to stdout if STD_TIMING_ON and STD_ERRNO_LOG are set, respectively.
* Do NOT print ANY information if no system calls logged.
*
* parameters:
* none
*
***********************************************************************/
#define TEST_CLEANUP \
if ( STD_ERRNO_LOG ) { \
for (tmptime=0; tmptime<USC_MAX_ERRNO; tmptime++) { \
if ( STD_ERRNO_LIST[tmptime] ) { \
if ( TEST_VALID_ENO[tmptime].flag ) \
tst_resm(TINFO, "ERRNO %d:\tReceived %d Times", \
tmptime, STD_ERRNO_LIST[tmptime]); \
else \
tst_resm(TINFO, \
"ERRNO %d:\tReceived %d Times ** UNEXPECTED **", \
tmptime, STD_ERRNO_LIST[tmptime]); \
} \
} \
}
/***********************************************************************
* TEST_PAUSEF: Pause for SIGUSR1 if the pause flag is set.
* Set the user specified function as the interrupt
* handler instead of "STD_go"
*
* parameters:
* none
*
***********************************************************************/
#define TEST_PAUSEF(HANDLER) \
if ( STD_PAUSE ) { \
_TMP_FUNC = (int (*)(void))signal(SIGUSR1, HANDLER); \
pause(); \
signal(SIGUSR1, (void (*)(void))_TMP_FUNC); \
}
/***********************************************************************
* TEST_PAUSE: Pause for SIGUSR1 if the pause flag is set.
* Just continue when signal comes in.
*
* parameters:
* none
*
***********************************************************************/
#define TEST_PAUSE usc_global_setup_hook();
int usc_global_setup_hook(void);
/***********************************************************************
* TEST_LOOPING now call the usc_test_looping function.
* The function will return 1 if the test should continue
* iterating.
*
***********************************************************************/
#define TEST_LOOPING usc_test_looping
int usc_test_looping(int counter);
/***********************************************************************
* TEST_ERROR_LOG(eno): log this errno if STD_ERRNO_LOG flag set
*
* parameters:
* int eno: the errno location in STD_ERRNO_LIST to log.
*
***********************************************************************/
#define TEST_ERROR_LOG(eno) \
if ( STD_ERRNO_LOG ) \
if ( eno < USC_MAX_ERRNO ) \
STD_ERRNO_LIST[eno]++; \
/***********************************************************************
* TEST_EXP_ENOS(array): set the bits associated with the nput errnos
* in the TEST_VALID_ENO array.
*
* parameters:
* int array[]: a zero terminated array of errnos expected.
*
***********************************************************************/
#define TEST_EXP_ENOS(array) \
tmptime=0; \
while (array[tmptime] != 0) { \
if (array[tmptime] < USC_MAX_ERRNO) \
TEST_VALID_ENO[array[tmptime]].flag=1; \
tmptime++; \
}
#endif /* end of __USCTEST_H__ */

26
minix/tests/ipc/semctl/Makefile
View file

@ -1,26 +0,0 @@
# Makefile for the tests
CC = exec cc
CFLAGS = -Wall -I../lib/
PROG = semctl01 semctl02 semctl03 semctl04 semctl05 semctl06 semctl07
all: $(PROG)
$(PROG): ../libipc.a
$(CC) $(CFLAGS) -o $@ $@.c ../libipc.a
clean:
rm -f *.o $(PROG)
test:
sh ./test.sh
semctl01: semctl01.c
semctl02: semctl02.c
semctl03: semctl03.c
semctl04: semctl04.c
semctl05: semctl05.c
semctl06: semctl06.c
semctl07: semctl07.c

688
minix/tests/ipc/semctl/semctl01.c
View file

@ -1,688 +0,0 @@
/*
*
* 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
* semctl01.c
*
* DESCRIPTION
* semctl01 - test the 10 possible semctl() commands
*
* ALGORITHM
* create a semaphore set with read and alter permissions
* loop if that option was specified
* loop through the test cases
* do any setup required for the test case
* make the semctl() call using the TEST() macro
* check the return code
* if failure, issue a FAIL message.
* otherwise,
* if doing functionality testing
* call the appropriate test function
* if correct,
* issue a PASS message
* otherwise
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* semctl01 [-c n] [-f] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -f : Turn off functionality Testing.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "ipcsem.h"
char *TCID = "semctl01";
int TST_TOTAL = 10;
extern int Tst_count;
int sem_id_1 = -1; /* a semaphore set with read and alter permissions */
/*
* These are the various setup and check functions for the 10 different
* commands that are available for the semctl() call.
*/
void func_stat(int);
void set_setup(int), func_set(int);
void func_gall(int);
void cnt_setup(int), func_cnt(int);
void pid_setup(int), func_pid(int);
void gval_setup(int), func_gval(int);
void sall_setup(int), func_sall(int);
void func_sval(int);
void func_rmid(int);
void child_cnt(void);
void child_pid(void);
struct semid_ds buf;
unsigned short array[PSEMS];
struct sembuf sops;
#define INCVAL 2 /* a semaphore increment value */
#define NEWMODE 066
#define NCHILD 5
#define SEM2 2 /* semaphore to use for GETPID and GETVAL */
#define SEM4 4 /* semaphore to use for GETNCNT and GETZCNT */
#define ONE 1
#define SEMUN_CAST (union semun)
int pid_arr[NCHILD];
#ifdef UCLINUX
static char *argv0;
#endif
struct test_case_t {
int semnum; /* the primitive semaphore to use */
int cmd; /* the command to test */
void (*func_test)(int); /* the test function */
union semun arg;
void (*func_setup)(int); /* the setup function if necessary */
} TC[10];
void setup_test_cases(void)
{
int i;
i = -1;
/* {0, IPC_STAT, func_stat, &buf, NULL}, */
i++;
TC[i].semnum = 0;
TC[i].cmd = IPC_STAT;
TC[i].func_test = func_stat;
TC[i].arg.buf = &buf;
TC[i].func_setup = NULL;
/* {0, IPC_SET, func_set, &buf, set_setup}, */
i++;
TC[i].semnum = 0;
TC[i].cmd = IPC_SET;
TC[i].func_test = func_set;
TC[i].arg.buf = &buf;
TC[i].func_setup = set_setup;
/* {0, GETALL, func_gall, array, NULL}, */
i++;
TC[i].semnum = 0;
TC[i].cmd = GETALL;
TC[i].func_test = func_gall;
TC[i].arg.array = array;
TC[i].func_setup = NULL;
/* {SEM4, GETNCNT, func_cnt, SEMUN_CAST &buf, cnt_setup}, */
i++;
TC[i].semnum = SEM4;
TC[i].cmd = GETNCNT;
TC[i].func_test = func_cnt;
TC[i].arg.buf = &buf;
TC[i].func_setup = cnt_setup;
/* {SEM2, GETPID, func_pid, SEMUN_CAST &buf, pid_setup}, */
i++;
TC[i].semnum = SEM2;
TC[i].cmd = GETPID;
TC[i].func_test = func_pid;
TC[i].arg.buf = &buf;
TC[i].func_setup = pid_setup;
/* {SEM2, GETVAL, func_gval, SEMUN_CAST &buf, NULL}, */
i++;
TC[i].semnum = SEM2;
TC[i].cmd = GETVAL;
TC[i].func_test = func_gval;
TC[i].arg.buf = &buf;
TC[i].func_setup = NULL;
/* {SEM4, GETZCNT, func_cnt, SEMUN_CAST &buf, cnt_setup}, */
i++;
TC[i].semnum = SEM4;
TC[i].cmd = GETZCNT;
TC[i].func_test = func_cnt;
TC[i].arg.buf = &buf;
TC[i].func_setup = cnt_setup;
/* {0, SETALL, func_sall, SEMUN_CAST array, sall_setup}, */
i++;
TC[i].semnum = 0;
TC[i].cmd = SETALL;
TC[i].func_test = func_sall;
TC[i].arg.array = array;
TC[i].func_setup = sall_setup;
/* {SEM4, SETVAL, func_sval, SEMUN_CAST INCVAL, NULL}, */
i++;
TC[i].semnum = SEM4;
TC[i].cmd = SETVAL;
TC[i].func_test = func_sval;
TC[i].arg.val = INCVAL;
TC[i].func_setup = NULL;
/* {0, IPC_RMID, func_rmid, SEMUN_CAST &buf, NULL} */
i++;
TC[i].semnum = 0;
TC[i].cmd = IPC_RMID;
TC[i].func_test = func_rmid;
TC[i].arg.buf = &buf;
TC[i].func_setup = NULL;
}
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i, j;
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
#ifdef UCLINUX
argv0 = av[0];
maybe_run_child(&child_pid, "nd", 1, &sem_id_1);
maybe_run_child(&child_cnt, "ndd", 2, &sem_id_1, &sops.sem_op);
#endif
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/* loop through the test cases */
for (i=0; i<TST_TOTAL; i++) {
/*
* Set up any conditions if needed
*/
if (TC[i].func_setup != NULL) {
/* call the setup function */
switch (TC[i].cmd) {
case GETNCNT:
(*TC[i].func_setup)(-ONE);
break;
case GETZCNT:
(*TC[i].func_setup)(0);
break;
default:
(*TC[i].func_setup)(ONE);
break;
}
}
/*
* Use TEST macro to make the call
*/
TEST(semctl(sem_id_1, TC[i].semnum, TC[i].cmd,
TC[i].arg));
if (TEST_RETURN == -1) {
tst_resm(TFAIL, "%s call failed - errno = %d "
": %s", TCID, TEST_ERRNO,
strerror(TEST_ERRNO));
} else {
if (STD_FUNCTIONAL_TEST) {
/*
* call the appropriate test function
* and pass the return value where it
* is needed to perform certain tests.
*/
switch (TC[i].cmd) {
case GETNCNT:
/*FALLTHROUGH*/
case GETZCNT:
/*FALLTHROUGH*/
case GETPID:
/*FALLTHROUGH*/
case GETVAL:
(*TC[i].func_test)(TEST_RETURN);
break;
default:
(*TC[i].func_test)(0);
break;
}
} else {
tst_resm(TPASS, "call succeeded");
}
}
/*
* If testing GETNCNT or GETZCNT, clean up the children.
*/
switch (TC[i].cmd) {
case GETNCNT:
/*FALLTHROUGH*/
case GETZCNT:
for (j=0; j<NCHILD; j++) {
if (kill(pid_arr[j], SIGKILL) == -1) {
tst_brkm(TBROK, cleanup,
"child kill failed");
}
}
break;
}
}
/*
* recreate the semaphore resource if looping
*/
if (TEST_LOOPING(lc)) {
if ((sem_id_1 = semget(semkey, PSEMS,
IPC_CREAT | IPC_EXCL | SEM_RA)) == -1 ) {
tst_brkm(TBROK, cleanup, "couldn't recreate "
"semaphore");
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* func_stat() - check the functionality of the IPC_STAT command with semctl()
*/
void
func_stat(int n)
{
/* check the number of semaphores and the ipc_perm.mode value */
if (buf.sem_nsems == PSEMS && buf.sem_perm.mode == (SEM_RA)) {
tst_resm(TPASS, "buf.sem_nsems and buf.sem_perm.mode"
" are correct");
} else {
tst_resm(TFAIL, "semaphore STAT info is incorrect");
}
}
/*
* set_setup() - set up for the IPC_SET command with semctl()
*/
void
set_setup(int n)
{
/* set up a new mode for the semaphore set */
buf.sem_perm.mode = SEM_RA | NEWMODE;
}
/*
* func_set() - check the functionality of the IPC_SET command with semctl()
*/
void
func_set(int n)
{
/* first stat the semaphore to get the new data */
union semun arg;
arg.buf = &buf;
if (semctl(sem_id_1, 0, IPC_STAT, arg) == -1) {
tst_resm(TBROK, "stat failed in func_set()");
return;
}
/* check that the new mode is what we set */
if (buf.sem_perm.mode == (SEM_RA | NEWMODE)) {
tst_resm(TPASS, "buf.sem_perm.mode is correct");
} else {
tst_resm(TFAIL, "semaphore mode info is incorrect");
}
}
/*
* func_gall() - check the functionality of the GETALL command with semctl()
*/
void
func_gall(int n)
{
int i;
/* the initial value of the primitive semaphores should be zero */
for (i=0 ; i<PSEMS; i++) {
if (array[i] != 0) {
tst_resm(TFAIL, "semaphore %d has unexpected value", i);
return;
}
}
tst_resm(TPASS, "semaphores have expected values");
}
/*
* cnt_setup() - set up for the GETNCNT and GETZCNT commands with semctl()
*/
void
cnt_setup(int opval)
{
int pid, i;
sops.sem_num = SEM4;
sops.sem_flg = 0;
/*
* if seting up for GETZCNT, the semaphore value needs to be positive
*/
if (opval == 0) {
/* initialize the semaphore value to ONE */
sops.sem_op = ONE;
if (semop(sem_id_1, &sops, 1) == -1) {
tst_brkm(TBROK, cleanup, "semop #1 failed - cnt_setup");
}
}
sops.sem_op = opval; /* set the correct operation */
for (i=0; i<NCHILD; i++) {
/* fork five children to wait */
if ((pid = FORK_OR_VFORK()) == -1) {
tst_brkm(TBROK, cleanup, "fork failed in cnt_setup");
}
if (pid == 0) { /* child */
#ifdef UCLINUX
if (self_exec(argv0, "ndd", 2, sem_id_1,
sops.sem_op) < 0) {
tst_brkm(TBROK, cleanup, "self_exec failed "
"in cnt_setup");
}
#else
child_cnt();
#endif
} else { /* parent */
/* take a quick nap so that commands execute orderly */
usleep(50000);
/* save the pid so we can kill it later */
pid_arr[i] = pid;
}
}
}
void
child_cnt(void)
{
sops.sem_num = SEM4;
sops.sem_flg = 0;
/*
* Do a semop that will cause the child to sleep.
* The child process will be killed in the func_ncnt
* routine which should cause an error to be return
* by the semop() call.
*/
if (semop(sem_id_1, &sops, 1) != -1) {
tst_resm(TBROK, "semop succeeded - cnt_setup");
}
exit(0);
}
/*
* func_cnt() - check the functionality of the GETNCNT and GETZCNT commands
* with semctl()
*/
void
func_cnt(int rval)
{
if (rval == NCHILD) {
tst_resm(TPASS, "number of sleeping processes is correct");
} else {
tst_resm(TFAIL, "number of sleeping processes is not correct");
}
}
/*
* pid_setup() - set up for the GETPID command with semctl()
*/
void
pid_setup(int n)
{
int pid;
/*
* Fork a child to do a semop that will pass.
*/
if ((pid = FORK_OR_VFORK()) == -1) {
tst_brkm(TBROK, cleanup, "fork failed in pid_setup()");
}
if (pid == 0) { /* child */
#ifdef UCLINUX
if (self_exec(argv0, "nd", 1, sem_id_1) < 0) {
tst_brkm(TBROK, cleanup, "self_exec failed "
"in pid_setup()");
}
#else
child_pid();
#endif
} else { /* parent */
/* take a quick nap so that commands execute orderly */
usleep(50000);
pid_arr[SEM2] = pid;
}
}
void
child_pid(void)
{
sops.sem_num = SEM2; /* semaphore to change */
sops.sem_op = ONE; /* operation is to increment semaphore */
sops.sem_flg = 0;
/*
* Do a semop that will increment the semaphore.
*/
if (semop(sem_id_1, &sops, 1) == -1) {
tst_resm(TBROK, "semop failed - pid_setup");
}
exit(0);
}
/*
* func_pid() - check the functionality of the GETPID command with semctl()
*/
void
func_pid(int rval)
{
/* compare the rval (pid) to the saved pid from the setup */
if (rval == pid_arr[SEM2]) {
tst_resm(TPASS, "last pid value is correct");
} else {
tst_resm(TFAIL, "last pid value is not correct");
}
}
/*
* func_gval() - check the functionality of the GETVAL command with semctl()
*/
void
func_gval(int rval)
{
/*
* This is a simple test. The semaphore value should be equal
* to ONE as it was set in the last test (GETPID).
*/
if (rval == 1) {
tst_resm(TPASS, "semaphore value is correct");
} else {
tst_resm(TFAIL, "semaphore value is not correct");
}
}
/*
* all_setup() - set up for the SETALL command with semctl()
*/
void
sall_setup(int n)
{
int i;
for (i=0; i<PSEMS; i++) {
/* initialize the array values to 3 */
array[i] = 3;
}
}
/*
* func_sall() - check the functionality of the SETALL command with semctl()
*/
void
func_sall(int n)
{
int i;
unsigned short rarray[PSEMS];
union semun arg;
/*
* do a GETALL and compare the values to those set above
*/
arg.array = rarray;
if (semctl(sem_id_1, 0, GETALL, arg) == -1) {
tst_brkm(TBROK, cleanup, "semctl failed in func_sall");
}
for (i=0; i<PSEMS; i++) {
if (array[i] != rarray[i]) {
tst_resm(TFAIL, "semaphore values are not correct");
return;
}
}
tst_resm(TPASS, "semaphore values are correct");
}
/*
* func_sval() - check the functionality of the SETVAL command with semctl()
*/
void
func_sval(int n)
{
int semv;
union semun arr;
/*
* do a GETVAL and compare it to the value set above
*/
if ((semv = semctl(sem_id_1, SEM4, GETVAL, arr)) == -1) {
tst_brkm(TBROK, cleanup, "semctl failed in func_sval");
}
if (semv != INCVAL) {
tst_resm(TFAIL, "semaphore value is not what was set");
} else {
tst_resm(TPASS, "semaphore value is correct");
}
}
/*
* func_rmid() - check the functionality of the IPC_RMID command with semctl()
*/
void
func_rmid(int n)
{
/*
* do a semop() - we should get EINVAL
*/
if (semop(sem_id_1, &sops, 1) != -1) {
tst_resm(TFAIL, "semop succeeded on expected fail");
}
if (errno != EINVAL) {
tst_resm(TFAIL, "returned errno - %d - is not expected", errno);
} else {
tst_resm(TPASS, "semaphore appears to be removed");
}
sem_id_1 = -1;
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
setup_test_cases();
/* capture signals */
tst_sig(FORK, DEF_HANDLER, cleanup);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
semkey = getipckey();
/* create a semaphore set with read and alter permissions */
if ((sem_id_1 =
semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL | SEM_RA)) == -1 ) {
tst_brkm(TBROK, cleanup, "couldn't create semaphore in setup");
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the semaphore resource */
rm_sema(sem_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

191
minix/tests/ipc/semctl/semctl02.c
View file

@ -1,191 +0,0 @@
/*
*
* 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
* semctl02.c
*
* DESCRIPTION
* semctl02 - test for EACCES error
*
* ALGORITHM
* create a semaphore set without read/alter permissions
* loop if that option was specified
* call semctl() attempting an IPC_STAT command
* check the errno value
* issue a PASS message if we get EACCES
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* semctl02 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "ipcsem.h"
#include <pwd.h>
char *TCID = "semctl02";
int TST_TOTAL = 1;
extern int Tst_count;
int exp_enos[] = {EACCES, 0}; /* 0 terminated list of expected errnos */
char nobody_uid[] = "nobody";
struct passwd *ltpuser;
int sem_id_1 = -1;
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
struct semid_ds sem_ds;
union semun un_arg;
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
un_arg.buf = &sem_ds;
/*
* use the TEST macro to make the call
*/
TEST(semctl(sem_id_1, 0, IPC_STAT, un_arg));
if (TEST_RETURN != -1) {
tst_resm(TFAIL, "call succeeded when error expected");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
switch(TEST_ERRNO) {
case EACCES:
tst_resm(TPASS, "expected failure - errno = %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
break;
default:
tst_resm(TFAIL, "unexpected error - %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
break;
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/* Switch to nobody user for correct error code collection */
if (geteuid() != 0) {
tst_brkm(TBROK, tst_exit, "Test must be run as root");
}
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
ltpuser = getpwnam(nobody_uid);
if (seteuid(ltpuser->pw_uid) == -1) {
tst_resm(TINFO, "setuid failed to "
"to set the effective uid to %d",
ltpuser->pw_uid);
perror("setuid");
}
/* get an IPC resource key */
semkey = getipckey();
/* create a semaphore set without read or alter permissions */
if ((sem_id_1 = semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create semaphore in setup");
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
if (seteuid(0) == -1) {
tst_resm(TINFO, "setuid back to root error!\n");
}
/* if it exists, remove the semaphore resouce */
rm_sema(sem_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

224
minix/tests/ipc/semctl/semctl03.c
View file

@ -1,224 +0,0 @@
/*
*
* 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
* semctl03.c
*
* DESCRIPTION
* semctl03 - test for EINVAL and EFAULT errors
*
* ALGORITHM
* create a semaphore set with read and alter permissions
* loop if that option was specified
* call semctl() using four different invalid cases
* check the errno value
* issue a PASS message if we get EINVAL or EFAULT
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* semctl03 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "ipcsem.h"
#ifdef _XLC_COMPILER
#define SEMUN_CAST
#else
#define SEMUN_CAST (union semun)
#endif
char *TCID = "semctl03";
int TST_TOTAL = 2;
extern int Tst_count;
#ifdef _XLC_COMPILER
#define SEMUN_CAST
#else
#define SEMUN_CAST (union semun)
#endif
int exp_enos[] = {EINVAL, EFAULT, 0};
int sem_id_1 = -1;
int bad_id = -1;
struct semid_ds sem_ds;
struct test_case_t {
int *sem_id;
int ipc_cmd;
union semun arg;
int error;
} TC[4];
void setup_test_case(void)
{
/* EINVAL - the IPC command is not valid */
/* {&sem_id_1, -1, SEMUN_CAST &sem_ds, EINVAL}, */
TC[0].sem_id = &sem_id_1;
TC[0].ipc_cmd = -1;
TC[0].arg.buf = &sem_ds;
TC[0].error = EINVAL;
/* EINVAL - the semaphore ID is not valid */
/* {&bad_id, IPC_STAT, SEMUN_CAST &sem_ds, EINVAL}, */
TC[1].sem_id = &bad_id;
TC[1].ipc_cmd = IPC_STAT;
TC[1].arg.buf = &sem_ds;
TC[1].error = EINVAL;
#if 0
/* EFAULT address can't be detected well in Minix. */
/* EFAULT - the union arg is invalid when expecting "ushort *array" */
/* {&sem_id_1, GETALL, SEMUN_CAST -1, EFAULT}, */
TC[2].sem_id = &sem_id_1;
TC[2].ipc_cmd = GETALL;
TC[2].arg.val = -1;
TC[2].error = EFAULT;
/* EFAULT - the union arg is invalid when expecting */
/* "struct semid_ds *buf */
/* {&sem_id_1, IPC_SET, SEMUN_CAST -1, EFAULT} */
TC[3].sem_id = &sem_id_1;
TC[3].ipc_cmd = IPC_SET;
TC[3].arg.val = -1;
TC[3].error = EFAULT;
#endif
}
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i;
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
for (i=0; i<TST_TOTAL; i++) {
TEST(semctl(*(TC[i].sem_id), 0, TC[i].ipc_cmd,
TC[i].arg));
if (TEST_RETURN != -1) {
tst_resm(TFAIL, "call succeeded unexpectedly");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
if (TEST_ERRNO == TC[i].error) {
tst_resm(TPASS, "expected failure - errno = %d"
" : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
} else {
tst_resm(TFAIL, "unexpected error - %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
setup_test_case();
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
semkey = getipckey();
/* create a semaphore set with read and alter permissions */
if ((sem_id_1 =
semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL | SEM_RA)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create semaphore in setup");
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the semaphore resouce */
rm_sema(sem_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

228
minix/tests/ipc/semctl/semctl04.c
View file

@ -1,228 +0,0 @@
/*
*
* 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
* semctl04.c
*
* DESCRIPTION
* semctl04 - test for EPERM error
*
* ALGORITHM
* create a semaphore set without read or alter permissions
* get the user id for "nobody"
* fork a child process
* if child
* set the ID of the child process to that of "nobody"
* loop if that option was specified
* call semctl() with two different invalid cases
* check the errno value
* issue a PASS message if we get EPERM
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
* if parent
* wait for child to exit
* remove the semaphore set
*
* USAGE: <for command-line>
* semctl04 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* test must be run as root
*/
#include "ipcsem.h"
#include <pwd.h>
#include <sys/wait.h>
char *TCID = "semctl04";
int TST_TOTAL = 2;
extern int Tst_count;
int exp_enos[] = {EPERM, 0}; /* 0 terminated list of expected errnos */
int sem_id_1 = -1;
uid_t ltp_uid;
char *ltp_user = "nobody";
int TC[] = {IPC_SET, IPC_RMID};
int main(int ac, char **av)
{
char *msg; /* message returned from parse_opts */
pid_t pid;
void do_child(void);
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
if ((pid = FORK_OR_VFORK()) == -1) {
tst_brkm(TBROK, cleanup, "could not fork");
}
if (pid == 0) { /* child */
/* set the user ID of the child to the non root user */
if (setuid(ltp_uid) == -1) {
tst_resm(TBROK, "setuid() failed");
exit(1);
}
do_child();
} else {
if (waitpid(pid, NULL, 0) == -1) {
tst_resm(TBROK, "waitpid() failed");
tst_resm(TINFO, "waitpid() error = %d : %s", errno,
strerror(errno));
}
/* if it exists, remove the semaphore resouce */
rm_sema(sem_id_1);
/* Remove the temporary directory */
tst_rmdir();
}
cleanup();
return(0);
}
/*
* do_child() - make the TEST call as the child process
*/
void
do_child(void)
{
int lc; /* loop counter */
int i;
union semun arg;
struct semid_ds perm;
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
for (i=0; i<TST_TOTAL; i++) {
if (TC[i] == IPC_SET) {
arg.buf = &perm;
memset(&perm, 0, sizeof perm);
perm.sem_perm.uid = getuid() + 1;
perm.sem_perm.gid = getgid() + 1;
perm.sem_perm.mode = 0666;
}
TEST(semctl(sem_id_1, 0, TC[i], arg));
if (TEST_RETURN != -1) {
tst_resm(TFAIL, "call succeeded unexpectedly");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
switch(TEST_ERRNO) {
case EPERM:
tst_resm(TPASS, "expected failure - errno ="
" %d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
break;
default:
tst_resm(TFAIL, "unexpected error "
"- %d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
break;
}
}
}
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* check for root as user id of process */
check_root();
/* capture signals */
tst_sig(FORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
semkey = getipckey();
/* create a semaphore set without read or alter permissions */
if ((sem_id_1 = semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create semaphore in setup");
}
/* get the userid for a non root user */
ltp_uid = getuserid(ltp_user);
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

217
minix/tests/ipc/semctl/semctl05.c
View file

@ -1,217 +0,0 @@
/*
*
* 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
* semctl05.c
*
* DESCRIPTION
* semctl05 - test for ERANGE error
*
* ALGORITHM
* create a semaphore set with read and alter permissions
* loop if that option was specified
* call semctl() with three different invalid cases
* check the errno value
* issue a PASS message if we get ERANGE
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* semctl05 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "ipcsem.h"
char *TCID = "semctl05";
int TST_TOTAL = 3;
extern int Tst_count;
#ifdef _XLC_COMPILER
#define SEMUN_CAST
#else
#define SEMUN_CAST (union semun)
#endif
int exp_enos[] = {ERANGE, 0}; /* 0 terminated list of expected errnos */
int sem_id_1 = -1;
#define BIGV 65535 /* a number ((2^16)-1) that should be larger */
/* than the maximum for a semaphore value */
#ifdef _XLC_COMPILER
#define SEMUN_CAST
#else
#define SEMUN_CAST (union semun)
#endif
unsigned short big_arr[] = {BIGV, BIGV, BIGV, BIGV, BIGV, BIGV, BIGV, BIGV,
BIGV, BIGV};
struct test_case_t {
int count;
int cmd;
union semun t_arg;
} TC[3];
void setup_test_case(void)
{
/* ERANGE - the value to set is less than zero - SETVAL */
/* {5, SETVAL, SEMUN_CAST -1}, */
TC[0].count = 5;
TC[0].cmd = SETVAL;
TC[0].t_arg.val = -1;
/* ERANGE - the values to set are too large, > semaphore max value */
/* {0, SETALL, SEMUN_CAST big_arr}, */
TC[1].count = 0;
TC[1].cmd = SETALL;
TC[1].t_arg.array = big_arr;
/* ERANGE - the value to set is too large, > semaphore max value */
/* {5, SETVAL, SEMUN_CAST BIGV} */
TC[2].count = 5;
TC[2].cmd = SETVAL;
TC[2].t_arg.val = BIGV;
}
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i;
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
for (i=0; i<TST_TOTAL; i++) {
TEST(semctl(sem_id_1, TC[i].count,
TC[i].cmd, TC[i].t_arg));
if (TEST_RETURN != -1) {
tst_resm(TFAIL, "call succeeded unexpectedly");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
switch(TEST_ERRNO) {
case ERANGE:
tst_resm(TPASS, "expected failure - errno = "
"%d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
break;
default:
tst_resm(TFAIL, "unexpected error "
"- %d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
break;
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
setup_test_case();
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
semkey = getipckey();
/* create a semaphore set with read and alter permissions */
if ((sem_id_1 =
semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL | SEM_RA)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create semaphore in setup");
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the semaphore resouce */
rm_sema(sem_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

458
minix/tests/ipc/semctl/semctl06.c
View file

@ -1,458 +0,0 @@
/*
*
* Copyright (c) International Business Machines Corp., 2002
*
* 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
*/
/* 06/30/2001 Port to Linux nsharoff@us.ibm.com */
/* 10/30/2002 Port to LTP dbarrera@us.ibm.com */
/*
* NAME
* semctl06
*
* CALLS
* semctl(2) semget(2) semop(2)
*
* ALGORITHM
* Get and manipulate a set of semaphores.
*
* RESTRICTIONS
*
* WARNING
* If this test fail, it may be necessary to use the ipcs and ipcrm
* commands to remove any semaphores left in the system due to a
* premature exit of this test.
*/
#define DEBUG 0
#ifdef UCLINUX
#define _GNU_SOURCE /* for asprintf */
#include <stdio.h>
#endif
#include <sys/types.h> /* needed for test */
#include <sys/ipc.h> /* needed for test */
#include <sys/sem.h> /* needed for test */
#include <unistd.h>
#include <errno.h>
#include <stdlib.h>
#include <signal.h>
#include "test.h"
#include "usctest.h"
#include <sys/wait.h>
#include "ipcsem.h"
int local_flag=1;
#define NREPS 10
#define NPROCS 3
#define NKIDS 5
#define NSEMS 5
#define HVAL 1000
#define LVAL 100
#define FAILED 0
void setup (void);
void cleanup(void);
static key_t keyarray[NPROCS];
static struct sembuf semops[NSEMS];
static short maxsemvals[NSEMS];
static int pidarray[NPROCS];
static int kidarray[NKIDS];
static int tid;
static int procstat;
static char *prog;
static unsigned short semvals[NSEMS];
/*
* * These globals must be defined in the test.
* * */
char *TCID="semctl06"; /* 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}; /* List must end with 0 */
static void term(int sig);
static void dosemas(int id);
static void dotest(key_t key);
#ifdef UCLINUX
static char *argv0;
void do_child();
static int id_uclinux;
static char *maxsemstring;
#endif
/*--------------------------------------------------------------*/
/*ARGSUSED*/
int
main(int argc, char **argv)
{
register int i, j, ok, pid;
int count, child, status, nwait;
#ifdef UCLINUX
char *msg;
if ((msg = parse_opts(argc, argv, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
argv0 = argv[0];
maybe_run_child(&do_child, "dS", &id_uclinux, &maxsemstring);
#endif
prog = argv[0];
nwait = 0;
setup();
/*--------------------------------------------------------------*/
srand(getpid());
tid = -1;
for (i = 0; i < NPROCS; i++) {
do {
keyarray[i] = (key_t)rand();
if (keyarray[i] == IPC_PRIVATE) {
ok = 0;
continue;
}
ok = 1;
for (j = 0; j < i; j++) {
if (keyarray[j] == keyarray[i]) {
ok = 0;
break;
}
}
} while (ok == 0);
}
if ((signal(SIGTERM, term)) == SIG_ERR) {
tst_resm(TFAIL, "\tsignal failed. errno = %d", errno);
tst_exit();
}
for (i = 0; i < NPROCS; i++) {
if ((pid = FORK_OR_VFORK()) < 0) {
tst_resm(TFAIL, "\tFork failed (may be OK if under stress)");
tst_exit();
}
if (pid == 0) {
procstat = 1;
dotest(keyarray[i]);
exit(0);
}
pidarray[i] = pid;
nwait++;
}
/*
* Wait for children to finish.
*/
count = 0;
while((child = wait(&status)) > 0) {
if (status) {
tst_resm(TFAIL, "%s[%d] Test failed. exit=0x%x", prog, child, status);
local_flag = FAILED;
}
++count;
}
/*
* Should have collected all children.
*/
if (count != nwait) {
tst_resm(TFAIL, "\tWrong # children waited on, count = %d", count);
local_flag = FAILED;
}
if (local_flag != FAILED)
tst_resm(TPASS, "semctl06 ran successfully!");
else tst_resm(TFAIL, "semctl06 failed");
/*--------------------------------------------------------------*/
/* Clean up any files created by test before call to anyfail. */
cleanup ();
return (0); /* shut lint up */
}
/*--------------------------------------------------------------*/
static void
dotest(key_t key)
{
int id, pid, status;
int count, child, nwait;
short i;
union semun get_arr;
nwait = 0;
srand(getpid());
if ((id = semget(key, NSEMS, IPC_CREAT)) < 0) {
tst_resm(TFAIL, "\tsemget() failed errno %d", errno);
exit(1);
}
tid = id;
for (i = 0; i < NSEMS; i++) {
do {
maxsemvals[i] = /*CASTOK*/(short)(rand() % HVAL);
} while (maxsemvals[i] < LVAL);
semops[i].sem_num = i;
semops[i].sem_op = maxsemvals[i];
semops[i].sem_flg = SEM_UNDO;
}
if (semop(id, semops, NSEMS) < 0) {
tst_resm(TFAIL, "\tfirst semop() failed errno %d", errno);
exit(1);
}
for (i = 0; i < NKIDS; i++) {
if ((pid = FORK_OR_VFORK()) < 0) {
tst_resm(TFAIL, "\tfork failed");
}
if (pid == 0) {
#ifdef UCLINUX
int j;
maxsemstring = "";
for (j = 0; j < NSEMS; j++) {
if (asprintf(&maxsemstring, "%s%s%d",
maxsemstring, (j ? ":" : ""),
maxsemvals[j]) < 0) {
tst_resm(TBROK, "Could not serialize "
"maxsemvals");
tst_exit();
}
}
if (self_exec(argv0, "dS", id, maxsemstring) < 0) {
tst_resm(TFAIL, "\tself_exec failed");
}
#else
dosemas(id);
#endif
}
if (pid > 0) {
kidarray[i] = pid;
nwait++;
}
}
procstat = 2;
/*
* Wait for children to finish.
*/
count = 0;
while((child = wait(&status)) > 0) {
if (status) {
tst_resm(TFAIL, "\t%s:dotest[%d] exited status = 0x%x", prog, child, status);
local_flag = FAILED;
}
++count;
}
/*
* Should have collected all children.
*/
if (count != nwait) {
tst_resm(TFAIL, "\tWrong # children waited on, count = %d", count);
local_flag = FAILED;
}
get_arr.array = semvals;
if (semctl(id, 0, GETALL, get_arr) < 0) {
tst_resm(TFAIL, "\terror on GETALL");
tst_resm(TFAIL, "\tsemctl() failed errno %d", errno);
}
if (DEBUG)
tst_resm(TINFO, "\tchecking maxvals");
for (i = 0; i < NSEMS; i++) {
if (semvals[i] != maxsemvals[i]) {
tst_resm(TFAIL, "\terror on i %d orig %d final %d", i, semvals[i],
maxsemvals[i]);
local_flag = FAILED;
}
}
if (DEBUG)
tst_resm(TINFO, "\tmaxvals checked");
/* 4th arg must either be missing, or must be of type 'union semun'.
* CANNOT just be an int, else it crashes on ppc.
*/
get_arr.val = 0;
if (semctl(id, 0, IPC_RMID, get_arr) < 0) {
tst_resm(TFAIL, "\tsemctl(IPC_RMID) failed errno %d", errno);
local_flag = FAILED;
}
if (local_flag == FAILED)
exit(1);
}
#ifdef UCLINUX
void
do_child()
{
int i;
char *tok;
char *endptr;
tok = strtok(maxsemstring, ":");
for (i = 0; i < NSEMS; i++) {
if (strlen(tok) == 0) {
tst_resm(TBROK, "Invalid argument to -C option");
tst_exit();
}
maxsemvals[i] = strtol(tok, &endptr, 10);
if (*endptr != '\0') {
tst_resm(TBROK, "Invalid argument to -C option");
tst_exit();
}
tok = strtok(NULL, ":");
}
dosemas(id_uclinux);
}
#endif
static void
dosemas(int id)
{
int i, j;
srand(getpid());
for (i = 0; i < NREPS; i++) {
for (j = 0; j < NSEMS; j++) {
semops[j].sem_num = j;
semops[j].sem_flg = SEM_UNDO;
do {
semops[j].sem_op =
( - /*CASTOK*/(short)(rand() % (maxsemvals[j]/2)));
} while (semops[j].sem_op == 0);
}
if (semop(id, semops, NSEMS) < 0) {
tst_resm(TFAIL, "\tsemop1 failed errno %d", errno);
exit(1);
}
for (j = 0; j < NSEMS; j++) {
semops[j].sem_op = ( - semops[j].sem_op);
}
if (semop(id, semops, NSEMS) < 0) {
tst_resm(TFAIL, "\tsemop2 failed errno %d", errno);
exit(1);
}
}
exit(0);
}
/*ARGSUSED*/
static void
term(int sig)
{
int i;
if ((signal(SIGTERM, term)) == SIG_ERR) {
tst_resm(TFAIL, "\tsignal failed. errno %d", errno);
exit(1);
}
if (procstat == 0) {
if (DEBUG)
tst_resm(TINFO, "\ttest killing kids");
for (i = 0; i < NPROCS; i++) {
if (kill(pidarray[i], SIGTERM) != 0) {
tst_resm(TFAIL, "Kill error pid = %d :",pidarray[1]);
}
}
if (DEBUG)
tst_resm(TINFO, "\ttest kids killed");
return;
}
if (procstat == 1) {
/* 4th arg must either be missing, or must be of type 'union semun'.
* CANNOT just be an int, else it crashes on ppc.
*/
union semun arg;
arg.val = 0;
(void)semctl(tid, 0, IPC_RMID, arg);
exit(1);
}
if (tid == -1) {
exit(1);
}
for (i = 0; i < NKIDS; i++) {
if (kill(kidarray[i], SIGTERM) != 0) {
tst_resm(TFAIL, "Kill error kid id = %d :",kidarray[1]);
}
}
}
/***************************************************************
* setup() - performs all ONE TIME setup for this test.
*****************************************************************/
void
setup()
{
/* You will want to enable some signal handling so you can capture
* unexpected signals like SIGSEGV.
* */
tst_sig(FORK, DEF_HANDLER, cleanup);
/* Pause if that option was specified */
/* One cavet that hasn't been fixed yet. TEST_PAUSE contains the code to
* fork the test with the -c option. You want to make sure you do this
* before you create your temporary directory.
*/
TEST_PAUSE;
}
/***************************************************************
* 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;
/* exit with return code appropriate for results */
tst_exit();
}

218
minix/tests/ipc/semctl/semctl07.c
View file

@ -1,218 +0,0 @@
/*
*
* Copyright (c) International Business Machines Corp., 2002
*
* 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
*/
/* 06/30/2001 Port to Linux nsharoff@us.ibm.com */
/* 10/30/2002 Port to LTP dbarrera@us.ibm.com */
/*
* NAME
* semctl07
*
* CALLS
* semctl(2) semget(2)
*
* ALGORITHM
* Get and manipulate a set of semaphores.
*
* RESTRICTIONS
*
*/
#include <sys/types.h> /* needed for test */
#include <sys/ipc.h> /* needed for test */
#include <sys/sem.h> /* needed for test */
#include <signal.h> /* needed for test */
#include <errno.h> /* needed for test */
#include <stdio.h> /* needed by testhead.h */
#include <sys/wait.h> /* needed by testhead.h */
#include "ipcsem.h"
#include "test.h"
#include "usctest.h"
void setup(void);
void cleanup(void);
/*
*These globals must be defined in the test.
*/
char *TCID="semctl07"; /* 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}; /* List must end with 0 */
/*--------------------------------------------------------------*/
int main(int argc, char *argv[])
{
key_t key;
int semid, nsems, status;
struct semid_ds buf_ds;
union semun {
int val;
struct semid_ds *buf;
short *array;
};
union semun arg;
setup(); /* temp file is now open */
/*--------------------------------------------------------------*/
key = nsems = 1;
if ((semid = semget(key, nsems, SEM_RA|IPC_CREAT)) == -1) {
tst_resm(TFAIL, "semget() failed errno = %d", errno);
tst_exit();
}
arg.buf = &buf_ds;
if ((status = semctl(semid, 0, IPC_STAT, arg)) == -1) {
tst_resm(TFAIL, "semctl() failed errno = %d", errno);
semctl(semid, 1, IPC_RMID, arg);
tst_exit();
}
/*
* Check contents of semid_ds structure.
*/
if (arg.buf->sem_nsems != nsems) {
tst_resm(TFAIL, "error: unexpected number of sems %d", arg.buf->sem_nsems);
tst_exit();
}
if (arg.buf->sem_perm.uid != getuid()) {
tst_resm(TFAIL, "error: unexpected uid %d", arg.buf->sem_perm.uid);
tst_exit();
}
if (arg.buf->sem_perm.gid != getgid()) {
tst_resm(TFAIL, "error: unexpected gid %d", arg.buf->sem_perm.gid);
tst_exit();
}
if (arg.buf->sem_perm.cuid != getuid()) {
tst_resm(TFAIL, "error: unexpected cuid %d", arg.buf->sem_perm.cuid);
tst_exit();
}
if (arg.buf->sem_perm.cgid != getgid()) {
tst_resm(TFAIL, "error: unexpected cgid %d", arg.buf->sem_perm.cgid);
tst_exit();
}
if ((status = semctl(semid, 0, GETVAL, arg)) == -1) {
tst_resm(TFAIL, "semctl(GETVAL) failed errno = %d", errno);
tst_exit();
}
arg.val = 1;
if ((status = semctl(semid, 0, SETVAL, arg)) == -1) {
tst_resm(TFAIL, "SEMCTL(SETVAL) failed errno = %d", errno);
tst_exit();
}
if ((status = semctl(semid, 0, GETVAL, arg)) == -1) {
tst_resm(TFAIL, "semctl(GETVAL) failed errno = %d", errno);
tst_exit();
}
if (status != arg.val) {
tst_resm(TFAIL, "error: unexpected value %d", status);
tst_exit();
}
if ((status = semctl(semid, 0, GETPID, arg)) == -1) {
tst_resm(TFAIL, "semctl(GETPID) failed errno = %d", errno);
tst_exit();
}
status = getpid();
if (status == 0)
{
tst_resm(TFAIL, "error: unexpected pid %d", status);
tst_exit();
}
if ((status = semctl(semid, 0, GETNCNT, arg)) == -1) {
tst_resm(TFAIL, "semctl(GETNCNT) failed errno = %d", errno);
tst_exit();
}
if (status != 0) {
tst_resm(TFAIL, "error: unexpected semncnt %d", status);
tst_exit();
}
if ((status = semctl(semid, 0, GETZCNT, arg)) == -1) {
tst_resm(TFAIL, "semctl(GETZCNT) failed errno = %d", errno);
tst_exit();
}
if (status != 0) {
tst_resm(TFAIL, "error: unexpected semzcnt %d", status);
tst_exit();
}
semctl(semid, 0, IPC_RMID, arg);
if ((status = semctl(semid, 0, GETPID, arg)) != -1) {
tst_resm(TFAIL, "semctl(IPC_RMID) failed");
tst_exit();
}
tst_resm(TPASS, "semctl07 ran successfully!");
/*--------------------------------------------------------------*/
/* Clean up any files created by test before exit. */
/*--------------------------------------------------------------*/
cleanup();
return (0);
}
/*--------------------------------------------------------------*/
/***************************************************************
* setup() - performs all ONE TIME setup for this test.
*****************************************************************/
void
setup()
{
/* You will want to enable some signal handling so you can capture
* unexpected signals like SIGSEGV.
* */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Pause if that option was specified */
/* One cavet that hasn't been fixed yet. TEST_PAUSE contains the code to
* fork the test with the -c option. You want to make sure you do this
* before you create your temporary directory.
*/
TEST_PAUSE;
}
/***************************************************************
* 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;
/* exit with return code appropriate for results */
tst_exit();
}

9
minix/tests/ipc/semctl/test.sh
View file

@ -1,9 +0,0 @@
#!/bin/sh
./semctl01
./semctl02
./semctl03
./semctl04
./semctl05
./semctl06
./semctl07

23
minix/tests/ipc/semget/Makefile
View file

@ -1,23 +0,0 @@
# Makefile for the tests
CC = exec cc
CFLAGS = -Wall -I../lib/
PROG = semget01 semget02 semget03 semget05 semget06
all: $(PROG)
$(PROG): ../libipc.a
$(CC) $(CFLAGS) -o $@ $@.c ../libipc.a
clean:
rm -f *.o $(PROG)
test:
sh ./test.sh
semget01: semget01.c
semget02: semget02.c
semget03: semget03.c
semget05: semget05.c
semget06: semget06.c

198
minix/tests/ipc/semget/semget01.c
View file

@ -1,198 +0,0 @@
/*
*
* 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
* semget01.c
*
* DESCRIPTION
* semget01 - test that semget() correclty creates a semaphore set
*
* ALGORITHM
* loop if that option was specified
* call semget() to create the semaphore set
* check the return code
* if failure, issue a FAIL message.
* otherwise,
* if doing functionality testing
* stat the semaphore set
* if the number of primitive semaphores is correct and
* the semaphore uid == the process uid
* then,
* issue a PASS message
* otherwise
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* semget01 [-c n] [-f] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -f : Turn off functionality Testing.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "ipcsem.h"
#include "usctest.h"
char *TCID = "semget01";
int TST_TOTAL = 1;
extern int Tst_count;
int sem_id_1 = -1;
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
void check_functionality(void);
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/*
* Use TEST macro to make the call
*/
TEST(semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL | SEM_RA));
if (TEST_RETURN == -1) {
tst_resm(TFAIL, "%s call failed - errno = %d : %s",
TCID, TEST_ERRNO, strerror(TEST_ERRNO));
} else {
/* get the semaphore ID */
sem_id_1 = TEST_RETURN;
if (STD_FUNCTIONAL_TEST) {
check_functionality();
} else {
tst_resm(TPASS, "semaphore was created");
}
}
/*
* remove the semaphore that was created and mark the ID
* as invalid.
*/
if (sem_id_1 != -1) {
rm_sema(sem_id_1);
sem_id_1 = -1;
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* check_functionality() - check the functionality of the tested system call.
*/
void
check_functionality(void)
{
struct semid_ds semary;
union semun un_arg; /* union defined in ipcsem.h */
/* STAT the semaphore */
un_arg.buf = &semary;
if (semctl(sem_id_1, 0, IPC_STAT, un_arg) == -1) {
tst_brkm(TBROK, cleanup, "Could not stat the semaphore");
return;
}
if (un_arg.buf->sem_nsems != PSEMS) {
tst_resm(TFAIL, "# of semaphores in set != # given to create");
return;
}
if (un_arg.buf->sem_perm.cuid != geteuid()) {
tst_resm(TFAIL, "semaphore uid != process uid");
return;
}
tst_resm(TPASS, "basic semaphore values are okay");
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
semkey = getipckey();
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the semaphore resouce */
rm_sema(sem_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

197
minix/tests/ipc/semget/semget02.c
View file

@ -1,197 +0,0 @@
/*
*
* 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
* semget02.c
*
* DESCRIPTION
* semget02 - test for EACCES and EEXIST errors
*
* ALGORITHM
* create a semaphore set without read or alter permissions
* loop if that option was specified
* call semget() using two different invalid cases
* check the errno value
* issue a PASS message if we get EACCES or EEXIST
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* semget02 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include <pwd.h>
#include "../lib/ipcsem.h"
char *TCID = "semget02";
int TST_TOTAL = 2;
extern int Tst_count;
int exp_enos[] = {EACCES, EEXIST, 0};
char nobody_uid[] = "nobody";
struct passwd *ltpuser;
int sem_id_1 = -1;
struct test_case_t {
int flags;
int error;
} TC [] = {
/* EACCES - the semaphore has no read or alter permissions */
{SEM_RA, EACCES},
/* EEXIST - the semaphore id exists and semget() was called with */
/* IPC_CREAT and IPC_EXCL */
{IPC_CREAT | IPC_EXCL, EEXIST}
};
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i;
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
for (i=0; i<TST_TOTAL; i++) {
/* use the TEST macro to make the call */
TEST(semget(semkey, PSEMS, TC[i].flags));
if (TEST_RETURN != -1) {
sem_id_1 = TEST_RETURN;
tst_resm(TFAIL, "call succeeded");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
if (TEST_ERRNO == TC[i].error) {
tst_resm(TPASS, "expected failure - errno "
"= %d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
} else {
tst_resm(TFAIL, "unexpected error - %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* Switch to nobody user for correct error code collection */
if (geteuid() != 0) {
tst_brkm(TBROK, tst_exit, "Test must be run as root");
}
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
ltpuser = getpwnam(nobody_uid);
if (seteuid(ltpuser->pw_uid) == -1) {
tst_resm(TINFO, "setreuid failed to "
"to set the effective uid to %d",
ltpuser->pw_uid);
perror("setreuid");
}
/* get an IPC resource key */
semkey = getipckey();
/* create a semaphore set without read or alter permissions */
if ((sem_id_1 = semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create semaphore in setup");
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the semaphore resource */
rm_sema(sem_id_1);
/* Remove the temporary directory */
seteuid(getuid());
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

159
minix/tests/ipc/semget/semget03.c
View file

@ -1,159 +0,0 @@
/*
*
* 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
* semget03.c
*
* DESCRIPTION
* semget03 - test for ENOENT error
*
* ALGORITHM
* loop if that option was specified
* call semget() with a valid key but with no associated semaphore set
* and IPC_CREAT is not asserted
* check the errno value
* issue a PASS message if we get ENOENT
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* semget03 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "../lib/ipcsem.h"
char *TCID = "semget03";
int TST_TOTAL = 1;
extern int Tst_count;
int exp_enos[] = {ENOENT, 0}; /* 0 terminated list of expected errnos */
int sem_id_1 = -1;
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, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/* use the TEST macro to make the call */
TEST(semget(semkey, PSEMS, SEM_RA));
if (TEST_RETURN != -1) {
sem_id_1 = TEST_RETURN;
tst_resm(TFAIL, "call succeeded when error expected");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
switch(TEST_ERRNO) {
case ENOENT:
tst_resm(TPASS, "expected failure - errno "
"= %d : %s", TEST_ERRNO, strerror(TEST_ERRNO));
break;
default:
tst_resm(TFAIL, "unexpected error - %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
break;
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
semkey = getipckey();
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the semaphore resource */
rm_sema(sem_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

218
minix/tests/ipc/semget/semget05.c
View file

@ -1,218 +0,0 @@
/*
*
* 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
* semget05.c
*
* DESCRIPTION
* semget05 - test for ENOSPC error
*
* ALGORITHM
* create semaphore sets in a loop until the system limit is reached
* loop if that option was specified
* attempt to create yet another semaphore set
* check the errno value
* issue a PASS message if we get ENOSPC
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* semget05 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
* 07/2006 - Changes By Michael Reed
* - Changed the value of MAXIDS for the specific machine by reading
* the system limit for SEMMNI - The maximum number of sempahore sets
*
* RESTRICTIONS
* none
*/
#include "../lib/ipcsem.h"
char *TCID = "semget05";
int TST_TOTAL = 1;
extern int Tst_count;
/*
* The MAXIDS value is somewhat arbitrary and may need to be increased
* depending on the system being tested.
*/
int MAXIDS=2048;
int exp_enos[] = {ENOSPC, 0}; /* 0 terminated list of expected errnos */
int *sem_id_arr;
int num_sems = 0; /* count the semaphores created */
int main(int ac, char **av)
{
int lc,getmaxid=0; /* loop counter */
char *msg; /* message returned from parse_opts */
FILE *fp;
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
/* Set the MAXIDS for the specific machine by reading the system limit
for SEMMNI - The maximum number of sempahore sets */
if((fp = fopen("/proc/sys/kernel/sem", "r")) != NULL)
{
for(lc= 0; lc < 4; lc++)
{
if(lc == 3)
{
if(getmaxid > MAXIDS)
MAXIDS=getmaxid;
}
}
}
if(fp)
fclose(fp);
sem_id_arr = (int*)malloc(sizeof(int)*MAXIDS);
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/* use the TEST macro to make the call */
TEST(semget(semkey + num_sems, PSEMS,
IPC_CREAT | IPC_EXCL | SEM_RA));
/* printf("rc = %ld \n", TEST_RETURN); */
if (TEST_RETURN != -1) {
tst_resm(TFAIL, "call succeeded when error expected");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
switch(TEST_ERRNO) {
case ENOSPC:
tst_resm(TPASS, "expected failure - errno "
"= %d : %s", TEST_ERRNO, strerror(TEST_ERRNO));
break;
default:
tst_resm(TFAIL, "unexpected error - %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
break;
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
int sem_q;
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
semkey = getipckey();
/*
* Use a while loop to create the maximum number of semaphore sets.
* If the loop exceeds MAXIDS, then break the test and cleanup.
*/
while((sem_q =
semget(semkey + num_sems, PSEMS, IPC_CREAT|IPC_EXCL)) != -1) {
sem_id_arr[num_sems++] = sem_q;
if (num_sems == MAXIDS) {
tst_brkm(TBROK, cleanup, "The maximum number of "
"semaphore ID's has been\n\t reached. Please "
"increase the MAXIDS value in the test.");
}
}
/*
* If the errno is other than ENOSPC, then something else is wrong.
*/
if (errno != ENOSPC) {
tst_brkm(TBROK, cleanup, "Didn't get ENOSPC in test setup"
" - errno = %d : %s", errno, strerror(errno));
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
int i;
/* remove the semaphore resources that were created */
for (i=0; i<num_sems; i++) {
rm_sema(sem_id_arr[i]);
}
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

170
minix/tests/ipc/semget/semget06.c
View file

@ -1,170 +0,0 @@
/*
*
* 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
* semget06.c
*
* DESCRIPTION
* semget06 - test for EINVAL error
*
* ALGORITHM
* loop if that option was specified
* call semget() using two different invalid cases - too many and too
* few primitive semaphores
* check the errno value
* issue a PASS message if we get EINVAL
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* semget06 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "../lib/ipcsem.h"
char *TCID = "semget06";
int TST_TOTAL = 2;
extern int Tst_count;
#define LARGENUM 1024 * 32
#define SMALLNUM -1
int exp_enos[] = {EINVAL, 0}; /* 0 terminated list of expected errnos */
int sem_id_1 = -1;
int num_sems[] = {LARGENUM, SMALLNUM};
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i;
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/* loop through the test cases */
for (i=0; i<TST_TOTAL; i++) {
TEST(semget(semkey, num_sems[i],
IPC_CREAT | IPC_EXCL | SEM_RA));
if (TEST_RETURN != -1) {
sem_id_1 = TEST_RETURN;
tst_resm(TFAIL, "call succeeded");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
switch(TEST_ERRNO) {
case EINVAL:
tst_resm(TPASS, "expected failure - errno "
"= %d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
break;
default:
tst_resm(TFAIL, "unexpected error - %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
break;
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
semkey = getipckey();
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the semaphore resource */
rm_sema(sem_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

8
minix/tests/ipc/semget/test.sh
View file

@ -1,8 +0,0 @@
#!/bin/sh
./semget01
./semget02
./semget03
./semget05
./semget06

24
minix/tests/ipc/semop/Makefile
View file

@ -1,24 +0,0 @@
# Makefile for the tests
CC = exec cc
CFLAGS = -Wall -I../lib/
PROG = semop01 semop02 semop03 semop04 semop05
all: $(PROG)
$(PROG): ../libipc.a
$(CC) $(CFLAGS) -o $@ $@.c ../libipc.a
clean:
rm -f *.o $(PROG)
test:
sh ./test.sh
semop01: semop01.c
semop02: semop02.c
semop03: semop03.c
semop04: semop04.c
semop05: semop05.c

217
minix/tests/ipc/semop/semop01.c
View file

@ -1,217 +0,0 @@
/*
*
* 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
* semop01.c
*
* DESCRIPTION
* semop01 - test that semop() basic functionality is correct
*
* ALGORITHM
* create a semaphore set and initialize some values
* loop if that option was specified
* call semop() to set values for the primitive semaphores
* check the return code
* if failure, issue a FAIL message.
* otherwise,
* if doing functionality testing
* get the semaphore values and compare with expected values
* if correct,
* issue a PASS message
* otherwise
* issue a FAIL message
* else issue a PASS message
* call cleanup
*
* USAGE: <for command-line>
* semop01 [-c n] [-f] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -f : Turn off functionality Testing.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
* 17/01/02 - Modified. Manoj Iyer, IBM Austin. TX. manjo@austin.ibm.com
* 4th argument to semctl() system call was modified according
* to man pages.
* In my opinion The test should not even have compiled but
* it was working due to some mysterious reason.
*
* RESTRICTIONS
* none
*/
#include "ipcsem.h"
#define NSEMS 4 /* the number of primitive semaphores to test */
char *TCID = "semop01";
int TST_TOTAL = 1;
extern int Tst_count;
int sem_id_1 = -1; /* a semaphore set with read & alter permissions */
struct sembuf sops[PSEMS]; /* an array of sembuf structures */
int main(int ac, char **av)
{
union semun get_arr;
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i;
int fail = 0;
get_arr.array = malloc(sizeof(unsigned short int) * PSEMS);
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/*
* Use TEST macro to make the call
*/
TEST(semop(sem_id_1, sops, NSEMS));
if (TEST_RETURN == -1) {
tst_resm(TFAIL, "%s call failed - errno = %d "
": %s", TCID, TEST_ERRNO,
strerror(TEST_ERRNO));
} else {
if (STD_FUNCTIONAL_TEST) {
/* get the values and make sure they */
/* are the same as what was set */
if (semctl(sem_id_1, 0, GETALL, get_arr) ==
-1) {
tst_brkm(TBROK, cleanup, "semctl() "
"failed in functional test");
}
for (i=0; i<NSEMS; i++) {
if (get_arr.array[i] != i*i) {
fail = 1;
}
}
if (fail) {
tst_resm(TFAIL, "semaphore values"
" are not expected");
} else {
tst_resm(TPASS, "semaphore values"
" are correct");
}
} else {
tst_resm(TPASS, "call succeeded");
}
}
/*
* clean up things in case we are looping
*/
get_arr.val = 0;
for (i=0; i<NSEMS; i++) {
if(semctl(sem_id_1, i, SETVAL, get_arr) == -1) {
tst_brkm(TBROK, cleanup, "semctl failed");
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
int i;
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
semkey = getipckey();
/* create a semaphore set with read and alter permissions */
if ((sem_id_1 =
semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL | SEM_RA)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create semaphore in setup");
}
/* set up some values for the first four primitive semaphores */
for (i=0; i<NSEMS; i++){
sops[i].sem_num = i;
sops[i].sem_op = i*i; /* 0, 1, 4, 9, */
sops[i].sem_flg = SEM_UNDO;
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the semaphore resouce */
rm_sema(sem_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

224
minix/tests/ipc/semop/semop02.c
View file

@ -1,224 +0,0 @@
/*
*
* 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
* semop02.c
*
* DESCRIPTION
* semop02 - test for E2BIG, EACCES, EFAULT and EINVAL errors
*
* ALGORITHM
* create a semaphore set with read and alter permissions
* create a semaphore set without read and alter permissions
* loop if that option was specified
* call semop with five different invalid cases
* check the errno value
* issue a PASS message if we get E2BIG, EACCES, EFAULT or EINVAL
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* semop02 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include <pwd.h>
#include "ipcsem.h"
char *TCID = "semop02";
int TST_TOTAL = 4;
extern int Tst_count;
int exp_enos[] = {E2BIG, EACCES, EFAULT, EINVAL, 0};
int sem_id_1 = -1; /* a semaphore set with read & alter permissions */
int sem_id_2 = -1; /* a semaphore set without read & alter permissions */
int bad_id = -1;
char nobody_uid[] = "nobody";
struct passwd *ltpuser;
struct sembuf s_buf[PSEMS];
int badbuf = -1;
#define NSOPS 5 /* a resonable number of operations */
#define BIGOPS 1024 /* a value that is too large for the number */
/* of semop operations that are permitted */
struct test_case_t {
int *semid; /* the semaphore id */
struct sembuf *t_sbuf; /* the first in an array of sembuf structures */
unsigned t_ops; /* the number of elements in the above array */
int error; /* the expected error number */
} TC[] = {
/* E2BIG - the number of operations is too big */
{&sem_id_1, (struct sembuf *)&s_buf, BIGOPS, E2BIG},
/* EACCES - the semaphore set has no access permission */
{&sem_id_2, (struct sembuf *)&s_buf, NSOPS, EACCES},
/* EINVAL - the number of elments (t_ops) is 0 */
{&sem_id_1, (struct sembuf *)&s_buf, 0, EINVAL},
/* EINVAL - the semaphore set doesn't exist */
{&bad_id, (struct sembuf *)&s_buf, NSOPS, EINVAL}
};
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i;
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
for (i=0; i<TST_TOTAL; i++) {
/*
* use the TEST macro to make the call
*/
TEST(semop(*(TC[i].semid), TC[i].t_sbuf, TC[i].t_ops));
if (TEST_RETURN != -1) {
tst_resm(TFAIL, "call succeeded unexpectedly");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
if (TEST_ERRNO == TC[i].error) {
tst_resm(TPASS, "expected failure - errno = "
"%d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
} else {
tst_resm(TFAIL, "unexpected error - "
"%d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* Switch to nobody user for correct error code collection */
if (geteuid() != 0) {
tst_brkm(TBROK, tst_exit, "Test must be run as root");
}
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
ltpuser = getpwnam(nobody_uid);
if (seteuid(ltpuser->pw_uid) == -1) {
tst_resm(TINFO, "setreuid failed to "
"to set the effective uid to %d",
ltpuser->pw_uid);
perror("setreuid");
}
/* get an IPC resource key */
semkey = getipckey();
/* create a semaphore set with read and alter permissions */
if ((sem_id_1 =
semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL | SEM_RA)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create semaphore in setup");
}
/* increment the semkey */
semkey += 1;
/* create a semaphore set without read and alter permissions */
if ((sem_id_2 = semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create semaphore in setup");
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if they exist, remove the semaphore resources */
rm_sema(sem_id_1);
rm_sema(sem_id_2);
/* Remove the temporary directory */
seteuid(getuid());
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

184
minix/tests/ipc/semop/semop03.c
View file

@ -1,184 +0,0 @@
/*
*
* 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
* semop03.c
*
* DESCRIPTION
* semop03 - test for EFBIG error
*
* ALGORITHM
* create a semaphore set with read and alter permissions
* loop if that option was specified
* call semop() using two different invalid cases
* check the errno value
* issue a PASS message if we get EFBIG
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* semop03 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "ipcsem.h"
char *TCID = "semop03";
int TST_TOTAL = 2;
extern int Tst_count;
int exp_enos[] = {EFBIG, 0}; /* 0 terminated list of expected errnos */
int sem_id_1 = -1;
struct sembuf s_buf;
int TC[] = {-1, PSEMS + 1}; /* negative and too many "primitive" semas */
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i;
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) !=(char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* initialize two fields in the sembuf structure here */
s_buf.sem_op = 1; /* add this value to struct sem.semval */
s_buf.sem_flg = SEM_UNDO; /* undo when process exits */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
for (i=0; i<TST_TOTAL; i++) {
/* initialize the last field in the sembuf */
/* structure to the test dependent value */
s_buf.sem_num = TC[i];
/*
* use the TEST macro to make the call
*/
TEST(semop(sem_id_1, &s_buf, 1));
if (TEST_RETURN != -1) {
tst_resm(TFAIL, "call succeeded unexpectedly");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
switch(TEST_ERRNO) {
case EFBIG:
tst_resm(TPASS, "expected failure - errno = "
"%d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
break;
default:
tst_resm(TFAIL, "unexpected error - "
"%d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
break;
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
semkey = getipckey();
/* create a semaphore with read and alter permissions */
if ((sem_id_1 =
semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL | SEM_RA)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create semaphore in setup");
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the semaphore resource */
rm_sema(sem_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

199
minix/tests/ipc/semop/semop04.c
View file

@ -1,199 +0,0 @@
/*
*
* 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
* semop04.c
*
* DESCRIPTION
* semop04 - test for EAGAIN error
*
* ALGORITHM
* create a semaphore set with read and alter permissions
* loop if that option was specified
* call semop() with two different invalid cases
* check the errno value
* issue a PASS message if we get EAGAIN
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* semop04 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "ipcsem.h"
char *TCID = "semop04";
int TST_TOTAL = 2;
extern int Tst_count;
int exp_enos[] = {EAGAIN, 0}; /* 0 terminated list of expected errnos */
int sem_id_1 = -1;
struct sembuf s_buf;
struct test_case_t {
union semun get_arr;
short op;
short flg;
short num;
int error;
} TC[] = {
/* EAGAIN sem_op = 0 */
{{1}, 0, IPC_NOWAIT, 2, EAGAIN},
/* EAGAIN sem_op = -1 */
{{0}, -1, IPC_NOWAIT, 2, EAGAIN}
};
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int val = 1; /* value for SETVAL */
int i;
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
for (i=0; i<TST_TOTAL; i++) {
/* initialize the s_buf buffer */
s_buf.sem_op = TC[i].op;
s_buf.sem_flg = TC[i].flg;
s_buf.sem_num = TC[i].num;
/* initialize all the primitive semaphores */
TC[i].get_arr.val = val--;
if (semctl(sem_id_1, TC[i].num, SETVAL, TC[i].get_arr)
== -1) {
tst_brkm(TBROK, cleanup, "semctl() failed");
}
/*
* make the call with the TEST macro
*/
TEST(semop(sem_id_1, &s_buf, 1));
if (TEST_RETURN != -1) {
tst_resm(TFAIL, "call succeeded unexpectedly");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
if (TEST_ERRNO == TC[i].error) {
tst_resm(TPASS, "expected failure - errno = %d" " : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
} else {
tst_resm(TFAIL, "unexpected error - "
"%d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
semkey = getipckey();
/* create a semaphore set with read and alter permissions */
/* and PSEMS "primitive" semaphores */
if ((sem_id_1 =
semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL | SEM_RA)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create semaphore in setup");
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the semaphore resource */
rm_sema(sem_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

312
minix/tests/ipc/semop/semop05.c
View file

@ -1,312 +0,0 @@
/*
*
* 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
* semop05.c
*
* DESCRIPTION
* semop05 - test for EINTR and EIDRM errors
*
* ALGORITHM
* create a semaphore set with read and alter permissions
* loop if that option was specified
* set up the s_buf buffer
* initialize the primitive semaphores
* fork a child process
* child calls semop() and sleeps
* parent either removes the semaphore set or sends a signal to the child
* parent then exits
* child gets a return from the semop() call
* check the errno value
* issue a PASS message if we get EINTR or EIDRM
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* semop05 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "ipcsem.h"
#include <sys/types.h>
#include <sys/wait.h>
void sighandler(int);
char *TCID = "semop05";
int TST_TOTAL = 4;
extern int Tst_count;
int exp_enos[] = {EINTR, EIDRM, 0}; /* 0 terminated list of expected errnos */
int sem_id_1 = -1;
struct sembuf s_buf;
struct test_case_t {
union semun semunptr;
short op;
short flg;
short num;
int error;
} TC[] = {
/* EIRDM sem_op = 0 */
{{1}, 0, 0, 2, EIDRM},
/* EIRDM sem_op = -1 */
{{0}, -1, 0, 3, EIDRM},
/* EINTR sem_op = 0 */
{{1}, 0, 0, 4, EINTR},
/* EINTR sem_op = -1 */
{{0}, -1, 0, 5, EINTR}
};
#ifdef UCLINUX
void do_child_uclinux();
static int i_uclinux;
#endif
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i;
pid_t pid;
void do_child(int);
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
#ifdef UCLINUX
maybe_run_child(&do_child_uclinux, "dd", &i_uclinux, &sem_id_1);
#endif
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
for (i=0; i<TST_TOTAL; i++) {
/* initialize the s_buf buffer */
s_buf.sem_op = TC[i].op;
s_buf.sem_flg = TC[i].flg;
s_buf.sem_num = TC[i].num;
/* initialize all of the primitive semaphores */
if (semctl(sem_id_1, TC[i].num, SETVAL, TC[i].semunptr)
== -1) {
tst_brkm(TBROK, cleanup, "semctl() failed");
}
if ((pid = fork()) == -1) {
tst_brkm(TBROK, cleanup, "could not fork");
}
if (pid == 0) { /* child */
#ifdef UCLINUX
if (self_exec(av[0], "dd", i, sem_id_1) < 0) {
tst_brkm(TBROK, cleanup,
"could not self_exec");
}
#else
do_child(i);
#endif
} else { /* parent */
usleep(250000);
/*
* If we are testing for EIDRM then remove
* the semaphore, else send a signal that
* must be caught as we are testing for
* EINTR.
*/
if (TC[i].error == EIDRM) {
/* remove the semaphore resource */
rm_sema(sem_id_1);
} else {
if (kill(pid, SIGHUP) == -1) {
tst_brkm(TBROK, cleanup,
"kill failed");
}
}
/* let the child carry on */
waitpid(pid,NULL,0);
}
/*
* recreate the semaphore resource if needed
*/
if (TC[i].error == EINTR) {
continue;
}
if ((sem_id_1 = semget(semkey, PSEMS, IPC_CREAT |
IPC_EXCL | SEM_RA)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't recreate "
"semaphore");
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* do_child()
*/
void
do_child(int i)
{
/*
* make the call with the TEST macro
*/
TEST(semop(sem_id_1, &s_buf, 1));
if (TEST_RETURN != -1) {
tst_resm(TFAIL, "call succeeded when error expected");
exit(-1);
}
TEST_ERROR_LOG(TEST_ERRNO);
if (TEST_ERRNO == TC[i].error) {
tst_resm(TPASS, "expected failure - errno = %d"
" : %s", TEST_ERRNO, strerror(TEST_ERRNO));
} else {
tst_resm(TFAIL, "unexpected error - "
"%d : %s", TEST_ERRNO, strerror(TEST_ERRNO));
}
exit(0);
}
#ifdef UCLINUX
/*
* do_child_uclinux() - capture signals, re-initialize s_buf then call do_child
* with the appropriate argument
*/
void
do_child_uclinux()
{
int i = i_uclinux;
/* capture signals */
tst_sig(FORK, sighandler, cleanup);
/* initialize the s_buf buffer */
s_buf.sem_op = TC[i].op;
s_buf.sem_flg = TC[i].flg;
s_buf.sem_num = TC[i].num;
do_child(i);
}
#endif
/*
* sighandler() - handle signals
*/
void
sighandler(int sig)
{
/* we don't need to do anything here */
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(FORK, sighandler, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
semkey = getipckey();
/* create a semaphore set with read and alter permissions */
/* and PSEMS "primitive" semaphores */
if ((sem_id_1 =
semget(semkey, PSEMS, IPC_CREAT | IPC_EXCL | SEM_RA)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create semaphore in setup");
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the semaphore resource */
rm_sema(sem_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

7
minix/tests/ipc/semop/test.sh
View file

@ -1,7 +0,0 @@
#!/bin/sh
./semop01
./semop02
./semop03
./semop04
./semop05

21
minix/tests/ipc/shmat/Makefile
View file

@ -1,21 +0,0 @@
# Makefile for the tests
CC = exec cc
CFLAGS = -Wall -I../lib/
PROG = shmat01 shmat02 shmat03
all: $(PROG)
$(PROG): ../libipc.a
$(CC) $(CFLAGS) -o $@ $@.c ../libipc.a
clean:
rm -f *.o $(PROG)
test:
sh ./test.sh
shmat01: shmat01.c
shmat02: shmat02.c
shmat03: shmat03.c

287
minix/tests/ipc/shmat/shmat01.c
View file

@ -1,287 +0,0 @@
/*
*
* 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
* shmat01.c
*
* DESCRIPTION
* shmat01 - test that shmat() works correctly
*
* ALGORITHM
* create a shared memory resouce with read/write permissions
* loop if that option was specified
* call shmat() with the TEST() macro using three valid conditions
* check the return code
* if failure, issue a FAIL message.
* otherwise,
* if doing functionality testing
* check for the correct conditions after the call
* if correct,
* issue a PASS message
* otherwise
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* shmat01 [-c n] [-f] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -f : Turn off functionality Testing.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "ipcshm.h"
char *TCID = "shmat01";
int TST_TOTAL = 3;
extern int Tst_count;
#define CASE0 10 /* values to write into the shared */
#define CASE1 20 /* memory location. */
#ifdef __ia64__
#define UNALIGNED 0x5ff00eee /* an address not evenly divisible by */
#elif defined __XTENSA__ /* SHMLBA which defaults to 0x8048e8b */
/* TASK_SIZE on Xtensa is only 0x40000000 */
#define UNALIGNED 0x28ffeeee
#elif defined __arm__
#define UNALIGNED 0x28ffeeee
#else
#define UNALIGNED 0x5fffeeee
#endif
int shm_id_1 = -1;
void *addr; /* for result of shmat-call */
struct test_case_t {
int *shmid;
void *addr;
int flags;
} TC[] = {
/* a straight forward read/write attach */
{&shm_id_1, 0, 0},
/* an attach using non aligned memory */
{&shm_id_1, (void *)UNALIGNED, SHM_RND},
/* a read only attach */
{&shm_id_1, 0, SHM_RDONLY}
};
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i;
void check_functionality(int);
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/* loop through the test cases */
for (i=0; i<TST_TOTAL; i++) {
/*
* Use TEST macro to make the call
*/
errno = 0;
addr = shmat(*(TC[i].shmid), (void *)(TC[i].addr),
TC[i].flags);
TEST_ERRNO = errno;
if (addr == (void *)-1) {
tst_brkm(TFAIL, cleanup, "%s call failed - "
"errno = %d : %s", TCID, TEST_ERRNO,
strerror(TEST_ERRNO));
} else {
if (STD_FUNCTIONAL_TEST) {
check_functionality(i);
} else {
tst_resm(TPASS, "call succeeded");
}
}
/*
* clean up things in case we are looping - in
* this case, detach the shared memory
*/
if (shmdt((const void *)addr) == -1) {
tst_brkm(TBROK, cleanup,
"Couldn't detach shared memory");
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* check_functionality - check various conditions to make sure they
* are correct.
*/
void
check_functionality(int i)
{
void *orig_add;
int *shared;
int fail = 0;
struct shmid_ds buf;
shared = (int *)addr;
/* stat the shared memory ID */
if (shmctl(shm_id_1, IPC_STAT, &buf) == -1) {
tst_brkm(TBROK, cleanup, "couldn't stat shared memory");
}
/* check the number of attaches */
if (buf.shm_nattch != 1) {
tst_resm(TFAIL, "# of attaches is incorrect");
return;
}
/* check the size of the segment */
if (buf.shm_segsz != INT_SIZE) {
tst_resm(TFAIL, "segment size is incorrect");
return;
}
/* check for specific conditions depending on the type of attach */
switch(i) {
case 0:
/*
* Check the functionality of the first call by simply
* "writing" a value to the shared memory space.
* If this fails the program will get a SIGSEGV, dump
* core and exit.
*/
*shared = CASE0;
break;
case 1:
/*
* Check the functionality of the second call by writing
* a value to the shared memory space and then checking
* that the original address given was rounded down as
* specified in the man page.
*/
*shared = CASE1;
orig_add = (void *)((unsigned long)addr + (((unsigned long)TC[i].addr)%SHMLBA));
if (orig_add != TC[i].addr) {
tst_resm(TFAIL, "shared memory address is not "
"correct");
fail = 1;
}
break;
case 2:
/*
* This time the shared memory is read only. Read the value
* and check that it is equal to the value set in case #2,
* because shared memory is persistent.
*/
if (*shared != CASE1) {
tst_resm(TFAIL, "shared memory value isn't correct");
fail = 1;
}
break;
}
if (!fail) {
tst_resm(TPASS, "conditions and functionality are correct");
}
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* Get an IPC resouce key */
shmkey = getipckey();
/* create a shared memory resource with read and write permissions */
if ((shm_id_1 = shmget(shmkey++, INT_SIZE, SHM_RW | IPC_CREAT |
IPC_EXCL)) == -1) {
tst_brkm(TBROK, cleanup, "Failed to create shared memory "
"resource 1 in setup()");
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the shared memory resource */
rm_shm(shm_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

224
minix/tests/ipc/shmat/shmat02.c
View file

@ -1,224 +0,0 @@
/*
*
* 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
* shmat02.c
*
* DESCRIPTION
* shmat02 - check for EINVAL and EACCES errors
*
* ALGORITHM
* loop if that option was specified
* call shmat() using three invalid test cases
* check the errno value
* issue a PASS message if we get EINVAL or EACCES
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* shmat02 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* Must be ran as non-root
*/
#include "ipcshm.h"
#include <pwd.h>
char *TCID = "shmat02";
int TST_TOTAL = 3;
extern int Tst_count;
char nobody_uid[] = "nobody";
struct passwd *ltpuser;
int exp_enos[] = {EINVAL, EACCES, 0}; /* 0 terminated list of */
/* expected errnos */
int shm_id_1 = -1;
int shm_id_2 = -1;
int shm_id_3 = -1;
void *addr; /* for result of shmat-call */
#define NADDR 0x40FFFEE5 /* a non alligned address value */
struct test_case_t {
int *shmid;
void *addr;
int error;
} TC[] = {
/* EINVAL - the shared memory ID is not valid */
{&shm_id_1, 0, EINVAL},
/* EINVAL - the address is not page aligned and SHM_RND is not given */
{&shm_id_2, (void *)NADDR, EINVAL},
/* EACCES - the shared memory resource has no read/write permission */
{&shm_id_3, 0, EACCES}
};
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i;
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/* loop through the test cases */
for (i=0; i<TST_TOTAL; i++) {
/*
* make the call using the TEST() macro - attempt
* various invalid shared memory attaches
*/
errno = 0;
addr = shmat(*(TC[i].shmid), (const void *)TC[i].addr, 0);
TEST_ERRNO = errno;
if (addr != (void *)-1) {
tst_resm(TFAIL, "call succeeded unexpectedly");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
if (TEST_ERRNO == TC[i].error) {
tst_resm(TPASS, "expected failure - errno = "
"%d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
} else {
tst_resm(TFAIL, "call failed with an "
"unexpected error - %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* Switch to nobody user for correct error code collection */
if (geteuid() != 0) {
tst_brkm(TBROK, tst_exit, "Test must be run as root");
}
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
ltpuser = getpwnam(nobody_uid);
if (seteuid(ltpuser->pw_uid) == -1) {
tst_resm(TINFO, "setuid failed to "
"to set the effective uid to %d",
ltpuser->pw_uid);
perror("seteuid");
}
/* get an IPC resource key */
shmkey = getipckey();
/* create a shared memory resource with read and write permissions */
/* also post increment the shmkey for the next shmget call */
if ((shm_id_2 = shmget(shmkey++, INT_SIZE, SHM_RW | IPC_CREAT |
IPC_EXCL)) == -1) {
tst_brkm(TBROK, cleanup, "Failed to create shared memory "
"resource #1 in setup()");
}
/* create a shared memory resource without read and write permissions */
if ((shm_id_3 = shmget(shmkey, INT_SIZE, IPC_CREAT | IPC_EXCL)) == -1) {
tst_brkm(TBROK, cleanup, "Failed to create shared memory "
"resource #2 in setup()");
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if they exist, remove the shared memory resources */
rm_shm(shm_id_2);
rm_shm(shm_id_3);
if (seteuid(0) == -1) {
tst_resm(TINFO, "setuid failed to "
"to set the effective uid to root");
perror("seteuid");
}
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

215
minix/tests/ipc/shmat/shmat03.c
View file

@ -1,215 +0,0 @@
/*
*
* 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
* shmat03.c
*
* DESCRIPTION
* shmat03 - test for EACCES error
*
* ALGORITHM
* create a shared memory segment with root only read & write permissions
* fork a child process
* if child
* set the ID of the child process to that of "nobody"
* loop if that option was specified
* call shmat() using the TEST() macro
* check the errno value
* issue a PASS message if we get EACCES
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
* if parent
* wait for child to exit
* remove the shared memory segment
*
* USAGE: <for command-line>
* shmat03 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* test must be run at root
*/
#include "ipcshm.h"
char *TCID = "shmat03";
int TST_TOTAL = 1;
extern int Tst_count;
int exp_enos[] = {EACCES, 0}; /* 0 terminated list of expected errnos */
int shm_id_1 = -1;
void *addr; /* for result of shmat-call */
uid_t ltp_uid;
char *ltp_user = "nobody";
int main(int ac, char **av)
{
char *msg; /* message returned from parse_opts */
int pid;
void do_child(void);
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
if ((pid = FORK_OR_VFORK()) == -1) {
tst_brkm(TBROK, cleanup, "could not fork");
}
if (pid == 0) { /* child */
/* set the user ID of the child to the non root user */
if (setuid(ltp_uid) == -1) {
tst_resm(TBROK, "setuid() failed");
exit(1);
}
do_child();
} else { /* parent */
/* wait for the child to return */
if (waitpid(pid, NULL, 0) == -1) {
tst_brkm(TBROK, cleanup, "waitpid failed");
}
/* if it exists, remove the shared memory resource */
rm_shm(shm_id_1);
/* Remove the temporary directory */
tst_rmdir();
}
cleanup();
return(0);
}
/*
* do_child - make the TEST call as the child process
*/
void
do_child(void)
{
int lc;
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/*
* use TEST macro to make the call
*/
errno = 0;
addr = shmat(shm_id_1, (const void *)0, 0);
TEST_ERRNO = errno;
if (addr != (char *)-1) {
tst_resm(TFAIL, "call succeeded when error expected");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
switch(TEST_ERRNO) {
case EACCES:
tst_resm(TPASS, "expected failure - errno = "
"%d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
break;
default:
tst_resm(TFAIL, "call failed with an "
"unexpected error - %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
break;
}
}
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* check for root as process owner */
check_root();
/* capture signals */
tst_sig(FORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
shmkey = getipckey();
/* create a shared memory segment with read and write permissions */
if ((shm_id_1 = shmget(shmkey, SHM_SIZE,
SHM_RW | IPC_CREAT | IPC_EXCL)) == -1) {
tst_brkm(TBROK, cleanup, "Failed to create shared memory "
"segment in setup");
}
/* get the userid for a non root user */
ltp_uid = getuserid(ltp_user);
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

5
minix/tests/ipc/shmat/test.sh
View file

@ -1,5 +0,0 @@
#!/bin/sh
./shmat01
./shmat02
./shmat03

22
minix/tests/ipc/shmctl/Makefile
View file

@ -1,22 +0,0 @@
# Makefile for the tests
CC = exec cc
CFLAGS = -Wall -I../lib/
PROG = shmctl01 shmctl02 shmctl03 shmctl04
all: $(PROG)
$(PROG): ../libipc.a
$(CC) $(CFLAGS) -o $@ $@.c ../libipc.a
clean:
rm -f *.o $(PROG)
test:
sh ./test.sh
shmctl01: shmctl01.c
shmctl02: shmctl02.c
shmctl03: shmctl03.c
shmctl04: shmctl04.c

523
minix/tests/ipc/shmctl/shmctl01.c
View file

@ -1,523 +0,0 @@
/*
*
* 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
* shmctl01.c
*
* DESCRIPTION
* shmctl01 - test the IPC_STAT, IPC_SET and IPC_RMID commands as
* they are used with shmctl()
*
* ALGORITHM
* loop if that option was specified
* create a shared memory segment with read and write permission
* set up any test case specific conditions
* call shmctl() using the TEST macro
* check the return code
* if failure, issue a FAIL message.
* otherwise,
* if doing functionality testing
* call the correct test function
* if the conditions are correct,
* issue a PASS message
* otherwise
* issue a FAIL message
* otherwise
* issue a PASS message
* call cleanup
*
* USAGE: <for command-line>
* shmctl01 [-c n] [-f] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -f : Turn off functionality Testing.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "ipcshm.h"
char *TCID = "shmctl01";
extern int Tst_count;
int shm_id_1 = -1;
struct shmid_ds buf;
long save_time;
#define FIRST 0
#define SECOND 1
int stat_time; /* set to either FIRST or SECOND for IPC_STAT tests */
void *set_shared;
#define N_ATTACH 4
pid_t pid_arr[N_ATTACH];
void sighandler(int);
/*
* These are the various setup and check functions for the commands
* that we are checking.
*/
/* Setup, cleanup and check routines for IPC_STAT */
void stat_setup(void), func_stat(void);
void stat_cleanup(void);
/* Setup and check routines for IPC_SET */
void set_setup(void), func_set(void);
/* Check routine for IPC_RMID */
void func_rmid(void);
/* Child function */
void do_child(void);
struct test_case_t {
int cmd; /* the command to test */
void (*func_test)(void); /* the test function */
void (*func_setup)(void); /* the setup function if necessary */
} TC[] = {
{IPC_STAT, func_stat, stat_setup},
#ifndef UCLINUX
/* The second test is not applicable to uClinux; shared memory segments
are detached on exec(), so cannot be passed to uClinux children. */
{IPC_STAT, func_stat, stat_setup},
#endif
{IPC_SET, func_set, set_setup},
{IPC_RMID, func_rmid, NULL}
};
int TST_TOTAL = (sizeof(TC) / sizeof(*TC));
#define NEWMODE 0066
#ifdef UCLINUX
static char *argv0;
#endif
static int stat_i; /* Shared between do_child and stat_setup */
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i;
void check_functionality(void);
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
#ifdef UCLINUX
argv0 = av[0];
maybe_run_child(do_child, "ddd", &stat_i, &stat_time, &shm_id_1);
#endif
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/* initialize stat_time */
stat_time = FIRST;
/*
* Create a shared memory segment with read and write
* permissions. Do this here instead of in setup()
* so that looping (-i) will work correctly.
*/
if ((shm_id_1 = shmget(shmkey, SHM_SIZE, IPC_CREAT | IPC_EXCL |
SHM_RW)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create the shared"
" memory segment");
}
/* loop through the test cases */
for (i=0; i<TST_TOTAL; i++) {
/*
* if needed, set up any required conditions by
* calling the appropriate setup function
*/
if (TC[i].func_setup != NULL) {
(*TC[i].func_setup)();
}
/*
* Use TEST macro to make the call
*/
TEST(shmctl(shm_id_1, TC[i].cmd, &buf));
if (TEST_RETURN == -1) {
tst_resm(TFAIL, "%s call failed - errno "
"= %d : %s", TCID, TEST_ERRNO,
strerror(TEST_ERRNO));
continue;
}
if (STD_FUNCTIONAL_TEST) {
(*TC[i].func_test)();
} else {
tst_resm(TPASS, "call succeeded");
/* now perform command related cleanup */
switch(TC[i].cmd) {
case IPC_STAT:
stat_cleanup();
break;
case IPC_RMID:
shm_id_1 = -1;
break;
}
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* set_shmat() - Attach the shared memory and return the pointer. Use
* this seperate routine to avoid code duplication in
* stat_setup() below.
*/
void *
set_shmat(void)
{
void *rval;
/* attach the shared memory */
rval = shmat(shm_id_1, 0, 0);
/*
* if shmat() fails, the only thing we can do is
* print a message to that effect.
*/
if (rval == (void *)-1) {
tst_resm(TBROK, "shmat() failed - %s", strerror(errno));
cleanup();
}
return rval;
}
/*
* stat_setup() - Set up for the IPC_STAT command with shmctl().
* Make things interesting by forking some children
* that will either attach or inherit the shared memory.
*/
void
stat_setup(void)
{
void *set_shmat(void);
pid_t pid;
/*
* The first time through, let the children attach the memory.
* The second time through, attach the memory first and let
* the children inherit the memory.
*/
if (stat_time == SECOND) {
/*
* use the global "set_shared" variable here so that
* it can be removed in the stat_func() routine.
*/
set_shared = set_shmat();
}
tst_flush();
for (stat_i=0; stat_i<N_ATTACH; stat_i++) {
if ((pid = fork()) == -1) {
tst_brkm(TBROK, cleanup, "could not fork");
}
if (pid == 0) { /* child */
#ifdef UCLINUX
if (self_exec(argv0, "ddd", stat_i, stat_time,
shm_id_1) < 0) {
tst_brkm(TBROK, cleanup, "could not self_exec");
}
#else
do_child();
#endif
} else { /* parent */
/* save the child's pid for cleanup later */
pid_arr[stat_i] = pid;
}
}
/* sleep briefly to ensure correct execution order */
usleep(250000);
}
/*
* do_child
*/
void
do_child()
{
int rval;
void *test;
if (stat_time == FIRST) {
test = set_shmat();
} else {
test = set_shared;
}
/* do an assignement for fun */
*(int *)test = stat_i;
/* pause until we get a signal from stat_cleanup() */
rval = pause();
/* now we're back - detach the memory and exit */
if (shmdt(test) == -1) {
tst_resm(TBROK, "shmdt() failed - %d", errno);
}
tst_exit();
}
/*
* func_stat() - check the functionality of the IPC_STAT command with shmctl()
* by looking at the pid of the creator, the segement size,
* the number of attaches and the mode.
*/
void
func_stat()
{
int fail = 0;
pid_t pid;
/* check perm, pid, nattach and size */
pid = getpid();
if (buf.shm_cpid != pid) {
tst_resm(TFAIL, "creator pid is incorrect");
fail = 1;
}
if (!fail && buf.shm_segsz != SHM_SIZE) {
tst_resm(TFAIL, "segment size is incorrect");
fail = 1;
}
/*
* The first time through, only the children attach the memory, so
* the attaches equal N_ATTACH + stat_time (0). The second time
* through, the parent attaches the memory and the children inherit
* that memory so the attaches equal N_ATTACH + stat_time (1).
*/
if (!fail && buf.shm_nattch != N_ATTACH + stat_time) {
tst_resm(TFAIL, "# of attaches is incorrect - %d",
buf.shm_nattch);
fail = 1;
}
/* use MODE_MASK to make sure we are comparing the last 9 bits */
if (!fail && (buf.shm_perm.mode & MODE_MASK) != ((SHM_RW) & MODE_MASK)) {
tst_resm(TFAIL, "segment mode is incorrect");
fail = 1;
}
stat_cleanup();
/* save the change time for use in the next test */
save_time = buf.shm_ctime;
if (fail) {
return;
}
tst_resm(TPASS, "pid, size, # of attaches and mode are correct "
"- pass #%d", stat_time);
}
/*
* stat_cleanup() - signal the children to clean up after themselves and
* have the parent make dessert, er, um, make that remove
* the shared memory that is no longer needed.
*/
void
stat_cleanup()
{
int i;
/* wake up the childern so they can detach the memory and exit */
for (i=0; i<N_ATTACH; i++) {
if(kill(pid_arr[i], SIGUSR1) == -1) {
tst_brkm(TBROK, cleanup, "kill failed");
}
}
/* remove the parent's shared memory the second time through */
if (stat_time == SECOND) {
if (shmdt(set_shared) == -1) {
tst_resm(TINFO, "shmdt() failed");
}
}
stat_time++;
}
/*
* set_setup() - set up for the IPC_SET command with shmctl()
*/
void
set_setup()
{
/* set up a new mode for the shared memory segment */
buf.shm_perm.mode = SHM_RW | NEWMODE;
/* sleep for one second to get a different shm_ctime value */
sleep(1);
}
/*
* func_set() - check the functionality of the IPC_SET command with shmctl()
*/
void
func_set()
{
int fail = 0;
/* first stat the shared memory to get the new data */
if (shmctl(shm_id_1, IPC_STAT, &buf) == -1) {
tst_resm(TBROK, "stat failed in func_set()");
return;
}
if ((buf.shm_perm.mode & MODE_MASK) !=
((SHM_RW | NEWMODE) & MODE_MASK)) {
tst_resm(TFAIL, "new mode is incorrect");
fail = 1;
}
if (!fail && save_time >= buf.shm_ctime) {
tst_resm(TFAIL, "change time is incorrect");
fail = 1;
}
if (fail) {
return;
}
tst_resm(TPASS, "new mode and change time are correct");
}
/*
* func_rmid() - check the functionality of the IPC_RMID command with shmctl()
*/
void
func_rmid()
{
/* Do another shmctl() - we should get EINVAL */
if (shmctl(shm_id_1, IPC_STAT, &buf) != -1) {
tst_brkm(TBROK, cleanup, "shmctl succeeded on expected fail");
}
if (errno != EINVAL) {
tst_resm(TFAIL, "returned unexpected errno %d", errno);
} else {
tst_resm(TPASS, "shared memory appears to be removed");
}
shm_id_1 = -1;
}
/*
* sighandler() - handle signals, in this case SIGUSR1 is the only one expected
*/
void
sighandler(sig)
{
if (sig != SIGUSR1) {
tst_resm(TINFO, "received unexpected signal %d", sig);
}
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(FORK, sighandler, cleanup);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
shmkey = getipckey();
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the shared memory segment */
rm_shm(shm_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

233
minix/tests/ipc/shmctl/shmctl02.c
View file

@ -1,233 +0,0 @@
/*
*
* 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
* shmctl02.c
*
* DESCRIPTION
* shmctl02 - check for EACCES, EFAULT and EINVAL errors
*
* ALGORITHM
* create a shared memory segment without read or write permissions
* create a shared memory segment with read & write permissions
* loop if that option was specified
* call shmctl() using five different invalid cases
* check the errno value
* issue a PASS message if we get EACCES, EFAULT or EINVAL
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* shmctl02 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "ipcshm.h"
#include <pwd.h>
char *TCID = "shmctl02";
extern int Tst_count;
char nobody_uid[] = "nobody";
struct passwd *ltpuser;
int exp_enos[] = {EPERM, EACCES, EFAULT, EINVAL, 0}; /* 0 terminated list */
/* of expected errnos */
int shm_id_1 = -1;
int shm_id_2 = -1;
int shm_id_3 = -1;
struct shmid_ds buf;
struct test_case_t {
int *shmid;
int cmd;
struct shmid_ds *sbuf;
int error;
} TC[] = {
/* EACCES - segment has no read or write permissions */
{&shm_id_1, IPC_STAT, &buf, EACCES},
/* EFAULT - IPC_SET & buf isn't valid */
{&shm_id_2, IPC_SET, (struct shmid_ds *)-1, EFAULT},
/* EFAULT - IPC_STAT & buf isn't valid */
{&shm_id_2, IPC_STAT, (struct shmid_ds *)-1, EFAULT},
/* EINVAL - the shmid is not valid */
{&shm_id_3, IPC_STAT, &buf, EINVAL},
/* EINVAL - the command is not valid */
{&shm_id_2, -1, &buf, EINVAL},
};
int TST_TOTAL = (sizeof(TC) / sizeof(*TC));
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i;
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/* loop through the test cases */
for (i=0; i<TST_TOTAL; i++) {
/*
* use the TEST() macro to make the call
*/
TEST(shmctl(*(TC[i].shmid), TC[i].cmd, TC[i].sbuf));
if ((TEST_RETURN != -1)&&(i < 5)) {
tst_resm(TFAIL, "call succeeded unexpectedly");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
if (TEST_ERRNO == TC[i].error) {
tst_resm(TPASS, "expected failure - errno = "
"%d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
} else {
if (i >= 5)
tst_resm(TCONF,"shmctl() did not fail for non-root user."
"This may be okay for your distribution.");
else
tst_resm(TFAIL, "call failed with an "
"unexpected error - %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* Switch to nobody user for correct error code collection */
if (geteuid() != 0) {
tst_brkm(TBROK, tst_exit, "Test must be run as root");
}
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
ltpuser = getpwnam(nobody_uid);
if (seteuid(ltpuser->pw_uid) == -1) {
tst_resm(TINFO, "setuid failed to "
"to set the effective uid to %d",
ltpuser->pw_uid);
perror("seteuid");
}
/* get an IPC resource key */
shmkey = getipckey();
/* create a shared memory segment without read or write permissions */
if ((shm_id_1 = shmget(shmkey, SHM_SIZE, IPC_CREAT | IPC_EXCL)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create shared memory "
"segment #1 in setup()");
}
/* create a shared memory segment with read and write permissions */
if ((shm_id_2 = shmget(shmkey + 1, SHM_SIZE, IPC_CREAT | IPC_EXCL |
SHM_RW)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create shared memory "
"segment #2 in setup()");
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if they exist, remove the shared memory resources */
rm_shm(shm_id_1);
rm_shm(shm_id_2);
if (seteuid(0) == -1) {
tst_resm(TINFO, "setuid failed to "
"to set the effective uid to %d",
ltpuser->pw_uid);
perror("seteuid");
}
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

233
minix/tests/ipc/shmctl/shmctl03.c
View file

@ -1,233 +0,0 @@
/*
*
* 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
* shmctl03.c
*
* DESCRIPTION
* shmctl03 - check for EACCES, and EPERM errors
*
* ALGORITHM
* create a shared memory segment with root only read & write permissions
* fork a child process
* if child
* set the ID of the child process to that of "ltpuser1"
* call do_child()
* loop if that option was specified
* call shmctl() using three different invalid cases
* check the errno value
* issue a PASS message if we get EACCES or EPERM
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
* if parent
* wait for child to exit
* remove the shared memory segment
*
* USAGE: <for command-line>
* shmctl03 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* test must be run as root
*/
#include "ipcshm.h"
#include <sys/types.h>
#include <sys/wait.h>
char *TCID = "shmctl03";
extern int Tst_count;
int exp_enos[] = {EACCES, EPERM, 0}; /* 0 terminated list of */
/* expected errnos */
int shm_id_1 = -1;
uid_t ltp_uid;
char *ltp_user = "nobody";
struct shmid_ds buf;
struct test_case_t {
int *shmid;
int cmd;
struct shmid_ds *sbuf;
int error;
} TC[] = {
/* EACCES - child has no read permission for segment */
{&shm_id_1, IPC_STAT, &buf, EACCES},
/* EPERM - IPC_SET - child doesn't have permission to change segment */
{&shm_id_1, IPC_SET, &buf, EPERM},
/* EPERM - IPC_RMID - child can not remove the segment */
{&shm_id_1, IPC_RMID, &buf, EPERM},
};
int TST_TOTAL = (sizeof(TC) / sizeof(*TC));
int main(int ac, char **av)
{
char *msg; /* message returned from parse_opts */
int pid;
void do_child(void);
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
if ((pid = FORK_OR_VFORK()) == -1) {
tst_brkm(TBROK, cleanup, "could not fork");
}
if (pid == 0) { /* child */
/* set the user ID of the child to the non root user */
if (setuid(ltp_uid) == -1) {
tst_resm(TBROK, "setuid() failed");
exit(1);
}
do_child();
} else {
/* wait for the child to return */
if (waitpid(pid, NULL, 0) == -1) {
tst_brkm(TBROK, cleanup, "waitpid failed");
}
/* if it exists, remove the shared memory resource */
rm_shm(shm_id_1);
/* Remove the temporary directory */
tst_rmdir();
}
cleanup ();
return(0);
}
/*
* do_child - make the call as the child process
*/
void
do_child(void)
{
int i, lc;
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/* loop through the test cases */
for (i=0; i<TST_TOTAL; i++) {
/*
* use the TEST() macro to make the call
*/
TEST(shmctl(*(TC[i].shmid), TC[i].cmd, TC[i].sbuf));
if (TEST_RETURN != -1) {
tst_resm(TFAIL, "call succeeded unexpectedly");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
if (TEST_ERRNO == TC[i].error) {
tst_resm(TPASS, "expected failure - errno = "
"%d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
} else {
tst_resm(TFAIL, "call failed with an "
"unexpected error - %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
}
}
}
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* check for root as process owner */
check_root();
/* capture signals */
tst_sig(FORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
shmkey = getipckey();
/* create a shared memory segment with read and write permissions */
if ((shm_id_1 = shmget(shmkey, SHM_SIZE, IPC_CREAT | IPC_EXCL |
SHM_RW)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create shared memory "
"segment in setup()");
}
/* get the userid for a non root user */
ltp_uid = getuserid(ltp_user);
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

136
minix/tests/ipc/shmctl/shmctl04.c
View file

@ -1,136 +0,0 @@
/*
*
* 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
* shmctl04.c
*
* DESCRIPTION
* shmctl04 - test the SHM_INFO command
* they are used with shmctl() in ipcs
*
* USAGE: <for command-line>
* shmctl04 [-c n] [-f] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -f : Turn off functionality Testing.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 09/2002 - Written by Mingming Cao
*
* RESTRICTIONS
* none
*/
#include "ipcshm.h"
char *TCID = "shmctl04";
int TST_TOTAL = 1;
extern int Tst_count;
struct shm_info shm_info;
int max_ids;
/*
* These are the various setup and check functions for the commands
* that we are checking.
*/
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, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup();
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
TEST(shmctl(0, SHM_INFO, (struct shmid_ds *)&shm_info));
if (TEST_RETURN != -1) {
tst_resm(TPASS, "SHM_INFO call succeeded");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
tst_resm(TFAIL, "SHM_INFO call failed with an unexpected error"
" - %d : %s",TEST_ERRNO, strerror(TEST_ERRNO));
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

6
minix/tests/ipc/shmctl/test.sh
View file

@ -1,6 +0,0 @@
#!/bin/sh
./shmctl01
./shmctl02
./shmctl03
./shmctl04

20
minix/tests/ipc/shmdt/Makefile
View file

@ -1,20 +0,0 @@
# Makefile for the tests
CC = exec cc
CFLAGS = -Wall -I../lib/
PROG = shmdt01 shmdt02
all: $(PROG)
$(PROG): ../libipc.a
$(CC) $(CFLAGS) -o $@ $@.c ../libipc.a
clean:
rm -f *.o $(PROG)
test:
sh ./test.sh
shmdt01: shmdt01.c
shmdt02: shmdt02.c

249
minix/tests/ipc/shmdt/shmdt01.c
View file

@ -1,249 +0,0 @@
/*
*
* 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
* shmdt01.c
*
* DESCRIPTION
* shmdt01 - check that shared memory is detached correctly
*
* ALGORITHM
* create a shared memory resource of size sizeof(int)
* attach it to the current process and give it a value
* call shmdt() using the TEST macro
* check the return code
* if failure, issue a FAIL message.
* otherwise,
* if doing functionality testing
* attempt to write a value to the shared memory address
* this should generate a SIGSEGV which will be caught in
* the signal handler
* if correct,
* issue a PASS message
* otherwise
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* shmdt01 [-c n] [-f] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -f : Turn off functionality Testing.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include <setjmp.h>
#include "ipcshm.h"
char *TCID = "shmdt01";
int TST_TOTAL = 1;
extern int Tst_count;
void sighandler(int);
struct shmid_ds buf;
int shm_id_1 = -1;
int *shared; /* variable to use for shared memory attach */
int new;
int pass = 0;
sigjmp_buf env;
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
void check_functionality(void);
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/*
* Use TEST macro to make the shmdt() call
*/
TEST(shmdt((const void *)shared));
if (TEST_RETURN == -1) {
tst_resm(TFAIL, "%s call failed - errno = %d : %s",
TCID, TEST_ERRNO, strerror(TEST_ERRNO));
} else {
if (STD_FUNCTIONAL_TEST) {
check_functionality();
} else {
tst_resm(TPASS, "call succeeded");
}
}
/* reattach the shared memory segment in case we are looping */
shared = (int *)shmat(shm_id_1, 0, 0);
if (*shared == -1) {
tst_brkm(TBROK, cleanup, "memory reattach failed");
}
/* also reset pass */
pass = 0;
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* check_functionality() - make sure the memory is detached correctly
*/
void
check_functionality(void)
{
/* stat the shared memory segment */
if (shmctl(shm_id_1, IPC_STAT, &buf) == -1) {
tst_resm(TINFO, "error = %d : %s", errno, strerror(errno));
tst_brkm(TBROK, cleanup, "could not stat in signal handler");
}
if (buf.shm_nattch != 0) {
tst_resm(TFAIL, "# of attaches is incorrect");
return;
}
/*
* Try writing to the shared memory. This should generate a
* SIGSEGV which will be caught below.
*
* This is wrapped by the sigsetjmp() call that will take care of
* restoring the program's context in an elegant way in conjunction
* with the call to siglongjmp() in the signal handler.
*
* An attempt to do the assignment without using the sigsetjmp()
* and siglongjmp() calls will result in an infinite loop. Program
* control is returned to the assignment statement after the execution
* of the signal handler and another SIGSEGV will be generated.
*/
if (sigsetjmp(env, 1) == 0) {
*shared = 2;
}
if (pass) {
tst_resm(TPASS, "shared memory detached correctly");
} else {
tst_resm(TFAIL, "shared memory was not detached correctly");
}
}
/*
* sighandler()
*/
void
sighandler(sig)
{
/* if we have received a SIGSEGV, we are almost done */
if (sig == SIGSEGV) {
/* set the global variable and jump back */
pass = 1;
siglongjmp(env, 1);
} else {
tst_brkm(TBROK, cleanup, "received an unexpected signal");
}
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(NOFORK, sighandler, cleanup);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
shmkey = getipckey();
/* create a shared memory resource with read and write permissions */
if ((shm_id_1 = shmget(shmkey, INT_SIZE, SHM_RW | IPC_CREAT |
IPC_EXCL)) == -1) {
tst_brkm(TBROK, cleanup, "Failed to create shared memory "
"resource in setup()");
}
/* attach the shared memory segment */
shared = (int *)shmat(shm_id_1, 0, 0);
if (*shared == -1) {
tst_brkm(TBROK, cleanup, "Couldn't attach shared memory");
}
/* give a value to the shared memory integer */
*shared = 4;
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, delete the shared memory resource */
rm_shm(shm_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

142
minix/tests/ipc/shmdt/shmdt02.c
View file

@ -1,142 +0,0 @@
/*
*
* 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
* shmdt02.c
*
* DESCRIPTION
* shmdt02 - check for EINVAL error
*
* ALGORITHM
* loop if that option was specified
* call shmdt() using an invalid shared memory address
* check the errno value
* issue a PASS message if we get EINVAL
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* shmdt02 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "ipcshm.h"
char *TCID = "shmdt02";
int TST_TOTAL = 1;
extern int Tst_count;
int exp_enos[] = {EINVAL, 0}; /* 0 terminated list of expected errnos */
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int unshared; /* a local variable to use to produce */ /* the error in the shmdt() call */
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/*
* make the call using the TEST() macro - attempt to
* remove an invalid shared memory address
*/
TEST(shmdt(&unshared));
if (TEST_RETURN != -1) {
tst_brkm(TFAIL, cleanup, "call succeeded unexpectedly");
}
TEST_ERROR_LOG(TEST_ERRNO);
switch(TEST_ERRNO) {
case EINVAL:
tst_resm(TPASS, "expected failure - errno = %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
break;
default:
tst_resm(TFAIL, "call failed with an unexpected error "
"- %d : %s", TEST_ERRNO, strerror(TEST_ERRNO));
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

4
minix/tests/ipc/shmdt/test.sh
View file

@ -1,4 +0,0 @@
#!/bin/sh
./shmdt01
./shmdt02

22
minix/tests/ipc/shmget/Makefile
View file

@ -1,22 +0,0 @@
# Makefile for the tests
CC = exec cc
CFLAGS = -Wall -I../lib/
PROG = shmget01 shmget02 shmget04 shmget05
all: $(PROG)
$(PROG): ../libipc.a
$(CC) $(CFLAGS) -o $@ $@.c ../libipc.a
clean:
rm -f *.o $(PROG)
test:
sh ./test.sh
shmget01: shmget01.c
shmget02: shmget02.c
shmget04: shmget04.c
shmget05: shmget05.c

194
minix/tests/ipc/shmget/shmget01.c
View file

@ -1,194 +0,0 @@
/*
*
* 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
* shmget01.c
*
* DESCRIPTION
* shmget01 - test that shmget() correctly creates a shared memory segment
*
* ALGORITHM
* loop if that option was specified
* use the TEST() macro to call shmget()
* check the return code
* if failure, issue a FAIL message.
* otherwise,
* if doing functionality testing
* stat the shared memory resource
* check the size, creator pid and mode
* if correct,
* issue a PASS message
* otherwise
* issue a FAIL message
* else issue a PASS message
* call cleanup
*
* USAGE: <for command-line>
* shmget01 [-c n] [-f] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -f : Turn off functionality Testing.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "ipcshm.h"
char *TCID = "shmget01";
int TST_TOTAL = 1;
extern int Tst_count;
int shm_id_1 = -1;
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
struct shmid_ds buf;
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/*
* Use TEST macro to make the call
*/
TEST(shmget(shmkey, SHM_SIZE, (IPC_CREAT | IPC_EXCL | SHM_RW)));
if (TEST_RETURN == -1) {
tst_resm(TFAIL, "%s call failed - errno = %d : %s",
TCID, TEST_ERRNO, strerror(TEST_ERRNO));
} else {
shm_id_1 = TEST_RETURN;
if (STD_FUNCTIONAL_TEST) {
/* do a STAT and check some info */
if (shmctl(shm_id_1, IPC_STAT, &buf) == -1) {
tst_resm(TBROK, "shmctl failed in "
"functional test");
continue;
}
/* check the seqment size */
if (buf.shm_segsz != SHM_SIZE) {
tst_resm(TFAIL, "seqment size is not "
"correct");
continue;
}
/* check the pid of the creator */
if (buf.shm_cpid != getpid()) {
tst_resm(TFAIL, "creator pid is not "
"correct");
continue;
}
/*
* check the mode of the seqment
* mask out all but the lower 9 bits
*/
if ((buf.shm_perm.mode & MODE_MASK) !=
((SHM_RW) & MODE_MASK)) {
tst_resm(TFAIL, "segment mode is not "
"correct");
continue;
}
/* if we get here, everything looks good */
tst_resm(TPASS, "size, pid & mode are correct");
} else {
tst_resm(TPASS, "call succeeded");
}
}
/*
* clean up things in case we are looping
*/
if (shmctl(shm_id_1, IPC_RMID, NULL) == -1) {
tst_resm(TBROK, "couldn't remove shared memory");
} else {
shm_id_1 = -1;
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
shmkey = getipckey();
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the shared memory resource */
rm_shm(shm_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

207
minix/tests/ipc/shmget/shmget02.c
View file

@ -1,207 +0,0 @@
/*
*
* 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
* shmget02.c
*
* DESCRIPTION
* shmget02 - check for ENOENT, EEXIST and EINVAL errors
*
* ALGORITHM
* create a shared memory segment with read & write permissions
* loop if that option was specified
* call shmget() using five different invalid cases
* check the errno value
* issue a PASS message if we get ENOENT, EEXIST or EINVAL
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* shmget02 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include "ipcshm.h"
char *TCID = "shmget02";
int TST_TOTAL = 5;
extern int Tst_count;
int exp_enos[] = {ENOENT, EEXIST, EINVAL, 0}; /* 0 terminated list of */
/* expected errnos */
int shm_id_1 = -1;
int shm_nonexisting_key = -1;
int shmkey2;
struct test_case_t {
int *skey;
int size;
int flags;
int error;
} TC[] = {
/* EINVAL - size is 0 */
{&shmkey2, 0, IPC_CREAT | IPC_EXCL | SHM_RW, EINVAL},
/* EINVAL - size is negative */
{&shmkey2, -1, IPC_CREAT | IPC_EXCL | SHM_RW, EINVAL},
/* EINVAL - size is larger than created segment */
{(int *)&shmkey, SHM_SIZE * 2, SHM_RW, EINVAL},
/* EEXIST - the segment exists and IPC_CREAT | IPC_EXCL is given */
{(int *)&shmkey, SHM_SIZE, IPC_CREAT | IPC_EXCL | SHM_RW, EEXIST},
/* ENOENT - no segment exists for the key and IPC_CREAT is not given */
/* use shm_id_2 (-1) as the key */
{&shm_nonexisting_key, SHM_SIZE, SHM_RW, ENOENT}
};
int main(int ac, char **av)
{
int lc; /* loop counter */
char *msg; /* message returned from parse_opts */
int i;
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/* loop through the test cases */
for (i=0; i<TST_TOTAL; i++) {
/*
* Look for a failure ...
*/
TEST(shmget(*(TC[i].skey), TC[i].size, TC[i].flags));
if (TEST_RETURN != -1) {
tst_resm(TFAIL, "call succeeded unexpectedly");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
if (TEST_ERRNO == TC[i].error) {
tst_resm(TPASS, "expected failure - errno = "
"%d : %s", TEST_ERRNO,
strerror(TEST_ERRNO));
} else {
tst_resm(TFAIL, "call failed with an "
"unexpected error - %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
}
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
shmkey = getipckey();
shmkey2 = shmkey + 1;
if ((shm_id_1 = shmget(shmkey, SHM_SIZE, IPC_CREAT | IPC_EXCL |
SHM_RW)) == -1) {
tst_brkm(TBROK, cleanup, "couldn't create shared memory "
"segment in setup()");
}
/* Make sure shm_nonexisting_key is a nonexisting key */
while(1) {
while(-1 != shmget(shm_nonexisting_key,1,SHM_RD)) {
shm_nonexisting_key--;
}
if(errno == ENOENT)
break;
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the shared memory resource */
rm_shm(shm_id_1);
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

190
minix/tests/ipc/shmget/shmget04.c
View file

@ -1,190 +0,0 @@
/*
*
* 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
* shmget04.c
*
* DESCRIPTION
* shmget04 - test for EACCES error
*
* ALGORITHM
* create a shared memory segment without read or write permissions
* loop if that option was specified
* call shmget() with SHM_RW flag using TEST() macro
* check the errno value
* issue a PASS message if we get EACCES
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
*
* USAGE: <for command-line>
* shmget04 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* none
*/
#include <pwd.h>
#include "ipcshm.h"
char *TCID = "shmget04";
int TST_TOTAL = 1;
extern int Tst_count;
int exp_enos[] = {EACCES, 0}; /* 0 terminated list of expected errnos */
char nobody_uid[] = "nobody";
struct passwd *ltpuser;
int shm_id_1 = -1;
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, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/*
* use the TEST() macro to make the call
*/
TEST(shmget(shmkey, SHM_SIZE, SHM_RW));
if (TEST_RETURN != -1) {
tst_resm(TFAIL, "call succeeded when error expected");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
switch(TEST_ERRNO) {
case EACCES:
tst_resm(TPASS, "expected failure - errno = "
"%d : %s", TEST_ERRNO, strerror(TEST_ERRNO));
break;
default:
tst_resm(TFAIL, "call failed with an "
"unexpected error - %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
break;
}
}
cleanup();
/*NOTREACHED*/
return(0);
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* capture signals */
tst_sig(NOFORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/* Switch to nobody user for correct error code collection */
if (geteuid() != 0) {
tst_brkm(TBROK, tst_exit, "Test must be run as root");
}
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
ltpuser = getpwnam(nobody_uid);
if (seteuid(ltpuser->pw_uid) == -1) {
tst_resm(TINFO, "setuid failed to "
"to set the effective uid to %d",
ltpuser->pw_uid);
perror("seteuid");
}
/* get an IPC resource key */
shmkey = getipckey();
/* create a shared memory segment without read or access permissions */
if ((shm_id_1 = shmget(shmkey, SHM_SIZE, IPC_CREAT | IPC_EXCL)) == -1) {
tst_brkm(TBROK, cleanup, "Failed to create shared memory "
"segment in setup");
}
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/* if it exists, remove the shared memory resource */
rm_shm(shm_id_1);
if (seteuid(0) == -1) {
tst_resm(TINFO, "setuid failed to "
"to set the effective uid to root");
perror("seteuid");
}
/* Remove the temporary directory */
tst_rmdir();
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

214
minix/tests/ipc/shmget/shmget05.c
View file

@ -1,214 +0,0 @@
/*
*
* 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
* shmget05.c
*
* DESCRIPTION
* shmget05 - test for EACCES error
*
* ALGORITHM
* create a shared memory segment with root only read & write permissions
* fork a child process
* if child
* set the ID of the child process to that of "nobody"
* loop if that option was specified
* call shmget() using the TEST() macro
* check the errno value
* issue a PASS message if we get EACCES
* otherwise, the tests fails
* issue a FAIL message
* call cleanup
* if parent
* wait for child to exit
* remove the shared memory segment
*
* USAGE: <for command-line>
* shmget05 [-c n] [-e] [-i n] [-I x] [-P x] [-t]
* where, -c n : Run n copies concurrently.
* -e : Turn on errno logging.
* -i n : Execute test n times.
* -I x : Execute test for x seconds.
* -P x : Pause for x seconds between iterations.
* -t : Turn on syscall timing.
*
* HISTORY
* 03/2001 - Written by Wayne Boyer
*
* RESTRICTIONS
* test must be run at root
*/
#include "ipcshm.h"
#include <sys/types.h>
#include <sys/wait.h>
char *TCID = "shmget05";
int TST_TOTAL = 1;
extern int Tst_count;
int exp_enos[] = {EACCES, 0}; /* 0 terminated list of expected errnos */
int shm_id_1 = -1;
uid_t ltp_uid;
char *ltp_user = "nobody";
int main(int ac, char **av)
{
char *msg; /* message returned from parse_opts */
int pid;
void do_child(void);
/* parse standard options */
if ((msg = parse_opts(ac, av, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
}
setup(); /* global setup */
if ((pid = FORK_OR_VFORK()) == -1) {
tst_brkm(TBROK, cleanup, "could not fork");
}
if (pid == 0) { /* child */
/* set the user ID of the child to the non root user */
if (setuid(ltp_uid) == -1) {
tst_resm(TBROK, "setuid() failed");
exit(1);
}
do_child();
cleanup();
/*NOTREACHED*/
} else { /* parent */
/* wait for the child to return */
if (waitpid(pid, NULL, 0) == -1) {
tst_brkm(TBROK, cleanup, "waitpid failed");
}
/* if it exists, remove the shared memory resource */
rm_shm(shm_id_1);
/* Remove the temporary directory */
tst_rmdir();
}
return(0);
}
/*
* do_child - make the TEST call as the child process
*/
void
do_child(void)
{
int lc;
/* The following loop checks looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
/* reset Tst_count in case we are looping */
Tst_count = 0;
/*
* Look for a failure ...
*/
TEST(shmget(shmkey, SHM_SIZE, SHM_RW));
if (TEST_RETURN != -1) {
tst_resm(TFAIL, "call succeeded when error expected");
continue;
}
TEST_ERROR_LOG(TEST_ERRNO);
switch(TEST_ERRNO) {
case EACCES:
tst_resm(TPASS, "expected failure - errno = "
"%d : %s", TEST_ERRNO, strerror(TEST_ERRNO));
break;
default:
tst_resm(TFAIL, "call failed with an "
"unexpected error - %d : %s",
TEST_ERRNO, strerror(TEST_ERRNO));
break;
}
}
}
/*
* setup() - performs all the ONE TIME setup for this test.
*/
void
setup(void)
{
/* check for root as process owner */
check_root();
/* capture signals */
tst_sig(FORK, DEF_HANDLER, cleanup);
/* Set up the expected error numbers for -e option */
TEST_EXP_ENOS(exp_enos);
/* Pause if that option was specified */
TEST_PAUSE;
/*
* Create a temporary directory and cd into it.
* This helps to ensure that a unique msgkey is created.
* See ../lib/libipc.c for more information.
*/
tst_tmpdir();
/* get an IPC resource key */
shmkey = getipckey();
/* create a shared memory segment with read and write permissions */
if ((shm_id_1 = shmget(shmkey, SHM_SIZE,
SHM_RW | IPC_CREAT | IPC_EXCL)) == -1) {
tst_brkm(TBROK, cleanup, "Failed to create shared memory "
"segment in setup");
}
/* get the userid for a non root user */
ltp_uid = getuserid(ltp_user);
}
/*
* cleanup() - performs all the ONE TIME cleanup for this test at completion
* or premature exit.
*/
void
cleanup(void)
{
/*
* print timing stats if that option was specified.
* print errno log if that option was specified.
*/
TEST_CLEANUP;
/* exit with return code appropriate for results */
tst_exit();
}

6
minix/tests/ipc/shmget/test.sh
View file

@ -1,6 +0,0 @@
#!/bin/sh
./shmget01
./shmget02
./shmget04
./shmget05

28
minix/tests/ipc/shmt/Makefile
View file

@ -1,28 +0,0 @@
# Makefile for the tests
CC = exec cc
CFLAGS = -Wall -I../lib/
PROG = shmt02 shmt03 shmt04 shmt05 shmt06 \
shmt07 shmt08 shmt10 shmt01
all: $(PROG)
$(PROG): ../libipc.a
$(CC) $(CFLAGS) -o $@ $@.c ../libipc.a
test:
sh testshm.sh
clean:
rm -f *.o $(PROG)
shmt01: shmt01.c
shmt02: shmt02.c
shmt03: shmt03.c
shmt04: shmt04.c
shmt05: shmt05.c
shmt06: shmt06.c
shmt07: shmt07.c
shmt08: shmt08.c
shmt10: shmt10.c

126
minix/tests/ipc/shmt/shmt01.c
View file

@ -1,126 +0,0 @@
/*
* NAME
* shmt01
*
* CALLS
* shmat(2) shmget(2) shmdt(2)
*
* ALGORITHM
* Create and attach a shared memory segment, write to it
* and then detach the shared memroy twice, the second one will FAIL.
*
*/
#include <stdio.h>
#include <sys/types.h>
#include <sys/ipc.h>
#include <sys/shm.h>
#include <sys/utsname.h>
#include <errno.h>
/** LTP Port **/
#include "test.h"
#include "usctest.h"
char *TCID="shmt01"; /* Test program identifier. */
int TST_TOTAL=4; /* Total number of test cases. */
extern int Tst_count; /* Test Case counter for tst_* routines */
/**************/
#define K_1 1024
int rm_shm(int);
int main(void)
{
register int shmid;
char *cp;
key_t key;
int r;
errno = 0;
key = (key_t)getpid() ;
/*----------------------------------------------------------------*/
if ((shmid = shmget(key, 16*K_1, IPC_CREAT|0666)) < 0 ) {
perror("shmget");
tst_resm(TFAIL, "shmget Failed: shmid = %d, errno = %d\n",
shmid, errno) ;
tst_exit() ;
}
tst_resm(TPASS, "shmget") ;
/*----------------------------------------------------------------*/
/* are we doing with ia64 or arm_arch_4t arch */
#if defined (__ia64__) || defined (__ARM_ARCH_4T__)
cp = (char *) shmat(shmid, (void *)NULL, 0);
#else
cp = (char *) shmat(shmid, (void *)0x80000, 0);
#endif
if (cp == (char *)-1) {
perror("shmat");
tst_resm(TFAIL, "shmat Failed: shmid = %d, errno = %d\n",
shmid, errno) ;
rm_shm(shmid) ;
tst_exit() ;
}
*cp = '1';
*(cp+1) = '2';
tst_resm(TPASS, "shmat") ;
/*----------------------------------------------------------------*/
r = shmdt(cp);
if (r < 0) {
perror("shmdt");
tst_resm(TFAIL, "shmdt Failed: shmid = %d, errno = %d\n",
shmid, errno);
rm_shm(shmid);
tst_exit();
}
tst_resm(TPASS, "shmdt first time.");
r = shmdt(cp);
if (r == 0) {
perror("shmdt");
tst_resm(TFAIL, "shmdt Failed: shmid = %d, errno = %d\n",
shmid, errno);
rm_shm(shmid);
tst_exit();
}
rm_shm(shmid) ;
tst_resm(TPASS, "shmdt second time.");
/*------------------------------------------------------------------*/
tst_exit() ;
/*-------------------- THIS LINE IS NOT REACHED -------------------*/
return(0);
}
int rm_shm(shmid)
int shmid ;
{
if (shmctl(shmid, IPC_RMID, NULL) == -1) {
perror("shmctl");
tst_resm(TFAIL,
"shmctl Failed to remove: shmid = %d, errno = %d\n",
shmid, errno) ;
tst_exit();
}
return(0);
}

135
minix/tests/ipc/shmt/shmt02.c
View file

@ -1,135 +0,0 @@
/*
*
* Copyright (c) International Business Machines Corp., 2002
*
* 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
*/
/* 12/20/2002 Port to LTP robbiew@us.ibm.com */
/* 06/30/2001 Port to Linux nsharoff@us.ibm.com */
/*
* NAME
* shmt02
*
* CALLS
* shmctl(2) shmget(2)
*
* ALGORITHM
* Create and attach a shared memory segment, write to it
* and then remove it. Verify that the shared memory segment
* is accessible as long as the process is still alive.
*
*/
#include <stdio.h>
#include <sys/types.h>
#include <sys/ipc.h>
#include <sys/shm.h>
#include <sys/utsname.h>
#include <errno.h>
/** LTP Port **/
#include "test.h"
#include "usctest.h"
char *TCID="shmt02"; /* Test program identifier. */
int TST_TOTAL=3; /* Total number of test cases. */
extern int Tst_count; /* Test Case counter for tst_* routines */
/**************/
#define K_1 1024
int rm_shm(int);
int main(void)
{
register int shmid;
char *cp;
key_t key;
errno = 0;
key = (key_t)getpid() ;
/*----------------------------------------------------------------*/
if ((shmid = shmget(key, 16*K_1, IPC_CREAT|0666)) < 0 ) {
perror("shmget");
tst_resm(TFAIL, "shmget Failed: shmid = %d, errno = %d\n",
shmid, errno) ;
tst_exit() ;
}
tst_resm(TPASS, "shmget") ;
/*----------------------------------------------------------------*/
/* are we doing with ia64 or arm_arch_4t arch */
#if defined (__ia64__) || defined (__ARM_ARCH_4T__)
cp = (char *) shmat(shmid, (void *)NULL, 0);
#else
cp = (char *) shmat(shmid, (void *)0x80000, 0);
#endif
if (cp == (char *)-1) {
perror("shmat");
tst_resm(TFAIL, "shmat Failed: shmid = %d, errno = %d\n",
shmid, errno) ;
rm_shm(shmid) ;
tst_exit() ;
}
*cp = '1';
*(cp+1) = '2';
tst_resm(TPASS, "shmat") ;
/*----------------------------------------------------------------*/
rm_shm(shmid) ;
if ( *cp != '1' || *(cp+1) != '2' ) {
tst_resm(TFAIL,
"Error in shared memory contents: shmid = %d\n",
shmid);
}
tst_resm(TPASS, "Correct shared memory contents") ;
/*------------------------------------------------------------------*/
tst_exit() ;
/*-------------------- THIS LINE IS NOT REACHED -------------------*/
return(0);
}
int rm_shm(shmid)
int shmid ;
{
if (shmctl(shmid, IPC_RMID, NULL) == -1) {
perror("shmctl");
tst_resm(TFAIL,
"shmctl Failed to remove: shmid = %d, errno = %d\n",
shmid, errno) ;
tst_exit();
}
return(0);
}

149
minix/tests/ipc/shmt/shmt03.c
View file

@ -1,149 +0,0 @@
/*
*
* Copyright (c) International Business Machines Corp., 2002
*
* 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
*/
/* 12/20/2002 Port to LTP robbiew@us.ibm.com */
/* 06/30/2001 Port to Linux nsharoff@us.ibm.com */
/*
* NAME
* shmt3
*
* CALLS
* shmctl(2) shmget(2) shmat(2)
*
* ALGORITHM
* Create one shared memory segment and attach it twice to the same process,
* at an address that is chosen by the system. After the first attach has
* completed, write to it and then do the second attach.
* Verify that the doubly attached segment contains the same data.
*
*/
#include <stdio.h>
#include <sys/types.h>
#include <sys/ipc.h>
#include <sys/shm.h>
#include <errno.h>
/** LTP Port **/
#include "test.h"
#include "usctest.h"
char *TCID="shmt03"; /* Test program identifier. */
int TST_TOTAL=4; /* Total number of test cases. */
extern int Tst_count; /* Test Case counter for tst_* routines */
/**************/
#define K_1 1024
#define SUCCESSFUL 1
int first_attach,
second_attach;
int rm_shm(int);
int main(void)
{
char *cp1, *cp2;
int shmid;
key_t key ;
key = (key_t) getpid() ;
errno = 0 ;
/*------------------------------------------------------------*/
if ((shmid = shmget(key, 16*K_1, IPC_CREAT|0666)) < 0) {
perror("shmget");
tst_resm(TFAIL, "shmget Failed: shmid = %d, errno = %d\n",
shmid, errno) ;
tst_exit() ;
}
tst_resm(TPASS,"shmget");
/*------------------------------------------------------------*/
if ((cp1 = (char *)shmat(shmid, (void *)0, 0)) == (char *)-1) {
perror("shmat");
tst_resm(TFAIL, "shmat Failed: shmid = %d, errno = %d\n",
shmid, errno) ;
} else {
*cp1 = '1' ;
*(cp1+5*K_1) = '2' ;
first_attach = SUCCESSFUL ;
}
tst_resm(TPASS,"1st shmat");
/*------------------------------------------------------------*/
if ((cp2 = (char *)shmat(shmid, (void *)0, 0)) == (char *)-1) {
perror("shmat");
tst_resm(TFAIL, "shmat Failed: shmid = %d, errno = %d\n",
shmid, errno) ;
}
else {
second_attach = SUCCESSFUL ;
if ( (*cp2 != '1' || *(cp2+5*K_1) != '2') &&
first_attach == SUCCESSFUL ) {
tst_resm(TFAIL,
"Error: Shared memory contents\n") ;
}
}
tst_resm(TPASS,"2nd shmat");
/*---------------------------------------------------------------*/
rm_shm(shmid) ;
if ( first_attach && second_attach ) {
if ( *cp2 != '1' || *(cp2+5*K_1) != '2' ||
*cp1 != '1' || *(cp1+5*K_1) != '2' ) {
tst_resm(TFAIL, "Error: Shared memory contents\n") ;
}
}
tst_resm(TPASS, "Correct shared memory contents");
/*-----------------------------------------------------------------*/
tst_exit() ;
/*----------------------------------------------------------------*/
return(0);
}
int rm_shm(shmid)
int shmid ;
{
if (shmctl(shmid, IPC_RMID, NULL) == -1) {
perror("shmctl");
tst_resm(TFAIL,
"shmctl Failed to remove: shmid = %d, errno = %d\n",
shmid, errno) ;
tst_exit();
}
return(0);
}

231
minix/tests/ipc/shmt/shmt04.c
View file

@ -1,231 +0,0 @@
/*
*
* Copyright (c) International Business Machines Corp., 2002
*
* 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
*/
/* 03/21/2003 enable ia64 Jacky.Malcles */
/* 12/20/2002 Port to LTP robbiew@us.ibm.com */
/* 06/30/2001 Port to Linux nsharoff@us.ibm.com */
/*
* NAME
* shmt04
*
* CALLS
* shmctl(2) shmget(2) shmat(2)
*
* ALGORITHM
* Parent process forks a child. Child pauses until parent has created
* a shared memory segment, attached to it and written to it too. At that
* time child gets the shared memory segment id, attaches to it and
* verifies that its contents are the same as the contents of the
* parent attached segment.
*
*/
#include <stdio.h>
#include <sys/types.h>
#include <sys/ipc.h>
#include <sys/shm.h>
#include <sys/wait.h>
#include <sys/utsname.h>
#include <signal.h>
#include <errno.h>
#include <stdlib.h>
#include <unistd.h>
/** LTP Port **/
#include "test.h"
#include "usctest.h"
char *TCID="shmt04"; /* Test program identifier. */
int TST_TOTAL=2; /* Total number of test cases. */
extern int Tst_count; /* Test Case counter for tst_* routines */
/**************/
key_t key;
sigset_t mysigset;
#define ADDR1 (void *)0x40000000
#define ADDR (void *)0x80000
#define SIZE 16*1024
int child(void);
int rm_shm(int);
int main(void)
{
char *cp=NULL;
int pid, pid1, shmid;
int status;
key = (key_t) getpid() ;
signal(SIGUSR1, SIG_DFL);
sigemptyset(&mysigset);
sigaddset(&mysigset,SIGUSR1);
sigprocmask(SIG_BLOCK,&mysigset,NULL);
pid = fork();
switch (pid) {
case -1:
tst_resm(TBROK,"fork failed");
tst_exit() ;
case 0:
child();
}
/*----------------------------------------------------------*/
if ((shmid = shmget(key, SIZE, IPC_CREAT|0666)) < 0 ) {
perror("shmget");
tst_resm(TFAIL,"Error: shmget: shmid = %d, errno = %d\n",
shmid, errno) ;
/*
* kill the child if parent failed to do the attach
*/
(void)kill(pid, SIGINT);
}
else {
#ifdef __ia64__
cp = (char *) shmat(shmid, ADDR1, 0);
#elif defined(__ARM_ARCH_4T__)
cp = (char *) shmat(shmid, NULL, 0);
#else
cp = (char *) shmat(shmid, ADDR, 0);
#endif
if (cp == (char *)-1) {
perror("shmat");
tst_resm(TFAIL,
"Error: shmat: shmid = %d, errno = %d\n",
shmid, errno) ;
/* kill the child if parent failed to do the attch */
kill(pid, SIGINT) ;
/* remove shared memory segment */
rm_shm(shmid) ;
tst_exit() ;
}
*cp = 'A';
*(cp+1) = 'B';
*(cp+2) = 'C';
kill(pid, SIGUSR1);
while ( (pid1 = wait(&status)) < 0 &&
(errno == EINTR) ) ;
if (pid1 != pid) {
tst_resm(TFAIL,"Waited on the wrong child") ;
tst_resm(TFAIL,
"Error: wait_status = %d, pid1= %d\n", status, pid1) ;
}
}
tst_resm(TPASS,"shmget,shmat");
/*----------------------------------------------------------*/
if (shmdt(cp) < 0 ) {
tst_resm(TFAIL,"shmdt");
}
tst_resm(TPASS,"shmdt");
/*----------------------------------------------------------*/
rm_shm(shmid) ;
tst_exit() ;
/*----------------------------------------------------------*/
return(0);
}
int child(void)
{
int shmid,
chld_pid ;
char *cp;
sigemptyset(&mysigset);
sigsuspend(&mysigset);
chld_pid = getpid() ;
/*--------------------------------------------------------*/
if ((shmid = shmget(key, SIZE, 0)) < 0) {
perror("shmget:child process");
tst_resm(TFAIL,
"Error: shmget: errno=%d, shmid=%d, child_pid=%d\n",
errno, shmid, chld_pid);
}
else
{
#ifdef __ia64__
cp = (char *) shmat(shmid, ADDR1, 0);
#elif defined(__ARM_ARCH_4T__)
cp = (char *) shmat(shmid, NULL, 0);
#else
cp = (char *) shmat(shmid, ADDR, 0);
#endif
if (cp == (char *)-1) {
perror("shmat:child process");
tst_resm(TFAIL,
"Error: shmat: errno=%d, shmid=%d, child_pid=%d\n",
errno, shmid, chld_pid);
} else {
if (*cp != 'A') {
tst_resm(TFAIL,"child: not A\n");
}
if (*(cp+1) != 'B') {
tst_resm(TFAIL,"child: not B\n");
}
if (*(cp+2) != 'C') {
tst_resm(TFAIL,"child: not C\n");
}
if (*(cp+8192) != 0) {
tst_resm(TFAIL,"child: not 0\n");
}
}
}
tst_exit() ;
return(0);
}
int rm_shm(shmid)
int shmid ;
{
if (shmctl(shmid, IPC_RMID, NULL) == -1) {
perror("shmctl");
tst_resm(TFAIL,
"shmctl Failed to remove: shmid = %d, errno = %d\n",
shmid, errno) ;
tst_exit();
}
return(0);
}

152
minix/tests/ipc/shmt/shmt05.c
View file

@ -1,152 +0,0 @@
/*
*
* Copyright (c) International Business Machines Corp., 2002
*
* 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
*/
/* 12/20/2002 Port to LTP robbiew@us.ibm.com */
/* 06/30/2001 Port to Linux nsharoff@us.ibm.com */
/*
* NAME
* shmt05
*
* CALLS
* shmctl(2) shmget(2) shmat(2)
*
* ALGORITHM
* Create two shared memory segments and attach them to the same process
* at two different addresses. The addresses DO BUMP into each other.
* The second attach should Fail.
*
*/
#include <stdio.h>
#include <sys/types.h>
#include <sys/ipc.h>
#include <sys/shm.h>
#include <sys/utsname.h>
#include <errno.h>
#include <time.h>
/** LTP Port **/
#include "test.h"
#include "usctest.h"
char *TCID="shmt05"; /* Test program identifier. */
int TST_TOTAL=2; /* Total number of test cases. */
extern int Tst_count; /* Test Case counter for tst_* routines */
/**************/
key_t key[2];
#define ADDR (void *)0x80000
#define ADDR1 (void *)0x81000
#define ADDR_IA (void *)0x40000000
#define ADDR1_IA (void *)0x40000010
#define SIZE 16*1024
#define srand48 srand
#define lrand48 rand
int rm_shm(int);
int main(void)
{
int shmid, shmid1;
char *cp, *cp1;
srand48((getpid() << 16) + (unsigned)time((time_t *)NULL));
key[0] = (key_t) lrand48();
key[1] = (key_t) lrand48();
/*--------------------------------------------------------*/
if ((shmid = shmget(key[0], SIZE, IPC_CREAT|0666)) < 0) {
perror("shmget");
tst_resm(TFAIL,
"Error: shmget: shmid = %d, errno = %d\n",
shmid, errno) ;
} else {
#ifdef __ia64__
cp = (char *) shmat(shmid, ADDR_IA, 0);
#elif defined(__ARM_ARCH_4T__)
cp = (char *) shmat(shmid, (void *)NULL, 0);
#else
cp = (char *) shmat(shmid, ADDR, 0);
#endif
if (cp == (char *)-1) {
tst_resm(TFAIL,"shmat");
rm_shm(shmid) ;
}
}
tst_resm(TPASS,"shmget & shmat");
/*--------------------------------------------------------*/
if ((shmid1 = shmget(key[1], SIZE, IPC_CREAT|0666)) < 0) {
perror("shmget2");
tst_resm(TFAIL,
"Error: shmget: shmid1 = %d, errno = %d\n",
shmid1, errno) ;
} else {
#ifdef __ia64__
cp1 = (char *) shmat(shmid1, ADDR1_IA, 0);
#elif defined(__ARM_ARCH_4T__)
cp1 = (char *) shmat(shmid1, (void *)NULL, 0);
#else
cp1 = (char *) shmat(shmid1, ADDR1, 0);
#endif
if (cp1 != (char *)-1) {
perror("shmat");
tst_resm(TFAIL,
"Error: shmat: shmid1 = %d, addr= %#x, errno = %d\n",
shmid1, cp1, errno);
}
}
tst_resm(TPASS,"2nd shmget & shmat");
/*------------------------------------------------------*/
rm_shm(shmid) ;
rm_shm(shmid1) ;
tst_exit() ;
/*-------------------------------------------------------*/
return(0);
}
int rm_shm(shmid)
int shmid ;
{
if (shmctl(shmid, IPC_RMID, NULL) == -1) {
perror("shmctl");
tst_resm(TFAIL,
"shmctl Failed to remove: shmid = %d, errno = %d\n",
shmid, errno) ;
tst_exit();
}
return(0);
}

232
minix/tests/ipc/shmt/shmt06.c
View file

@ -1,232 +0,0 @@
/*
*
* Copyright (c) International Business Machines Corp., 2002
*
* 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
*/
/* 12/20/2002 Port to LTP robbiew@us.ibm.com */
/* 06/30/2001 Port to Linux nsharoff@us.ibm.com */
/*
* NAME
* shmt06
*
* CALLS
* shmctl(2) shmget(2) shmat(2)
*
* ALGORITHM
* Parent process forks a child. Child pauses until parent has created
* a shared memory segment, attached to it and written to it too. At that
* time child gets the shared memory segment id, attaches to it at a
* different address than the parents and verifies that its contents are
* the same as the contents of the parent attached segment.
*
*/
#include <stdio.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <sys/ipc.h>
#include <sys/shm.h>
#include <sys/utsname.h>
#include <signal.h>
#include <errno.h>
#include <stdlib.h>
#include <unistd.h>
#define ADDR (void *)0x80000
#define ADDR1 (void *)0xA0000
#define ADDR_MIPS (void *)0x80000
#define ADDR1_MIPS (void *)0xC0000
#define ADDR_IA (void *)0x40000000
#define ADDR1_IA (void *)0x50000000
#define SIZE 16*1024
/** LTP Port **/
#include "test.h"
#include "usctest.h"
char *TCID="shmt06"; /* Test program identifier. */
int TST_TOTAL=2; /* Total number of test cases. */
extern int Tst_count; /* Test Case counter for tst_* routines */
/**************/
key_t key;
sigset_t mysigset;
int child(void);
int rm_shm(int);
int main(void)
{
char *cp=NULL;
int pid, pid1, shmid;
int status;
key = (key_t)getpid() ;
signal(SIGUSR1, SIG_DFL);
sigemptyset(&mysigset);
sigaddset(&mysigset,SIGUSR1);
sigprocmask(SIG_BLOCK,&mysigset,NULL);
pid = fork();
switch (pid) {
case -1:
tst_resm(TBROK,"fork failed");
tst_exit() ;
case 0:
child();
}
/*------------------------------------------------------*/
if ((shmid = shmget(key, SIZE, IPC_CREAT|0666)) < 0) {
perror("shmget");
tst_resm(TFAIL,"Error: shmget: shmid = %d, errno = %d\n",
shmid, errno) ;
/*
* kill the child if parent failed to do the attach
*/
(void)kill(pid, SIGINT);
}
else {
#ifdef __ia64__
cp = (char *) shmat(shmid, ADDR_IA, 0);
#elif defined(__ARM_ARCH_4T__)
cp = (char *) shmat(shmid, (void*) NULL, 0);
#elif defined(__mips__)
cp = (char *) shmat(shmid, ADDR_MIPS, 0);
#else
cp = (char *) shmat(shmid, ADDR, 0);
#endif
if (cp == (char *)-1) {
perror("shmat") ;
tst_resm(TFAIL,
"Error: shmat: shmid = %d, errno = %d\n",
shmid, errno) ;
/* kill the child if parent failed to do the attch */
kill(pid, SIGINT) ;
/* remove shared memory segment */
rm_shm(shmid) ;
tst_exit() ;
}
*cp = 'A';
*(cp+1) = 'B';
*(cp+2) = 'C';
kill(pid, SIGUSR1);
while ( (pid1 = wait(&status)) < 0 &&
(errno == EINTR) ) ;
if (pid1 != pid) {
tst_resm(TFAIL,"Waited on the wrong child") ;
tst_resm(TFAIL,
"Error: wait_status = %d, pid1= %d\n", status, pid1) ;
}
}
tst_resm(TPASS,"shmget,shmat");
/*---------------------------------------------------------------*/
if (shmdt(cp) < 0) {
tst_resm(TFAIL,"shmdt");
}
tst_resm(TPASS,"shmdt");
/*-------------------------------------------------------------*/
rm_shm(shmid) ;
tst_exit() ;
/*-----------------------------------------------------------*/
return(0);
}
int child(void)
{
int shmid ,
chld_pid ;
char *cp;
sigemptyset(&mysigset);
sigsuspend(&mysigset);
chld_pid = getpid() ;
if ((shmid = shmget(key, SIZE, 0)) < 0) {
perror("shmget:child process");
tst_resm(TFAIL,
"Error: shmget: errno=%d, shmid=%d, child_pid=%d\n",
errno, shmid, chld_pid);
}
else {
#ifdef __ia64__
cp = (char *) shmat(shmid, ADDR1_IA, 0);
#elif defined(__ARM_ARCH_4T__)
cp = (char *) shmat(shmid, (void *) NULL, 0);
#elif defined(__mips__)
cp = (char *) shmat(shmid, ADDR1_MIPS, 0);
#else
cp = (char *) shmat(shmid, ADDR1, 0);
#endif
if (cp == (char *)-1) {
perror("shmat:child process");
tst_resm(TFAIL,
"Error: shmat: errno=%d, shmid=%d, child_pid=%d\n",
errno, shmid, chld_pid);
} else {
if (*cp != 'A') {
tst_resm(TFAIL,"child: not A\n");
}
if (*(cp+1) != 'B') {
tst_resm(TFAIL,"child: not B\n");
}
if (*(cp+2) != 'C') {
tst_resm(TFAIL,"child: not C\n");
}
if (*(cp+8192) != 0) {
tst_resm(TFAIL,"child: not 0\n");
}
}
}
tst_exit() ;
return(0);
}
int rm_shm(shmid)
int shmid ;
{
if (shmctl(shmid, IPC_RMID, NULL) == -1) {
perror("shmctl");
tst_resm(TFAIL,
"shmctl Failed to remove: shmid = %d, errno = %d\n",
shmid, errno) ;
tst_exit();
}
return(0);
}

149
minix/tests/ipc/shmt/shmt07.c
View file

@ -1,149 +0,0 @@
/*
*
* Copyright (c) International Business Machines Corp., 2002
*
* 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
*/
/* 12/20/2002 Port to LTP robbiew@us.ibm.com */
/* 06/30/2001 Port to Linux nsharoff@us.ibm.com */
/*
* NAME
* shmt07
*
* CALLS
* shmctl(2) shmget(2) shmat(2)
*
* ALGORITHM
* Create and attach a shared memory segment, write to it
* and then fork a child. The child Verifies that the shared memory segment
* that it inherited from the parent conatins the same data that was originally
* written to it by the parent.
*
*/
#include <stdio.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <sys/ipc.h>
#include <sys/shm.h>
#include <sys/utsname.h>
#include <errno.h>
#include <stdlib.h>
#include <unistd.h>
#define ADDR (void *)0x80000
#define ADDR_IA (void *)0x40000000
#define SIZE 16*1024
/** LTP Port **/
#include "test.h"
#include "usctest.h"
char *TCID="shmt07"; /* Test program identifier. */
int TST_TOTAL=2; /* Total number of test cases. */
extern int Tst_count; /* Test Case counter for tst_* routines */
/**************/
int child(void);
int rm_shm(int);
int main(void)
{
char *cp=NULL;
int shmid, pid, status;
key_t key;
key = (key_t) getpid() ;
/*---------------------------------------------------------*/
errno = 0;
if ((shmid = shmget(key, SIZE, IPC_CREAT|0666)) < 0) {
perror("shmget");
tst_resm(TFAIL,"Error: shmget: shmid = %d, errno = %d\n",
shmid, errno) ;
tst_exit() ;
}
#ifdef __ia64__
cp = (char *) shmat(shmid, ADDR_IA, 0);
#elif defined(__ARM_ARCH_4T__)
cp = (char *) shmat(shmid, (void *) NULL, 0);
#else
cp = (char *) shmat(shmid, ADDR, 0);
#endif
if (cp == (char *)-1) {
perror("shmat");
tst_resm(TFAIL,
"Error: shmat: shmid = %d, errno = %d\n",
shmid, errno) ;
rm_shm(shmid) ;
tst_exit() ;
}
*cp = '1';
*(cp+1) = '2';
tst_resm(TPASS,"shmget,shmat");
/*-------------------------------------------------------*/
pid = fork() ;
switch (pid) {
case -1 :
tst_resm(TBROK,"fork failed");
tst_exit() ;
case 0 :
if (*cp != '1') {
tst_resm(TFAIL, "Error: not 1\n");
}
if (*(cp+1) != '2') {
tst_resm(TFAIL, "Error: not 2\n");
}
tst_exit() ;
}
/* parent */
while( wait(&status) < 0 && errno == EINTR ) ;
tst_resm(TPASS,"cp & cp+1 correct") ;
/*-----------------------------------------------------------*/
rm_shm(shmid) ;
tst_exit() ;
/*-----------------------------------------------------------*/
return(0);
}
int rm_shm(shmid)
int shmid ;
{
if (shmctl(shmid, IPC_RMID, NULL) == -1) {
perror("shmctl");
tst_resm(TFAIL,
"shmctl Failed to remove: shmid = %d, errno = %d\n",
shmid, errno) ;
tst_exit();
}
return(0);
}

127
minix/tests/ipc/shmt/shmt08.c
View file

@ -1,127 +0,0 @@
/*
*
* Copyright (c) International Business Machines Corp., 2002
*
* 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
*/
/* 12/20/2002 Port to LTP robbiew@us.ibm.com */
/* 06/30/2001 Port to Linux nsharoff@us.ibm.com */
/*
* NAME
* shmt08
*
* CALLS
* shmctl(2) shmget(2) shmat(2) shmdt(2)
*
* ALGORITHM
* Create a shared memory segment. Attach it twice at an address
* that is provided by the system. Detach the previously attached
* segments from the process.
*
*/
#include <stdio.h>
#include <sys/types.h>
#include <sys/ipc.h>
#include <sys/shm.h>
#include <errno.h>
#define K_1 1024
/** LTP Port **/
#include "test.h"
#include "usctest.h"
char *TCID="shmt08"; /* Test program identifier. */
int TST_TOTAL=2; /* Total number of test cases. */
extern int Tst_count; /* Test Case counter for tst_* routines */
/**************/
key_t key;
int rm_shm(int);
int main(void)
{
char *cp=NULL, *cp1=NULL;
int shmid;
key = (key_t) getpid() ;
errno = 0 ;
/*-------------------------------------------------------*/
if ((shmid = shmget(key, 24*K_1, IPC_CREAT|0666)) < 0) {
perror("shmget");
tst_resm(TFAIL,"Error: shmget: shmid = %d, errno = %d\n",
shmid, errno) ;
tst_exit() ;
}
cp = (char *) shmat(shmid, (void *)0, 0);
if (cp == (char *)-1) {
tst_resm(TFAIL,"shmat1 Failed");
rm_shm(shmid) ;
tst_exit() ;
}
cp1 = (char *) shmat(shmid, (void *)0, 0);
if (cp1 == (char *)-1) {
perror("shmat2");
rm_shm(shmid) ;
tst_exit() ;
}
tst_resm(TPASS,"shmget,shmat");
/*--------------------------------------------------------*/
if (shmdt(cp) < 0) {
perror("shmdt2");
tst_resm(TFAIL,"shmdt:cp") ;
}
if (shmdt(cp1) < 0 ) {
perror("shmdt1");
tst_resm(TFAIL,"shmdt:cp1") ;
}
tst_resm(TPASS,"shmdt");
/*---------------------------------------------------------*/
rm_shm(shmid) ;
tst_exit() ;
/*---------------------------------------------------------*/
return(0);
}
int rm_shm(shmid)
int shmid ;
{
if (shmctl(shmid, IPC_RMID, NULL) == -1) {
perror("shmctl");
tst_resm(TFAIL,
"shmctl Failed to remove: shmid = %d, errno = %d\n",
shmid, errno) ;
tst_exit();
}
return(0);
}

179
minix/tests/ipc/shmt/shmt10.c
View file

@ -1,179 +0,0 @@
/*
*
* Copyright (c) International Business Machines Corp., 2002
*
* 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
*/
/* 12/20/2002 Port to LTP robbiew@us.ibm.com */
/* 06/30/2001 Port to Linux nsharoff@us.ibm.com */
/*
* NAME
* shmt10.c - test simultaneous shmat/shmdt
*
* CALLS
* shmget, shmat, shmdt, shmctl
*
* ALGORITHM
* Create a shared memory segment and fork a child. Both
* parent and child spin in a loop attaching and detaching
* the segment. After completing the specified number of
* iterations, the child exits and the parent deletes the
* segment.
*
* USAGE
* shmt10 [-i 500]
* -i # of iterations, default 500
*
*/
#include <stdio.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <sys/ipc.h>
#include <sys/shm.h>
#include <stdlib.h>
#include <unistd.h>
#include <signal.h>
#include <errno.h>
#define SIZE 0x32768
/** LTP Port **/
#include "test.h"
#include "usctest.h"
char *TCID="shmt10"; /* Test program identifier. */
int TST_TOTAL=2; /* Total number of test cases. */
extern int Tst_count; /* Test Case counter for tst_* routines */
/**************/
int shmid;
key_t key;
int child(int);
int rm_shm(int);
void fini(int);
int main(int argc, char *argv[])
{
char *c1=NULL;
int pid, st;
register int i;
int iter = 500;
int c;
extern char *optarg;
key = (key_t)getpid();
signal(SIGTERM, fini);
/*--------------------------------------------------------*/
while ((c = getopt(argc, argv, "i:")) != EOF) {
switch (c) {
case 'i':
iter = atoi(optarg);
break;
default:
tst_resm(TCONF, "usage: %s [-i <# iterations>]", argv[0]);
tst_exit();
}
}
/*------------------------------------------------------------------------*/
if ((shmid = shmget(key, SIZE, IPC_CREAT|0666)) < 0) {
tst_resm(TFAIL,"shmget") ;
tst_resm(TFAIL, "Error: shmid = %d\n", shmid) ;
tst_exit() ;
}
pid = fork();
switch(pid) {
case -1:
tst_resm(TBROK,"fork failed");
tst_exit() ;
case 0:
child(iter);
tst_exit();
}
for (i = 0; i < iter; i++) {
if ((c1 = (char *) shmat(shmid, (void *)0, 0)) == (char *)-1) {
tst_resm(TFAIL,
"Error shmat: iter %d, shmid = %d\n", i, shmid);
break;
}
if (shmdt(c1) < 0) {
tst_resm(TFAIL,
"Error: shmdt: iter %d ", i) ;
break;
}
}
while ( wait(&st) < 0 && errno == EINTR )
;
tst_resm(TPASS,"shmat,shmdt");
/*------------------------------------------------------------------------*/
rm_shm(shmid);
tst_exit();
/*------------------------------------------------------------------------*/
return(0);
}
int rm_shm(shmid)
int shmid ;
{
if (shmctl(shmid, IPC_RMID, NULL) == -1) {
perror("shmctl");
tst_resm(TFAIL,
"shmctl Failed to remove: shmid = %d, errno = %d\n",
shmid, errno) ;
tst_exit();
}
return(0);
}
int child(iter)
int iter;
{
register int i;
char *c1;
for (i = 0; i < iter; i++) {
if ((c1 = (char *) shmat(shmid, (void *)0, 0)) == (char *)-1) {
tst_resm(TFAIL,
"Error:child proc: shmat: iter %d, shmid = %d\n",
i, shmid);
tst_exit();
}
if (shmdt(c1) < 0) {
tst_resm(TFAIL,
"Error: child proc: shmdt: iter %d ", i);
tst_exit();
}
}
return(0);
}
void
fini(int sig)
{
rm_shm(shmid);
}

14
minix/tests/ipc/shmt/test.sh
View file

@ -1,14 +0,0 @@
#!/bin/sh
make
# execute them one by one
# the results are obvious
./shmt01
./shmt02
./shmt03
./shmt04
./shmt05
./shmt06
./shmt07
./shmt08
./shmt10

7
minix/tests/ipc/test.sh
View file

@ -1,7 +0,0 @@
for d in semctl semget semop shmat shmctl shmdt shmget shmt
do echo $d
( cd $d
sh test.sh
)
done