Home | History | Annotate | Line # | Download | only in sys
compat___semctl13.c revision 1.2
      1  1.2  christos /*	$NetBSD: compat___semctl13.c,v 1.2 2009/01/11 02:46:26 christos Exp $	*/
      2  1.2  christos 
      3  1.2  christos /*	$NetBSD: compat___semctl13.c,v 1.2 2009/01/11 02:46:26 christos Exp $ */
      4  1.2  christos 
      5  1.2  christos /*-
      6  1.2  christos  * Copyright (c) 2008 The NetBSD Foundation, Inc.
      7  1.2  christos  * All rights reserved.
      8  1.2  christos  *
      9  1.2  christos  * This code is derived from software contributed to The NetBSD Foundation
     10  1.2  christos  * by Christos Zoulas.
     11  1.2  christos  *
     12  1.2  christos  * Redistribution and use in source and binary forms, with or without
     13  1.2  christos  * modification, are permitted provided that the following conditions
     14  1.2  christos  * are met:
     15  1.2  christos  * 1. Redistributions of source code must retain the above copyright
     16  1.2  christos  *    notice, this list of conditions and the following disclaimer.
     17  1.2  christos  * 2. Redistributions in binary form must reproduce the above copyright
     18  1.2  christos  *    notice, this list of conditions and the following disclaimer in the
     19  1.2  christos  *    documentation and/or other materials provided with the distribution.
     20  1.2  christos  * 3. All advertising materials mentioning features or use of this software
     21  1.2  christos  *    must display the following acknowledgement:
     22  1.2  christos  *        This product includes software developed by the NetBSD
     23  1.2  christos  *        Foundation, Inc. and its contributors.
     24  1.2  christos  * 4. Neither the name of The NetBSD Foundation nor the names of its
     25  1.2  christos  *    contributors may be used to endorse or promote products derived
     26  1.2  christos  *    from this software without specific prior written permission.
     27  1.2  christos  *
     28  1.2  christos  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     29  1.2  christos  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     30  1.2  christos  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     31  1.2  christos  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     32  1.2  christos  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     33  1.2  christos  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     34  1.2  christos  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     35  1.2  christos  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     36  1.2  christos  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     37  1.2  christos  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     38  1.2  christos  * POSSIBILITY OF SUCH DAMAGE.
     39  1.2  christos  */
     40  1.2  christos #include <sys/cdefs.h>
     41  1.2  christos #if defined(LIBC_SCCS) && !defined(lint)
     42  1.2  christos __RCSID("$NetBSD: compat___semctl13.c,v 1.2 2009/01/11 02:46:26 christos Exp $");
     43  1.2  christos #endif /* LIBC_SCCS and not lint */
     44  1.2  christos 
     45  1.2  christos #include "namespace.h"
     46  1.2  christos #define __LIBC12_SOURCE__
     47  1.2  christos #include <stdarg.h>
     48  1.2  christos #include <sys/time.h>
     49  1.2  christos #include <compat/sys/time.h>
     50  1.2  christos #include <sys/sem.h>
     51  1.2  christos #include <compat/sys/sem.h>
     52  1.2  christos 
     53  1.2  christos __warn_references(__semctl13,
     54  1.2  christos     "warning: reference to compatibility __semctl13(); include <sys/sem.h> to generate correct reference")
     55  1.2  christos 
     56  1.2  christos /*
     57  1.2  christos  * Copy timeout to local variable and call the syscall.
     58  1.2  christos  */
     59  1.2  christos int
     60  1.2  christos __semctl13(int semid, int semnum, int cmd, ...)
     61  1.2  christos {
     62  1.2  christos 	va_list ap;
     63  1.2  christos 	union __semun semun;
     64  1.2  christos 	struct semid_ds13 *ds13;
     65  1.2  christos 	struct semid_ds ds;
     66  1.2  christos 	int error;
     67  1.2  christos 
     68  1.2  christos 	va_start(ap, cmd);
     69  1.2  christos 	switch (cmd) {
     70  1.2  christos 	case IPC_SET:
     71  1.2  christos 	case IPC_STAT:
     72  1.2  christos 	case GETALL:
     73  1.2  christos 	case SETVAL:
     74  1.2  christos 	case SETALL:
     75  1.2  christos #ifdef __lint__
     76  1.2  christos 		memcpy(&semun, &ap, sizeof(semun));
     77  1.2  christos #else
     78  1.2  christos 		semun = va_arg(ap, union __semun);
     79  1.2  christos #endif
     80  1.2  christos 	}
     81  1.2  christos 	va_end(ap);
     82  1.2  christos 
     83  1.2  christos 	ds13 = (struct semid_ds13 *)(void *)semun.buf;
     84  1.2  christos 	semun.buf = &ds;
     85  1.2  christos 
     86  1.2  christos 	if (cmd == IPC_SET)
     87  1.2  christos 		__semid_ds13_to_native(ds13, &ds);
     88  1.2  christos 
     89  1.2  christos 	error = ____semctl50(semid, semnum, cmd, &semun);
     90  1.2  christos 	if (error)
     91  1.2  christos 		return error;
     92  1.2  christos 
     93  1.2  christos 	if (cmd == IPC_STAT)
     94  1.2  christos 		__native_to_semid_ds13(&ds, ds13);
     95  1.2  christos 
     96  1.2  christos 	semun.buf = (struct semid_ds *)(void *)ds13;
     97  1.2  christos 	return 0;
     98  1.2  christos }
     99