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