114
115 if (argc < 2)
116 usage();
117 if (getuid())
118 errx(1, "permission denied");
119 quotatype = USRQUOTA;
120 protoprivs = NULL;
121 while ((ch = getopt(argc, argv, "ugtf:p:e:")) != -1) {
122 switch(ch) {
123 case 'f':
124 fspath = optarg;
125 break;
126 case 'p':
127 protoname = optarg;
128 pflag++;
129 break;
130 case 'g':
131 quotatype = GRPQUOTA;
132 break;
133 case 'u':
134 quotatype = USRQUOTA;
135 break;
136 case 't':
137 tflag++;
138 break;
139 case 'e':
140 if ((qup = malloc(sizeof(*qup))) == NULL)
141 errx(2, "out of memory");
142 bzero(qup, sizeof(*qup));
143 i = 0;
144 oldoptarg = optarg;
145 for (cp = optarg; (cp = strsep(&optarg, ":")) != NULL;
146 i++) {
147 if (cp != oldoptarg)
148 *(cp - 1) = ':';
149 limp = NULL;
150 switch (i) {
151 case 0:
152 strlcpy(qup->fsname, cp,
153 sizeof(qup->fsname));
154 break;
155 case 1:
156 limp = &qup->dqblk.dqb_bsoftlimit;
157 break;
158 case 2:
159 limp = &qup->dqblk.dqb_bhardlimit;
160 break;
161 case 3:
162 limp = &qup->dqblk.dqb_isoftlimit;
163 break;
164 case 4:
165 limp = &qup->dqblk.dqb_ihardlimit;
166 break;
167 default:
168 warnx("incorrect quota specification: "
169 "%s", oldoptarg);
170 usage();
171 break; /* XXX: report an error */
172 }
173 if (limp != NULL) {
174 lim = strtoll(cp, NULL, 10);
175 if (lim < 0 || lim > UINT_MAX)
176 errx(1, "invalid limit value: "
177 "%lld", lim);
178 *limp = (u_int32_t)lim;
179 }
180 }
181 qup->dqblk.dqb_bsoftlimit =
182 btodb((off_t)qup->dqblk.dqb_bsoftlimit * 1024);
183 qup->dqblk.dqb_bhardlimit =
184 btodb((off_t)qup->dqblk.dqb_bhardlimit * 1024);
185 if (protoprivs == NULL) {
186 protoprivs = curprivs = qup;
187 } else {
188 curprivs->next = qup;
189 curprivs = qup;
190 }
191 eflag++;
192 pflag++;
193 break;
194 default:
195 usage();
196 }
197 }
198 argc -= optind;
199 argv += optind;
200 if (pflag) {
201 if (protoprivs == NULL) {
202 if ((protoid = getentry(protoname, quotatype)) == -1)
203 exit(1);
204 protoprivs = getprivs(protoid, quotatype, fspath);
205 for (qup = protoprivs; qup; qup = qup->next) {
206 qup->dqblk.dqb_btime = 0;
207 qup->dqblk.dqb_itime = 0;
208 }
209 }
210 for (; argc-- > 0; argv++) {
211 if (strspn(*argv, "0123456789-") == strlen(*argv) &&
212 (cp = strchr(*argv, '-')) != NULL) {
213 *cp++ = '\0';
214 startuid = atoi(*argv);
215 enduid = atoi(cp);
216 if (enduid < startuid)
217 errx(1,
218 "ending uid (%d) must be >= starting uid (%d) when using uid ranges",
219 enduid, startuid);
220 range = 1;
221 } else {
222 startuid = enduid = 0;
223 range = 0;
224 }
225 for ( ; startuid <= enduid; startuid++) {
226 if (range)
227 snprintf(buf, sizeof(buf), "%d",
228 startuid);
229 else
230 snprintf(buf, sizeof(buf), "%s",
231 *argv);
232 if ((id = getentry(buf, quotatype)) < 0)
233 continue;
234 if (eflag) {
235 for (qup = protoprivs; qup;
236 qup = qup->next) {
237 curprivs = getprivs(id,
238 quotatype, qup->fsname);
239 if (curprivs == NULL)
240 continue;
241 strcpy(qup->qfname,
242 curprivs->qfname);
243 strcpy(qup->fsname,
244 curprivs->fsname);
245 }
246 }
247 putprivs(id, quotatype, protoprivs);
248 }
249 }
250 exit(0);
251 }
252 tmpfd = mkstemp(tmpfil);
253 fchown(tmpfd, getuid(), getgid());
254 if (tflag) {
255 protoprivs = getprivs(0, quotatype, fspath);
256 if (writetimes(protoprivs, tmpfd, quotatype) == 0)
257 exit(1);
258 if (editit(tmpfil) && readtimes(protoprivs, tmpfil))
259 putprivs(0, quotatype, protoprivs);
260 freeprivs(protoprivs);
261 close(tmpfd);
262 unlink(tmpfil);
263 exit(0);
264 }
265 for ( ; argc > 0; argc--, argv++) {
266 if ((id = getentry(*argv, quotatype)) == -1)
267 continue;
268 curprivs = getprivs(id, quotatype, fspath);
269 if (writeprivs(curprivs, tmpfd, *argv, quotatype) == 0)
270 continue;
271 if (editit(tmpfil) && readprivs(curprivs, tmpfil))
272 putprivs(id, quotatype, curprivs);
273 freeprivs(curprivs);
274 }
275 close(tmpfd);
276 unlink(tmpfil);
277 exit(0);
278}
279
280static void
281usage()
282{
283 fprintf(stderr, "%s\n%s\n%s\n%s\n%s\n%s\n%s\n%s\n",
284 "usage: edquota [-u] [-f fspath] [-p username] username ...",
285 " edquota [-u] -e fspath[:bslim[:bhlim[:islim[:ihlim]]]] [-e ...]",
286 " username ...",
287 " edquota -g [-f fspath] [-p groupname] groupname ...",
288 " edquota -g -e fspath[:bslim[:bhlim[:islim[:ihlim]]]] [-e ...]",
289 " groupname ...",
290 " edquota [-u] -t [-f fspath]",
291 " edquota -g -t [-f fspath]");
292 exit(1);
293}
294
295/*
296 * This routine converts a name for a particular quota type to
297 * an identifier. This routine must agree with the kernel routine
298 * getinoquota as to the interpretation of quota types.
299 */
300int
301getentry(name, quotatype)
302 const char *name;
303 int quotatype;
304{
305 struct passwd *pw;
306 struct group *gr;
307
308 if (alldigits(name))
309 return (atoi(name));
310 switch(quotatype) {
311 case USRQUOTA:
312 if ((pw = getpwnam(name)))
313 return (pw->pw_uid);
314 warnx("%s: no such user", name);
315 break;
316 case GRPQUOTA:
317 if ((gr = getgrnam(name)))
318 return (gr->gr_gid);
319 warnx("%s: no such group", name);
320 break;
321 default:
322 warnx("%d: unknown quota type", quotatype);
323 break;
324 }
325 sleep(1);
326 return (-1);
327}
328
329/*
330 * Collect the requested quota information.
331 */
332struct quotause *
333getprivs(id, quotatype, fspath)
334 register long id;
335 int quotatype;
336 char *fspath;
337{
338 register struct fstab *fs;
339 register struct quotause *qup, *quptail;
340 struct quotause *quphead;
341 int qcmd, qupsize, fd;
342 char *qfpathname;
343 static int warned = 0;
344
345 setfsent();
346 quphead = (struct quotause *)0;
347 qcmd = QCMD(Q_GETQUOTA, quotatype);
348 while ((fs = getfsent())) {
349 if (fspath && *fspath && strcmp(fspath, fs->fs_spec) &&
350 strcmp(fspath, fs->fs_file))
351 continue;
352 if (strcmp(fs->fs_vfstype, "ufs"))
353 continue;
354 if (!hasquota(fs, quotatype, &qfpathname))
355 continue;
356 qupsize = sizeof(*qup) + strlen(qfpathname);
357 if ((qup = (struct quotause *)malloc(qupsize)) == NULL)
358 errx(2, "out of memory");
359 if (quotactl(fs->fs_file, qcmd, id, &qup->dqblk) != 0) {
360 if (errno == EOPNOTSUPP && !warned) {
361 warned++;
362 warnx("warning: quotas are not compiled into this kernel");
363 sleep(3);
364 }
365 if ((fd = open(qfpathname, O_RDONLY)) < 0) {
366 fd = open(qfpathname, O_RDWR|O_CREAT, 0640);
367 if (fd < 0 && errno != ENOENT) {
368 warn("%s", qfpathname);
369 free(qup);
370 continue;
371 }
372 warnx("creating quota file %s", qfpathname);
373 sleep(3);
374 (void) fchown(fd, getuid(),
375 getentry(quotagroup, GRPQUOTA));
376 (void) fchmod(fd, 0640);
377 }
378 lseek(fd, (long)(id * sizeof(struct dqblk)), L_SET);
379 switch (read(fd, &qup->dqblk, sizeof(struct dqblk))) {
380 case 0: /* EOF */
381 /*
382 * Convert implicit 0 quota (EOF)
383 * into an explicit one (zero'ed dqblk)
384 */
385 bzero((caddr_t)&qup->dqblk,
386 sizeof(struct dqblk));
387 break;
388
389 case sizeof(struct dqblk): /* OK */
390 break;
391
392 default: /* ERROR */
393 warn("read error in %s", qfpathname);
394 close(fd);
395 free(qup);
396 continue;
397 }
398 close(fd);
399 }
400 strcpy(qup->qfname, qfpathname);
401 strcpy(qup->fsname, fs->fs_file);
402 if (quphead == NULL)
403 quphead = qup;
404 else
405 quptail->next = qup;
406 quptail = qup;
407 qup->next = 0;
408 }
409 endfsent();
410 return (quphead);
411}
412
413/*
414 * Store the requested quota information.
415 */
416void
417putprivs(id, quotatype, quplist)
418 long id;
419 int quotatype;
420 struct quotause *quplist;
421{
422 register struct quotause *qup;
423 int qcmd, fd;
424
425 qcmd = QCMD(Q_SETQUOTA, quotatype);
426 for (qup = quplist; qup; qup = qup->next) {
427 if (quotactl(qup->fsname, qcmd, id, &qup->dqblk) == 0)
428 continue;
429 if ((fd = open(qup->qfname, O_WRONLY)) < 0) {
430 warn("%s", qup->qfname);
431 } else {
432 lseek(fd, (long)id * (long)sizeof (struct dqblk), 0);
433 if (write(fd, &qup->dqblk, sizeof (struct dqblk)) !=
434 sizeof (struct dqblk)) {
435 warn("%s", qup->qfname);
436 }
437 close(fd);
438 }
439 }
440}
441
442/*
443 * Take a list of priviledges and get it edited.
444 */
445int
446editit(tmpf)
447 char *tmpf;
448{
449 long omask;
450 int pid, status;
451
452 omask = sigblock(sigmask(SIGINT)|sigmask(SIGQUIT)|sigmask(SIGHUP));
453 top:
454 if ((pid = fork()) < 0) {
455
456 if (errno == EPROCLIM) {
457 warnx("you have too many processes");
458 return(0);
459 }
460 if (errno == EAGAIN) {
461 sleep(1);
462 goto top;
463 }
464 warn("fork");
465 return (0);
466 }
467 if (pid == 0) {
468 register const char *ed;
469
470 sigsetmask(omask);
471 setgid(getgid());
472 setuid(getuid());
473 if ((ed = getenv("EDITOR")) == (char *)0)
474 ed = _PATH_VI;
475 execlp(ed, ed, tmpf, (char *)0);
476 err(1, "%s", ed);
477 }
478 waitpid(pid, &status, 0);
479 sigsetmask(omask);
480 if (!WIFEXITED(status) || WEXITSTATUS(status) != 0)
481 return (0);
482 return (1);
483}
484
485/*
486 * Convert a quotause list to an ASCII file.
487 */
488int
489writeprivs(quplist, outfd, name, quotatype)
490 struct quotause *quplist;
491 int outfd;
492 char *name;
493 int quotatype;
494{
495 register struct quotause *qup;
496 FILE *fd;
497
498 ftruncate(outfd, 0);
499 lseek(outfd, 0, L_SET);
500 if ((fd = fdopen(dup(outfd), "w")) == NULL)
501 err(1, "%s", tmpfil);
502 fprintf(fd, "Quotas for %s %s:\n", qfextension[quotatype], name);
503 for (qup = quplist; qup; qup = qup->next) {
504 fprintf(fd, "%s: %s %lu, limits (soft = %lu, hard = %lu)\n",
505 qup->fsname, "kbytes in use:",
506 (unsigned long)(dbtob(qup->dqblk.dqb_curblocks) / 1024),
507 (unsigned long)(dbtob(qup->dqblk.dqb_bsoftlimit) / 1024),
508 (unsigned long)(dbtob(qup->dqblk.dqb_bhardlimit) / 1024));
509 fprintf(fd, "%s %lu, limits (soft = %lu, hard = %lu)\n",
510 "\tinodes in use:",
511 (unsigned long)qup->dqblk.dqb_curinodes,
512 (unsigned long)qup->dqblk.dqb_isoftlimit,
513 (unsigned long)qup->dqblk.dqb_ihardlimit);
514 }
515 fclose(fd);
516 return (1);
517}
518
519/*
520 * Merge changes to an ASCII file into a quotause list.
521 */
522int
523readprivs(quplist, inname)
524 struct quotause *quplist;
525 char *inname;
526{
527 register struct quotause *qup;
528 FILE *fd;
529 unsigned long bhardlimit, bsoftlimit, curblocks;
530 unsigned long ihardlimit, isoftlimit, curinodes;
531 int cnt;
532 register char *cp;
533 struct dqblk dqblk;
534 char *fsp, line1[BUFSIZ], line2[BUFSIZ];
535
536 fd = fopen(inname, "r");
537 if (fd == NULL) {
538 warnx("can't re-read temp file!!");
539 return (0);
540 }
541 /*
542 * Discard title line, then read pairs of lines to process.
543 */
544 (void) fgets(line1, sizeof (line1), fd);
545 while (fgets(line1, sizeof (line1), fd) != NULL &&
546 fgets(line2, sizeof (line2), fd) != NULL) {
547 if ((fsp = strtok(line1, " \t:")) == NULL) {
548 warnx("%s: bad format", line1);
549 return (0);
550 }
551 if ((cp = strtok((char *)0, "\n")) == NULL) {
552 warnx("%s: %s: bad format", fsp, &fsp[strlen(fsp) + 1]);
553 return (0);
554 }
555 cnt = sscanf(cp,
556 " kbytes in use: %lu, limits (soft = %lu, hard = %lu)",
557 &curblocks, &bsoftlimit, &bhardlimit);
558 if (cnt != 3) {
559 warnx("%s:%s: bad format", fsp, cp);
560 return (0);
561 }
562 dqblk.dqb_curblocks = btodb((off_t)curblocks * 1024);
563 dqblk.dqb_bsoftlimit = btodb((off_t)bsoftlimit * 1024);
564 dqblk.dqb_bhardlimit = btodb((off_t)bhardlimit * 1024);
565 if ((cp = strtok(line2, "\n")) == NULL) {
566 warnx("%s: %s: bad format", fsp, line2);
567 return (0);
568 }
569 cnt = sscanf(cp,
570 "\tinodes in use: %lu, limits (soft = %lu, hard = %lu)",
571 &curinodes, &isoftlimit, &ihardlimit);
572 if (cnt != 3) {
573 warnx("%s: %s: bad format", fsp, line2);
574 return (0);
575 }
576 dqblk.dqb_curinodes = curinodes;
577 dqblk.dqb_isoftlimit = isoftlimit;
578 dqblk.dqb_ihardlimit = ihardlimit;
579 for (qup = quplist; qup; qup = qup->next) {
580 if (strcmp(fsp, qup->fsname))
581 continue;
582 /*
583 * Cause time limit to be reset when the quota
584 * is next used if previously had no soft limit
585 * or were under it, but now have a soft limit
586 * and are over it.
587 */
588 if (dqblk.dqb_bsoftlimit &&
589 qup->dqblk.dqb_curblocks >= dqblk.dqb_bsoftlimit &&
590 (qup->dqblk.dqb_bsoftlimit == 0 ||
591 qup->dqblk.dqb_curblocks <
592 qup->dqblk.dqb_bsoftlimit))
593 qup->dqblk.dqb_btime = 0;
594 if (dqblk.dqb_isoftlimit &&
595 qup->dqblk.dqb_curinodes >= dqblk.dqb_isoftlimit &&
596 (qup->dqblk.dqb_isoftlimit == 0 ||
597 qup->dqblk.dqb_curinodes <
598 qup->dqblk.dqb_isoftlimit))
599 qup->dqblk.dqb_itime = 0;
600 qup->dqblk.dqb_bsoftlimit = dqblk.dqb_bsoftlimit;
601 qup->dqblk.dqb_bhardlimit = dqblk.dqb_bhardlimit;
602 qup->dqblk.dqb_isoftlimit = dqblk.dqb_isoftlimit;
603 qup->dqblk.dqb_ihardlimit = dqblk.dqb_ihardlimit;
604 qup->flags |= FOUND;
605 if (dqblk.dqb_curblocks == qup->dqblk.dqb_curblocks &&
606 dqblk.dqb_curinodes == qup->dqblk.dqb_curinodes)
607 break;
608 warnx("%s: cannot change current allocation", fsp);
609 break;
610 }
611 }
612 fclose(fd);
613 /*
614 * Disable quotas for any filesystems that have not been found.
615 */
616 for (qup = quplist; qup; qup = qup->next) {
617 if (qup->flags & FOUND) {
618 qup->flags &= ~FOUND;
619 continue;
620 }
621 qup->dqblk.dqb_bsoftlimit = 0;
622 qup->dqblk.dqb_bhardlimit = 0;
623 qup->dqblk.dqb_isoftlimit = 0;
624 qup->dqblk.dqb_ihardlimit = 0;
625 }
626 return (1);
627}
628
629/*
630 * Convert a quotause list to an ASCII file of grace times.
631 */
632int
633writetimes(quplist, outfd, quotatype)
634 struct quotause *quplist;
635 int outfd;
636 int quotatype;
637{
638 register struct quotause *qup;
639 FILE *fd;
640
641 ftruncate(outfd, 0);
642 lseek(outfd, 0, L_SET);
643 if ((fd = fdopen(dup(outfd), "w")) == NULL)
644 err(1, "%s", tmpfil);
645 fprintf(fd, "Time units may be: days, hours, minutes, or seconds\n");
646 fprintf(fd, "Grace period before enforcing soft limits for %ss:\n",
647 qfextension[quotatype]);
648 for (qup = quplist; qup; qup = qup->next) {
649 fprintf(fd, "%s: block grace period: %s, ",
650 qup->fsname, cvtstoa(qup->dqblk.dqb_btime));
651 fprintf(fd, "file grace period: %s\n",
652 cvtstoa(qup->dqblk.dqb_itime));
653 }
654 fclose(fd);
655 return (1);
656}
657
658/*
659 * Merge changes of grace times in an ASCII file into a quotause list.
660 */
661int
662readtimes(quplist, inname)
663 struct quotause *quplist;
664 char *inname;
665{
666 register struct quotause *qup;
667 FILE *fd;
668 int cnt;
669 register char *cp;
670 time_t itime, btime, iseconds, bseconds;
671 long l_itime, l_btime;
672 char *fsp, bunits[10], iunits[10], line1[BUFSIZ];
673
674 fd = fopen(inname, "r");
675 if (fd == NULL) {
676 warnx("can't re-read temp file!!");
677 return (0);
678 }
679 /*
680 * Discard two title lines, then read lines to process.
681 */
682 (void) fgets(line1, sizeof (line1), fd);
683 (void) fgets(line1, sizeof (line1), fd);
684 while (fgets(line1, sizeof (line1), fd) != NULL) {
685 if ((fsp = strtok(line1, " \t:")) == NULL) {
686 warnx("%s: bad format", line1);
687 return (0);
688 }
689 if ((cp = strtok((char *)0, "\n")) == NULL) {
690 warnx("%s: %s: bad format", fsp, &fsp[strlen(fsp) + 1]);
691 return (0);
692 }
693 cnt = sscanf(cp,
694 " block grace period: %ld %s file grace period: %ld %s",
695 &l_btime, bunits, &l_itime, iunits);
696 if (cnt != 4) {
697 warnx("%s:%s: bad format", fsp, cp);
698 return (0);
699 }
700 btime = l_btime;
701 itime = l_itime;
702 if (cvtatos(btime, bunits, &bseconds) == 0)
703 return (0);
704 if (cvtatos(itime, iunits, &iseconds) == 0)
705 return (0);
706 for (qup = quplist; qup; qup = qup->next) {
707 if (strcmp(fsp, qup->fsname))
708 continue;
709 qup->dqblk.dqb_btime = bseconds;
710 qup->dqblk.dqb_itime = iseconds;
711 qup->flags |= FOUND;
712 break;
713 }
714 }
715 fclose(fd);
716 /*
717 * reset default grace periods for any filesystems
718 * that have not been found.
719 */
720 for (qup = quplist; qup; qup = qup->next) {
721 if (qup->flags & FOUND) {
722 qup->flags &= ~FOUND;
723 continue;
724 }
725 qup->dqblk.dqb_btime = 0;
726 qup->dqblk.dqb_itime = 0;
727 }
728 return (1);
729}
730
731/*
732 * Convert seconds to ASCII times.
733 */
734char *
735cvtstoa(secs)
736 time_t secs;
737{
738 static char buf[20];
739
740 if (secs % (24 * 60 * 60) == 0) {
741 secs /= 24 * 60 * 60;
742 sprintf(buf, "%ld day%s", (long)secs, secs == 1 ? "" : "s");
743 } else if (secs % (60 * 60) == 0) {
744 secs /= 60 * 60;
745 sprintf(buf, "%ld hour%s", (long)secs, secs == 1 ? "" : "s");
746 } else if (secs % 60 == 0) {
747 secs /= 60;
748 sprintf(buf, "%ld minute%s", (long)secs, secs == 1 ? "" : "s");
749 } else
750 sprintf(buf, "%ld second%s", (long)secs, secs == 1 ? "" : "s");
751 return (buf);
752}
753
754/*
755 * Convert ASCII input times to seconds.
756 */
757int
758cvtatos(period, units, seconds)
759 time_t period;
760 char *units;
761 time_t *seconds;
762{
763
764 if (bcmp(units, "second", 6) == 0)
765 *seconds = period;
766 else if (bcmp(units, "minute", 6) == 0)
767 *seconds = period * 60;
768 else if (bcmp(units, "hour", 4) == 0)
769 *seconds = period * 60 * 60;
770 else if (bcmp(units, "day", 3) == 0)
771 *seconds = period * 24 * 60 * 60;
772 else {
773 printf("%s: bad units, specify %s\n", units,
774 "days, hours, minutes, or seconds");
775 return (0);
776 }
777 return (1);
778}
779
780/*
781 * Free a list of quotause structures.
782 */
783void
784freeprivs(quplist)
785 struct quotause *quplist;
786{
787 register struct quotause *qup, *nextqup;
788
789 for (qup = quplist; qup; qup = nextqup) {
790 nextqup = qup->next;
791 free(qup);
792 }
793}
794
795/*
796 * Check whether a string is completely composed of digits.
797 */
798int
799alldigits(s)
800 register const char *s;
801{
802 register int c;
803
804 c = *s++;
805 do {
806 if (!isdigit(c))
807 return (0);
808 } while ((c = *s++));
809 return (1);
810}
811
812/*
813 * Check to see if a particular quota is to be enabled.
814 */
815int
816hasquota(fs, type, qfnamep)
817 register struct fstab *fs;
818 int type;
819 char **qfnamep;
820{
821 register char *opt;
822 char *cp;
823 static char initname, usrname[100], grpname[100];
824 static char buf[BUFSIZ];
825
826 if (!initname) {
827 sprintf(usrname, "%s%s", qfextension[USRQUOTA], qfname);
828 sprintf(grpname, "%s%s", qfextension[GRPQUOTA], qfname);
829 initname = 1;
830 }
831 strcpy(buf, fs->fs_mntops);
832 for (opt = strtok(buf, ","); opt; opt = strtok(NULL, ",")) {
833 if ((cp = index(opt, '=')))
834 *cp++ = '\0';
835 if (type == USRQUOTA && strcmp(opt, usrname) == 0)
836 break;
837 if (type == GRPQUOTA && strcmp(opt, grpname) == 0)
838 break;
839 }
840 if (!opt)
841 return (0);
842 if (cp) {
843 *qfnamep = cp;
844 return (1);
845 }
846 (void) sprintf(buf, "%s/%s.%s", fs->fs_file, qfname, qfextension[type]);
847 *qfnamep = buf;
848 return (1);
849}
| 114
115 if (argc < 2)
116 usage();
117 if (getuid())
118 errx(1, "permission denied");
119 quotatype = USRQUOTA;
120 protoprivs = NULL;
121 while ((ch = getopt(argc, argv, "ugtf:p:e:")) != -1) {
122 switch(ch) {
123 case 'f':
124 fspath = optarg;
125 break;
126 case 'p':
127 protoname = optarg;
128 pflag++;
129 break;
130 case 'g':
131 quotatype = GRPQUOTA;
132 break;
133 case 'u':
134 quotatype = USRQUOTA;
135 break;
136 case 't':
137 tflag++;
138 break;
139 case 'e':
140 if ((qup = malloc(sizeof(*qup))) == NULL)
141 errx(2, "out of memory");
142 bzero(qup, sizeof(*qup));
143 i = 0;
144 oldoptarg = optarg;
145 for (cp = optarg; (cp = strsep(&optarg, ":")) != NULL;
146 i++) {
147 if (cp != oldoptarg)
148 *(cp - 1) = ':';
149 limp = NULL;
150 switch (i) {
151 case 0:
152 strlcpy(qup->fsname, cp,
153 sizeof(qup->fsname));
154 break;
155 case 1:
156 limp = &qup->dqblk.dqb_bsoftlimit;
157 break;
158 case 2:
159 limp = &qup->dqblk.dqb_bhardlimit;
160 break;
161 case 3:
162 limp = &qup->dqblk.dqb_isoftlimit;
163 break;
164 case 4:
165 limp = &qup->dqblk.dqb_ihardlimit;
166 break;
167 default:
168 warnx("incorrect quota specification: "
169 "%s", oldoptarg);
170 usage();
171 break; /* XXX: report an error */
172 }
173 if (limp != NULL) {
174 lim = strtoll(cp, NULL, 10);
175 if (lim < 0 || lim > UINT_MAX)
176 errx(1, "invalid limit value: "
177 "%lld", lim);
178 *limp = (u_int32_t)lim;
179 }
180 }
181 qup->dqblk.dqb_bsoftlimit =
182 btodb((off_t)qup->dqblk.dqb_bsoftlimit * 1024);
183 qup->dqblk.dqb_bhardlimit =
184 btodb((off_t)qup->dqblk.dqb_bhardlimit * 1024);
185 if (protoprivs == NULL) {
186 protoprivs = curprivs = qup;
187 } else {
188 curprivs->next = qup;
189 curprivs = qup;
190 }
191 eflag++;
192 pflag++;
193 break;
194 default:
195 usage();
196 }
197 }
198 argc -= optind;
199 argv += optind;
200 if (pflag) {
201 if (protoprivs == NULL) {
202 if ((protoid = getentry(protoname, quotatype)) == -1)
203 exit(1);
204 protoprivs = getprivs(protoid, quotatype, fspath);
205 for (qup = protoprivs; qup; qup = qup->next) {
206 qup->dqblk.dqb_btime = 0;
207 qup->dqblk.dqb_itime = 0;
208 }
209 }
210 for (; argc-- > 0; argv++) {
211 if (strspn(*argv, "0123456789-") == strlen(*argv) &&
212 (cp = strchr(*argv, '-')) != NULL) {
213 *cp++ = '\0';
214 startuid = atoi(*argv);
215 enduid = atoi(cp);
216 if (enduid < startuid)
217 errx(1,
218 "ending uid (%d) must be >= starting uid (%d) when using uid ranges",
219 enduid, startuid);
220 range = 1;
221 } else {
222 startuid = enduid = 0;
223 range = 0;
224 }
225 for ( ; startuid <= enduid; startuid++) {
226 if (range)
227 snprintf(buf, sizeof(buf), "%d",
228 startuid);
229 else
230 snprintf(buf, sizeof(buf), "%s",
231 *argv);
232 if ((id = getentry(buf, quotatype)) < 0)
233 continue;
234 if (eflag) {
235 for (qup = protoprivs; qup;
236 qup = qup->next) {
237 curprivs = getprivs(id,
238 quotatype, qup->fsname);
239 if (curprivs == NULL)
240 continue;
241 strcpy(qup->qfname,
242 curprivs->qfname);
243 strcpy(qup->fsname,
244 curprivs->fsname);
245 }
246 }
247 putprivs(id, quotatype, protoprivs);
248 }
249 }
250 exit(0);
251 }
252 tmpfd = mkstemp(tmpfil);
253 fchown(tmpfd, getuid(), getgid());
254 if (tflag) {
255 protoprivs = getprivs(0, quotatype, fspath);
256 if (writetimes(protoprivs, tmpfd, quotatype) == 0)
257 exit(1);
258 if (editit(tmpfil) && readtimes(protoprivs, tmpfil))
259 putprivs(0, quotatype, protoprivs);
260 freeprivs(protoprivs);
261 close(tmpfd);
262 unlink(tmpfil);
263 exit(0);
264 }
265 for ( ; argc > 0; argc--, argv++) {
266 if ((id = getentry(*argv, quotatype)) == -1)
267 continue;
268 curprivs = getprivs(id, quotatype, fspath);
269 if (writeprivs(curprivs, tmpfd, *argv, quotatype) == 0)
270 continue;
271 if (editit(tmpfil) && readprivs(curprivs, tmpfil))
272 putprivs(id, quotatype, curprivs);
273 freeprivs(curprivs);
274 }
275 close(tmpfd);
276 unlink(tmpfil);
277 exit(0);
278}
279
280static void
281usage()
282{
283 fprintf(stderr, "%s\n%s\n%s\n%s\n%s\n%s\n%s\n%s\n",
284 "usage: edquota [-u] [-f fspath] [-p username] username ...",
285 " edquota [-u] -e fspath[:bslim[:bhlim[:islim[:ihlim]]]] [-e ...]",
286 " username ...",
287 " edquota -g [-f fspath] [-p groupname] groupname ...",
288 " edquota -g -e fspath[:bslim[:bhlim[:islim[:ihlim]]]] [-e ...]",
289 " groupname ...",
290 " edquota [-u] -t [-f fspath]",
291 " edquota -g -t [-f fspath]");
292 exit(1);
293}
294
295/*
296 * This routine converts a name for a particular quota type to
297 * an identifier. This routine must agree with the kernel routine
298 * getinoquota as to the interpretation of quota types.
299 */
300int
301getentry(name, quotatype)
302 const char *name;
303 int quotatype;
304{
305 struct passwd *pw;
306 struct group *gr;
307
308 if (alldigits(name))
309 return (atoi(name));
310 switch(quotatype) {
311 case USRQUOTA:
312 if ((pw = getpwnam(name)))
313 return (pw->pw_uid);
314 warnx("%s: no such user", name);
315 break;
316 case GRPQUOTA:
317 if ((gr = getgrnam(name)))
318 return (gr->gr_gid);
319 warnx("%s: no such group", name);
320 break;
321 default:
322 warnx("%d: unknown quota type", quotatype);
323 break;
324 }
325 sleep(1);
326 return (-1);
327}
328
329/*
330 * Collect the requested quota information.
331 */
332struct quotause *
333getprivs(id, quotatype, fspath)
334 register long id;
335 int quotatype;
336 char *fspath;
337{
338 register struct fstab *fs;
339 register struct quotause *qup, *quptail;
340 struct quotause *quphead;
341 int qcmd, qupsize, fd;
342 char *qfpathname;
343 static int warned = 0;
344
345 setfsent();
346 quphead = (struct quotause *)0;
347 qcmd = QCMD(Q_GETQUOTA, quotatype);
348 while ((fs = getfsent())) {
349 if (fspath && *fspath && strcmp(fspath, fs->fs_spec) &&
350 strcmp(fspath, fs->fs_file))
351 continue;
352 if (strcmp(fs->fs_vfstype, "ufs"))
353 continue;
354 if (!hasquota(fs, quotatype, &qfpathname))
355 continue;
356 qupsize = sizeof(*qup) + strlen(qfpathname);
357 if ((qup = (struct quotause *)malloc(qupsize)) == NULL)
358 errx(2, "out of memory");
359 if (quotactl(fs->fs_file, qcmd, id, &qup->dqblk) != 0) {
360 if (errno == EOPNOTSUPP && !warned) {
361 warned++;
362 warnx("warning: quotas are not compiled into this kernel");
363 sleep(3);
364 }
365 if ((fd = open(qfpathname, O_RDONLY)) < 0) {
366 fd = open(qfpathname, O_RDWR|O_CREAT, 0640);
367 if (fd < 0 && errno != ENOENT) {
368 warn("%s", qfpathname);
369 free(qup);
370 continue;
371 }
372 warnx("creating quota file %s", qfpathname);
373 sleep(3);
374 (void) fchown(fd, getuid(),
375 getentry(quotagroup, GRPQUOTA));
376 (void) fchmod(fd, 0640);
377 }
378 lseek(fd, (long)(id * sizeof(struct dqblk)), L_SET);
379 switch (read(fd, &qup->dqblk, sizeof(struct dqblk))) {
380 case 0: /* EOF */
381 /*
382 * Convert implicit 0 quota (EOF)
383 * into an explicit one (zero'ed dqblk)
384 */
385 bzero((caddr_t)&qup->dqblk,
386 sizeof(struct dqblk));
387 break;
388
389 case sizeof(struct dqblk): /* OK */
390 break;
391
392 default: /* ERROR */
393 warn("read error in %s", qfpathname);
394 close(fd);
395 free(qup);
396 continue;
397 }
398 close(fd);
399 }
400 strcpy(qup->qfname, qfpathname);
401 strcpy(qup->fsname, fs->fs_file);
402 if (quphead == NULL)
403 quphead = qup;
404 else
405 quptail->next = qup;
406 quptail = qup;
407 qup->next = 0;
408 }
409 endfsent();
410 return (quphead);
411}
412
413/*
414 * Store the requested quota information.
415 */
416void
417putprivs(id, quotatype, quplist)
418 long id;
419 int quotatype;
420 struct quotause *quplist;
421{
422 register struct quotause *qup;
423 int qcmd, fd;
424
425 qcmd = QCMD(Q_SETQUOTA, quotatype);
426 for (qup = quplist; qup; qup = qup->next) {
427 if (quotactl(qup->fsname, qcmd, id, &qup->dqblk) == 0)
428 continue;
429 if ((fd = open(qup->qfname, O_WRONLY)) < 0) {
430 warn("%s", qup->qfname);
431 } else {
432 lseek(fd, (long)id * (long)sizeof (struct dqblk), 0);
433 if (write(fd, &qup->dqblk, sizeof (struct dqblk)) !=
434 sizeof (struct dqblk)) {
435 warn("%s", qup->qfname);
436 }
437 close(fd);
438 }
439 }
440}
441
442/*
443 * Take a list of priviledges and get it edited.
444 */
445int
446editit(tmpf)
447 char *tmpf;
448{
449 long omask;
450 int pid, status;
451
452 omask = sigblock(sigmask(SIGINT)|sigmask(SIGQUIT)|sigmask(SIGHUP));
453 top:
454 if ((pid = fork()) < 0) {
455
456 if (errno == EPROCLIM) {
457 warnx("you have too many processes");
458 return(0);
459 }
460 if (errno == EAGAIN) {
461 sleep(1);
462 goto top;
463 }
464 warn("fork");
465 return (0);
466 }
467 if (pid == 0) {
468 register const char *ed;
469
470 sigsetmask(omask);
471 setgid(getgid());
472 setuid(getuid());
473 if ((ed = getenv("EDITOR")) == (char *)0)
474 ed = _PATH_VI;
475 execlp(ed, ed, tmpf, (char *)0);
476 err(1, "%s", ed);
477 }
478 waitpid(pid, &status, 0);
479 sigsetmask(omask);
480 if (!WIFEXITED(status) || WEXITSTATUS(status) != 0)
481 return (0);
482 return (1);
483}
484
485/*
486 * Convert a quotause list to an ASCII file.
487 */
488int
489writeprivs(quplist, outfd, name, quotatype)
490 struct quotause *quplist;
491 int outfd;
492 char *name;
493 int quotatype;
494{
495 register struct quotause *qup;
496 FILE *fd;
497
498 ftruncate(outfd, 0);
499 lseek(outfd, 0, L_SET);
500 if ((fd = fdopen(dup(outfd), "w")) == NULL)
501 err(1, "%s", tmpfil);
502 fprintf(fd, "Quotas for %s %s:\n", qfextension[quotatype], name);
503 for (qup = quplist; qup; qup = qup->next) {
504 fprintf(fd, "%s: %s %lu, limits (soft = %lu, hard = %lu)\n",
505 qup->fsname, "kbytes in use:",
506 (unsigned long)(dbtob(qup->dqblk.dqb_curblocks) / 1024),
507 (unsigned long)(dbtob(qup->dqblk.dqb_bsoftlimit) / 1024),
508 (unsigned long)(dbtob(qup->dqblk.dqb_bhardlimit) / 1024));
509 fprintf(fd, "%s %lu, limits (soft = %lu, hard = %lu)\n",
510 "\tinodes in use:",
511 (unsigned long)qup->dqblk.dqb_curinodes,
512 (unsigned long)qup->dqblk.dqb_isoftlimit,
513 (unsigned long)qup->dqblk.dqb_ihardlimit);
514 }
515 fclose(fd);
516 return (1);
517}
518
519/*
520 * Merge changes to an ASCII file into a quotause list.
521 */
522int
523readprivs(quplist, inname)
524 struct quotause *quplist;
525 char *inname;
526{
527 register struct quotause *qup;
528 FILE *fd;
529 unsigned long bhardlimit, bsoftlimit, curblocks;
530 unsigned long ihardlimit, isoftlimit, curinodes;
531 int cnt;
532 register char *cp;
533 struct dqblk dqblk;
534 char *fsp, line1[BUFSIZ], line2[BUFSIZ];
535
536 fd = fopen(inname, "r");
537 if (fd == NULL) {
538 warnx("can't re-read temp file!!");
539 return (0);
540 }
541 /*
542 * Discard title line, then read pairs of lines to process.
543 */
544 (void) fgets(line1, sizeof (line1), fd);
545 while (fgets(line1, sizeof (line1), fd) != NULL &&
546 fgets(line2, sizeof (line2), fd) != NULL) {
547 if ((fsp = strtok(line1, " \t:")) == NULL) {
548 warnx("%s: bad format", line1);
549 return (0);
550 }
551 if ((cp = strtok((char *)0, "\n")) == NULL) {
552 warnx("%s: %s: bad format", fsp, &fsp[strlen(fsp) + 1]);
553 return (0);
554 }
555 cnt = sscanf(cp,
556 " kbytes in use: %lu, limits (soft = %lu, hard = %lu)",
557 &curblocks, &bsoftlimit, &bhardlimit);
558 if (cnt != 3) {
559 warnx("%s:%s: bad format", fsp, cp);
560 return (0);
561 }
562 dqblk.dqb_curblocks = btodb((off_t)curblocks * 1024);
563 dqblk.dqb_bsoftlimit = btodb((off_t)bsoftlimit * 1024);
564 dqblk.dqb_bhardlimit = btodb((off_t)bhardlimit * 1024);
565 if ((cp = strtok(line2, "\n")) == NULL) {
566 warnx("%s: %s: bad format", fsp, line2);
567 return (0);
568 }
569 cnt = sscanf(cp,
570 "\tinodes in use: %lu, limits (soft = %lu, hard = %lu)",
571 &curinodes, &isoftlimit, &ihardlimit);
572 if (cnt != 3) {
573 warnx("%s: %s: bad format", fsp, line2);
574 return (0);
575 }
576 dqblk.dqb_curinodes = curinodes;
577 dqblk.dqb_isoftlimit = isoftlimit;
578 dqblk.dqb_ihardlimit = ihardlimit;
579 for (qup = quplist; qup; qup = qup->next) {
580 if (strcmp(fsp, qup->fsname))
581 continue;
582 /*
583 * Cause time limit to be reset when the quota
584 * is next used if previously had no soft limit
585 * or were under it, but now have a soft limit
586 * and are over it.
587 */
588 if (dqblk.dqb_bsoftlimit &&
589 qup->dqblk.dqb_curblocks >= dqblk.dqb_bsoftlimit &&
590 (qup->dqblk.dqb_bsoftlimit == 0 ||
591 qup->dqblk.dqb_curblocks <
592 qup->dqblk.dqb_bsoftlimit))
593 qup->dqblk.dqb_btime = 0;
594 if (dqblk.dqb_isoftlimit &&
595 qup->dqblk.dqb_curinodes >= dqblk.dqb_isoftlimit &&
596 (qup->dqblk.dqb_isoftlimit == 0 ||
597 qup->dqblk.dqb_curinodes <
598 qup->dqblk.dqb_isoftlimit))
599 qup->dqblk.dqb_itime = 0;
600 qup->dqblk.dqb_bsoftlimit = dqblk.dqb_bsoftlimit;
601 qup->dqblk.dqb_bhardlimit = dqblk.dqb_bhardlimit;
602 qup->dqblk.dqb_isoftlimit = dqblk.dqb_isoftlimit;
603 qup->dqblk.dqb_ihardlimit = dqblk.dqb_ihardlimit;
604 qup->flags |= FOUND;
605 if (dqblk.dqb_curblocks == qup->dqblk.dqb_curblocks &&
606 dqblk.dqb_curinodes == qup->dqblk.dqb_curinodes)
607 break;
608 warnx("%s: cannot change current allocation", fsp);
609 break;
610 }
611 }
612 fclose(fd);
613 /*
614 * Disable quotas for any filesystems that have not been found.
615 */
616 for (qup = quplist; qup; qup = qup->next) {
617 if (qup->flags & FOUND) {
618 qup->flags &= ~FOUND;
619 continue;
620 }
621 qup->dqblk.dqb_bsoftlimit = 0;
622 qup->dqblk.dqb_bhardlimit = 0;
623 qup->dqblk.dqb_isoftlimit = 0;
624 qup->dqblk.dqb_ihardlimit = 0;
625 }
626 return (1);
627}
628
629/*
630 * Convert a quotause list to an ASCII file of grace times.
631 */
632int
633writetimes(quplist, outfd, quotatype)
634 struct quotause *quplist;
635 int outfd;
636 int quotatype;
637{
638 register struct quotause *qup;
639 FILE *fd;
640
641 ftruncate(outfd, 0);
642 lseek(outfd, 0, L_SET);
643 if ((fd = fdopen(dup(outfd), "w")) == NULL)
644 err(1, "%s", tmpfil);
645 fprintf(fd, "Time units may be: days, hours, minutes, or seconds\n");
646 fprintf(fd, "Grace period before enforcing soft limits for %ss:\n",
647 qfextension[quotatype]);
648 for (qup = quplist; qup; qup = qup->next) {
649 fprintf(fd, "%s: block grace period: %s, ",
650 qup->fsname, cvtstoa(qup->dqblk.dqb_btime));
651 fprintf(fd, "file grace period: %s\n",
652 cvtstoa(qup->dqblk.dqb_itime));
653 }
654 fclose(fd);
655 return (1);
656}
657
658/*
659 * Merge changes of grace times in an ASCII file into a quotause list.
660 */
661int
662readtimes(quplist, inname)
663 struct quotause *quplist;
664 char *inname;
665{
666 register struct quotause *qup;
667 FILE *fd;
668 int cnt;
669 register char *cp;
670 time_t itime, btime, iseconds, bseconds;
671 long l_itime, l_btime;
672 char *fsp, bunits[10], iunits[10], line1[BUFSIZ];
673
674 fd = fopen(inname, "r");
675 if (fd == NULL) {
676 warnx("can't re-read temp file!!");
677 return (0);
678 }
679 /*
680 * Discard two title lines, then read lines to process.
681 */
682 (void) fgets(line1, sizeof (line1), fd);
683 (void) fgets(line1, sizeof (line1), fd);
684 while (fgets(line1, sizeof (line1), fd) != NULL) {
685 if ((fsp = strtok(line1, " \t:")) == NULL) {
686 warnx("%s: bad format", line1);
687 return (0);
688 }
689 if ((cp = strtok((char *)0, "\n")) == NULL) {
690 warnx("%s: %s: bad format", fsp, &fsp[strlen(fsp) + 1]);
691 return (0);
692 }
693 cnt = sscanf(cp,
694 " block grace period: %ld %s file grace period: %ld %s",
695 &l_btime, bunits, &l_itime, iunits);
696 if (cnt != 4) {
697 warnx("%s:%s: bad format", fsp, cp);
698 return (0);
699 }
700 btime = l_btime;
701 itime = l_itime;
702 if (cvtatos(btime, bunits, &bseconds) == 0)
703 return (0);
704 if (cvtatos(itime, iunits, &iseconds) == 0)
705 return (0);
706 for (qup = quplist; qup; qup = qup->next) {
707 if (strcmp(fsp, qup->fsname))
708 continue;
709 qup->dqblk.dqb_btime = bseconds;
710 qup->dqblk.dqb_itime = iseconds;
711 qup->flags |= FOUND;
712 break;
713 }
714 }
715 fclose(fd);
716 /*
717 * reset default grace periods for any filesystems
718 * that have not been found.
719 */
720 for (qup = quplist; qup; qup = qup->next) {
721 if (qup->flags & FOUND) {
722 qup->flags &= ~FOUND;
723 continue;
724 }
725 qup->dqblk.dqb_btime = 0;
726 qup->dqblk.dqb_itime = 0;
727 }
728 return (1);
729}
730
731/*
732 * Convert seconds to ASCII times.
733 */
734char *
735cvtstoa(secs)
736 time_t secs;
737{
738 static char buf[20];
739
740 if (secs % (24 * 60 * 60) == 0) {
741 secs /= 24 * 60 * 60;
742 sprintf(buf, "%ld day%s", (long)secs, secs == 1 ? "" : "s");
743 } else if (secs % (60 * 60) == 0) {
744 secs /= 60 * 60;
745 sprintf(buf, "%ld hour%s", (long)secs, secs == 1 ? "" : "s");
746 } else if (secs % 60 == 0) {
747 secs /= 60;
748 sprintf(buf, "%ld minute%s", (long)secs, secs == 1 ? "" : "s");
749 } else
750 sprintf(buf, "%ld second%s", (long)secs, secs == 1 ? "" : "s");
751 return (buf);
752}
753
754/*
755 * Convert ASCII input times to seconds.
756 */
757int
758cvtatos(period, units, seconds)
759 time_t period;
760 char *units;
761 time_t *seconds;
762{
763
764 if (bcmp(units, "second", 6) == 0)
765 *seconds = period;
766 else if (bcmp(units, "minute", 6) == 0)
767 *seconds = period * 60;
768 else if (bcmp(units, "hour", 4) == 0)
769 *seconds = period * 60 * 60;
770 else if (bcmp(units, "day", 3) == 0)
771 *seconds = period * 24 * 60 * 60;
772 else {
773 printf("%s: bad units, specify %s\n", units,
774 "days, hours, minutes, or seconds");
775 return (0);
776 }
777 return (1);
778}
779
780/*
781 * Free a list of quotause structures.
782 */
783void
784freeprivs(quplist)
785 struct quotause *quplist;
786{
787 register struct quotause *qup, *nextqup;
788
789 for (qup = quplist; qup; qup = nextqup) {
790 nextqup = qup->next;
791 free(qup);
792 }
793}
794
795/*
796 * Check whether a string is completely composed of digits.
797 */
798int
799alldigits(s)
800 register const char *s;
801{
802 register int c;
803
804 c = *s++;
805 do {
806 if (!isdigit(c))
807 return (0);
808 } while ((c = *s++));
809 return (1);
810}
811
812/*
813 * Check to see if a particular quota is to be enabled.
814 */
815int
816hasquota(fs, type, qfnamep)
817 register struct fstab *fs;
818 int type;
819 char **qfnamep;
820{
821 register char *opt;
822 char *cp;
823 static char initname, usrname[100], grpname[100];
824 static char buf[BUFSIZ];
825
826 if (!initname) {
827 sprintf(usrname, "%s%s", qfextension[USRQUOTA], qfname);
828 sprintf(grpname, "%s%s", qfextension[GRPQUOTA], qfname);
829 initname = 1;
830 }
831 strcpy(buf, fs->fs_mntops);
832 for (opt = strtok(buf, ","); opt; opt = strtok(NULL, ",")) {
833 if ((cp = index(opt, '=')))
834 *cp++ = '\0';
835 if (type == USRQUOTA && strcmp(opt, usrname) == 0)
836 break;
837 if (type == GRPQUOTA && strcmp(opt, grpname) == 0)
838 break;
839 }
840 if (!opt)
841 return (0);
842 if (cp) {
843 *qfnamep = cp;
844 return (1);
845 }
846 (void) sprintf(buf, "%s/%s.%s", fs->fs_file, qfname, qfextension[type]);
847 *qfnamep = buf;
848 return (1);
849}
|