]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/mac/timer.cpp
Blind fix for bug #529874 .
[wxWidgets.git] / src / mac / timer.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: timer.cpp
3// Purpose: wxTimer implementation
4// Author: AUTHOR
5// Modified by:
6// Created: ??/??/98
7// RCS-ID: $Id$
8// Copyright: (c) AUTHOR
9// Licence: wxWindows licence
10/////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
13#pragma implementation "timer.h"
14#endif
15
16#include "wx/timer.h"
17
18#if !USE_SHARED_LIBRARY
19IMPLEMENT_ABSTRACT_CLASS(wxTimer, wxObject)
20#endif
21
22#ifdef __WXMAC__
23#include "wx/mac/private.h"
24#endif
25#ifndef __DARWIN__
26#include <Timer.h>
27#endif
28
29typedef struct MacTimerInfo
30{
31 TMTask m_task;
32 wxMacNotifierTableRef m_table ;
33 wxTimer* m_timer ;
34} ;
35
36static void wxProcessTimer( unsigned long event , void *data ) ;
37
38static pascal void MacTimerProc( TMTask * t )
39{
40 MacTimerInfo * tm = (MacTimerInfo*) t ;
41 wxMacAddEvent( tm->m_table , wxProcessTimer, 0 , (void*) tm->m_timer , TRUE ) ;
42}
43
44static void wxProcessTimer( unsigned long event , void *data )
45{
46 if ( !data )
47 return ;
48
49 wxTimer* timer = (wxTimer*) data ;
50 if ( timer->IsOneShot() )
51 timer->Stop() ;
52
53 timer->Notify();
54
55 if ( timer->m_info->m_task.tmAddr && !timer->IsOneShot() )
56 {
57 PrimeTime( (QElemPtr) &timer->m_info->m_task , timer->GetInterval() ) ;
58 }
59}
60
61void wxTimer::Init()
62{
63 m_info = new MacTimerInfo() ;
64 m_info->m_task.tmAddr = NULL ;
65 m_info->m_task.tmWakeUp = 0 ;
66 m_info->m_task.tmReserved = 0 ;
67 m_info->m_task.qType = 0 ;
68 m_info->m_table = wxMacGetNotifierTable() ;
69 m_info->m_timer = this ;
70}
71
72bool wxTimer::IsRunning() const
73{
74 return ( m_info->m_task.qType & kTMTaskActive ) ;
75}
76
77wxTimer::~wxTimer()
78{
79 Stop();
80 delete m_info ;
81 m_info = NULL ;
82}
83
84bool wxTimer::Start(int milliseconds,bool mode)
85{
86 (void)wxTimerBase::Start(milliseconds, mode);
87
88 wxCHECK_MSG( m_milli > 0, FALSE, wxT("invalid value for timer timeour") );
89 wxCHECK_MSG( m_info->m_task.tmAddr == NULL , FALSE, wxT("attempting to restart a timer") );
90
91 m_milli = milliseconds;
92#if defined(UNIVERSAL_INTERFACES_VERSION) && (UNIVERSAL_INTERFACES_VERSION >= 0x0340)
93 m_info->m_task.tmAddr = NewTimerUPP( MacTimerProc ) ;
94#else
95 m_info->m_task.tmAddr = NewTimerProc( MacTimerProc ) ;
96#endif
97 m_info->m_task.tmWakeUp = 0 ;
98 m_info->m_task.tmReserved = 0 ;
99 m_info->m_task.qType = 0 ;
100 m_info->m_timer = this ;
101 InsXTime((QElemPtr) &m_info->m_task ) ;
102 PrimeTime( (QElemPtr) &m_info->m_task , m_milli ) ;
103 return FALSE;
104}
105
106void wxTimer::Stop()
107{
108 m_milli = 0 ;
109 if ( m_info->m_task.tmAddr )
110 {
111 RmvTime( (QElemPtr) &m_info->m_task ) ;
112 DisposeTimerUPP(m_info->m_task.tmAddr) ;
113 m_info->m_task.tmAddr = NULL ;
114 }
115 wxMacRemoveAllNotifiersForData( wxMacGetNotifierTable() , this ) ;
116}
117
118
119