2002-02-17 21:56:45 +00:00
|
|
|
/*
|
2002-04-10 03:05:00 +00:00
|
|
|
* Copyright (c) 2000-2002 Sendmail, Inc. and its suppliers.
|
2002-02-17 21:56:45 +00:00
|
|
|
* All rights reserved.
|
|
|
|
*
|
|
|
|
* By using this file, you agree to the terms and conditions set
|
|
|
|
* forth in the LICENSE file which can be found at the top level of
|
|
|
|
* the sendmail distribution.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include <sm/gen.h>
|
2002-06-11 21:12:04 +00:00
|
|
|
SM_RCSID("@(#)$Id: t-shm.c,v 1.18 2002/01/31 04:11:41 ca Exp $")
|
2002-02-17 21:56:45 +00:00
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
|
|
|
|
#if SM_CONF_SHM
|
|
|
|
# include <stdlib.h>
|
|
|
|
# include <unistd.h>
|
|
|
|
# include <sys/wait.h>
|
|
|
|
|
|
|
|
# include <sm/heap.h>
|
|
|
|
# include <sm/string.h>
|
|
|
|
# include <sm/test.h>
|
|
|
|
# include <sm/shm.h>
|
|
|
|
|
|
|
|
# define SHMSIZE 1024
|
|
|
|
# define SHM_MAX 6400000
|
|
|
|
# define T_SHMKEY 21
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
** SHMINTER -- interactive testing of shared memory
|
|
|
|
**
|
|
|
|
** Parameters:
|
|
|
|
** owner -- create segment.
|
|
|
|
**
|
|
|
|
** Returns:
|
|
|
|
** 0 on success
|
|
|
|
** < 0 on failure.
|
|
|
|
*/
|
|
|
|
|
|
|
|
int shminter __P((bool));
|
|
|
|
|
|
|
|
int
|
|
|
|
shminter(owner)
|
|
|
|
bool owner;
|
|
|
|
{
|
|
|
|
int *shm, shmid;
|
|
|
|
int i, j, t;
|
|
|
|
|
|
|
|
shm = (int *) sm_shmstart(T_SHMKEY, SHMSIZE, 0, &shmid, owner);
|
|
|
|
if (shm == (int *) 0)
|
|
|
|
{
|
|
|
|
perror("shminit failed");
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
while ((t = getchar()) != EOF)
|
|
|
|
{
|
|
|
|
switch (t)
|
|
|
|
{
|
|
|
|
case 'c':
|
|
|
|
*shm = 0;
|
|
|
|
break;
|
|
|
|
case 'i':
|
|
|
|
++*shm;
|
|
|
|
break;
|
|
|
|
case 'd':
|
|
|
|
--*shm;
|
|
|
|
break;
|
|
|
|
case 's':
|
|
|
|
sleep(1);
|
|
|
|
break;
|
|
|
|
case 'l':
|
|
|
|
t = *shm;
|
|
|
|
for (i = 0; i < SHM_MAX; i++)
|
|
|
|
{
|
|
|
|
j += i;
|
|
|
|
++*shm;
|
|
|
|
}
|
|
|
|
if (*shm != SHM_MAX + t)
|
|
|
|
fprintf(stderr, "error: %d != %d\n",
|
|
|
|
*shm, SHM_MAX + t);
|
|
|
|
break;
|
|
|
|
case 'v':
|
|
|
|
printf("shmval: %d\n", *shm);
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return sm_shmstop((void *) shm, shmid, owner);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
** SHMBIG -- testing of shared memory
|
|
|
|
**
|
|
|
|
** Parameters:
|
|
|
|
** owner -- create segment.
|
|
|
|
** size -- size of segment.
|
|
|
|
**
|
|
|
|
** Returns:
|
|
|
|
** 0 on success
|
|
|
|
** < 0 on failure.
|
|
|
|
*/
|
|
|
|
|
|
|
|
int shmbig __P((bool, int));
|
|
|
|
|
|
|
|
int
|
|
|
|
shmbig(owner, size)
|
|
|
|
bool owner;
|
|
|
|
int size;
|
|
|
|
{
|
|
|
|
int *shm, shmid;
|
|
|
|
int i;
|
|
|
|
|
|
|
|
shm = (int *) sm_shmstart(T_SHMKEY, size, 0, &shmid, owner);
|
|
|
|
if (shm == (int *) 0)
|
|
|
|
{
|
|
|
|
perror("shminit failed");
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
for (i = 0; i < size / sizeof(int); i++)
|
|
|
|
shm[i] = i;
|
|
|
|
for (i = 0; i < size / sizeof(int); i++)
|
|
|
|
{
|
|
|
|
if (shm[i] != i)
|
|
|
|
{
|
|
|
|
fprintf(stderr, "failed at %d: %d", i, shm[i]);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
return sm_shmstop((void *) shm, shmid, owner);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
** SHMTEST -- test of shared memory
|
|
|
|
**
|
|
|
|
** Parameters:
|
|
|
|
** owner -- create segment.
|
|
|
|
**
|
|
|
|
** Returns:
|
|
|
|
** 0 on success
|
|
|
|
** < 0 on failure.
|
|
|
|
*/
|
|
|
|
|
|
|
|
# define MAX_CNT 10
|
|
|
|
|
|
|
|
int
|
|
|
|
shmtest(owner)
|
|
|
|
int owner;
|
|
|
|
{
|
|
|
|
int *shm, shmid;
|
|
|
|
int cnt = 0;
|
|
|
|
|
|
|
|
shm = (int *) sm_shmstart(T_SHMKEY, SHMSIZE, 0, &shmid, owner);
|
|
|
|
if (shm == (int *) 0)
|
|
|
|
{
|
|
|
|
perror("shminit failed");
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (owner)
|
|
|
|
{
|
|
|
|
int r;
|
|
|
|
|
|
|
|
*shm = 1;
|
|
|
|
while (*shm == 1 && cnt++ < MAX_CNT)
|
|
|
|
sleep(1);
|
|
|
|
SM_TEST(cnt <= MAX_CNT);
|
|
|
|
|
|
|
|
/* release and re-acquire the segment */
|
|
|
|
r = sm_shmstop((void *) shm, shmid, owner);
|
|
|
|
SM_TEST(r == 0);
|
|
|
|
shm = (int *) sm_shmstart(T_SHMKEY, SHMSIZE, 0, &shmid, owner);
|
|
|
|
SM_TEST(shm != (int *) 0);
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
while (*shm != 1 && cnt++ < MAX_CNT)
|
|
|
|
sleep(1);
|
|
|
|
SM_TEST(cnt <= MAX_CNT);
|
|
|
|
*shm = 2;
|
|
|
|
|
|
|
|
/* wait a momemt so the segment is still in use */
|
|
|
|
sleep(2);
|
|
|
|
}
|
|
|
|
return sm_shmstop((void *) shm, shmid, owner);
|
|
|
|
}
|
|
|
|
|
|
|
|
int
|
|
|
|
main(argc, argv)
|
|
|
|
int argc;
|
|
|
|
char *argv[];
|
|
|
|
{
|
|
|
|
bool interactive = false;
|
|
|
|
bool owner = false;
|
|
|
|
int big = -1;
|
|
|
|
int ch;
|
|
|
|
int r = 0;
|
|
|
|
int status;
|
|
|
|
extern char *optarg;
|
|
|
|
|
|
|
|
# define OPTIONS "b:io"
|
|
|
|
while ((ch = getopt(argc, argv, OPTIONS)) != -1)
|
|
|
|
{
|
|
|
|
switch ((char) ch)
|
|
|
|
{
|
|
|
|
case 'b':
|
|
|
|
big = atoi(optarg);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 'i':
|
|
|
|
interactive = true;
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 'o':
|
|
|
|
owner = true;
|
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if (interactive)
|
|
|
|
r = shminter(owner);
|
|
|
|
else if (big > 0)
|
|
|
|
r = shmbig(true, big);
|
|
|
|
else
|
|
|
|
{
|
|
|
|
pid_t pid;
|
2002-04-10 03:05:00 +00:00
|
|
|
extern int SmTestNumErrors;
|
2002-02-17 21:56:45 +00:00
|
|
|
|
|
|
|
if ((pid = fork()) < 0)
|
|
|
|
{
|
|
|
|
perror("fork failed\n");
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
sm_test_begin(argc, argv, "test shared memory");
|
|
|
|
if (pid == 0)
|
|
|
|
{
|
|
|
|
/* give the parent the chance to setup data */
|
|
|
|
sleep(1);
|
|
|
|
r = shmtest(false);
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
r = shmtest(true);
|
|
|
|
(void) wait(&status);
|
|
|
|
}
|
|
|
|
SM_TEST(r == 0);
|
2002-04-10 03:05:00 +00:00
|
|
|
if (SmTestNumErrors > 0)
|
|
|
|
printf("add -DSM_CONF_SHM=0 to confENVDEF in devtools/Site/site.config.m4\nand start over.\n");
|
2002-02-17 21:56:45 +00:00
|
|
|
return sm_test_end();
|
|
|
|
}
|
|
|
|
return r;
|
|
|
|
}
|
|
|
|
#else /* SM_CONF_SHM */
|
|
|
|
int
|
|
|
|
main(argc, argv)
|
|
|
|
int argc;
|
|
|
|
char *argv[];
|
|
|
|
{
|
|
|
|
printf("No support for shared memory configured on this machine\n");
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
#endif /* SM_CONF_SHM */
|