100 lines
1.9 KiB
C
100 lines
1.9 KiB
C
#define __USE_MISC
|
|
#define _SYSTEM 1
|
|
#define _MINIX 1
|
|
|
|
#include <minix/com.h>
|
|
#include <minix/config.h>
|
|
#include <minix/ipc.h>
|
|
#include <minix/endpoint.h>
|
|
#include <minix/sysutil.h>
|
|
#include <minix/const.h>
|
|
#include <minix/type.h>
|
|
#include <minix/rs.h>
|
|
|
|
#include <lib.h>
|
|
#include <sys/types.h>
|
|
#include <sys/ipc.h>
|
|
#include <sys/sem.h>
|
|
#include <time.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <stdarg.h>
|
|
#include <errno.h>
|
|
|
|
PRIVATE int get_ipc_endpt(endpoint_t *pt)
|
|
{
|
|
return minix_rs_lookup("ipc", pt);
|
|
}
|
|
|
|
/* Get semaphore. */
|
|
PUBLIC int semget(key_t key, int nsems, int semflag)
|
|
{
|
|
message m;
|
|
endpoint_t ipc_pt;
|
|
int r;
|
|
|
|
if (get_ipc_endpt(&ipc_pt) != OK) {
|
|
errno = ENOSYS;
|
|
return -1;
|
|
}
|
|
|
|
m.SEMGET_KEY = key;
|
|
m.SEMGET_NR = nsems;
|
|
m.SEMGET_FLAG = semflag;
|
|
|
|
r = _syscall(ipc_pt, IPC_SEMGET, &m);
|
|
if (r != OK)
|
|
return r;
|
|
|
|
return m.SEMGET_RETID;
|
|
}
|
|
|
|
/* Semaphore control operation. */
|
|
PUBLIC int semctl(int semid, int semnum, int cmd, ...)
|
|
{
|
|
message m;
|
|
endpoint_t ipc_pt;
|
|
va_list ap;
|
|
int r;
|
|
|
|
if (get_ipc_endpt(&ipc_pt) != OK) {
|
|
errno = ENOSYS;
|
|
return -1;
|
|
}
|
|
|
|
m.SEMCTL_ID = semid;
|
|
m.SEMCTL_NUM = semnum;
|
|
m.SEMCTL_CMD = cmd;
|
|
va_start(ap, cmd);
|
|
if (cmd == IPC_STAT || cmd == IPC_SET || cmd == IPC_INFO ||
|
|
cmd == SEM_INFO || cmd == SEM_STAT || cmd == GETALL ||
|
|
cmd == SETALL || cmd == SETVAL)
|
|
m.SEMCTL_OPT = (long) va_arg(ap, long);
|
|
va_end(ap);
|
|
|
|
r = _syscall(ipc_pt, IPC_SEMCTL, &m);
|
|
if ((r != -1) && (cmd == GETNCNT || cmd == GETZCNT || cmd == GETPID ||
|
|
cmd == GETVAL || cmd == IPC_INFO || cmd == SEM_INFO ||
|
|
cmd == SEM_STAT))
|
|
return m.SHMCTL_RET;
|
|
return r;
|
|
}
|
|
|
|
/* Operate on semaphore. */
|
|
PUBLIC int semop(int semid, struct sembuf *sops, size_t nsops)
|
|
{
|
|
message m;
|
|
endpoint_t ipc_pt;
|
|
|
|
if (get_ipc_endpt(&ipc_pt) != OK) {
|
|
errno = ENOSYS;
|
|
return -1;
|
|
}
|
|
|
|
m.SEMOP_ID = semid;
|
|
m.SEMOP_OPS = (long) sops;
|
|
m.SEMOP_SIZE = nsops;
|
|
|
|
return _syscall(ipc_pt, IPC_SEMOP, &m);
|
|
}
|
|
|