| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 1 | /****************************************************************************** | 
 | 2 |  * | 
 | 3 |  *	(C)Copyright 1998,1999 SysKonnect, | 
 | 4 |  *	a business unit of Schneider & Koch & Co. Datensysteme GmbH. | 
 | 5 |  * | 
 | 6 |  *	See the file "skfddi.c" for further information. | 
 | 7 |  * | 
 | 8 |  *	This program is free software; you can redistribute it and/or modify | 
 | 9 |  *	it under the terms of the GNU General Public License as published by | 
 | 10 |  *	the Free Software Foundation; either version 2 of the License, or | 
 | 11 |  *	(at your option) any later version. | 
 | 12 |  * | 
 | 13 |  *	The information in this file is provided "AS IS" without warranty. | 
 | 14 |  * | 
 | 15 |  ******************************************************************************/ | 
 | 16 |  | 
 | 17 | /* | 
 | 18 | 	SMT Event Queue Management | 
 | 19 | */ | 
 | 20 |  | 
 | 21 | #include "h/types.h" | 
 | 22 | #include "h/fddi.h" | 
 | 23 | #include "h/smc.h" | 
 | 24 |  | 
 | 25 | #ifndef	lint | 
 | 26 | static const char ID_sccs[] = "@(#)queue.c	2.9 97/08/04 (C) SK " ; | 
 | 27 | #endif | 
 | 28 |  | 
 | 29 | #define PRINTF(a,b,c) | 
 | 30 |  | 
 | 31 | /* | 
 | 32 |  * init event queue management | 
 | 33 |  */ | 
 | 34 | void ev_init(struct s_smc *smc) | 
 | 35 | { | 
 | 36 | 	smc->q.ev_put = smc->q.ev_get = smc->q.ev_queue ; | 
 | 37 | } | 
 | 38 |  | 
 | 39 | /* | 
 | 40 |  * add event to queue | 
 | 41 |  */ | 
 | 42 | void queue_event(struct s_smc *smc, int class, int event) | 
 | 43 | { | 
 | 44 | 	PRINTF("queue class %d event %d\n",class,event) ; | 
 | 45 | 	smc->q.ev_put->class = class ; | 
 | 46 | 	smc->q.ev_put->event = event ; | 
 | 47 | 	if (++smc->q.ev_put == &smc->q.ev_queue[MAX_EVENT]) | 
 | 48 | 		smc->q.ev_put = smc->q.ev_queue ; | 
 | 49 |  | 
 | 50 | 	if (smc->q.ev_put == smc->q.ev_get) { | 
 | 51 | 		SMT_ERR_LOG(smc,SMT_E0137, SMT_E0137_MSG) ; | 
 | 52 | 	} | 
 | 53 | } | 
 | 54 |  | 
 | 55 | /* | 
 | 56 |  * timer_event is called from HW timer package. | 
 | 57 |  */ | 
 | 58 | void timer_event(struct s_smc *smc, u_long token) | 
 | 59 | { | 
 | 60 | 	PRINTF("timer event class %d token %d\n", | 
 | 61 | 		EV_T_CLASS(token), | 
 | 62 | 		EV_T_EVENT(token)) ; | 
 | 63 | 	queue_event(smc,EV_T_CLASS(token),EV_T_EVENT(token)); | 
 | 64 | } | 
 | 65 |  | 
 | 66 | /* | 
 | 67 |  * event dispatcher | 
 | 68 |  *	while event queue is not empty | 
 | 69 |  *		get event from queue | 
 | 70 |  *		send command to state machine | 
 | 71 |  *	end | 
 | 72 |  */ | 
 | 73 | void ev_dispatcher(struct s_smc *smc) | 
 | 74 | { | 
 | 75 | 	struct event_queue *ev ;	/* pointer into queue */ | 
 | 76 | 	int		class ; | 
 | 77 |  | 
 | 78 | 	ev = smc->q.ev_get ; | 
 | 79 | 	PRINTF("dispatch get %x put %x\n",ev,smc->q.ev_put) ; | 
 | 80 | 	while (ev != smc->q.ev_put) { | 
 | 81 | 		PRINTF("dispatch class %d event %d\n",ev->class,ev->event) ; | 
 | 82 | 		switch(class = ev->class) { | 
 | 83 | 		case EVENT_ECM :		/* Entity Corordination  Man. */ | 
 | 84 | 			ecm(smc,(int)ev->event) ; | 
 | 85 | 			break ; | 
 | 86 | 		case EVENT_CFM :		/* Configuration Man. */ | 
 | 87 | 			cfm(smc,(int)ev->event) ; | 
 | 88 | 			break ; | 
 | 89 | 		case EVENT_RMT :		/* Ring Man. */ | 
 | 90 | 			rmt(smc,(int)ev->event) ; | 
 | 91 | 			break ; | 
 | 92 | 		case EVENT_SMT : | 
 | 93 | 			smt_event(smc,(int)ev->event) ; | 
 | 94 | 			break ; | 
 | 95 | #ifdef	CONCENTRATOR | 
 | 96 | 		case 99 : | 
 | 97 | 			timer_test_event(smc,(int)ev->event) ; | 
 | 98 | 			break ; | 
 | 99 | #endif | 
 | 100 | 		case EVENT_PCMA :		/* PHY A */ | 
 | 101 | 		case EVENT_PCMB :		/* PHY B */ | 
 | 102 | 		default : | 
 | 103 | 			if (class >= EVENT_PCMA && | 
 | 104 | 			    class < EVENT_PCMA + NUMPHYS) { | 
 | 105 | 				pcm(smc,class - EVENT_PCMA,(int)ev->event) ; | 
 | 106 | 				break ; | 
 | 107 | 			} | 
 | 108 | 			SMT_PANIC(smc,SMT_E0121, SMT_E0121_MSG) ; | 
 | 109 | 			return ; | 
 | 110 | 		} | 
 | 111 |  | 
 | 112 | 		if (++ev == &smc->q.ev_queue[MAX_EVENT]) | 
 | 113 | 			ev = smc->q.ev_queue ; | 
 | 114 |  | 
 | 115 | 		/* Renew get: it is used in queue_events to detect overruns */ | 
 | 116 | 		smc->q.ev_get = ev; | 
 | 117 | 	} | 
 | 118 | } | 
 | 119 |  | 
 | 120 | /* | 
 | 121 |  * smt_online connects to or disconnects from the ring | 
 | 122 |  * MUST be called to initiate connection establishment | 
 | 123 |  * | 
 | 124 |  *	on	0	disconnect | 
 | 125 |  *	on	1	connect | 
 | 126 |  */ | 
 | 127 | u_short smt_online(struct s_smc *smc, int on) | 
 | 128 | { | 
 | 129 | 	queue_event(smc,EVENT_ECM,on ? EC_CONNECT : EC_DISCONNECT) ; | 
 | 130 | 	ev_dispatcher(smc) ; | 
 | 131 | 	return(smc->mib.fddiSMTCF_State) ; | 
 | 132 | } | 
 | 133 |  | 
 | 134 | /* | 
 | 135 |  * set SMT flag to value | 
 | 136 |  *	flag		flag name | 
 | 137 |  *	value		flag value | 
 | 138 |  * dump current flag setting | 
 | 139 |  */ | 
 | 140 | #ifdef	CONCENTRATOR | 
 | 141 | void do_smt_flag(struct s_smc *smc, char *flag, int value) | 
 | 142 | { | 
 | 143 | #ifdef	DEBUG | 
 | 144 | 	struct smt_debug	*deb; | 
 | 145 |  | 
 | 146 | 	SK_UNUSED(smc) ; | 
 | 147 |  | 
 | 148 | #ifdef	DEBUG_BRD | 
 | 149 | 	deb = &smc->debug; | 
 | 150 | #else | 
 | 151 | 	deb = &debug; | 
 | 152 | #endif | 
 | 153 | 	if (!strcmp(flag,"smt")) | 
 | 154 | 		deb->d_smt = value ; | 
 | 155 | 	else if (!strcmp(flag,"smtf")) | 
 | 156 | 		deb->d_smtf = value ; | 
 | 157 | 	else if (!strcmp(flag,"pcm")) | 
 | 158 | 		deb->d_pcm = value ; | 
 | 159 | 	else if (!strcmp(flag,"rmt")) | 
 | 160 | 		deb->d_rmt = value ; | 
 | 161 | 	else if (!strcmp(flag,"cfm")) | 
 | 162 | 		deb->d_cfm = value ; | 
 | 163 | 	else if (!strcmp(flag,"ecm")) | 
 | 164 | 		deb->d_ecm = value ; | 
 | 165 | 	printf("smt	%d\n",deb->d_smt) ; | 
 | 166 | 	printf("smtf	%d\n",deb->d_smtf) ; | 
 | 167 | 	printf("pcm	%d\n",deb->d_pcm) ; | 
 | 168 | 	printf("rmt	%d\n",deb->d_rmt) ; | 
 | 169 | 	printf("cfm	%d\n",deb->d_cfm) ; | 
 | 170 | 	printf("ecm	%d\n",deb->d_ecm) ; | 
 | 171 | #endif	/* DEBUG */ | 
 | 172 | } | 
 | 173 | #endif |