//$file${.::philo.cpp} ####################################################### // // Model: dpp.qm // File: ${.::philo.cpp} // // This code has been generated by QM 4.3.0 (https://www.state-machine.com/qm). // DO NOT EDIT THIS FILE MANUALLY. All your changes will be lost. // // 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. // // 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. // //$endhead${.::philo.cpp} #################################################### #include "qpcpp.h" #include "dpp.h" #include "bsp.h" Q_DEFINE_THIS_FILE // Active object class ------------------------------------------------------- //$declare${AOs::Philo} ###################################################### namespace DPP { //${AOs::Philo} .............................................................. class Philo : public QP::QActive { private: QP::QTimeEvt m_timeEvt; public: Philo(); protected: static QP::QState initial(Philo * const me, QP::QEvt const * const e); static QP::QState thinking(Philo * const me, QP::QEvt const * const e); static QP::QState hungry(Philo * const me, QP::QEvt const * const e); static QP::QState eating(Philo * const me, QP::QEvt const * const e); }; } // namespace DPP //$enddecl${AOs::Philo} ###################################################### namespace DPP { // Local objects ------------------------------------------------------------- static Philo l_philo[N_PHILO]; // storage for all Philos // helper function to provide a randomized think time for Philos inline QP::QTimeEvtCtr think_time() { return static_cast((BSP::random() % BSP::TICKS_PER_SEC) + (BSP::TICKS_PER_SEC/2U)); } // helper function to provide a randomized eat time for Philos inline QP::QTimeEvtCtr eat_time() { return static_cast((BSP::random() % BSP::TICKS_PER_SEC) + BSP::TICKS_PER_SEC); } // helper function to provide the ID of Philo "me" inline uint8_t PHILO_ID(Philo const * const me) { return static_cast(me - l_philo); } enum InternalSignals { // internal signals TIMEOUT_SIG = MAX_SIG }; // Global objects ------------------------------------------------------------ QP::QActive * const AO_Philo[N_PHILO] = { // "opaque" pointers to Philo AO &l_philo[0], &l_philo[1], &l_philo[2], &l_philo[3], &l_philo[4] }; } // namespace DPP // Philo definition ---------------------------------------------------------- // Check for the minimum required QP version #if (QP_VERSION < 630U) || (QP_VERSION != ((QP_RELEASE^4294967295U) % 0x3E8U)) #error qpcpp version 6.3.0 or higher required #endif //$define${AOs::Philo} ####################################################### namespace DPP { //${AOs::Philo} .............................................................. //${AOs::Philo::Philo} ....................................................... Philo::Philo() : QActive(Q_STATE_CAST(&Philo::initial)), m_timeEvt(this, TIMEOUT_SIG, 0U) {} //${AOs::Philo::SM} .......................................................... QP::QState Philo::initial(Philo * const me, QP::QEvt const * const e) { //${AOs::Philo::SM::initial} static bool registered = false; // starts off with 0, per C-standard (void)e; // suppress the compiler warning about unused parameter me->subscribe(EAT_SIG); me->subscribe(TEST_SIG); if (!registered) { registered = true; QS_OBJ_DICTIONARY(&l_philo[0].m_timeEvt); QS_OBJ_DICTIONARY(&l_philo[1].m_timeEvt); QS_OBJ_DICTIONARY(&l_philo[2].m_timeEvt); QS_OBJ_DICTIONARY(&l_philo[3].m_timeEvt); QS_OBJ_DICTIONARY(&l_philo[4].m_timeEvt); QS_FUN_DICTIONARY(&initial); QS_FUN_DICTIONARY(&thinking); QS_FUN_DICTIONARY(&hungry); QS_FUN_DICTIONARY(&eating); } QS_SIG_DICTIONARY(HUNGRY_SIG, me); // signal for each Philos QS_SIG_DICTIONARY(TIMEOUT_SIG, me); // signal for each Philos return Q_TRAN(&thinking); } //${AOs::Philo::SM::thinking} ................................................ QP::QState Philo::thinking(Philo * const me, QP::QEvt const * const e) { QP::QState status_; switch (e->sig) { //${AOs::Philo::SM::thinking} case Q_ENTRY_SIG: { me->m_timeEvt.armX(think_time(), 0U); status_ = Q_HANDLED(); break; } //${AOs::Philo::SM::thinking} case Q_EXIT_SIG: { (void)me->m_timeEvt.disarm(); status_ = Q_HANDLED(); break; } //${AOs::Philo::SM::thinking::TIMEOUT} case TIMEOUT_SIG: { status_ = Q_TRAN(&hungry); break; } //${AOs::Philo::SM::thinking::EAT, DONE} case EAT_SIG: // intentionally fall through case DONE_SIG: { /* EAT or DONE must be for other Philos than this one */ Q_ASSERT(Q_EVT_CAST(TableEvt)->philoNum != PHILO_ID(me)); status_ = Q_HANDLED(); break; } //${AOs::Philo::SM::thinking::TEST} case TEST_SIG: { status_ = Q_HANDLED(); break; } default: { status_ = Q_SUPER(&top); break; } } return status_; } //${AOs::Philo::SM::hungry} .................................................. QP::QState Philo::hungry(Philo * const me, QP::QEvt const * const e) { QP::QState status_; switch (e->sig) { //${AOs::Philo::SM::hungry} case Q_ENTRY_SIG: { TableEvt *pe = Q_NEW(TableEvt, HUNGRY_SIG); pe->philoNum = PHILO_ID(me); AO_Table->POST(pe, me); status_ = Q_HANDLED(); break; } //${AOs::Philo::SM::hungry::EAT} case EAT_SIG: { //${AOs::Philo::SM::hungry::EAT::[Q_EVT_CAST(TableEvt)->philoNum=~} if (Q_EVT_CAST(TableEvt)->philoNum == PHILO_ID(me)) { status_ = Q_TRAN(&eating); } else { status_ = Q_UNHANDLED(); } break; } //${AOs::Philo::SM::hungry::DONE} case DONE_SIG: { /* DONE must be for other Philos than this one */ Q_ASSERT(Q_EVT_CAST(TableEvt)->philoNum != PHILO_ID(me)); status_ = Q_HANDLED(); break; } default: { status_ = Q_SUPER(&top); break; } } return status_; } //${AOs::Philo::SM::eating} .................................................. QP::QState Philo::eating(Philo * const me, QP::QEvt const * const e) { QP::QState status_; switch (e->sig) { //${AOs::Philo::SM::eating} case Q_ENTRY_SIG: { me->m_timeEvt.armX(eat_time(), 0U); status_ = Q_HANDLED(); break; } //${AOs::Philo::SM::eating} case Q_EXIT_SIG: { TableEvt *pe = Q_NEW(TableEvt, DONE_SIG); pe->philoNum = PHILO_ID(me); QP::QF::PUBLISH(pe, me); (void)me->m_timeEvt.disarm(); status_ = Q_HANDLED(); break; } //${AOs::Philo::SM::eating::TIMEOUT} case TIMEOUT_SIG: { status_ = Q_TRAN(&thinking); break; } //${AOs::Philo::SM::eating::EAT, DONE} case EAT_SIG: // intentionally fall through case DONE_SIG: { /* EAT or DONE must be for other Philos than this one */ Q_ASSERT(Q_EVT_CAST(TableEvt)->philoNum != PHILO_ID(me)); status_ = Q_HANDLED(); break; } default: { status_ = Q_SUPER(&top); break; } } return status_; } } // namespace DPP //$enddef${AOs::Philo} #######################################################