linux-imx/drivers/net/fddi/skfp/ess.c - nest-learning-thermostat/5.1.3/linux - Git at Google

 /******************************************************************************
  *
  *	(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.
  *
  ******************************************************************************/

 /*
  * *******************************************************************
  * This SBA code implements the Synchronous Bandwidth Allocation
  * functions described in the "FDDI Synchronous Forum Implementer's
  * Agreement" dated December 1th, 1993.
  * *******************************************************************
  *
  *	PURPOSE: The purpose of this function is to control
  *		 synchronous allocations on a single FDDI segment.
  *		 Allocations are limited to the primary FDDI ring.
  *		 The SBM provides recovery mechanisms to recover
  *		 unused bandwidth also resolves T_Neg and
  *		 reconfiguration changes. Many of the SBM state
  *		 machine inputs are sourced by the underlying
  *		 FDDI sub-system supporting the SBA application.
  *
  * *******************************************************************
  */

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


 #ifndef	SLIM_SMT

 #ifdef ESS

 #ifndef lint
 static const char ID_sccs[] = "@(#)ess.c	1.10 96/02/23 (C) SK" ;
 #define LINT_USE(x)
 #else
 #define LINT_USE(x)	(x)=(x)
 #endif
 #define MS2BCLK(x)	((x)*12500L)

 /*
 	-------------------------------------------------------------
 	LOCAL VARIABLES:
 	-------------------------------------------------------------
 */

 static const u_short plist_raf_alc_res[] = { SMT_P0012, SMT_P320B, SMT_P320F,
 					SMT_P3210, SMT_P0019, SMT_P001A,
 					SMT_P001D, 0 } ;

 static const u_short plist_raf_chg_req[] = { SMT_P320B, SMT_P320F, SMT_P3210,
 					SMT_P001A, 0 } ;

 static const struct fddi_addr smt_sba_da = {{0x80,0x01,0x43,0x00,0x80,0x0C}} ;
 static const struct fddi_addr null_addr = {{0,0,0,0,0,0}} ;

 /*
 	-------------------------------------------------------------
 	GLOBAL VARIABLES:
 	-------------------------------------------------------------
 */


 /*
 	-------------------------------------------------------------
 	LOCAL FUNCTIONS:
 	-------------------------------------------------------------
 */

 static void ess_send_response(struct s_smc *smc, struct smt_header *sm,
 			      int sba_cmd);
 static void ess_config_fifo(struct s_smc *smc);
 static void ess_send_alc_req(struct s_smc *smc);
 static void ess_send_frame(struct s_smc *smc, SMbuf *mb);

 /*
 	-------------------------------------------------------------
 	EXTERNAL FUNCTIONS:
 	-------------------------------------------------------------
 */

 /*
 	-------------------------------------------------------------
 	PUBLIC FUNCTIONS:
 	-------------------------------------------------------------
 */

 void ess_timer_poll(struct s_smc *smc);
 void ess_para_change(struct s_smc *smc);
 int ess_raf_received_pack(struct s_smc *smc, SMbuf *mb, struct smt_header *sm,
 			  int fs);
 static int process_bw_alloc(struct s_smc *smc, long int payload, long int overhead);


 /*
  * --------------------------------------------------------------------------
  *	End Station Support	(ESS)
  * --------------------------------------------------------------------------
  */

 /*
  * evaluate the RAF frame
  */
 int ess_raf_received_pack(struct s_smc *smc, SMbuf *mb, struct smt_header *sm,
 			  int fs)
 {
 	void			*p ;		/* universal pointer */
 	struct smt_p_0016	*cmd ;		/* para: command for the ESS */
 	SMbuf			*db ;
 	u_long			msg_res_type ;	/* recource type */
 	u_long			payload, overhead ;
 	int			local ;
 	int			i ;

 	/*
 	 * Message Processing Code
 	 */
 	 local = ((fs & L_INDICATOR) != 0) ;

 	/*
 	 * get the resource type
 	 */
 	if (!(p = (void *) sm_to_para(smc,sm,SMT_P0015))) {
 		DB_ESS("ESS: RAF frame error, parameter type not found\n",0,0) ;
 		return fs;
 	}
 	msg_res_type = ((struct smt_p_0015 *)p)->res_type ;

 	/*
 	 * get the pointer to the ESS command
 	 */
 	if (!(cmd = (struct smt_p_0016 *) sm_to_para(smc,sm,SMT_P0016))) {
 		/*
 		 * error in frame: para ESS command was not found
 		 */
 		 DB_ESS("ESS: RAF frame error, parameter command not found\n",0,0);
 		 return fs;
 	}

 	DB_ESSN(2,"fc %x	ft %x\n",sm->smt_class,sm->smt_type) ;
 	DB_ESSN(2,"ver %x	tran %lx\n",sm->smt_version,sm->smt_tid) ;
 	DB_ESSN(2,"stn_id %s\n",addr_to_string(&sm->smt_source),0) ;

 	DB_ESSN(2,"infolen %x	res %x\n",sm->smt_len, msg_res_type) ;
 	DB_ESSN(2,"sbacmd %x\n",cmd->sba_cmd,0) ;

 	/*
 	 * evaluate the ESS command
 	 */
 	switch (cmd->sba_cmd) {

 	/*
 	 * Process an ESS Allocation Request
 	 */
 	case REQUEST_ALLOCATION :
 		/*
 		 * check for an RAF Request (Allocation Request)
 		 */
 		if (sm->smt_type == SMT_REQUEST) {
 			/*
 			 * process the Allocation request only if the frame is
 			 * local and no static allocation is used
 			 */
 			if (!local || smc->mib.fddiESSPayload)
 				return fs;

 			p = (void *) sm_to_para(smc,sm,SMT_P0019)  ;
 			for (i = 0; i < 5; i++) {
 				if (((struct smt_p_0019 *)p)->alloc_addr.a[i]) {
 					return fs;
 				}
 			}

 			/*
 			 * Note: The Application should send a LAN_LOC_FRAME.
 			 *	 The ESS do not send the Frame to the network!
 			 */
 			smc->ess.alloc_trans_id = sm->smt_tid ;
 			DB_ESS("ESS: save Alloc Req Trans ID %lx\n",sm->smt_tid,0);
 			p = (void *) sm_to_para(smc,sm,SMT_P320F) ;
 			((struct smt_p_320f *)p)->mib_payload =
 				smc->mib.a[PATH0].fddiPATHSbaPayload ;
 			p = (void *) sm_to_para(smc,sm,SMT_P3210) ;
 			((struct smt_p_3210 *)p)->mib_overhead =
 				smc->mib.a[PATH0].fddiPATHSbaOverhead ;
 			sm->smt_dest = smt_sba_da ;

 			if (smc->ess.local_sba_active)
 				return fs | I_INDICATOR;

 			if (!(db = smt_get_mbuf(smc)))
 				return fs;

 			db->sm_len = mb->sm_len ;
 			db->sm_off = mb->sm_off ;
 			memcpy(((char *)(db->sm_data+db->sm_off)),(char *)sm,
 				(int)db->sm_len) ;
 			dump_smt(smc,
 				(struct smt_header *)(db->sm_data+db->sm_off),
 				"RAF") ;
 			smt_send_frame(smc,db,FC_SMT_INFO,0) ;
 			return fs;
 		}

 		/*
 		 * The RAF frame is an Allocation Response !
 		 * check the parameters
 		 */
 		if (smt_check_para(smc,sm,plist_raf_alc_res)) {
 			DB_ESS("ESS: RAF with para problem, ignoring\n",0,0) ;
 			return fs;
 		}

 		/*
 		 * VERIFY THE FRAME IS WELL BUILT:
 		 *
 		 *	1. path index = primary ring only
 		 *	2. resource type = sync bw only
 		 *	3. trans action id = alloc_trans_id
 		 *	4. reason code = success
 		 *
 		 * If any are violated, discard the RAF frame
 		 */
 		if ((((struct smt_p_320b *)sm_to_para(smc,sm,SMT_P320B))->path_index
 			!= PRIMARY_RING) ||
 			(msg_res_type != SYNC_BW) ||
 		(((struct smt_p_reason *)sm_to_para(smc,sm,SMT_P0012))->rdf_reason
 			!= SMT_RDF_SUCCESS) ||
 			(sm->smt_tid != smc->ess.alloc_trans_id)) {

 			DB_ESS("ESS: Allocation Response not accepted\n",0,0) ;
 			return fs;
 		}

 		/*
 		 * Extract message parameters
 		 */
 		p = (void *) sm_to_para(smc,sm,SMT_P320F) ;
                 if (!p) {
                         printk(KERN_ERR "ESS: sm_to_para failed");
                         return fs;
                 }
 		payload = ((struct smt_p_320f *)p)->mib_payload ;
 		p = (void *) sm_to_para(smc,sm,SMT_P3210) ;
                 if (!p) {
                         printk(KERN_ERR "ESS: sm_to_para failed");
                         return fs;
                 }
 		overhead = ((struct smt_p_3210 *)p)->mib_overhead ;

 		DB_ESSN(2,"payload= %lx	overhead= %lx\n",payload,overhead) ;

 		/*
 		 * process the bandwidth allocation
 		 */
 		(void)process_bw_alloc(smc,(long)payload,(long)overhead) ;

 		return fs;
 		/* end of Process Allocation Request */

 	/*
 	 * Process an ESS Change Request
 	 */
 	case CHANGE_ALLOCATION :
 		/*
 		 * except only replies
 		 */
 		if (sm->smt_type != SMT_REQUEST) {
 			DB_ESS("ESS: Do not process Change Responses\n",0,0) ;
 			return fs;
 		}

 		/*
 		 * check the para for the Change Request
 		 */
 		if (smt_check_para(smc,sm,plist_raf_chg_req)) {
 			DB_ESS("ESS: RAF with para problem, ignoring\n",0,0) ;
 			return fs;
 		}

 		/*
 		 * Verify the path index and resource
 		 * type are correct. If any of
 		 * these are false, don't process this
 		 * change request frame.
 		 */
 		if ((((struct smt_p_320b *)sm_to_para(smc,sm,SMT_P320B))->path_index
 			!= PRIMARY_RING) || (msg_res_type != SYNC_BW)) {
 			DB_ESS("ESS: RAF frame with para problem, ignoring\n",0,0) ;
 			return fs;
 		}

 		/*
 		 * Extract message queue parameters
 		 */
 		p = (void *) sm_to_para(smc,sm,SMT_P320F) ;
 		payload = ((struct smt_p_320f *)p)->mib_payload ;
 		p = (void *) sm_to_para(smc,sm,SMT_P3210) ;
 		overhead = ((struct smt_p_3210 *)p)->mib_overhead ;

 		DB_ESSN(2,"ESS: Change Request from %s\n",
 			addr_to_string(&sm->smt_source),0) ;
 		DB_ESSN(2,"payload= %lx	overhead= %lx\n",payload,overhead) ;

 		/*
 		 * process the bandwidth allocation
 		 */
 		if(!process_bw_alloc(smc,(long)payload,(long)overhead))
 			return fs;

 		/*
 		 * send an RAF Change Reply
 		 */
 		ess_send_response(smc,sm,CHANGE_ALLOCATION) ;

 		return fs;
 		/* end of Process Change Request */

 	/*
 	 * Process Report Response
 	 */
 	case REPORT_ALLOCATION :
 		/*
 		 * except only requests
 		 */
 		if (sm->smt_type != SMT_REQUEST) {
 			DB_ESS("ESS: Do not process a Report Reply\n",0,0) ;
 			return fs;
 		}

 		DB_ESSN(2,"ESS: Report Request from %s\n",
 			addr_to_string(&(sm->smt_source)),0) ;

 		/*
 		 * verify that the resource type is sync bw only
 		 */
 		if (msg_res_type != SYNC_BW) {
 			DB_ESS("ESS: ignoring RAF with para problem\n",0,0) ;
 			return fs;
 		}

 		/*
 		 * send an RAF Change Reply
 		 */
 		ess_send_response(smc,sm,REPORT_ALLOCATION) ;

 		return fs;
 		/* end of Process Report Request */

 	default:
 		/*
 		 * error in frame
 		 */
 		DB_ESS("ESS: ignoring RAF with bad sba_cmd\n",0,0) ;
 		break ;
 	}

 	return fs;
 }

 /*
  * determines the synchronous bandwidth, set the TSYNC register and the
  * mib variables SBAPayload, SBAOverhead and fddiMACT-NEG.
  */
 static int process_bw_alloc(struct s_smc *smc, long int payload, long int overhead)
 {
 	/*
 	 * determine the synchronous bandwidth (sync_bw) in bytes per T-NEG,
 	 * if the payload is greater than zero.
 	 * For the SBAPayload and the SBAOverhead we have the following
 	 * unite quations
  	 *		      _		  _
 	 *		     |	     bytes |
 	 *	SBAPayload = | 8000 ------ |
 	 *		     |		s  |
 	 *		      -		  -
  	 *		       _       _
 	 *		      |	 bytes	|
 	 *	SBAOverhead = | ------	|
 	 *		      |	 T-NEG	|
 	 *		       -       -
  	 *
 	 * T-NEG is described by the equation:
 	 *
 	 *		     (-) fddiMACT-NEG
 	 *	T-NEG =	    -------------------
 	 *			12500000 1/s
 	 *
 	 * The number of bytes we are able to send is the payload
 	 * plus the overhead.
 	 *
 	 *			  bytes    T-NEG SBAPayload 8000 bytes/s
 	 * sync_bw =  SBAOverhead ------ + -----------------------------
 	 *	   		  T-NEG		T-NEG
 	 *
 	 *
 	 *	      		     1
 	 * sync_bw =  SBAOverhead + ---- (-)fddiMACT-NEG * SBAPayload
 	 *	       		    1562
 	 *
 	 */

 	/*
 	 * set the mib attributes fddiPATHSbaOverhead, fddiPATHSbaPayload
 	 */
 /*	if (smt_set_obj(smc,SMT_P320F,payload,S_SET)) {
 		DB_ESS("ESS: SMT does not accept the payload value\n",0,0) ;
 		return FALSE;
 	}
 	if (smt_set_obj(smc,SMT_P3210,overhead,S_SET)) {
 		DB_ESS("ESS: SMT does not accept the overhead value\n",0,0) ;
 		return FALSE;
 	} */

 	/* premliminary */
 	if (payload > MAX_PAYLOAD || overhead > 5000) {
 		DB_ESS("ESS: payload / overhead not accepted\n",0,0) ;
 		return FALSE;
 	}

 	/*
 	 * start the iterative allocation process if the payload or the overhead
 	 * are smaller than the parsed values
 	 */
 	if (smc->mib.fddiESSPayload &&
 		((u_long)payload != smc->mib.fddiESSPayload ||
 		(u_long)overhead != smc->mib.fddiESSOverhead)) {
 		smc->ess.raf_act_timer_poll = TRUE ;
 		smc->ess.timer_count = 0 ;
 	}

 	/*
 	 * evulate the Payload
 	 */
 	if (payload) {
 		DB_ESSN(2,"ESS: turn SMT_ST_SYNC_SERVICE bit on\n",0,0) ;
 		smc->ess.sync_bw_available = TRUE ;

 		smc->ess.sync_bw = overhead -
 			(long)smc->mib.m[MAC0].fddiMACT_Neg *
 			payload / 1562 ;
 	}
 	else {
 		DB_ESSN(2,"ESS: turn SMT_ST_SYNC_SERVICE bit off\n",0,0) ;
 		smc->ess.sync_bw_available = FALSE ;
 		smc->ess.sync_bw = 0 ;
 		overhead = 0 ;
 	}

 	smc->mib.a[PATH0].fddiPATHSbaPayload = payload ;
 	smc->mib.a[PATH0].fddiPATHSbaOverhead = overhead ;


 	DB_ESSN(2,"tsync = %lx\n",smc->ess.sync_bw,0) ;

 	ess_config_fifo(smc) ;
 	set_formac_tsync(smc,smc->ess.sync_bw) ;
 	return TRUE;
 }

 static void ess_send_response(struct s_smc *smc, struct smt_header *sm,
 			      int sba_cmd)
 {
 	struct smt_sba_chg	*chg ;
 	SMbuf			*mb ;
 	void			*p ;

 	/*
 	 * get and initialize the response frame
 	 */
 	if (sba_cmd == CHANGE_ALLOCATION) {
 		if (!(mb=smt_build_frame(smc,SMT_RAF,SMT_REPLY,
 				sizeof(struct smt_sba_chg))))
 				return ;
 	}
 	else {
 		if (!(mb=smt_build_frame(smc,SMT_RAF,SMT_REPLY,
 				sizeof(struct smt_sba_rep_res))))
 				return ;
 	}

 	chg = smtod(mb,struct smt_sba_chg *) ;
 	chg->smt.smt_tid = sm->smt_tid ;
 	chg->smt.smt_dest = sm->smt_source ;

 	/* set P15 */
 	chg->s_type.para.p_type = SMT_P0015 ;
 	chg->s_type.para.p_len = sizeof(struct smt_p_0015) - PARA_LEN ;
 	chg->s_type.res_type = SYNC_BW ;

 	/* set P16 */
 	chg->cmd.para.p_type = SMT_P0016 ;
 	chg->cmd.para.p_len = sizeof(struct smt_p_0016) - PARA_LEN ;
 	chg->cmd.sba_cmd = sba_cmd ;

 	/* set P320B */
 	chg->path.para.p_type = SMT_P320B ;
 	chg->path.para.p_len = sizeof(struct smt_p_320b) - PARA_LEN ;
 	chg->path.mib_index = SBAPATHINDEX ;
 	chg->path.path_pad = 0;
 	chg->path.path_index = PRIMARY_RING ;

 	/* set P320F */
 	chg->payload.para.p_type = SMT_P320F ;
 	chg->payload.para.p_len = sizeof(struct smt_p_320f) - PARA_LEN ;
 	chg->payload.mib_index = SBAPATHINDEX ;
 	chg->payload.mib_payload = smc->mib.a[PATH0].fddiPATHSbaPayload ;

 	/* set P3210 */
 	chg->overhead.para.p_type = SMT_P3210 ;
 	chg->overhead.para.p_len = sizeof(struct smt_p_3210) - PARA_LEN ;
 	chg->overhead.mib_index = SBAPATHINDEX ;
 	chg->overhead.mib_overhead = smc->mib.a[PATH0].fddiPATHSbaOverhead ;

 	if (sba_cmd == CHANGE_ALLOCATION) {
 		/* set P1A */
 		chg->cat.para.p_type = SMT_P001A ;
 		chg->cat.para.p_len = sizeof(struct smt_p_001a) - PARA_LEN ;
 		p = (void *) sm_to_para(smc,sm,SMT_P001A) ;
 		chg->cat.category = ((struct smt_p_001a *)p)->category ;
 	}
 	dump_smt(smc,(struct smt_header *)chg,"RAF") ;
 	ess_send_frame(smc,mb) ;
 }

 void ess_timer_poll(struct s_smc *smc)
 {
 	if (!smc->ess.raf_act_timer_poll)
 		return ;

 	DB_ESSN(2,"ESS: timer_poll\n",0,0) ;

 	smc->ess.timer_count++ ;
 	if (smc->ess.timer_count == 10) {
 		smc->ess.timer_count = 0 ;
 		ess_send_alc_req(smc) ;
 	}
 }

 static void ess_send_alc_req(struct s_smc *smc)
 {
 	struct smt_sba_alc_req *req ;
 	SMbuf	*mb ;

 	/*
 	 * send never allocation request where the requested payload and
 	 * overhead is zero or deallocate bandwidth when no bandwidth is
 	 * parsed
 	 */
 	if (!smc->mib.fddiESSPayload) {
 		smc->mib.fddiESSOverhead = 0 ;
 	}
 	else {
 		if (!smc->mib.fddiESSOverhead)
 			smc->mib.fddiESSOverhead = DEFAULT_OV ;
 	}

 	if (smc->mib.fddiESSOverhead ==
 		smc->mib.a[PATH0].fddiPATHSbaOverhead &&
 		smc->mib.fddiESSPayload ==
 		smc->mib.a[PATH0].fddiPATHSbaPayload){
 		smc->ess.raf_act_timer_poll = FALSE ;
 		smc->ess.timer_count = 7 ;	/* next RAF alc req after 3 s */
 		return ;
 	}

 	/*
 	 * get and initialize the response frame
 	 */
 	if (!(mb=smt_build_frame(smc,SMT_RAF,SMT_REQUEST,
 			sizeof(struct smt_sba_alc_req))))
 			return ;
 	req = smtod(mb,struct smt_sba_alc_req *) ;
 	req->smt.smt_tid = smc->ess.alloc_trans_id = smt_get_tid(smc) ;
 	req->smt.smt_dest = smt_sba_da ;

 	/* set P15 */
 	req->s_type.para.p_type = SMT_P0015 ;
 	req->s_type.para.p_len = sizeof(struct smt_p_0015) - PARA_LEN ;
 	req->s_type.res_type = SYNC_BW ;

 	/* set P16 */
 	req->cmd.para.p_type = SMT_P0016 ;
 	req->cmd.para.p_len = sizeof(struct smt_p_0016) - PARA_LEN ;
 	req->cmd.sba_cmd = REQUEST_ALLOCATION ;

 	/*
 	 * set the parameter type and parameter length of all used
 	 * parameters
 	 */

 	/* set P320B */
 	req->path.para.p_type = SMT_P320B ;
 	req->path.para.p_len = sizeof(struct smt_p_320b) - PARA_LEN ;
 	req->path.mib_index = SBAPATHINDEX ;
 	req->path.path_pad = 0;
 	req->path.path_index = PRIMARY_RING ;

 	/* set P0017 */
 	req->pl_req.para.p_type = SMT_P0017 ;
 	req->pl_req.para.p_len = sizeof(struct smt_p_0017) - PARA_LEN ;
 	req->pl_req.sba_pl_req = smc->mib.fddiESSPayload -
 		smc->mib.a[PATH0].fddiPATHSbaPayload ;

 	/* set P0018 */
 	req->ov_req.para.p_type = SMT_P0018 ;
 	req->ov_req.para.p_len = sizeof(struct smt_p_0018) - PARA_LEN ;
 	req->ov_req.sba_ov_req = smc->mib.fddiESSOverhead -
 		smc->mib.a[PATH0].fddiPATHSbaOverhead ;

 	/* set P320F */
 	req->payload.para.p_type = SMT_P320F ;
 	req->payload.para.p_len = sizeof(struct smt_p_320f) - PARA_LEN ;
 	req->payload.mib_index = SBAPATHINDEX ;
 	req->payload.mib_payload = smc->mib.a[PATH0].fddiPATHSbaPayload ;

 	/* set P3210 */
 	req->overhead.para.p_type = SMT_P3210 ;
 	req->overhead.para.p_len = sizeof(struct smt_p_3210) - PARA_LEN ;
 	req->overhead.mib_index = SBAPATHINDEX ;
 	req->overhead.mib_overhead = smc->mib.a[PATH0].fddiPATHSbaOverhead ;

 	/* set P19 */
 	req->a_addr.para.p_type = SMT_P0019 ;
 	req->a_addr.para.p_len = sizeof(struct smt_p_0019) - PARA_LEN ;
 	req->a_addr.sba_pad = 0;
 	req->a_addr.alloc_addr = null_addr ;

 	/* set P1A */
 	req->cat.para.p_type = SMT_P001A ;
 	req->cat.para.p_len = sizeof(struct smt_p_001a) - PARA_LEN ;
 	req->cat.category = smc->mib.fddiESSCategory ;

 	/* set P1B */
 	req->tneg.para.p_type = SMT_P001B ;
 	req->tneg.para.p_len = sizeof(struct smt_p_001b) - PARA_LEN ;
 	req->tneg.max_t_neg = smc->mib.fddiESSMaxTNeg ;

 	/* set P1C */
 	req->segm.para.p_type = SMT_P001C ;
 	req->segm.para.p_len = sizeof(struct smt_p_001c) - PARA_LEN ;
 	req->segm.min_seg_siz = smc->mib.fddiESSMinSegmentSize ;

 	dump_smt(smc,(struct smt_header *)req,"RAF") ;
 	ess_send_frame(smc,mb) ;
 }

 static void ess_send_frame(struct s_smc *smc, SMbuf *mb)
 {
 	/*
 	 * check if the frame must be send to the own ESS
 	 */
 	if (smc->ess.local_sba_active) {
 		/*
 		 * Send the Change Reply to the local SBA
 		 */
 		DB_ESS("ESS:Send to the local SBA\n",0,0) ;
 		if (!smc->ess.sba_reply_pend)
 			smc->ess.sba_reply_pend = mb ;
 		else {
 			DB_ESS("Frame is lost - another frame was pending\n",0,0);
 			smt_free_mbuf(smc,mb) ;
 		}
 	}
 	else {
 		/*
 		 * Send the SBA RAF Change Reply to the network
 		 */
 		DB_ESS("ESS:Send to the network\n",0,0) ;
 		smt_send_frame(smc,mb,FC_SMT_INFO,0) ;
 	}
 }

 void ess_para_change(struct s_smc *smc)
 {
 	(void)process_bw_alloc(smc,(long)smc->mib.a[PATH0].fddiPATHSbaPayload,
 		(long)smc->mib.a[PATH0].fddiPATHSbaOverhead) ;
 }

 static void ess_config_fifo(struct s_smc *smc)
 {
 	/*
 	 * if nothing to do exit
 	 */
 	if (smc->mib.a[PATH0].fddiPATHSbaPayload) {
 		if (smc->hw.fp.fifo.fifo_config_mode & SYNC_TRAFFIC_ON &&
 			(smc->hw.fp.fifo.fifo_config_mode&SEND_ASYNC_AS_SYNC) ==
 			smc->mib.fddiESSSynchTxMode) {
 			return ;
 		}
 	}
 	else {
 		if (!(smc->hw.fp.fifo.fifo_config_mode & SYNC_TRAFFIC_ON)) {
 			return ;
 		}
 	}

 	/*
 	 * split up the FIFO and reinitialize the queues
 	 */
 	formac_reinit_tx(smc) ;
 }

 #endif /* ESS */

 #endif	/* no SLIM_SMT */
	/******************************************************************************
	*
	* (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.
	*
	******************************************************************************/

	/*
	* *******************************************************************
	* This SBA code implements the Synchronous Bandwidth Allocation
	* functions described in the "FDDI Synchronous Forum Implementer's
	* Agreement" dated December 1th, 1993.
	* *******************************************************************
	*
	* PURPOSE: The purpose of this function is to control
	* synchronous allocations on a single FDDI segment.
	* Allocations are limited to the primary FDDI ring.
	* The SBM provides recovery mechanisms to recover
	* unused bandwidth also resolves T_Neg and
	* reconfiguration changes. Many of the SBM state
	* machine inputs are sourced by the underlying
	* FDDI sub-system supporting the SBA application.
	*
	* *******************************************************************
	*/

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


	#ifndef SLIM_SMT

	#ifdef ESS

	#ifndef lint
	static const char ID_sccs[] = "@(#)ess.c 1.10 96/02/23 (C) SK" ;
	#define LINT_USE(x)
	#else
	#define LINT_USE(x) (x)=(x)
	#endif
	#define MS2BCLK(x) ((x)*12500L)

	/*
	-------------------------------------------------------------
	LOCAL VARIABLES:
	-------------------------------------------------------------
	*/

	static const u_short plist_raf_alc_res[] = { SMT_P0012, SMT_P320B, SMT_P320F,
	SMT_P3210, SMT_P0019, SMT_P001A,
	SMT_P001D, 0 } ;

	static const u_short plist_raf_chg_req[] = { SMT_P320B, SMT_P320F, SMT_P3210,
	SMT_P001A, 0 } ;

	static const struct fddi_addr smt_sba_da = {{0x80,0x01,0x43,0x00,0x80,0x0C}} ;
	static const struct fddi_addr null_addr = {{0,0,0,0,0,0}} ;

	/*
	-------------------------------------------------------------
	GLOBAL VARIABLES:
	-------------------------------------------------------------
	*/


	/*
	-------------------------------------------------------------
	LOCAL FUNCTIONS:
	-------------------------------------------------------------
	*/

	static void ess_send_response(struct s_smc smc, struct smt_header sm,
	int sba_cmd);
	static void ess_config_fifo(struct s_smc *smc);
	static void ess_send_alc_req(struct s_smc *smc);
	static void ess_send_frame(struct s_smc smc, SMbuf mb);

	/*
	-------------------------------------------------------------
	EXTERNAL FUNCTIONS:
	-------------------------------------------------------------
	*/

	/*
	-------------------------------------------------------------
	PUBLIC FUNCTIONS:
	-------------------------------------------------------------
	*/

	void ess_timer_poll(struct s_smc *smc);
	void ess_para_change(struct s_smc *smc);
	int ess_raf_received_pack(struct s_smc smc, SMbuf mb, struct smt_header *sm,
	int fs);
	static int process_bw_alloc(struct s_smc *smc, long int payload, long int overhead);


	/*
	* --------------------------------------------------------------------------
	* End Station Support (ESS)
	* --------------------------------------------------------------------------
	*/

	/*
	* evaluate the RAF frame
	*/
	int ess_raf_received_pack(struct s_smc smc, SMbuf mb, struct smt_header *sm,
	int fs)
	{
	void p ; / universal pointer */
	struct smt_p_0016 cmd ; / para: command for the ESS */
	SMbuf *db ;
	u_long msg_res_type ; /* recource type */
	u_long payload, overhead ;
	int local ;
	int i ;

	/*
	* Message Processing Code
	*/
	local = ((fs & L_INDICATOR) != 0) ;

	/*
	* get the resource type
	*/
	if (!(p = (void *) sm_to_para(smc,sm,SMT_P0015))) {
	DB_ESS("ESS: RAF frame error, parameter type not found\n",0,0) ;
	return fs;
	}
	msg_res_type = ((struct smt_p_0015 *)p)->res_type ;

	/*
	* get the pointer to the ESS command
	*/
	if (!(cmd = (struct smt_p_0016 *) sm_to_para(smc,sm,SMT_P0016))) {
	/*
	* error in frame: para ESS command was not found
	*/
	DB_ESS("ESS: RAF frame error, parameter command not found\n",0,0);
	return fs;
	}

	DB_ESSN(2,"fc %x ft %x\n",sm->smt_class,sm->smt_type) ;
	DB_ESSN(2,"ver %x tran %lx\n",sm->smt_version,sm->smt_tid) ;
	DB_ESSN(2,"stn_id %s\n",addr_to_string(&sm->smt_source),0) ;

	DB_ESSN(2,"infolen %x res %x\n",sm->smt_len, msg_res_type) ;
	DB_ESSN(2,"sbacmd %x\n",cmd->sba_cmd,0) ;

	/*
	* evaluate the ESS command
	*/
	switch (cmd->sba_cmd) {

	/*
	* Process an ESS Allocation Request
	*/
	case REQUEST_ALLOCATION :
	/*
	* check for an RAF Request (Allocation Request)
	*/
	if (sm->smt_type == SMT_REQUEST) {
	/*
	* process the Allocation request only if the frame is
	* local and no static allocation is used
	*/
	if (!local \|\| smc->mib.fddiESSPayload)
	return fs;

	p = (void *) sm_to_para(smc,sm,SMT_P0019) ;
	for (i = 0; i < 5; i++) {
	if (((struct smt_p_0019 *)p)->alloc_addr.a[i]) {
	return fs;
	}
	}

	/*
	* Note: The Application should send a LAN_LOC_FRAME.
	* The ESS do not send the Frame to the network!
	*/
	smc->ess.alloc_trans_id = sm->smt_tid ;
	DB_ESS("ESS: save Alloc Req Trans ID %lx\n",sm->smt_tid,0);
	p = (void *) sm_to_para(smc,sm,SMT_P320F) ;
	((struct smt_p_320f *)p)->mib_payload =
	smc->mib.a[PATH0].fddiPATHSbaPayload ;
	p = (void *) sm_to_para(smc,sm,SMT_P3210) ;
	((struct smt_p_3210 *)p)->mib_overhead =
	smc->mib.a[PATH0].fddiPATHSbaOverhead ;
	sm->smt_dest = smt_sba_da ;

	if (smc->ess.local_sba_active)
	return fs \| I_INDICATOR;

	if (!(db = smt_get_mbuf(smc)))
	return fs;

	db->sm_len = mb->sm_len ;
	db->sm_off = mb->sm_off ;
	memcpy(((char )(db->sm_data+db->sm_off)),(char )sm,
	(int)db->sm_len) ;
	dump_smt(smc,
	(struct smt_header *)(db->sm_data+db->sm_off),
	"RAF") ;
	smt_send_frame(smc,db,FC_SMT_INFO,0) ;
	return fs;
	}

	/*
	* The RAF frame is an Allocation Response !
	* check the parameters
	*/
	if (smt_check_para(smc,sm,plist_raf_alc_res)) {
	DB_ESS("ESS: RAF with para problem, ignoring\n",0,0) ;
	return fs;
	}

	/*
	* VERIFY THE FRAME IS WELL BUILT:
	*
	* 1. path index = primary ring only
	* 2. resource type = sync bw only
	* 3. trans action id = alloc_trans_id
	* 4. reason code = success
	*
	* If any are violated, discard the RAF frame
	*/
	if ((((struct smt_p_320b *)sm_to_para(smc,sm,SMT_P320B))->path_index
	!= PRIMARY_RING) \|\|
	(msg_res_type != SYNC_BW) \|\|
	(((struct smt_p_reason *)sm_to_para(smc,sm,SMT_P0012))->rdf_reason
	!= SMT_RDF_SUCCESS) \|\|
	(sm->smt_tid != smc->ess.alloc_trans_id)) {

	DB_ESS("ESS: Allocation Response not accepted\n",0,0) ;
	return fs;
	}

	/*
	* Extract message parameters
	*/
	p = (void *) sm_to_para(smc,sm,SMT_P320F) ;
	if (!p) {
	printk(KERN_ERR "ESS: sm_to_para failed");
	return fs;
	}
	payload = ((struct smt_p_320f *)p)->mib_payload ;
	p = (void *) sm_to_para(smc,sm,SMT_P3210) ;
	if (!p) {
	printk(KERN_ERR "ESS: sm_to_para failed");
	return fs;
	}
	overhead = ((struct smt_p_3210 *)p)->mib_overhead ;

	DB_ESSN(2,"payload= %lx overhead= %lx\n",payload,overhead) ;

	/*
	* process the bandwidth allocation
	*/
	(void)process_bw_alloc(smc,(long)payload,(long)overhead) ;

	return fs;
	/* end of Process Allocation Request */

	/*
	* Process an ESS Change Request
	*/
	case CHANGE_ALLOCATION :
	/*
	* except only replies
	*/
	if (sm->smt_type != SMT_REQUEST) {
	DB_ESS("ESS: Do not process Change Responses\n",0,0) ;
	return fs;
	}

	/*
	* check the para for the Change Request
	*/
	if (smt_check_para(smc,sm,plist_raf_chg_req)) {
	DB_ESS("ESS: RAF with para problem, ignoring\n",0,0) ;
	return fs;
	}

	/*
	* Verify the path index and resource
	* type are correct. If any of
	* these are false, don't process this
	* change request frame.
	*/
	if ((((struct smt_p_320b *)sm_to_para(smc,sm,SMT_P320B))->path_index
	!= PRIMARY_RING) \|\| (msg_res_type != SYNC_BW)) {
	DB_ESS("ESS: RAF frame with para problem, ignoring\n",0,0) ;
	return fs;
	}

	/*
	* Extract message queue parameters
	*/
	p = (void *) sm_to_para(smc,sm,SMT_P320F) ;
	payload = ((struct smt_p_320f *)p)->mib_payload ;
	p = (void *) sm_to_para(smc,sm,SMT_P3210) ;
	overhead = ((struct smt_p_3210 *)p)->mib_overhead ;

	DB_ESSN(2,"ESS: Change Request from %s\n",
	addr_to_string(&sm->smt_source),0) ;
	DB_ESSN(2,"payload= %lx overhead= %lx\n",payload,overhead) ;

	/*
	* process the bandwidth allocation
	*/
	if(!process_bw_alloc(smc,(long)payload,(long)overhead))
	return fs;

	/*
	* send an RAF Change Reply
	*/
	ess_send_response(smc,sm,CHANGE_ALLOCATION) ;

	return fs;
	/* end of Process Change Request */

	/*
	* Process Report Response
	*/
	case REPORT_ALLOCATION :
	/*
	* except only requests
	*/
	if (sm->smt_type != SMT_REQUEST) {
	DB_ESS("ESS: Do not process a Report Reply\n",0,0) ;
	return fs;
	}

	DB_ESSN(2,"ESS: Report Request from %s\n",
	addr_to_string(&(sm->smt_source)),0) ;

	/*
	* verify that the resource type is sync bw only
	*/
	if (msg_res_type != SYNC_BW) {
	DB_ESS("ESS: ignoring RAF with para problem\n",0,0) ;
	return fs;
	}

	/*
	* send an RAF Change Reply
	*/
	ess_send_response(smc,sm,REPORT_ALLOCATION) ;

	return fs;
	/* end of Process Report Request */

	default:
	/*
	* error in frame
	*/
	DB_ESS("ESS: ignoring RAF with bad sba_cmd\n",0,0) ;
	break ;
	}

	return fs;
	}

	/*
	* determines the synchronous bandwidth, set the TSYNC register and the
	* mib variables SBAPayload, SBAOverhead and fddiMACT-NEG.
	*/
	static int process_bw_alloc(struct s_smc *smc, long int payload, long int overhead)
	{
	/*
	* determine the synchronous bandwidth (sync_bw) in bytes per T-NEG,
	* if the payload is greater than zero.
	* For the SBAPayload and the SBAOverhead we have the following
	* unite quations
	* _ _
	* \| bytes \|
	* SBAPayload = \| 8000 ------ \|
	* \| s \|
	* - -
	* _ _
	* \| bytes \|
	* SBAOverhead = \| ------ \|
	* \| T-NEG \|
	* - -
	*
	* T-NEG is described by the equation:
	*
	* (-) fddiMACT-NEG
	* T-NEG = -------------------
	* 12500000 1/s
	*
	* The number of bytes we are able to send is the payload
	* plus the overhead.
	*
	* bytes T-NEG SBAPayload 8000 bytes/s
	* sync_bw = SBAOverhead ------ + -----------------------------
	* T-NEG T-NEG
	*
	*
	* 1
	* sync_bw = SBAOverhead + ---- (-)fddiMACT-NEG * SBAPayload
	* 1562
	*
	*/

	/*
	* set the mib attributes fddiPATHSbaOverhead, fddiPATHSbaPayload
	*/
	/* if (smt_set_obj(smc,SMT_P320F,payload,S_SET)) {
	DB_ESS("ESS: SMT does not accept the payload value\n",0,0) ;
	return FALSE;
	}
	if (smt_set_obj(smc,SMT_P3210,overhead,S_SET)) {
	DB_ESS("ESS: SMT does not accept the overhead value\n",0,0) ;
	return FALSE;
	} */

	/* premliminary */
	if (payload > MAX_PAYLOAD \|\| overhead > 5000) {
	DB_ESS("ESS: payload / overhead not accepted\n",0,0) ;
	return FALSE;
	}

	/*
	* start the iterative allocation process if the payload or the overhead
	* are smaller than the parsed values
	*/
	if (smc->mib.fddiESSPayload &&
	((u_long)payload != smc->mib.fddiESSPayload \|\|
	(u_long)overhead != smc->mib.fddiESSOverhead)) {
	smc->ess.raf_act_timer_poll = TRUE ;
	smc->ess.timer_count = 0 ;
	}

	/*
	* evulate the Payload
	*/
	if (payload) {
	DB_ESSN(2,"ESS: turn SMT_ST_SYNC_SERVICE bit on\n",0,0) ;
	smc->ess.sync_bw_available = TRUE ;

	smc->ess.sync_bw = overhead -
	(long)smc->mib.m[MAC0].fddiMACT_Neg *
	payload / 1562 ;
	}
	else {
	DB_ESSN(2,"ESS: turn SMT_ST_SYNC_SERVICE bit off\n",0,0) ;
	smc->ess.sync_bw_available = FALSE ;
	smc->ess.sync_bw = 0 ;
	overhead = 0 ;
	}

	smc->mib.a[PATH0].fddiPATHSbaPayload = payload ;
	smc->mib.a[PATH0].fddiPATHSbaOverhead = overhead ;


	DB_ESSN(2,"tsync = %lx\n",smc->ess.sync_bw,0) ;

	ess_config_fifo(smc) ;
	set_formac_tsync(smc,smc->ess.sync_bw) ;
	return TRUE;
	}

	static void ess_send_response(struct s_smc smc, struct smt_header sm,
	int sba_cmd)
	{
	struct smt_sba_chg *chg ;
	SMbuf *mb ;
	void *p ;

	/*
	* get and initialize the response frame
	*/
	if (sba_cmd == CHANGE_ALLOCATION) {
	if (!(mb=smt_build_frame(smc,SMT_RAF,SMT_REPLY,
	sizeof(struct smt_sba_chg))))
	return ;
	}
	else {
	if (!(mb=smt_build_frame(smc,SMT_RAF,SMT_REPLY,
	sizeof(struct smt_sba_rep_res))))
	return ;
	}

	chg = smtod(mb,struct smt_sba_chg *) ;
	chg->smt.smt_tid = sm->smt_tid ;
	chg->smt.smt_dest = sm->smt_source ;

	/* set P15 */
	chg->s_type.para.p_type = SMT_P0015 ;
	chg->s_type.para.p_len = sizeof(struct smt_p_0015) - PARA_LEN ;
	chg->s_type.res_type = SYNC_BW ;

	/* set P16 */
	chg->cmd.para.p_type = SMT_P0016 ;
	chg->cmd.para.p_len = sizeof(struct smt_p_0016) - PARA_LEN ;
	chg->cmd.sba_cmd = sba_cmd ;

	/* set P320B */
	chg->path.para.p_type = SMT_P320B ;
	chg->path.para.p_len = sizeof(struct smt_p_320b) - PARA_LEN ;
	chg->path.mib_index = SBAPATHINDEX ;
	chg->path.path_pad = 0;
	chg->path.path_index = PRIMARY_RING ;

	/* set P320F */
	chg->payload.para.p_type = SMT_P320F ;
	chg->payload.para.p_len = sizeof(struct smt_p_320f) - PARA_LEN ;
	chg->payload.mib_index = SBAPATHINDEX ;
	chg->payload.mib_payload = smc->mib.a[PATH0].fddiPATHSbaPayload ;

	/* set P3210 */
	chg->overhead.para.p_type = SMT_P3210 ;
	chg->overhead.para.p_len = sizeof(struct smt_p_3210) - PARA_LEN ;
	chg->overhead.mib_index = SBAPATHINDEX ;
	chg->overhead.mib_overhead = smc->mib.a[PATH0].fddiPATHSbaOverhead ;

	if (sba_cmd == CHANGE_ALLOCATION) {
	/* set P1A */
	chg->cat.para.p_type = SMT_P001A ;
	chg->cat.para.p_len = sizeof(struct smt_p_001a) - PARA_LEN ;
	p = (void *) sm_to_para(smc,sm,SMT_P001A) ;
	chg->cat.category = ((struct smt_p_001a *)p)->category ;
	}
	dump_smt(smc,(struct smt_header *)chg,"RAF") ;
	ess_send_frame(smc,mb) ;
	}

	void ess_timer_poll(struct s_smc *smc)
	{
	if (!smc->ess.raf_act_timer_poll)
	return ;

	DB_ESSN(2,"ESS: timer_poll\n",0,0) ;

	smc->ess.timer_count++ ;
	if (smc->ess.timer_count == 10) {
	smc->ess.timer_count = 0 ;
	ess_send_alc_req(smc) ;
	}
	}

	static void ess_send_alc_req(struct s_smc *smc)
	{
	struct smt_sba_alc_req *req ;
	SMbuf *mb ;

	/*
	* send never allocation request where the requested payload and
	* overhead is zero or deallocate bandwidth when no bandwidth is
	* parsed
	*/
	if (!smc->mib.fddiESSPayload) {
	smc->mib.fddiESSOverhead = 0 ;
	}
	else {
	if (!smc->mib.fddiESSOverhead)
	smc->mib.fddiESSOverhead = DEFAULT_OV ;
	}

	if (smc->mib.fddiESSOverhead ==
	smc->mib.a[PATH0].fddiPATHSbaOverhead &&
	smc->mib.fddiESSPayload ==
	smc->mib.a[PATH0].fddiPATHSbaPayload){
	smc->ess.raf_act_timer_poll = FALSE ;
	smc->ess.timer_count = 7 ; /* next RAF alc req after 3 s */
	return ;
	}

	/*
	* get and initialize the response frame
	*/
	if (!(mb=smt_build_frame(smc,SMT_RAF,SMT_REQUEST,
	sizeof(struct smt_sba_alc_req))))
	return ;
	req = smtod(mb,struct smt_sba_alc_req *) ;
	req->smt.smt_tid = smc->ess.alloc_trans_id = smt_get_tid(smc) ;
	req->smt.smt_dest = smt_sba_da ;

	/* set P15 */
	req->s_type.para.p_type = SMT_P0015 ;
	req->s_type.para.p_len = sizeof(struct smt_p_0015) - PARA_LEN ;
	req->s_type.res_type = SYNC_BW ;

	/* set P16 */
	req->cmd.para.p_type = SMT_P0016 ;
	req->cmd.para.p_len = sizeof(struct smt_p_0016) - PARA_LEN ;
	req->cmd.sba_cmd = REQUEST_ALLOCATION ;

	/*
	* set the parameter type and parameter length of all used
	* parameters
	*/

	/* set P320B */
	req->path.para.p_type = SMT_P320B ;
	req->path.para.p_len = sizeof(struct smt_p_320b) - PARA_LEN ;
	req->path.mib_index = SBAPATHINDEX ;
	req->path.path_pad = 0;
	req->path.path_index = PRIMARY_RING ;

	/* set P0017 */
	req->pl_req.para.p_type = SMT_P0017 ;
	req->pl_req.para.p_len = sizeof(struct smt_p_0017) - PARA_LEN ;
	req->pl_req.sba_pl_req = smc->mib.fddiESSPayload -
	smc->mib.a[PATH0].fddiPATHSbaPayload ;

	/* set P0018 */
	req->ov_req.para.p_type = SMT_P0018 ;
	req->ov_req.para.p_len = sizeof(struct smt_p_0018) - PARA_LEN ;
	req->ov_req.sba_ov_req = smc->mib.fddiESSOverhead -
	smc->mib.a[PATH0].fddiPATHSbaOverhead ;

	/* set P320F */
	req->payload.para.p_type = SMT_P320F ;
	req->payload.para.p_len = sizeof(struct smt_p_320f) - PARA_LEN ;
	req->payload.mib_index = SBAPATHINDEX ;
	req->payload.mib_payload = smc->mib.a[PATH0].fddiPATHSbaPayload ;

	/* set P3210 */
	req->overhead.para.p_type = SMT_P3210 ;
	req->overhead.para.p_len = sizeof(struct smt_p_3210) - PARA_LEN ;
	req->overhead.mib_index = SBAPATHINDEX ;
	req->overhead.mib_overhead = smc->mib.a[PATH0].fddiPATHSbaOverhead ;

	/* set P19 */
	req->a_addr.para.p_type = SMT_P0019 ;
	req->a_addr.para.p_len = sizeof(struct smt_p_0019) - PARA_LEN ;
	req->a_addr.sba_pad = 0;
	req->a_addr.alloc_addr = null_addr ;

	/* set P1A */
	req->cat.para.p_type = SMT_P001A ;
	req->cat.para.p_len = sizeof(struct smt_p_001a) - PARA_LEN ;
	req->cat.category = smc->mib.fddiESSCategory ;

	/* set P1B */
	req->tneg.para.p_type = SMT_P001B ;
	req->tneg.para.p_len = sizeof(struct smt_p_001b) - PARA_LEN ;
	req->tneg.max_t_neg = smc->mib.fddiESSMaxTNeg ;

	/* set P1C */
	req->segm.para.p_type = SMT_P001C ;
	req->segm.para.p_len = sizeof(struct smt_p_001c) - PARA_LEN ;
	req->segm.min_seg_siz = smc->mib.fddiESSMinSegmentSize ;

	dump_smt(smc,(struct smt_header *)req,"RAF") ;
	ess_send_frame(smc,mb) ;
	}

	static void ess_send_frame(struct s_smc smc, SMbuf mb)
	{
	/*
	* check if the frame must be send to the own ESS
	*/
	if (smc->ess.local_sba_active) {
	/*
	* Send the Change Reply to the local SBA
	*/
	DB_ESS("ESS:Send to the local SBA\n",0,0) ;
	if (!smc->ess.sba_reply_pend)
	smc->ess.sba_reply_pend = mb ;
	else {
	DB_ESS("Frame is lost - another frame was pending\n",0,0);
	smt_free_mbuf(smc,mb) ;
	}
	}
	else {
	/*
	* Send the SBA RAF Change Reply to the network
	*/
	DB_ESS("ESS:Send to the network\n",0,0) ;
	smt_send_frame(smc,mb,FC_SMT_INFO,0) ;
	}
	}

	void ess_para_change(struct s_smc *smc)
	{
	(void)process_bw_alloc(smc,(long)smc->mib.a[PATH0].fddiPATHSbaPayload,
	(long)smc->mib.a[PATH0].fddiPATHSbaOverhead) ;
	}

	static void ess_config_fifo(struct s_smc *smc)
	{
	/*
	* if nothing to do exit
	*/
	if (smc->mib.a[PATH0].fddiPATHSbaPayload) {
	if (smc->hw.fp.fifo.fifo_config_mode & SYNC_TRAFFIC_ON &&
	(smc->hw.fp.fifo.fifo_config_mode&SEND_ASYNC_AS_SYNC) ==
	smc->mib.fddiESSSynchTxMode) {
	return ;
	}
	}
	else {
	if (!(smc->hw.fp.fifo.fifo_config_mode & SYNC_TRAFFIC_ON)) {
	return ;
	}
	}

	/*
	* split up the FIFO and reinitialize the queues
	*/
	formac_reinit_tx(smc) ;
	}

	#endif /* ESS */

	#endif /* no SLIM_SMT */