shithub: bench9

Info  •  Files  •  Log  •  Branches

add arm64 implementation; silently ignore bad clock runs

--- a/b.c

+++ b/b.c

@@ -13,14 +13,15 @@

 static uvlong adj;

+#if defined(__386__) || defined(__amd64__)

 typedef struct Res {

 	ulong ax, bx, cx, dx;

 }Res;

-

 Res cpuid(ulong ax, ulong cx);

+void _tendp(uvlong *c);

+#endif

 void _tend(uvlong *c);

-void _tendp(uvlong *c);

 void (*tend)(uvlong *c);

 uvlong

@@ -57,7 +58,6 @@

 B *

 benchinit(B *b, char *name)

 {

-	Res r;

 	int i;

 	fmtinstall(L'σ', σfmt);

@@ -64,8 +64,13 @@

 	fmtinstall(L'τ', τfmt);

 	if(tend == nil){

+		tend = _tend;

+#if defined(__386__) || defined(__amd64__)

+		Res r;

 		r = cpuid(0x80000001, 2);

-		tend = (r.dx & (1<<27)) != 0 ? _tendp : _tend;

+		if(r.dx & (1<<27))

+			tend = _tendp;

+#endif

 	}

 	memset(b, 0, sizeof(*b));

@@ -177,7 +182,7 @@

 {

 	uvlong c;

-	if(b->n < 1)

+	if(b->n < 1 || b->tout <= b->tin)

 		return;

 	if(b->step == 0)

@@ -185,8 +190,6 @@

 	b->step++;

 	b->n--;

-	if(b->tout <= b->tin)

-		sysfatal("%ulld ≤ %ulld → t₁ ≤ t₀", b->tout, b->tin);

 	if(b->tout - b->tin < adj) /* sometimes this happens */

 		adj = b->tout - b->tin;

 	c = b->tout - b->tin - adj;

--- /dev/null

+++ b/b_arm64.s

@@ -1,0 +1,12 @@

+#define	SYSREG(op0,op1,Cn,Cm,op2)	SPR(((op0)<<19|(op1)<<16|(Cn)<<12|(Cm)<<8|(op2)<<5))

+#define CNTVCT_EL0			SYSREG(3,3,14,0,2)

+

+TEXT tstart(SB), 1, $-4

+	MRS	CNTVCT_EL0, R1

+	MOV	R1, (R0)

+	RETURN

+

+TEXT _tend(SB), 1, $-4

+	MRS	CNTVCT_EL0, R1

+	MOV	R1, (R0)

+	RETURN

--- a/mkfile

+++ b/mkfile

@@ -2,6 +2,8 @@

 TARG=bench9

 BIN=/$objtype/bin

+arch=`{echo __^$objtype^__}

+CFLAGS=$CFLAGS -D$arch -p

 HFILES=\

 	b.h\