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

   1 /*
   2  * Copyright (c) 1991, 1992 Paul Kranenburg <pk@cs.few.eur.nl>
   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) 2005-2016 Dmitry V. Levin <ldv@altlinux.org>
   7  * All rights reserved.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted provided that the following conditions
  11  * are met:
  12  * 1. Redistributions of source code must retain the above copyright
  13  *    notice, this list of conditions and the following disclaimer.
  14  * 2. Redistributions in binary form must reproduce the above copyright
  15  *    notice, this list of conditions and the following disclaimer in the
  16  *    documentation and/or other materials provided with the distribution.
  17  * 3. The name of the author may not be used to endorse or promote products
  18  *    derived from this software without specific prior written permission.
  19  *
  20  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  21  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  22  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  23  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  24  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  25  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  26  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  27  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  28  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  29  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  30  */
  31
  32 #include "defs.h"
  33
  34 #define SUBCMDMASK  0x00ff
  35 #define SUBCMDSHIFT 8
  36 #define QCMD_CMD(cmd)   ((uint32_t)(cmd) >> SUBCMDSHIFT)
  37 #define QCMD_TYPE(cmd)  ((uint32_t)(cmd) & SUBCMDMASK)
  38
  39 #define OLD_CMD(cmd)    ((uint32_t)(cmd) << SUBCMDSHIFT)
  40 #define NEW_CMD(cmd)    ((uint32_t)(cmd) | 0x800000)
  41 #define XQM_CMD(cmd)    ((uint32_t)(cmd) | ('X' << SUBCMDSHIFT))
  42
  43 #include "xlat/quotacmds.h"
  44 #include "xlat/quotatypes.h"
  45 #include "xlat/quota_formats.h"
  46 #include "xlat/xfs_quota_flags.h"
  47 #include "xlat/xfs_dqblk_flags.h"
  48 #include "xlat/if_dqblk_valid.h"
  49 #include "xlat/if_dqinfo_flags.h"
  50 #include "xlat/if_dqinfo_valid.h"
  51
  52 struct if_dqblk
  53 {
  54         uint64_t dqb_bhardlimit;
  55         uint64_t dqb_bsoftlimit;
  56         uint64_t dqb_curspace;
  57         uint64_t dqb_ihardlimit;
  58         uint64_t dqb_isoftlimit;
  59         uint64_t dqb_curinodes;
  60         uint64_t dqb_btime;
  61         uint64_t dqb_itime;
  62         uint32_t dqb_valid;
  63 };
  64
  65 struct v1_dqblk
  66 {
  67         uint32_t dqb_bhardlimit;        /* absolute limit on disk blks alloc */
  68         uint32_t dqb_bsoftlimit;        /* preferred limit on disk blks */
  69         uint32_t dqb_curblocks;         /* current block count */
  70         uint32_t dqb_ihardlimit;        /* maximum # allocated inodes */
  71         uint32_t dqb_isoftlimit;        /* preferred inode limit */
  72         uint32_t dqb_curinodes;         /* current # allocated inodes */
  73         time_t  dqb_btime;              /* time limit for excessive disk use */
  74         time_t  dqb_itime;              /* time limit for excessive files */
  75 };
  76
  77 struct v2_dqblk
  78 {
  79         unsigned int dqb_ihardlimit;
  80         unsigned int dqb_isoftlimit;
  81         unsigned int dqb_curinodes;
  82         unsigned int dqb_bhardlimit;
  83         unsigned int dqb_bsoftlimit;
  84         uint64_t dqb_curspace;
  85         time_t  dqb_btime;
  86         time_t  dqb_itime;
  87 };
  88
  89 struct xfs_dqblk
  90 {
  91         int8_t  d_version;              /* version of this structure */
  92         int8_t  d_flags;                /* XFS_{USER,PROJ,GROUP}_QUOTA */
  93         uint16_t d_fieldmask;           /* field specifier */
  94         uint32_t d_id;                  /* user, project, or group ID */
  95         uint64_t d_blk_hardlimit;       /* absolute limit on disk blks */
  96         uint64_t d_blk_softlimit;       /* preferred limit on disk blks */
  97         uint64_t d_ino_hardlimit;       /* maximum # allocated inodes */
  98         uint64_t d_ino_softlimit;       /* preferred inode limit */
  99         uint64_t d_bcount;              /* # disk blocks owned by the user */
 100         uint64_t d_icount;              /* # inodes owned by the user */
 101         int32_t d_itimer;               /* zero if within inode limits */
 102         int32_t d_btimer;               /* similar to above; for disk blocks */
 103         uint16_t d_iwarns;              /* # warnings issued wrt num inodes */
 104         uint16_t d_bwarns;              /* # warnings issued wrt disk blocks */
 105         int32_t d_padding2;             /* padding2 - for future use */
 106         uint64_t d_rtb_hardlimit;       /* absolute limit on realtime blks */
 107         uint64_t d_rtb_softlimit;       /* preferred limit on RT disk blks */
 108         uint64_t d_rtbcount;            /* # realtime blocks owned */
 109         int32_t d_rtbtimer;             /* similar to above; for RT disk blks */
 110         uint16_t d_rtbwarns;            /* # warnings issued wrt RT disk blks */
 111         int16_t d_padding3;             /* padding3 - for future use */
 112         char    d_padding4[8];          /* yet more padding */
 113 };
 114
 115 struct if_dqinfo
 116 {
 117         uint64_t dqi_bgrace;
 118         uint64_t dqi_igrace;
 119         uint32_t dqi_flags;
 120         uint32_t dqi_valid;
 121 };
 122
 123 struct v2_dqinfo
 124 {
 125         unsigned int dqi_bgrace;
 126         unsigned int dqi_igrace;
 127         unsigned int dqi_flags;
 128         unsigned int dqi_blocks;
 129         unsigned int dqi_free_blk;
 130         unsigned int dqi_free_entry;
 131 };
 132
 133 struct v1_dqstats
 134 {
 135         uint32_t lookups;
 136         uint32_t drops;
 137         uint32_t reads;
 138         uint32_t writes;
 139         uint32_t cache_hits;
 140         uint32_t allocated_dquots;
 141         uint32_t free_dquots;
 142         uint32_t syncs;
 143 };
 144
 145 struct v2_dqstats
 146 {
 147         uint32_t lookups;
 148         uint32_t drops;
 149         uint32_t reads;
 150         uint32_t writes;
 151         uint32_t cache_hits;
 152         uint32_t allocated_dquots;
 153         uint32_t free_dquots;
 154         uint32_t syncs;
 155         uint32_t version;
 156 };
 157
 158 typedef struct fs_qfilestat
 159 {
 160         uint64_t qfs_ino;       /* inode number */
 161         uint64_t qfs_nblks;     /* number of BBs 512-byte-blks */
 162         uint32_t qfs_nextents;  /* number of extents */
 163 } fs_qfilestat_t;
 164
 165 struct xfs_dqstats
 166 {
 167         int8_t  qs_version;             /* version number for future changes */
 168         uint16_t qs_flags;              /* XFS_QUOTA_{U,P,G}DQ_{ACCT,ENFD} */
 169         int8_t  qs_pad;                 /* unused */
 170         fs_qfilestat_t qs_uquota;       /* user quota storage information */
 171         fs_qfilestat_t qs_gquota;       /* group quota storage information */
 172         uint32_t qs_incoredqs;          /* number of dquots incore */
 173         int32_t qs_btimelimit;          /* limit for blks timer */
 174         int32_t qs_itimelimit;          /* limit for inodes timer */
 175         int32_t qs_rtbtimelimit;        /* limit for rt blks timer */
 176         uint16_t qs_bwarnlimit;         /* limit for num warnings */
 177         uint16_t qs_iwarnlimit;         /* limit for num warnings */
 178 };
 179
 180 static int
 181 decode_cmd_data(struct tcb *tcp, uint32_t cmd, unsigned long data)
 182 {
 183         switch (cmd) {
 184                 case Q_GETQUOTA:
 185                         if (entering(tcp))
 186                                 return 0;
 187                 case Q_SETQUOTA:
 188                 {
 189                         struct if_dqblk dq;
 190
 191                         if (umove_or_printaddr(tcp, data, &dq))
 192                                 break;
 193                         tprintf("{bhardlimit=%" PRIu64 ", ", dq.dqb_bhardlimit);
 194                         tprintf("bsoftlimit=%" PRIu64 ", ", dq.dqb_bsoftlimit);
 195                         tprintf("curspace=%" PRIu64 ", ", dq.dqb_curspace);
 196                         tprintf("ihardlimit=%" PRIu64 ", ", dq.dqb_ihardlimit);
 197                         tprintf("isoftlimit=%" PRIu64 ", ", dq.dqb_isoftlimit);
 198                         tprintf("curinodes=%" PRIu64 ", ", dq.dqb_curinodes);
 199                         if (!abbrev(tcp)) {
 200                                 tprintf("btime=%" PRIu64 ", ", dq.dqb_btime);
 201                                 tprintf("itime=%" PRIu64 ", ", dq.dqb_itime);
 202                                 tprints("valid=");
 203                                 printflags(if_dqblk_valid,
 204                                            dq.dqb_valid, "QIF_???");
 205                                 tprints("}");
 206                         } else
 207                                 tprints("...}");
 208                         break;
 209                 }
 210                 case Q_V1_GETQUOTA:
 211                         if (entering(tcp))
 212                                 return 0;
 213                 case Q_V1_SETQUOTA:
 214                 {
 215                         struct v1_dqblk dq;
 216
 217                         if (umove_or_printaddr(tcp, data, &dq))
 218                                 break;
 219                         tprintf("{bhardlimit=%u, ", dq.dqb_bhardlimit);
 220                         tprintf("bsoftlimit=%u, ", dq.dqb_bsoftlimit);
 221                         tprintf("curblocks=%u, ", dq.dqb_curblocks);
 222                         tprintf("ihardlimit=%u, ", dq.dqb_ihardlimit);
 223                         tprintf("isoftlimit=%u, ", dq.dqb_isoftlimit);
 224                         tprintf("curinodes=%u, ", dq.dqb_curinodes);
 225                         tprintf("btime=%lu, ", (long) dq.dqb_btime);
 226                         tprintf("itime=%lu}", (long) dq.dqb_itime);
 227                         break;
 228                 }
 229                 case Q_V2_GETQUOTA:
 230                         if (entering(tcp))
 231                                 return 0;
 232                 case Q_V2_SETQUOTA:
 233                 {
 234                         struct v2_dqblk dq;
 235
 236                         if (umove_or_printaddr(tcp, data, &dq))
 237                                 break;
 238                         tprintf("{ihardlimit=%u, ", dq.dqb_ihardlimit);
 239                         tprintf("isoftlimit=%u, ", dq.dqb_isoftlimit);
 240                         tprintf("curinodes=%u, ", dq.dqb_curinodes);
 241                         tprintf("bhardlimit=%u, ", dq.dqb_bhardlimit);
 242                         tprintf("bsoftlimit=%u, ", dq.dqb_bsoftlimit);
 243                         tprintf("curspace=%" PRIu64 ", ", dq.dqb_curspace);
 244                         tprintf("btime=%lu, ", (long) dq.dqb_btime);
 245                         tprintf("itime=%lu}", (long) dq.dqb_itime);
 246                         break;
 247                 }
 248                 case Q_XGETQUOTA:
 249                         if (entering(tcp))
 250                                 return 0;
 251                 case Q_XSETQLIM:
 252                 {
 253                         struct xfs_dqblk dq;
 254
 255                         if (umove_or_printaddr(tcp, data, &dq))
 256                                 break;
 257                         tprintf("{version=%d, ", dq.d_version);
 258                         tprints("flags=");
 259                         printflags(xfs_dqblk_flags,
 260                                    dq.d_flags, "XFS_???_QUOTA");
 261                         tprintf(", fieldmask=%#x, ", dq.d_fieldmask);
 262                         tprintf("id=%u, ", dq.d_id);
 263                         tprintf("blk_hardlimit=%" PRIu64 ", ", dq.d_blk_hardlimit);
 264                         tprintf("blk_softlimit=%" PRIu64 ", ", dq.d_blk_softlimit);
 265                         tprintf("ino_hardlimit=%" PRIu64 ", ", dq.d_ino_hardlimit);
 266                         tprintf("ino_softlimit=%" PRIu64 ", ", dq.d_ino_softlimit);
 267                         tprintf("bcount=%" PRIu64 ", ", dq.d_bcount);
 268                         tprintf("icount=%" PRIu64 ", ", dq.d_icount);
 269                         if (!abbrev(tcp)) {
 270                                 tprintf("itimer=%d, ", dq.d_itimer);
 271                                 tprintf("btimer=%d, ", dq.d_btimer);
 272                                 tprintf("iwarns=%u, ", dq.d_iwarns);
 273                                 tprintf("bwarns=%u, ", dq.d_bwarns);
 274                                 tprintf("rtbcount=%" PRIu64 ", ", dq.d_rtbcount);
 275                                 tprintf("rtbtimer=%d, ", dq.d_rtbtimer);
 276                                 tprintf("rtbwarns=%u}", dq.d_rtbwarns);
 277                         } else
 278                                 tprints("...}");
 279                         break;
 280                 }
 281                 case Q_GETFMT:
 282                 {
 283                         uint32_t fmt;
 284
 285                         if (entering(tcp))
 286                                 return 0;
 287                         if (umove_or_printaddr(tcp, data, &fmt))
 288                                 break;
 289                         tprints("[");
 290                         printxval(quota_formats, fmt, "QFMT_VFS_???");
 291                         tprints("]");
 292                         break;
 293                 }
 294                 case Q_GETINFO:
 295                         if (entering(tcp))
 296                                 return 0;
 297                 case Q_SETINFO:
 298                 {
 299                         struct if_dqinfo dq;
 300
 301                         if (umove_or_printaddr(tcp, data, &dq))
 302                                 break;
 303                         tprintf("{bgrace=%" PRIu64 ", ", dq.dqi_bgrace);
 304                         tprintf("igrace=%" PRIu64 ", ", dq.dqi_igrace);
 305                         tprints("flags=");
 306                         printflags(if_dqinfo_flags, dq.dqi_flags, "DQF_???");
 307                         tprints(", valid=");
 308                         printflags(if_dqinfo_valid, dq.dqi_valid, "IIF_???");
 309                         tprints("}");
 310                         break;
 311                 }
 312                 case Q_V2_GETINFO:
 313                         if (entering(tcp))
 314                                 return 0;
 315                 case Q_V2_SETINFO:
 316                 {
 317                         struct v2_dqinfo dq;
 318
 319                         if (umove_or_printaddr(tcp, data, &dq))
 320                                 break;
 321                         tprintf("{bgrace=%u, ", dq.dqi_bgrace);
 322                         tprintf("igrace=%u, ", dq.dqi_igrace);
 323                         tprints("flags=");
 324                         printflags(if_dqinfo_flags, dq.dqi_flags, "DQF_???");
 325                         tprintf(", blocks=%u, ", dq.dqi_blocks);
 326                         tprintf("free_blk=%u, ", dq.dqi_free_blk);
 327                         tprintf("free_entry=%u}", dq.dqi_free_entry);
 328                         break;
 329                 }
 330                 case Q_V1_GETSTATS:
 331                 {
 332                         struct v1_dqstats dq;
 333
 334                         if (entering(tcp))
 335                                 return 0;
 336                         if (umove_or_printaddr(tcp, data, &dq))
 337                                 break;
 338                         tprintf("{lookups=%u, ", dq.lookups);
 339                         tprintf("drops=%u, ", dq.drops);
 340                         tprintf("reads=%u, ", dq.reads);
 341                         tprintf("writes=%u, ", dq.writes);
 342                         tprintf("cache_hits=%u, ", dq.cache_hits);
 343                         tprintf("allocated_dquots=%u, ", dq.allocated_dquots);
 344                         tprintf("free_dquots=%u, ", dq.free_dquots);
 345                         tprintf("syncs=%u}", dq.syncs);
 346                         break;
 347                 }
 348                 case Q_V2_GETSTATS:
 349                 {
 350                         struct v2_dqstats dq;
 351
 352                         if (entering(tcp))
 353                                 return 0;
 354                         if (umove_or_printaddr(tcp, data, &dq))
 355                                 break;
 356                         tprintf("{lookups=%u, ", dq.lookups);
 357                         tprintf("drops=%u, ", dq.drops);
 358                         tprintf("reads=%u, ", dq.reads);
 359                         tprintf("writes=%u, ", dq.writes);
 360                         tprintf("cache_hits=%u, ", dq.cache_hits);
 361                         tprintf("allocated_dquots=%u, ", dq.allocated_dquots);
 362                         tprintf("free_dquots=%u, ", dq.free_dquots);
 363                         tprintf("syncs=%u, ", dq.syncs);
 364                         tprintf("version=%u}", dq.version);
 365                         break;
 366                 }
 367                 case Q_XGETQSTAT:
 368                 {
 369                         struct xfs_dqstats dq;
 370
 371                         if (entering(tcp))
 372                                 return 0;
 373                         if (umove_or_printaddr(tcp, data, &dq))
 374                                 break;
 375                         tprintf("{version=%d, ", dq.qs_version);
 376                         if (abbrev(tcp)) {
 377                                 tprints("...}");
 378                                 break;
 379                         }
 380                         tprints("flags=");
 381                         printflags(xfs_quota_flags,
 382                                    dq.qs_flags, "XFS_QUOTA_???");
 383                         tprintf(", incoredqs=%u, ", dq.qs_incoredqs);
 384                         tprintf("u_ino=%" PRIu64 ", ", dq.qs_uquota.qfs_ino);
 385                         tprintf("u_nblks=%" PRIu64 ", ", dq.qs_uquota.qfs_nblks);
 386                         tprintf("u_nextents=%u, ", dq.qs_uquota.qfs_nextents);
 387                         tprintf("g_ino=%" PRIu64 ", ", dq.qs_gquota.qfs_ino);
 388                         tprintf("g_nblks=%" PRIu64 ", ", dq.qs_gquota.qfs_nblks);
 389                         tprintf("g_nextents=%u, ", dq.qs_gquota.qfs_nextents);
 390                         tprintf("btimelimit=%d, ", dq.qs_btimelimit);
 391                         tprintf("itimelimit=%d, ", dq.qs_itimelimit);
 392                         tprintf("rtbtimelimit=%d, ", dq.qs_rtbtimelimit);
 393                         tprintf("bwarnlimit=%u, ", dq.qs_bwarnlimit);
 394                         tprintf("iwarnlimit=%u}", dq.qs_iwarnlimit);
 395                         break;
 396                 }
 397                 case Q_XQUOTAON:
 398                 case Q_XQUOTAOFF:
 399                 {
 400                         uint32_t flag;
 401
 402                         if (umove_or_printaddr(tcp, data, &flag))
 403                                 break;
 404                         tprints("[");
 405                         printflags(xfs_quota_flags, flag, "XFS_QUOTA_???");
 406                         tprints("]");
 407                         break;
 408                 }
 409                 default:
 410                         printaddr(data);
 411                         break;
 412         }
 413         return RVAL_DECODED;
 414 }
 415
 416 SYS_FUNC(quotactl)
 417 {
 418         /*
 419          * The Linux kernel only looks at the low 32 bits of command and id
 420          * arguments, but on some 64-bit architectures (s390x) this word
 421          * will have been sign-extended when we see it.  The high 1 bits
 422          * don't mean anything, so don't confuse the output with them.
 423          */
 424         uint32_t qcmd = tcp->u_arg[0];
 425         uint32_t cmd = QCMD_CMD(qcmd);
 426         uint32_t type = QCMD_TYPE(qcmd);
 427         uint32_t id = tcp->u_arg[2];
 428
 429         if (entering(tcp)) {
 430                 printxval(quotacmds, cmd, "Q_???");
 431                 tprints("|");
 432                 printxval(quotatypes, type, "???QUOTA");
 433                 tprints(", ");
 434                 printpath(tcp, tcp->u_arg[1]);
 435                 tprints(", ");
 436                 switch (cmd) {
 437                         case Q_QUOTAON:
 438                         case Q_V1_QUOTAON:
 439                                 printxval(quota_formats, id, "QFMT_VFS_???");
 440                                 tprints(", ");
 441                                 printpath(tcp, tcp->u_arg[3]);
 442                                 return RVAL_DECODED;
 443                 }
 444                 tprintf("%u, ", id);
 445         }
 446         return decode_cmd_data(tcp, cmd, tcp->u_arg[3]);
 447 }