/////////////////////////////////////////////////////////////////////////////
// Name: timer.cpp
// Purpose: wxTimer implementation
-// Author: AUTHOR
+// Author: David Webster
// Modified by:
-// Created: ??/??/98
+// Created: 10/17/99
// RCS-ID: $Id$
-// Copyright: (c) AUTHOR
-// Licence: wxWindows licence
+// Copyright: (c) David Webster
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
-#ifdef __GNUG__
-#pragma implementation "timer.h"
+// For compilers that support precompilation, includes "wx.h".
+#include "wx/wxprec.h"
+
+#include "wx/window.h"
+#include "wx/os2/private.h"
+
+#ifndef WX_PRECOMP
+ #include "wx/setup.h"
+ #include "wx/list.h"
+ #include "wx/event.h"
+ #include "wx/app.h"
#endif
+#include "wx/intl.h"
+#include "wx/log.h"
+
#include "wx/timer.h"
-#if !USE_SHARED_LIBRARY
+#include <time.h>
+#include <sys/types.h>
+
+#include <sys/timeb.h>
+// ----------------------------------------------------------------------------
+// private functions
+// ----------------------------------------------------------------------------
+
+wxList wxTimerList(wxKEY_INTEGER);
+ULONG wxTimerProc(HWND hwnd, ULONG, int nIdTimer, ULONG);
+
+// ----------------------------------------------------------------------------
+// macros
+// ----------------------------------------------------------------------------
+
IMPLEMENT_ABSTRACT_CLASS(wxTimer, wxObject)
-#endif
-wxTimer::wxTimer()
+void wxTimer::Init()
{
- m_milli = 0 ;
- m_id = 0;
- m_oneShot = FALSE;
+ m_ulId = 0;
}
wxTimer::~wxTimer()
{
Stop();
+ wxTimer::Stop();
+ wxTimerList.DeleteObject(this);
}
-bool wxTimer::Start(int milliseconds,bool mode)
+bool wxTimer::Start(
+ int nMilliseconds
+, bool bOneShot
+)
{
- m_oneShot = mode ;
- if (milliseconds <= 0)
- return FALSE;
+ (void)wxTimerBase::Start( nMilliseconds
+ ,bOneShot
+ );
+
+ wxCHECK_MSG( m_milli > 0L, FALSE, wxT("invalid value for timer") );
+
+ wxTimerList.DeleteObject(this);
- m_milli = milliseconds;
+ //
+ // Create a windowless timer
+ //
+ m_ulId = ::WinStartTimer( m_Hab
+ ,NULL
+ ,(m_ulId ? m_ulId : 1L)
+ ,(ULONG)nMilliseconds
+ );
+ if (m_ulId > 0L)
+ {
+ wxTimerList.Append( m_ulId
+ ,this
+ );
+ return(TRUE);
+ }
+ else
+ {
+ wxLogSysError(_("Couldn't create a timer"));
- // TODO: set the timer going.
- return FALSE;
+ return(FALSE);
+ }
}
void wxTimer::Stop()
{
- m_id = 0 ;
- m_milli = 0 ;
+ if ( m_ulId )
+ {
+ ::WinStopTimer(m_Hab, NULL, m_ulId);
+ wxTimerList.DeleteObject(this);
+ }
+ m_ulId = 0L;
}
+// ----------------------------------------------------------------------------
+// private functions
+// ----------------------------------------------------------------------------
+
+void wxProcessTimer(
+ wxTimer& rTimer
+)
+{
+ //
+ // Avoid to process spurious timer events
+ //
+ if (rTimer.m_ulId == 0L)
+ return;
+
+ if (rTimer.IsOneShot())
+ rTimer.Stop();
+
+ rTimer.Notify();
+}
+
+ULONG wxTimerProc(
+ HWND WXUNUSED(hwnd)
+, ULONG
+, int nIdTimer
+, ULONG
+)
+{
+ wxNode* pNode = wxTimerList.Find((ULONG)nIdTimer);
+
+ wxCHECK_MSG(pNode, 0, wxT("bogus timer id in wxTimerProc") );
+
+ wxProcessTimer(*(wxTimer *)pNode->Data());
+ return 0;
+}