#include <u.h>
#include <libc.h>

char	output[4096];
void	add(char*, ...);
void	error(char*);
void	notifyf(void*, char*);

void
main(int argc, char *argv[])
{
	int i;
	Waitmsg w;
	long l;
	char *p;
	char err[ERRLEN];

	if(argc <= 1){
		fprint(2, "usage: time command\n");
		exits("usage");
	}

	switch(fork()){
	case -1:
		error("fork");
	case 0:
		exec(argv[1], &argv[1]);
		if(argv[1][0] != '/' && strncmp(argv[1], "./", 2) &&
		   strncmp(argv[1], "../", 3)){
			sprint(output, "/bin/%s", argv[1]);
			exec(output, &argv[1]);
		}
		error(argv[1]);
	}

	notify(notifyf);

    loop:
	i = wait(&w);
	if(i == -1){
		errstr(err);
		if(strcmp(err, "interrupted") == 0)
			goto loop;
		error("wait");
	}
	l = atoi(&w.time[0*12]);
	add("%ld.%.2ldu", l/1000, (l%1000)/10);
	l = atoi(&w.time[1*12]);
	add("%ld.%.2lds", l/1000, (l%1000)/10);
	l = atoi(&w.time[2*12]);
	add("%ld.%.2ldr", l/1000, (l%1000)/10);
	add("\t");
	for(i=1; i<argc; i++){
		add("%s", argv[i], 0);
		if(i>4){
			add("...");
			break;
		}
	}
	if(w.msg[0]){
		p = utfrune(w.msg, ':');
		if(p && p[1])
			p++;
		else
			p = w.msg;
		add(" # status=%s", p);
	}
	fprint(2, "%s\n", output);
	exits(w.msg);
}

void
add(char *a, ...)
{
	static beenhere=0;

	if(beenhere)
		strcat(output, " ");
	doprint(output+strlen(output), output+sizeof(output), a, (&a)+1);
	beenhere++;
}

void
error(char *s)
{
	char buf[ERRLEN];

	errstr(buf);
	fprint(2, "time: %s: %s\n", s, buf);
	exits(s);
}

void
notifyf(void *a, char *s)
{
	USED(a);
	if(strcmp(s, "interrupt") == 0)
		noted(NCONT);
	noted(NDFLT);
}