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

   1 /*
   2  * Copyright (c) 2012 The Chromium OS Authors.
   3  * Copyright (c) 2012-2017 The strace developers.
   4  * Written by Mike Frysinger <vapier@gentoo.org>.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  * 3. The name of the author may not be used to endorse or promote products
  15  *    derived from this software without specific prior written permission.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27  */
  28
  29 #include "defs.h"
  30 #include <linux/ioctl.h>
  31 #include <linux/loop.h>
  32
  33 typedef struct loop_info struct_loop_info;
  34
  35 #include DEF_MPERS_TYPE(struct_loop_info)
  36
  37 #include MPERS_DEFS
  38
  39 #include "print_fields.h"
  40 #include "xlat/loop_cmds.h"
  41 #include "xlat/loop_flags_options.h"
  42 #include "xlat/loop_crypt_type_options.h"
  43
  44 static void
  45 decode_loop_info(struct tcb *const tcp, const kernel_ulong_t addr)
  46 {
  47         struct_loop_info info;
  48
  49         tprints(", ");
  50         if (umove_or_printaddr(tcp, addr, &info))
  51                 return;
  52
  53         tprintf("{lo_number=%d", info.lo_number);
  54
  55         if (!abbrev(tcp)) {
  56                 PRINT_FIELD_DEV(", ", info, lo_device);
  57                 tprintf(", lo_inode=%" PRI_klu, (kernel_ulong_t) info.lo_inode);
  58                 PRINT_FIELD_DEV(", ", info, lo_rdevice);
  59         }
  60
  61         tprintf(", lo_offset=%#x", info.lo_offset);
  62
  63         if (!abbrev(tcp) || info.lo_encrypt_type != LO_CRYPT_NONE) {
  64                 tprints(", lo_encrypt_type=");
  65                 printxval(loop_crypt_type_options, info.lo_encrypt_type,
  66                         "LO_CRYPT_???");
  67                 /*
  68                  * It is converted to unsigned before use in kernel, see
  69                  * loop_info64_from_old in drivers/block/loop.c
  70                  */
  71                 tprintf(", lo_encrypt_key_size=%" PRIu32,
  72                         (uint32_t) info.lo_encrypt_key_size);
  73         }
  74
  75         tprints(", lo_flags=");
  76         printflags(loop_flags_options, info.lo_flags, "LO_FLAGS_???");
  77
  78         tprints(", lo_name=");
  79         print_quoted_string(info.lo_name, LO_NAME_SIZE,
  80                             QUOTE_0_TERMINATED);
  81
  82         if (!abbrev(tcp) || info.lo_encrypt_type != LO_CRYPT_NONE) {
  83                 tprints(", lo_encrypt_key=");
  84                 print_quoted_string((void *) info.lo_encrypt_key,
  85                                     MIN((uint32_t) info.lo_encrypt_key_size,
  86                                     LO_KEY_SIZE), 0);
  87         }
  88
  89         if (!abbrev(tcp))
  90                 tprintf(", lo_init=[%#" PRI_klx ", %#" PRI_klx "]"
  91                         ", reserved=[%#hhx, %#hhx, %#hhx, %#hhx]}",
  92                         (kernel_ulong_t) info.lo_init[0],
  93                         (kernel_ulong_t) info.lo_init[1],
  94                         info.reserved[0], info.reserved[1],
  95                         info.reserved[2], info.reserved[3]);
  96         else
  97                 tprints(", ...}");
  98 }
  99
 100 static void
 101 decode_loop_info64(struct tcb *const tcp, const kernel_ulong_t addr)
 102 {
 103         struct loop_info64 info64;
 104
 105         tprints(", ");
 106         if (umove_or_printaddr(tcp, addr, &info64))
 107                 return;
 108
 109         if (!abbrev(tcp)) {
 110                 PRINT_FIELD_DEV("{", info64, lo_device);
 111                 tprintf(", lo_inode=%" PRIu64, (uint64_t) info64.lo_inode);
 112                 PRINT_FIELD_DEV(", ", info64, lo_rdevice);
 113                 tprintf(", lo_offset=%#" PRIx64 ", lo_sizelimit=%" PRIu64
 114                         ", lo_number=%" PRIu32,
 115                         (uint64_t) info64.lo_offset,
 116                         (uint64_t) info64.lo_sizelimit,
 117                         (uint32_t) info64.lo_number);
 118         } else {
 119                 tprintf("{lo_offset=%#" PRIx64 ", lo_number=%" PRIu32,
 120                         (uint64_t) info64.lo_offset,
 121                         (uint32_t) info64.lo_number);
 122         }
 123
 124         if (!abbrev(tcp) || info64.lo_encrypt_type != LO_CRYPT_NONE) {
 125                 tprints(", lo_encrypt_type=");
 126                 printxval(loop_crypt_type_options, info64.lo_encrypt_type,
 127                         "LO_CRYPT_???");
 128                 tprintf(", lo_encrypt_key_size=%" PRIu32,
 129                         info64.lo_encrypt_key_size);
 130         }
 131
 132         tprints(", lo_flags=");
 133         printflags(loop_flags_options, info64.lo_flags, "LO_FLAGS_???");
 134
 135         tprints(", lo_file_name=");
 136         print_quoted_string((void *) info64.lo_file_name,
 137                             LO_NAME_SIZE, QUOTE_0_TERMINATED);
 138
 139         if (!abbrev(tcp) || info64.lo_encrypt_type != LO_CRYPT_NONE) {
 140                 tprints(", lo_crypt_name=");
 141                 print_quoted_string((void *) info64.lo_crypt_name,
 142                                     LO_NAME_SIZE, QUOTE_0_TERMINATED);
 143                 tprints(", lo_encrypt_key=");
 144                 print_quoted_string((void *) info64.lo_encrypt_key,
 145                                     MIN(info64.lo_encrypt_key_size,
 146                                     LO_KEY_SIZE), 0);
 147         }
 148
 149         if (!abbrev(tcp))
 150                 tprintf(", lo_init=[%#" PRIx64 ", %#" PRIx64 "]}",
 151                         (uint64_t) info64.lo_init[0],
 152                         (uint64_t) info64.lo_init[1]);
 153         else
 154                 tprints(", ...}");
 155 }
 156
 157 MPERS_PRINTER_DECL(int, loop_ioctl,
 158                    struct tcb *tcp, const unsigned int code,
 159                    const kernel_ulong_t arg)
 160 {
 161         switch (code) {
 162         case LOOP_GET_STATUS:
 163                 if (entering(tcp))
 164                         return 0;
 165                 /* fall through */
 166         case LOOP_SET_STATUS:
 167                 decode_loop_info(tcp, arg);
 168                 break;
 169
 170         case LOOP_GET_STATUS64:
 171                 if (entering(tcp))
 172                         return 0;
 173                 /* fall through */
 174         case LOOP_SET_STATUS64:
 175                 decode_loop_info64(tcp, arg);
 176                 break;
 177
 178         case LOOP_CLR_FD:
 179         case LOOP_SET_CAPACITY:
 180         /* newer loop-control stuff */
 181         case LOOP_CTL_GET_FREE:
 182                 /* Takes no arguments */
 183                 break;
 184
 185         case LOOP_SET_FD:
 186         case LOOP_CHANGE_FD:
 187                 tprints(", ");
 188                 printfd(tcp, arg);
 189                 break;
 190
 191         /* newer loop-control stuff */
 192         case LOOP_CTL_ADD:
 193         case LOOP_CTL_REMOVE:
 194                 tprintf(", %d", (int) arg);
 195                 break;
 196
 197         case LOOP_SET_DIRECT_IO:
 198                 tprintf(", %" PRI_klu, arg);
 199                 break;
 200
 201         default:
 202                 return RVAL_DECODED;
 203         }
 204
 205         return RVAL_DECODED | 1;
 206 }