queue.c

Go to the documentation of this file.

/******************************************************************************
 *
 *  (C)Copyright 1998,1999 SysKonnect,
 *  a business unit of Schneider & Koch & Co. Datensysteme GmbH.
 *
 *  See the file "skfddi.c" for further information.
 *
 *  This program is free 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 2 of the License, or
 *  (at your option) any later version.
 *
 *  The information in this file is provided "AS IS" without warranty.
 *
 ******************************************************************************/

/*
    SMT Event Queue Management
*/

#include "h/types.h"
#include "h/fddi.h"
#include "h/smc.h"

#ifndef lint
static const char ID_sccs[] = "@(#)queue.c  2.9 97/08/04 (C) SK " ;
#endif

#define PRINTF(a,b,c)

/*
 * init event queue management
 */
void ev_init(struct s_smc *smc)
{
    smc->q.ev_put = smc->q.ev_get = smc->q.ev_queue ;
}

/*
 * add event to queue
 */
void queue_event(struct s_smc *smc, int class, int event)
{
    PRINTF("queue class %d event %d\n",class,event) ;
    smc->q.ev_put->class = class ;
    smc->q.ev_put->event = event ;
    if (++smc->q.ev_put == &smc->q.ev_queue[MAX_EVENT])
        smc->q.ev_put = smc->q.ev_queue ;

    if (smc->q.ev_put == smc->q.ev_get) {
        SMT_ERR_LOG(smc,SMT_E0137, SMT_E0137_MSG) ;
    }
}

/*
 * timer_event is called from HW timer package.
 */
void timer_event(struct s_smc *smc, u_long token)
{
    PRINTF("timer event class %d token %d\n",
        EV_T_CLASS(token),
        EV_T_EVENT(token)) ;
    queue_event(smc,EV_T_CLASS(token),EV_T_EVENT(token));
}

/*
 * event dispatcher
 *  while event queue is not empty
 *      get event from queue
 *      send command to state machine
 *  end
 */
void ev_dispatcher(struct s_smc *smc)
{
    struct event_queue *ev ;    /* pointer into queue */
    int     class ;

    ev = smc->q.ev_get ;
    PRINTF("dispatch get %x put %x\n",ev,smc->q.ev_put) ;
    while (ev != smc->q.ev_put) {
        PRINTF("dispatch class %d event %d\n",ev->class,ev->event) ;
        switch(class = ev->class) {
        case EVENT_ECM :        /* Entity Corordination  Man. */
            ecm(smc,(int)ev->event) ;
            break ;
        case EVENT_CFM :        /* Configuration Man. */
            cfm(smc,(int)ev->event) ;
            break ;
        case EVENT_RMT :        /* Ring Man. */
            rmt(smc,(int)ev->event) ;
            break ;
        case EVENT_SMT :
            smt_event(smc,(int)ev->event) ;
            break ;
#ifdef  CONCENTRATOR
        case 99 :
            timer_test_event(smc,(int)ev->event) ;
            break ;
#endif
        case EVENT_PCMA :       /* PHY A */
        case EVENT_PCMB :       /* PHY B */
        default :
            if (class >= EVENT_PCMA &&
                class < EVENT_PCMA + NUMPHYS) {
                pcm(smc,class - EVENT_PCMA,(int)ev->event) ;
                break ;
            }
            SMT_PANIC(smc,SMT_E0121, SMT_E0121_MSG) ;
            return ;
        }

        if (++ev == &smc->q.ev_queue[MAX_EVENT])
            ev = smc->q.ev_queue ;

        /* Renew get: it is used in queue_events to detect overruns */
        smc->q.ev_get = ev;
    }
}

/*
 * smt_online connects to or disconnects from the ring
 * MUST be called to initiate connection establishment
 *
 *  on  0   disconnect
 *  on  1   connect
 */
u_short smt_online(struct s_smc *smc, int on)
{
    queue_event(smc,EVENT_ECM,on ? EC_CONNECT : EC_DISCONNECT) ;
    ev_dispatcher(smc) ;
    return smc->mib.fddiSMTCF_State;
}

/*
 * set SMT flag to value
 *  flag        flag name
 *  value       flag value
 * dump current flag setting
 */
#ifdef  CONCENTRATOR
void do_smt_flag(struct s_smc *smc, char *flag, int value)
{
#ifdef  DEBUG
    struct smt_debug    *deb;

    SK_UNUSED(smc) ;

#ifdef  DEBUG_BRD
    deb = &smc->debug;
#else
    deb = &debug;
#endif
    if (!strcmp(flag,"smt"))
        deb->d_smt = value ;
    else if (!strcmp(flag,"smtf"))
        deb->d_smtf = value ;
    else if (!strcmp(flag,"pcm"))
        deb->d_pcm = value ;
    else if (!strcmp(flag,"rmt"))
        deb->d_rmt = value ;
    else if (!strcmp(flag,"cfm"))
        deb->d_cfm = value ;
    else if (!strcmp(flag,"ecm"))
        deb->d_ecm = value ;
    printf("smt %d\n",deb->d_smt) ;
    printf("smtf    %d\n",deb->d_smtf) ;
    printf("pcm %d\n",deb->d_pcm) ;
    printf("rmt %d\n",deb->d_rmt) ;
    printf("cfm %d\n",deb->d_cfm) ;
    printf("ecm %d\n",deb->d_ecm) ;
#endif  /* DEBUG */
}
#endif