QP/C: qa_sub.c Source File

Go to the documentation of this file.
00001 /*****************************************************************************
00002 * Product: QF/C
00003 * Last Updated for Version: 4.5.02
00004 * Date of the Last Update:  Jul 25, 2012
00005 *
00006 *                    Q u a n t u m     L e a P s
00007 *                    ---------------------------
00008 *                    innovating embedded systems
00009 *
00010 * Copyright (C) 2002-2012 Quantum Leaps, LLC. All rights reserved.
00011 *
00012 * This program is open source software: you can redistribute it and/or
00013 * modify it under the terms of the GNU General Public License as published
00014 * by the Free Software Foundation, either version 2 of the License, or
00015 * (at your option) any later version.
00016 *
00017 * Alternatively, this program may be distributed and modified under the
00018 * terms of Quantum Leaps commercial licenses, which expressly supersede
00019 * the GNU General Public License and are specifically designed for
00020 * licensees interested in retaining the proprietary status of their code.
00021 *
00022 * This program is distributed in the hope that it will be useful,
00023 * but WITHOUT ANY WARRANTY; without even the implied warranty of
00024 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
00025 * GNU General Public License for more details.
00026 *
00027 * You should have received a copy of the GNU General Public License
00028 * along with this program. If not, see <http://www.gnu.org/licenses/>.
00029 *
00030 * Contact information:
00031 * Quantum Leaps Web sites: http://www.quantum-leaps.com
00032 *                          http://www.state-machine.com
00033 * e-mail:                  info@quantum-leaps.com
00034 *****************************************************************************/
00035 #include "qf_pkg.h"
00036 #include "qassert.h"
00037 
00038 Q_DEFINE_THIS_MODULE("qa_sub")
00039 
00040 
00046 /*..........................................................................*/
00047 void QActive_subscribe(QActive const * const me, enum_t const sig) {
00048     uint8_t p = me->prio;
00049     uint8_t i = Q_ROM_BYTE(QF_div8Lkup[p]);
00050     QF_CRIT_STAT_
00051 
00052     Q_REQUIRE(((enum_t)Q_USER_SIG <= sig)
00053               && (sig < QF_maxSignal_)
00054               && ((uint8_t)0 < p) && (p <= (uint8_t)QF_MAX_ACTIVE)
00055               && (QF_active_[p] == me));
00056 
00057     QF_CRIT_ENTRY_();
00058 
00059     QS_BEGIN_NOCRIT_(QS_QF_ACTIVE_SUBSCRIBE, QS_aoObj_, me)
00060         QS_TIME_();                                            /* timestamp */
00061         QS_SIG_((QSignal)sig);                  /* the signal of this event */
00062         QS_OBJ_(me);                                  /* this active object */
00063     QS_END_NOCRIT_()
00064                                                     /* set the priority bit */
00065     QF_PTR_AT_(QF_subscrList_, sig).bits[i] |= Q_ROM_BYTE(QF_pwr2Lkup[p]);
00066     QF_CRIT_EXIT_();
00067 }