2 * Copyright (C) 2008, 2009 Apple Inc. All rights reserved.
3 * Copyright (C) 2008 Cameron Zwarich <cwzwarich@uwaterloo.ca>
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. Neither the name of Apple Computer, Inc. ("Apple") nor the names of
15 * its contributors may be used to endorse or promote products derived
16 * from this software without specific prior written permission.
18 * THIS SOFTWARE IS PROVIDED BY APPLE AND ITS CONTRIBUTORS "AS IS" AND ANY
19 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
20 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
21 * DISCLAIMED. IN NO EVENT SHALL APPLE OR ITS CONTRIBUTORS BE LIABLE FOR ANY
22 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
23 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
24 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
25 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 #include "TimeoutChecker.h"
33 #include "CallFrame.h"
34 #include "JSGlobalObject.h"
37 #include <mach/mach.h>
56 // Number of ticks before the first timeout check is done.
57 static const int ticksUntilFirstCheck
= 1024;
59 // Number of milliseconds between each timeout check.
60 static const int intervalBetweenChecks
= 1000;
62 // Returns the time the current thread has spent executing, in milliseconds.
63 static inline unsigned getCPUTime()
66 mach_msg_type_number_t infoCount
= THREAD_BASIC_INFO_COUNT
;
67 thread_basic_info_data_t info
;
69 // Get thread information
70 mach_port_t threadPort
= mach_thread_self();
71 thread_info(threadPort
, THREAD_BASIC_INFO
, reinterpret_cast<thread_info_t
>(&info
), &infoCount
);
72 mach_port_deallocate(mach_task_self(), threadPort
);
74 unsigned time
= info
.user_time
.seconds
* 1000 + info
.user_time
.microseconds
/ 1000;
75 time
+= info
.system_time
.seconds
* 1000 + info
.system_time
.microseconds
/ 1000;
78 #elif HAVE(SYS_TIME_H)
79 // FIXME: This should probably use getrusage with the RUSAGE_THREAD flag.
82 return tv
.tv_sec
* 1000 + tv
.tv_usec
/ 1000;
84 QDateTime t
= QDateTime::currentDateTime();
85 return t
.toTime_t() * 1000 + t
.time().msec();
86 #elif PLATFORM(WIN_OS)
89 unsigned long long fileTimeAsLong
;
90 } userTime
, kernelTime
;
92 // GetThreadTimes won't accept NULL arguments so we pass these even though
94 FILETIME creationTime
, exitTime
;
96 GetThreadTimes(GetCurrentThread(), &creationTime
, &exitTime
, &kernelTime
.fileTime
, &userTime
.fileTime
);
98 return userTime
.fileTimeAsLong
/ 10000 + kernelTime
.fileTimeAsLong
/ 10000;
100 #error Platform does not have getCurrentTime function
104 TimeoutChecker::TimeoutChecker()
105 : m_timeoutInterval(0)
111 void TimeoutChecker::reset()
113 m_ticksUntilNextCheck
= ticksUntilFirstCheck
;
114 m_timeAtLastCheck
= 0;
118 bool TimeoutChecker::didTimeOut(ExecState
* exec
)
120 unsigned currentTime
= getCPUTime();
122 if (!m_timeAtLastCheck
) {
123 // Suspicious amount of looping in a script -- start timing it
124 m_timeAtLastCheck
= currentTime
;
128 unsigned timeDiff
= currentTime
- m_timeAtLastCheck
;
133 m_timeExecuting
+= timeDiff
;
134 m_timeAtLastCheck
= currentTime
;
136 // Adjust the tick threshold so we get the next checkTimeout call in the
137 // interval specified in intervalBetweenChecks.
138 m_ticksUntilNextCheck
= static_cast<unsigned>((static_cast<float>(intervalBetweenChecks
) / timeDiff
) * m_ticksUntilNextCheck
);
139 // If the new threshold is 0 reset it to the default threshold. This can happen if the timeDiff is higher than the
140 // preferred script check time interval.
141 if (m_ticksUntilNextCheck
== 0)
142 m_ticksUntilNextCheck
= ticksUntilFirstCheck
;
144 if (exec
->dynamicGlobalObject()->shouldInterruptScriptBeforeTimeout())
147 if (m_timeoutInterval
&& m_timeExecuting
> m_timeoutInterval
) {
148 if (exec
->dynamicGlobalObject()->shouldInterruptScript())