12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664 |
- /******************************************************************************
- *
- * (C)Copyright 1998,1999 SysKonnect,
- * a business unit of Schneider & Koch & Co. Datensysteme GmbH.
- *
- * See the file "skfddi.c" for further information.
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
- *
- * The information in this file is provided "AS IS" without warranty.
- *
- ******************************************************************************/
- /*
- Parameter Management Frame processing for SMT 7.2
- */
- #include "h/types.h"
- #include "h/fddi.h"
- #include "h/smc.h"
- #include "h/smt_p.h"
- #define KERNEL
- #include "h/smtstate.h"
- #ifndef SLIM_SMT
- #ifndef lint
- static const char ID_sccs[] = "@(#)pmf.c 1.37 97/08/04 (C) SK " ;
- #endif
- static int smt_authorize(struct s_smc *smc, struct smt_header *sm);
- static int smt_check_set_count(struct s_smc *smc, struct smt_header *sm);
- static const struct s_p_tab* smt_get_ptab(u_short para);
- static int smt_mib_phys(struct s_smc *smc);
- static int smt_set_para(struct s_smc *smc, struct smt_para *pa, int index,
- int local, int set);
- void smt_add_para(struct s_smc *smc, struct s_pcon *pcon, u_short para,
- int index, int local);
- static SMbuf *smt_build_pmf_response(struct s_smc *smc, struct smt_header *req,
- int set, int local);
- static int port_to_mib(struct s_smc *smc, int p);
- #define MOFFSS(e) offsetof(struct fddi_mib, e)
- #define MOFFMS(e) offsetof(struct fddi_mib_m, e)
- #define MOFFAS(e) offsetof(struct fddi_mib_a, e)
- #define MOFFPS(e) offsetof(struct fddi_mib_p, e)
- #define AC_G 0x01 /* Get */
- #define AC_GR 0x02 /* Get/Set */
- #define AC_S 0x04 /* Set */
- #define AC_NA 0x08
- #define AC_GROUP 0x10 /* Group */
- #define MS2BCLK(x) ((x)*12500L)
- /*
- F LFag (byte)
- B byte
- S u_short 16 bit
- C Counter 32 bit
- L Long 32 bit
- T Timer_2 32 bit
- P TimeStamp ;
- A LongAddress (6 byte)
- E Enum 16 bit
- R ResId 16 Bit
- */
- static const struct s_p_tab {
- u_short p_num ; /* parameter code */
- u_char p_access ; /* access rights */
- u_short p_offset ; /* offset in mib */
- char p_swap[3] ; /* format string */
- } p_tab[] = {
- /* StationIdGrp */
- { SMT_P100A,AC_GROUP } ,
- { SMT_P100B,AC_G, MOFFSS(fddiSMTStationId), "8" } ,
- { SMT_P100D,AC_G, MOFFSS(fddiSMTOpVersionId), "S" } ,
- { SMT_P100E,AC_G, MOFFSS(fddiSMTHiVersionId), "S" } ,
- { SMT_P100F,AC_G, MOFFSS(fddiSMTLoVersionId), "S" } ,
- { SMT_P1010,AC_G, MOFFSS(fddiSMTManufacturerData), "D" } ,
- { SMT_P1011,AC_GR, MOFFSS(fddiSMTUserData), "D" } ,
- { SMT_P1012,AC_G, MOFFSS(fddiSMTMIBVersionId), "S" } ,
- /* StationConfigGrp */
- { SMT_P1014,AC_GROUP } ,
- { SMT_P1015,AC_G, MOFFSS(fddiSMTMac_Ct), "B" } ,
- { SMT_P1016,AC_G, MOFFSS(fddiSMTNonMaster_Ct), "B" } ,
- { SMT_P1017,AC_G, MOFFSS(fddiSMTMaster_Ct), "B" } ,
- { SMT_P1018,AC_G, MOFFSS(fddiSMTAvailablePaths), "B" } ,
- { SMT_P1019,AC_G, MOFFSS(fddiSMTConfigCapabilities),"S" } ,
- { SMT_P101A,AC_GR, MOFFSS(fddiSMTConfigPolicy), "wS" } ,
- { SMT_P101B,AC_GR, MOFFSS(fddiSMTConnectionPolicy),"wS" } ,
- { SMT_P101D,AC_GR, MOFFSS(fddiSMTTT_Notify), "wS" } ,
- { SMT_P101E,AC_GR, MOFFSS(fddiSMTStatRptPolicy), "bB" } ,
- { SMT_P101F,AC_GR, MOFFSS(fddiSMTTrace_MaxExpiration),"lL" } ,
- { SMT_P1020,AC_G, MOFFSS(fddiSMTPORTIndexes), "II" } ,
- { SMT_P1021,AC_G, MOFFSS(fddiSMTMACIndexes), "I" } ,
- { SMT_P1022,AC_G, MOFFSS(fddiSMTBypassPresent), "F" } ,
- /* StatusGrp */
- { SMT_P1028,AC_GROUP } ,
- { SMT_P1029,AC_G, MOFFSS(fddiSMTECMState), "E" } ,
- { SMT_P102A,AC_G, MOFFSS(fddiSMTCF_State), "E" } ,
- { SMT_P102C,AC_G, MOFFSS(fddiSMTRemoteDisconnectFlag),"F" } ,
- { SMT_P102D,AC_G, MOFFSS(fddiSMTStationStatus), "E" } ,
- { SMT_P102E,AC_G, MOFFSS(fddiSMTPeerWrapFlag), "F" } ,
- /* MIBOperationGrp */
- { SMT_P1032,AC_GROUP } ,
- { SMT_P1033,AC_G, MOFFSS(fddiSMTTimeStamp),"P" } ,
- { SMT_P1034,AC_G, MOFFSS(fddiSMTTransitionTimeStamp),"P" } ,
- /* NOTE : SMT_P1035 is already swapped ! SMT_P_SETCOUNT */
- { SMT_P1035,AC_G, MOFFSS(fddiSMTSetCount),"4P" } ,
- { SMT_P1036,AC_G, MOFFSS(fddiSMTLastSetStationId),"8" } ,
- { SMT_P103C,AC_S, 0, "wS" } ,
- /*
- * PRIVATE EXTENSIONS
- * only accessible locally to get/set passwd
- */
- { SMT_P10F0,AC_GR, MOFFSS(fddiPRPMFPasswd), "8" } ,
- { SMT_P10F1,AC_GR, MOFFSS(fddiPRPMFStation), "8" } ,
- #ifdef ESS
- { SMT_P10F2,AC_GR, MOFFSS(fddiESSPayload), "lL" } ,
- { SMT_P10F3,AC_GR, MOFFSS(fddiESSOverhead), "lL" } ,
- { SMT_P10F4,AC_GR, MOFFSS(fddiESSMaxTNeg), "lL" } ,
- { SMT_P10F5,AC_GR, MOFFSS(fddiESSMinSegmentSize), "lL" } ,
- { SMT_P10F6,AC_GR, MOFFSS(fddiESSCategory), "lL" } ,
- { SMT_P10F7,AC_GR, MOFFSS(fddiESSSynchTxMode), "wS" } ,
- #endif
- #ifdef SBA
- { SMT_P10F8,AC_GR, MOFFSS(fddiSBACommand), "bF" } ,
- { SMT_P10F9,AC_GR, MOFFSS(fddiSBAAvailable), "bF" } ,
- #endif
- /* MAC Attributes */
- { SMT_P200A,AC_GROUP } ,
- { SMT_P200B,AC_G, MOFFMS(fddiMACFrameStatusFunctions),"S" } ,
- { SMT_P200D,AC_G, MOFFMS(fddiMACT_MaxCapabilitiy),"T" } ,
- { SMT_P200E,AC_G, MOFFMS(fddiMACTVXCapabilitiy),"T" } ,
- /* ConfigGrp */
- { SMT_P2014,AC_GROUP } ,
- { SMT_P2016,AC_G, MOFFMS(fddiMACAvailablePaths), "B" } ,
- { SMT_P2017,AC_G, MOFFMS(fddiMACCurrentPath), "S" } ,
- { SMT_P2018,AC_G, MOFFMS(fddiMACUpstreamNbr), "A" } ,
- { SMT_P2019,AC_G, MOFFMS(fddiMACDownstreamNbr), "A" } ,
- { SMT_P201A,AC_G, MOFFMS(fddiMACOldUpstreamNbr), "A" } ,
- { SMT_P201B,AC_G, MOFFMS(fddiMACOldDownstreamNbr),"A" } ,
- { SMT_P201D,AC_G, MOFFMS(fddiMACDupAddressTest), "E" } ,
- { SMT_P2020,AC_GR, MOFFMS(fddiMACRequestedPaths), "wS" } ,
- { SMT_P2021,AC_G, MOFFMS(fddiMACDownstreamPORTType),"E" } ,
- { SMT_P2022,AC_G, MOFFMS(fddiMACIndex), "S" } ,
- /* AddressGrp */
- { SMT_P2028,AC_GROUP } ,
- { SMT_P2029,AC_G, MOFFMS(fddiMACSMTAddress), "A" } ,
- /* OperationGrp */
- { SMT_P2032,AC_GROUP } ,
- { SMT_P2033,AC_G, MOFFMS(fddiMACT_Req), "T" } ,
- { SMT_P2034,AC_G, MOFFMS(fddiMACT_Neg), "T" } ,
- { SMT_P2035,AC_G, MOFFMS(fddiMACT_Max), "T" } ,
- { SMT_P2036,AC_G, MOFFMS(fddiMACTvxValue), "T" } ,
- { SMT_P2038,AC_G, MOFFMS(fddiMACT_Pri0), "T" } ,
- { SMT_P2039,AC_G, MOFFMS(fddiMACT_Pri1), "T" } ,
- { SMT_P203A,AC_G, MOFFMS(fddiMACT_Pri2), "T" } ,
- { SMT_P203B,AC_G, MOFFMS(fddiMACT_Pri3), "T" } ,
- { SMT_P203C,AC_G, MOFFMS(fddiMACT_Pri4), "T" } ,
- { SMT_P203D,AC_G, MOFFMS(fddiMACT_Pri5), "T" } ,
- { SMT_P203E,AC_G, MOFFMS(fddiMACT_Pri6), "T" } ,
- /* CountersGrp */
- { SMT_P2046,AC_GROUP } ,
- { SMT_P2047,AC_G, MOFFMS(fddiMACFrame_Ct), "C" } ,
- { SMT_P2048,AC_G, MOFFMS(fddiMACCopied_Ct), "C" } ,
- { SMT_P2049,AC_G, MOFFMS(fddiMACTransmit_Ct), "C" } ,
- { SMT_P204A,AC_G, MOFFMS(fddiMACToken_Ct), "C" } ,
- { SMT_P2051,AC_G, MOFFMS(fddiMACError_Ct), "C" } ,
- { SMT_P2052,AC_G, MOFFMS(fddiMACLost_Ct), "C" } ,
- { SMT_P2053,AC_G, MOFFMS(fddiMACTvxExpired_Ct), "C" } ,
- { SMT_P2054,AC_G, MOFFMS(fddiMACNotCopied_Ct), "C" } ,
- { SMT_P2056,AC_G, MOFFMS(fddiMACRingOp_Ct), "C" } ,
- /* FrameErrorConditionGrp */
- { SMT_P205A,AC_GROUP } ,
- { SMT_P205F,AC_GR, MOFFMS(fddiMACFrameErrorThreshold),"wS" } ,
- { SMT_P2060,AC_G, MOFFMS(fddiMACFrameErrorRatio), "S" } ,
- /* NotCopiedConditionGrp */
- { SMT_P2064,AC_GROUP } ,
- { SMT_P2067,AC_GR, MOFFMS(fddiMACNotCopiedThreshold),"wS" } ,
- { SMT_P2069,AC_G, MOFFMS(fddiMACNotCopiedRatio), "S" } ,
- /* StatusGrp */
- { SMT_P206E,AC_GROUP } ,
- { SMT_P206F,AC_G, MOFFMS(fddiMACRMTState), "S" } ,
- { SMT_P2070,AC_G, MOFFMS(fddiMACDA_Flag), "F" } ,
- { SMT_P2071,AC_G, MOFFMS(fddiMACUNDA_Flag), "F" } ,
- { SMT_P2072,AC_G, MOFFMS(fddiMACFrameErrorFlag), "F" } ,
- { SMT_P2073,AC_G, MOFFMS(fddiMACNotCopiedFlag), "F" } ,
- { SMT_P2074,AC_G, MOFFMS(fddiMACMA_UnitdataAvailable),"F" } ,
- { SMT_P2075,AC_G, MOFFMS(fddiMACHardwarePresent), "F" } ,
- { SMT_P2076,AC_GR, MOFFMS(fddiMACMA_UnitdataEnable),"bF" } ,
- /*
- * PRIVATE EXTENSIONS
- * only accessible locally to get/set TMIN
- */
- { SMT_P20F0,AC_NA } ,
- { SMT_P20F1,AC_GR, MOFFMS(fddiMACT_Min), "lT" } ,
- /* Path Attributes */
- /*
- * DON't swap 320B,320F,3210: they are already swapped in swap_para()
- */
- { SMT_P320A,AC_GROUP } ,
- { SMT_P320B,AC_G, MOFFAS(fddiPATHIndex), "r" } ,
- { SMT_P320F,AC_GR, MOFFAS(fddiPATHSbaPayload), "l4" } ,
- { SMT_P3210,AC_GR, MOFFAS(fddiPATHSbaOverhead), "l4" } ,
- /* fddiPATHConfiguration */
- { SMT_P3212,AC_G, 0, "" } ,
- { SMT_P3213,AC_GR, MOFFAS(fddiPATHT_Rmode), "lT" } ,
- { SMT_P3214,AC_GR, MOFFAS(fddiPATHSbaAvailable), "lL" } ,
- { SMT_P3215,AC_GR, MOFFAS(fddiPATHTVXLowerBound), "lT" } ,
- { SMT_P3216,AC_GR, MOFFAS(fddiPATHT_MaxLowerBound),"lT" } ,
- { SMT_P3217,AC_GR, MOFFAS(fddiPATHMaxT_Req), "lT" } ,
- /* Port Attributes */
- /* ConfigGrp */
- { SMT_P400A,AC_GROUP } ,
- { SMT_P400C,AC_G, MOFFPS(fddiPORTMy_Type), "E" } ,
- { SMT_P400D,AC_G, MOFFPS(fddiPORTNeighborType), "E" } ,
- { SMT_P400E,AC_GR, MOFFPS(fddiPORTConnectionPolicies),"bB" } ,
- { SMT_P400F,AC_G, MOFFPS(fddiPORTMacIndicated), "2" } ,
- { SMT_P4010,AC_G, MOFFPS(fddiPORTCurrentPath), "E" } ,
- { SMT_P4011,AC_GR, MOFFPS(fddiPORTRequestedPaths), "l4" } ,
- { SMT_P4012,AC_G, MOFFPS(fddiPORTMACPlacement), "S" } ,
- { SMT_P4013,AC_G, MOFFPS(fddiPORTAvailablePaths), "B" } ,
- { SMT_P4016,AC_G, MOFFPS(fddiPORTPMDClass), "E" } ,
- { SMT_P4017,AC_G, MOFFPS(fddiPORTConnectionCapabilities), "B"} ,
- { SMT_P401D,AC_G, MOFFPS(fddiPORTIndex), "R" } ,
- /* OperationGrp */
- { SMT_P401E,AC_GROUP } ,
- { SMT_P401F,AC_GR, MOFFPS(fddiPORTMaint_LS), "wE" } ,
- { SMT_P4021,AC_G, MOFFPS(fddiPORTBS_Flag), "F" } ,
- { SMT_P4022,AC_G, MOFFPS(fddiPORTPC_LS), "E" } ,
- /* ErrorCtrsGrp */
- { SMT_P4028,AC_GROUP } ,
- { SMT_P4029,AC_G, MOFFPS(fddiPORTEBError_Ct), "C" } ,
- { SMT_P402A,AC_G, MOFFPS(fddiPORTLCTFail_Ct), "C" } ,
- /* LerGrp */
- { SMT_P4032,AC_GROUP } ,
- { SMT_P4033,AC_G, MOFFPS(fddiPORTLer_Estimate), "F" } ,
- { SMT_P4034,AC_G, MOFFPS(fddiPORTLem_Reject_Ct), "C" } ,
- { SMT_P4035,AC_G, MOFFPS(fddiPORTLem_Ct), "C" } ,
- { SMT_P403A,AC_GR, MOFFPS(fddiPORTLer_Cutoff), "bB" } ,
- { SMT_P403B,AC_GR, MOFFPS(fddiPORTLer_Alarm), "bB" } ,
- /* StatusGrp */
- { SMT_P403C,AC_GROUP } ,
- { SMT_P403D,AC_G, MOFFPS(fddiPORTConnectState), "E" } ,
- { SMT_P403E,AC_G, MOFFPS(fddiPORTPCMStateX), "E" } ,
- { SMT_P403F,AC_G, MOFFPS(fddiPORTPC_Withhold), "E" } ,
- { SMT_P4040,AC_G, MOFFPS(fddiPORTLerFlag), "F" } ,
- { SMT_P4041,AC_G, MOFFPS(fddiPORTHardwarePresent),"F" } ,
- { SMT_P4046,AC_S, 0, "wS" } ,
- { 0, AC_GROUP } ,
- { 0 }
- } ;
- void smt_pmf_received_pack(struct s_smc *smc, SMbuf *mb, int local)
- {
- struct smt_header *sm ;
- SMbuf *reply ;
- sm = smtod(mb,struct smt_header *) ;
- DB_SMT("SMT: processing PMF frame at %x len %d\n",sm,mb->sm_len) ;
- #ifdef DEBUG
- dump_smt(smc,sm,"PMF Received") ;
- #endif
- /*
- * Start the watchdog: It may be a long, long packet and
- * maybe the watchdog occurs ...
- */
- smt_start_watchdog(smc) ;
- if (sm->smt_class == SMT_PMF_GET ||
- sm->smt_class == SMT_PMF_SET) {
- reply = smt_build_pmf_response(smc,sm,
- sm->smt_class == SMT_PMF_SET,local) ;
- if (reply) {
- sm = smtod(reply,struct smt_header *) ;
- #ifdef DEBUG
- dump_smt(smc,sm,"PMF Reply") ;
- #endif
- smt_send_frame(smc,reply,FC_SMT_INFO,local) ;
- }
- }
- }
- static SMbuf *smt_build_pmf_response(struct s_smc *smc, struct smt_header *req,
- int set, int local)
- {
- SMbuf *mb ;
- struct smt_header *smt ;
- struct smt_para *pa ;
- struct smt_p_reason *res ;
- const struct s_p_tab *pt ;
- int len ;
- int index ;
- int idx_end ;
- int error ;
- int range ;
- SK_LOC_DECL(struct s_pcon,pcon) ;
- SK_LOC_DECL(struct s_pcon,set_pcon) ;
- /*
- * build SMT header
- */
- if (!(mb = smt_get_mbuf(smc)))
- return mb;
- smt = smtod(mb, struct smt_header *) ;
- smt->smt_dest = req->smt_source ; /* DA == source of request */
- smt->smt_class = req->smt_class ; /* same class (GET/SET) */
- smt->smt_type = SMT_REPLY ;
- smt->smt_version = SMT_VID_2 ;
- smt->smt_tid = req->smt_tid ; /* same TID */
- smt->smt_pad = 0 ;
- smt->smt_len = 0 ;
- /*
- * setup parameter status
- */
- pcon.pc_len = SMT_MAX_INFO_LEN ; /* max para length */
- pcon.pc_err = 0 ; /* no error */
- pcon.pc_badset = 0 ; /* no bad set count */
- pcon.pc_p = (void *) (smt + 1) ; /* paras start here */
- /*
- * check authoriziation and set count
- */
- error = 0 ;
- if (set) {
- if (!local && smt_authorize(smc,req))
- error = SMT_RDF_AUTHOR ;
- else if (smt_check_set_count(smc,req))
- pcon.pc_badset = SMT_RDF_BADSET ;
- }
- /*
- * add reason code and all mandatory parameters
- */
- res = (struct smt_p_reason *) pcon.pc_p ;
- smt_add_para(smc,&pcon,(u_short) SMT_P_REASON,0,0) ;
- smt_add_para(smc,&pcon,(u_short) SMT_P1033,0,0) ;
- /* update 1035 and 1036 later if set */
- set_pcon = pcon ;
- smt_add_para(smc,&pcon,(u_short) SMT_P1035,0,0) ;
- smt_add_para(smc,&pcon,(u_short) SMT_P1036,0,0) ;
- pcon.pc_err = error ;
- len = req->smt_len ;
- pa = (struct smt_para *) (req + 1) ;
- /*
- * process list of paras
- */
- while (!pcon.pc_err && len > 0 ) {
- if (((u_short)len < pa->p_len + PARA_LEN) || (pa->p_len & 3)) {
- pcon.pc_err = SMT_RDF_LENGTH ;
- break ;
- }
- if (((range = (pa->p_type & 0xf000)) == 0x2000) ||
- range == 0x3000 || range == 0x4000) {
- /*
- * get index for PART,MAC ad PATH group
- */
- index = *((u_char *)pa + PARA_LEN + 3) ;/* index */
- idx_end = index ;
- if (!set && (pa->p_len != 4)) {
- pcon.pc_err = SMT_RDF_LENGTH ;
- break ;
- }
- if (!index && !set) {
- switch (range) {
- case 0x2000 :
- index = INDEX_MAC ;
- idx_end = index - 1 + NUMMACS ;
- break ;
- case 0x3000 :
- index = INDEX_PATH ;
- idx_end = index - 1 + NUMPATHS ;
- break ;
- case 0x4000 :
- index = INDEX_PORT ;
- idx_end = index - 1 + NUMPHYS ;
- #ifndef CONCENTRATOR
- if (smc->s.sas == SMT_SAS)
- idx_end = INDEX_PORT ;
- #endif
- break ;
- }
- }
- }
- else {
- /*
- * smt group has no index
- */
- if (!set && (pa->p_len != 0)) {
- pcon.pc_err = SMT_RDF_LENGTH ;
- break ;
- }
- index = 0 ;
- idx_end = 0 ;
- }
- while (index <= idx_end) {
- /*
- * if group
- * add all paras of group
- */
- pt = smt_get_ptab(pa->p_type) ;
- if (pt && pt->p_access == AC_GROUP && !set) {
- pt++ ;
- while (pt->p_access == AC_G ||
- pt->p_access == AC_GR) {
- smt_add_para(smc,&pcon,pt->p_num,
- index,local);
- pt++ ;
- }
- }
- /*
- * ignore
- * AUTHORIZATION in get/set
- * SET COUNT in set
- */
- else if (pa->p_type != SMT_P_AUTHOR &&
- (!set || (pa->p_type != SMT_P1035))) {
- int st ;
- if (pcon.pc_badset) {
- smt_add_para(smc,&pcon,pa->p_type,
- index,local) ;
- }
- else if (set) {
- st = smt_set_para(smc,pa,index,local,1);
- /*
- * return para even if error
- */
- smt_add_para(smc,&pcon,pa->p_type,
- index,local) ;
- pcon.pc_err = st ;
- }
- else {
- if (pt && pt->p_access == AC_S) {
- pcon.pc_err =
- SMT_RDF_ILLEGAL ;
- }
- smt_add_para(smc,&pcon,pa->p_type,
- index,local) ;
- }
- }
- if (pcon.pc_err)
- break ;
- index++ ;
- }
- len -= pa->p_len + PARA_LEN ;
- pa = (struct smt_para *) ((char *)pa + pa->p_len + PARA_LEN) ;
- }
- smt->smt_len = SMT_MAX_INFO_LEN - pcon.pc_len ;
- mb->sm_len = smt->smt_len + sizeof(struct smt_header) ;
- /* update reason code */
- res->rdf_reason = pcon.pc_badset ? pcon.pc_badset :
- pcon.pc_err ? pcon.pc_err : SMT_RDF_SUCCESS ;
- if (set && (res->rdf_reason == SMT_RDF_SUCCESS)) {
- /*
- * increment set count
- * set time stamp
- * store station id of last set
- */
- smc->mib.fddiSMTSetCount.count++ ;
- smt_set_timestamp(smc,smc->mib.fddiSMTSetCount.timestamp) ;
- smc->mib.fddiSMTLastSetStationId = req->smt_sid ;
- smt_add_para(smc,&set_pcon,(u_short) SMT_P1035,0,0) ;
- smt_add_para(smc,&set_pcon,(u_short) SMT_P1036,0,0) ;
- }
- return mb;
- }
- static int smt_authorize(struct s_smc *smc, struct smt_header *sm)
- {
- struct smt_para *pa ;
- int i ;
- char *p ;
- /*
- * check source station id if not zero
- */
- p = (char *) &smc->mib.fddiPRPMFStation ;
- for (i = 0 ; i < 8 && !p[i] ; i++)
- ;
- if (i != 8) {
- if (memcmp((char *) &sm->smt_sid,
- (char *) &smc->mib.fddiPRPMFStation,8))
- return 1;
- }
- /*
- * check authoriziation parameter if passwd not zero
- */
- p = (char *) smc->mib.fddiPRPMFPasswd ;
- for (i = 0 ; i < 8 && !p[i] ; i++)
- ;
- if (i != 8) {
- pa = (struct smt_para *) sm_to_para(smc,sm,SMT_P_AUTHOR) ;
- if (!pa)
- return 1;
- if (pa->p_len != 8)
- return 1;
- if (memcmp((char *)(pa+1),(char *)smc->mib.fddiPRPMFPasswd,8))
- return 1;
- }
- return 0;
- }
- static int smt_check_set_count(struct s_smc *smc, struct smt_header *sm)
- {
- struct smt_para *pa ;
- struct smt_p_setcount *sc ;
- pa = (struct smt_para *) sm_to_para(smc,sm,SMT_P1035) ;
- if (pa) {
- sc = (struct smt_p_setcount *) pa ;
- if ((smc->mib.fddiSMTSetCount.count != sc->count) ||
- memcmp((char *) smc->mib.fddiSMTSetCount.timestamp,
- (char *)sc->timestamp,8))
- return 1;
- }
- return 0;
- }
- void smt_add_para(struct s_smc *smc, struct s_pcon *pcon, u_short para,
- int index, int local)
- {
- struct smt_para *pa ;
- const struct s_p_tab *pt ;
- struct fddi_mib_m *mib_m = NULL;
- struct fddi_mib_p *mib_p = NULL;
- int len ;
- int plen ;
- char *from ;
- char *to ;
- const char *swap ;
- char c ;
- int range ;
- char *mib_addr ;
- int mac ;
- int path ;
- int port ;
- int sp_len ;
- /*
- * skip if error
- */
- if (pcon->pc_err)
- return ;
- /*
- * actions don't have a value
- */
- pt = smt_get_ptab(para) ;
- if (pt && pt->p_access == AC_S)
- return ;
- to = (char *) (pcon->pc_p) ; /* destination pointer */
- len = pcon->pc_len ; /* free space */
- plen = len ; /* remember start length */
- pa = (struct smt_para *) to ; /* type/length pointer */
- to += PARA_LEN ; /* skip smt_para */
- len -= PARA_LEN ;
- /*
- * set index if required
- */
- if (((range = (para & 0xf000)) == 0x2000) ||
- range == 0x3000 || range == 0x4000) {
- if (len < 4)
- goto wrong_error ;
- to[0] = 0 ;
- to[1] = 0 ;
- to[2] = 0 ;
- to[3] = index ;
- len -= 4 ;
- to += 4 ;
- }
- mac = index - INDEX_MAC ;
- path = index - INDEX_PATH ;
- port = index - INDEX_PORT ;
- /*
- * get pointer to mib
- */
- switch (range) {
- case 0x1000 :
- default :
- mib_addr = (char *) (&smc->mib) ;
- break ;
- case 0x2000 :
- if (mac < 0 || mac >= NUMMACS) {
- pcon->pc_err = SMT_RDF_NOPARAM ;
- return ;
- }
- mib_addr = (char *) (&smc->mib.m[mac]) ;
- mib_m = (struct fddi_mib_m *) mib_addr ;
- break ;
- case 0x3000 :
- if (path < 0 || path >= NUMPATHS) {
- pcon->pc_err = SMT_RDF_NOPARAM ;
- return ;
- }
- mib_addr = (char *) (&smc->mib.a[path]) ;
- break ;
- case 0x4000 :
- if (port < 0 || port >= smt_mib_phys(smc)) {
- pcon->pc_err = SMT_RDF_NOPARAM ;
- return ;
- }
- mib_addr = (char *) (&smc->mib.p[port_to_mib(smc,port)]) ;
- mib_p = (struct fddi_mib_p *) mib_addr ;
- break ;
- }
- /*
- * check special paras
- */
- swap = NULL;
- switch (para) {
- case SMT_P10F0 :
- case SMT_P10F1 :
- #ifdef ESS
- case SMT_P10F2 :
- case SMT_P10F3 :
- case SMT_P10F4 :
- case SMT_P10F5 :
- case SMT_P10F6 :
- case SMT_P10F7 :
- #endif
- #ifdef SBA
- case SMT_P10F8 :
- case SMT_P10F9 :
- #endif
- case SMT_P20F1 :
- if (!local) {
- pcon->pc_err = SMT_RDF_NOPARAM ;
- return ;
- }
- break ;
- case SMT_P2034 :
- case SMT_P2046 :
- case SMT_P2047 :
- case SMT_P204A :
- case SMT_P2051 :
- case SMT_P2052 :
- mac_update_counter(smc) ;
- break ;
- case SMT_P4022:
- mib_p->fddiPORTPC_LS = LS2MIB(
- sm_pm_get_ls(smc,port_to_mib(smc,port))) ;
- break ;
- case SMT_P_REASON :
- * (u_long *) to = 0 ;
- sp_len = 4 ;
- goto sp_done ;
- case SMT_P1033 : /* time stamp */
- smt_set_timestamp(smc,smc->mib.fddiSMTTimeStamp) ;
- break ;
- case SMT_P1020: /* port indexes */
- #if NUMPHYS == 12
- swap = "IIIIIIIIIIII" ;
- #else
- #if NUMPHYS == 2
- if (smc->s.sas == SMT_SAS)
- swap = "I" ;
- else
- swap = "II" ;
- #else
- #if NUMPHYS == 24
- swap = "IIIIIIIIIIIIIIIIIIIIIIII" ;
- #else
- ????
- #endif
- #endif
- #endif
- break ;
- case SMT_P3212 :
- {
- sp_len = cem_build_path(smc,to,path) ;
- goto sp_done ;
- }
- case SMT_P1048 : /* peer wrap condition */
- {
- struct smt_p_1048 *sp ;
- sp = (struct smt_p_1048 *) to ;
- sp->p1048_flag = smc->mib.fddiSMTPeerWrapFlag ;
- sp->p1048_cf_state = smc->mib.fddiSMTCF_State ;
- sp_len = sizeof(struct smt_p_1048) ;
- goto sp_done ;
- }
- case SMT_P208C :
- {
- struct smt_p_208c *sp ;
- sp = (struct smt_p_208c *) to ;
- sp->p208c_flag =
- smc->mib.m[MAC0].fddiMACDuplicateAddressCond ;
- sp->p208c_dupcondition =
- (mib_m->fddiMACDA_Flag ? SMT_ST_MY_DUPA : 0) |
- (mib_m->fddiMACUNDA_Flag ? SMT_ST_UNA_DUPA : 0);
- sp->p208c_fddilong =
- mib_m->fddiMACSMTAddress ;
- sp->p208c_fddiunalong =
- mib_m->fddiMACUpstreamNbr ;
- sp->p208c_pad = 0 ;
- sp_len = sizeof(struct smt_p_208c) ;
- goto sp_done ;
- }
- case SMT_P208D : /* frame error condition */
- {
- struct smt_p_208d *sp ;
- sp = (struct smt_p_208d *) to ;
- sp->p208d_flag =
- mib_m->fddiMACFrameErrorFlag ;
- sp->p208d_frame_ct =
- mib_m->fddiMACFrame_Ct ;
- sp->p208d_error_ct =
- mib_m->fddiMACError_Ct ;
- sp->p208d_lost_ct =
- mib_m->fddiMACLost_Ct ;
- sp->p208d_ratio =
- mib_m->fddiMACFrameErrorRatio ;
- sp_len = sizeof(struct smt_p_208d) ;
- goto sp_done ;
- }
- case SMT_P208E : /* not copied condition */
- {
- struct smt_p_208e *sp ;
- sp = (struct smt_p_208e *) to ;
- sp->p208e_flag =
- mib_m->fddiMACNotCopiedFlag ;
- sp->p208e_not_copied =
- mib_m->fddiMACNotCopied_Ct ;
- sp->p208e_copied =
- mib_m->fddiMACCopied_Ct ;
- sp->p208e_not_copied_ratio =
- mib_m->fddiMACNotCopiedRatio ;
- sp_len = sizeof(struct smt_p_208e) ;
- goto sp_done ;
- }
- case SMT_P208F : /* neighbor change event */
- {
- struct smt_p_208f *sp ;
- sp = (struct smt_p_208f *) to ;
- sp->p208f_multiple =
- mib_m->fddiMACMultiple_N ;
- sp->p208f_nacondition =
- mib_m->fddiMACDuplicateAddressCond ;
- sp->p208f_old_una =
- mib_m->fddiMACOldUpstreamNbr ;
- sp->p208f_new_una =
- mib_m->fddiMACUpstreamNbr ;
- sp->p208f_old_dna =
- mib_m->fddiMACOldDownstreamNbr ;
- sp->p208f_new_dna =
- mib_m->fddiMACDownstreamNbr ;
- sp->p208f_curren_path =
- mib_m->fddiMACCurrentPath ;
- sp->p208f_smt_address =
- mib_m->fddiMACSMTAddress ;
- sp_len = sizeof(struct smt_p_208f) ;
- goto sp_done ;
- }
- case SMT_P2090 :
- {
- struct smt_p_2090 *sp ;
- sp = (struct smt_p_2090 *) to ;
- sp->p2090_multiple =
- mib_m->fddiMACMultiple_P ;
- sp->p2090_availablepaths =
- mib_m->fddiMACAvailablePaths ;
- sp->p2090_currentpath =
- mib_m->fddiMACCurrentPath ;
- sp->p2090_requestedpaths =
- mib_m->fddiMACRequestedPaths ;
- sp_len = sizeof(struct smt_p_2090) ;
- goto sp_done ;
- }
- case SMT_P4050 :
- {
- struct smt_p_4050 *sp ;
- sp = (struct smt_p_4050 *) to ;
- sp->p4050_flag =
- mib_p->fddiPORTLerFlag ;
- sp->p4050_pad = 0 ;
- sp->p4050_cutoff =
- mib_p->fddiPORTLer_Cutoff ;
- sp->p4050_alarm =
- mib_p->fddiPORTLer_Alarm ;
- sp->p4050_estimate =
- mib_p->fddiPORTLer_Estimate ;
- sp->p4050_reject_ct =
- mib_p->fddiPORTLem_Reject_Ct ;
- sp->p4050_ct =
- mib_p->fddiPORTLem_Ct ;
- sp_len = sizeof(struct smt_p_4050) ;
- goto sp_done ;
- }
- case SMT_P4051 :
- {
- struct smt_p_4051 *sp ;
- sp = (struct smt_p_4051 *) to ;
- sp->p4051_multiple =
- mib_p->fddiPORTMultiple_U ;
- sp->p4051_porttype =
- mib_p->fddiPORTMy_Type ;
- sp->p4051_connectstate =
- mib_p->fddiPORTConnectState ;
- sp->p4051_pc_neighbor =
- mib_p->fddiPORTNeighborType ;
- sp->p4051_pc_withhold =
- mib_p->fddiPORTPC_Withhold ;
- sp_len = sizeof(struct smt_p_4051) ;
- goto sp_done ;
- }
- case SMT_P4052 :
- {
- struct smt_p_4052 *sp ;
- sp = (struct smt_p_4052 *) to ;
- sp->p4052_flag =
- mib_p->fddiPORTEB_Condition ;
- sp->p4052_eberrorcount =
- mib_p->fddiPORTEBError_Ct ;
- sp_len = sizeof(struct smt_p_4052) ;
- goto sp_done ;
- }
- case SMT_P4053 :
- {
- struct smt_p_4053 *sp ;
- sp = (struct smt_p_4053 *) to ;
- sp->p4053_multiple =
- mib_p->fddiPORTMultiple_P ;
- sp->p4053_availablepaths =
- mib_p->fddiPORTAvailablePaths ;
- sp->p4053_currentpath =
- mib_p->fddiPORTCurrentPath ;
- memcpy( (char *) &sp->p4053_requestedpaths,
- (char *) mib_p->fddiPORTRequestedPaths,4) ;
- sp->p4053_mytype =
- mib_p->fddiPORTMy_Type ;
- sp->p4053_neighbortype =
- mib_p->fddiPORTNeighborType ;
- sp_len = sizeof(struct smt_p_4053) ;
- goto sp_done ;
- }
- default :
- break ;
- }
- /*
- * in table ?
- */
- if (!pt) {
- pcon->pc_err = (para & 0xff00) ? SMT_RDF_NOPARAM :
- SMT_RDF_ILLEGAL ;
- return ;
- }
- /*
- * check access rights
- */
- switch (pt->p_access) {
- case AC_G :
- case AC_GR :
- break ;
- default :
- pcon->pc_err = SMT_RDF_ILLEGAL ;
- return ;
- }
- from = mib_addr + pt->p_offset ;
- if (!swap)
- swap = pt->p_swap ; /* pointer to swap string */
- /*
- * copy values
- */
- while ((c = *swap++)) {
- switch(c) {
- case 'b' :
- case 'w' :
- case 'l' :
- break ;
- case 'S' :
- case 'E' :
- case 'R' :
- case 'r' :
- if (len < 4)
- goto len_error ;
- to[0] = 0 ;
- to[1] = 0 ;
- #ifdef LITTLE_ENDIAN
- if (c == 'r') {
- to[2] = *from++ ;
- to[3] = *from++ ;
- }
- else {
- to[3] = *from++ ;
- to[2] = *from++ ;
- }
- #else
- to[2] = *from++ ;
- to[3] = *from++ ;
- #endif
- to += 4 ;
- len -= 4 ;
- break ;
- case 'I' : /* for SET of port indexes */
- if (len < 2)
- goto len_error ;
- #ifdef LITTLE_ENDIAN
- to[1] = *from++ ;
- to[0] = *from++ ;
- #else
- to[0] = *from++ ;
- to[1] = *from++ ;
- #endif
- to += 2 ;
- len -= 2 ;
- break ;
- case 'F' :
- case 'B' :
- if (len < 4)
- goto len_error ;
- len -= 4 ;
- to[0] = 0 ;
- to[1] = 0 ;
- to[2] = 0 ;
- to[3] = *from++ ;
- to += 4 ;
- break ;
- case 'C' :
- case 'T' :
- case 'L' :
- if (len < 4)
- goto len_error ;
- #ifdef LITTLE_ENDIAN
- to[3] = *from++ ;
- to[2] = *from++ ;
- to[1] = *from++ ;
- to[0] = *from++ ;
- #else
- to[0] = *from++ ;
- to[1] = *from++ ;
- to[2] = *from++ ;
- to[3] = *from++ ;
- #endif
- len -= 4 ;
- to += 4 ;
- break ;
- case '2' : /* PortMacIndicated */
- if (len < 4)
- goto len_error ;
- to[0] = 0 ;
- to[1] = 0 ;
- to[2] = *from++ ;
- to[3] = *from++ ;
- len -= 4 ;
- to += 4 ;
- break ;
- case '4' :
- if (len < 4)
- goto len_error ;
- to[0] = *from++ ;
- to[1] = *from++ ;
- to[2] = *from++ ;
- to[3] = *from++ ;
- len -= 4 ;
- to += 4 ;
- break ;
- case 'A' :
- if (len < 8)
- goto len_error ;
- to[0] = 0 ;
- to[1] = 0 ;
- memcpy((char *) to+2,(char *) from,6) ;
- to += 8 ;
- from += 8 ;
- len -= 8 ;
- break ;
- case '8' :
- if (len < 8)
- goto len_error ;
- memcpy((char *) to,(char *) from,8) ;
- to += 8 ;
- from += 8 ;
- len -= 8 ;
- break ;
- case 'D' :
- if (len < 32)
- goto len_error ;
- memcpy((char *) to,(char *) from,32) ;
- to += 32 ;
- from += 32 ;
- len -= 32 ;
- break ;
- case 'P' : /* timestamp is NOT swapped */
- if (len < 8)
- goto len_error ;
- to[0] = *from++ ;
- to[1] = *from++ ;
- to[2] = *from++ ;
- to[3] = *from++ ;
- to[4] = *from++ ;
- to[5] = *from++ ;
- to[6] = *from++ ;
- to[7] = *from++ ;
- to += 8 ;
- len -= 8 ;
- break ;
- default :
- SMT_PANIC(smc,SMT_E0119, SMT_E0119_MSG) ;
- break ;
- }
- }
- done:
- /*
- * make it even (in case of 'I' encoding)
- * note: len is DECREMENTED
- */
- if (len & 3) {
- to[0] = 0 ;
- to[1] = 0 ;
- to += 4 - (len & 3 ) ;
- len = len & ~ 3 ;
- }
- /* set type and length */
- pa->p_type = para ;
- pa->p_len = plen - len - PARA_LEN ;
- /* return values */
- pcon->pc_p = (void *) to ;
- pcon->pc_len = len ;
- return ;
- sp_done:
- len -= sp_len ;
- to += sp_len ;
- goto done ;
- len_error:
- /* parameter does not fit in frame */
- pcon->pc_err = SMT_RDF_TOOLONG ;
- return ;
- wrong_error:
- pcon->pc_err = SMT_RDF_LENGTH ;
- }
- /*
- * set parameter
- */
- static int smt_set_para(struct s_smc *smc, struct smt_para *pa, int index,
- int local, int set)
- {
- #define IFSET(x) if (set) (x)
- const struct s_p_tab *pt ;
- int len ;
- char *from ;
- char *to ;
- const char *swap ;
- char c ;
- char *mib_addr ;
- struct fddi_mib *mib ;
- struct fddi_mib_m *mib_m = NULL;
- struct fddi_mib_a *mib_a = NULL;
- struct fddi_mib_p *mib_p = NULL;
- int mac ;
- int path ;
- int port ;
- SK_LOC_DECL(u_char,byte_val) ;
- SK_LOC_DECL(u_short,word_val) ;
- SK_LOC_DECL(u_long,long_val) ;
- mac = index - INDEX_MAC ;
- path = index - INDEX_PATH ;
- port = index - INDEX_PORT ;
- len = pa->p_len ;
- from = (char *) (pa + 1 ) ;
- mib = &smc->mib ;
- switch (pa->p_type & 0xf000) {
- case 0x1000 :
- default :
- mib_addr = (char *) mib ;
- break ;
- case 0x2000 :
- if (mac < 0 || mac >= NUMMACS) {
- return SMT_RDF_NOPARAM;
- }
- mib_m = &smc->mib.m[mac] ;
- mib_addr = (char *) mib_m ;
- from += 4 ; /* skip index */
- len -= 4 ;
- break ;
- case 0x3000 :
- if (path < 0 || path >= NUMPATHS) {
- return SMT_RDF_NOPARAM;
- }
- mib_a = &smc->mib.a[path] ;
- mib_addr = (char *) mib_a ;
- from += 4 ; /* skip index */
- len -= 4 ;
- break ;
- case 0x4000 :
- if (port < 0 || port >= smt_mib_phys(smc)) {
- return SMT_RDF_NOPARAM;
- }
- mib_p = &smc->mib.p[port_to_mib(smc,port)] ;
- mib_addr = (char *) mib_p ;
- from += 4 ; /* skip index */
- len -= 4 ;
- break ;
- }
- switch (pa->p_type) {
- case SMT_P10F0 :
- case SMT_P10F1 :
- #ifdef ESS
- case SMT_P10F2 :
- case SMT_P10F3 :
- case SMT_P10F4 :
- case SMT_P10F5 :
- case SMT_P10F6 :
- case SMT_P10F7 :
- #endif
- #ifdef SBA
- case SMT_P10F8 :
- case SMT_P10F9 :
- #endif
- case SMT_P20F1 :
- if (!local)
- return SMT_RDF_NOPARAM;
- break ;
- }
- pt = smt_get_ptab(pa->p_type) ;
- if (!pt)
- return (pa->p_type & 0xff00) ? SMT_RDF_NOPARAM :
- SMT_RDF_ILLEGAL;
- switch (pt->p_access) {
- case AC_GR :
- case AC_S :
- break ;
- default :
- return SMT_RDF_ILLEGAL;
- }
- to = mib_addr + pt->p_offset ;
- swap = pt->p_swap ; /* pointer to swap string */
- while (swap && (c = *swap++)) {
- switch(c) {
- case 'b' :
- to = (char *) &byte_val ;
- break ;
- case 'w' :
- to = (char *) &word_val ;
- break ;
- case 'l' :
- to = (char *) &long_val ;
- break ;
- case 'S' :
- case 'E' :
- case 'R' :
- case 'r' :
- if (len < 4) {
- goto len_error ;
- }
- if (from[0] | from[1])
- goto val_error ;
- #ifdef LITTLE_ENDIAN
- if (c == 'r') {
- to[0] = from[2] ;
- to[1] = from[3] ;
- }
- else {
- to[1] = from[2] ;
- to[0] = from[3] ;
- }
- #else
- to[0] = from[2] ;
- to[1] = from[3] ;
- #endif
- from += 4 ;
- to += 2 ;
- len -= 4 ;
- break ;
- case 'F' :
- case 'B' :
- if (len < 4) {
- goto len_error ;
- }
- if (from[0] | from[1] | from[2])
- goto val_error ;
- to[0] = from[3] ;
- len -= 4 ;
- from += 4 ;
- to += 4 ;
- break ;
- case 'C' :
- case 'T' :
- case 'L' :
- if (len < 4) {
- goto len_error ;
- }
- #ifdef LITTLE_ENDIAN
- to[3] = *from++ ;
- to[2] = *from++ ;
- to[1] = *from++ ;
- to[0] = *from++ ;
- #else
- to[0] = *from++ ;
- to[1] = *from++ ;
- to[2] = *from++ ;
- to[3] = *from++ ;
- #endif
- len -= 4 ;
- to += 4 ;
- break ;
- case 'A' :
- if (len < 8)
- goto len_error ;
- if (set)
- memcpy((char *) to,(char *) from+2,6) ;
- to += 8 ;
- from += 8 ;
- len -= 8 ;
- break ;
- case '4' :
- if (len < 4)
- goto len_error ;
- if (set)
- memcpy((char *) to,(char *) from,4) ;
- to += 4 ;
- from += 4 ;
- len -= 4 ;
- break ;
- case '8' :
- if (len < 8)
- goto len_error ;
- if (set)
- memcpy((char *) to,(char *) from,8) ;
- to += 8 ;
- from += 8 ;
- len -= 8 ;
- break ;
- case 'D' :
- if (len < 32)
- goto len_error ;
- if (set)
- memcpy((char *) to,(char *) from,32) ;
- to += 32 ;
- from += 32 ;
- len -= 32 ;
- break ;
- case 'P' : /* timestamp is NOT swapped */
- if (set) {
- to[0] = *from++ ;
- to[1] = *from++ ;
- to[2] = *from++ ;
- to[3] = *from++ ;
- to[4] = *from++ ;
- to[5] = *from++ ;
- to[6] = *from++ ;
- to[7] = *from++ ;
- }
- to += 8 ;
- len -= 8 ;
- break ;
- default :
- SMT_PANIC(smc,SMT_E0120, SMT_E0120_MSG) ;
- return SMT_RDF_ILLEGAL;
- }
- }
- /*
- * actions and internal updates
- */
- switch (pa->p_type) {
- case SMT_P101A: /* fddiSMTConfigPolicy */
- if (word_val & ~1)
- goto val_error ;
- IFSET(mib->fddiSMTConfigPolicy = word_val) ;
- break ;
- case SMT_P101B : /* fddiSMTConnectionPolicy */
- if (!(word_val & POLICY_MM))
- goto val_error ;
- IFSET(mib->fddiSMTConnectionPolicy = word_val) ;
- break ;
- case SMT_P101D : /* fddiSMTTT_Notify */
- if (word_val < 2 || word_val > 30)
- goto val_error ;
- IFSET(mib->fddiSMTTT_Notify = word_val) ;
- break ;
- case SMT_P101E : /* fddiSMTStatRptPolicy */
- if (byte_val & ~1)
- goto val_error ;
- IFSET(mib->fddiSMTStatRptPolicy = byte_val) ;
- break ;
- case SMT_P101F : /* fddiSMTTrace_MaxExpiration */
- /*
- * note: lower limit trace_max = 6.001773... s
- * NO upper limit
- */
- if (long_val < (long)0x478bf51L)
- goto val_error ;
- IFSET(mib->fddiSMTTrace_MaxExpiration = long_val) ;
- break ;
- #ifdef ESS
- case SMT_P10F2 : /* fddiESSPayload */
- if (long_val > 1562)
- goto val_error ;
- if (set && smc->mib.fddiESSPayload != long_val) {
- smc->ess.raf_act_timer_poll = TRUE ;
- smc->mib.fddiESSPayload = long_val ;
- }
- break ;
- case SMT_P10F3 : /* fddiESSOverhead */
- if (long_val < 50 || long_val > 5000)
- goto val_error ;
- if (set && smc->mib.fddiESSPayload &&
- smc->mib.fddiESSOverhead != long_val) {
- smc->ess.raf_act_timer_poll = TRUE ;
- smc->mib.fddiESSOverhead = long_val ;
- }
- break ;
- case SMT_P10F4 : /* fddiESSMaxTNeg */
- if (long_val > -MS2BCLK(5) || long_val < -MS2BCLK(165))
- goto val_error ;
- IFSET(mib->fddiESSMaxTNeg = long_val) ;
- break ;
- case SMT_P10F5 : /* fddiESSMinSegmentSize */
- if (long_val < 1 || long_val > 4478)
- goto val_error ;
- IFSET(mib->fddiESSMinSegmentSize = long_val) ;
- break ;
- case SMT_P10F6 : /* fddiESSCategory */
- if ((long_val & 0xffff) != 1)
- goto val_error ;
- IFSET(mib->fddiESSCategory = long_val) ;
- break ;
- case SMT_P10F7 : /* fddiESSSyncTxMode */
- if (word_val > 1)
- goto val_error ;
- IFSET(mib->fddiESSSynchTxMode = word_val) ;
- break ;
- #endif
- #ifdef SBA
- case SMT_P10F8 : /* fddiSBACommand */
- if (byte_val != SB_STOP && byte_val != SB_START)
- goto val_error ;
- IFSET(mib->fddiSBACommand = byte_val) ;
- break ;
- case SMT_P10F9 : /* fddiSBAAvailable */
- if (byte_val > 100)
- goto val_error ;
- IFSET(mib->fddiSBAAvailable = byte_val) ;
- break ;
- #endif
- case SMT_P2020 : /* fddiMACRequestedPaths */
- if ((word_val & (MIB_P_PATH_PRIM_PREFER |
- MIB_P_PATH_PRIM_ALTER)) == 0 )
- goto val_error ;
- IFSET(mib_m->fddiMACRequestedPaths = word_val) ;
- break ;
- case SMT_P205F : /* fddiMACFrameErrorThreshold */
- /* 0 .. ffff acceptable */
- IFSET(mib_m->fddiMACFrameErrorThreshold = word_val) ;
- break ;
- case SMT_P2067 : /* fddiMACNotCopiedThreshold */
- /* 0 .. ffff acceptable */
- IFSET(mib_m->fddiMACNotCopiedThreshold = word_val) ;
- break ;
- case SMT_P2076: /* fddiMACMA_UnitdataEnable */
- if (byte_val & ~1)
- goto val_error ;
- if (set) {
- mib_m->fddiMACMA_UnitdataEnable = byte_val ;
- queue_event(smc,EVENT_RMT,RM_ENABLE_FLAG) ;
- }
- break ;
- case SMT_P20F1 : /* fddiMACT_Min */
- IFSET(mib_m->fddiMACT_Min = long_val) ;
- break ;
- case SMT_P320F :
- if (long_val > 1562)
- goto val_error ;
- IFSET(mib_a->fddiPATHSbaPayload = long_val) ;
- #ifdef ESS
- if (set)
- ess_para_change(smc) ;
- #endif
- break ;
- case SMT_P3210 :
- if (long_val > 5000)
- goto val_error ;
-
- if (long_val != 0 && mib_a->fddiPATHSbaPayload == 0)
- goto val_error ;
- IFSET(mib_a->fddiPATHSbaOverhead = long_val) ;
- #ifdef ESS
- if (set)
- ess_para_change(smc) ;
- #endif
- break ;
- case SMT_P3213: /* fddiPATHT_Rmode */
- /* no limit :
- * 0 .. 343.597 => 0 .. 2e32 * 80nS
- */
- if (set) {
- mib_a->fddiPATHT_Rmode = long_val ;
- rtm_set_timer(smc) ;
- }
- break ;
- case SMT_P3214 : /* fddiPATHSbaAvailable */
- if (long_val > 0x00BEBC20L)
- goto val_error ;
- #ifdef SBA
- if (set && mib->fddiSBACommand == SB_STOP)
- goto val_error ;
- #endif
- IFSET(mib_a->fddiPATHSbaAvailable = long_val) ;
- break ;
- case SMT_P3215 : /* fddiPATHTVXLowerBound */
- IFSET(mib_a->fddiPATHTVXLowerBound = long_val) ;
- goto change_mac_para ;
- case SMT_P3216 : /* fddiPATHT_MaxLowerBound */
- IFSET(mib_a->fddiPATHT_MaxLowerBound = long_val) ;
- goto change_mac_para ;
- case SMT_P3217 : /* fddiPATHMaxT_Req */
- IFSET(mib_a->fddiPATHMaxT_Req = long_val) ;
- change_mac_para:
- if (set && smt_set_mac_opvalues(smc)) {
- RS_SET(smc,RS_EVENT) ;
- smc->sm.please_reconnect = 1 ;
- queue_event(smc,EVENT_ECM,EC_DISCONNECT) ;
- }
- break ;
- case SMT_P400E : /* fddiPORTConnectionPolicies */
- if (byte_val > 1)
- goto val_error ;
- IFSET(mib_p->fddiPORTConnectionPolicies = byte_val) ;
- break ;
- case SMT_P4011 : /* fddiPORTRequestedPaths */
- /* all 3*8 bits allowed */
- IFSET(memcpy((char *)mib_p->fddiPORTRequestedPaths,
- (char *)&long_val,4)) ;
- break ;
- case SMT_P401F: /* fddiPORTMaint_LS */
- if (word_val > 4)
- goto val_error ;
- IFSET(mib_p->fddiPORTMaint_LS = word_val) ;
- break ;
- case SMT_P403A : /* fddiPORTLer_Cutoff */
- if (byte_val < 4 || byte_val > 15)
- goto val_error ;
- IFSET(mib_p->fddiPORTLer_Cutoff = byte_val) ;
- break ;
- case SMT_P403B : /* fddiPORTLer_Alarm */
- if (byte_val < 4 || byte_val > 15)
- goto val_error ;
- IFSET(mib_p->fddiPORTLer_Alarm = byte_val) ;
- break ;
- /*
- * Actions
- */
- case SMT_P103C : /* fddiSMTStationAction */
- if (smt_action(smc,SMT_STATION_ACTION, (int) word_val, 0))
- goto val_error ;
- break ;
- case SMT_P4046: /* fddiPORTAction */
- if (smt_action(smc,SMT_PORT_ACTION, (int) word_val,
- port_to_mib(smc,port)))
- goto val_error ;
- break ;
- default :
- break ;
- }
- return 0;
- val_error:
- /* parameter value in frame is out of range */
- return SMT_RDF_RANGE;
- len_error:
- /* parameter value in frame is too short */
- return SMT_RDF_LENGTH;
- #if 0
- no_author_error:
- /* parameter not setable, because the SBA is not active
- * Please note: we give the return code 'not authorizeed
- * because SBA denied is not a valid return code in the
- * PMF protocol.
- */
- return SMT_RDF_AUTHOR;
- #endif
- }
- static const struct s_p_tab *smt_get_ptab(u_short para)
- {
- const struct s_p_tab *pt ;
- for (pt = p_tab ; pt->p_num && pt->p_num != para ; pt++)
- ;
- return pt->p_num ? pt : NULL;
- }
- static int smt_mib_phys(struct s_smc *smc)
- {
- #ifdef CONCENTRATOR
- SK_UNUSED(smc) ;
- return NUMPHYS;
- #else
- if (smc->s.sas == SMT_SAS)
- return 1;
- return NUMPHYS;
- #endif
- }
- static int port_to_mib(struct s_smc *smc, int p)
- {
- #ifdef CONCENTRATOR
- SK_UNUSED(smc) ;
- return p;
- #else
- if (smc->s.sas == SMT_SAS)
- return PS;
- return p;
- #endif
- }
- #ifdef DEBUG
- #ifndef BOOT
- void dump_smt(struct s_smc *smc, struct smt_header *sm, char *text)
- {
- int len ;
- struct smt_para *pa ;
- char *c ;
- int n ;
- int nn ;
- #ifdef LITTLE_ENDIAN
- int smtlen ;
- #endif
- SK_UNUSED(smc) ;
- #ifdef DEBUG_BRD
- if (smc->debug.d_smtf < 2)
- #else
- if (debug.d_smtf < 2)
- #endif
- return ;
- #ifdef LITTLE_ENDIAN
- smtlen = sm->smt_len + sizeof(struct smt_header) ;
- #endif
- printf("SMT Frame [%s]:\nDA ",text) ;
- dump_hex((char *) &sm->smt_dest,6) ;
- printf("\tSA ") ;
- dump_hex((char *) &sm->smt_source,6) ;
- printf(" Class %x Type %x Version %x\n",
- sm->smt_class,sm->smt_type,sm->smt_version) ;
- printf("TID %lx\t\tSID ",sm->smt_tid) ;
- dump_hex((char *) &sm->smt_sid,8) ;
- printf(" LEN %x\n",sm->smt_len) ;
- len = sm->smt_len ;
- pa = (struct smt_para *) (sm + 1) ;
- while (len > 0 ) {
- int plen ;
- #ifdef UNIX
- printf("TYPE %x LEN %x VALUE\t",pa->p_type,pa->p_len) ;
- #else
- printf("TYPE %04x LEN %2x VALUE\t",pa->p_type,pa->p_len) ;
- #endif
- n = pa->p_len ;
- if ( (n < 0 ) || (n > (int)(len - PARA_LEN))) {
- n = len - PARA_LEN ;
- printf(" BAD LENGTH\n") ;
- break ;
- }
- #ifdef LITTLE_ENDIAN
- smt_swap_para(sm,smtlen,0) ;
- #endif
- if (n < 24) {
- dump_hex((char *)(pa+1),(int) n) ;
- printf("\n") ;
- }
- else {
- int first = 0 ;
- c = (char *)(pa+1) ;
- dump_hex(c,16) ;
- printf("\n") ;
- n -= 16 ;
- c += 16 ;
- while (n > 0) {
- nn = (n > 16) ? 16 : n ;
- if (n > 64) {
- if (first == 0)
- printf("\t\t\t...\n") ;
- first = 1 ;
- }
- else {
- printf("\t\t\t") ;
- dump_hex(c,nn) ;
- printf("\n") ;
- }
- n -= nn ;
- c += 16 ;
- }
- }
- #ifdef LITTLE_ENDIAN
- smt_swap_para(sm,smtlen,1) ;
- #endif
- plen = (pa->p_len + PARA_LEN + 3) & ~3 ;
- len -= plen ;
- pa = (struct smt_para *)((char *)pa + plen) ;
- }
- printf("-------------------------------------------------\n\n") ;
- }
- void dump_hex(char *p, int len)
- {
- int n = 0 ;
- while (len--) {
- n++ ;
- #ifdef UNIX
- printf("%x%s",*p++ & 0xff,len ? ( (n & 7) ? " " : "-") : "") ;
- #else
- printf("%02x%s",*p++ & 0xff,len ? ( (n & 7) ? " " : "-") : "") ;
- #endif
- }
- }
- #endif /* no BOOT */
- #endif /* DEBUG */
- #endif /* no SLIM_SMT */
|