lib/libc/compat/sys/compat_semctl.c

   1 /* $NetBSD: compat_semctl.c,v 1.1.28.1 2009/01/05 01:30:33 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.1.28.1 2009/01/05 01:30:33 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 }