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