2017-05-17 13:15:09 -04:00
|
|
|
/// @file
|
2018-10-25 11:13:01 -04:00
|
|
|
/// @brief QF/C++ port to Win32 API (multi-threaded)
|
2018-09-10 12:44:19 -04:00
|
|
|
/// @ingroup ports
|
2017-05-17 13:15:09 -04:00
|
|
|
/// @cond
|
2015-05-14 16:05:04 -04:00
|
|
|
///***************************************************************************
|
2020-07-18 17:58:58 -04:00
|
|
|
/// Last updated for version 6.8.2
|
|
|
|
/// Last updated on 2020-06-23
|
2015-05-14 16:05:04 -04:00
|
|
|
///
|
2018-09-10 12:44:19 -04:00
|
|
|
/// Q u a n t u m L e a P s
|
|
|
|
/// ------------------------
|
|
|
|
/// Modern Embedded Software
|
2015-05-14 16:05:04 -04:00
|
|
|
///
|
2020-03-17 21:33:58 -04:00
|
|
|
/// Copyright (C) 2005-2020 Quantum Leaps. All rights reserved.
|
2015-05-14 16:05:04 -04:00
|
|
|
///
|
|
|
|
/// This program is open source software: you can redistribute it and/or
|
|
|
|
/// modify it under the terms of the GNU General Public License as published
|
|
|
|
/// by the Free Software Foundation, either version 3 of the License, or
|
|
|
|
/// (at your option) any later version.
|
|
|
|
///
|
|
|
|
/// Alternatively, this program may be distributed and modified under the
|
|
|
|
/// terms of Quantum Leaps commercial licenses, which expressly supersede
|
|
|
|
/// the GNU General Public License and are specifically designed for
|
|
|
|
/// licensees interested in retaining the proprietary status of their code.
|
|
|
|
///
|
|
|
|
/// This program is distributed in the hope that it will be useful,
|
|
|
|
/// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
/// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
/// GNU General Public License for more details.
|
|
|
|
///
|
|
|
|
/// You should have received a copy of the GNU General Public License
|
2019-10-27 12:26:31 -04:00
|
|
|
/// along with this program. If not, see <www.gnu.org/licenses>.
|
2015-05-14 16:05:04 -04:00
|
|
|
///
|
|
|
|
/// Contact information:
|
2019-12-31 15:56:23 -05:00
|
|
|
/// <www.state-machine.com/licensing>
|
2019-10-27 12:26:31 -04:00
|
|
|
/// <info@state-machine.com>
|
2015-05-14 16:05:04 -04:00
|
|
|
///***************************************************************************
|
2017-05-17 13:15:09 -04:00
|
|
|
/// @endcond
|
2018-10-25 11:13:01 -04:00
|
|
|
///
|
2019-10-27 12:26:31 -04:00
|
|
|
#ifndef QF_PORT_HPP
|
|
|
|
#define QF_PORT_HPP
|
2012-08-14 18:00:48 -04:00
|
|
|
|
2014-04-13 21:35:34 -04:00
|
|
|
// Win32 event queue and thread types
|
2015-05-14 16:05:04 -04:00
|
|
|
#define QF_EQUEUE_TYPE QEQueue
|
|
|
|
#define QF_OS_OBJECT_TYPE void*
|
|
|
|
#define QF_THREAD_TYPE void*
|
2014-04-13 21:35:34 -04:00
|
|
|
|
|
|
|
// The maximum number of active objects in the application
|
2020-03-17 21:33:58 -04:00
|
|
|
#define QF_MAX_ACTIVE 64U
|
2014-04-13 21:35:34 -04:00
|
|
|
|
|
|
|
// The number of system clock tick rates
|
2020-03-17 21:33:58 -04:00
|
|
|
#define QF_MAX_TICK_RATE 2U
|
2013-10-10 20:01:51 -04:00
|
|
|
|
2020-07-18 17:58:58 -04:00
|
|
|
// Activate the QF QActive::stop() API
|
|
|
|
#define QF_ACTIVE_STOP 1
|
|
|
|
|
2014-04-13 21:35:34 -04:00
|
|
|
// various QF object sizes configuration for this port
|
2020-03-17 21:33:58 -04:00
|
|
|
#define QF_EVENT_SIZ_SIZE 4U
|
|
|
|
#define QF_EQUEUE_CTR_SIZE 4U
|
|
|
|
#define QF_MPOOL_SIZ_SIZE 4U
|
|
|
|
#define QF_MPOOL_CTR_SIZE 4U
|
|
|
|
#define QF_TIMEEVT_CTR_SIZE 4U
|
2015-05-14 16:05:04 -04:00
|
|
|
|
2018-11-22 11:34:13 -05:00
|
|
|
// Win32 critical section, see NOTE1
|
2018-10-25 11:13:01 -04:00
|
|
|
// QF_CRIT_STAT_TYPE not defined
|
2018-11-22 11:34:13 -05:00
|
|
|
#define QF_CRIT_ENTRY(dummy) QP::QF_enterCriticalSection_()
|
|
|
|
#define QF_CRIT_EXIT(dummy) QP::QF_leaveCriticalSection_()
|
2012-08-14 18:00:48 -04:00
|
|
|
|
2017-02-07 19:55:33 -05:00
|
|
|
// QF_LOG2 not defined -- use the internal LOG2() implementation
|
2016-09-29 19:54:50 -04:00
|
|
|
|
2019-10-27 12:26:31 -04:00
|
|
|
#include "qep_port.hpp" // QEP port
|
|
|
|
#include "qequeue.hpp" // Win32 needs event-queue
|
|
|
|
#include "qmpool.hpp" // Win32 needs memory-pool
|
|
|
|
#include "qpset.hpp" // Win32 needs priority-set
|
|
|
|
#include "qf.hpp" // QF platform-independent public interface
|
2012-08-14 18:00:48 -04:00
|
|
|
|
2013-10-10 20:01:51 -04:00
|
|
|
namespace QP {
|
2012-08-14 18:00:48 -04:00
|
|
|
|
2015-05-14 16:05:04 -04:00
|
|
|
void QF_enterCriticalSection_(void);
|
|
|
|
void QF_leaveCriticalSection_(void);
|
|
|
|
|
2019-02-12 12:47:58 -05:00
|
|
|
// set Win32 thread priority for an active object;
|
|
|
|
// see: Microsoft documentation for SetThreadPriority()
|
|
|
|
// NOTE: must be called *after* QActive::START()
|
2015-05-14 16:05:04 -04:00
|
|
|
//
|
2016-12-01 10:31:49 -05:00
|
|
|
void QF_setWin32Prio(QActive *act, int_t win32Prio);
|
2015-05-14 16:05:04 -04:00
|
|
|
|
2018-10-25 11:13:01 -04:00
|
|
|
// set clock tick rate and priority
|
|
|
|
void QF_setTickRate(uint32_t ticksPerSec, int_t tickPrio);
|
2015-05-14 16:05:04 -04:00
|
|
|
|
|
|
|
// clock tick callback (provided in the app)
|
|
|
|
void QF_onClockTick(void);
|
2012-08-14 18:00:48 -04:00
|
|
|
|
2018-10-25 11:13:01 -04:00
|
|
|
// abstractions for console access...
|
|
|
|
void QF_consoleSetup(void);
|
|
|
|
void QF_consoleCleanup(void);
|
|
|
|
int QF_consoleGetKey(void);
|
|
|
|
int QF_consoleWaitForKey(void);
|
|
|
|
|
2014-04-13 21:35:34 -04:00
|
|
|
} // namespace QP
|
2012-08-14 18:00:48 -04:00
|
|
|
|
2015-06-06 18:30:55 -04:00
|
|
|
|
2016-05-05 12:22:15 -04:00
|
|
|
// special adaptations for QWIN GUI applications
|
|
|
|
#ifdef QWIN_GUI
|
2015-06-06 18:30:55 -04:00
|
|
|
// replace main() with main_gui() as the entry point to a GUI app.
|
|
|
|
#define main() main_gui()
|
|
|
|
int_t main_gui(); // prototype of the GUI application entry point
|
|
|
|
#endif
|
|
|
|
|
2013-10-10 20:01:51 -04:00
|
|
|
//****************************************************************************
|
2012-08-14 18:00:48 -04:00
|
|
|
// interface used only inside QF, but not in applications
|
|
|
|
|
2014-04-13 21:35:34 -04:00
|
|
|
#ifdef QP_IMPL
|
2016-04-01 13:55:34 -04:00
|
|
|
|
|
|
|
// Win32-specific scheduler locking, see NOTE2
|
2016-09-29 19:54:50 -04:00
|
|
|
#define QF_SCHED_STAT_
|
|
|
|
#define QF_SCHED_LOCK_(dummy) QF_enterCriticalSection_()
|
|
|
|
#define QF_SCHED_UNLOCK_() QF_leaveCriticalSection_()
|
2016-04-01 13:55:34 -04:00
|
|
|
|
2014-04-13 21:35:34 -04:00
|
|
|
// Win32-specific event queue customization
|
2012-08-14 18:00:48 -04:00
|
|
|
#define QACTIVE_EQUEUE_WAIT_(me_) \
|
2020-03-17 21:33:58 -04:00
|
|
|
while ((me_)->m_eQueue.m_frontEvt == nullptr) { \
|
2012-08-14 18:00:48 -04:00
|
|
|
QF_CRIT_EXIT_(); \
|
|
|
|
(void)WaitForSingleObject((me_)->m_osObject, (DWORD)INFINITE); \
|
|
|
|
QF_CRIT_ENTRY_(); \
|
|
|
|
}
|
|
|
|
|
|
|
|
#define QACTIVE_EQUEUE_SIGNAL_(me_) \
|
2020-03-17 21:33:58 -04:00
|
|
|
Q_ASSERT_ID(410, QF::active_[(me_)->m_prio] != nullptr); \
|
2012-08-14 18:00:48 -04:00
|
|
|
(void)SetEvent((me_)->m_osObject)
|
|
|
|
|
2014-04-13 21:35:34 -04:00
|
|
|
// Win32-specific event pool operations
|
2015-05-14 16:05:04 -04:00
|
|
|
#define QF_EPOOL_TYPE_ QMPool
|
|
|
|
|
2016-11-08 12:48:44 -05:00
|
|
|
#define QF_EPOOL_INIT_(p_, poolSto_, poolSize_, evtSize_) \
|
|
|
|
(p_).init((poolSto_), (poolSize_), (evtSize_))
|
2015-05-14 16:05:04 -04:00
|
|
|
|
2012-08-14 18:00:48 -04:00
|
|
|
#define QF_EPOOL_EVENT_SIZE_(p_) ((p_).getBlockSize())
|
2013-10-10 20:01:51 -04:00
|
|
|
#define QF_EPOOL_GET_(p_, e_, m_) \
|
|
|
|
((e_) = static_cast<QEvt *>((p_).get((m_))))
|
2012-08-14 18:00:48 -04:00
|
|
|
#define QF_EPOOL_PUT_(p_, e_) ((p_).put(e_))
|
|
|
|
|
2018-11-22 11:34:13 -05:00
|
|
|
// Minimum required Windows version is Windows-XP or newer (0x0501)
|
|
|
|
#ifdef WINVER
|
|
|
|
#undef WINVER
|
|
|
|
#endif
|
|
|
|
#ifdef _WIN32_WINNT
|
|
|
|
#undef _WIN32_WINNT
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#define WINVER _WIN32_WINNT_WINXP
|
|
|
|
#define _WIN32_WINNT _WIN32_WINNT_WINXP
|
|
|
|
|
2012-08-14 18:00:48 -04:00
|
|
|
#define WIN32_LEAN_AND_MEAN
|
2018-10-25 11:13:01 -04:00
|
|
|
#include <windows.h> // Win32 API
|
2015-05-14 16:05:04 -04:00
|
|
|
|
2014-04-13 21:35:34 -04:00
|
|
|
#endif // QP_IMPL
|
2012-08-14 18:00:48 -04:00
|
|
|
|
2015-05-14 16:05:04 -04:00
|
|
|
// NOTES: ====================================================================
|
|
|
|
//
|
|
|
|
// NOTE1:
|
2012-08-14 18:00:48 -04:00
|
|
|
// QF, like all real-time frameworks, needs to execute certain sections of
|
2018-11-22 11:34:13 -05:00
|
|
|
// code exclusively, meaning that only one thread can execute the code at
|
|
|
|
// the time. Such sections of code are called "critical sections"
|
2012-08-14 18:00:48 -04:00
|
|
|
//
|
2018-11-22 11:34:13 -05:00
|
|
|
// This port uses a pair of functions QF_enterCriticalSection_() /
|
|
|
|
// QF_leaveCriticalSection_() to enter/leave the cirtical section,
|
|
|
|
// respectively.
|
2012-08-14 18:00:48 -04:00
|
|
|
//
|
2018-11-22 11:34:13 -05:00
|
|
|
// These functions are implemented in the qf_port.c module, where they
|
|
|
|
// manipulate the file-scope Win32 critical section object l_win32CritSect
|
|
|
|
// to protect all critical sections. Using the single critical section
|
|
|
|
// object for all crtical section guarantees that only one thread at a time
|
|
|
|
// can execute inside a critical section. This prevents race conditions and
|
|
|
|
// data corruption.
|
2012-08-14 18:00:48 -04:00
|
|
|
//
|
|
|
|
// Please note, however, that the Win32 critical section implementation
|
2018-11-22 11:34:13 -05:00
|
|
|
// behaves differently than interrupt disabling. A common Win32 critical
|
|
|
|
// section ensures that only one thread at a time can execute a critical
|
|
|
|
// section, but it does not guarantee that a context switch cannot occur
|
|
|
|
// within the critical section. In fact, such context switches probably
|
|
|
|
// will happen, but they should not cause concurrency hazards because the
|
|
|
|
// critical section eliminates all race conditionis.
|
2012-08-14 18:00:48 -04:00
|
|
|
//
|
|
|
|
// Unlinke simply disabling and enabling interrupts, the critical section
|
|
|
|
// approach is also subject to priority inversions. Various versions of
|
|
|
|
// Windows handle priority inversions differently, but it seems that most of
|
|
|
|
// them recognize priority inversions and dynamically adjust the priorities of
|
|
|
|
// threads to prevent it. Please refer to the MSN articles for more
|
|
|
|
// information.
|
|
|
|
//
|
2015-05-14 16:05:04 -04:00
|
|
|
// NOTE2:
|
2016-04-01 13:55:34 -04:00
|
|
|
// Scheduler locking (used inside QF_publish_()) is implemented in this
|
|
|
|
// port with the main critical section. This means that event multicasting
|
|
|
|
// will appear atomic, in the sense that no thread will be able to post
|
|
|
|
// events during multicasting.
|
|
|
|
//
|
2012-08-14 18:00:48 -04:00
|
|
|
|
2019-10-27 12:26:31 -04:00
|
|
|
#endif // QF_PORT_HPP
|