// Created: 04/01/98
// RCS-ID: $Id$
// Copyright: (c) Julian Smart and Markus Holzem
-// Licence: wxWindows license
+// Licence: wxWindows license
/////////////////////////////////////////////////////////////////////////////
#ifdef __GNUG__
-#pragma implementation "timer.h"
+ #pragma implementation "timer.h"
#endif
// For compilers that support precompilation, includes "wx.h".
#include "wx/wxprec.h"
#ifdef __BORLANDC__
-#pragma hdrstop
+ #pragma hdrstop
#endif
+#include "wx/window.h"
+#include "wx/msw/private.h"
+
#ifndef WX_PRECOMP
-#include "wx/setup.h"
-#include "wx/list.h"
-#include "wx/app.h"
+ #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"
-#include "wx/msw/private.h"
#include <time.h>
#include <sys/types.h>
-#if !defined(__SC__) && !defined(__GNUWIN32__)
-#include <sys/timeb.h>
-#endif
-#ifdef __WIN32__
-#define _EXPORT /**/
-#else
-#define _EXPORT _export
+#if !defined(__SC__) && !defined(__GNUWIN32__) && !defined(__MWERKS__)
+ #include <sys/timeb.h>
#endif
-#include <windows.h>
+// ----------------------------------------------------------------------------
+// private functions
+// ----------------------------------------------------------------------------
wxList wxTimerList(wxKEY_INTEGER);
UINT WINAPI _EXPORT wxTimerProc(HWND hwnd, WORD, int idTimer, DWORD);
+// ----------------------------------------------------------------------------
+// macros
+// ----------------------------------------------------------------------------
+
+#ifdef __WIN32__
+ #define _EXPORT
+#else
+ #define _EXPORT _export
+#endif
+
#if !USE_SHARED_LIBRARY
-IMPLEMENT_ABSTRACT_CLASS(wxTimer, wxObject)
+ IMPLEMENT_ABSTRACT_CLASS(wxTimer, wxObject)
#endif
-wxTimer::wxTimer(void)
+// ============================================================================
+// implementation
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// wxTimer class
+// ----------------------------------------------------------------------------
+
+wxTimer::wxTimer()
+{
+ milli = 0;
+ lastMilli = -1;
+ id = 0;
+}
+
+wxTimer::~wxTimer()
{
- milli = 0 ;
- lastMilli = -1 ;
- id = 0;
+ Stop();
+
+ wxTimerList.DeleteObject(this);
}
-wxTimer::~wxTimer(void)
+bool wxTimer::Start(int milliseconds, bool mode)
{
- Stop();
+ oneShot = mode;
+ if (milliseconds < 0)
+ milliseconds = lastMilli;
+
+ wxCHECK_MSG( milliseconds > 0, FALSE, wxT("invalid value for timer timeour") );
+
+ lastMilli = milli = milliseconds;
+
+ wxTimerList.DeleteObject(this);
+ TIMERPROC wxTimerProcInst = (TIMERPROC)
+ MakeProcInstance((FARPROC)wxTimerProc, wxGetInstance());
+
+ id = SetTimer(NULL, (UINT)(id ? id : 1),
+ (UINT)milliseconds, wxTimerProcInst);
+ if (id > 0)
+ {
+ wxTimerList.Append(id, this);
+
+ return TRUE;
+ }
+ else
+ {
+ wxLogSysError(_("Couldn't create a timer"));
- wxTimerList.DeleteObject(this);
+ return FALSE;
+ }
}
-bool wxTimer::Start(int milliseconds,bool mode)
+void wxTimer::Stop()
{
- oneShot = mode ;
- if (milliseconds < 0)
- milliseconds = lastMilli;
-
- if (milliseconds <= 0)
- return FALSE;
-
- lastMilli = milli = milliseconds;
-
- wxTimerList.DeleteObject(this);
- TIMERPROC wxTimerProcInst = (TIMERPROC) MakeProcInstance((FARPROC)wxTimerProc,
- wxGetInstance());
-
- id = SetTimer(NULL, (UINT)(id ? id : 1), (UINT)milliseconds, wxTimerProcInst);
- if (id > 0)
- {
- wxTimerList.Append(id, this);
- return TRUE;
- }
- else return FALSE;
+ if ( id )
+ {
+ KillTimer(NULL, (UINT)id);
+ wxTimerList.DeleteObject(this);
+ }
+ id = 0;
+ milli = 0;
}
-void wxTimer::Stop(void)
+// ----------------------------------------------------------------------------
+// private functions
+// ----------------------------------------------------------------------------
+
+void wxProcessTimer(wxTimer& timer)
{
- if (id) {
- KillTimer(NULL, (UINT)id);
- wxTimerList.DeleteObject(this); /* @@@@ */
- }
- id = 0 ;
- milli = 0 ;
+ // Avoid to process spurious timer events
+ if ( timer.id == 0)
+ return;
+
+ if ( timer.oneShot )
+ timer.Stop();
+
+ timer.Notify();
}
UINT WINAPI _EXPORT wxTimerProc(HWND WXUNUSED(hwnd), WORD, int idTimer, DWORD)
{
- wxNode *node = wxTimerList.Find((long)idTimer);
- if (node)
- {
- wxTimer *timer = (wxTimer *)node->Data();
- if (timer->id==0)
- return(0) ; // Avoid to process spurious timer events
- if (timer->oneShot)
- timer->Stop() ;
- timer->Notify();
- }
- return 0;
-}
+ wxNode *node = wxTimerList.Find((long)idTimer);
+ wxCHECK_MSG( node, 0, wxT("bogus timer id in wxTimerProc") );
+
+ wxProcessTimer(*(wxTimer *)node->Data());
+
+ return 0;
+}