Aren
/
NetBSD
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

First implementation of a few usync_cntl commands.

This commit is contained in:
manu 2002-05-22 21:32:21 +00:00
parent d4260bb037
commit d72c924447
2 changed files with 105 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

92
sys/compat/irix/irix_usync.c
View File

@ -1,4 +1,4 @@
/* $NetBSD: irix_usync.c,v 1.1 2002/04/29 14:40:23 manu Exp $ */
/* $NetBSD: irix_usync.c,v 1.2 2002/05/22 21:32:21 manu Exp $ */
/*-
* Copyright (c) 2002 The NetBSD Foundation, Inc.
@ -37,21 +37,26 @@
*/
#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: irix_usync.c,v 1.1 2002/04/29 14:40:23 manu Exp $");
__KERNEL_RCSID(0, "$NetBSD: irix_usync.c,v 1.2 2002/05/22 21:32:21 manu Exp $");
#include <sys/types.h>
#include <sys/signal.h>
#include <sys/param.h>
#include <sys/mount.h>
#include <sys/malloc.h>
#include <sys/proc.h>
#include <sys/systm.h>
#include <sys/syscallargs.h>
#include <compat/irix/irix_types.h>
#include <compat/irix/irix_usema.h>
#include <compat/irix/irix_usync.h>
#include <compat/irix/irix_signal.h>
#include <compat/irix/irix_syscallargs.h>
static TAILQ_HEAD(irix_usync_reclist, irix_usync_rec) irix_usync_reclist =
{ NULL, NULL };
int
irix_sys_usync_cntl(p, v, retval)
struct proc *p;
@ -62,8 +67,91 @@ irix_sys_usync_cntl(p, v, retval)
syscallarg(int) cmd;
syscallarg(void *) arg;
} */ *uap = v;
int error;
struct irix_usync_arg iua;
struct irix_semaphore is;
struct irix_usync_rec *iur;
/*
* Initialize irix_usync_reclist if it has not
* been initialized yet. Not sure it is the best
* place to do this...
*/
if (irix_usync_reclist.tqh_last == NULL)
TAILQ_INIT(&irix_usync_reclist);
switch (SCARG(uap, cmd)) {
case IRIX_USYNC_BLOCK:
if ((error = copyin(SCARG(uap, arg), &iua, sizeof(iua))) != 0)
return error;
iur = malloc(sizeof(*iur), M_DEVBUF, M_WAITOK);
iur->iur_sem = iua.iua_sem;
iur->iur_p = p;
TAILQ_INSERT_TAIL(&irix_usync_reclist, iur, iur_list);
(void)tsleep(iur, PZERO, "irix_usema", 0);
break;
case IRIX_USYNC_INTR_BLOCK:
if ((error = copyin(SCARG(uap, arg), &iua, sizeof(iua))) != 0)
return error;
iur = malloc(sizeof(*iur), M_DEVBUF, M_WAITOK|M_ZERO);
iur->iur_sem = iua.iua_sem;
iur->iur_p = p;
TAILQ_INSERT_TAIL(&irix_usync_reclist, iur, iur_list);
(void)tsleep(iur, PZERO|PCATCH, "irix_usema", 0);
break;
case IRIX_USYNC_UNBLOCK_ALL: {
int found = 0;
if ((error = copyin(SCARG(uap, arg), &iua, sizeof(iua))) != 0)
return error;
TAILQ_FOREACH(iur, &irix_usync_reclist, iur_list) {
if (iur->iur_sem == iua.iua_sem) {
found = 1;
wakeup(iur);
TAILQ_REMOVE(&irix_usync_reclist,
iur, iur_list);
free(iur, M_DEVBUF);
}
}
if (found == 0)
return EINVAL;
break;
}
case IRIX_USYNC_UNBLOCK:
if ((error = copyin(SCARG(uap, arg), &iua, sizeof(iua))) != 0)
return error;
TAILQ_FOREACH(iur, &irix_usync_reclist, iur_list) {
if (iur->iur_sem == iua.iua_sem) {
wakeup(iur);
TAILQ_REMOVE(&irix_usync_reclist,
iur, iur_list);
free(iur, M_DEVBUF);
break;
}
}
if (iur == NULL) /* Nothing was found */
return EINVAL;
break;
case IRIX_USYNC_GET_STATE:
if ((error = copyin(SCARG(uap, arg), &iua, sizeof(iua))) != 0)
return error;
if ((error = copyin(iua.iua_sem, &is, sizeof(is))) != 0)
return error;
if (is.is_val < 0)
*retval = -1;
else
*retval = 0;
break;
default:
printf("Warning: unimplemented IRIX usync_cntl command %d\n",
SCARG(uap, cmd));

16
sys/compat/irix/irix_usync.h
View File

@ -1,4 +1,4 @@
/* $NetBSD: irix_usync.h,v 1.1 2002/04/29 14:40:23 manu Exp $ */
/* $NetBSD: irix_usync.h,v 1.2 2002/05/22 21:32:21 manu Exp $ */
/*-
* Copyright (c) 2002 The NetBSD Foundation, Inc.
@ -39,6 +39,13 @@
#ifndef _IRIX_USYNCL_H_
#define _IRIX_USYNCL_H_
/* processes queue waiting for a semaphore */
struct irix_usync_rec {
TAILQ_ENTRY(irix_usync_rec) iur_list;
struct proc *iur_p;
struct irix_semaphore *iur_sem;
};
/* usync_fcntl() commands, undocumented in IRIX */
#define IRIX_USYNC_BLOCK 1
#define IRIX_USYNC_INTR_BLOCK 2
@ -50,4 +57,11 @@
#define IRIX_USYNC_NOTIFY_CLEAR 8
#define IRIX_USYNC_GET_STATE 11
struct irix_usync_arg {
int iua_uk0; /* unknown, usually small integer around 1000 */
int iua_uk1; /* unknown, usually pointer to code in libc */
int iua_uk2; /* unknown, usually null */
struct irix_semaphore *iua_sem; /* semaphore address */
};
#endif /* _IRIX_USYNC_H */