Exemplo n.º 1
0
INT8U OSTmrNameGet( OS_TMR * ptmr, INT8U * pdest, INT8U * perr )
{
    INT8U          len;


#if OS_ARG_CHK_EN > 0
    if ( perr == ( INT8U * ) 0 )
    {
        return ( 0 );
    }
    if ( pdest == ( INT8U * ) 0 )
    {
        *perr = OS_ERR_TMR_INVALID_DEST;
        return ( 0 );
    }
    if ( ptmr == ( OS_TMR * ) 0 )
    {
        *perr = OS_ERR_TMR_INVALID;
        return ( 0 );
    }
#endif
    if ( ptmr->OSTmrType != OS_TMR_TYPE )
    {                           /* Validate timer structure                                    */
        *perr = OS_ERR_TMR_INVALID_TYPE;
        return ( 0 );
    }
    if ( OSIntNesting > 0 )
    {                           /* See if trying to call from an ISR                           */
        *perr = OS_ERR_TMR_ISR;
        return ( 0 );
    }
    OSTmr_Lock(  );
    switch ( ptmr->OSTmrState )
    {
        case OS_TMR_STATE_RUNNING:
        case OS_TMR_STATE_STOPPED:
        case OS_TMR_STATE_COMPLETED:
            len = OS_StrCopy( pdest, ptmr->OSTmrName );
            OSTmr_Unlock(  );
            *perr = OS_NO_ERR;
            return ( len );

        case OS_TMR_STATE_UNUSED:      /* Timer is not allocated                                      */
            OSTmr_Unlock(  );
            *perr = OS_ERR_TMR_INACTIVE;
            return ( 0 );

        default:
            OSTmr_Unlock(  );
            *perr = OS_ERR_TMR_INVALID_STATE;
            return ( 0 );
    }
}
Exemplo n.º 2
0
BOOLEAN OSTmrStart( OS_TMR * ptmr, INT8U * perr )
{
#if OS_ARG_CHK_EN > 0
    if ( perr == ( INT8U * ) 0 )
    {                           /* Validate arguments                                     */
        return ( OS_FALSE );
    }
    if ( ptmr == ( OS_TMR * ) 0 )
    {
        *perr = OS_ERR_TMR_INVALID;
        return ( OS_FALSE );
    }
#endif
    if ( ptmr->OSTmrType != OS_TMR_TYPE )
    {                           /* Validate timer structure                               */
        *perr = OS_ERR_TMR_INVALID_TYPE;
        return ( OS_FALSE );
    }
    if ( OSIntNesting > 0 )
    {                           /* See if trying to call from an ISR                      */
        *perr = OS_ERR_TMR_ISR;
        return ( OS_FALSE );
    }
    OSTmr_Lock(  );
    switch ( ptmr->OSTmrState )
    {
        case OS_TMR_STATE_RUNNING:     /* Restart the timer                                      */
            OSTmr_Unlink( ptmr );       /* ... Stop the timer                                     */
            OSTmr_Link( ptmr, OS_TMR_LINK_DLY );        /* ... Link timer to timer wheel                          */
            OSTmr_Unlock(  );
            *perr = OS_NO_ERR;
            return ( OS_TRUE );

        case OS_TMR_STATE_STOPPED:     /* Start the timer                                        */
        case OS_TMR_STATE_COMPLETED:
            OSTmr_Link( ptmr, OS_TMR_LINK_DLY );        /* ... Link timer to timer wheel                          */
            OSTmr_Unlock(  );
            *perr = OS_NO_ERR;
            return ( OS_TRUE );

        case OS_TMR_STATE_UNUSED:      /* Timer not created                                      */
            OSTmr_Unlock(  );
            *perr = OS_ERR_TMR_INACTIVE;
            return ( OS_FALSE );

        default:
            OSTmr_Unlock(  );
            *perr = OS_ERR_TMR_INVALID_STATE;
            return ( OS_FALSE );
    }
}
Exemplo n.º 3
0
BOOLEAN OSTmrDel( OS_TMR * ptmr, INT8U * perr )
{
#if OS_ARG_CHK_EN > 0
    if ( perr == ( INT8U * ) 0 )
    {                           /* Validate arguments                                     */
        return ( OS_FALSE );
    }
    if ( ptmr == ( OS_TMR * ) 0 )
    {
        *perr = OS_ERR_TMR_INVALID;
        return ( OS_FALSE );
    }
#endif
    if ( ptmr->OSTmrType != OS_TMR_TYPE )
    {                           /* Validate timer structure                               */
        *perr = OS_ERR_TMR_INVALID_TYPE;
        return ( OS_FALSE );
    }
    if ( OSIntNesting > 0 )
    {                           /* See if trying to call from an ISR                      */
        *perr = OS_ERR_TMR_ISR;
        return ( OS_FALSE );
    }
    OSTmr_Lock(  );
    switch ( ptmr->OSTmrState )
    {
        case OS_TMR_STATE_RUNNING:
            OSTmr_Unlink( ptmr );       /* Remove from current wheel spoke                        */
            OSTmr_Free( ptmr ); /* Return timer to free list of timers                    */
            OSTmr_Unlock(  );
            *perr = OS_NO_ERR;
            return ( OS_TRUE );

        case OS_TMR_STATE_STOPPED:     /* Timer has not started or ...                           */
        case OS_TMR_STATE_COMPLETED:   /* ... timer has completed the ONE-SHOT time              */
            OSTmr_Free( ptmr ); /* Return timer to free list of timers                    */
            OSTmr_Unlock(  );
            *perr = OS_NO_ERR;
            return ( OS_TRUE );

        case OS_TMR_STATE_UNUSED:      /* Already deleted                                        */
            OSTmr_Unlock(  );
            *perr = OS_ERR_TMR_INACTIVE;
            return ( OS_FALSE );

        default:
            OSTmr_Unlock(  );
            *perr = OS_ERR_TMR_INVALID_STATE;
            return ( OS_FALSE );
    }
}
Exemplo n.º 4
0
static void OSTmr_Task( void *p_arg )
{
    INT8U          err;
    OS_TMR        *ptmr;
    OS_TMR        *ptmr_next;
    OS_TMR_CALLBACK pfnct;
    OS_TMR_WHEEL  *pspoke;
    INT16U         spoke;


    ( void ) p_arg;             /* Not using 'p_arg', prevent compiler warning       */
    for ( ;; )
    {
        OSSemPend( OSTmrSemSignal, 0, &err );   /* Wait for signal indicating time to update timers  */
        OSTmr_Lock(  );
        OSTmrTime++;            /* Increment the current time                        */
        spoke = OSTmrTime % OS_TMR_CFG_WHEEL_SIZE;      /* Position on current timer wheel entry             */
        pspoke = &OSTmrWheelTbl[spoke];
        ptmr = pspoke->OSTmrFirst;
        while ( ptmr != ( OS_TMR * ) 0 )
        {
            ptmr_next = ptmr->OSTmrNext;        /* Point to next timer to update because current ... */
            /* ... timer could get unlinked from the wheel.      */
            if ( OSTmrTime == ptmr->OSTmrMatch )
            {                   /* Process each timer that expires                   */
                pfnct = ptmr->OSTmrCallback;    /* Execute callback function if available            */
                if ( pfnct != ( OS_TMR_CALLBACK ) 0 )
                {
                    ( *pfnct ) ( ptmr, ptmr->OSTmrCallbackArg );
                }
                OSTmr_Unlink( ptmr );   /* Remove from current wheel spoke                   */
                if ( ptmr->OSTmrOpt == OS_TMR_OPT_PERIODIC )
                {
                    OSTmr_Link( ptmr, OS_TMR_LINK_PERIODIC );   /* Recalculate new position of timer in wheel        */
                }
                else
                {
                    ptmr->OSTmrState = OS_TMR_STATE_COMPLETED;  /* Indicate that the timer has completed             */
                }
            }
            ptmr = ptmr_next;
        }
        OSTmr_Unlock(  );
    }
}
Exemplo n.º 5
0
INT8U OSTmrStateGet( OS_TMR * ptmr, INT8U * perr )
{
    INT8U          state;


#if OS_ARG_CHK_EN > 0
    if ( perr == ( INT8U * ) 0 )
    {
        return ( 0 );
    }
    if ( ptmr == ( OS_TMR * ) 0 )
    {
        *perr = OS_ERR_TMR_INVALID;
        return ( 0 );
    }
#endif
    if ( ptmr->OSTmrType != OS_TMR_TYPE )
    {                           /* Validate timer structure                                    */
        *perr = OS_ERR_TMR_INVALID_TYPE;
        return ( 0 );
    }
    if ( OSIntNesting > 0 )
    {                           /* See if trying to call from an ISR                           */
        *perr = OS_ERR_TMR_ISR;
        return ( 0 );
    }
    OSTmr_Lock(  );
    state = ptmr->OSTmrState;
    switch ( state )
    {
        case OS_TMR_STATE_UNUSED:
        case OS_TMR_STATE_STOPPED:
        case OS_TMR_STATE_COMPLETED:
        case OS_TMR_STATE_RUNNING:
            *perr = OS_NO_ERR;
            break;

        default:
            *perr = OS_ERR_TMR_INVALID_STATE;
            break;
    }
    OSTmr_Unlock(  );
    return ( state );
}
Exemplo n.º 6
0
BOOLEAN  OSTmrStop (OS_TMR  *ptmr,
                    INT8U    opt,
                    void    *callback_arg,
                    INT8U   *perr)
{
    OS_TMR_CALLBACK  pfnct;


#if OS_ARG_CHK_EN > 0
    if (perr == (INT8U *)0) {                                     /* Validate arguments                               */
        return (OS_FALSE);
    }
    if (ptmr == (OS_TMR *)0) {
        *perr = OS_ERR_TMR_INVALID;
        return (OS_FALSE);
    }
#endif
    if (ptmr->OSTmrType != OS_TMR_TYPE) {                         /* Validate timer structure                         */
        *perr = OS_ERR_TMR_INVALID_TYPE;
        return (OS_FALSE);
    }
    if (OSIntNesting > 0) {                                       /* See if trying to call from an ISR                */
        *perr  = OS_ERR_TMR_ISR;
        return (OS_FALSE);
    }
    OSTmr_Lock();
    switch (ptmr->OSTmrState) {
        case OS_TMR_STATE_RUNNING:
             OSTmr_Unlink(ptmr);                                  /* Remove from current wheel spoke                  */
             *perr = OS_ERR_NONE;
             switch (opt) {
                 case OS_TMR_OPT_CALLBACK:
                      pfnct = ptmr->OSTmrCallback;                /* Execute callback function if available ...       */
                      if (pfnct != (OS_TMR_CALLBACK)0) {
                          (*pfnct)((void *)ptmr, ptmr->OSTmrCallbackArg);  /* Use callback arg when timer was created */
                      } else {
                          *perr = OS_ERR_TMR_NO_CALLBACK;
                      }
                      break;

                 case OS_TMR_OPT_CALLBACK_ARG:
                      pfnct = ptmr->OSTmrCallback;                /* Execute callback function if available ...       */
                      if (pfnct != (OS_TMR_CALLBACK)0) {
                          (*pfnct)((void *)ptmr, callback_arg);   /* ... using the 'callback_arg' provided in call    */
                      } else {
                          *perr = OS_ERR_TMR_NO_CALLBACK;
                      }
                      break;

                 case OS_TMR_OPT_NONE:
                      break;

                 default:
                     *perr = OS_ERR_TMR_INVALID_OPT;
                     break;
             }
             OSTmr_Unlock();
             return (OS_TRUE);

        case OS_TMR_STATE_COMPLETED:                              /* Timer has already completed the ONE-SHOT or ...  */
        case OS_TMR_STATE_STOPPED:                                /* ... timer has not started yet.                   */
             OSTmr_Unlock();
             *perr = OS_ERR_TMR_STOPPED;
             return (OS_TRUE);

        case OS_TMR_STATE_UNUSED:                                 /* Timer was not created                            */
             OSTmr_Unlock();
             *perr = OS_ERR_TMR_INACTIVE;
             return (OS_FALSE);

        default:
             OSTmr_Unlock();
             *perr = OS_ERR_TMR_INVALID_STATE;
             return (OS_FALSE);
    }
}
Exemplo n.º 7
0
INT32U  OSTmrRemainGet (OS_TMR  *ptmr,
                        INT8U   *perr)
{
    INT32U  remain;


#if OS_ARG_CHK_EN > 0
    if (perr == (INT8U *)0) {
        return (0);
    }
    if (ptmr == (OS_TMR *)0) {
        *perr = OS_ERR_TMR_INVALID;
        return (0);
    }
#endif
    if (ptmr->OSTmrType != OS_TMR_TYPE) {              /* Validate timer structure                                    */
        *perr = OS_ERR_TMR_INVALID_TYPE;
        return (0);
    }
    if (OSIntNesting > 0) {                            /* See if trying to call from an ISR                           */
        *perr = OS_ERR_TMR_ISR;
        return (0);
    }
    OSTmr_Lock();
    switch (ptmr->OSTmrState) {
        case OS_TMR_STATE_RUNNING:
             remain = ptmr->OSTmrMatch - OSTmrTime;    /* Determine how much time is left to timeout                  */
             OSTmr_Unlock();
             *perr  = OS_ERR_NONE;
             return (remain);

        case OS_TMR_STATE_STOPPED:                     /* It's assumed that the timer has not started yet             */
             switch (ptmr->OSTmrOpt) {
                 case OS_TMR_OPT_PERIODIC:
                      if (ptmr->OSTmrDly == 0) {
                          remain = ptmr->OSTmrPeriod;
                      } else {
                          remain = ptmr->OSTmrDly;
                      }
                      OSTmr_Unlock();
                      *perr  = OS_ERR_NONE;
                      break;

                 case OS_TMR_OPT_ONE_SHOT:
                 default:
                      remain = ptmr->OSTmrDly;
                      OSTmr_Unlock();
                      *perr  = OS_ERR_NONE;
                      break;
             }
             return (remain);

        case OS_TMR_STATE_COMPLETED:                   /* Only ONE-SHOT that timed out can be in this state           */
             OSTmr_Unlock();
             *perr = OS_ERR_NONE;
             return (0);

        case OS_TMR_STATE_UNUSED:
             OSTmr_Unlock();
             *perr = OS_ERR_TMR_INACTIVE;
             return (0);

        default:
             OSTmr_Unlock();
             *perr = OS_ERR_TMR_INVALID_STATE;
             return (0);
    }
}
Exemplo n.º 8
0
OS_TMR  *OSTmrCreate (INT32U           dly,
                      INT32U           period,
                      INT8U            opt,
                      OS_TMR_CALLBACK  callback,
                      void            *callback_arg,
                      INT8U           *pname,
                      INT8U           *perr)
{
    OS_TMR   *ptmr;
#if OS_TMR_CFG_NAME_SIZE > 0
    INT8U     len;
#endif


#if OS_ARG_CHK_EN > 0
    if (perr == (INT8U *)0) {                               /* Validate arguments                                     */
        return ((OS_TMR *)0);
    }
    switch (opt) {
        case OS_TMR_OPT_PERIODIC:
             if (period == 0) {
                 *perr = OS_ERR_TMR_INVALID_PERIOD;
                 return ((OS_TMR *)0);
             }
             break;

        case OS_TMR_OPT_ONE_SHOT:
             if (dly == 0) {
                 *perr = OS_ERR_TMR_INVALID_DLY;
                 return ((OS_TMR *)0);
             }
             break;

        default:
             *perr = OS_ERR_TMR_INVALID_OPT;
             return ((OS_TMR *)0);
    }
#endif
    if (OSIntNesting > 0) {                                 /* See if trying to call from an ISR                      */
        *perr  = OS_ERR_TMR_ISR;
        return ((OS_TMR *)0);
    }
    OSTmr_Lock();
    ptmr = OSTmr_Alloc();                                   /* Obtain a timer from the free pool                      */
    if (ptmr == (OS_TMR *)0) {
        OSTmr_Unlock();
        *perr = OS_ERR_TMR_NON_AVAIL;
        return ((OS_TMR *)0);
    }
    ptmr->OSTmrState       = OS_TMR_STATE_STOPPED;          /* Indicate that timer is not running yet                 */
    ptmr->OSTmrDly         = dly;
    ptmr->OSTmrPeriod      = period;
    ptmr->OSTmrOpt         = opt;
    ptmr->OSTmrCallback    = callback;
    ptmr->OSTmrCallbackArg = callback_arg;
#if OS_TMR_CFG_NAME_SIZE > 0
    if (pname !=(INT8U *)0) {
        len = OS_StrLen(pname);                             /* Copy timer name                                        */
        if (len < OS_TMR_CFG_NAME_SIZE) {
            (void)OS_StrCopy(ptmr->OSTmrName, pname);
        } else {
#if OS_TMR_CFG_NAME_SIZE > 1
            ptmr->OSTmrName[0] = '#';                       /* Invalid size specified                                 */
            ptmr->OSTmrName[1] = OS_ASCII_NUL;
#endif
            *perr              = OS_ERR_TMR_NAME_TOO_LONG;
            OSTmr_Unlock();
            return (ptmr);
        }
    }
#endif
    OSTmr_Unlock();
    *perr = OS_ERR_NONE;
    return (ptmr);
}