/*  * This file is part of the UCB release of Plan 9. It is subject to the license * terms in the LICENSE file found in the top-level directory of this * distribution and at http://akaros.cs.berkeley.edu/files/Plan9License. No * part of the UCB release of Plan 9, including this file, may be copied, * modified, propagated, or distributed except according to the terms contained * in the LICENSE file. */ #include "stdinc.h"#include "dat.h"#include "fns.h" intnamecmp(char *s, char *t){	return strncmp(s, t, ANameSize);} voidnamecp(char *dst, char *src){	strncpy(dst, src, ANameSize - 1);	dst[ANameSize - 1] = '\0';} intnameok(char *name){	char *t;	int c; 	if(name == nil)		return -1;	for(t = name; c = *t; t++)		if(t - name >= ANameSize		|| c < ' ' || c >= 0x7f)			return -1;	return 0;} intstru32int(char *s, u32int *r){	char *t;	u32int n, nn, m;	int c; 	m = TWID32 / 10;	n = 0;	for(t = s; ; t++){		c = *t;		if(c < '0' || c > '9')			break;		if(n > m)			return -1;		nn = n * 10 + c - '0';		if(nn < n)			return -1;		n = nn;	}	*r = n;	return s != t && *t == '\0';} intstru64int(char *s, u64int *r){	char *t;	u64int n, nn, m;	int c; 	m = TWID64 / 10;	n = 0;	for(t = s; ; t++){		c = *t;		if(c < '0' || c > '9')			break;		if(n > m)			return -1;		nn = n * 10 + c - '0';		if(nn < n)			return -1;		n = nn;	}	*r = n;	return s != t && *t == '\0';} intvttypevalid(int type){	return type < VtMaxType;} static char*logit(int severity, char *fmt, va_list args){	char *s; 	s = vsmprint(fmt, args);	if(s == nil)		return nil;	if(severity != EOk){		if(argv0 == nil)			fprint(2, "%T %s: err %d: %s\n", argv0, severity, s);		else			fprint(2, "%T err %d: %s\n", severity, s);	}	return s;} voidseterr(int severity, char *fmt, ...){	char *s;	va_list args; 	va_start(args, fmt);	s = logit(severity, fmt, args);	va_end(args);	if(s == nil)		werrstr("error setting error");	else{		werrstr("%s", s);		free(s);	}} voidlogerr(int severity, char *fmt, ...){	char *s;	va_list args; 	va_start(args, fmt);	s = logit(severity, fmt, args);	va_end(args);	free(s);} u32intnow(void){	return time(nil);} int abortonmem = 1; void *emalloc(ulong n){	void *p; 	p = malloc(n);	if(p == nil){		if(abortonmem)			abort();		sysfatal("out of memory allocating %lud", n);	}	memset(p, 0xa5, n);	setmalloctag(p, getcallerpc(&n));if(0)print("emalloc %p-%p by %#p\n", p, (char*)p+n, getcallerpc(&n));	return p;} void *ezmalloc(ulong n){	void *p; 	p = malloc(n);	if(p == nil){		if(abortonmem)			abort();		sysfatal("out of memory allocating %lud", n);	}	memset(p, 0, n);	setmalloctag(p, getcallerpc(&n));if(0)print("ezmalloc %p-%p by %#p\n", p, (char*)p+n, getcallerpc(&n));	return p;} void *erealloc(void *p, ulong n){	p = realloc(p, n);	if(p == nil){		if(abortonmem)			abort();		sysfatal("out of memory allocating %lud", n);	}	setrealloctag(p, getcallerpc(&p));if(0)print("erealloc %p-%p by %#p\n", p, (char*)p+n, getcallerpc(&p));	return p;} char *estrdup(char *s){	char *t;	int n; 	n = strlen(s) + 1;	t = emalloc(n);	memmove(t, s, n);	setmalloctag(t, getcallerpc(&s));if(0)print("estrdup %p-%p by %#p\n", t, (char*)t+n, getcallerpc(&s));	return t;} /* * return floor(log2(v)) */intu64log2(u64int v){	int i; 	for(i = 0; i < 64; i++)		if((v >> i) <= 1)			break;	return i;} intvtproc(void (*fn)(void*), void *arg){	proccreate(fn, arg, 256*1024);	return 0;} intientryfmt(Fmt *fmt){	IEntry *ie; 	ie = va_arg(fmt->args, IEntry*);	return fmtprint(fmt, "%V %22lld %3d %5d %3d",		ie->score, ie->ia.addr, ie->ia.type, ie->ia.size, ie->ia.blocks);} voidventifmtinstall(void){	fmtinstall('F', vtfcallfmt);	fmtinstall('H', encodefmt);	fmtinstall('I', ientryfmt);	fmtinstall('T', vttimefmt);	fmtinstall('V', vtscorefmt);} uintmsec(void){	return nsec()/1000000;} uintcountbits(uint n){	n = (n&0x55555555)+((n>>1)&0x55555555);	n = (n&0x33333333)+((n>>2)&0x33333333);	n = (n&0x0F0F0F0F)+((n>>4)&0x0F0F0F0F);	n = (n&0x00FF00FF)+((n>>8)&0x00FF00FF);	n = (n&0x0000FFFF)+((n>>16)&0x0000FFFF);	return n;}