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>
41 #include "CurrentTime.h"
45 #include <AEEStdLib.h>
52 // Number of ticks before the first timeout check is done.
53 static const int ticksUntilFirstCheck
= 1024;
55 // Number of milliseconds between each timeout check.
56 static const int intervalBetweenChecks
= 1000;
58 // Returns the time the current thread has spent executing, in milliseconds.
59 static inline unsigned getCPUTime()
62 mach_msg_type_number_t infoCount
= THREAD_BASIC_INFO_COUNT
;
63 thread_basic_info_data_t info
;
65 // Get thread information
66 mach_port_t threadPort
= mach_thread_self();
67 thread_info(threadPort
, THREAD_BASIC_INFO
, reinterpret_cast<thread_info_t
>(&info
), &infoCount
);
68 mach_port_deallocate(mach_task_self(), threadPort
);
70 unsigned time
= info
.user_time
.seconds
* 1000 + info
.user_time
.microseconds
/ 1000;
71 time
+= info
.system_time
.seconds
* 1000 + info
.system_time
.microseconds
/ 1000;
77 unsigned long long fileTimeAsLong
;
78 } userTime
, kernelTime
;
80 // GetThreadTimes won't accept NULL arguments so we pass these even though
82 FILETIME creationTime
, exitTime
;
84 GetThreadTimes(GetCurrentThread(), &creationTime
, &exitTime
, &kernelTime
.fileTime
, &userTime
.fileTime
);
86 return userTime
.fileTimeAsLong
/ 10000 + kernelTime
.fileTimeAsLong
/ 10000;
87 #elif PLATFORM(BREWMP)
88 // This function returns a continuously and linearly increasing millisecond
89 // timer from the time the device was powered on.
90 // There is only one thread in BREW, so this is enough.
93 // FIXME: We should return the time the current thread has spent executing.
94 return currentTime() * 1000;
98 TimeoutChecker::TimeoutChecker()
99 : m_timeoutInterval(0)
105 void TimeoutChecker::reset()
107 m_ticksUntilNextCheck
= ticksUntilFirstCheck
;
108 m_timeAtLastCheck
= 0;
112 bool TimeoutChecker::didTimeOut(ExecState
* exec
)
114 unsigned currentTime
= getCPUTime();
116 if (!m_timeAtLastCheck
) {
117 // Suspicious amount of looping in a script -- start timing it
118 m_timeAtLastCheck
= currentTime
;
122 unsigned timeDiff
= currentTime
- m_timeAtLastCheck
;
127 m_timeExecuting
+= timeDiff
;
128 m_timeAtLastCheck
= currentTime
;
130 // Adjust the tick threshold so we get the next checkTimeout call in the
131 // interval specified in intervalBetweenChecks.
132 m_ticksUntilNextCheck
= static_cast<unsigned>((static_cast<float>(intervalBetweenChecks
) / timeDiff
) * m_ticksUntilNextCheck
);
133 // If the new threshold is 0 reset it to the default threshold. This can happen if the timeDiff is higher than the
134 // preferred script check time interval.
135 if (m_ticksUntilNextCheck
== 0)
136 m_ticksUntilNextCheck
= ticksUntilFirstCheck
;
138 if (exec
->dynamicGlobalObject()->shouldInterruptScriptBeforeTimeout())
141 if (m_timeoutInterval
&& m_timeExecuting
> m_timeoutInterval
) {
142 if (exec
->dynamicGlobalObject()->shouldInterruptScript())