xref: /netbsd/lib/libc/compat/sys/compat_semctl.c (revision 6550d01e)
1 /* $NetBSD: compat_semctl.c,v 1.3 2011/01/31 22:51:39 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.3 2011/01/31 22:51:39 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;
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 		break;
72 	default:
73 		break;
74 	}
75 	va_end(ap);
76 
77 	switch (cmd) {
78 	case IPC_SET:
79 	case IPC_STAT:
80 		ds14 = (void *)semun.buf;
81 		if (cmd == IPC_SET)
82 			__semid_ds14_to_native(ds14, &ds);
83 		semun.buf = &ds;
84 		break;
85 	default:
86 		ds14 = NULL;
87 		break;
88 	}
89 
90 	error = __semctl50(semid, semnum, cmd, &semun);
91 	if (error)
92 		return error;
93 
94 	if (cmd == IPC_STAT)
95 		__native_to_semid_ds14(&ds, ds14);
96 	return 0;
97 }
98