1

/* $Id$ */

     2

     3

/** @file os_timer.cpp */

     4

     5

#include "stdafx.h"

     6

     7

#undef RDTSC_AVAILABLE

     8

     9

/* rdtsc for MSC_VER, uses simple inline assembly, or _rdtsc

    10

 * from external win64.asm because VS2005 does not support inline assembly */

    11

#if defined(_MSC_VER) && !defined(RDTSC_AVAILABLE)

    12

# if _MSC_VER >= 1400

    13

#include <intrin.h>

    14

uint64 _rdtsc()

    15

{

    16

	return __rdtsc();

    17

}

    18

#	else

    19

uint64 _declspec(naked) _rdtsc()

    20

{

    21

	_asm {

    22

		rdtsc

    23

		ret

    24

	}

    25

}

    26

# endif

    27

# define RDTSC_AVAILABLE

    28

#endif

    29

    30

/* rdtsc for OS/2. Hopefully this works, who knows */

    31

#if defined (__WATCOMC__) && !defined(RDTSC_AVAILABLE)

    32

unsigned __int64 _rdtsc();

    33

# pragma aux _rdtsc = 0x0F 0x31 value [edx eax] parm nomemory modify exact [edx eax] nomemory;

    34

# define RDTSC_AVAILABLE

    35

#endif

    36

    37

/* rdtsc for all other *nix-en (hopefully). Use GCC syntax */

    38

#if defined(__i386__) || defined(__x86_64__) && !defined(RDTSC_AVAILABLE)

    39

uint64 _rdtsc()

    40

{

    41

	uint32 high, low;

    42

	__asm__ __volatile__ ("rdtsc" : "=a" (low), "=d" (high));

    43

	return ((uint64)high << 32) | low;

    44

}

    45

# define RDTSC_AVAILABLE

    46

#endif

    47

    48

/* rdtsc for PPC which has this not */

    49

#if (defined(__POWERPC__) || defined(__powerpc__)) && !defined(RDTSC_AVAILABLE)

    50

uint64 _rdtsc()

    51

{

    52

	uint32 high = 0, high2 = 0, low;

    53

	/* PPC does not have rdtsc, so we cheat by reading the two 32-bit time-counters

    54

	 * it has, 'Move From Time Base (Upper)'. Since these are two reads, in the

    55

	 * very unlikely event that the lower part overflows to the upper part while we

    56

	 * read it; we double-check and reread the registers */

    57

	asm volatile (

    58

				  "mftbu %0\n"

    59

				  "mftb %1\n"

    60

				  "mftbu %2\n"

    61

				  "cmpw %3,%4\n"

    62

				  "bne- $-16\n"

    63

				  : "=r" (high), "=r" (low), "=r" (high2)

    64

				  : "0" (high), "2" (high2)

    65

				  );

    66

	return ((uint64)high << 32) | low;

    67

}

    68

# define RDTSC_AVAILABLE

    69

#endif

    70

    71

/* In all other cases we have no support for rdtsc. No major issue,

    72

 * you just won't be able to profile your code with TIC()/TOC() */

    73

#if !defined(RDTSC_AVAILABLE)

    74

#warning "(non-fatal) No support for rdtsc(), you won't be able to profile with TIC/TOC"

    75

uint64 _rdtsc() {return 0;}

    76

#endif