home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / wxos2240.zip / wxWindows-2.4.0 / src / os2 / timer.cpp < prev    next >
C/C++ Source or Header  |  2002-08-25  |  5KB  |  176 lines
  1. /////////////////////////////////////////////////////////////////////////////
  2. // Name:        timer.cpp
  3. // Purpose:     wxTimer implementation
  4. // Author:      David Webster
  5. // Modified by:
  6. // Created:     10/17/99
  7. // RCS-ID:      $Id: TIMER.CPP,v 1.12 2002/08/25 17:58:43 SN Exp $
  8. // Copyright:   (c) David Webster
  9. // Licence:     wxWindows licence
  10. /////////////////////////////////////////////////////////////////////////////
  11.  
  12. #ifdef __GNUG__
  13.     #pragma implementation "timer.h"
  14. #endif
  15.  
  16. // For compilers that support precompilation, includes "wx.h".
  17. #include "wx/wxprec.h"
  18.  
  19. #include "wx/window.h"
  20. #include "wx/os2/private.h"
  21.  
  22. #ifndef WX_PRECOMP
  23.     #include "wx/setup.h"
  24.     #include "wx/list.h"
  25.     #include "wx/event.h"
  26.     #include "wx/app.h"
  27. #endif
  28.  
  29. #include "wx/intl.h"
  30. #include "wx/log.h"
  31.  
  32. #include "wx/timer.h"
  33.  
  34. #include <time.h>
  35. #include <sys/types.h>
  36.  
  37. #include <sys/timeb.h>
  38. // ----------------------------------------------------------------------------
  39. // private functions
  40. // ----------------------------------------------------------------------------
  41.  
  42. wxList wxTimerList(wxKEY_INTEGER);
  43. ULONG wxTimerProc(HWND hwnd, ULONG, int nIdTimer, ULONG);
  44.  
  45. // ----------------------------------------------------------------------------
  46. // macros
  47. // ----------------------------------------------------------------------------
  48.  
  49. IMPLEMENT_ABSTRACT_CLASS(wxTimer, wxObject)
  50.  
  51. void wxTimer::Init()
  52. {
  53.     m_ulId = 0;
  54. }
  55.  
  56. wxTimer::~wxTimer()
  57. {
  58.     wxTimer::Stop();
  59.  
  60.     wxTimerList.DeleteObject(this);
  61. }
  62.  
  63. void wxTimer::Notify()
  64. {
  65.     //
  66.     // The base class version generates an event if it has owner - which it
  67.     // should because otherwise nobody can process timer events, but it does
  68.     // not use the OS's ID, which OS/2 must have to figure out which timer fired
  69.     //
  70.     wxCHECK_RET( m_owner, _T("wxTimer::Notify() should be overridden.") );
  71.  
  72.     wxTimerEvent                    vEvent( m_idTimer
  73.                                            ,m_milli
  74.                                           );
  75.  
  76.     (void)m_owner->ProcessEvent(vEvent);
  77. } // end of wxTimer::Notify
  78.  
  79. bool wxTimer::Start(
  80.   int                               nMilliseconds
  81. , bool                              bOneShot
  82. )
  83. {
  84.     (void)wxTimerBase::Start( nMilliseconds
  85.                              ,bOneShot
  86.                             );
  87.  
  88.     wxCHECK_MSG( m_milli > 0L, FALSE, wxT("invalid value for timer") );
  89.  
  90.     wxTimerList.DeleteObject(this);
  91.  
  92.     wxWindow*                       pWin = NULL;
  93.  
  94.     if (m_owner)
  95.     {
  96.         pWin = (wxWindow*)m_owner;
  97.         m_ulId = ::WinStartTimer( m_Hab
  98.                                  ,pWin->GetHWND()
  99.                                  ,m_idTimer
  100.                                  ,(ULONG)nMilliseconds
  101.                                 );
  102.     }
  103.     else
  104.         m_ulId = ::WinStartTimer( m_Hab
  105.                                  ,NULLHANDLE
  106.                                  ,0
  107.                                  ,(ULONG)nMilliseconds
  108.                                 );
  109.     if (m_ulId > 0L)
  110.     {
  111.         wxTimerList.Append( m_ulId
  112.                            ,this
  113.                           );
  114.         return(TRUE);
  115.     }
  116.     else
  117.     {
  118.         wxLogSysError(_("Couldn't create a timer"));
  119.  
  120.         return(FALSE);
  121.     }
  122. }
  123.  
  124. void wxTimer::Stop()
  125. {
  126.     if ( m_ulId )
  127.     {
  128.         if (m_owner)
  129.         {
  130.             wxWindow*                   pWin = (wxWindow*)m_owner;
  131.  
  132.             ::WinStopTimer(m_Hab, pWin->GetHWND(), m_ulId);
  133.         }
  134.         else
  135.             ::WinStopTimer(m_Hab, NULLHANDLE, m_ulId);
  136.         wxTimerList.DeleteObject(this);
  137.     }
  138.     m_ulId = 0L;
  139. }
  140.  
  141. // ----------------------------------------------------------------------------
  142. // private functions
  143. // ----------------------------------------------------------------------------
  144.  
  145. void wxProcessTimer(
  146.   wxTimer&                          rTimer
  147. )
  148. {
  149.     //
  150.     // Avoid to process spurious timer events
  151.     //
  152.     if (rTimer.m_ulId == 0L)
  153.         return;
  154.  
  155.     if (rTimer.IsOneShot())
  156.         rTimer.Stop();
  157.  
  158.     rTimer.Notify();
  159. }
  160.  
  161. ULONG wxTimerProc(
  162.   HWND                              WXUNUSED(hwnd)
  163. , ULONG
  164. , int                               nIdTimer
  165. , ULONG
  166. )
  167. {
  168.     wxNode*                         pNode = wxTimerList.Find((ULONG)nIdTimer);
  169.  
  170.     wxCHECK_MSG(pNode, 0, wxT("bogus timer id in wxTimerProc") );
  171.     if (pNode)
  172.       wxProcessTimer(*(wxTimer *)pNode->Data());
  173.     return 0;
  174. }
  175.  
  176.