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