granicus.if.org Git - strace/blob - xattr.c

   1 /*
   2  * Copyright (c) 2002-2005 Roland McGrath <roland@redhat.com>
   3  * Copyright (c) 2004 Ulrich Drepper <drepper@redhat.com>
   4  * Copyright (c) 2005-2016 Dmitry V. Levin <ldv@altlinux.org>
   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. The name of the author may not be used to endorse or promote products
  16  *    derived from this software without specific prior written permission.
  17  *
  18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  23  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  24  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  25  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  26  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  27  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  28  */
  29
  30 #include "defs.h"
  31
  32 #ifdef HAVE_SYS_XATTR_H
  33 # include <sys/xattr.h>
  34 #endif
  35
  36 #include "xlat/xattrflags.h"
  37
  38 #ifndef XATTR_SIZE_MAX
  39 # define XATTR_SIZE_MAX 65536
  40 #endif
  41
  42 static void
  43 print_xattr_val(struct tcb *tcp,
  44                 unsigned long addr,
  45                 unsigned long insize,
  46                 unsigned long size)
  47 {
  48         static char buf[XATTR_SIZE_MAX];
  49
  50         tprints(", ");
  51
  52         if (!addr || size > sizeof(buf))
  53                 printaddr(addr);
  54         else if (!size || !umoven_or_printaddr(tcp, addr, size, buf)) {
  55                 /* Don't print terminating NUL if there is one. */
  56                 if (size && buf[size - 1] == '\0')
  57                         --size;
  58
  59                 print_quoted_string(buf, size, 0);
  60         }
  61         tprintf(", %lu", insize);
  62 }
  63
  64 SYS_FUNC(setxattr)
  65 {
  66         printpath(tcp, tcp->u_arg[0]);
  67         tprints(", ");
  68         printstr(tcp, tcp->u_arg[1], -1);
  69         print_xattr_val(tcp, tcp->u_arg[2], tcp->u_arg[3], tcp->u_arg[3]);
  70         tprints(", ");
  71         printflags(xattrflags, tcp->u_arg[4], "XATTR_???");
  72         return RVAL_DECODED;
  73 }
  74
  75 SYS_FUNC(fsetxattr)
  76 {
  77         printfd(tcp, tcp->u_arg[0]);
  78         tprints(", ");
  79         printstr(tcp, tcp->u_arg[1], -1);
  80         print_xattr_val(tcp, tcp->u_arg[2], tcp->u_arg[3], tcp->u_arg[3]);
  81         tprints(", ");
  82         printflags(xattrflags, tcp->u_arg[4], "XATTR_???");
  83         return RVAL_DECODED;
  84 }
  85
  86 SYS_FUNC(getxattr)
  87 {
  88         if (entering(tcp)) {
  89                 printpath(tcp, tcp->u_arg[0]);
  90                 tprints(", ");
  91                 printstr(tcp, tcp->u_arg[1], -1);
  92         } else {
  93                 print_xattr_val(tcp, tcp->u_arg[2], tcp->u_arg[3], tcp->u_rval);
  94         }
  95         return 0;
  96 }
  97
  98 SYS_FUNC(fgetxattr)
  99 {
 100         if (entering(tcp)) {
 101                 printfd(tcp, tcp->u_arg[0]);
 102                 tprints(", ");
 103                 printstr(tcp, tcp->u_arg[1], -1);
 104         } else {
 105                 print_xattr_val(tcp, tcp->u_arg[2], tcp->u_arg[3], tcp->u_rval);
 106         }
 107         return 0;
 108 }
 109
 110 static void
 111 print_xattr_list(struct tcb *tcp, unsigned long addr, unsigned long size)
 112 {
 113         if (!size || syserror(tcp)) {
 114                 printaddr(addr);
 115         } else {
 116                 printstr(tcp, addr, tcp->u_rval);
 117         }
 118         tprintf(", %lu", size);
 119 }
 120
 121 SYS_FUNC(listxattr)
 122 {
 123         if (entering(tcp)) {
 124                 printpath(tcp, tcp->u_arg[0]);
 125                 tprints(", ");
 126         } else {
 127                 print_xattr_list(tcp, tcp->u_arg[1], tcp->u_arg[2]);
 128         }
 129         return 0;
 130 }
 131
 132 SYS_FUNC(flistxattr)
 133 {
 134         if (entering(tcp)) {
 135                 printfd(tcp, tcp->u_arg[0]);
 136                 tprints(", ");
 137         } else {
 138                 print_xattr_list(tcp, tcp->u_arg[1], tcp->u_arg[2]);
 139         }
 140         return 0;
 141 }
 142
 143 SYS_FUNC(removexattr)
 144 {
 145         printpath(tcp, tcp->u_arg[0]);
 146         tprints(", ");
 147         printstr(tcp, tcp->u_arg[1], -1);
 148         return RVAL_DECODED;
 149 }
 150
 151 SYS_FUNC(fremovexattr)
 152 {
 153         printfd(tcp, tcp->u_arg[0]);
 154         tprints(", ");
 155         printstr(tcp, tcp->u_arg[1], -1);
 156         return RVAL_DECODED;
 157 }