#ifndef lint
static	char *sccsid = "@(#)renice.c	4.3 (Berkeley) 83/07/02";
#endif

#include <sys/time.h>
#include <sys/resource.h>
#include <stdio.h>
#include <pwd.h>

/*
 * Change the priority (nice) of processes
 * or groups of processes which are already
 * running.
 */
main(argc, argv)
	char **argv;
{
	int which = PRIO_PROCESS;
	int who = 0, prio, errs = 0;

	argc--, argv++;
	if (argc < 2)
		usage();
	if (strcmp(*argv, "-g") == 0) {
		which = PRIO_PGRP;
		argv++, argc--;
	} else if (strcmp(*argv, "-u") == 0) {
		which = PRIO_USER;
		argv++, argc--;
	}
	prio = atoi(*argv);
	argc--, argv++;
	if (prio > PRIO_MAX)
		prio = PRIO_MAX;
	if (prio < PRIO_MIN)
		prio = PRIO_MIN;
	if (argc == 0)
		errs += donice(which, 0, prio);
	for (; argc > 0; argc--, argv++) {
		if (which == PRIO_USER) {
			register struct passwd *pwd = getpwnam(*argv);
			
			if (pwd == NULL) {
				fprintf(stderr, "renice: %s: unknown user\n",
					*argv);
				continue;
			}
			who = pwd->pw_uid;
		} else {
			who = atoi(*argv);
			if (who < 0) {
				fprintf(stderr, "renice: %s: bad value\n",
					*argv);
				continue;
			}
		}
		errs += donice(which, who, prio);
	}
	exit(errs != 0);
}

donice(which, who, prio)
	int which, who, prio;
{
	int oldprio = getpriority(which, who);
	extern int errno;

	if (oldprio == -1 && errno) {
		fprintf(stderr, "renice: %d: ", who);
		perror("getpriority");
		return (1);
	}
	if (setpriority(which, who, prio) < 0) {
		fprintf(stderr, "renice: %d: ", who);
		perror("setpriority");
		return (1);
	}
	printf("%d: old priority %d, new priority %d\n", who, oldprio, prio);
	return (0);
}

usage()
{
	fprintf(stderr, "usage: renice priority [ pid .... ]\n");
	fprintf(stderr, "or, renice -g priority [ pgrp .... ]\n");
	fprintf(stderr, "or, renice -u priority [ user .... ]\n");
	exit(1);
}