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