diff options
author | Alexander Chemeris <Alexander.Chemeris@gmail.com> | 2013-08-29 02:50:43 +0400 |
---|---|---|
committer | Alexander Chemeris <Alexander.Chemeris@gmail.com> | 2013-08-29 02:50:43 +0400 |
commit | 7b638e53d0084a6417fd0d50d0ebdeb33e6906a3 (patch) | |
tree | aabfa958faf6ee983ad9a3e7572400da9297b347 | |
parent | 0ffe815bbce78c896a6cc0b8a689afdfcfe4f5ae (diff) |
Checking in implementation of the real-time monitoring.
-rw-r--r-- | Transceiver52M/Makefile.am | 12 | ||||
-rw-r--r-- | Transceiver52M/RTMD.c | 247 | ||||
-rw-r--r-- | Transceiver52M/RTMD.h | 86 | ||||
-rw-r--r-- | Transceiver52M/cycle.h | 514 |
4 files changed, 857 insertions, 2 deletions
diff --git a/Transceiver52M/Makefile.am b/Transceiver52M/Makefile.am index 1103e6e..7397e93 100644 --- a/Transceiver52M/Makefile.am +++ b/Transceiver52M/Makefile.am @@ -47,6 +47,11 @@ EXTRA_DIST = \ noinst_LTLIBRARIES = libtransceiver.la +RTMD_SOURCES = \ + RTMD.c + + + COMMON_SOURCES = \ radioInterface.cpp \ radioVector.cpp \ @@ -57,7 +62,8 @@ COMMON_SOURCES = \ DummyLoad.cpp libtransceiver_la_SOURCES = \ - $(COMMON_SOURCES) + $(COMMON_SOURCES) \ + $(RTMD_SOURCES) noinst_PROGRAMS = \ transceiver \ @@ -74,7 +80,9 @@ noinst_HEADERS = \ USRPDevice.h \ DummyLoad.h \ rcvLPF_651.h \ - sendLPF_961.h + sendLPF_961.h \ + RTMD.h \ + cycle.h transceiver_SOURCES = multiTRX.cpp transceiver_LDADD = \ diff --git a/Transceiver52M/RTMD.c b/Transceiver52M/RTMD.c new file mode 100644 index 0000000..a6b77d1 --- /dev/null +++ b/Transceiver52M/RTMD.c @@ -0,0 +1,247 @@ +#include <stdio.h> +#include <sys/time.h> +#include <stdlib.h> +#include <string.h> + +#ifdef __hpux +#include <sys/types.h> +#else +#include <stdint.h> +#endif + +#define RTMD_THREAD_SAFE +//#define NO_CYCLE + +#ifndef WITH_RTMD +#define WITH_RTMD +#endif +#include "RTMD.h" + +#define secs _unsec._tval.secs +#define usecs _unsec._tval.usecs +#define val _unval._sln.val +#define lineNumber _unval._sln.lineNumber +#define tick _unsec.tick +#define val64 _unval.val64 + +#ifndef NO_CYCLE +#include "cycle.h" +#define EXTRA_SPACE (1024) +#else +#define EXTRA_SPACE 0 +#endif + +static RTMD_Node_t* mem = 0; + +#if _POSIX_C_SOURCE >= 200112L || _XOPEN_SOURCE >= 600 +static void* node_alloc(size_t size) +{ + void* mem = NULL; + int res = posix_memalign(&mem, sizeof(RTMD_Node_t), size*sizeof(RTMD_Node_t)); + if (res) + perror("posix_memalign"); + return mem; +} +#else +//#warning Compiling without posix_memalign +#define node_alloc(x) malloc((x)*sizeof(RTMD_Node_t)) +#endif + +/* Need to be volatile for proper work from signal handlers */ +static volatile unsigned ptr = 0; +static unsigned count = 0; + +int RTMD_IsFull(void) { + return ptr==count; +} + +void RTMD_InitStorage(unsigned max) +{ + int i; + if (mem != NULL) + return; + + mem = node_alloc((max + 2*EXTRA_SPACE)); + count = max; + ptr = 0; + +#ifdef NO_CYCLE + for (i = 0; i < 32; i++) + RTMD_VAL("#init", i); +#else + for (i = 0; i < 1024; i++) + RTMD_InitCycleTime("#cycle"); + for (i = 0; i < 64; i++) + RTMD_VAL("#cyctst", i); +#endif +} + +void RTMD_FlushStorage(const char* filename) +{ + FILE* f; +#ifndef NO_CYCLE + int i; + for (i = 0; i < 1024; i++) + RTMD_InitCycleTime("#cycleend"); +#endif + + f = fopen(filename, "w+b"); + if (f != NULL) + { + fwrite(mem, ptr * sizeof(RTMD_Node_t), 1, f); + fclose(f); + } + else + { + fprintf(stderr, "RTMD: Can't flush RTMD to %s file!\n", filename); + } + + free(mem); + ptr = 0; + count = 0; + mem = NULL; +} + +#ifdef NO_CYCLE +void RTMD_SetInt(const char* name, int clineNumber, int cval) +{ + if (mem == NULL) + return; + + struct timeval tv; + int err = gettimeofday(&tv, NULL); + if (err) + { +/* fprintf(stderr, "RTMD: Can't get time!\n"); */ + return; + } + RTMD_SetTime(name, clineNumber, cval, &tv); +} +#endif + +void RTMD_SetTime(const char* name, int clineNumber, int cval, const struct timeval *tv) +{ + if (mem == NULL) + return; + + if (ptr < count) + { + unsigned slot; +#ifdef __hpux + slot = ptr++; +#else + slot = __sync_fetch_and_add(&ptr, 1); +#endif + /* + * You can use ' slot = ptr++; ' instead the instruction above, + * but this doesn't guarantee proper work in a multi-thread application + */ + + if (slot < count) + { + mem[slot].secs = tv->tv_sec; + mem[slot].usecs = tv->tv_usec; + mem[slot].lineNumber = clineNumber; + mem[slot].val = cval; + + strncpy(mem[slot].name, name, RTMD_MAX_NAME - 1); + mem[slot].cycleFlag = RTMD_FLAG_GTOFDAY; + } + } + else + { +/* fprintf(stderr, "RTMD: Storage is full!\n"); */ + } + +} + + + +#ifndef NO_CYCLE +void RTMD_InitCycleTime(const char* name) +{ + struct timeval tv; + int err = gettimeofday(&tv, NULL); + if (err) + { +/* fprintf(stderr, "RTMD: Can't get time!\n"); */ + return; + } + + if (mem == NULL) + return; + + if (ptr < count + EXTRA_SPACE) + { + unsigned slot; +#ifdef __hpux + slot = ptr++; +#else + slot = __sync_fetch_and_add(&ptr, 1); +#endif + /* + * You can use ' slot = ptr++; ' instead the instruction above, + * but this doesn't guarantee proper work in a multi-thread application + */ + + if (slot < count + EXTRA_SPACE) + { + mem[slot].secs = tv.tv_sec; + mem[slot].usecs = tv.tv_usec; + mem[slot].val64 = getticks(); + + strncpy(mem[slot].name, name, RTMD_MAX_NAME - 1); + mem[slot].cycleFlag = RTMD_FLAG_CYCLEINI; + } + } + else + { +/* fprintf(stderr, "RTMD: Storage is full!\n"); */ + } + +} + +void RTMD_SetInt(const char* name, int clineNumber, int cval) +{ +// if (mem == NULL) +// return; + + if (ptr < count) + { + unsigned slot; +#ifdef __hpux + slot = ptr++; +#else +# ifdef RTMD_THREAD_SAFE + slot = __sync_fetch_and_add(&ptr, 1); +# else + slot = ptr++; +# endif +#endif + /* + * You can use ' slot = ptr++; ' instead the instruction above, + * but this doesn't guarantee proper work in a multi-thread application + */ + + if (slot < count) + { + mem[slot].tick = getticks(); + mem[slot].lineNumber = clineNumber; + mem[slot].val = cval; + +#ifdef RTMD_SAFE_ALIGN + strncpy(mem[slot].name, name, RTMD_MAX_NAME - 1); +#else + //May not work on PA-RISC due to memory align + *((int64_t * )mem[slot].name) = *((const int64_t * )name); + *((int64_t * )&mem[slot].name[8]) = *((const int64_t * )&name[8]); +#endif + mem[slot].cycleFlag = RTMD_FLAG_CYCLE; + } + } + else + { +/* fprintf(stderr, "RTMD: Storage is full!\n"); */ + } +} +#endif diff --git a/Transceiver52M/RTMD.h b/Transceiver52M/RTMD.h new file mode 100644 index 0000000..3659c8e --- /dev/null +++ b/Transceiver52M/RTMD.h @@ -0,0 +1,86 @@ +/* + * RTMD.h + * + * Created on: Oct 18, 2010 + * Author: serg + */ + +#ifndef RTMD_H_ +#define RTMD_H_ + +#ifdef __cplusplus +extern "C" { +#endif +/* + * Library prototypes + */ + +#if defined WITH_RTMD && !defined NO_RTMD + +void RTMD_InitStorage(unsigned max); +void RTMD_FlushStorage(const char* filename); + +void RTMD_SetInt(const char* name, int lineNumber, int val); +void RTMD_SetTime(const char* name, int lineNumber, int val, const struct timeval *tv); + +/* Cycle extension */ +void RTMD_SetCycleTime(const char* name, int lineNumber, int val); +void RTMD_InitCycleTime(const char* name); + +int RTMD_IsFull(void); + +#define RTMD_MAX_NAME 16 + +#define RTMD_FLAG_GTOFDAY 'G' +#define RTMD_FLAG_CYCLE 'C' +#define RTMD_FLAG_CYCLEINI 'I' + +typedef struct RTMD_Node { + char name[RTMD_MAX_NAME-1]; + char cycleFlag; + + union { + struct { + uint32_t secs; + uint32_t usecs; + } _tval; + uint64_t tick; + } _unsec; + + union { + struct { + uint32_t lineNumber; + uint32_t val; + } _sln; + uint64_t val64; + } _unval; +} RTMD_Node_t; + + + +# define RTMD_VAL(a, v) RTMD_SetInt((a), __LINE__, (v)) +# define RTMD_SET(a) RTMD_SetInt((a), __LINE__, 1) +# define RTMD_CLEAR(a) RTMD_SetInt((a), __LINE__, 0) +# define RTMD_PULSE(a) ( RTMD_SET(a), RTMD_CLEAR(a)) +# define RTMD_INIT(x) RTMD_InitStorage((x)) +# define RTMD_FLUSH(x) RTMD_FlushStorage((x)) +# define RTMD_SETTIME(a, tv) RTMD_SetTime((a), __LINE__, 1, tv); +# define RTMD_CLEARTIME(a, tv) RTMD_SetTime((a), __LINE__, 0, tv); +# define RTMD_FULL RTMD_IsFull +#else +# define RTMD_VAL(a, v) +# define RTMD_SET(a) +# define RTMD_CLEAR(a) +# define RTMD_PULSE(a) +# define RTMD_INIT(x) +# define RTMD_FLUSH(x) +# define RTMD_SETTIME(a, tv) +# define RTMD_CLEARTIME(a, tv) +# define RTMD_FULL +#endif + +#ifdef __cplusplus +} +#endif + +#endif /* RTMD_H_ */ diff --git a/Transceiver52M/cycle.h b/Transceiver52M/cycle.h new file mode 100644 index 0000000..1a528b5 --- /dev/null +++ b/Transceiver52M/cycle.h @@ -0,0 +1,514 @@ +/* + * Copyright (c) 2003, 2007-8 Matteo Frigo + * Copyright (c) 2003, 2007-8 Massachusetts Institute of Technology + * + * Permission is hereby granted, free of charge, to any person obtaining + * a copy of this software and associated documentation files (the + * "Software"), to deal in the Software without restriction, including + * without limitation the rights to use, copy, modify, merge, publish, + * distribute, sublicense, and/or sell copies of the Software, and to + * permit persons to whom the Software is furnished to do so, subject to + * the following conditions: + * + * The above copyright notice and this permission notice shall be + * included in all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, + * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF + * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND + * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE + * LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION + * OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION + * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. + * + */ + + +/* machine-dependent cycle counters code. Needs to be inlined. */ + +/***************************************************************************/ +/* To use the cycle counters in your code, simply #include "cycle.h" (this + file), and then use the functions/macros: + + ticks getticks(void); + + ticks is an opaque typedef defined below, representing the current time. + You extract the elapsed time between two calls to gettick() via: + + double elapsed(ticks t1, ticks t0); + + which returns a double-precision variable in arbitrary units. You + are not expected to convert this into human units like seconds; it + is intended only for *comparisons* of time intervals. + + (In order to use some of the OS-dependent timer routines like + Solaris' gethrtime, you need to paste the autoconf snippet below + into your configure.ac file and #include "config.h" before cycle.h, + or define the relevant macros manually if you are not using autoconf.) +*/ + +/***************************************************************************/ +/* This file uses macros like HAVE_GETHRTIME that are assumed to be + defined according to whether the corresponding function/type/header + is available on your system. The necessary macros are most + conveniently defined if you are using GNU autoconf, via the tests: + + dnl --------------------------------------------------------------------- + + AC_C_INLINE + AC_HEADER_TIME + AC_CHECK_HEADERS([sys/time.h c_asm.h intrinsics.h mach/mach_time.h]) + + AC_CHECK_TYPE([hrtime_t],[AC_DEFINE(HAVE_HRTIME_T, 1, [Define to 1 if hrtime_t is defined in <sys/time.h>])],,[#if HAVE_SYS_TIME_H +#include <sys/time.h> +#endif]) + + AC_CHECK_FUNCS([gethrtime read_real_time time_base_to_time clock_gettime mach_absolute_time]) + + dnl Cray UNICOS _rtc() (real-time clock) intrinsic + AC_MSG_CHECKING([for _rtc intrinsic]) + rtc_ok=yes + AC_TRY_LINK([#ifdef HAVE_INTRINSICS_H +#include <intrinsics.h> +#endif], [_rtc()], [AC_DEFINE(HAVE__RTC,1,[Define if you have the UNICOS _rtc() intrinsic.])], [rtc_ok=no]) + AC_MSG_RESULT($rtc_ok) + + dnl --------------------------------------------------------------------- +*/ + +/***************************************************************************/ + +#if TIME_WITH_SYS_TIME +# include <sys/time.h> +# include <time.h> +#else +# if HAVE_SYS_TIME_H +# include <sys/time.h> +# else +# include <time.h> +# endif +#endif + +#define INLINE_ELAPSED(INL) static INL double elapsed(ticks t1, ticks t0) \ +{ \ + return (double)t1 - (double)t0; \ +} + +/*----------------------------------------------------------------*/ +/* Solaris */ +#if defined(HAVE_GETHRTIME) && defined(HAVE_HRTIME_T) && !defined(HAVE_TICK_COUNTER) +typedef hrtime_t ticks; + +#define getticks gethrtime + +INLINE_ELAPSED(inline) + +#define HAVE_TICK_COUNTER +#endif + +/*----------------------------------------------------------------*/ +/* AIX v. 4+ routines to read the real-time clock or time-base register */ +#if defined(HAVE_READ_REAL_TIME) && defined(HAVE_TIME_BASE_TO_TIME) && !defined(HAVE_TICK_COUNTER) +typedef timebasestruct_t ticks; + +static __inline ticks getticks(void) +{ + ticks t; + read_real_time(&t, TIMEBASE_SZ); + return t; +} + +static __inline double elapsed(ticks t1, ticks t0) /* time in nanoseconds */ +{ + time_base_to_time(&t1, TIMEBASE_SZ); + time_base_to_time(&t0, TIMEBASE_SZ); + return (((double)t1.tb_high - (double)t0.tb_high) * 1.0e9 + + ((double)t1.tb_low - (double)t0.tb_low)); +} + +#define HAVE_TICK_COUNTER +#endif + +/*----------------------------------------------------------------*/ +/* + * PowerPC ``cycle'' counter using the time base register. + */ +#if ((((defined(__GNUC__) && (defined(__powerpc__) || defined(__ppc__))) || (defined(__MWERKS__) && defined(macintosh)))) || (defined(__IBM_GCC_ASM) && (defined(__powerpc__) || defined(__ppc__)))) && !defined(HAVE_TICK_COUNTER) +typedef unsigned long long ticks; + +static __inline__ ticks getticks(void) +{ + unsigned int tbl, tbu0, tbu1; + + do { + __asm__ __volatile__ ("mftbu %0" : "=r"(tbu0)); + __asm__ __volatile__ ("mftb %0" : "=r"(tbl)); + __asm__ __volatile__ ("mftbu %0" : "=r"(tbu1)); + } while (tbu0 != tbu1); + + return (((unsigned long long)tbu0) << 32) | tbl; +} + +INLINE_ELAPSED(__inline__) + +#define HAVE_TICK_COUNTER +#endif + +/* MacOS/Mach (Darwin) time-base register interface (unlike UpTime, + from Carbon, requires no additional libraries to be linked). */ +#if defined(HAVE_MACH_ABSOLUTE_TIME) && defined(HAVE_MACH_MACH_TIME_H) && !defined(HAVE_TICK_COUNTER) +#include <mach/mach_time.h> +typedef uint64_t ticks; +#define getticks mach_absolute_time +INLINE_ELAPSED(__inline__) +#define HAVE_TICK_COUNTER +#endif + +/*----------------------------------------------------------------*/ +/* + * Pentium cycle counter + */ +#if (defined(__GNUC__) || defined(__ICC)) && defined(__i386__) && !defined(HAVE_TICK_COUNTER) +typedef unsigned long long ticks; + +static __inline__ ticks getticks(void) +{ + ticks ret; + + __asm__ __volatile__("rdtsc": "=A" (ret)); + /* no input, nothing else clobbered */ + return ret; +} + +INLINE_ELAPSED(__inline__) + +#define HAVE_TICK_COUNTER +#define TIME_MIN 5000.0 /* unreliable pentium IV cycle counter */ +#endif + +/* Visual C++ -- thanks to Morten Nissov for his help with this */ +#if _MSC_VER >= 1200 && _M_IX86 >= 500 && !defined(HAVE_TICK_COUNTER) +#include <windows.h> +typedef LARGE_INTEGER ticks; +#define RDTSC __asm __emit 0fh __asm __emit 031h /* hack for VC++ 5.0 */ + +static __inline ticks getticks(void) +{ + ticks retval; + + __asm { + RDTSC + mov retval.HighPart, edx + mov retval.LowPart, eax + } + return retval; +} + +static __inline double elapsed(ticks t1, ticks t0) +{ + return (double)t1.QuadPart - (double)t0.QuadPart; +} + +#define HAVE_TICK_COUNTER +#define TIME_MIN 5000.0 /* unreliable pentium IV cycle counter */ +#endif + +/*----------------------------------------------------------------*/ +/* + * X86-64 cycle counter + */ +#if (defined(__GNUC__) || defined(__ICC) || defined(__SUNPRO_C)) && defined(__x86_64__) && !defined(HAVE_TICK_COUNTER) +typedef unsigned long long ticks; + +static __inline__ ticks getticks(void) +{ + unsigned a, d; + asm volatile("rdtsc" : "=a" (a), "=d" (d)); + return ((ticks)a) | (((ticks)d) << 32); +} + +INLINE_ELAPSED(__inline__) + +#define HAVE_TICK_COUNTER +#endif + +/* PGI compiler, courtesy Cristiano Calonaci, Andrea Tarsi, & Roberto Gori. + NOTE: this code will fail to link unless you use the -Masmkeyword compiler + option (grrr). */ +#if defined(__PGI) && defined(__x86_64__) && !defined(HAVE_TICK_COUNTER) +typedef unsigned long long ticks; +static ticks getticks(void) +{ + asm(" rdtsc; shl $0x20,%rdx; mov %eax,%eax; or %rdx,%rax; "); +} +INLINE_ELAPSED(__inline__) +#define HAVE_TICK_COUNTER +#endif + +/* Visual C++, courtesy of Dirk Michaelis */ +#if _MSC_VER >= 1400 && (defined(_M_AMD64) || defined(_M_X64)) && !defined(HAVE_TICK_COUNTER) + +#include <intrin.h> +#pragma intrinsic(__rdtsc) +typedef unsigned __int64 ticks; +#define getticks __rdtsc +INLINE_ELAPSED(__inline) + +#define HAVE_TICK_COUNTER +#endif + +/*----------------------------------------------------------------*/ +/* + * IA64 cycle counter + */ + +/* intel's icc/ecc compiler */ +#if (defined(__EDG_VERSION) || defined(__ECC)) && defined(__ia64__) && !defined(HAVE_TICK_COUNTER) +typedef unsigned long ticks; +#include <ia64intrin.h> + +static __inline__ ticks getticks(void) +{ + return __getReg(_IA64_REG_AR_ITC); +} + +INLINE_ELAPSED(__inline__) + +#define HAVE_TICK_COUNTER +#endif + +/* gcc */ +#if defined(__GNUC__) && defined(__ia64__) && !defined(HAVE_TICK_COUNTER) +typedef unsigned long ticks; + +static __inline__ ticks getticks(void) +{ + ticks ret; + + __asm__ __volatile__ ("mov %0=ar.itc" : "=r"(ret)); + return ret; +} + +INLINE_ELAPSED(__inline__) + +#define HAVE_TICK_COUNTER +#endif + +/* HP/UX IA64 compiler, courtesy Teresa L. Johnson: */ +#if defined(__hpux) && defined(__ia64) && !defined(HAVE_TICK_COUNTER) +#include <machine/sys/inline.h> +typedef unsigned long ticks; + +static inline ticks getticks(void) +{ + ticks ret; + + ret = _Asm_mov_from_ar (_AREG_ITC); + return ret; +} + +INLINE_ELAPSED(inline) + +#define HAVE_TICK_COUNTER +#endif + +/* Microsoft Visual C++ */ +#if defined(_MSC_VER) && defined(_M_IA64) && !defined(HAVE_TICK_COUNTER) +typedef unsigned __int64 ticks; + +# ifdef __cplusplus +extern "C" +# endif +ticks __getReg(int whichReg); +#pragma intrinsic(__getReg) + +static __inline ticks getticks(void) +{ + volatile ticks temp; + temp = __getReg(3116); + return temp; +} + +INLINE_ELAPSED(inline) + +#define HAVE_TICK_COUNTER +#endif + +/*----------------------------------------------------------------*/ +/* + * PA-RISC cycle counter + */ +#if defined(__hppa__) || defined(__hppa) && !defined(HAVE_TICK_COUNTER) +typedef unsigned long ticks; + +# ifdef __GNUC__ +static __inline__ ticks getticks(void) +{ + ticks ret; + + __asm__ __volatile__("mfctl 16, %0": "=r" (ret)); + /* no input, nothing else clobbered */ + return ret; +} +# else +# include <machine/inline.h> +static __inline unsigned long getticks(void) +{ + register ticks ret; + _MFCTL(16, ret); + return ret; +} +# endif + +INLINE_ELAPSED(__inline) + +#define HAVE_TICK_COUNTER +#endif + +/*----------------------------------------------------------------*/ +/* S390, courtesy of James Treacy */ +#if defined(__GNUC__) && defined(__s390__) && !defined(HAVE_TICK_COUNTER) +typedef unsigned long long ticks; + +static __inline__ ticks getticks(void) +{ + ticks cycles; + __asm__("stck 0(%0)" : : "a" (&(cycles)) : "memory", "cc"); + return cycles; +} + +INLINE_ELAPSED(__inline__) + +#define HAVE_TICK_COUNTER +#endif +/*----------------------------------------------------------------*/ +#if defined(__GNUC__) && defined(__alpha__) && !defined(HAVE_TICK_COUNTER) +/* + * The 32-bit cycle counter on alpha overflows pretty quickly, + * unfortunately. A 1GHz machine overflows in 4 seconds. + */ +typedef unsigned int ticks; + +static __inline__ ticks getticks(void) +{ + unsigned long cc; + __asm__ __volatile__ ("rpcc %0" : "=r"(cc)); + return (cc & 0xFFFFFFFF); +} + +INLINE_ELAPSED(__inline__) + +#define HAVE_TICK_COUNTER +#endif + +/*----------------------------------------------------------------*/ +#if defined(__GNUC__) && defined(__sparc_v9__) && !defined(HAVE_TICK_COUNTER) +typedef unsigned long ticks; + +static __inline__ ticks getticks(void) +{ + ticks ret; + __asm__ __volatile__("rd %%tick, %0" : "=r" (ret)); + return ret; +} + +INLINE_ELAPSED(__inline__) + +#define HAVE_TICK_COUNTER +#endif + +/*----------------------------------------------------------------*/ +#if (defined(__DECC) || defined(__DECCXX)) && defined(__alpha) && defined(HAVE_C_ASM_H) && !defined(HAVE_TICK_COUNTER) +# include <c_asm.h> +typedef unsigned int ticks; + +static __inline ticks getticks(void) +{ + unsigned long cc; + cc = asm("rpcc %v0"); + return (cc & 0xFFFFFFFF); +} + +INLINE_ELAPSED(__inline) + +#define HAVE_TICK_COUNTER +#endif +/*----------------------------------------------------------------*/ +/* SGI/Irix */ +#if defined(HAVE_CLOCK_GETTIME) && defined(CLOCK_SGI_CYCLE) && !defined(HAVE_TICK_COUNTER) +typedef struct timespec ticks; + +static inline ticks getticks(void) +{ + struct timespec t; + clock_gettime(CLOCK_SGI_CYCLE, &t); + return t; +} + +static inline double elapsed(ticks t1, ticks t0) +{ + return ((double)t1.tv_sec - (double)t0.tv_sec) * 1.0E9 + + ((double)t1.tv_nsec - (double)t0.tv_nsec); +} +#define HAVE_TICK_COUNTER +#endif + +/*----------------------------------------------------------------*/ +/* Cray UNICOS _rtc() intrinsic function */ +#if defined(HAVE__RTC) && !defined(HAVE_TICK_COUNTER) +#ifdef HAVE_INTRINSICS_H +# include <intrinsics.h> +#endif + +typedef long long ticks; + +#define getticks _rtc + +INLINE_ELAPSED(inline) + +#define HAVE_TICK_COUNTER +#endif + +/*----------------------------------------------------------------*/ +/* MIPS ZBus */ +#if HAVE_MIPS_ZBUS_TIMER +#if defined(__mips__) && !defined(HAVE_TICK_COUNTER) +#include <sys/mman.h> +#include <unistd.h> +#include <fcntl.h> + +typedef uint64_t ticks; + +static inline ticks getticks(void) +{ + static uint64_t* addr = 0; + + if (addr == 0) + { + uint32_t rq_addr = 0x10030000; + int fd; + int pgsize; + + pgsize = getpagesize(); + fd = open ("/dev/mem", O_RDONLY | O_SYNC, 0); + if (fd < 0) { + perror("open"); + return NULL; + } + addr = mmap(0, pgsize, PROT_READ, MAP_SHARED, fd, rq_addr); + close(fd); + if (addr == (uint64_t *)-1) { + perror("mmap"); + return NULL; + } + } + + return *addr; +} + +INLINE_ELAPSED(inline) + +#define HAVE_TICK_COUNTER +#endif +#endif /* HAVE_MIPS_ZBUS_TIMER */ + |