1 /* 2 * Copyright (c) 1980, 1990, 1993 3 * The Regents of the University of California. All rights reserved. 4 * 5 * This code is derived from software contributed to Berkeley by 6 * Robert Elz at The University of Melbourne. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 1. Redistributions of source code must retain the above copyright 12 * notice, this list of conditions and the following disclaimer. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 3. All advertising materials mentioning features or use of this software 17 * must display the following acknowledgement: 18 * This product includes software developed by the University of 19 * California, Berkeley and its contributors. 20 * 4. Neither the name of the University nor the names of its contributors 21 * may be used to endorse or promote products derived from this software 22 * without specific prior written permission. 23 * 24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 34 * SUCH DAMAGE. 35 */ 36 37 #ifndef lint 38 static const char copyright[] = 39 "@(#) Copyright (c) 1980, 1990, 1993\n\ 40 The Regents of the University of California. All rights reserved.\n"; 41 #endif /* not lint */ 42 43 #ifndef lint 44 #if 0 45 static char sccsid[] = "from: @(#)quota.c 8.1 (Berkeley) 6/6/93"; 46 #endif 47 static const char rcsid[] = 48 "$FreeBSD$"; 49 #endif /* not lint */ 50 51 /* 52 * Disk quota reporting program. 53 */ 54 #include <sys/param.h> 55 #include <sys/types.h> 56 #include <sys/file.h> 57 #include <sys/stat.h> 58 #include <sys/mount.h> 59 #include <sys/socket.h> 60 #include <ufs/ufs/quota.h> 61 #include <ctype.h> 62 #include <err.h> 63 #include <fstab.h> 64 #include <grp.h> 65 #include <pwd.h> 66 #include <stdio.h> 67 #include <stdlib.h> 68 #include <string.h> 69 #include <unistd.h> 70 71 #include <netdb.h> 72 #include <rpc/rpc.h> 73 #include <rpc/pmap_prot.h> 74 #include <rpcsvc/rquota.h> 75 76 char *qfname = QUOTAFILENAME; 77 char *qfextension[] = INITQFNAMES; 78 79 struct quotause { 80 struct quotause *next; 81 long flags; 82 struct dqblk dqblk; 83 char fsname[MAXPATHLEN + 1]; 84 }; 85 #define FOUND 0x01 86 87 static char *timeprt __P((time_t seconds)); 88 static struct quotause *getprivs __P((long id, int quotatype)); 89 static void usage (); 90 static void showuid(u_long uid); 91 static void showgid(u_long gid); 92 static int alldigits(char *s); 93 static void showusrname(char *name); 94 static void showgrpname(char *name); 95 static void showquotas(int type, u_long id, char *name); 96 static void heading(int type, u_long id, char *name, char *tag); 97 static char *timeprt(time_t seconds); 98 static struct quotause *getprivs(long id, int quotatype); 99 static int ufshasquota(struct fstab *fs, int type, char **qfnamep); 100 static int getufsquota(struct statfs *fst, struct fstab *fs, 101 struct quotause *qup, long id, int quotatype); 102 static int getnfsquota(struct statfs *fst, struct fstab *fs, 103 struct quotause *qup, long id, int quotatype); 104 static int callaurpc(char *host, int prognum, int versnum, int procnum, 105 xdrproc_t inproc, char *in, xdrproc_t outproc, char *out); 106 static int alldigits(char *s); 107 108 int qflag; 109 int vflag; 110 111 int 112 main(argc, argv) 113 int argc; 114 char *argv[]; 115 { 116 int ngroups; 117 gid_t mygid, gidset[NGROUPS]; 118 int i, gflag = 0, uflag = 0; 119 char ch; 120 121 while ((ch = getopt(argc, argv, "ugvq")) != -1) { 122 switch(ch) { 123 case 'g': 124 gflag++; 125 break; 126 case 'u': 127 uflag++; 128 break; 129 case 'v': 130 vflag++; 131 break; 132 case 'q': 133 qflag++; 134 break; 135 default: 136 usage(); 137 } 138 } 139 argc -= optind; 140 argv += optind; 141 if (!uflag && !gflag) 142 uflag++; 143 if (argc == 0) { 144 if (uflag) 145 showuid(getuid()); 146 if (gflag) { 147 mygid = getgid(); 148 ngroups = getgroups(NGROUPS, gidset); 149 if (ngroups < 0) 150 err(1, "getgroups"); 151 showgid(mygid); 152 for (i = 0; i < ngroups; i++) 153 if (gidset[i] != mygid) 154 showgid(gidset[i]); 155 } 156 return(0); 157 } 158 if (uflag && gflag) 159 usage(); 160 if (uflag) { 161 for (; argc > 0; argc--, argv++) { 162 if (alldigits(*argv)) 163 showuid(atoi(*argv)); 164 else 165 showusrname(*argv); 166 } 167 return(0); 168 } 169 if (gflag) { 170 for (; argc > 0; argc--, argv++) { 171 if (alldigits(*argv)) 172 showgid(atoi(*argv)); 173 else 174 showgrpname(*argv); 175 } 176 } 177 return(0); 178 } 179 180 static void 181 usage() 182 { 183 184 fprintf(stderr, "%s\n%s\n%s\n", 185 "usage: quota [-guqv]", 186 " quota [-qv] -u username ...", 187 " quota [-qv] -g groupname ..."); 188 exit(1); 189 } 190 191 /* 192 * Print out quotas for a specified user identifier. 193 */ 194 static void 195 showuid(uid) 196 u_long uid; 197 { 198 struct passwd *pwd = getpwuid(uid); 199 u_long myuid; 200 char *name; 201 202 if (pwd == NULL) 203 name = "(no account)"; 204 else 205 name = pwd->pw_name; 206 myuid = getuid(); 207 if (uid != myuid && myuid != 0) { 208 printf("quota: %s (uid %lu): permission denied\n", name, uid); 209 return; 210 } 211 showquotas(USRQUOTA, uid, name); 212 } 213 214 /* 215 * Print out quotas for a specifed user name. 216 */ 217 static void 218 showusrname(name) 219 char *name; 220 { 221 struct passwd *pwd = getpwnam(name); 222 u_long myuid; 223 224 if (pwd == NULL) { 225 warnx("%s: unknown user", name); 226 return; 227 } 228 myuid = getuid(); 229 if (pwd->pw_uid != myuid && myuid != 0) { 230 warnx("%s (uid %u): permission denied", name, pwd->pw_uid); 231 return; 232 } 233 showquotas(USRQUOTA, pwd->pw_uid, name); 234 } 235 236 /* 237 * Print out quotas for a specified group identifier. 238 */ 239 static void 240 showgid(gid) 241 u_long gid; 242 { 243 struct group *grp = getgrgid(gid); 244 int ngroups; 245 gid_t mygid, gidset[NGROUPS]; 246 register int i; 247 char *name; 248 249 if (grp == NULL) 250 name = "(no entry)"; 251 else 252 name = grp->gr_name; 253 mygid = getgid(); 254 ngroups = getgroups(NGROUPS, gidset); 255 if (ngroups < 0) { 256 warn("getgroups"); 257 return; 258 } 259 if (gid != mygid) { 260 for (i = 0; i < ngroups; i++) 261 if (gid == gidset[i]) 262 break; 263 if (i >= ngroups && getuid() != 0) { 264 warnx("%s (gid %lu): permission denied", name, gid); 265 return; 266 } 267 } 268 showquotas(GRPQUOTA, gid, name); 269 } 270 271 /* 272 * Print out quotas for a specifed group name. 273 */ 274 static void 275 showgrpname(name) 276 char *name; 277 { 278 struct group *grp = getgrnam(name); 279 int ngroups; 280 gid_t mygid, gidset[NGROUPS]; 281 register int i; 282 283 if (grp == NULL) { 284 warnx("%s: unknown group", name); 285 return; 286 } 287 mygid = getgid(); 288 ngroups = getgroups(NGROUPS, gidset); 289 if (ngroups < 0) { 290 warn("getgroups"); 291 return; 292 } 293 if (grp->gr_gid != mygid) { 294 for (i = 0; i < ngroups; i++) 295 if (grp->gr_gid == gidset[i]) 296 break; 297 if (i >= ngroups && getuid() != 0) { 298 warnx("%s (gid %u): permission denied", name, 299 grp->gr_gid); 300 return; 301 } 302 } 303 showquotas(GRPQUOTA, grp->gr_gid, name); 304 } 305 306 static void 307 showquotas(type, id, name) 308 int type; 309 u_long id; 310 char *name; 311 { 312 register struct quotause *qup; 313 struct quotause *quplist; 314 char *msgi, *msgb, *nam; 315 int lines = 0; 316 static time_t now; 317 318 if (now == 0) 319 time(&now); 320 quplist = getprivs(id, type); 321 for (qup = quplist; qup; qup = qup->next) { 322 if (!vflag && 323 qup->dqblk.dqb_isoftlimit == 0 && 324 qup->dqblk.dqb_ihardlimit == 0 && 325 qup->dqblk.dqb_bsoftlimit == 0 && 326 qup->dqblk.dqb_bhardlimit == 0) 327 continue; 328 msgi = (char *)0; 329 if (qup->dqblk.dqb_ihardlimit && 330 qup->dqblk.dqb_curinodes >= qup->dqblk.dqb_ihardlimit) 331 msgi = "File limit reached on"; 332 else if (qup->dqblk.dqb_isoftlimit && 333 qup->dqblk.dqb_curinodes >= qup->dqblk.dqb_isoftlimit) 334 if (qup->dqblk.dqb_itime > now) 335 msgi = "In file grace period on"; 336 else 337 msgi = "Over file quota on"; 338 msgb = (char *)0; 339 if (qup->dqblk.dqb_bhardlimit && 340 qup->dqblk.dqb_curblocks >= qup->dqblk.dqb_bhardlimit) 341 msgb = "Block limit reached on"; 342 else if (qup->dqblk.dqb_bsoftlimit && 343 qup->dqblk.dqb_curblocks >= qup->dqblk.dqb_bsoftlimit) 344 if (qup->dqblk.dqb_btime > now) 345 msgb = "In block grace period on"; 346 else 347 msgb = "Over block quota on"; 348 if (qflag) { 349 if ((msgi != (char *)0 || msgb != (char *)0) && 350 lines++ == 0) 351 heading(type, id, name, ""); 352 if (msgi != (char *)0) 353 printf("\t%s %s\n", msgi, qup->fsname); 354 if (msgb != (char *)0) 355 printf("\t%s %s\n", msgb, qup->fsname); 356 continue; 357 } 358 if (vflag || 359 qup->dqblk.dqb_curblocks || 360 qup->dqblk.dqb_curinodes) { 361 if (lines++ == 0) 362 heading(type, id, name, ""); 363 nam = qup->fsname; 364 if (strlen(qup->fsname) > 15) { 365 printf("%s\n", qup->fsname); 366 nam = ""; 367 } 368 printf("%15s%8lu%c%7lu%8lu%8s" 369 , nam 370 , (u_long) (dbtob(qup->dqblk.dqb_curblocks) 371 / 1024) 372 , (msgb == (char *)0) ? ' ' : '*' 373 , (u_long) (dbtob(qup->dqblk.dqb_bsoftlimit) 374 / 1024) 375 , (u_long) (dbtob(qup->dqblk.dqb_bhardlimit) 376 / 1024) 377 , (msgb == (char *)0) ? "" 378 :timeprt(qup->dqblk.dqb_btime)); 379 printf("%8lu%c%7lu%8lu%8s\n" 380 , qup->dqblk.dqb_curinodes 381 , (msgi == (char *)0) ? ' ' : '*' 382 , qup->dqblk.dqb_isoftlimit 383 , qup->dqblk.dqb_ihardlimit 384 , (msgi == (char *)0) ? "" 385 : timeprt(qup->dqblk.dqb_itime) 386 ); 387 continue; 388 } 389 } 390 if (!qflag && lines == 0) 391 heading(type, id, name, "none"); 392 } 393 394 static void 395 heading(type, id, name, tag) 396 int type; 397 u_long id; 398 char *name, *tag; 399 { 400 401 printf("Disk quotas for %s %s (%cid %lu): %s\n", qfextension[type], 402 name, *qfextension[type], id, tag); 403 if (!qflag && tag[0] == '\0') { 404 printf("%15s%8s %7s%8s%8s%8s %7s%8s%8s\n" 405 , "Filesystem" 406 , "blocks" 407 , "quota" 408 , "limit" 409 , "grace" 410 , "files" 411 , "quota" 412 , "limit" 413 , "grace" 414 ); 415 } 416 } 417 418 /* 419 * Calculate the grace period and return a printable string for it. 420 */ 421 static char * 422 timeprt(seconds) 423 time_t seconds; 424 { 425 time_t hours, minutes; 426 static char buf[20]; 427 static time_t now; 428 429 if (now == 0) 430 time(&now); 431 if (now > seconds) 432 return ("none"); 433 seconds -= now; 434 minutes = (seconds + 30) / 60; 435 hours = (minutes + 30) / 60; 436 if (hours >= 36) { 437 sprintf(buf, "%lddays", (hours + 12) / 24); 438 return (buf); 439 } 440 if (minutes >= 60) { 441 sprintf(buf, "%2ld:%ld", minutes / 60, minutes % 60); 442 return (buf); 443 } 444 sprintf(buf, "%2ld", minutes); 445 return (buf); 446 } 447 448 /* 449 * Collect the requested quota information. 450 */ 451 static struct quotause * 452 getprivs(id, quotatype) 453 register long id; 454 int quotatype; 455 { 456 register struct quotause *qup, *quptail; 457 register struct fstab *fs; 458 struct quotause *quphead; 459 struct statfs *fst; 460 int nfst, i; 461 462 qup = quphead = (struct quotause *)0; 463 464 nfst = getmntinfo(&fst, MNT_WAIT); 465 if (nfst == 0) 466 errx(2, "no filesystems mounted!"); 467 setfsent(); 468 for (i=0; i<nfst; i++) { 469 if (qup == NULL) { 470 if ((qup = (struct quotause *)malloc(sizeof *qup)) 471 == NULL) 472 errx(2, "out of memory"); 473 } 474 if (strcmp(fst[i].f_fstypename, "nfs") == 0) { 475 if (getnfsquota(&fst[i], NULL, qup, id, quotatype) 476 == 0) 477 continue; 478 } else if (strcmp(fst[i].f_fstypename, "ufs") == 0) { 479 /* 480 * XXX 481 * UFS filesystems must be in /etc/fstab, and must 482 * indicate that they have quotas on (?!) This is quite 483 * unlike SunOS where quotas can be enabled/disabled 484 * on a filesystem independent of /etc/fstab, and it 485 * will still print quotas for them. 486 */ 487 if ((fs = getfsspec(fst[i].f_mntfromname)) == NULL) 488 continue; 489 if (getufsquota(&fst[i], fs, qup, id, quotatype) == 0) 490 continue; 491 } else 492 continue; 493 strcpy(qup->fsname, fst[i].f_mntonname); 494 if (quphead == NULL) 495 quphead = qup; 496 else 497 quptail->next = qup; 498 quptail = qup; 499 quptail->next = 0; 500 qup = NULL; 501 } 502 if (qup) 503 free(qup); 504 endfsent(); 505 return (quphead); 506 } 507 508 /* 509 * Check to see if a particular quota is to be enabled. 510 */ 511 static int 512 ufshasquota(fs, type, qfnamep) 513 register struct fstab *fs; 514 int type; 515 char **qfnamep; 516 { 517 static char initname, usrname[100], grpname[100]; 518 static char buf[BUFSIZ]; 519 char *opt, *cp; 520 521 if (!initname) { 522 sprintf(usrname, "%s%s", qfextension[USRQUOTA], qfname); 523 sprintf(grpname, "%s%s", qfextension[GRPQUOTA], qfname); 524 initname = 1; 525 } 526 strcpy(buf, fs->fs_mntops); 527 for (opt = strtok(buf, ","); opt; opt = strtok(NULL, ",")) { 528 if ((cp = index(opt, '='))) 529 *cp++ = '\0'; 530 if (type == USRQUOTA && strcmp(opt, usrname) == 0) 531 break; 532 if (type == GRPQUOTA && strcmp(opt, grpname) == 0) 533 break; 534 } 535 if (!opt) 536 return (0); 537 if (cp) { 538 *qfnamep = cp; 539 return (1); 540 } 541 (void) sprintf(buf, "%s/%s.%s", fs->fs_file, qfname, qfextension[type]); 542 *qfnamep = buf; 543 return (1); 544 } 545 546 static int 547 getufsquota(fst, fs, qup, id, quotatype) 548 struct statfs *fst; 549 struct fstab *fs; 550 struct quotause *qup; 551 long id; 552 int quotatype; 553 { 554 char *qfpathname; 555 int fd, qcmd; 556 557 qcmd = QCMD(Q_GETQUOTA, quotatype); 558 if (!ufshasquota(fs, quotatype, &qfpathname)) 559 return (0); 560 561 if (quotactl(fs->fs_file, qcmd, id, (char *)&qup->dqblk) != 0) { 562 if ((fd = open(qfpathname, O_RDONLY)) < 0) { 563 warn("%s", qfpathname); 564 return (0); 565 } 566 (void) lseek(fd, (off_t)(id * sizeof(struct dqblk)), L_SET); 567 switch (read(fd, &qup->dqblk, sizeof(struct dqblk))) { 568 case 0: /* EOF */ 569 /* 570 * Convert implicit 0 quota (EOF) 571 * into an explicit one (zero'ed dqblk) 572 */ 573 bzero((caddr_t)&qup->dqblk, sizeof(struct dqblk)); 574 break; 575 case sizeof(struct dqblk): /* OK */ 576 break; 577 default: /* ERROR */ 578 warn("read error: %s", qfpathname); 579 close(fd); 580 return (0); 581 } 582 close(fd); 583 } 584 return (1); 585 } 586 587 static int 588 getnfsquota(fst, fs, qup, id, quotatype) 589 struct statfs *fst; 590 struct fstab *fs; 591 struct quotause *qup; 592 long id; 593 int quotatype; 594 { 595 struct getquota_args gq_args; 596 struct getquota_rslt gq_rslt; 597 struct dqblk *dqp = &qup->dqblk; 598 struct timeval tv; 599 char *cp; 600 601 if (fst->f_flags & MNT_LOCAL) 602 return (0); 603 604 /* 605 * rpc.rquotad does not support group quotas 606 */ 607 if (quotatype != USRQUOTA) 608 return (0); 609 610 /* 611 * must be some form of "hostname:/path" 612 */ 613 cp = strchr(fst->f_mntfromname, ':'); 614 if (cp == NULL) { 615 warnx("cannot find hostname for %s", fst->f_mntfromname); 616 return (0); 617 } 618 619 *cp = '\0'; 620 if (*(cp+1) != '/') { 621 *cp = ':'; 622 return (0); 623 } 624 625 gq_args.gqa_pathp = cp + 1; 626 gq_args.gqa_uid = id; 627 if (callaurpc(fst->f_mntfromname, RQUOTAPROG, RQUOTAVERS, 628 RQUOTAPROC_GETQUOTA, xdr_getquota_args, (char *)&gq_args, 629 xdr_getquota_rslt, (char *)&gq_rslt) != 0) { 630 *cp = ':'; 631 return (0); 632 } 633 634 switch (gq_rslt.status) { 635 case Q_NOQUOTA: 636 break; 637 case Q_EPERM: 638 warnx("quota permission error, host: %s", 639 fst->f_mntfromname); 640 break; 641 case Q_OK: 642 gettimeofday(&tv, NULL); 643 /* blocks*/ 644 dqp->dqb_bhardlimit = 645 gq_rslt.getquota_rslt_u.gqr_rquota.rq_bhardlimit * 646 gq_rslt.getquota_rslt_u.gqr_rquota.rq_bsize / DEV_BSIZE; 647 dqp->dqb_bsoftlimit = 648 gq_rslt.getquota_rslt_u.gqr_rquota.rq_bsoftlimit * 649 gq_rslt.getquota_rslt_u.gqr_rquota.rq_bsize / DEV_BSIZE; 650 dqp->dqb_curblocks = 651 gq_rslt.getquota_rslt_u.gqr_rquota.rq_curblocks * 652 gq_rslt.getquota_rslt_u.gqr_rquota.rq_bsize / DEV_BSIZE; 653 /* inodes */ 654 dqp->dqb_ihardlimit = 655 gq_rslt.getquota_rslt_u.gqr_rquota.rq_fhardlimit; 656 dqp->dqb_isoftlimit = 657 gq_rslt.getquota_rslt_u.gqr_rquota.rq_fsoftlimit; 658 dqp->dqb_curinodes = 659 gq_rslt.getquota_rslt_u.gqr_rquota.rq_curfiles; 660 /* grace times */ 661 dqp->dqb_btime = 662 tv.tv_sec + gq_rslt.getquota_rslt_u.gqr_rquota.rq_btimeleft; 663 dqp->dqb_itime = 664 tv.tv_sec + gq_rslt.getquota_rslt_u.gqr_rquota.rq_ftimeleft; 665 *cp = ':'; 666 return (1); 667 default: 668 warnx("bad rpc result, host: %s", fst->f_mntfromname); 669 break; 670 } 671 *cp = ':'; 672 return (0); 673 } 674 675 static int 676 callaurpc(host, prognum, versnum, procnum, inproc, in, outproc, out) 677 char *host; 678 xdrproc_t inproc, outproc; 679 char *in, *out; 680 int prognum, versnum, procnum; 681 { 682 struct sockaddr_in server_addr; 683 enum clnt_stat clnt_stat; 684 struct hostent *hp; 685 struct timeval timeout, tottimeout; 686 687 CLIENT *client = NULL; 688 int socket = RPC_ANYSOCK; 689 690 if ((hp = gethostbyname(host)) == NULL) 691 return ((int) RPC_UNKNOWNHOST); 692 timeout.tv_usec = 0; 693 timeout.tv_sec = 6; 694 bcopy(hp->h_addr, &server_addr.sin_addr, 695 MIN(hp->h_length,sizeof(server_addr.sin_addr))); 696 server_addr.sin_family = AF_INET; 697 server_addr.sin_port = 0; 698 699 if ((client = clntudp_create(&server_addr, prognum, 700 versnum, timeout, &socket)) == NULL) 701 return ((int) rpc_createerr.cf_stat); 702 703 client->cl_auth = authunix_create_default(); 704 tottimeout.tv_sec = 25; 705 tottimeout.tv_usec = 0; 706 clnt_stat = clnt_call(client, procnum, inproc, in, 707 outproc, out, tottimeout); 708 709 return ((int) clnt_stat); 710 } 711 712 static int 713 alldigits(s) 714 register char *s; 715 { 716 register c; 717 718 c = *s++; 719 do { 720 if (!isdigit(c)) 721 return (0); 722 } while ((c = *s++)); 723 return (1); 724 } 725