QP/C
qf_gc.c
Go to the documentation of this file.
00001 /*****************************************************************************
00002 * Product: QF/C
00003 * Last Updated for Version: 4.4.00
00004 * Date of the Last Update:  Jan 15, 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 software may be distributed and modified under the terms of the GNU
00013 * General Public License version 2 (GPL) as published by the Free Software
00014 * Foundation and appearing in the file GPL.TXT included in the packaging of
00015 * this file. Please note that GPL Section 2[b] requires that all works based
00016 * on this software must also be made publicly available under the terms of
00017 * the GPL ("Copyleft").
00018 *
00019 * Alternatively, this software may be distributed and modified under the
00020 * terms of Quantum Leaps commercial licenses, which expressly supersede
00021 * the GPL and are specifically designed for licensees interested in
00022 * retaining the proprietary status of their code.
00023 *
00024 * Contact information:
00025 * Quantum Leaps Web site:  http://www.quantum-leaps.com
00026 * e-mail:                  info@quantum-leaps.com
00027 *****************************************************************************/
00028 #include "qf_pkg.h"
00029 #include "qassert.h"
00030 
00031 Q_DEFINE_THIS_MODULE("qf_gc")
00032 
00033 
00039 /*..........................................................................*/
00040 void QF_gc(QEvent const *e) {
00041     if (QF_EVT_POOL_ID_(e) != (uint8_t)0) {       /* is it a dynamic event? */
00042         QF_CRIT_STAT_
00043         QF_CRIT_ENTRY_();
00044 
00045         if (QF_EVT_REF_CTR_(e) > (uint8_t)1) {  /* isn't this the last ref? */
00046             QF_EVT_REF_CTR_DEC_(e);            /* decrement the ref counter */
00047 
00048             QS_BEGIN_NOCRIT_(QS_QF_GC_ATTEMPT, (void *)0, (void *)0)
00049                 QS_TIME_();                                    /* timestamp */
00050                 QS_SIG_(e->sig);                 /* the signal of the event */
00051                 QS_U8_(QF_EVT_POOL_ID_(e));     /* the pool Id of the event */
00052                 QS_U8_(QF_EVT_REF_CTR_(e));   /* the ref count of the event */
00053             QS_END_NOCRIT_()
00054 
00055             QF_CRIT_EXIT_();
00056         }
00057         else {      /* this is the last reference to this event, recycle it */
00058                                                       /* cannot wrap around */
00059             uint8_t idx = (uint8_t)(QF_EVT_POOL_ID_(e) - (uint8_t)1);
00060 
00061             QS_BEGIN_NOCRIT_(QS_QF_GC, (void *)0, (void *)0)
00062                 QS_TIME_();                                    /* timestamp */
00063                 QS_SIG_(e->sig);                 /* the signal of the event */
00064                 QS_U8_(QF_EVT_POOL_ID_(e));     /* the pool Id of the event */
00065                 QS_U8_(QF_EVT_REF_CTR_(e));   /* the ref count of the event */
00066             QS_END_NOCRIT_()
00067 
00068             QF_CRIT_EXIT_();
00069 
00070             Q_ASSERT(idx < QF_maxPool_);
00071 
00072             QF_EPOOL_PUT_(QF_pool_[idx], (QEvent *)e);  /* cast const away, */
00073                           /* which is legitimate, because it's a pool event */
00074         }
00075     }
00076 }