xref: /linux/drivers/net/fddi/skfp/pmf.c (revision 48dea9a700c8728cc31a1dd44588b97578de86ee)
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /******************************************************************************
3  *
4  *	(C)Copyright 1998,1999 SysKonnect,
5  *	a business unit of Schneider & Koch & Co. Datensysteme GmbH.
6  *
7  *	See the file "skfddi.c" for further information.
8  *
9  *	The information in this file is provided "AS IS" without warranty.
10  *
11  ******************************************************************************/
12 
13 /*
14 	Parameter Management Frame processing for SMT 7.2
15 */
16 
17 #include "h/types.h"
18 #include "h/fddi.h"
19 #include "h/smc.h"
20 #include "h/smt_p.h"
21 
22 #define KERNEL
23 #include "h/smtstate.h"
24 
25 #ifndef	SLIM_SMT
26 
27 #ifndef	lint
28 static const char ID_sccs[] = "@(#)pmf.c	1.37 97/08/04 (C) SK " ;
29 #endif
30 
31 static int smt_authorize(struct s_smc *smc, struct smt_header *sm);
32 static int smt_check_set_count(struct s_smc *smc, struct smt_header *sm);
33 static const struct s_p_tab* smt_get_ptab(u_short para);
34 static int smt_mib_phys(struct s_smc *smc);
35 static int smt_set_para(struct s_smc *smc, struct smt_para *pa, int index,
36 			int local, int set);
37 void smt_add_para(struct s_smc *smc, struct s_pcon *pcon, u_short para,
38 		  int index, int local);
39 static SMbuf *smt_build_pmf_response(struct s_smc *smc, struct smt_header *req,
40 				     int set, int local);
41 static int port_to_mib(struct s_smc *smc, int p);
42 
43 #define MOFFSS(e)	offsetof(struct fddi_mib, e)
44 #define MOFFMS(e)	offsetof(struct fddi_mib_m, e)
45 #define MOFFAS(e)	offsetof(struct fddi_mib_a, e)
46 #define MOFFPS(e)	offsetof(struct fddi_mib_p, e)
47 
48 
49 #define AC_G	0x01		/* Get */
50 #define AC_GR	0x02		/* Get/Set */
51 #define AC_S	0x04		/* Set */
52 #define AC_NA	0x08
53 #define AC_GROUP	0x10		/* Group */
54 #define MS2BCLK(x)	((x)*12500L)
55 /*
56 	F	LFag (byte)
57 	B	byte
58 	S	u_short	16 bit
59 	C	Counter 32 bit
60 	L	Long 32 bit
61 	T	Timer_2	32 bit
62 	P	TimeStamp ;
63 	A	LongAddress (6 byte)
64 	E	Enum 16 bit
65 	R	ResId 16 Bit
66 */
67 static const struct s_p_tab {
68 	u_short	p_num ;		/* parameter code */
69 	u_char	p_access ;	/* access rights */
70 	u_short	p_offset ;	/* offset in mib */
71 	char	p_swap[3] ;	/* format string */
72 } p_tab[] = {
73 	/* StationIdGrp */
74 	{ SMT_P100A,AC_GROUP	} ,
75 	{ SMT_P100B,AC_G,	MOFFSS(fddiSMTStationId),	"8"	} ,
76 	{ SMT_P100D,AC_G,	MOFFSS(fddiSMTOpVersionId),	"S"	} ,
77 	{ SMT_P100E,AC_G,	MOFFSS(fddiSMTHiVersionId),	"S"	} ,
78 	{ SMT_P100F,AC_G,	MOFFSS(fddiSMTLoVersionId),	"S"	} ,
79 	{ SMT_P1010,AC_G,	MOFFSS(fddiSMTManufacturerData), "D" } ,
80 	{ SMT_P1011,AC_GR,	MOFFSS(fddiSMTUserData),	"D"	} ,
81 	{ SMT_P1012,AC_G,	MOFFSS(fddiSMTMIBVersionId),	"S"	} ,
82 
83 	/* StationConfigGrp */
84 	{ SMT_P1014,AC_GROUP	} ,
85 	{ SMT_P1015,AC_G,	MOFFSS(fddiSMTMac_Ct),		"B"	} ,
86 	{ SMT_P1016,AC_G,	MOFFSS(fddiSMTNonMaster_Ct),	"B"	} ,
87 	{ SMT_P1017,AC_G,	MOFFSS(fddiSMTMaster_Ct),	"B"	} ,
88 	{ SMT_P1018,AC_G,	MOFFSS(fddiSMTAvailablePaths),	"B"	} ,
89 	{ SMT_P1019,AC_G,	MOFFSS(fddiSMTConfigCapabilities),"S"	} ,
90 	{ SMT_P101A,AC_GR,	MOFFSS(fddiSMTConfigPolicy),	"wS"	} ,
91 	{ SMT_P101B,AC_GR,	MOFFSS(fddiSMTConnectionPolicy),"wS"	} ,
92 	{ SMT_P101D,AC_GR,	MOFFSS(fddiSMTTT_Notify),	"wS"	} ,
93 	{ SMT_P101E,AC_GR,	MOFFSS(fddiSMTStatRptPolicy),	"bB"	} ,
94 	{ SMT_P101F,AC_GR,	MOFFSS(fddiSMTTrace_MaxExpiration),"lL"	} ,
95 	{ SMT_P1020,AC_G,	MOFFSS(fddiSMTPORTIndexes),	"II"	} ,
96 	{ SMT_P1021,AC_G,	MOFFSS(fddiSMTMACIndexes),	"I"	} ,
97 	{ SMT_P1022,AC_G,	MOFFSS(fddiSMTBypassPresent),	"F"	} ,
98 
99 	/* StatusGrp */
100 	{ SMT_P1028,AC_GROUP	} ,
101 	{ SMT_P1029,AC_G,	MOFFSS(fddiSMTECMState),	"E"	} ,
102 	{ SMT_P102A,AC_G,	MOFFSS(fddiSMTCF_State),	"E"	} ,
103 	{ SMT_P102C,AC_G,	MOFFSS(fddiSMTRemoteDisconnectFlag),"F"	} ,
104 	{ SMT_P102D,AC_G,	MOFFSS(fddiSMTStationStatus),	"E"	} ,
105 	{ SMT_P102E,AC_G,	MOFFSS(fddiSMTPeerWrapFlag),	"F"	} ,
106 
107 	/* MIBOperationGrp */
108 	{ SMT_P1032,AC_GROUP	} ,
109 	{ SMT_P1033,AC_G,	MOFFSS(fddiSMTTimeStamp),"P"		} ,
110 	{ SMT_P1034,AC_G,	MOFFSS(fddiSMTTransitionTimeStamp),"P"	} ,
111 	/* NOTE : SMT_P1035 is already swapped ! SMT_P_SETCOUNT */
112 	{ SMT_P1035,AC_G,	MOFFSS(fddiSMTSetCount),"4P"		} ,
113 	{ SMT_P1036,AC_G,	MOFFSS(fddiSMTLastSetStationId),"8"	} ,
114 
115 	{ SMT_P103C,AC_S,	0,				"wS"	} ,
116 
117 	/*
118 	 * PRIVATE EXTENSIONS
119 	 * only accessible locally to get/set passwd
120 	 */
121 	{ SMT_P10F0,AC_GR,	MOFFSS(fddiPRPMFPasswd),	"8"	} ,
122 	{ SMT_P10F1,AC_GR,	MOFFSS(fddiPRPMFStation),	"8"	} ,
123 #ifdef	ESS
124 	{ SMT_P10F2,AC_GR,	MOFFSS(fddiESSPayload),		"lL"	} ,
125 	{ SMT_P10F3,AC_GR,	MOFFSS(fddiESSOverhead),	"lL"	} ,
126 	{ SMT_P10F4,AC_GR,	MOFFSS(fddiESSMaxTNeg),		"lL"	} ,
127 	{ SMT_P10F5,AC_GR,	MOFFSS(fddiESSMinSegmentSize),	"lL"	} ,
128 	{ SMT_P10F6,AC_GR,	MOFFSS(fddiESSCategory),	"lL"	} ,
129 	{ SMT_P10F7,AC_GR,	MOFFSS(fddiESSSynchTxMode),	"wS"	} ,
130 #endif
131 #ifdef	SBA
132 	{ SMT_P10F8,AC_GR,	MOFFSS(fddiSBACommand),		"bF"	} ,
133 	{ SMT_P10F9,AC_GR,	MOFFSS(fddiSBAAvailable),	"bF"	} ,
134 #endif
135 	/* MAC Attributes */
136 	{ SMT_P200A,AC_GROUP	} ,
137 	{ SMT_P200B,AC_G,	MOFFMS(fddiMACFrameStatusFunctions),"S"	} ,
138 	{ SMT_P200D,AC_G,	MOFFMS(fddiMACT_MaxCapabilitiy),"T"	} ,
139 	{ SMT_P200E,AC_G,	MOFFMS(fddiMACTVXCapabilitiy),"T"	} ,
140 
141 	/* ConfigGrp */
142 	{ SMT_P2014,AC_GROUP	} ,
143 	{ SMT_P2016,AC_G,	MOFFMS(fddiMACAvailablePaths),	"B"	} ,
144 	{ SMT_P2017,AC_G,	MOFFMS(fddiMACCurrentPath),	"S"	} ,
145 	{ SMT_P2018,AC_G,	MOFFMS(fddiMACUpstreamNbr),	"A"	} ,
146 	{ SMT_P2019,AC_G,	MOFFMS(fddiMACDownstreamNbr),	"A"	} ,
147 	{ SMT_P201A,AC_G,	MOFFMS(fddiMACOldUpstreamNbr),	"A"	} ,
148 	{ SMT_P201B,AC_G,	MOFFMS(fddiMACOldDownstreamNbr),"A"	} ,
149 	{ SMT_P201D,AC_G,	MOFFMS(fddiMACDupAddressTest),	"E"	} ,
150 	{ SMT_P2020,AC_GR,	MOFFMS(fddiMACRequestedPaths),	"wS"	} ,
151 	{ SMT_P2021,AC_G,	MOFFMS(fddiMACDownstreamPORTType),"E"	} ,
152 	{ SMT_P2022,AC_G,	MOFFMS(fddiMACIndex),		"S"	} ,
153 
154 	/* AddressGrp */
155 	{ SMT_P2028,AC_GROUP	} ,
156 	{ SMT_P2029,AC_G,	MOFFMS(fddiMACSMTAddress),	"A"	} ,
157 
158 	/* OperationGrp */
159 	{ SMT_P2032,AC_GROUP	} ,
160 	{ SMT_P2033,AC_G,	MOFFMS(fddiMACT_Req),		"T"	} ,
161 	{ SMT_P2034,AC_G,	MOFFMS(fddiMACT_Neg),		"T"	} ,
162 	{ SMT_P2035,AC_G,	MOFFMS(fddiMACT_Max),		"T"	} ,
163 	{ SMT_P2036,AC_G,	MOFFMS(fddiMACTvxValue),	"T"	} ,
164 	{ SMT_P2038,AC_G,	MOFFMS(fddiMACT_Pri0),		"T"	} ,
165 	{ SMT_P2039,AC_G,	MOFFMS(fddiMACT_Pri1),		"T"	} ,
166 	{ SMT_P203A,AC_G,	MOFFMS(fddiMACT_Pri2),		"T"	} ,
167 	{ SMT_P203B,AC_G,	MOFFMS(fddiMACT_Pri3),		"T"	} ,
168 	{ SMT_P203C,AC_G,	MOFFMS(fddiMACT_Pri4),		"T"	} ,
169 	{ SMT_P203D,AC_G,	MOFFMS(fddiMACT_Pri5),		"T"	} ,
170 	{ SMT_P203E,AC_G,	MOFFMS(fddiMACT_Pri6),		"T"	} ,
171 
172 
173 	/* CountersGrp */
174 	{ SMT_P2046,AC_GROUP	} ,
175 	{ SMT_P2047,AC_G,	MOFFMS(fddiMACFrame_Ct),	"C"	} ,
176 	{ SMT_P2048,AC_G,	MOFFMS(fddiMACCopied_Ct),	"C"	} ,
177 	{ SMT_P2049,AC_G,	MOFFMS(fddiMACTransmit_Ct),	"C"	} ,
178 	{ SMT_P204A,AC_G,	MOFFMS(fddiMACToken_Ct),	"C"	} ,
179 	{ SMT_P2051,AC_G,	MOFFMS(fddiMACError_Ct),	"C"	} ,
180 	{ SMT_P2052,AC_G,	MOFFMS(fddiMACLost_Ct),		"C"	} ,
181 	{ SMT_P2053,AC_G,	MOFFMS(fddiMACTvxExpired_Ct),	"C"	} ,
182 	{ SMT_P2054,AC_G,	MOFFMS(fddiMACNotCopied_Ct),	"C"	} ,
183 	{ SMT_P2056,AC_G,	MOFFMS(fddiMACRingOp_Ct),	"C"	} ,
184 
185 	/* FrameErrorConditionGrp */
186 	{ SMT_P205A,AC_GROUP	} ,
187 	{ SMT_P205F,AC_GR,	MOFFMS(fddiMACFrameErrorThreshold),"wS"	} ,
188 	{ SMT_P2060,AC_G,	MOFFMS(fddiMACFrameErrorRatio),	"S"	} ,
189 
190 	/* NotCopiedConditionGrp */
191 	{ SMT_P2064,AC_GROUP	} ,
192 	{ SMT_P2067,AC_GR,	MOFFMS(fddiMACNotCopiedThreshold),"wS"	} ,
193 	{ SMT_P2069,AC_G,	MOFFMS(fddiMACNotCopiedRatio),	"S"	} ,
194 
195 	/* StatusGrp */
196 	{ SMT_P206E,AC_GROUP	} ,
197 	{ SMT_P206F,AC_G,	MOFFMS(fddiMACRMTState),	"S"	} ,
198 	{ SMT_P2070,AC_G,	MOFFMS(fddiMACDA_Flag),	"F"	} ,
199 	{ SMT_P2071,AC_G,	MOFFMS(fddiMACUNDA_Flag),	"F"	} ,
200 	{ SMT_P2072,AC_G,	MOFFMS(fddiMACFrameErrorFlag),	"F"	} ,
201 	{ SMT_P2073,AC_G,	MOFFMS(fddiMACNotCopiedFlag),	"F"	} ,
202 	{ SMT_P2074,AC_G,	MOFFMS(fddiMACMA_UnitdataAvailable),"F"	} ,
203 	{ SMT_P2075,AC_G,	MOFFMS(fddiMACHardwarePresent),	"F"	} ,
204 	{ SMT_P2076,AC_GR,	MOFFMS(fddiMACMA_UnitdataEnable),"bF"	} ,
205 
206 	/*
207 	 * PRIVATE EXTENSIONS
208 	 * only accessible locally to get/set TMIN
209 	 */
210 	{ SMT_P20F0,AC_NA						} ,
211 	{ SMT_P20F1,AC_GR,	MOFFMS(fddiMACT_Min),		"lT"	} ,
212 
213 	/* Path Attributes */
214 	/*
215 	 * DON't swap 320B,320F,3210: they are already swapped in swap_para()
216 	 */
217 	{ SMT_P320A,AC_GROUP	} ,
218 	{ SMT_P320B,AC_G,	MOFFAS(fddiPATHIndex),		"r"	} ,
219 	{ SMT_P320F,AC_GR,	MOFFAS(fddiPATHSbaPayload),	"l4"	} ,
220 	{ SMT_P3210,AC_GR,	MOFFAS(fddiPATHSbaOverhead),	"l4"	} ,
221 	/* fddiPATHConfiguration */
222 	{ SMT_P3212,AC_G,	0,				""	} ,
223 	{ SMT_P3213,AC_GR,	MOFFAS(fddiPATHT_Rmode),	"lT"	} ,
224 	{ SMT_P3214,AC_GR,	MOFFAS(fddiPATHSbaAvailable),	"lL"	} ,
225 	{ SMT_P3215,AC_GR,	MOFFAS(fddiPATHTVXLowerBound),	"lT"	} ,
226 	{ SMT_P3216,AC_GR,	MOFFAS(fddiPATHT_MaxLowerBound),"lT"	} ,
227 	{ SMT_P3217,AC_GR,	MOFFAS(fddiPATHMaxT_Req),	"lT"	} ,
228 
229 	/* Port Attributes */
230 	/* ConfigGrp */
231 	{ SMT_P400A,AC_GROUP	} ,
232 	{ SMT_P400C,AC_G,	MOFFPS(fddiPORTMy_Type),	"E"	} ,
233 	{ SMT_P400D,AC_G,	MOFFPS(fddiPORTNeighborType),	"E"	} ,
234 	{ SMT_P400E,AC_GR,	MOFFPS(fddiPORTConnectionPolicies),"bB"	} ,
235 	{ SMT_P400F,AC_G,	MOFFPS(fddiPORTMacIndicated),	"2"	} ,
236 	{ SMT_P4010,AC_G,	MOFFPS(fddiPORTCurrentPath),	"E"	} ,
237 	{ SMT_P4011,AC_GR,	MOFFPS(fddiPORTRequestedPaths),	"l4"	} ,
238 	{ SMT_P4012,AC_G,	MOFFPS(fddiPORTMACPlacement),	"S"	} ,
239 	{ SMT_P4013,AC_G,	MOFFPS(fddiPORTAvailablePaths),	"B"	} ,
240 	{ SMT_P4016,AC_G,	MOFFPS(fddiPORTPMDClass),	"E"	} ,
241 	{ SMT_P4017,AC_G,	MOFFPS(fddiPORTConnectionCapabilities),	"B"} ,
242 	{ SMT_P401D,AC_G,	MOFFPS(fddiPORTIndex),		"R"	} ,
243 
244 	/* OperationGrp */
245 	{ SMT_P401E,AC_GROUP	} ,
246 	{ SMT_P401F,AC_GR,	MOFFPS(fddiPORTMaint_LS),	"wE"	} ,
247 	{ SMT_P4021,AC_G,	MOFFPS(fddiPORTBS_Flag),	"F"	} ,
248 	{ SMT_P4022,AC_G,	MOFFPS(fddiPORTPC_LS),		"E"	} ,
249 
250 	/* ErrorCtrsGrp */
251 	{ SMT_P4028,AC_GROUP	} ,
252 	{ SMT_P4029,AC_G,	MOFFPS(fddiPORTEBError_Ct),	"C"	} ,
253 	{ SMT_P402A,AC_G,	MOFFPS(fddiPORTLCTFail_Ct),	"C"	} ,
254 
255 	/* LerGrp */
256 	{ SMT_P4032,AC_GROUP	} ,
257 	{ SMT_P4033,AC_G,	MOFFPS(fddiPORTLer_Estimate),	"F"	} ,
258 	{ SMT_P4034,AC_G,	MOFFPS(fddiPORTLem_Reject_Ct),	"C"	} ,
259 	{ SMT_P4035,AC_G,	MOFFPS(fddiPORTLem_Ct),		"C"	} ,
260 	{ SMT_P403A,AC_GR,	MOFFPS(fddiPORTLer_Cutoff),	"bB"	} ,
261 	{ SMT_P403B,AC_GR,	MOFFPS(fddiPORTLer_Alarm),	"bB"	} ,
262 
263 	/* StatusGrp */
264 	{ SMT_P403C,AC_GROUP	} ,
265 	{ SMT_P403D,AC_G,	MOFFPS(fddiPORTConnectState),	"E"	} ,
266 	{ SMT_P403E,AC_G,	MOFFPS(fddiPORTPCMStateX),	"E"	} ,
267 	{ SMT_P403F,AC_G,	MOFFPS(fddiPORTPC_Withhold),	"E"	} ,
268 	{ SMT_P4040,AC_G,	MOFFPS(fddiPORTLerFlag),	"F"	} ,
269 	{ SMT_P4041,AC_G,	MOFFPS(fddiPORTHardwarePresent),"F"	} ,
270 
271 	{ SMT_P4046,AC_S,	0,				"wS"	} ,
272 
273 	{ 0,	AC_GROUP	} ,
274 	{ 0 }
275 } ;
276 
277 void smt_pmf_received_pack(struct s_smc *smc, SMbuf *mb, int local)
278 {
279 	struct smt_header	*sm ;
280 	SMbuf		*reply ;
281 
282 	sm = smtod(mb,struct smt_header *) ;
283 	DB_SMT("SMT: processing PMF frame at %p len %d", sm, mb->sm_len);
284 #ifdef	DEBUG
285 	dump_smt(smc,sm,"PMF Received") ;
286 #endif
287 	/*
288 	 * Start the watchdog: It may be a long, long packet and
289 	 * maybe the watchdog occurs ...
290 	 */
291 	smt_start_watchdog(smc) ;
292 
293 	if (sm->smt_class == SMT_PMF_GET ||
294 	    sm->smt_class == SMT_PMF_SET) {
295 		reply = smt_build_pmf_response(smc,sm,
296 			sm->smt_class == SMT_PMF_SET,local) ;
297 		if (reply) {
298 			sm = smtod(reply,struct smt_header *) ;
299 #ifdef	DEBUG
300 			dump_smt(smc,sm,"PMF Reply") ;
301 #endif
302 			smt_send_frame(smc,reply,FC_SMT_INFO,local) ;
303 		}
304 	}
305 }
306 
307 static SMbuf *smt_build_pmf_response(struct s_smc *smc, struct smt_header *req,
308 				     int set, int local)
309 {
310 	SMbuf			*mb ;
311 	struct smt_header	*smt ;
312 	struct smt_para		*pa ;
313 	struct smt_p_reason	*res ;
314 	const struct s_p_tab	*pt ;
315 	int			len ;
316 	int			index ;
317 	int			idx_end ;
318 	int			error ;
319 	int			range ;
320 	SK_LOC_DECL(struct s_pcon,pcon) ;
321 	SK_LOC_DECL(struct s_pcon,set_pcon) ;
322 
323 	/*
324 	 * build SMT header
325 	 */
326 	if (!(mb = smt_get_mbuf(smc)))
327 		return mb;
328 
329 	smt = smtod(mb, struct smt_header *) ;
330 	smt->smt_dest = req->smt_source ;	/* DA == source of request */
331 	smt->smt_class = req->smt_class ;	/* same class (GET/SET) */
332 	smt->smt_type = SMT_REPLY ;
333 	smt->smt_version = SMT_VID_2 ;
334 	smt->smt_tid = req->smt_tid ;		/* same TID */
335 	smt->smt_pad = 0 ;
336 	smt->smt_len = 0 ;
337 
338 	/*
339 	 * setup parameter status
340 	 */
341 	pcon.pc_len = SMT_MAX_INFO_LEN ;	/* max para length */
342 	pcon.pc_err = 0 ;			/* no error */
343 	pcon.pc_badset = 0 ;			/* no bad set count */
344 	pcon.pc_p = (void *) (smt + 1) ;	/* paras start here */
345 
346 	/*
347 	 * check authoriziation and set count
348 	 */
349 	error = 0 ;
350 	if (set) {
351 		if (!local && smt_authorize(smc,req))
352 			error = SMT_RDF_AUTHOR ;
353 		else if (smt_check_set_count(smc,req))
354 			pcon.pc_badset = SMT_RDF_BADSET ;
355 	}
356 	/*
357 	 * add reason code and all mandatory parameters
358 	 */
359 	res = (struct smt_p_reason *) pcon.pc_p ;
360 	smt_add_para(smc,&pcon,(u_short) SMT_P_REASON,0,0) ;
361 	smt_add_para(smc,&pcon,(u_short) SMT_P1033,0,0) ;
362 	/* update 1035 and 1036 later if set */
363 	set_pcon = pcon ;
364 	smt_add_para(smc,&pcon,(u_short) SMT_P1035,0,0) ;
365 	smt_add_para(smc,&pcon,(u_short) SMT_P1036,0,0) ;
366 
367 	pcon.pc_err = error ;
368 	len = req->smt_len ;
369 	pa = (struct smt_para *) (req + 1) ;
370 	/*
371 	 * process list of paras
372 	 */
373 	while (!pcon.pc_err && len > 0 ) {
374 		if (((u_short)len < pa->p_len + PARA_LEN) || (pa->p_len & 3)) {
375 			pcon.pc_err = SMT_RDF_LENGTH ;
376 			break ;
377 		}
378 
379 		if (((range = (pa->p_type & 0xf000)) == 0x2000) ||
380 			range == 0x3000 || range == 0x4000) {
381 			/*
382 			 * get index for PART,MAC ad PATH group
383 			 */
384 			index = *((u_char *)pa + PARA_LEN + 3) ;/* index */
385 			idx_end = index ;
386 			if (!set && (pa->p_len != 4)) {
387 				pcon.pc_err = SMT_RDF_LENGTH ;
388 				break ;
389 			}
390 			if (!index && !set) {
391 				switch (range) {
392 				case 0x2000 :
393 					index = INDEX_MAC ;
394 					idx_end = index - 1 + NUMMACS ;
395 					break ;
396 				case 0x3000 :
397 					index = INDEX_PATH ;
398 					idx_end = index - 1 + NUMPATHS ;
399 					break ;
400 				case 0x4000 :
401 					index = INDEX_PORT ;
402 					idx_end = index - 1 + NUMPHYS ;
403 #ifndef	CONCENTRATOR
404 					if (smc->s.sas == SMT_SAS)
405 						idx_end = INDEX_PORT ;
406 #endif
407 					break ;
408 				}
409 			}
410 		}
411 		else {
412 			/*
413 			 * smt group has no index
414 			 */
415 			if (!set && (pa->p_len != 0)) {
416 				pcon.pc_err = SMT_RDF_LENGTH ;
417 				break ;
418 			}
419 			index = 0 ;
420 			idx_end = 0 ;
421 		}
422 		while (index <= idx_end) {
423 			/*
424 			 * if group
425 			 *	add all paras of group
426 			 */
427 			pt = smt_get_ptab(pa->p_type) ;
428 			if (pt && pt->p_access == AC_GROUP && !set) {
429 				pt++ ;
430 				while (pt->p_access == AC_G ||
431 					pt->p_access == AC_GR) {
432 					smt_add_para(smc,&pcon,pt->p_num,
433 						index,local);
434 					pt++ ;
435 				}
436 			}
437 			/*
438 			 * ignore
439 			 *	AUTHORIZATION in get/set
440 			 *	SET COUNT in set
441 			 */
442 			else if (pa->p_type != SMT_P_AUTHOR &&
443 				 (!set || (pa->p_type != SMT_P1035))) {
444 				int	st ;
445 				if (pcon.pc_badset) {
446 					smt_add_para(smc,&pcon,pa->p_type,
447 						index,local) ;
448 				}
449 				else if (set) {
450 					st = smt_set_para(smc,pa,index,local,1);
451 					/*
452 					 * return para even if error
453 					 */
454 					smt_add_para(smc,&pcon,pa->p_type,
455 						index,local) ;
456 					pcon.pc_err = st ;
457 				}
458 				else {
459 					if (pt && pt->p_access == AC_S) {
460 						pcon.pc_err =
461 							SMT_RDF_ILLEGAL ;
462 					}
463 					smt_add_para(smc,&pcon,pa->p_type,
464 						index,local) ;
465 				}
466 			}
467 			if (pcon.pc_err)
468 				break ;
469 			index++ ;
470 		}
471 		len -= pa->p_len + PARA_LEN ;
472 		pa = (struct smt_para *) ((char *)pa + pa->p_len + PARA_LEN) ;
473 	}
474 	smt->smt_len = SMT_MAX_INFO_LEN - pcon.pc_len ;
475 	mb->sm_len = smt->smt_len + sizeof(struct smt_header) ;
476 
477 	/* update reason code */
478 	res->rdf_reason = pcon.pc_badset ? pcon.pc_badset :
479 			pcon.pc_err ? pcon.pc_err : SMT_RDF_SUCCESS ;
480 	if (set && (res->rdf_reason == SMT_RDF_SUCCESS)) {
481 		/*
482 		 * increment set count
483 		 * set time stamp
484 		 * store station id of last set
485 		 */
486 		smc->mib.fddiSMTSetCount.count++ ;
487 		smt_set_timestamp(smc,smc->mib.fddiSMTSetCount.timestamp) ;
488 		smc->mib.fddiSMTLastSetStationId = req->smt_sid ;
489 		smt_add_para(smc,&set_pcon,(u_short) SMT_P1035,0,0) ;
490 		smt_add_para(smc,&set_pcon,(u_short) SMT_P1036,0,0) ;
491 	}
492 	return mb;
493 }
494 
495 static int smt_authorize(struct s_smc *smc, struct smt_header *sm)
496 {
497 	struct smt_para	*pa ;
498 	int		i ;
499 	char		*p ;
500 
501 	/*
502 	 * check source station id if not zero
503 	 */
504 	p = (char *) &smc->mib.fddiPRPMFStation ;
505 	for (i = 0 ; i < 8 && !p[i] ; i++)
506 		;
507 	if (i != 8) {
508 		if (memcmp((char *) &sm->smt_sid,
509 			(char *) &smc->mib.fddiPRPMFStation,8))
510 			return 1;
511 	}
512 	/*
513 	 * check authoriziation parameter if passwd not zero
514 	 */
515 	p = (char *) smc->mib.fddiPRPMFPasswd ;
516 	for (i = 0 ; i < 8 && !p[i] ; i++)
517 		;
518 	if (i != 8) {
519 		pa = (struct smt_para *) sm_to_para(smc,sm,SMT_P_AUTHOR) ;
520 		if (!pa)
521 			return 1;
522 		if (pa->p_len != 8)
523 			return 1;
524 		if (memcmp((char *)(pa+1),(char *)smc->mib.fddiPRPMFPasswd,8))
525 			return 1;
526 	}
527 	return 0;
528 }
529 
530 static int smt_check_set_count(struct s_smc *smc, struct smt_header *sm)
531 {
532 	struct smt_para	*pa ;
533 	struct smt_p_setcount	*sc ;
534 
535 	pa = (struct smt_para *) sm_to_para(smc,sm,SMT_P1035) ;
536 	if (pa) {
537 		sc = (struct smt_p_setcount *) pa ;
538 		if ((smc->mib.fddiSMTSetCount.count != sc->count) ||
539 			memcmp((char *) smc->mib.fddiSMTSetCount.timestamp,
540 			(char *)sc->timestamp,8))
541 			return 1;
542 	}
543 	return 0;
544 }
545 
546 void smt_add_para(struct s_smc *smc, struct s_pcon *pcon, u_short para,
547 		  int index, int local)
548 {
549 	struct smt_para	*pa ;
550 	const struct s_p_tab	*pt ;
551 	struct fddi_mib_m *mib_m = NULL;
552 	struct fddi_mib_p *mib_p = NULL;
553 	int		len ;
554 	int		plen ;
555 	char		*from ;
556 	char		*to ;
557 	const char	*swap ;
558 	char		c ;
559 	int		range ;
560 	char		*mib_addr ;
561 	int		mac ;
562 	int		path ;
563 	int		port ;
564 	int		sp_len ;
565 
566 	/*
567 	 * skip if error
568 	 */
569 	if (pcon->pc_err)
570 		return ;
571 
572 	/*
573 	 * actions don't have a value
574 	 */
575 	pt = smt_get_ptab(para) ;
576 	if (pt && pt->p_access == AC_S)
577 		return ;
578 
579 	to = (char *) (pcon->pc_p) ;	/* destination pointer */
580 	len = pcon->pc_len ;		/* free space */
581 	plen = len ;			/* remember start length */
582 	pa = (struct smt_para *) to ;	/* type/length pointer */
583 	to += PARA_LEN ;		/* skip smt_para */
584 	len -= PARA_LEN ;
585 	/*
586 	 * set index if required
587 	 */
588 	if (((range = (para & 0xf000)) == 0x2000) ||
589 		range == 0x3000 || range == 0x4000) {
590 		if (len < 4)
591 			goto wrong_error ;
592 		to[0] = 0 ;
593 		to[1] = 0 ;
594 		to[2] = 0 ;
595 		to[3] = index ;
596 		len -= 4 ;
597 		to += 4 ;
598 	}
599 	mac = index - INDEX_MAC ;
600 	path = index - INDEX_PATH ;
601 	port = index - INDEX_PORT ;
602 	/*
603 	 * get pointer to mib
604 	 */
605 	switch (range) {
606 	case 0x1000 :
607 	default :
608 		mib_addr = (char *) (&smc->mib) ;
609 		break ;
610 	case 0x2000 :
611 		if (mac < 0 || mac >= NUMMACS) {
612 			pcon->pc_err = SMT_RDF_NOPARAM ;
613 			return ;
614 		}
615 		mib_addr = (char *) (&smc->mib.m[mac]) ;
616 		mib_m = (struct fddi_mib_m *) mib_addr ;
617 		break ;
618 	case 0x3000 :
619 		if (path < 0 || path >= NUMPATHS) {
620 			pcon->pc_err = SMT_RDF_NOPARAM ;
621 			return ;
622 		}
623 		mib_addr = (char *) (&smc->mib.a[path]) ;
624 		break ;
625 	case 0x4000 :
626 		if (port < 0 || port >= smt_mib_phys(smc)) {
627 			pcon->pc_err = SMT_RDF_NOPARAM ;
628 			return ;
629 		}
630 		mib_addr = (char *) (&smc->mib.p[port_to_mib(smc,port)]) ;
631 		mib_p = (struct fddi_mib_p *) mib_addr ;
632 		break ;
633 	}
634 	/*
635 	 * check special paras
636 	 */
637 	swap = NULL;
638 	switch (para) {
639 	case SMT_P10F0 :
640 	case SMT_P10F1 :
641 #ifdef	ESS
642 	case SMT_P10F2 :
643 	case SMT_P10F3 :
644 	case SMT_P10F4 :
645 	case SMT_P10F5 :
646 	case SMT_P10F6 :
647 	case SMT_P10F7 :
648 #endif
649 #ifdef	SBA
650 	case SMT_P10F8 :
651 	case SMT_P10F9 :
652 #endif
653 	case SMT_P20F1 :
654 		if (!local) {
655 			pcon->pc_err = SMT_RDF_NOPARAM ;
656 			return ;
657 		}
658 		break ;
659 	case SMT_P2034 :
660 	case SMT_P2046 :
661 	case SMT_P2047 :
662 	case SMT_P204A :
663 	case SMT_P2051 :
664 	case SMT_P2052 :
665 		mac_update_counter(smc) ;
666 		break ;
667 	case SMT_P4022:
668 		mib_p->fddiPORTPC_LS = LS2MIB(
669 			sm_pm_get_ls(smc,port_to_mib(smc,port))) ;
670 		break ;
671 	case SMT_P_REASON :
672 		*(u32 *)to = 0 ;
673 		sp_len = 4 ;
674 		goto sp_done ;
675 	case SMT_P1033 :			/* time stamp */
676 		smt_set_timestamp(smc,smc->mib.fddiSMTTimeStamp) ;
677 		break ;
678 
679 	case SMT_P1020:				/* port indexes */
680 #if	NUMPHYS == 12
681 		swap = "IIIIIIIIIIII" ;
682 #else
683 #if	NUMPHYS == 2
684 		if (smc->s.sas == SMT_SAS)
685 			swap = "I" ;
686 		else
687 			swap = "II" ;
688 #else
689 #if	NUMPHYS == 24
690 		swap = "IIIIIIIIIIIIIIIIIIIIIIII" ;
691 #else
692 	????
693 #endif
694 #endif
695 #endif
696 		break ;
697 	case SMT_P3212 :
698 		{
699 			sp_len = cem_build_path(smc,to,path) ;
700 			goto sp_done ;
701 		}
702 	case SMT_P1048 :		/* peer wrap condition */
703 		{
704 			struct smt_p_1048	*sp ;
705 			sp = (struct smt_p_1048 *) to ;
706 			sp->p1048_flag = smc->mib.fddiSMTPeerWrapFlag ;
707 			sp->p1048_cf_state = smc->mib.fddiSMTCF_State ;
708 			sp_len = sizeof(struct smt_p_1048) ;
709 			goto sp_done ;
710 		}
711 	case SMT_P208C :
712 		{
713 			struct smt_p_208c	*sp ;
714 			sp = (struct smt_p_208c *) to ;
715 			sp->p208c_flag =
716 				smc->mib.m[MAC0].fddiMACDuplicateAddressCond ;
717 			sp->p208c_dupcondition =
718 				(mib_m->fddiMACDA_Flag ? SMT_ST_MY_DUPA : 0) |
719 				(mib_m->fddiMACUNDA_Flag ? SMT_ST_UNA_DUPA : 0);
720 			sp->p208c_fddilong =
721 				mib_m->fddiMACSMTAddress ;
722 			sp->p208c_fddiunalong =
723 				mib_m->fddiMACUpstreamNbr ;
724 			sp->p208c_pad = 0 ;
725 			sp_len = sizeof(struct smt_p_208c) ;
726 			goto sp_done ;
727 		}
728 	case SMT_P208D :		/* frame error condition */
729 		{
730 			struct smt_p_208d	*sp ;
731 			sp = (struct smt_p_208d *) to ;
732 			sp->p208d_flag =
733 				mib_m->fddiMACFrameErrorFlag ;
734 			sp->p208d_frame_ct =
735 				mib_m->fddiMACFrame_Ct ;
736 			sp->p208d_error_ct =
737 				mib_m->fddiMACError_Ct ;
738 			sp->p208d_lost_ct =
739 				mib_m->fddiMACLost_Ct ;
740 			sp->p208d_ratio =
741 				mib_m->fddiMACFrameErrorRatio ;
742 			sp_len = sizeof(struct smt_p_208d) ;
743 			goto sp_done ;
744 		}
745 	case SMT_P208E :		/* not copied condition */
746 		{
747 			struct smt_p_208e	*sp ;
748 			sp = (struct smt_p_208e *) to ;
749 			sp->p208e_flag =
750 				mib_m->fddiMACNotCopiedFlag ;
751 			sp->p208e_not_copied =
752 				mib_m->fddiMACNotCopied_Ct ;
753 			sp->p208e_copied =
754 				mib_m->fddiMACCopied_Ct ;
755 			sp->p208e_not_copied_ratio =
756 				mib_m->fddiMACNotCopiedRatio ;
757 			sp_len = sizeof(struct smt_p_208e) ;
758 			goto sp_done ;
759 		}
760 	case SMT_P208F :	/* neighbor change event */
761 		{
762 			struct smt_p_208f	*sp ;
763 			sp = (struct smt_p_208f *) to ;
764 			sp->p208f_multiple =
765 				mib_m->fddiMACMultiple_N ;
766 			sp->p208f_nacondition =
767 				mib_m->fddiMACDuplicateAddressCond ;
768 			sp->p208f_old_una =
769 				mib_m->fddiMACOldUpstreamNbr ;
770 			sp->p208f_new_una =
771 				mib_m->fddiMACUpstreamNbr ;
772 			sp->p208f_old_dna =
773 				mib_m->fddiMACOldDownstreamNbr ;
774 			sp->p208f_new_dna =
775 				mib_m->fddiMACDownstreamNbr ;
776 			sp->p208f_curren_path =
777 				mib_m->fddiMACCurrentPath ;
778 			sp->p208f_smt_address =
779 				mib_m->fddiMACSMTAddress ;
780 			sp_len = sizeof(struct smt_p_208f) ;
781 			goto sp_done ;
782 		}
783 	case SMT_P2090 :
784 		{
785 			struct smt_p_2090	*sp ;
786 			sp = (struct smt_p_2090 *) to ;
787 			sp->p2090_multiple =
788 				mib_m->fddiMACMultiple_P ;
789 			sp->p2090_availablepaths =
790 				mib_m->fddiMACAvailablePaths ;
791 			sp->p2090_currentpath =
792 				mib_m->fddiMACCurrentPath ;
793 			sp->p2090_requestedpaths =
794 				mib_m->fddiMACRequestedPaths ;
795 			sp_len = sizeof(struct smt_p_2090) ;
796 			goto sp_done ;
797 		}
798 	case SMT_P4050 :
799 		{
800 			struct smt_p_4050	*sp ;
801 			sp = (struct smt_p_4050 *) to ;
802 			sp->p4050_flag =
803 				mib_p->fddiPORTLerFlag ;
804 			sp->p4050_pad = 0 ;
805 			sp->p4050_cutoff =
806 				mib_p->fddiPORTLer_Cutoff ;
807 			sp->p4050_alarm =
808 				mib_p->fddiPORTLer_Alarm ;
809 			sp->p4050_estimate =
810 				mib_p->fddiPORTLer_Estimate ;
811 			sp->p4050_reject_ct =
812 				mib_p->fddiPORTLem_Reject_Ct ;
813 			sp->p4050_ct =
814 				mib_p->fddiPORTLem_Ct ;
815 			sp_len = sizeof(struct smt_p_4050) ;
816 			goto sp_done ;
817 		}
818 
819 	case SMT_P4051 :
820 		{
821 			struct smt_p_4051	*sp ;
822 			sp = (struct smt_p_4051 *) to ;
823 			sp->p4051_multiple =
824 				mib_p->fddiPORTMultiple_U ;
825 			sp->p4051_porttype =
826 				mib_p->fddiPORTMy_Type ;
827 			sp->p4051_connectstate =
828 				mib_p->fddiPORTConnectState ;
829 			sp->p4051_pc_neighbor =
830 				mib_p->fddiPORTNeighborType ;
831 			sp->p4051_pc_withhold =
832 				mib_p->fddiPORTPC_Withhold ;
833 			sp_len = sizeof(struct smt_p_4051) ;
834 			goto sp_done ;
835 		}
836 	case SMT_P4052 :
837 		{
838 			struct smt_p_4052	*sp ;
839 			sp = (struct smt_p_4052 *) to ;
840 			sp->p4052_flag =
841 				mib_p->fddiPORTEB_Condition ;
842 			sp->p4052_eberrorcount =
843 				mib_p->fddiPORTEBError_Ct ;
844 			sp_len = sizeof(struct smt_p_4052) ;
845 			goto sp_done ;
846 		}
847 	case SMT_P4053 :
848 		{
849 			struct smt_p_4053	*sp ;
850 			sp = (struct smt_p_4053 *) to ;
851 			sp->p4053_multiple =
852 				mib_p->fddiPORTMultiple_P ;
853 			sp->p4053_availablepaths =
854 				mib_p->fddiPORTAvailablePaths ;
855 			sp->p4053_currentpath =
856 				mib_p->fddiPORTCurrentPath ;
857 			memcpy(	(char *) &sp->p4053_requestedpaths,
858 				(char *) mib_p->fddiPORTRequestedPaths,4) ;
859 			sp->p4053_mytype =
860 				mib_p->fddiPORTMy_Type ;
861 			sp->p4053_neighbortype =
862 				mib_p->fddiPORTNeighborType ;
863 			sp_len = sizeof(struct smt_p_4053) ;
864 			goto sp_done ;
865 		}
866 	default :
867 		break ;
868 	}
869 	/*
870 	 * in table ?
871 	 */
872 	if (!pt) {
873 		pcon->pc_err = (para & 0xff00) ? SMT_RDF_NOPARAM :
874 						SMT_RDF_ILLEGAL ;
875 		return ;
876 	}
877 	/*
878 	 * check access rights
879 	 */
880 	switch (pt->p_access) {
881 	case AC_G :
882 	case AC_GR :
883 		break ;
884 	default :
885 		pcon->pc_err = SMT_RDF_ILLEGAL ;
886 		return ;
887 	}
888 	from = mib_addr + pt->p_offset ;
889 	if (!swap)
890 		swap = pt->p_swap ;		/* pointer to swap string */
891 
892 	/*
893 	 * copy values
894 	 */
895 	while ((c = *swap++)) {
896 		switch(c) {
897 		case 'b' :
898 		case 'w' :
899 		case 'l' :
900 			break ;
901 		case 'S' :
902 		case 'E' :
903 		case 'R' :
904 		case 'r' :
905 			if (len < 4)
906 				goto len_error ;
907 			to[0] = 0 ;
908 			to[1] = 0 ;
909 #ifdef	LITTLE_ENDIAN
910 			if (c == 'r') {
911 				to[2] = *from++ ;
912 				to[3] = *from++ ;
913 			}
914 			else {
915 				to[3] = *from++ ;
916 				to[2] = *from++ ;
917 			}
918 #else
919 			to[2] = *from++ ;
920 			to[3] = *from++ ;
921 #endif
922 			to += 4 ;
923 			len -= 4 ;
924 			break ;
925 		case 'I' :		/* for SET of port indexes */
926 			if (len < 2)
927 				goto len_error ;
928 #ifdef	LITTLE_ENDIAN
929 			to[1] = *from++ ;
930 			to[0] = *from++ ;
931 #else
932 			to[0] = *from++ ;
933 			to[1] = *from++ ;
934 #endif
935 			to += 2 ;
936 			len -= 2 ;
937 			break ;
938 		case 'F' :
939 		case 'B' :
940 			if (len < 4)
941 				goto len_error ;
942 			len -= 4 ;
943 			to[0] = 0 ;
944 			to[1] = 0 ;
945 			to[2] = 0 ;
946 			to[3] = *from++ ;
947 			to += 4 ;
948 			break ;
949 		case 'C' :
950 		case 'T' :
951 		case 'L' :
952 			if (len < 4)
953 				goto len_error ;
954 #ifdef	LITTLE_ENDIAN
955 			to[3] = *from++ ;
956 			to[2] = *from++ ;
957 			to[1] = *from++ ;
958 			to[0] = *from++ ;
959 #else
960 			to[0] = *from++ ;
961 			to[1] = *from++ ;
962 			to[2] = *from++ ;
963 			to[3] = *from++ ;
964 #endif
965 			len -= 4 ;
966 			to += 4 ;
967 			break ;
968 		case '2' :		/* PortMacIndicated */
969 			if (len < 4)
970 				goto len_error ;
971 			to[0] = 0 ;
972 			to[1] = 0 ;
973 			to[2] = *from++ ;
974 			to[3] = *from++ ;
975 			len -= 4 ;
976 			to += 4 ;
977 			break ;
978 		case '4' :
979 			if (len < 4)
980 				goto len_error ;
981 			to[0] = *from++ ;
982 			to[1] = *from++ ;
983 			to[2] = *from++ ;
984 			to[3] = *from++ ;
985 			len -= 4 ;
986 			to += 4 ;
987 			break ;
988 		case 'A' :
989 			if (len < 8)
990 				goto len_error ;
991 			to[0] = 0 ;
992 			to[1] = 0 ;
993 			memcpy((char *) to+2,(char *) from,6) ;
994 			to += 8 ;
995 			from += 8 ;
996 			len -= 8 ;
997 			break ;
998 		case '8' :
999 			if (len < 8)
1000 				goto len_error ;
1001 			memcpy((char *) to,(char *) from,8) ;
1002 			to += 8 ;
1003 			from += 8 ;
1004 			len -= 8 ;
1005 			break ;
1006 		case 'D' :
1007 			if (len < 32)
1008 				goto len_error ;
1009 			memcpy((char *) to,(char *) from,32) ;
1010 			to += 32 ;
1011 			from += 32 ;
1012 			len -= 32 ;
1013 			break ;
1014 		case 'P' :		/* timestamp is NOT swapped */
1015 			if (len < 8)
1016 				goto len_error ;
1017 			to[0] = *from++ ;
1018 			to[1] = *from++ ;
1019 			to[2] = *from++ ;
1020 			to[3] = *from++ ;
1021 			to[4] = *from++ ;
1022 			to[5] = *from++ ;
1023 			to[6] = *from++ ;
1024 			to[7] = *from++ ;
1025 			to += 8 ;
1026 			len -= 8 ;
1027 			break ;
1028 		default :
1029 			SMT_PANIC(smc,SMT_E0119, SMT_E0119_MSG) ;
1030 			break ;
1031 		}
1032 	}
1033 
1034 done:
1035 	/*
1036 	 * make it even (in case of 'I' encoding)
1037 	 * note: len is DECREMENTED
1038 	 */
1039 	if (len & 3) {
1040 		to[0] = 0 ;
1041 		to[1] = 0 ;
1042 		to += 4 - (len & 3 ) ;
1043 		len = len & ~ 3 ;
1044 	}
1045 
1046 	/* set type and length */
1047 	pa->p_type = para ;
1048 	pa->p_len = plen - len - PARA_LEN ;
1049 	/* return values */
1050 	pcon->pc_p = (void *) to ;
1051 	pcon->pc_len = len ;
1052 	return ;
1053 
1054 sp_done:
1055 	len -= sp_len ;
1056 	to += sp_len ;
1057 	goto done ;
1058 
1059 len_error:
1060 	/* parameter does not fit in frame */
1061 	pcon->pc_err = SMT_RDF_TOOLONG ;
1062 	return ;
1063 
1064 wrong_error:
1065 	pcon->pc_err = SMT_RDF_LENGTH ;
1066 }
1067 
1068 /*
1069  * set parameter
1070  */
1071 static int smt_set_para(struct s_smc *smc, struct smt_para *pa, int index,
1072 			int local, int set)
1073 {
1074 #define IFSET(x)	if (set) (x)
1075 
1076 	const struct s_p_tab	*pt ;
1077 	int		len ;
1078 	char		*from ;
1079 	char		*to ;
1080 	const char	*swap ;
1081 	char		c ;
1082 	char		*mib_addr ;
1083 	struct fddi_mib	*mib ;
1084 	struct fddi_mib_m	*mib_m = NULL;
1085 	struct fddi_mib_a	*mib_a = NULL;
1086 	struct fddi_mib_p	*mib_p = NULL;
1087 	int		mac ;
1088 	int		path ;
1089 	int		port ;
1090 	SK_LOC_DECL(u_char,byte_val) ;
1091 	SK_LOC_DECL(u_short,word_val) ;
1092 	SK_LOC_DECL(u_long,long_val) ;
1093 
1094 	mac = index - INDEX_MAC ;
1095 	path = index - INDEX_PATH ;
1096 	port = index - INDEX_PORT ;
1097 	len = pa->p_len ;
1098 	from = (char *) (pa + 1 ) ;
1099 
1100 	mib = &smc->mib ;
1101 	switch (pa->p_type & 0xf000) {
1102 	case 0x1000 :
1103 	default :
1104 		mib_addr = (char *) mib ;
1105 		break ;
1106 	case 0x2000 :
1107 		if (mac < 0 || mac >= NUMMACS) {
1108 			return SMT_RDF_NOPARAM;
1109 		}
1110 		mib_m = &smc->mib.m[mac] ;
1111 		mib_addr = (char *) mib_m ;
1112 		from += 4 ;		/* skip index */
1113 		len -= 4 ;
1114 		break ;
1115 	case 0x3000 :
1116 		if (path < 0 || path >= NUMPATHS) {
1117 			return SMT_RDF_NOPARAM;
1118 		}
1119 		mib_a = &smc->mib.a[path] ;
1120 		mib_addr = (char *) mib_a ;
1121 		from += 4 ;		/* skip index */
1122 		len -= 4 ;
1123 		break ;
1124 	case 0x4000 :
1125 		if (port < 0 || port >= smt_mib_phys(smc)) {
1126 			return SMT_RDF_NOPARAM;
1127 		}
1128 		mib_p = &smc->mib.p[port_to_mib(smc,port)] ;
1129 		mib_addr = (char *) mib_p ;
1130 		from += 4 ;		/* skip index */
1131 		len -= 4 ;
1132 		break ;
1133 	}
1134 	switch (pa->p_type) {
1135 	case SMT_P10F0 :
1136 	case SMT_P10F1 :
1137 #ifdef	ESS
1138 	case SMT_P10F2 :
1139 	case SMT_P10F3 :
1140 	case SMT_P10F4 :
1141 	case SMT_P10F5 :
1142 	case SMT_P10F6 :
1143 	case SMT_P10F7 :
1144 #endif
1145 #ifdef	SBA
1146 	case SMT_P10F8 :
1147 	case SMT_P10F9 :
1148 #endif
1149 	case SMT_P20F1 :
1150 		if (!local)
1151 			return SMT_RDF_NOPARAM;
1152 		break ;
1153 	}
1154 	pt = smt_get_ptab(pa->p_type) ;
1155 	if (!pt)
1156 		return (pa->p_type & 0xff00) ? SMT_RDF_NOPARAM :
1157 					       SMT_RDF_ILLEGAL;
1158 	switch (pt->p_access) {
1159 	case AC_GR :
1160 	case AC_S :
1161 		break ;
1162 	default :
1163 		return SMT_RDF_ILLEGAL;
1164 	}
1165 	to = mib_addr + pt->p_offset ;
1166 	swap = pt->p_swap ;		/* pointer to swap string */
1167 
1168 	while (swap && (c = *swap++)) {
1169 		switch(c) {
1170 		case 'b' :
1171 			to = (char *) &byte_val ;
1172 			break ;
1173 		case 'w' :
1174 			to = (char *) &word_val ;
1175 			break ;
1176 		case 'l' :
1177 			to = (char *) &long_val ;
1178 			break ;
1179 		case 'S' :
1180 		case 'E' :
1181 		case 'R' :
1182 		case 'r' :
1183 			if (len < 4) {
1184 				goto len_error ;
1185 			}
1186 			if (from[0] | from[1])
1187 				goto val_error ;
1188 #ifdef	LITTLE_ENDIAN
1189 			if (c == 'r') {
1190 				to[0] = from[2] ;
1191 				to[1] = from[3] ;
1192 			}
1193 			else {
1194 				to[1] = from[2] ;
1195 				to[0] = from[3] ;
1196 			}
1197 #else
1198 			to[0] = from[2] ;
1199 			to[1] = from[3] ;
1200 #endif
1201 			from += 4 ;
1202 			to += 2 ;
1203 			len -= 4 ;
1204 			break ;
1205 		case 'F' :
1206 		case 'B' :
1207 			if (len < 4) {
1208 				goto len_error ;
1209 			}
1210 			if (from[0] | from[1] | from[2])
1211 				goto val_error ;
1212 			to[0] = from[3] ;
1213 			len -= 4 ;
1214 			from += 4 ;
1215 			to += 4 ;
1216 			break ;
1217 		case 'C' :
1218 		case 'T' :
1219 		case 'L' :
1220 			if (len < 4) {
1221 				goto len_error ;
1222 			}
1223 #ifdef	LITTLE_ENDIAN
1224 			to[3] = *from++ ;
1225 			to[2] = *from++ ;
1226 			to[1] = *from++ ;
1227 			to[0] = *from++ ;
1228 #else
1229 			to[0] = *from++ ;
1230 			to[1] = *from++ ;
1231 			to[2] = *from++ ;
1232 			to[3] = *from++ ;
1233 #endif
1234 			len -= 4 ;
1235 			to += 4 ;
1236 			break ;
1237 		case 'A' :
1238 			if (len < 8)
1239 				goto len_error ;
1240 			if (set)
1241 				memcpy(to,from+2,6) ;
1242 			to += 8 ;
1243 			from += 8 ;
1244 			len -= 8 ;
1245 			break ;
1246 		case '4' :
1247 			if (len < 4)
1248 				goto len_error ;
1249 			if (set)
1250 				memcpy(to,from,4) ;
1251 			to += 4 ;
1252 			from += 4 ;
1253 			len -= 4 ;
1254 			break ;
1255 		case '8' :
1256 			if (len < 8)
1257 				goto len_error ;
1258 			if (set)
1259 				memcpy(to,from,8) ;
1260 			to += 8 ;
1261 			from += 8 ;
1262 			len -= 8 ;
1263 			break ;
1264 		case 'D' :
1265 			if (len < 32)
1266 				goto len_error ;
1267 			if (set)
1268 				memcpy(to,from,32) ;
1269 			to += 32 ;
1270 			from += 32 ;
1271 			len -= 32 ;
1272 			break ;
1273 		case 'P' :		/* timestamp is NOT swapped */
1274 			if (set) {
1275 				to[0] = *from++ ;
1276 				to[1] = *from++ ;
1277 				to[2] = *from++ ;
1278 				to[3] = *from++ ;
1279 				to[4] = *from++ ;
1280 				to[5] = *from++ ;
1281 				to[6] = *from++ ;
1282 				to[7] = *from++ ;
1283 			}
1284 			to += 8 ;
1285 			len -= 8 ;
1286 			break ;
1287 		default :
1288 			SMT_PANIC(smc,SMT_E0120, SMT_E0120_MSG) ;
1289 			return SMT_RDF_ILLEGAL;
1290 		}
1291 	}
1292 	/*
1293 	 * actions and internal updates
1294 	 */
1295 	switch (pa->p_type) {
1296 	case SMT_P101A:			/* fddiSMTConfigPolicy */
1297 		if (word_val & ~1)
1298 			goto val_error ;
1299 		IFSET(mib->fddiSMTConfigPolicy = word_val) ;
1300 		break ;
1301 	case SMT_P101B :		/* fddiSMTConnectionPolicy */
1302 		if (!(word_val & POLICY_MM))
1303 			goto val_error ;
1304 		IFSET(mib->fddiSMTConnectionPolicy = word_val) ;
1305 		break ;
1306 	case SMT_P101D : 		/* fddiSMTTT_Notify */
1307 		if (word_val < 2 || word_val > 30)
1308 			goto val_error ;
1309 		IFSET(mib->fddiSMTTT_Notify = word_val) ;
1310 		break ;
1311 	case SMT_P101E :		/* fddiSMTStatRptPolicy */
1312 		if (byte_val & ~1)
1313 			goto val_error ;
1314 		IFSET(mib->fddiSMTStatRptPolicy = byte_val) ;
1315 		break ;
1316 	case SMT_P101F :		/* fddiSMTTrace_MaxExpiration */
1317 		/*
1318 		 * note: lower limit trace_max = 6.001773... s
1319 		 * NO upper limit
1320 		 */
1321 		if (long_val < (long)0x478bf51L)
1322 			goto val_error ;
1323 		IFSET(mib->fddiSMTTrace_MaxExpiration = long_val) ;
1324 		break ;
1325 #ifdef	ESS
1326 	case SMT_P10F2 :		/* fddiESSPayload */
1327 		if (long_val > 1562)
1328 			goto val_error ;
1329 		if (set && smc->mib.fddiESSPayload != long_val) {
1330 			smc->ess.raf_act_timer_poll = TRUE ;
1331 			smc->mib.fddiESSPayload = long_val ;
1332 		}
1333 		break ;
1334 	case SMT_P10F3 :		/* fddiESSOverhead */
1335 		if (long_val < 50 || long_val > 5000)
1336 			goto val_error ;
1337 		if (set && smc->mib.fddiESSPayload &&
1338 			smc->mib.fddiESSOverhead != long_val) {
1339 			smc->ess.raf_act_timer_poll = TRUE ;
1340 			smc->mib.fddiESSOverhead = long_val ;
1341 		}
1342 		break ;
1343 	case SMT_P10F4 :		/* fddiESSMaxTNeg */
1344 		if (long_val > -MS2BCLK(5) || long_val < -MS2BCLK(165))
1345 			goto val_error ;
1346 		IFSET(mib->fddiESSMaxTNeg = long_val) ;
1347 		break ;
1348 	case SMT_P10F5 :		/* fddiESSMinSegmentSize */
1349 		if (long_val < 1 || long_val > 4478)
1350 			goto val_error ;
1351 		IFSET(mib->fddiESSMinSegmentSize = long_val) ;
1352 		break ;
1353 	case SMT_P10F6 :		/* fddiESSCategory */
1354 		if ((long_val & 0xffff) != 1)
1355 			goto val_error ;
1356 		IFSET(mib->fddiESSCategory = long_val) ;
1357 		break ;
1358 	case SMT_P10F7 :		/* fddiESSSyncTxMode */
1359 		if (word_val > 1)
1360 			goto val_error ;
1361 		IFSET(mib->fddiESSSynchTxMode = word_val) ;
1362 		break ;
1363 #endif
1364 #ifdef	SBA
1365 	case SMT_P10F8 :		/* fddiSBACommand */
1366 		if (byte_val != SB_STOP && byte_val != SB_START)
1367 			goto val_error ;
1368 		IFSET(mib->fddiSBACommand = byte_val) ;
1369 		break ;
1370 	case SMT_P10F9 :		/* fddiSBAAvailable */
1371 		if (byte_val > 100)
1372 			goto val_error ;
1373 		IFSET(mib->fddiSBAAvailable = byte_val) ;
1374 		break ;
1375 #endif
1376 	case SMT_P2020 :		/* fddiMACRequestedPaths */
1377 		if ((word_val & (MIB_P_PATH_PRIM_PREFER |
1378 			MIB_P_PATH_PRIM_ALTER)) == 0 )
1379 			goto val_error ;
1380 		IFSET(mib_m->fddiMACRequestedPaths = word_val) ;
1381 		break ;
1382 	case SMT_P205F :		/* fddiMACFrameErrorThreshold */
1383 		/* 0 .. ffff acceptable */
1384 		IFSET(mib_m->fddiMACFrameErrorThreshold = word_val) ;
1385 		break ;
1386 	case SMT_P2067 :		/* fddiMACNotCopiedThreshold */
1387 		/* 0 .. ffff acceptable */
1388 		IFSET(mib_m->fddiMACNotCopiedThreshold = word_val) ;
1389 		break ;
1390 	case SMT_P2076:			/* fddiMACMA_UnitdataEnable */
1391 		if (byte_val & ~1)
1392 			goto val_error ;
1393 		if (set) {
1394 			mib_m->fddiMACMA_UnitdataEnable = byte_val ;
1395 			queue_event(smc,EVENT_RMT,RM_ENABLE_FLAG) ;
1396 		}
1397 		break ;
1398 	case SMT_P20F1 :		/* fddiMACT_Min */
1399 		IFSET(mib_m->fddiMACT_Min = long_val) ;
1400 		break ;
1401 	case SMT_P320F :
1402 		if (long_val > 1562)
1403 			goto val_error ;
1404 		IFSET(mib_a->fddiPATHSbaPayload = long_val) ;
1405 #ifdef	ESS
1406 		if (set)
1407 			ess_para_change(smc) ;
1408 #endif
1409 		break ;
1410 	case SMT_P3210 :
1411 		if (long_val > 5000)
1412 			goto val_error ;
1413 
1414 		if (long_val != 0 && mib_a->fddiPATHSbaPayload == 0)
1415 			goto val_error ;
1416 
1417 		IFSET(mib_a->fddiPATHSbaOverhead = long_val) ;
1418 #ifdef	ESS
1419 		if (set)
1420 			ess_para_change(smc) ;
1421 #endif
1422 		break ;
1423 	case SMT_P3213:			/* fddiPATHT_Rmode */
1424 		/* no limit :
1425 		 * 0 .. 343.597 => 0 .. 2e32 * 80nS
1426 		 */
1427 		if (set) {
1428 			mib_a->fddiPATHT_Rmode = long_val ;
1429 			rtm_set_timer(smc) ;
1430 		}
1431 		break ;
1432 	case SMT_P3214 :		/* fddiPATHSbaAvailable */
1433 		if (long_val > 0x00BEBC20L)
1434 			goto val_error ;
1435 #ifdef SBA
1436 		if (set && mib->fddiSBACommand == SB_STOP)
1437 			goto val_error ;
1438 #endif
1439 		IFSET(mib_a->fddiPATHSbaAvailable = long_val) ;
1440 		break ;
1441 	case SMT_P3215 :		/* fddiPATHTVXLowerBound */
1442 		IFSET(mib_a->fddiPATHTVXLowerBound = long_val) ;
1443 		goto change_mac_para ;
1444 	case SMT_P3216 :		/* fddiPATHT_MaxLowerBound */
1445 		IFSET(mib_a->fddiPATHT_MaxLowerBound = long_val) ;
1446 		goto change_mac_para ;
1447 	case SMT_P3217 :		/* fddiPATHMaxT_Req */
1448 		IFSET(mib_a->fddiPATHMaxT_Req = long_val) ;
1449 
1450 change_mac_para:
1451 		if (set && smt_set_mac_opvalues(smc)) {
1452 			RS_SET(smc,RS_EVENT) ;
1453 			smc->sm.please_reconnect = 1 ;
1454 			queue_event(smc,EVENT_ECM,EC_DISCONNECT) ;
1455 		}
1456 		break ;
1457 	case SMT_P400E :		/* fddiPORTConnectionPolicies */
1458 		if (byte_val > 1)
1459 			goto val_error ;
1460 		IFSET(mib_p->fddiPORTConnectionPolicies = byte_val) ;
1461 		break ;
1462 	case SMT_P4011 :		/* fddiPORTRequestedPaths */
1463 		/* all 3*8 bits allowed */
1464 		IFSET(memcpy((char *)mib_p->fddiPORTRequestedPaths,
1465 			(char *)&long_val,4)) ;
1466 		break ;
1467 	case SMT_P401F:			/* fddiPORTMaint_LS */
1468 		if (word_val > 4)
1469 			goto val_error ;
1470 		IFSET(mib_p->fddiPORTMaint_LS = word_val) ;
1471 		break ;
1472 	case SMT_P403A :		/* fddiPORTLer_Cutoff */
1473 		if (byte_val < 4 || byte_val > 15)
1474 			goto val_error ;
1475 		IFSET(mib_p->fddiPORTLer_Cutoff = byte_val) ;
1476 		break ;
1477 	case SMT_P403B :		/* fddiPORTLer_Alarm */
1478 		if (byte_val < 4 || byte_val > 15)
1479 			goto val_error ;
1480 		IFSET(mib_p->fddiPORTLer_Alarm = byte_val) ;
1481 		break ;
1482 
1483 	/*
1484 	 * Actions
1485 	 */
1486 	case SMT_P103C :		/* fddiSMTStationAction */
1487 		if (smt_action(smc,SMT_STATION_ACTION, (int) word_val, 0))
1488 			goto val_error ;
1489 		break ;
1490 	case SMT_P4046:			/* fddiPORTAction */
1491 		if (smt_action(smc,SMT_PORT_ACTION, (int) word_val,
1492 			port_to_mib(smc,port)))
1493 			goto val_error ;
1494 		break ;
1495 	default :
1496 		break ;
1497 	}
1498 	return 0;
1499 
1500 val_error:
1501 	/* parameter value in frame is out of range */
1502 	return SMT_RDF_RANGE;
1503 
1504 len_error:
1505 	/* parameter value in frame is too short */
1506 	return SMT_RDF_LENGTH;
1507 
1508 #if	0
1509 no_author_error:
1510 	/* parameter not setable, because the SBA is not active
1511 	 * Please note: we give the return code 'not authorizeed
1512 	 *  because SBA denied is not a valid return code in the
1513 	 * PMF protocol.
1514 	 */
1515 	return SMT_RDF_AUTHOR;
1516 #endif
1517 }
1518 
1519 static const struct s_p_tab *smt_get_ptab(u_short para)
1520 {
1521 	const struct s_p_tab	*pt ;
1522 	for (pt = p_tab ; pt->p_num && pt->p_num != para ; pt++)
1523 		;
1524 	return pt->p_num ? pt : NULL;
1525 }
1526 
1527 static int smt_mib_phys(struct s_smc *smc)
1528 {
1529 #ifdef	CONCENTRATOR
1530 	SK_UNUSED(smc) ;
1531 
1532 	return NUMPHYS;
1533 #else
1534 	if (smc->s.sas == SMT_SAS)
1535 		return 1;
1536 	return NUMPHYS;
1537 #endif
1538 }
1539 
1540 static int port_to_mib(struct s_smc *smc, int p)
1541 {
1542 #ifdef	CONCENTRATOR
1543 	SK_UNUSED(smc) ;
1544 
1545 	return p;
1546 #else
1547 	if (smc->s.sas == SMT_SAS)
1548 		return PS;
1549 	return p;
1550 #endif
1551 }
1552 
1553 
1554 #ifdef	DEBUG
1555 #ifndef	BOOT
1556 void dump_smt(struct s_smc *smc, struct smt_header *sm, char *text)
1557 {
1558 	int	len ;
1559 	struct smt_para	*pa ;
1560 	char	*c ;
1561 	int	n ;
1562 	int	nn ;
1563 #ifdef	LITTLE_ENDIAN
1564 	int	smtlen ;
1565 #endif
1566 
1567 	SK_UNUSED(smc) ;
1568 
1569 #ifdef	DEBUG_BRD
1570 	if (smc->debug.d_smtf < 2)
1571 #else
1572 	if (debug.d_smtf < 2)
1573 #endif
1574 		return ;
1575 #ifdef	LITTLE_ENDIAN
1576 	smtlen = sm->smt_len + sizeof(struct smt_header) ;
1577 #endif
1578 	printf("SMT Frame [%s]:\nDA  ",text) ;
1579 	dump_hex((char *) &sm->smt_dest,6) ;
1580 	printf("\tSA ") ;
1581 	dump_hex((char *) &sm->smt_source,6) ;
1582 	printf(" Class %x Type %x Version %x\n",
1583 		sm->smt_class,sm->smt_type,sm->smt_version)  ;
1584 	printf("TID %x\t\tSID ", sm->smt_tid);
1585 	dump_hex((char *) &sm->smt_sid,8) ;
1586 	printf(" LEN %x\n",sm->smt_len) ;
1587 
1588 	len = sm->smt_len ;
1589 	pa = (struct smt_para *) (sm + 1) ;
1590 	while (len > 0 ) {
1591 		int	plen ;
1592 #ifdef UNIX
1593 		printf("TYPE %x LEN %x VALUE\t",pa->p_type,pa->p_len) ;
1594 #else
1595 		printf("TYPE %04x LEN %2x VALUE\t",pa->p_type,pa->p_len) ;
1596 #endif
1597 		n = pa->p_len ;
1598 		if ( (n < 0 ) || (n > (int)(len - PARA_LEN))) {
1599 			n = len - PARA_LEN ;
1600 			printf(" BAD LENGTH\n") ;
1601 			break ;
1602 		}
1603 #ifdef	LITTLE_ENDIAN
1604 		smt_swap_para(sm,smtlen,0) ;
1605 #endif
1606 		if (n < 24) {
1607 			dump_hex((char *)(pa+1),(int) n) ;
1608 			printf("\n") ;
1609 		}
1610 		else {
1611 			int	first = 0 ;
1612 			c = (char *)(pa+1) ;
1613 			dump_hex(c,16) ;
1614 			printf("\n") ;
1615 			n -= 16 ;
1616 			c += 16 ;
1617 			while (n > 0) {
1618 				nn = (n > 16) ? 16 : n ;
1619 				if (n > 64) {
1620 					if (first == 0)
1621 						printf("\t\t\t...\n") ;
1622 					first = 1 ;
1623 				}
1624 				else {
1625 					printf("\t\t\t") ;
1626 					dump_hex(c,nn) ;
1627 					printf("\n") ;
1628 				}
1629 				n -= nn ;
1630 				c += 16 ;
1631 			}
1632 		}
1633 #ifdef	LITTLE_ENDIAN
1634 		smt_swap_para(sm,smtlen,1) ;
1635 #endif
1636 		plen = (pa->p_len + PARA_LEN + 3) & ~3 ;
1637 		len -= plen ;
1638 		pa = (struct smt_para *)((char *)pa + plen) ;
1639 	}
1640 	printf("-------------------------------------------------\n\n") ;
1641 }
1642 
1643 void dump_hex(char *p, int len)
1644 {
1645 	int	n = 0 ;
1646 	while (len--) {
1647 		n++ ;
1648 #ifdef UNIX
1649 		printf("%x%s",*p++ & 0xff,len ? ( (n & 7) ? " " : "-") : "") ;
1650 #else
1651 		printf("%02x%s",*p++ & 0xff,len ? ( (n & 7) ? " " : "-") : "") ;
1652 #endif
1653 	}
1654 }
1655 #endif	/* no BOOT */
1656 #endif	/* DEBUG */
1657 
1658 
1659 #endif	/* no SLIM_SMT */
1660