fis-gtm/sr_unix/ipcrmid.c

71 lines
1.5 KiB
C
Raw Normal View History

/****************************************************************
* *
* Copyright 2001 Sanchez Computer Associates, Inc. *
* *
* This source code contains the intellectual property *
* of its copyright holder(s), and is made available *
* under a license. If you do not know the terms of *
* the license, please stop and do not read further. *
* *
****************************************************************/
/* Perform forks to priv'd gtmsecshr routine to remove ipc ids */
#include "mdef.h"
#include <sys/wait.h>
#include <sys/sem.h>
#include <sys/shm.h>
#include <errno.h>
#include "io.h"
#include "gtmsecshr.h"
#include "gtmmsg.h"
#include "ipcrmid.h"
#define REMIPC(op, ipcid) (send_mesg2gtmsecshr((unsigned int)(op), (unsigned int)(ipcid), (char *)NULL, 0))
/* Remove a semaphore id : if the current process has no permissions to remove it by itself,
* force it through gtmsecshr.
*/
int sem_rmid(int ipcid)
{
int status;
if (-1 == semctl(ipcid, 0, IPC_RMID))
{
if (EPERM != errno)
{
gtm_putmsg(VARLSTCNT(1) errno);
return -1;
} else
{
if (0 != (status = REMIPC(REMOVE_SEM, ipcid)))
{
gtm_putmsg(VARLSTCNT(1) status);
return -1;
}
}
}
return 0;
}
/* Remove a shared memory id */
int shm_rmid(int ipcid)
{
int status;
if (-1 == shmctl(ipcid, IPC_RMID, NULL))
{
if (EPERM != errno)
{
gtm_putmsg(VARLSTCNT(1) errno);
return -1;
} else
{
if (0 != (status = REMIPC(REMOVE_SHMMEM, ipcid)))
{
gtm_putmsg(VARLSTCNT(1) status);
return -1;
}
}
}
return 0;
}