1 /* 2 * Copyright (c) 1993 Ulrich Pegelow <pegelow (at) moorea.uni-muenster.de> 3 * Copyright (c) 1993 Branko Lankester <branko (at) hacktic.nl> 4 * Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs (at) world.std.com> 5 * Copyright (c) 1996-1999 Wichert Akkerman <wichert (at) cistron.nl> 6 * Copyright (c) 2003-2006 Roland McGrath <roland (at) redhat.com> 7 * Copyright (c) 2006-2015 Dmitry V. Levin <ldv (at) altlinux.org> 8 * All rights reserved. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 3. The name of the author may not be used to endorse or promote products 19 * derived from this software without specific prior written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 31 */ 32 33 #include "defs.h" 34 #include "ipc_defs.h" 35 36 #ifdef HAVE_SYS_MSG_H 37 # include <sys/msg.h> 38 #elif defined HAVE_LINUX_MSG_H 39 # include <linux/msg.h> 40 #endif 41 42 #include "xlat/ipc_msg_flags.h" 43 #include "xlat/resource_flags.h" 44 45 SYS_FUNC(msgget) 46 { 47 if (tcp->u_arg[0]) 48 tprintf("%#lx, ", tcp->u_arg[0]); 49 else 50 tprints("IPC_PRIVATE, "); 51 if (printflags(resource_flags, tcp->u_arg[1] & ~0777, NULL) != 0) 52 tprints("|"); 53 tprintf("%#lo", tcp->u_arg[1] & 0777); 54 return RVAL_DECODED; 55 } 56 57 static void 58 tprint_msgsnd(struct tcb *tcp, const long addr, const unsigned long count, 59 const unsigned long flags) 60 { 61 tprint_msgbuf(tcp, addr, count); 62 printflags(ipc_msg_flags, flags, "MSG_???"); 63 } 64 65 SYS_FUNC(msgsnd) 66 { 67 tprintf("%d, ", (int) tcp->u_arg[0]); 68 if (indirect_ipccall(tcp)) { 69 tprint_msgsnd(tcp, tcp->u_arg[3], tcp->u_arg[1], 70 tcp->u_arg[2]); 71 } else { 72 tprint_msgsnd(tcp, tcp->u_arg[1], tcp->u_arg[2], 73 tcp->u_arg[3]); 74 } 75 return RVAL_DECODED; 76 } 77 78 static void 79 tprint_msgrcv(struct tcb *tcp, const long addr, const unsigned long count, 80 const long msgtyp) 81 { 82 tprint_msgbuf(tcp, addr, count); 83 tprintf("%ld, ", msgtyp); 84 } 85 86 static int 87 fetch_msgrcv_args(struct tcb *tcp, const long addr, long *pair) 88 { 89 if (current_wordsize == sizeof(long)) { 90 if (umoven_or_printaddr(tcp, addr, 2 * sizeof(long), pair)) 91 return -1; 92 } else { 93 unsigned int tmp[2]; 94 95 if (umove_or_printaddr(tcp, addr, &tmp)) 96 return -1; 97 pair[0] = tmp[0]; 98 pair[1] = tmp[1]; 99 } 100 return 0; 101 } 102 103 SYS_FUNC(msgrcv) 104 { 105 if (entering(tcp)) { 106 tprintf("%d, ", (int) tcp->u_arg[0]); 107 } else { 108 if (indirect_ipccall(tcp)) { 109 long pair[2]; 110 111 if (fetch_msgrcv_args(tcp, tcp->u_arg[3], pair)) 112 tprintf(", %lu, ", tcp->u_arg[1]); 113 else 114 tprint_msgrcv(tcp, pair[0], tcp->u_arg[1], pair[1]); 115 printflags(ipc_msg_flags, tcp->u_arg[2], "MSG_???"); 116 } else { 117 tprint_msgrcv(tcp, tcp->u_arg[1], 118 tcp->u_arg[2], tcp->u_arg[3]); 119 printflags(ipc_msg_flags, tcp->u_arg[4], "MSG_???"); 120 } 121 } 122 return 0; 123 } 124
