src/common/RTMath.cpp

/***************************************************************************
 *                                                                         *
 *   LinuxSampler - modular, streaming capable sampler                     *
 *                                                                         *
 *   Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck   *
 *   Copyright (C) 2005 - 2007 Christian Schoenebeck                       *
 *                                                                         *
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; either version 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 *   This program is distributed in the hope that it will be useful,       *
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
 *   GNU General Public License for more details.                          *
 *                                                                         *
 *   You should have received a copy of the GNU General Public License     *
 *   along with this program; if not, write to the Free Software           *
 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston,                 *
 *   MA  02111-1307  USA                                                   *
 ***************************************************************************/

#include "RTMath.h"

// for unsafeMicroSeconds() implementation
#if !defined(WIN32) && !defined(__APPLE__)
# include <time.h>
#endif

static float CentsToFreqTable[CONFIG_MAX_PITCH * 1200 * 2 + 1]; // +-1200 cents per octave

float* RTMathBase::pCentsToFreqTable(InitCentsToFreqTable());

#if defined(__APPLE__)
#include <mach/mach_time.h>
typedef uint64_t time_stamp_t;
static inline time_stamp_t GetMachTime() {
    return (time_stamp_t) mach_absolute_time();
}
#endif

/*
 * Creates a real time stamp for the current moment. Out of efficiency this
 * is implemented in inline assembly for each CPU independently; we currently
 * don't use a generic solution for CPUs that are not yet covered by the
 * assembly code, instead an error message is prompted on compile time, forcing
 * the user to contact us.
 */
RTMathBase::time_stamp_t RTMathBase::CreateTimeStamp() {
    #if defined(__i386__) || defined(__x86_64__)
    uint64_t t;
    __asm__ __volatile__ ("rdtsc" : "=A" (t));
    return t >> 8;
    #elif defined(__ia64__)
    time_stamp_t t;
    __asm__ __volatile__ ("mov %0=ar.itc" : "=r"(t));
    return t;
    #elif defined(__powerpc__)
    time_stamp_t t;
    __asm__ __volatile__ (
        "98:    mftb %0\n"
        "99:\n"
        ".section __ftr_fixup,\"a\"\n"
        "       .long %1\n"
        "       .long 0\n"
        "       .long 98b\n"
        "       .long 99b\n"
        ".previous"
        : "=r" (t) : "i" (0x00000100)
    );
    return t;
    #elif defined(__alpha__)
    time_stamp_t t;
    __asm__ __volatile__ ("rpcc %0" : "=r"(t));
    return t;
    #elif defined(__APPLE__)
    return GetMachTime();
    #else // we don't want to use a slow generic solution
    #  error "Sorry, LinuxSampler lacks time stamp code for your system."
    #  error "Please report this error and the CPU you are using to the LinuxSampler developers mailing list!"
    #endif
}

RTMathBase::usecs_t RTMathBase::unsafeMicroSeconds(clock_source_t source) {
    #if defined(WIN32)
    LARGE_INTEGER t;
    LARGE_INTEGER f;
    QueryPerformanceCounter(&t);
    if (!QueryPerformanceFrequency(&f)) return 0;
    return usecs_t( double(t.QuadPart) / double(f.QuadPart) * 1000000.0 );
    #elif defined(__APPLE__)
    static mach_timebase_info_data_t tb;
    double t = mach_absolute_time();
    // if this method is run for the first time, get the internal time base
    if (!tb.denom) mach_timebase_info(&tb); // get nanoseconds per tick
    // convert from internal (abstract) time value to microseconds
    return usecs_t( t * double(tb.numer) / double(tb.denom) / 1000.0 );
    #else
    timespec t;
    clockid_t cid;
    switch (source) {
        case process_clock: cid = CLOCK_PROCESS_CPUTIME_ID; break;
        case thread_clock:  cid = CLOCK_THREAD_CPUTIME_ID; break;
        case real_clock:    cid = CLOCK_MONOTONIC; break;
        default:            return 0;
    }
    clock_gettime(cid, &t);
    return usecs_t( (double(t.tv_sec) * 1000000000.0 + double(t.tv_nsec)) / 1000.0 );
    #endif
}

/**
 * Will automatically be called once to initialize the 'Cents to frequency
 * ratio' table.
 */
float* RTMathBase::InitCentsToFreqTable() {
    float* pMiddleOfTable = &CentsToFreqTable[CONFIG_MAX_PITCH * 1200];
    for (int i = -CONFIG_MAX_PITCH * 1200; i <= CONFIG_MAX_PITCH * 1200; i++) {
        pMiddleOfTable[i] = pow(TWELVEHUNDREDTH_ROOT_OF_TWO, i);
    }
    return pMiddleOfTable;
}
1	/***************************************************************************
2	* *
3	* LinuxSampler - modular, streaming capable sampler *
4	* *
5	* Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck *
6	* Copyright (C) 2005 - 2007 Christian Schoenebeck *
7	* *
8	* This program is free software; you can redistribute it and/or modify *
9	* it under the terms of the GNU General Public License as published by *
10	* the Free Software Foundation; either version 2 of the License, or *
11	* (at your option) any later version. *
12	* *
13	* This program is distributed in the hope that it will be useful, *
14	* but WITHOUT ANY WARRANTY; without even the implied warranty of *
15	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
16	* GNU General Public License for more details. *
17	* *
18	* You should have received a copy of the GNU General Public License *
19	* along with this program; if not, write to the Free Software *
20	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, *
21	* MA 02111-1307 USA *
22	***************************************************************************/
23
24	#include "RTMath.h"
25
26	// for unsafeMicroSeconds() implementation
27	#if !defined(WIN32) && !defined(__APPLE__)
28	# include <time.h>
29	#endif
30
31	static float CentsToFreqTable[CONFIG_MAX_PITCH * 1200 * 2 + 1]; // +-1200 cents per octave
32
33	float* RTMathBase::pCentsToFreqTable(InitCentsToFreqTable());
34
35	#if defined(__APPLE__)
36	#include <mach/mach_time.h>
37	typedef uint64_t time_stamp_t;
38	static inline time_stamp_t GetMachTime() {
39	return (time_stamp_t) mach_absolute_time();
40	}
41	#endif
42
43	/*
44	* Creates a real time stamp for the current moment. Out of efficiency this
45	* is implemented in inline assembly for each CPU independently; we currently
46	* don't use a generic solution for CPUs that are not yet covered by the
47	* assembly code, instead an error message is prompted on compile time, forcing
48	* the user to contact us.
49	*/
50	RTMathBase::time_stamp_t RTMathBase::CreateTimeStamp() {
51	#if defined(__i386__) \|\| defined(__x86_64__)
52	uint64_t t;
53	__asm__ __volatile__ ("rdtsc" : "=A" (t));
54	return t >> 8;
55	#elif defined(__ia64__)
56	time_stamp_t t;
57	__asm__ __volatile__ ("mov %0=ar.itc" : "=r"(t));
58	return t;
59	#elif defined(__powerpc__)
60	time_stamp_t t;
61	__asm__ __volatile__ (
62	"98: mftb %0\n"
63	"99:\n"
64	".section __ftr_fixup,\"a\"\n"
65	" .long %1\n"
66	" .long 0\n"
67	" .long 98b\n"
68	" .long 99b\n"
69	".previous"
70	: "=r" (t) : "i" (0x00000100)
71	);
72	return t;
73	#elif defined(__alpha__)
74	time_stamp_t t;
75	__asm__ __volatile__ ("rpcc %0" : "=r"(t));
76	return t;
77	#elif defined(__APPLE__)
78	return GetMachTime();
79	#else // we don't want to use a slow generic solution
80	# error "Sorry, LinuxSampler lacks time stamp code for your system."
81	# error "Please report this error and the CPU you are using to the LinuxSampler developers mailing list!"
82	#endif
83	}
84
85	RTMathBase::usecs_t RTMathBase::unsafeMicroSeconds(clock_source_t source) {
86	#if defined(WIN32)
87	LARGE_INTEGER t;
88	LARGE_INTEGER f;
89	QueryPerformanceCounter(&t);
90	if (!QueryPerformanceFrequency(&f)) return 0;
91	return usecs_t( double(t.QuadPart) / double(f.QuadPart) * 1000000.0 );
92	#elif defined(__APPLE__)
93	static mach_timebase_info_data_t tb;
94	double t = mach_absolute_time();
95	// if this method is run for the first time, get the internal time base
96	if (!tb.denom) mach_timebase_info(&tb); // get nanoseconds per tick
97	// convert from internal (abstract) time value to microseconds
98	return usecs_t( t * double(tb.numer) / double(tb.denom) / 1000.0 );
99	#else
100	timespec t;
101	clockid_t cid;
102	switch (source) {
103	case process_clock: cid = CLOCK_PROCESS_CPUTIME_ID; break;
104	case thread_clock: cid = CLOCK_THREAD_CPUTIME_ID; break;
105	case real_clock: cid = CLOCK_MONOTONIC; break;
106	default: return 0;
107	}
108	clock_gettime(cid, &t);
109	return usecs_t( (double(t.tv_sec) * 1000000000.0 + double(t.tv_nsec)) / 1000.0 );
110	#endif
111	}
112
113	/**
114	* Will automatically be called once to initialize the 'Cents to frequency
115	* ratio' table.
116	*/
117	float* RTMathBase::InitCentsToFreqTable() {
118	float* pMiddleOfTable = &CentsToFreqTable[CONFIG_MAX_PITCH * 1200];
119	for (int i = -CONFIG_MAX_PITCH * 1200; i <= CONFIG_MAX_PITCH * 1200; i++) {
120	pMiddleOfTable[i] = pow(TWELVEHUNDREDTH_ROOT_OF_TWO, i);
121	}
122	return pMiddleOfTable;
123	}