Branch data     Line data    Source code

       1                 :            : /*
       2                 :            :  * Copyright (c) 1993 Ulrich Pegelow <pegelow@moorea.uni-muenster.de>
       3                 :            :  * Copyright (c) 1993 Branko Lankester <branko@hacktic.nl>
       4                 :            :  * Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs@world.std.com>
       5                 :            :  * Copyright (c) 1996-1999 Wichert Akkerman <wichert@cistron.nl>
       6                 :            :  * Copyright (c) 2003-2006 Roland McGrath <roland@redhat.com>
       7                 :            :  * Copyright (c) 2006-2015 Dmitry V. Levin <ldv@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                 :            : 
      35                 :            : #ifdef HAVE_SYS_SHM_H
      36                 :            : # include <sys/shm.h>
      37                 :            : #elif defined HAVE_LINUX_SHM_H
      38                 :            : # include <linux/shm.h>
      39                 :            : #endif
      40                 :            : 
      41                 :            : #include "xlat/shm_resource_flags.h"
      42                 :            : #include "xlat/shm_flags.h"
      43                 :            : 
      44                 :         12 : SYS_FUNC(shmget)
      45                 :            : {
      46                 :         12 :         const int key = (int) tcp->u_arg[0];
      47         [ +  + ]:         12 :         if (key)
      48                 :          6 :                 tprintf("%#x", key);
      49                 :            :         else
      50                 :          6 :                 tprints("IPC_PRIVATE");
      51                 :         12 :         tprintf(", %" PRI_klu ", ", tcp->u_arg[1]);
      52         [ +  + ]:         12 :         if (printflags(shm_resource_flags, tcp->u_arg[2] & ~0777, NULL) != 0)
      53                 :          6 :                 tprints("|");
      54                 :         12 :         print_numeric_umode_t(tcp->u_arg[2] & 0777);
      55                 :         12 :         return RVAL_DECODED;
      56                 :            : }
      57                 :            : 
      58                 :         48 : SYS_FUNC(shmat)
      59                 :            : {
      60         [ +  + ]:         48 :         if (entering(tcp)) {
      61                 :         24 :                 tprintf("%d, ", (int) tcp->u_arg[0]);
      62         [ +  + ]:         24 :                 if (indirect_ipccall(tcp)) {
      63                 :          4 :                         printaddr(tcp->u_arg[3]);
      64                 :          4 :                         tprints(", ");
      65                 :          4 :                         printflags(shm_flags, tcp->u_arg[1], "SHM_???");
      66                 :            :                 } else {
      67                 :         20 :                         printaddr(tcp->u_arg[1]);
      68                 :         20 :                         tprints(", ");
      69                 :         20 :                         printflags(shm_flags, tcp->u_arg[2], "SHM_???");
      70                 :            :                 }
      71                 :         24 :                 return 0;
      72                 :            :         } else {
      73         [ +  + ]:         24 :                 if (syserror(tcp))
      74                 :         12 :                         return 0;
      75         [ +  + ]:         12 :                 if (indirect_ipccall(tcp)) {
      76                 :            :                         union {
      77                 :            :                                 uint64_t r64;
      78                 :            :                                 uint32_t r32;
      79                 :            :                         } u;
      80         [ -  + ]:          2 :                         if (umoven(tcp, tcp->u_arg[2], current_wordsize, &u) < 0)
      81                 :          0 :                                 return RVAL_NONE;
      82                 :          2 :                         tcp->u_rval = (sizeof(u.r32) == current_wordsize)
      83         [ +  - ]:          2 :                                       ? u.r32 : u.r64;
      84                 :            :                 }
      85                 :         12 :                 return RVAL_HEX;
      86                 :            :         }
      87                 :            : }
      88                 :            : 
      89                 :         12 : SYS_FUNC(shmdt)
      90                 :            : {
      91         [ +  + ]:         12 :         printaddr(tcp->u_arg[indirect_ipccall(tcp) ? 3 : 0]);
      92                 :         12 :         return RVAL_DECODED;
      93                 :            : }