qpc/examples/win32/comp_qm/alarm.c

/*****************************************************************************
* Model: comp.qm
* File:  ./alarm.c
*
* This code has been generated by QM tool (see 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.
*****************************************************************************/
/*${.::alarm.c} ............................................................*/
#include "qpc.h"
#include "bsp.h"
#include "alarm.h"
#include "clock.h"

Q_DEFINE_THIS_FILE

/* Alarm component --------------------*/
/*${Components::Alarm} .....................................................*/
/*${Components::Alarm::ctor} ...............................................*/
void Alarm_ctor(Alarm * const me) {
    QMsm_ctor(&me->super, Q_STATE_CAST(&Alarm_initial));
}
/*${Components::Alarm::SM} .................................................*/
QState Alarm_initial(Alarm * const me, QEvt const * const e) {
    static struct {
        QMState const *target;
        QActionHandler act[2];
    } const tatbl_ = { /* transition-action table */
        &Alarm_off_s, /* target state */
        {
            Q_ACTION_CAST(&Alarm_off_e), /* entry */
            Q_ACTION_CAST(0) /* zero terminator */
        }
    };
    /* ${Components::Alarm::SM::initial} */
    me->alarm_time = 12U*60U;
    (void)e; /* avoid compiler warning about unused parameter */
    return QM_TRAN_INIT(&tatbl_);
}
/*${Components::Alarm::SM::off} ............................................*/
QMState const Alarm_off_s = {
    (QMState const *)0, /* superstate (top) */
    Q_STATE_CAST(&Alarm_off),
    Q_ACTION_CAST(&Alarm_off_e),
    Q_ACTION_CAST(&Alarm_off_x),
    Q_ACTION_CAST(0)  /* no intitial tran. */
};
/* ${Components::Alarm::SM::off} */
QState Alarm_off_e(Alarm * const me) {
    /* while in the off state, the alarm is kept in decimal format */
    me->alarm_time = (me->alarm_time/60)*100 + me->alarm_time%60;
    BSP_showTime24H("*** Alarm OFF ", me->alarm_time, 100U);
    return QM_ENTRY(&Alarm_off_s);
}
/* ${Components::Alarm::SM::off} */
QState Alarm_off_x(Alarm * const me) {
    /* upon exit, the alarm is converted to binary format */
    me->alarm_time = (me->alarm_time/100U)*60U + me->alarm_time%100U;
    return QM_EXIT(&Alarm_off_s);
}
/* ${Components::Alarm::SM::off} */
QState Alarm_off(Alarm * const me, QEvt const * const e) {
    QState status_;
    switch (e->sig) {
        /* ${Components::Alarm::SM::off::ALARM_ON} */
        case ALARM_ON_SIG: {
            /* ${Components::Alarm::SM::off::ALARM_ON::[alarminrange?]} */
            if ((me->alarm_time / 100U < 24U)
                && (me->alarm_time % 100U < 60U))
            {
                static struct {
                    QMState const *target;
                    QActionHandler act[3];
                } const tatbl_ = { /* transition-action table */
                    &Alarm_on_s, /* target state */
                    {
                        Q_ACTION_CAST(&Alarm_off_x), /* exit */
                        Q_ACTION_CAST(&Alarm_on_e), /* entry */
                        Q_ACTION_CAST(0) /* zero terminator */
                    }
                };
                status_ = QM_TRAN(&tatbl_);
            }
            /* ${Components::Alarm::SM::off::ALARM_ON::[else]} */
            else {
                me->alarm_time = 0U;
                BSP_showTime24H("*** Alarm reset", me->alarm_time, 100U);
                status_ = QM_HANDLED();
            }
            break;
        }
        /* ${Components::Alarm::SM::off::ALARM_SET} */
        case ALARM_SET_SIG: {
            /* while setting, the alarm is kept in decimal format */
            me->alarm_time = (10U * me->alarm_time
                              + ((SetEvt const *)e)->digit) % 10000U;
            BSP_showTime24H("*** Alarm reset ",  me->alarm_time, 100U);
            status_ = QM_HANDLED();
            break;
        }
        default: {
            status_ = QM_SUPER();
            break;
        }
    }
    return status_;
}
/*${Components::Alarm::SM::on} .............................................*/
QMState const Alarm_on_s = {
    (QMState const *)0, /* superstate (top) */
    Q_STATE_CAST(&Alarm_on),
    Q_ACTION_CAST(&Alarm_on_e),
    Q_ACTION_CAST(0), /* no exit action */
    Q_ACTION_CAST(0)  /* no intitial tran. */
};
/* ${Components::Alarm::SM::on} */
QState Alarm_on_e(Alarm * const me) {
    BSP_showTime24H("*** Alarm ON ",  me->alarm_time, 60U);
    return QM_ENTRY(&Alarm_on_s);
}
/* ${Components::Alarm::SM::on} */
QState Alarm_on(Alarm * const me, QEvt const * const e) {
    QState status_;
    switch (e->sig) {
        /* ${Components::Alarm::SM::on::ALARM_OFF} */
        case ALARM_OFF_SIG: {
            static struct {
                QMState const *target;
                QActionHandler act[2];
            } const tatbl_ = { /* transition-action table */
                &Alarm_off_s, /* target state */
                {
                    Q_ACTION_CAST(&Alarm_off_e), /* entry */
                    Q_ACTION_CAST(0) /* zero terminator */
                }
            };
            status_ = QM_TRAN(&tatbl_);
            break;
        }
        /* ${Components::Alarm::SM::on::ALARM_SET} */
        case ALARM_SET_SIG: {
            BSP_showMsg("*** Cannot set Alarm when it is ON");
            status_ = QM_HANDLED();
            break;
        }
        /* ${Components::Alarm::SM::on::TIME} */
        case TIME_SIG: {
            /* ${Components::Alarm::SM::on::TIME::[Q_EVT_CAST(Time~} */
            if (Q_EVT_CAST(TimeEvt)->current_time == me->alarm_time) {
                BSP_showMsg("ALARM!!!");

                /* asynchronously post the event to the container AO */
                QACTIVE_POST(APP_alarmClock, Q_NEW(QEvt, ALARM_SIG), me);
                status_ = QM_HANDLED();
            }
            else {
                status_ = QM_UNHANDLED();
            }
            break;
        }
        default: {
            status_ = QM_SUPER();
            break;
        }
    }
    return status_;
}