try not thinning when loading old-school automation lists
[ardour.git] / libs / ardour / cycle_timer.cc
1 /*
2     Copyright (C) 2002 Andrew Morton
3
4     This program is free software; you can redistribute it and/or modify
5     it under the terms of the GNU General Public License as published by
6     the Free Software Foundation; either version 2 of the License, or
7     (at your option) any later version.
8
9     This program is distributed in the hope that it will be useful,
10     but WITHOUT ANY WARRANTY; without even the implied warranty of
11     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12     GNU General Public License for more details.
13
14     You should have received a copy of the GNU General Public License
15     along with this program; if not, write to the Free Software
16     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
17
18 */
19
20 #include <cstdio>
21 #include <fstream>
22 #include "pbd/error.h"
23 #include "ardour/cycle_timer.h"
24
25 #include "i18n.h"
26
27 using namespace std;
28 using namespace PBD;
29
30 float CycleTimer::cycles_per_usec = 0;
31
32 float
33 get_mhz()
34 {
35         FILE *f;
36
37         if ((f = fopen("/proc/cpuinfo", "r")) == 0) {
38                 fatal << _("CycleTimer::get_mhz(): can't open /proc/cpuinfo") << endmsg;
39                 /*NOTREACHED*/
40                 return 0.0f;
41         }
42
43         while (true) {
44
45                 float mhz;
46                 int ret;
47                 char buf[1000];
48
49                 if (fgets (buf, sizeof(buf), f) == 0) {
50                         fatal << _("CycleTimer::get_mhz(): cannot locate cpu MHz in /proc/cpuinfo") << endmsg;
51                         /*NOTREACHED*/
52                         return 0.0f;
53                 }
54
55 #ifdef __powerpc__
56
57                 int   imhz;
58
59                 /* why can't the PPC crew standardize their /proc/cpuinfo format ? */
60                 ret = sscanf (buf, "clock\t: %dMHz", &imhz);
61                 mhz = (float) imhz;
62
63 #else /* XXX don't assume its x86 just because its not power pc */
64                 ret = sscanf (buf, "cpu MHz         : %f", &mhz);
65
66 #endif
67                 if (ret == 1) {
68                         fclose(f);
69                         return mhz;
70                 }
71         }
72
73         fatal << _("cannot locate cpu MHz in /proc/cpuinfo") << endmsg;
74         /*NOTREACHED*/
75         return 0.0f;
76 }
77
78 StoringTimer::StoringTimer (int N)
79 {
80         _point = new int[N];
81         _value = new cycles_t[N];
82         _ref = new cycles_t[N];
83         _max_points = N;
84         _points = 0;
85 }
86         
87
88 void
89 StoringTimer::dump (string const & file)
90 {
91         ofstream f (file.c_str ());
92
93         f << min (_points, _max_points) << "\n";
94         f << get_mhz () << "\n";
95         for (int i = 0; i < min (_points, _max_points); ++i) {
96                 f << _point[i] << " " << _ref[i] << " " << _value[i] << "\n";
97         }
98 }
99
100 void
101 StoringTimer::ref ()
102 {
103         _current_ref = get_cycles ();
104 }
105
106 void
107 StoringTimer::check (int p)
108 {
109         if (_points == _max_points) {
110                 ++_points;
111                 return;
112         } else if (_points > _max_points) {
113                 return;
114         }
115         
116         _point[_points] = p;
117         _value[_points] = get_cycles ();
118         _ref[_points] = _current_ref;
119         
120         ++_points;
121 }
122
123 #ifdef PT_TIMING
124 StoringTimer ST (64 * 1024);
125 #endif
126
127