1 /* $NetBSD: compat_semctl.c,v 1.2 2009/01/11 02:46:26 christos Exp $ */ 2 3 /* 4 * Copyright (c) 1994, 1995 Christopher G. Demetriou 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed for the 18 * NetBSD Project. See http://www.NetBSD.org/ for 19 * information about NetBSD. 20 * 4. The name of the author may not be used to endorse or promote products 21 * derived from this software without specific prior written permission. 22 * 23 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 24 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 25 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 26 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 27 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 28 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 29 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 30 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 31 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 32 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 33 * 34 * <<Id: LICENSE,v 1.2 2000/06/14 15:57:33 cgd Exp>> 35 */ 36 37 #include <sys/cdefs.h> 38 #if defined(LIBC_SCCS) && !defined(lint) 39 __RCSID("$NetBSD: compat_semctl.c,v 1.2 2009/01/11 02:46:26 christos Exp $"); 40 #endif /* LIBC_SCCS and not lint */ 41 42 #define __LIBC12_SOURCE__ 43 #include <sys/types.h> 44 #include <sys/ipc.h> 45 #include <sys/sem.h> 46 #include <sys/null.h> 47 #include <compat/sys/sem.h> 48 #include <stdarg.h> 49 50 int 51 semctl(int semid, int semnum, int cmd, ...) 52 { 53 va_list ap; 54 union __semun semun; 55 struct semid_ds ds; 56 struct semid_ds14 *ds14 = NULL; 57 int error; 58 59 va_start(ap, cmd); 60 switch (cmd) { 61 case IPC_SET: 62 case IPC_STAT: 63 case GETALL: 64 case SETVAL: 65 case SETALL: 66 #ifdef __lint__ 67 memcpy(&semun, &ap, sizeof(semun)); 68 #else 69 semun = va_arg(ap, union __semun); 70 #endif 71 } 72 va_end(ap); 73 74 switch (cmd) { 75 case IPC_SET: 76 case IPC_STAT: 77 ds14 = (struct semid_ds14 *)(void *)semun.buf; 78 if (cmd == IPC_SET) 79 __semid_ds14_to_native(ds14, &ds); 80 semun.buf = &ds; 81 break; 82 } 83 84 error = __semctl50(semid, semnum, cmd, &semun); 85 switch (cmd) { 86 case IPC_SET: 87 case IPC_STAT: 88 semun.buf = (struct semid_ds *)(void *)ds14; 89 if (cmd == IPC_STAT && error == 0) 90 __native_to_semid_ds14(&ds, ds14); 91 break; 92 } 93 return error; 94 } 95