#include <stdio.h>
#include <fcntl.h>
#include <sys/types.h>
#include <unistd.h>
#include <machine/perfmon.h>

#define MHZ 1000

int tsc_usleep(unsigned int usec)
{
    static int pmfd = 0;
    struct pmc_tstamp ts1, ts2;

    if (! pmfd) {
	if ((pmfd = open("/dev/perfmon", O_RDONLY)) < 0)
	    return -1;
    }

    if (ioctl(pmfd, PMIOTSTAMP, &ts1) < 0)
	return -1;
    for (;;) {
	if (ioctl(pmfd, PMIOTSTAMP, &ts2) < 0)
	    return -1;
	if ((ts2.pmct_value - ts1.pmct_value) >= (quad_t)usec * MHZ)
	    break;
    }

    return 0;
}
.