Home | History | Annotate | Line # | Download | only in common
      1  1.5   tsutsui /*	$NetBSD: sysv_shm_50.c,v 1.5 2019/12/15 16:48:26 tsutsui Exp $	*/
      2  1.2  christos 
      3  1.2  christos /*-
      4  1.2  christos  * Copyright (c) 1999 The NetBSD Foundation, Inc.
      5  1.2  christos  * All rights reserved.
      6  1.2  christos  *
      7  1.2  christos  * This code is derived from software contributed to The NetBSD Foundation
      8  1.2  christos  * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
      9  1.2  christos  * NASA Ames Research Center.
     10  1.2  christos  *
     11  1.2  christos  * Redistribution and use in source and binary forms, with or without
     12  1.2  christos  * modification, are permitted provided that the following conditions
     13  1.2  christos  * are met:
     14  1.2  christos  * 1. Redistributions of source code must retain the above copyright
     15  1.2  christos  *    notice, this list of conditions and the following disclaimer.
     16  1.2  christos  * 2. Redistributions in binary form must reproduce the above copyright
     17  1.2  christos  *    notice, this list of conditions and the following disclaimer in the
     18  1.2  christos  *    documentation and/or other materials provided with the distribution.
     19  1.2  christos  *
     20  1.2  christos  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     21  1.2  christos  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     22  1.2  christos  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     23  1.2  christos  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     24  1.2  christos  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     25  1.2  christos  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     26  1.2  christos  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     27  1.2  christos  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     28  1.2  christos  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     29  1.2  christos  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     30  1.2  christos  * POSSIBILITY OF SUCH DAMAGE.
     31  1.2  christos  */
     32  1.2  christos 
     33  1.2  christos #include <sys/cdefs.h>
     34  1.5   tsutsui __KERNEL_RCSID(0, "$NetBSD: sysv_shm_50.c,v 1.5 2019/12/15 16:48:26 tsutsui Exp $");
     35  1.4  pgoyette 
     36  1.4  pgoyette #if defined(_KERNEL_OPT)
     37  1.4  pgoyette #include "opt_compat_netbsd.h"
     38  1.4  pgoyette #endif
     39  1.2  christos 
     40  1.2  christos #include <sys/param.h>
     41  1.2  christos #include <sys/systm.h>
     42  1.2  christos #include <sys/signal.h>
     43  1.2  christos #include <sys/proc.h>
     44  1.2  christos #include <sys/shm.h>
     45  1.2  christos 
     46  1.2  christos #ifndef SYSVSHM
     47  1.2  christos #define	SYSVSHM
     48  1.2  christos #endif
     49  1.2  christos 
     50  1.2  christos #include <sys/syscallargs.h>
     51  1.2  christos 
     52  1.2  christos #include <compat/sys/shm.h>
     53  1.2  christos 
     54  1.2  christos int
     55  1.2  christos compat_50_sys___shmctl13(struct lwp *l, const struct compat_50_sys___shmctl13_args *uap, register_t *retval)
     56  1.2  christos {
     57  1.2  christos 	/* {
     58  1.2  christos 		syscallarg(int) shmid;
     59  1.2  christos 		syscallarg(int) cmd;
     60  1.2  christos 		syscallarg(struct shmid_ds13 *) buf;
     61  1.2  christos 	} */
     62  1.2  christos 	struct shmid_ds shmbuf;
     63  1.2  christos 	struct shmid_ds13 oshmbuf;
     64  1.2  christos 	int cmd, error;
     65  1.2  christos 
     66  1.2  christos 	cmd = SCARG(uap, cmd);
     67  1.2  christos 
     68  1.2  christos 	if (cmd == IPC_SET) {
     69  1.2  christos 		error = copyin(SCARG(uap, buf), &oshmbuf, sizeof(oshmbuf));
     70  1.2  christos 		if (error)
     71  1.2  christos 			return (error);
     72  1.2  christos 		__shmid_ds13_to_native(&oshmbuf, &shmbuf);
     73  1.2  christos 	}
     74  1.2  christos 
     75  1.2  christos 	error = shmctl1(l, SCARG(uap, shmid), cmd,
     76  1.2  christos 	    (cmd == IPC_SET || cmd == IPC_STAT) ? &shmbuf : NULL);
     77  1.2  christos 
     78  1.2  christos 	if (error == 0 && cmd == IPC_STAT) {
     79  1.2  christos 		__native_to_shmid_ds13(&shmbuf, &oshmbuf);
     80  1.2  christos 		error = copyout(&oshmbuf, SCARG(uap, buf), sizeof(oshmbuf));
     81  1.2  christos 	}
     82  1.2  christos 
     83  1.2  christos 	return (error);
     84  1.2  christos }
     85