1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
|
#include "mbl_test.h"
//:
// \file
// \brief A place for useful things associated with testing.
// \author iscott
// \date Aug 2005
#include <vcl_cerrno.h>
#include <vcl_string.h>
#include <vcl_fstream.h>
#include <vcl_ctime.h>
#include <vcl_cstdlib.h>
#include <vul/vul_file.h>
#include <vul/vul_expand_path.h>
#include <mbl/mbl_config.h>
//: replace instances of 'from' in 's' with 'to'
static unsigned replace(char from, char to, vcl_string &s)
{
unsigned c = 0;
for (unsigned i=0; i<s.size(); ++i)
if (s[i] == from)
{
c++;
s[i] = to;
}
return c;
}
vcl_string timestamp()
{
char tmpbuf[128];
vcl_time_t ltime;
struct vcl_tm *today;
// Get UNIX-style time and display as number and string.
vcl_time( <ime );
// Convert to time structure and adjust for PM if necessary.
today = vcl_localtime( <ime );
// Use strftime to build a customized time string.
vcl_strftime( tmpbuf, 128, "%Y-%m-%d %H:%M:%S", today );
return vcl_string(tmpbuf);
}
//: A historical measurement recording framework.
// Currently the function will append the measurement to the file specified
// by ${MBL_TEST_SAVE_MEASUREMENT_PATH}/measurement_path, and exports it to Dart.
// In the longer term it may save the value via Dart2.
void mbl_test_save_measurement( const vcl_string &measurement_path, double value)
{
vcl_cout << "<DartMeasurement name=\"" <<
vul_file::strip_directory(measurement_path) <<
"\" type=\"numeric/float\">"<<value<<"</DartMeasurement>" << vcl_endl;
char * cpath = vcl_getenv("MBL_TEST_SAVE_MEASUREMENT_ROOT");
vcl_string path(cpath?cpath:"");
if (path.empty())
path = MBL_CONFIG_TEST_SAVE_MEASUREMENT_ROOT;
if (path.empty()) // Nobody wants the measurements stored this way.
return;
vcl_string config = MBL_CONFIG_BUILD_NAME;
if (config.empty()) config="DEFAULT_CONFIG";
path += '/' + measurement_path + ".txt";
replace('\\', '/', path); // replace Windows-style "\" with Unix-style "/"
path = vul_expand_path(path); // removes trailing or repeated "/"
vul_file::make_directory_path(vul_file::dirname(path));
vcl_ofstream file(path.c_str(), vcl_ios_app | vcl_ios_out);
if (!file)
vcl_cerr << "ERROR: mbl_test_save_measurement: Unable to open file " << path.c_str()
<< "ERRNO: " << errno << '\n';
else
file << timestamp() << ' ' << MBL_CONFIG_BUILD_NAME << ' ' << value << vcl_endl;
}
|
