1992/0122/port/devkprof.c (diff list | history)

1992/0111/sys/src/9/port/devkprof.c:8,13 – 1992/0122/sys/src/9/port/devkprof.c:8,14 (short | long | prev | next)
1990/0330		#include "devtab.h"
1990/03292
1991/1006		#define LRES 3 /* log of PC resolution */
1992/0122		#define SZ 4 /* sizeof of count cell; well known as 4 */
1990/03292
1991/1011		struct {
1992/0111/sys/src/9/port/devkprof.c:35,45 – 1992/0122/sys/src/9/port/devkprof.c:36,51
1990/03292		void
1990/0330		kprofreset(void) {
1992/0122		ulong n;
1991/1006		kprof.minpc = KTZERO; kprof.maxpc = (ulong)&etext; kprof.nbuf = (kprof.maxpc-kprof.minpc) >> LRES;
1991/1011		kprof.buf = ialloc(conf.nmach * kprof.nbuf*sizeof kprof.buf[0], 0); kproftab[0].length = conf.nmach * kprof.nbuf*sizeof kprof.buf[0];
1992/0122		n = kprof.nbuf*SZ; kprof.buf = ialloc(n, 0); kproftab[0].length = n; if(SZ != sizeof kprof.buf[0]) panic("kprof size");
1990/0330		} void
1992/0111/sys/src/9/port/devkprof.c:111,124 – 1992/0122/sys/src/9/port/devkprof.c:117,136
1990/03292		} long
1991/0411		kprofread(Chan *c, void *a, long n, ulong offset)
1992/0122		kprofread(Chan *c, void *va, long n, ulong offset)
1990/03292		{
1991/1006		ulong end; switch((int)(c->qid.path&~CHDIR)){
1992/0122		ulong w, *bp; uchar *a, *ea; switch(c->qid.path & ~CHDIR){
1990/03292		case Kprofdirqid:
1990/0330		return devdirread(c, a, n, kproftab, Nkproftab, devgen);
1992/0122		return devdirread(c, va, n, kproftab, Nkproftab, devgen);
1990/03292		case Kprofdataqid:
1991/1011		end = conf.nmach * kprof.nbuf*sizeof kprof.buf[0];
1992/0122		end = kprof.nbuf*SZ; if(offset & (SZ-1)) error(Ebadarg);
1991/1006		if(offset >= end){
1990/0330		n = 0;
1990/03292		break;
1992/0111/sys/src/9/port/devkprof.c:125,134 – 1992/0122/sys/src/9/port/devkprof.c:137,157
1990/03292		}
1991/1006		if(offset+n > end) n = end-offset; memmove(a, ((char *)kprof.buf)+offset, n);
1992/0122		n &= ~(SZ-1); a = va; ea = a + n; bp = kprof.buf + offset/SZ; while(a < ea){ w = *bp++; *a++ = w>>24; *a++ = w>>16; *a++ = w>>8; *a++ = w>>0; }
1990/03292		break;
1992/0122
1990/03292		default: n=0;
1992/0122		n = 0;
1990/03292		break; } return n;
1992/0111/sys/src/9/port/devkprof.c:140,146 – 1992/0122/sys/src/9/port/devkprof.c:163,169
1991/1006		switch((int)(c->qid.path&~CHDIR)){ case Kprofctlqid: if(strncmp(a, "startclr", 8) == 0){
1991/1011		memset((char *)kprof.buf, 0, conf.nmach * kprof.nbuf*sizeof kprof.buf[0]);
1992/0122		memset((char *)kprof.buf, 0, kprof.nbuf*SZ);
1991/1006		kprof.time = 1; }else if(strncmp(a, "start", 5) == 0) kprof.time = 1;
1992/0111/sys/src/9/port/devkprof.c:157,179 – 1992/0122/sys/src/9/port/devkprof.c:180,200
1990/03292		kproftimer(ulong pc) {
1991/1009		extern void spldone(void);
1991/1011		ulong *buf;
1991/1009
1991/1006		if(kprof.time == 0) return;
1990/1004		/* * if the pc is coming out of slplo pr splx, then use * the pc saved when we went splhi.
1992/0122		* if the pc is coming out of slplo pr splx, * use the pc saved when we went splhi.
1990/1004		*/ if(pc>=(ulong)spllo && pc<=(ulong)spldone) pc = m->splpc;
1990/0928
1991/1011		buf = kprof.buf+kprof.nbuf*m->machno; buf[0] += TK2MS(1);
1992/0122		kprof.buf[0] += TK2MS(1);
1991/1006		if(kprof.minpc<=pc && pc<kprof.maxpc){ pc -= kprof.minpc;
1990/0330		pc >>= LRES;
1991/1011		buf[pc] += TK2MS(1);
1992/0122		kprof.buf[pc] += TK2MS(1);
1990/0331		} else
1991/1011		buf[1] += TK2MS(1);
1992/0122		kprof.buf[1] += TK2MS(1);
1990/03292		}