qpc/examples/win32/mingw/comp/alarm.c

/*****************************************************************************
* Product: Orthogonal Component state pattern example
* Last Updated for Version: 5.1.1
* Date of the Last Update:  Oct 09, 2013
*
*                    Q u a n t u m     L e a P s
*                    ---------------------------
*                    innovating embedded systems
*
* Copyright (C) 2002-2013 Quantum Leaps, LLC. All rights reserved.
*
* 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
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*
* Contact information:
* Quantum Leaps Web sites: http://www.quantum-leaps.com
*                          http://www.state-machine.com
* e-mail:                  info@quantum-leaps.com
*****************************************************************************/
#include "qp_port.h"
#include "bsp.h"
#include "alarm.h"
#include "clock.h"

#include <stdio.h>

Q_DEFINE_THIS_FILE

/* FSM state-handler functions */
static QState Alarm_initial(Alarm * const me, QEvt const * const e);
static QState Alarm_off    (Alarm * const me, QEvt const * const e);
static QState Alarm_on     (Alarm * const me, QEvt const * const e);

/*..........................................................................*/
void Alarm_ctor(Alarm * const me) {
    QFsm_ctor(&me->super, Q_STATE_CAST(&Alarm_initial));
}

/* FSM definition ----------------------------------------------------------*/
QState Alarm_initial(Alarm * const me, QEvt const * const e) {
    (void)e;               /* avoid compiler warning about unused parameter */
    me->alarm_time = 12*60;
    return Q_TRAN(&Alarm_off);
}
/*..........................................................................*/
QState Alarm_off(Alarm * const me, QEvt const * const e) {
    QState status;
    switch (e->sig) {
        case Q_ENTRY_SIG: {
             /* while in the off state, the alarm is kept in decimal format */
            me->alarm_time = (me->alarm_time/60)*100 + me->alarm_time%60;
            printf("*** Alarm OFF %02d:%02d\n",
                   me->alarm_time/100, me->alarm_time%100);
            fflush(stdout);
            status = Q_HANDLED();
            break;
        }
        case Q_EXIT_SIG: {
                      /* upon exit, the alarm is converted to binary format */
            me->alarm_time = (me->alarm_time/100)*60 + me->alarm_time%100;
            status = Q_HANDLED();
            break;
        }
        case ALARM_ON_SIG: {
                                                         /* alarm in range? */
            if ((me->alarm_time / 100 < 24) && (me->alarm_time % 100 < 60)) {
                status = Q_TRAN(&Alarm_on);
            }
            else {      /* alarm out of range -- clear and don't transition */
                me->alarm_time = 0;
                printf("*** Alarm reset %02d:%02d\n",
                       me->alarm_time/100, me->alarm_time%100);
                status = Q_HANDLED();
            }
            break;
        }
        case ALARM_SET_SIG: {
                      /* while setting, the alarm is kept in decimal format */
            me->alarm_time = (10 * me->alarm_time
                              + ((SetEvt const *)e)->digit) % 10000;
            printf("*** Alarm SET %02d:%02d\n",
                   me->alarm_time/100, me->alarm_time%100);
            fflush(stdout);
            status = Q_HANDLED();
            break;
        }
        default: {
            status = Q_IGNORED();
            break;
        }
    }
    return status;
}
/*..........................................................................*/
QState Alarm_on(Alarm * const me, QEvt const * const e) {
    QState status;
    switch (e->sig) {
        case Q_ENTRY_SIG: {
            printf("*** Alarm ON %02d:%02d\n",
                   me->alarm_time/60, me->alarm_time%60);
            fflush(stdout);
            status = Q_HANDLED();
            break;
        }
        case ALARM_SET_SIG: {
            printf("*** Cannot set Alarm when it is ON\n");
            fflush(stdout);
            status = Q_HANDLED();
            break;
        }
        case ALARM_OFF_SIG: {
            status = Q_TRAN(&Alarm_off);
            break;
        }
        case TIME_SIG: {
            if (((TimeEvt *)e)->current_time == me->alarm_time) {
                printf("ALARM!!!\n");
                       /* asynchronously post the event to the container AO */
                QACTIVE_POST(APP_alarmClock, Q_NEW(QEvt, ALARM_SIG), me);
            }
            status = Q_HANDLED();
            break;
        }
        default: {
            status = Q_IGNORED();
            break;
        }
    }
    return status;
}