MoochoPack: Miscellaneous Utilities for MOOCHO  Version of the Day
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Groups Pages
StopWatchPack_stopwatch.cpp
1 // @HEADER
2 // ***********************************************************************
3 //
4 // Moocho: Multi-functional Object-Oriented arCHitecture for Optimization
5 // Copyright (2003) Sandia Corporation
6 //
7 // Under terms of Contract DE-AC04-94AL85000, there is a non-exclusive
8 // license for use of this work by or on behalf of the U.S. Government.
9 //
10 // Redistribution and use in source and binary forms, with or without
11 // modification, are permitted provided that the following conditions are
12 // met:
13 //
14 // 1. Redistributions of source code must retain the above copyright
15 // notice, this list of conditions and the following disclaimer.
16 //
17 // 2. Redistributions in binary form must reproduce the above copyright
18 // notice, this list of conditions and the following disclaimer in the
19 // documentation and/or other materials provided with the distribution.
20 //
21 // 3. Neither the name of the Corporation nor the names of the
22 // contributors may be used to endorse or promote products derived from
23 // this software without specific prior written permission.
24 //
25 // THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
26 // EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27 // IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
28 // PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
29 // CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
30 // EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
31 // PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
32 // PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
33 // LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
34 // NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
35 // SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
36 //
37 // Questions? Contact Roscoe A. Bartlett (rabartl@sandia.gov)
38 //
39 // ***********************************************************************
40 // @HEADER
41 
42 //#include <iostream>
43 //#include <iosfwd>
44 
45 #include "StopWatchPack_stopwatch.hpp"
46 #include "Teuchos_Time.hpp"
47 
48 double StopWatchPack::seconds(void)
49 {
50  return Teuchos::Time::wallTime();
51 }
52 
53 /*
54 
55 #ifndef _INTEL_CXX
56 
57 // Implementation using C standard library.
58 // In MS VC++ 6.0 the precision is only about 0.05 sec.
59 
60 #include <time.h>
61 
62 double StopWatchPack::seconds(void)
63 {
64  static const double secs_per_tick = ((double)1.0) / CLOCKS_PER_SEC;
65  const clock_t ticks = clock();
66  const double sec = ( (double) ticks ) * secs_per_tick;
67  //std::cout << "ticks = " << ticks << ", sec = " << sec << std::endl;
68  return sec;
69 }
70 
71 #else // _INTEL_CXX implementation
72 
73 // Windows implementation.
74 
75 #define WIN32_LEAN_AND_MEAN
76 #include <windows.h>
77 #include <assert.h>
78 
79 namespace {
80 
81 bool seconds_initialized = false;
82 LARGE_INTEGER start_count, count_freq; // counts per sec.
83 
84 inline void seconds_initialize() {
85  if( seconds_initialized ) return;
86  // Figure out how often the performance counter increments
87  ::QueryPerformanceFrequency( &count_freq );
88  // Set this thread's priority as high as reasonably possible to prevent
89  // timeslice interruptions
90  ::SetThreadPriority( ::GetCurrentThread(), THREAD_PRIORITY_TIME_CRITICAL );
91  // Get the first count.
92  TEUCHOS_TEST_FOR_EXCEPT( !( QueryPerformanceCounter( &start_count ) ) );
93  seconds_initialized = true;
94 }
95 
96 } // end namespace
97 
98 double StopWatchPack::seconds(void)
99 {
100  seconds_initialize();
101  LARGE_INTEGER count;
102  QueryPerformanceCounter( &count );
103  // "QuadPart" is a 64 bit integer (__int64). VC++ supports them!
104  const double
105  sec = (double)( count.QuadPart - start_count.QuadPart ) / count_freq.QuadPart;
106  //std::cout << "ticks = " << ticks << ", sec = " << sec << std::endl;
107  return sec;
108 }
109 
110 #endif // _INTEL_CXX
111 
112 */
static double wallTime()