1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047 |
- /******************************************************************************
- *
- * (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.
- *
- ******************************************************************************/
- #include "h/types.h"
- #include "h/fddi.h"
- #include "h/smc.h"
- #include "h/smt_p.h"
- #include <linux/bitrev.h>
- #include <linux/kernel.h>
- #define KERNEL
- #include "h/smtstate.h"
- #ifndef lint
- static const char ID_sccs[] = "@(#)smt.c 2.43 98/11/23 (C) SK " ;
- #endif
- /*
- * FC in SMbuf
- */
- #define m_fc(mb) ((mb)->sm_data[0])
- #define SMT_TID_MAGIC 0x1f0a7b3c
- #ifdef DEBUG
- static const char *const smt_type_name[] = {
- "SMT_00??", "SMT_INFO", "SMT_02??", "SMT_03??",
- "SMT_04??", "SMT_05??", "SMT_06??", "SMT_07??",
- "SMT_08??", "SMT_09??", "SMT_0A??", "SMT_0B??",
- "SMT_0C??", "SMT_0D??", "SMT_0E??", "SMT_NSA"
- } ;
- static const char *const smt_class_name[] = {
- "UNKNOWN","NIF","SIF_CONFIG","SIF_OPER","ECF","RAF","RDF",
- "SRF","PMF_GET","PMF_SET","ESF"
- } ;
- #endif
- #define LAST_CLASS (SMT_PMF_SET)
- static const struct fddi_addr SMT_Unknown = {
- { 0,0,0x1f,0,0,0 }
- } ;
- /*
- * function prototypes
- */
- #ifdef LITTLE_ENDIAN
- static int smt_swap_short(u_short s);
- #endif
- static int mac_index(struct s_smc *smc, int mac);
- static int phy_index(struct s_smc *smc, int phy);
- static int mac_con_resource_index(struct s_smc *smc, int mac);
- static int phy_con_resource_index(struct s_smc *smc, int phy);
- static void smt_send_rdf(struct s_smc *smc, SMbuf *rej, int fc, int reason,
- int local);
- static void smt_send_nif(struct s_smc *smc, const struct fddi_addr *dest,
- int fc, u_long tid, int type, int local);
- static void smt_send_ecf(struct s_smc *smc, struct fddi_addr *dest, int fc,
- u_long tid, int type, int len);
- static void smt_echo_test(struct s_smc *smc, int dna);
- static void smt_send_sif_config(struct s_smc *smc, struct fddi_addr *dest,
- u_long tid, int local);
- static void smt_send_sif_operation(struct s_smc *smc, struct fddi_addr *dest,
- u_long tid, int local);
- #ifdef LITTLE_ENDIAN
- static void smt_string_swap(char *data, const char *format, int len);
- #endif
- static void smt_add_frame_len(SMbuf *mb, int len);
- static void smt_fill_una(struct s_smc *smc, struct smt_p_una *una);
- static void smt_fill_sde(struct s_smc *smc, struct smt_p_sde *sde);
- static void smt_fill_state(struct s_smc *smc, struct smt_p_state *state);
- static void smt_fill_timestamp(struct s_smc *smc, struct smt_p_timestamp *ts);
- static void smt_fill_policy(struct s_smc *smc, struct smt_p_policy *policy);
- static void smt_fill_latency(struct s_smc *smc, struct smt_p_latency *latency);
- static void smt_fill_neighbor(struct s_smc *smc, struct smt_p_neighbor *neighbor);
- static int smt_fill_path(struct s_smc *smc, struct smt_p_path *path);
- static void smt_fill_mac_status(struct s_smc *smc, struct smt_p_mac_status *st);
- static void smt_fill_lem(struct s_smc *smc, struct smt_p_lem *lem, int phy);
- static void smt_fill_version(struct s_smc *smc, struct smt_p_version *vers);
- static void smt_fill_fsc(struct s_smc *smc, struct smt_p_fsc *fsc);
- static void smt_fill_mac_counter(struct s_smc *smc, struct smt_p_mac_counter *mc);
- static void smt_fill_mac_fnc(struct s_smc *smc, struct smt_p_mac_fnc *fnc);
- static void smt_fill_manufacturer(struct s_smc *smc,
- struct smp_p_manufacturer *man);
- static void smt_fill_user(struct s_smc *smc, struct smp_p_user *user);
- static void smt_fill_setcount(struct s_smc *smc, struct smt_p_setcount *setcount);
- static void smt_fill_echo(struct s_smc *smc, struct smt_p_echo *echo, u_long seed,
- int len);
- static void smt_clear_una_dna(struct s_smc *smc);
- static void smt_clear_old_una_dna(struct s_smc *smc);
- #ifdef CONCENTRATOR
- static int entity_to_index(void);
- #endif
- static void update_dac(struct s_smc *smc, int report);
- static int div_ratio(u_long upper, u_long lower);
- #ifdef USE_CAN_ADDR
- static void hwm_conv_can(struct s_smc *smc, char *data, int len);
- #else
- #define hwm_conv_can(smc,data,len)
- #endif
- static inline int is_my_addr(const struct s_smc *smc,
- const struct fddi_addr *addr)
- {
- return(*(short *)(&addr->a[0]) ==
- *(short *)(&smc->mib.m[MAC0].fddiMACSMTAddress.a[0])
- && *(short *)(&addr->a[2]) ==
- *(short *)(&smc->mib.m[MAC0].fddiMACSMTAddress.a[2])
- && *(short *)(&addr->a[4]) ==
- *(short *)(&smc->mib.m[MAC0].fddiMACSMTAddress.a[4])) ;
- }
- static inline int is_broadcast(const struct fddi_addr *addr)
- {
- return *(u_short *)(&addr->a[0]) == 0xffff &&
- *(u_short *)(&addr->a[2]) == 0xffff &&
- *(u_short *)(&addr->a[4]) == 0xffff;
- }
- static inline int is_individual(const struct fddi_addr *addr)
- {
- return !(addr->a[0] & GROUP_ADDR);
- }
- static inline int is_equal(const struct fddi_addr *addr1,
- const struct fddi_addr *addr2)
- {
- return *(u_short *)(&addr1->a[0]) == *(u_short *)(&addr2->a[0]) &&
- *(u_short *)(&addr1->a[2]) == *(u_short *)(&addr2->a[2]) &&
- *(u_short *)(&addr1->a[4]) == *(u_short *)(&addr2->a[4]);
- }
- /*
- * list of mandatory paras in frames
- */
- static const u_short plist_nif[] = { SMT_P_UNA,SMT_P_SDE,SMT_P_STATE,0 } ;
- /*
- * init SMT agent
- */
- void smt_agent_init(struct s_smc *smc)
- {
- int i ;
- /*
- * get MAC address
- */
- smc->mib.m[MAC0].fddiMACSMTAddress = smc->hw.fddi_home_addr ;
- /*
- * get OUI address from driver (bia == built-in-address)
- */
- smc->mib.fddiSMTStationId.sid_oem[0] = 0 ;
- smc->mib.fddiSMTStationId.sid_oem[1] = 0 ;
- driver_get_bia(smc,&smc->mib.fddiSMTStationId.sid_node) ;
- for (i = 0 ; i < 6 ; i ++) {
- smc->mib.fddiSMTStationId.sid_node.a[i] =
- bitrev8(smc->mib.fddiSMTStationId.sid_node.a[i]);
- }
- smc->mib.fddiSMTManufacturerData[0] =
- smc->mib.fddiSMTStationId.sid_node.a[0] ;
- smc->mib.fddiSMTManufacturerData[1] =
- smc->mib.fddiSMTStationId.sid_node.a[1] ;
- smc->mib.fddiSMTManufacturerData[2] =
- smc->mib.fddiSMTStationId.sid_node.a[2] ;
- smc->sm.smt_tid = 0 ;
- smc->mib.m[MAC0].fddiMACDupAddressTest = DA_NONE ;
- smc->mib.m[MAC0].fddiMACUNDA_Flag = FALSE ;
- #ifndef SLIM_SMT
- smt_clear_una_dna(smc) ;
- smt_clear_old_una_dna(smc) ;
- #endif
- for (i = 0 ; i < SMT_MAX_TEST ; i++)
- smc->sm.pend[i] = 0 ;
- smc->sm.please_reconnect = 0 ;
- smc->sm.uniq_ticks = 0 ;
- }
- /*
- * SMT task
- * forever
- * delay 30 seconds
- * send NIF
- * check tvu & tvd
- * end
- */
- void smt_agent_task(struct s_smc *smc)
- {
- smt_timer_start(smc,&smc->sm.smt_timer, (u_long)1000000L,
- EV_TOKEN(EVENT_SMT,SM_TIMER)) ;
- DB_SMT("SMT agent task\n",0,0) ;
- }
- #ifndef SMT_REAL_TOKEN_CT
- void smt_emulate_token_ct(struct s_smc *smc, int mac_index)
- {
- u_long count;
- u_long time;
- time = smt_get_time();
- count = ((time - smc->sm.last_tok_time[mac_index]) *
- 100)/TICKS_PER_SECOND;
- /*
- * Only when ring is up we will have a token count. The
- * flag is unfortunately a single instance value. This
- * doesn't matter now, because we currently have only
- * one MAC instance.
- */
- if (smc->hw.mac_ring_is_up){
- smc->mib.m[mac_index].fddiMACToken_Ct += count;
- }
- /* Remember current time */
- smc->sm.last_tok_time[mac_index] = time;
- }
- #endif
- /*ARGSUSED1*/
- void smt_event(struct s_smc *smc, int event)
- {
- u_long time ;
- #ifndef SMT_REAL_TOKEN_CT
- int i ;
- #endif
- if (smc->sm.please_reconnect) {
- smc->sm.please_reconnect -- ;
- if (smc->sm.please_reconnect == 0) {
- /* Counted down */
- queue_event(smc,EVENT_ECM,EC_CONNECT) ;
- }
- }
- if (event == SM_FAST)
- return ;
- /*
- * timer for periodic cleanup in driver
- * reset and start the watchdog (FM2)
- * ESS timer
- * SBA timer
- */
- smt_timer_poll(smc) ;
- smt_start_watchdog(smc) ;
- #ifndef SLIM_SMT
- #ifndef BOOT
- #ifdef ESS
- ess_timer_poll(smc) ;
- #endif
- #endif
- #ifdef SBA
- sba_timer_poll(smc) ;
- #endif
- smt_srf_event(smc,0,0,0) ;
- #endif /* no SLIM_SMT */
- time = smt_get_time() ;
- if (time - smc->sm.smt_last_lem >= TICKS_PER_SECOND*8) {
- /*
- * Use 8 sec. for the time intervall, it simplifies the
- * LER estimation.
- */
- struct fddi_mib_m *mib ;
- u_long upper ;
- u_long lower ;
- int cond ;
- int port;
- struct s_phy *phy ;
- /*
- * calculate LEM bit error rate
- */
- sm_lem_evaluate(smc) ;
- smc->sm.smt_last_lem = time ;
- /*
- * check conditions
- */
- #ifndef SLIM_SMT
- mac_update_counter(smc) ;
- mib = smc->mib.m ;
- upper =
- (mib->fddiMACLost_Ct - mib->fddiMACOld_Lost_Ct) +
- (mib->fddiMACError_Ct - mib->fddiMACOld_Error_Ct) ;
- lower =
- (mib->fddiMACFrame_Ct - mib->fddiMACOld_Frame_Ct) +
- (mib->fddiMACLost_Ct - mib->fddiMACOld_Lost_Ct) ;
- mib->fddiMACFrameErrorRatio = div_ratio(upper,lower) ;
- cond =
- ((!mib->fddiMACFrameErrorThreshold &&
- mib->fddiMACError_Ct != mib->fddiMACOld_Error_Ct) ||
- (mib->fddiMACFrameErrorRatio >
- mib->fddiMACFrameErrorThreshold)) ;
- if (cond != mib->fddiMACFrameErrorFlag)
- smt_srf_event(smc,SMT_COND_MAC_FRAME_ERROR,
- INDEX_MAC,cond) ;
- upper =
- (mib->fddiMACNotCopied_Ct - mib->fddiMACOld_NotCopied_Ct) ;
- lower =
- upper +
- (mib->fddiMACCopied_Ct - mib->fddiMACOld_Copied_Ct) ;
- mib->fddiMACNotCopiedRatio = div_ratio(upper,lower) ;
- cond =
- ((!mib->fddiMACNotCopiedThreshold &&
- mib->fddiMACNotCopied_Ct !=
- mib->fddiMACOld_NotCopied_Ct)||
- (mib->fddiMACNotCopiedRatio >
- mib->fddiMACNotCopiedThreshold)) ;
- if (cond != mib->fddiMACNotCopiedFlag)
- smt_srf_event(smc,SMT_COND_MAC_NOT_COPIED,
- INDEX_MAC,cond) ;
- /*
- * set old values
- */
- mib->fddiMACOld_Frame_Ct = mib->fddiMACFrame_Ct ;
- mib->fddiMACOld_Copied_Ct = mib->fddiMACCopied_Ct ;
- mib->fddiMACOld_Error_Ct = mib->fddiMACError_Ct ;
- mib->fddiMACOld_Lost_Ct = mib->fddiMACLost_Ct ;
- mib->fddiMACOld_NotCopied_Ct = mib->fddiMACNotCopied_Ct ;
- /*
- * Check port EBError Condition
- */
- for (port = 0; port < NUMPHYS; port ++) {
- phy = &smc->y[port] ;
- if (!phy->mib->fddiPORTHardwarePresent) {
- continue;
- }
- cond = (phy->mib->fddiPORTEBError_Ct -
- phy->mib->fddiPORTOldEBError_Ct > 5) ;
- /* If ratio is more than 5 in 8 seconds
- * Set the condition.
- */
- smt_srf_event(smc,SMT_COND_PORT_EB_ERROR,
- (int) (INDEX_PORT+ phy->np) ,cond) ;
- /*
- * set old values
- */
- phy->mib->fddiPORTOldEBError_Ct =
- phy->mib->fddiPORTEBError_Ct ;
- }
- #endif /* no SLIM_SMT */
- }
- #ifndef SLIM_SMT
- if (time - smc->sm.smt_last_notify >= (u_long)
- (smc->mib.fddiSMTTT_Notify * TICKS_PER_SECOND) ) {
- /*
- * we can either send an announcement or a request
- * a request will trigger a reply so that we can update
- * our dna
- * note: same tid must be used until reply is received
- */
- if (!smc->sm.pend[SMT_TID_NIF])
- smc->sm.pend[SMT_TID_NIF] = smt_get_tid(smc) ;
- smt_send_nif(smc,&fddi_broadcast, FC_SMT_NSA,
- smc->sm.pend[SMT_TID_NIF], SMT_REQUEST,0) ;
- smc->sm.smt_last_notify = time ;
- }
- /*
- * check timer
- */
- if (smc->sm.smt_tvu &&
- time - smc->sm.smt_tvu > 228*TICKS_PER_SECOND) {
- DB_SMT("SMT : UNA expired\n",0,0) ;
- smc->sm.smt_tvu = 0 ;
- if (!is_equal(&smc->mib.m[MAC0].fddiMACUpstreamNbr,
- &SMT_Unknown)){
- /* Do not update unknown address */
- smc->mib.m[MAC0].fddiMACOldUpstreamNbr=
- smc->mib.m[MAC0].fddiMACUpstreamNbr ;
- }
- smc->mib.m[MAC0].fddiMACUpstreamNbr = SMT_Unknown ;
- smc->mib.m[MAC0].fddiMACUNDA_Flag = FALSE ;
- /*
- * Make sure the fddiMACUNDA_Flag = FALSE is
- * included in the SRF so we don't generate
- * a separate SRF for the deassertion of this
- * condition
- */
- update_dac(smc,0) ;
- smt_srf_event(smc, SMT_EVENT_MAC_NEIGHBOR_CHANGE,
- INDEX_MAC,0) ;
- }
- if (smc->sm.smt_tvd &&
- time - smc->sm.smt_tvd > 228*TICKS_PER_SECOND) {
- DB_SMT("SMT : DNA expired\n",0,0) ;
- smc->sm.smt_tvd = 0 ;
- if (!is_equal(&smc->mib.m[MAC0].fddiMACDownstreamNbr,
- &SMT_Unknown)){
- /* Do not update unknown address */
- smc->mib.m[MAC0].fddiMACOldDownstreamNbr=
- smc->mib.m[MAC0].fddiMACDownstreamNbr ;
- }
- smc->mib.m[MAC0].fddiMACDownstreamNbr = SMT_Unknown ;
- smt_srf_event(smc, SMT_EVENT_MAC_NEIGHBOR_CHANGE,
- INDEX_MAC,0) ;
- }
- #endif /* no SLIM_SMT */
- #ifndef SMT_REAL_TOKEN_CT
- /*
- * Token counter emulation section. If hardware supports the token
- * count, the token counter will be updated in mac_update_counter.
- */
- for (i = MAC0; i < NUMMACS; i++ ){
- if (time - smc->sm.last_tok_time[i] > 2*TICKS_PER_SECOND ){
- smt_emulate_token_ct( smc, i );
- }
- }
- #endif
- smt_timer_start(smc,&smc->sm.smt_timer, (u_long)1000000L,
- EV_TOKEN(EVENT_SMT,SM_TIMER)) ;
- }
- static int div_ratio(u_long upper, u_long lower)
- {
- if ((upper<<16L) < upper)
- upper = 0xffff0000L ;
- else
- upper <<= 16L ;
- if (!lower)
- return 0;
- return (int)(upper/lower) ;
- }
- #ifndef SLIM_SMT
- /*
- * receive packet handler
- */
- void smt_received_pack(struct s_smc *smc, SMbuf *mb, int fs)
- /* int fs; frame status */
- {
- struct smt_header *sm ;
- int local ;
- int illegal = 0 ;
- switch (m_fc(mb)) {
- case FC_SMT_INFO :
- case FC_SMT_LAN_LOC :
- case FC_SMT_LOC :
- case FC_SMT_NSA :
- break ;
- default :
- smt_free_mbuf(smc,mb) ;
- return ;
- }
- smc->mib.m[MAC0].fddiMACSMTCopied_Ct++ ;
- sm = smtod(mb,struct smt_header *) ;
- local = ((fs & L_INDICATOR) != 0) ;
- hwm_conv_can(smc,(char *)sm,12) ;
- /* check destination address */
- if (is_individual(&sm->smt_dest) && !is_my_addr(smc,&sm->smt_dest)) {
- smt_free_mbuf(smc,mb) ;
- return ;
- }
- #if 0 /* for DUP recognition, do NOT filter them */
- /* ignore loop back packets */
- if (is_my_addr(smc,&sm->smt_source) && !local) {
- smt_free_mbuf(smc,mb) ;
- return ;
- }
- #endif
- smt_swap_para(sm,(int) mb->sm_len,1) ;
- DB_SMT("SMT : received packet [%s] at 0x%x\n",
- smt_type_name[m_fc(mb) & 0xf],sm) ;
- DB_SMT("SMT : version %d, class %s\n",sm->smt_version,
- smt_class_name[(sm->smt_class>LAST_CLASS)?0 : sm->smt_class]) ;
- #ifdef SBA
- /*
- * check if NSA frame
- */
- if (m_fc(mb) == FC_SMT_NSA && sm->smt_class == SMT_NIF &&
- (sm->smt_type == SMT_ANNOUNCE || sm->smt_type == SMT_REQUEST)) {
- smc->sba.sm = sm ;
- sba(smc,NIF) ;
- }
- #endif
- /*
- * ignore any packet with NSA and A-indicator set
- */
- if ( (fs & A_INDICATOR) && m_fc(mb) == FC_SMT_NSA) {
- DB_SMT("SMT : ignoring NSA with A-indicator set from %s\n",
- addr_to_string(&sm->smt_source),0) ;
- smt_free_mbuf(smc,mb) ;
- return ;
- }
- /*
- * ignore frames with illegal length
- */
- if (((sm->smt_class == SMT_ECF) && (sm->smt_len > SMT_MAX_ECHO_LEN)) ||
- ((sm->smt_class != SMT_ECF) && (sm->smt_len > SMT_MAX_INFO_LEN))) {
- smt_free_mbuf(smc,mb) ;
- return ;
- }
- /*
- * check SMT version
- */
- switch (sm->smt_class) {
- case SMT_NIF :
- case SMT_SIF_CONFIG :
- case SMT_SIF_OPER :
- case SMT_ECF :
- if (sm->smt_version != SMT_VID)
- illegal = 1;
- break ;
- default :
- if (sm->smt_version != SMT_VID_2)
- illegal = 1;
- break ;
- }
- if (illegal) {
- DB_SMT("SMT : version = %d, dest = %s\n",
- sm->smt_version,addr_to_string(&sm->smt_source)) ;
- smt_send_rdf(smc,mb,m_fc(mb),SMT_RDF_VERSION,local) ;
- smt_free_mbuf(smc,mb) ;
- return ;
- }
- if ((sm->smt_len > mb->sm_len - sizeof(struct smt_header)) ||
- ((sm->smt_len & 3) && (sm->smt_class != SMT_ECF))) {
- DB_SMT("SMT: info length error, len = %d\n",sm->smt_len,0) ;
- smt_send_rdf(smc,mb,m_fc(mb),SMT_RDF_LENGTH,local) ;
- smt_free_mbuf(smc,mb) ;
- return ;
- }
- switch (sm->smt_class) {
- case SMT_NIF :
- if (smt_check_para(smc,sm,plist_nif)) {
- DB_SMT("SMT: NIF with para problem, ignoring\n",0,0) ;
- break ;
- }
- switch (sm->smt_type) {
- case SMT_ANNOUNCE :
- case SMT_REQUEST :
- if (!(fs & C_INDICATOR) && m_fc(mb) == FC_SMT_NSA
- && is_broadcast(&sm->smt_dest)) {
- struct smt_p_state *st ;
- /* set my UNA */
- if (!is_equal(
- &smc->mib.m[MAC0].fddiMACUpstreamNbr,
- &sm->smt_source)) {
- DB_SMT("SMT : updated my UNA = %s\n",
- addr_to_string(&sm->smt_source),0) ;
- if (!is_equal(&smc->mib.m[MAC0].
- fddiMACUpstreamNbr,&SMT_Unknown)){
- /* Do not update unknown address */
- smc->mib.m[MAC0].fddiMACOldUpstreamNbr=
- smc->mib.m[MAC0].fddiMACUpstreamNbr ;
- }
- smc->mib.m[MAC0].fddiMACUpstreamNbr =
- sm->smt_source ;
- smt_srf_event(smc,
- SMT_EVENT_MAC_NEIGHBOR_CHANGE,
- INDEX_MAC,0) ;
- smt_echo_test(smc,0) ;
- }
- smc->sm.smt_tvu = smt_get_time() ;
- st = (struct smt_p_state *)
- sm_to_para(smc,sm,SMT_P_STATE) ;
- if (st) {
- smc->mib.m[MAC0].fddiMACUNDA_Flag =
- (st->st_dupl_addr & SMT_ST_MY_DUPA) ?
- TRUE : FALSE ;
- update_dac(smc,1) ;
- }
- }
- if ((sm->smt_type == SMT_REQUEST) &&
- is_individual(&sm->smt_source) &&
- ((!(fs & A_INDICATOR) && m_fc(mb) == FC_SMT_NSA) ||
- (m_fc(mb) != FC_SMT_NSA))) {
- DB_SMT("SMT : replying to NIF request %s\n",
- addr_to_string(&sm->smt_source),0) ;
- smt_send_nif(smc,&sm->smt_source,
- FC_SMT_INFO,
- sm->smt_tid,
- SMT_REPLY,local) ;
- }
- break ;
- case SMT_REPLY :
- DB_SMT("SMT : received NIF response from %s\n",
- addr_to_string(&sm->smt_source),0) ;
- if (fs & A_INDICATOR) {
- smc->sm.pend[SMT_TID_NIF] = 0 ;
- DB_SMT("SMT : duplicate address\n",0,0) ;
- smc->mib.m[MAC0].fddiMACDupAddressTest =
- DA_FAILED ;
- smc->r.dup_addr_test = DA_FAILED ;
- queue_event(smc,EVENT_RMT,RM_DUP_ADDR) ;
- smc->mib.m[MAC0].fddiMACDA_Flag = TRUE ;
- update_dac(smc,1) ;
- break ;
- }
- if (sm->smt_tid == smc->sm.pend[SMT_TID_NIF]) {
- smc->sm.pend[SMT_TID_NIF] = 0 ;
- /* set my DNA */
- if (!is_equal(
- &smc->mib.m[MAC0].fddiMACDownstreamNbr,
- &sm->smt_source)) {
- DB_SMT("SMT : updated my DNA\n",0,0) ;
- if (!is_equal(&smc->mib.m[MAC0].
- fddiMACDownstreamNbr, &SMT_Unknown)){
- /* Do not update unknown address */
- smc->mib.m[MAC0].fddiMACOldDownstreamNbr =
- smc->mib.m[MAC0].fddiMACDownstreamNbr ;
- }
- smc->mib.m[MAC0].fddiMACDownstreamNbr =
- sm->smt_source ;
- smt_srf_event(smc,
- SMT_EVENT_MAC_NEIGHBOR_CHANGE,
- INDEX_MAC,0) ;
- smt_echo_test(smc,1) ;
- }
- smc->mib.m[MAC0].fddiMACDA_Flag = FALSE ;
- update_dac(smc,1) ;
- smc->sm.smt_tvd = smt_get_time() ;
- smc->mib.m[MAC0].fddiMACDupAddressTest =
- DA_PASSED ;
- if (smc->r.dup_addr_test != DA_PASSED) {
- smc->r.dup_addr_test = DA_PASSED ;
- queue_event(smc,EVENT_RMT,RM_DUP_ADDR) ;
- }
- }
- else if (sm->smt_tid ==
- smc->sm.pend[SMT_TID_NIF_TEST]) {
- DB_SMT("SMT : NIF test TID ok\n",0,0) ;
- }
- else {
- DB_SMT("SMT : expected TID %lx, got %lx\n",
- smc->sm.pend[SMT_TID_NIF],sm->smt_tid) ;
- }
- break ;
- default :
- illegal = 2 ;
- break ;
- }
- break ;
- case SMT_SIF_CONFIG : /* station information */
- if (sm->smt_type != SMT_REQUEST)
- break ;
- DB_SMT("SMT : replying to SIF Config request from %s\n",
- addr_to_string(&sm->smt_source),0) ;
- smt_send_sif_config(smc,&sm->smt_source,sm->smt_tid,local) ;
- break ;
- case SMT_SIF_OPER : /* station information */
- if (sm->smt_type != SMT_REQUEST)
- break ;
- DB_SMT("SMT : replying to SIF Operation request from %s\n",
- addr_to_string(&sm->smt_source),0) ;
- smt_send_sif_operation(smc,&sm->smt_source,sm->smt_tid,local) ;
- break ;
- case SMT_ECF : /* echo frame */
- switch (sm->smt_type) {
- case SMT_REPLY :
- smc->mib.priv.fddiPRIVECF_Reply_Rx++ ;
- DB_SMT("SMT: received ECF reply from %s\n",
- addr_to_string(&sm->smt_source),0) ;
- if (sm_to_para(smc,sm,SMT_P_ECHODATA) == NULL) {
- DB_SMT("SMT: ECHODATA missing\n",0,0) ;
- break ;
- }
- if (sm->smt_tid == smc->sm.pend[SMT_TID_ECF]) {
- DB_SMT("SMT : ECF test TID ok\n",0,0) ;
- }
- else if (sm->smt_tid == smc->sm.pend[SMT_TID_ECF_UNA]) {
- DB_SMT("SMT : ECF test UNA ok\n",0,0) ;
- }
- else if (sm->smt_tid == smc->sm.pend[SMT_TID_ECF_DNA]) {
- DB_SMT("SMT : ECF test DNA ok\n",0,0) ;
- }
- else {
- DB_SMT("SMT : expected TID %lx, got %lx\n",
- smc->sm.pend[SMT_TID_ECF],
- sm->smt_tid) ;
- }
- break ;
- case SMT_REQUEST :
- smc->mib.priv.fddiPRIVECF_Req_Rx++ ;
- {
- if (sm->smt_len && !sm_to_para(smc,sm,SMT_P_ECHODATA)) {
- DB_SMT("SMT: ECF with para problem,sending RDF\n",0,0) ;
- smt_send_rdf(smc,mb,m_fc(mb),SMT_RDF_LENGTH,
- local) ;
- break ;
- }
- DB_SMT("SMT - sending ECF reply to %s\n",
- addr_to_string(&sm->smt_source),0) ;
- /* set destination addr. & reply */
- sm->smt_dest = sm->smt_source ;
- sm->smt_type = SMT_REPLY ;
- dump_smt(smc,sm,"ECF REPLY") ;
- smc->mib.priv.fddiPRIVECF_Reply_Tx++ ;
- smt_send_frame(smc,mb,FC_SMT_INFO,local) ;
- return ; /* DON'T free mbuf */
- }
- default :
- illegal = 1 ;
- break ;
- }
- break ;
- #ifndef BOOT
- case SMT_RAF : /* resource allocation */
- #ifdef ESS
- DB_ESSN(2,"ESS: RAF frame received\n",0,0) ;
- fs = ess_raf_received_pack(smc,mb,sm,fs) ;
- #endif
- #ifdef SBA
- DB_SBAN(2,"SBA: RAF frame received\n",0,0) ;
- sba_raf_received_pack(smc,sm,fs) ;
- #endif
- break ;
- case SMT_RDF : /* request denied */
- smc->mib.priv.fddiPRIVRDF_Rx++ ;
- break ;
- case SMT_ESF : /* extended service - not supported */
- if (sm->smt_type == SMT_REQUEST) {
- DB_SMT("SMT - received ESF, sending RDF\n",0,0) ;
- smt_send_rdf(smc,mb,m_fc(mb),SMT_RDF_CLASS,local) ;
- }
- break ;
- case SMT_PMF_GET :
- case SMT_PMF_SET :
- if (sm->smt_type != SMT_REQUEST)
- break ;
- /* update statistics */
- if (sm->smt_class == SMT_PMF_GET)
- smc->mib.priv.fddiPRIVPMF_Get_Rx++ ;
- else
- smc->mib.priv.fddiPRIVPMF_Set_Rx++ ;
- /*
- * ignore PMF SET with I/G set
- */
- if ((sm->smt_class == SMT_PMF_SET) &&
- !is_individual(&sm->smt_dest)) {
- DB_SMT("SMT: ignoring PMF-SET with I/G set\n",0,0) ;
- break ;
- }
- smt_pmf_received_pack(smc,mb, local) ;
- break ;
- case SMT_SRF :
- dump_smt(smc,sm,"SRF received") ;
- break ;
- default :
- if (sm->smt_type != SMT_REQUEST)
- break ;
- /*
- * For frames with unknown class:
- * we need to send a RDF frame according to 8.1.3.1.1,
- * only if it is a REQUEST.
- */
- DB_SMT("SMT : class = %d, send RDF to %s\n",
- sm->smt_class, addr_to_string(&sm->smt_source)) ;
- smt_send_rdf(smc,mb,m_fc(mb),SMT_RDF_CLASS,local) ;
- break ;
- #endif
- }
- if (illegal) {
- DB_SMT("SMT: discarding invalid frame, reason = %d\n",
- illegal,0) ;
- }
- smt_free_mbuf(smc,mb) ;
- }
- static void update_dac(struct s_smc *smc, int report)
- {
- int cond ;
- cond = ( smc->mib.m[MAC0].fddiMACUNDA_Flag |
- smc->mib.m[MAC0].fddiMACDA_Flag) != 0 ;
- if (report && (cond != smc->mib.m[MAC0].fddiMACDuplicateAddressCond))
- smt_srf_event(smc, SMT_COND_MAC_DUP_ADDR,INDEX_MAC,cond) ;
- else
- smc->mib.m[MAC0].fddiMACDuplicateAddressCond = cond ;
- }
- /*
- * send SMT frame
- * set source address
- * set station ID
- * send frame
- */
- void smt_send_frame(struct s_smc *smc, SMbuf *mb, int fc, int local)
- /* SMbuf *mb; buffer to send */
- /* int fc; FC value */
- {
- struct smt_header *sm ;
- if (!smc->r.sm_ma_avail && !local) {
- smt_free_mbuf(smc,mb) ;
- return ;
- }
- sm = smtod(mb,struct smt_header *) ;
- sm->smt_source = smc->mib.m[MAC0].fddiMACSMTAddress ;
- sm->smt_sid = smc->mib.fddiSMTStationId ;
- smt_swap_para(sm,(int) mb->sm_len,0) ; /* swap para & header */
- hwm_conv_can(smc,(char *)sm,12) ; /* convert SA and DA */
- smc->mib.m[MAC0].fddiMACSMTTransmit_Ct++ ;
- smt_send_mbuf(smc,mb,local ? FC_SMT_LOC : fc) ;
- }
- /*
- * generate and send RDF
- */
- static void smt_send_rdf(struct s_smc *smc, SMbuf *rej, int fc, int reason,
- int local)
- /* SMbuf *rej; mbuf of offending frame */
- /* int fc; FC of denied frame */
- /* int reason; reason code */
- {
- SMbuf *mb ;
- struct smt_header *sm ; /* header of offending frame */
- struct smt_rdf *rdf ;
- int len ;
- int frame_len ;
- sm = smtod(rej,struct smt_header *) ;
- if (sm->smt_type != SMT_REQUEST)
- return ;
- DB_SMT("SMT: sending RDF to %s,reason = 0x%x\n",
- addr_to_string(&sm->smt_source),reason) ;
- /*
- * note: get framelength from MAC length, NOT from SMT header
- * smt header length is included in sm_len
- */
- frame_len = rej->sm_len ;
- if (!(mb=smt_build_frame(smc,SMT_RDF,SMT_REPLY,sizeof(struct smt_rdf))))
- return ;
- rdf = smtod(mb,struct smt_rdf *) ;
- rdf->smt.smt_tid = sm->smt_tid ; /* use TID from sm */
- rdf->smt.smt_dest = sm->smt_source ; /* set dest = source */
- /* set P12 */
- rdf->reason.para.p_type = SMT_P_REASON ;
- rdf->reason.para.p_len = sizeof(struct smt_p_reason) - PARA_LEN ;
- rdf->reason.rdf_reason = reason ;
- /* set P14 */
- rdf->version.para.p_type = SMT_P_VERSION ;
- rdf->version.para.p_len = sizeof(struct smt_p_version) - PARA_LEN ;
- rdf->version.v_pad = 0 ;
- rdf->version.v_n = 1 ;
- rdf->version.v_index = 1 ;
- rdf->version.v_version[0] = SMT_VID_2 ;
- rdf->version.v_pad2 = 0 ;
- /* set P13 */
- if ((unsigned) frame_len <= SMT_MAX_INFO_LEN - sizeof(*rdf) +
- 2*sizeof(struct smt_header))
- len = frame_len ;
- else
- len = SMT_MAX_INFO_LEN - sizeof(*rdf) +
- 2*sizeof(struct smt_header) ;
- /* make length multiple of 4 */
- len &= ~3 ;
- rdf->refused.para.p_type = SMT_P_REFUSED ;
- /* length of para is smt_frame + ref_fc */
- rdf->refused.para.p_len = len + 4 ;
- rdf->refused.ref_fc = fc ;
- /* swap it back */
- smt_swap_para(sm,frame_len,0) ;
- memcpy((char *) &rdf->refused.ref_header,(char *) sm,len) ;
- len -= sizeof(struct smt_header) ;
- mb->sm_len += len ;
- rdf->smt.smt_len += len ;
- dump_smt(smc,(struct smt_header *)rdf,"RDF") ;
- smc->mib.priv.fddiPRIVRDF_Tx++ ;
- smt_send_frame(smc,mb,FC_SMT_INFO,local) ;
- }
- /*
- * generate and send NIF
- */
- static void smt_send_nif(struct s_smc *smc, const struct fddi_addr *dest,
- int fc, u_long tid, int type, int local)
- /* struct fddi_addr *dest; dest address */
- /* int fc; frame control */
- /* u_long tid; transaction id */
- /* int type; frame type */
- {
- struct smt_nif *nif ;
- SMbuf *mb ;
- if (!(mb = smt_build_frame(smc,SMT_NIF,type,sizeof(struct smt_nif))))
- return ;
- nif = smtod(mb, struct smt_nif *) ;
- smt_fill_una(smc,&nif->una) ; /* set UNA */
- smt_fill_sde(smc,&nif->sde) ; /* set station descriptor */
- smt_fill_state(smc,&nif->state) ; /* set state information */
- #ifdef SMT6_10
- smt_fill_fsc(smc,&nif->fsc) ; /* set frame status cap. */
- #endif
- nif->smt.smt_dest = *dest ; /* destination address */
- nif->smt.smt_tid = tid ; /* transaction ID */
- dump_smt(smc,(struct smt_header *)nif,"NIF") ;
- smt_send_frame(smc,mb,fc,local) ;
- }
- #ifdef DEBUG
- /*
- * send NIF request (test purpose)
- */
- static void smt_send_nif_request(struct s_smc *smc, struct fddi_addr *dest)
- {
- smc->sm.pend[SMT_TID_NIF_TEST] = smt_get_tid(smc) ;
- smt_send_nif(smc,dest, FC_SMT_INFO, smc->sm.pend[SMT_TID_NIF_TEST],
- SMT_REQUEST,0) ;
- }
- /*
- * send ECF request (test purpose)
- */
- static void smt_send_ecf_request(struct s_smc *smc, struct fddi_addr *dest,
- int len)
- {
- smc->sm.pend[SMT_TID_ECF] = smt_get_tid(smc) ;
- smt_send_ecf(smc,dest, FC_SMT_INFO, smc->sm.pend[SMT_TID_ECF],
- SMT_REQUEST,len) ;
- }
- #endif
- /*
- * echo test
- */
- static void smt_echo_test(struct s_smc *smc, int dna)
- {
- u_long tid ;
- smc->sm.pend[dna ? SMT_TID_ECF_DNA : SMT_TID_ECF_UNA] =
- tid = smt_get_tid(smc) ;
- smt_send_ecf(smc, dna ?
- &smc->mib.m[MAC0].fddiMACDownstreamNbr :
- &smc->mib.m[MAC0].fddiMACUpstreamNbr,
- FC_SMT_INFO,tid, SMT_REQUEST, (SMT_TEST_ECHO_LEN & ~3)-8) ;
- }
- /*
- * generate and send ECF
- */
- static void smt_send_ecf(struct s_smc *smc, struct fddi_addr *dest, int fc,
- u_long tid, int type, int len)
- /* struct fddi_addr *dest; dest address */
- /* int fc; frame control */
- /* u_long tid; transaction id */
- /* int type; frame type */
- /* int len; frame length */
- {
- struct smt_ecf *ecf ;
- SMbuf *mb ;
- if (!(mb = smt_build_frame(smc,SMT_ECF,type,SMT_ECF_LEN + len)))
- return ;
- ecf = smtod(mb, struct smt_ecf *) ;
- smt_fill_echo(smc,&ecf->ec_echo,tid,len) ; /* set ECHO */
- ecf->smt.smt_dest = *dest ; /* destination address */
- ecf->smt.smt_tid = tid ; /* transaction ID */
- smc->mib.priv.fddiPRIVECF_Req_Tx++ ;
- smt_send_frame(smc,mb,fc,0) ;
- }
- /*
- * generate and send SIF config response
- */
- static void smt_send_sif_config(struct s_smc *smc, struct fddi_addr *dest,
- u_long tid, int local)
- /* struct fddi_addr *dest; dest address */
- /* u_long tid; transaction id */
- {
- struct smt_sif_config *sif ;
- SMbuf *mb ;
- int len ;
- if (!(mb = smt_build_frame(smc,SMT_SIF_CONFIG,SMT_REPLY,
- SIZEOF_SMT_SIF_CONFIG)))
- return ;
- sif = smtod(mb, struct smt_sif_config *) ;
- smt_fill_timestamp(smc,&sif->ts) ; /* set time stamp */
- smt_fill_sde(smc,&sif->sde) ; /* set station descriptor */
- smt_fill_version(smc,&sif->version) ; /* set version information */
- smt_fill_state(smc,&sif->state) ; /* set state information */
- smt_fill_policy(smc,&sif->policy) ; /* set station policy */
- smt_fill_latency(smc,&sif->latency); /* set station latency */
- smt_fill_neighbor(smc,&sif->neighbor); /* set station neighbor */
- smt_fill_setcount(smc,&sif->setcount) ; /* set count */
- len = smt_fill_path(smc,&sif->path); /* set station path descriptor*/
- sif->smt.smt_dest = *dest ; /* destination address */
- sif->smt.smt_tid = tid ; /* transaction ID */
- smt_add_frame_len(mb,len) ; /* adjust length fields */
- dump_smt(smc,(struct smt_header *)sif,"SIF Configuration Reply") ;
- smt_send_frame(smc,mb,FC_SMT_INFO,local) ;
- }
- /*
- * generate and send SIF operation response
- */
- static void smt_send_sif_operation(struct s_smc *smc, struct fddi_addr *dest,
- u_long tid, int local)
- /* struct fddi_addr *dest; dest address */
- /* u_long tid; transaction id */
- {
- struct smt_sif_operation *sif ;
- SMbuf *mb ;
- int ports ;
- int i ;
- ports = NUMPHYS ;
- #ifndef CONCENTRATOR
- if (smc->s.sas == SMT_SAS)
- ports = 1 ;
- #endif
- if (!(mb = smt_build_frame(smc,SMT_SIF_OPER,SMT_REPLY,
- SIZEOF_SMT_SIF_OPERATION+ports*sizeof(struct smt_p_lem))))
- return ;
- sif = smtod(mb, struct smt_sif_operation *) ;
- smt_fill_timestamp(smc,&sif->ts) ; /* set time stamp */
- smt_fill_mac_status(smc,&sif->status) ; /* set mac status */
- smt_fill_mac_counter(smc,&sif->mc) ; /* set mac counter field */
- smt_fill_mac_fnc(smc,&sif->fnc) ; /* set frame not copied counter */
- smt_fill_manufacturer(smc,&sif->man) ; /* set manufacturer field */
- smt_fill_user(smc,&sif->user) ; /* set user field */
- smt_fill_setcount(smc,&sif->setcount) ; /* set count */
- /*
- * set link error mon information
- */
- if (ports == 1) {
- smt_fill_lem(smc,sif->lem,PS) ;
- }
- else {
- for (i = 0 ; i < ports ; i++) {
- smt_fill_lem(smc,&sif->lem[i],i) ;
- }
- }
- sif->smt.smt_dest = *dest ; /* destination address */
- sif->smt.smt_tid = tid ; /* transaction ID */
- dump_smt(smc,(struct smt_header *)sif,"SIF Operation Reply") ;
- smt_send_frame(smc,mb,FC_SMT_INFO,local) ;
- }
- /*
- * get and initialize SMT frame
- */
- SMbuf *smt_build_frame(struct s_smc *smc, int class, int type,
- int length)
- {
- SMbuf *mb ;
- struct smt_header *smt ;
- #if 0
- if (!smc->r.sm_ma_avail) {
- return 0;
- }
- #endif
- if (!(mb = smt_get_mbuf(smc)))
- return mb;
- mb->sm_len = length ;
- smt = smtod(mb, struct smt_header *) ;
- smt->smt_dest = fddi_broadcast ; /* set dest = broadcast */
- smt->smt_class = class ;
- smt->smt_type = type ;
- switch (class) {
- case SMT_NIF :
- case SMT_SIF_CONFIG :
- case SMT_SIF_OPER :
- case SMT_ECF :
- smt->smt_version = SMT_VID ;
- break ;
- default :
- smt->smt_version = SMT_VID_2 ;
- break ;
- }
- smt->smt_tid = smt_get_tid(smc) ; /* set transaction ID */
- smt->smt_pad = 0 ;
- smt->smt_len = length - sizeof(struct smt_header) ;
- return mb;
- }
- static void smt_add_frame_len(SMbuf *mb, int len)
- {
- struct smt_header *smt ;
- smt = smtod(mb, struct smt_header *) ;
- smt->smt_len += len ;
- mb->sm_len += len ;
- }
- /*
- * fill values in UNA parameter
- */
- static void smt_fill_una(struct s_smc *smc, struct smt_p_una *una)
- {
- SMTSETPARA(una,SMT_P_UNA) ;
- una->una_pad = 0 ;
- una->una_node = smc->mib.m[MAC0].fddiMACUpstreamNbr ;
- }
- /*
- * fill values in SDE parameter
- */
- static void smt_fill_sde(struct s_smc *smc, struct smt_p_sde *sde)
- {
- SMTSETPARA(sde,SMT_P_SDE) ;
- sde->sde_non_master = smc->mib.fddiSMTNonMaster_Ct ;
- sde->sde_master = smc->mib.fddiSMTMaster_Ct ;
- sde->sde_mac_count = NUMMACS ; /* only 1 MAC */
- #ifdef CONCENTRATOR
- sde->sde_type = SMT_SDE_CONCENTRATOR ;
- #else
- sde->sde_type = SMT_SDE_STATION ;
- #endif
- }
- /*
- * fill in values in station state parameter
- */
- static void smt_fill_state(struct s_smc *smc, struct smt_p_state *state)
- {
- int top ;
- int twist ;
- SMTSETPARA(state,SMT_P_STATE) ;
- state->st_pad = 0 ;
- /* determine topology */
- top = 0 ;
- if (smc->mib.fddiSMTPeerWrapFlag) {
- top |= SMT_ST_WRAPPED ; /* state wrapped */
- }
- #ifdef CONCENTRATOR
- if (cfm_status_unattached(smc)) {
- top |= SMT_ST_UNATTACHED ; /* unattached concentrator */
- }
- #endif
- if ((twist = pcm_status_twisted(smc)) & 1) {
- top |= SMT_ST_TWISTED_A ; /* twisted cable */
- }
- if (twist & 2) {
- top |= SMT_ST_TWISTED_B ; /* twisted cable */
- }
- #ifdef OPT_SRF
- top |= SMT_ST_SRF ;
- #endif
- if (pcm_rooted_station(smc))
- top |= SMT_ST_ROOTED_S ;
- if (smc->mib.a[0].fddiPATHSbaPayload != 0)
- top |= SMT_ST_SYNC_SERVICE ;
- state->st_topology = top ;
- state->st_dupl_addr =
- ((smc->mib.m[MAC0].fddiMACDA_Flag ? SMT_ST_MY_DUPA : 0 ) |
- (smc->mib.m[MAC0].fddiMACUNDA_Flag ? SMT_ST_UNA_DUPA : 0)) ;
- }
- /*
- * fill values in timestamp parameter
- */
- static void smt_fill_timestamp(struct s_smc *smc, struct smt_p_timestamp *ts)
- {
- SMTSETPARA(ts,SMT_P_TIMESTAMP) ;
- smt_set_timestamp(smc,ts->ts_time) ;
- }
- void smt_set_timestamp(struct s_smc *smc, u_char *p)
- {
- u_long time ;
- u_long utime ;
- /*
- * timestamp is 64 bits long ; resolution is 80 nS
- * our clock resolution is 10mS
- * 10mS/80ns = 125000 ~ 2^17 = 131072
- */
- utime = smt_get_time() ;
- time = utime * 100 ;
- time /= TICKS_PER_SECOND ;
- p[0] = 0 ;
- p[1] = (u_char)((time>>(8+8+8+8-1)) & 1) ;
- p[2] = (u_char)(time>>(8+8+8-1)) ;
- p[3] = (u_char)(time>>(8+8-1)) ;
- p[4] = (u_char)(time>>(8-1)) ;
- p[5] = (u_char)(time<<1) ;
- p[6] = (u_char)(smc->sm.uniq_ticks>>8) ;
- p[7] = (u_char)smc->sm.uniq_ticks ;
- /*
- * make sure we don't wrap: restart whenever the upper digits change
- */
- if (utime != smc->sm.uniq_time) {
- smc->sm.uniq_ticks = 0 ;
- }
- smc->sm.uniq_ticks++ ;
- smc->sm.uniq_time = utime ;
- }
- /*
- * fill values in station policy parameter
- */
- static void smt_fill_policy(struct s_smc *smc, struct smt_p_policy *policy)
- {
- int i ;
- const u_char *map ;
- u_short in ;
- u_short out ;
- /*
- * MIB para 101b (fddiSMTConnectionPolicy) coding
- * is different from 0005 coding
- */
- static const u_char ansi_weirdness[16] = {
- 0,7,5,3,8,1,6,4,9,10,2,11,12,13,14,15
- } ;
- SMTSETPARA(policy,SMT_P_POLICY) ;
- out = 0 ;
- in = smc->mib.fddiSMTConnectionPolicy ;
- for (i = 0, map = ansi_weirdness ; i < 16 ; i++) {
- if (in & 1)
- out |= (1<<*map) ;
- in >>= 1 ;
- map++ ;
- }
- policy->pl_config = smc->mib.fddiSMTConfigPolicy ;
- policy->pl_connect = out ;
- }
- /*
- * fill values in latency equivalent parameter
- */
- static void smt_fill_latency(struct s_smc *smc, struct smt_p_latency *latency)
- {
- SMTSETPARA(latency,SMT_P_LATENCY) ;
- latency->lt_phyout_idx1 = phy_index(smc,0) ;
- latency->lt_latency1 = 10 ; /* in octets (byte clock) */
- /*
- * note: latency has two phy entries by definition
- * for a SAS, the 2nd one is null
- */
- if (smc->s.sas == SMT_DAS) {
- latency->lt_phyout_idx2 = phy_index(smc,1) ;
- latency->lt_latency2 = 10 ; /* in octets (byte clock) */
- }
- else {
- latency->lt_phyout_idx2 = 0 ;
- latency->lt_latency2 = 0 ;
- }
- }
- /*
- * fill values in MAC neighbors parameter
- */
- static void smt_fill_neighbor(struct s_smc *smc, struct smt_p_neighbor *neighbor)
- {
- SMTSETPARA(neighbor,SMT_P_NEIGHBORS) ;
- neighbor->nb_mib_index = INDEX_MAC ;
- neighbor->nb_mac_index = mac_index(smc,1) ;
- neighbor->nb_una = smc->mib.m[MAC0].fddiMACUpstreamNbr ;
- neighbor->nb_dna = smc->mib.m[MAC0].fddiMACDownstreamNbr ;
- }
- /*
- * fill values in path descriptor
- */
- #ifdef CONCENTRATOR
- #define ALLPHYS NUMPHYS
- #else
- #define ALLPHYS ((smc->s.sas == SMT_SAS) ? 1 : 2)
- #endif
- static int smt_fill_path(struct s_smc *smc, struct smt_p_path *path)
- {
- SK_LOC_DECL(int,type) ;
- SK_LOC_DECL(int,state) ;
- SK_LOC_DECL(int,remote) ;
- SK_LOC_DECL(int,mac) ;
- int len ;
- int p ;
- int physp ;
- struct smt_phy_rec *phy ;
- struct smt_mac_rec *pd_mac ;
- len = PARA_LEN +
- sizeof(struct smt_mac_rec) * NUMMACS +
- sizeof(struct smt_phy_rec) * ALLPHYS ;
- path->para.p_type = SMT_P_PATH ;
- path->para.p_len = len - PARA_LEN ;
- /* PHYs */
- for (p = 0,phy = path->pd_phy ; p < ALLPHYS ; p++, phy++) {
- physp = p ;
- #ifndef CONCENTRATOR
- if (smc->s.sas == SMT_SAS)
- physp = PS ;
- #endif
- pcm_status_state(smc,physp,&type,&state,&remote,&mac) ;
- #ifdef LITTLE_ENDIAN
- phy->phy_mib_index = smt_swap_short((u_short)p+INDEX_PORT) ;
- #else
- phy->phy_mib_index = p+INDEX_PORT ;
- #endif
- phy->phy_type = type ;
- phy->phy_connect_state = state ;
- phy->phy_remote_type = remote ;
- phy->phy_remote_mac = mac ;
- phy->phy_resource_idx = phy_con_resource_index(smc,p) ;
- }
- /* MAC */
- pd_mac = (struct smt_mac_rec *) phy ;
- pd_mac->mac_addr = smc->mib.m[MAC0].fddiMACSMTAddress ;
- pd_mac->mac_resource_idx = mac_con_resource_index(smc,1) ;
- return len;
- }
- /*
- * fill values in mac status
- */
- static void smt_fill_mac_status(struct s_smc *smc, struct smt_p_mac_status *st)
- {
- SMTSETPARA(st,SMT_P_MAC_STATUS) ;
- st->st_mib_index = INDEX_MAC ;
- st->st_mac_index = mac_index(smc,1) ;
- mac_update_counter(smc) ;
- /*
- * timer values are represented in SMT as 2's complement numbers
- * units : internal : 2's complement BCLK
- */
- st->st_t_req = smc->mib.m[MAC0].fddiMACT_Req ;
- st->st_t_neg = smc->mib.m[MAC0].fddiMACT_Neg ;
- st->st_t_max = smc->mib.m[MAC0].fddiMACT_Max ;
- st->st_tvx_value = smc->mib.m[MAC0].fddiMACTvxValue ;
- st->st_t_min = smc->mib.m[MAC0].fddiMACT_Min ;
- st->st_sba = smc->mib.a[PATH0].fddiPATHSbaPayload ;
- st->st_frame_ct = smc->mib.m[MAC0].fddiMACFrame_Ct ;
- st->st_error_ct = smc->mib.m[MAC0].fddiMACError_Ct ;
- st->st_lost_ct = smc->mib.m[MAC0].fddiMACLost_Ct ;
- }
- /*
- * fill values in LEM status
- */
- static void smt_fill_lem(struct s_smc *smc, struct smt_p_lem *lem, int phy)
- {
- struct fddi_mib_p *mib ;
- mib = smc->y[phy].mib ;
- SMTSETPARA(lem,SMT_P_LEM) ;
- lem->lem_mib_index = phy+INDEX_PORT ;
- lem->lem_phy_index = phy_index(smc,phy) ;
- lem->lem_pad2 = 0 ;
- lem->lem_cutoff = mib->fddiPORTLer_Cutoff ;
- lem->lem_alarm = mib->fddiPORTLer_Alarm ;
- /* long term bit error rate */
- lem->lem_estimate = mib->fddiPORTLer_Estimate ;
- /* # of rejected connections */
- lem->lem_reject_ct = mib->fddiPORTLem_Reject_Ct ;
- lem->lem_ct = mib->fddiPORTLem_Ct ; /* total number of errors */
- }
- /*
- * fill version parameter
- */
- static void smt_fill_version(struct s_smc *smc, struct smt_p_version *vers)
- {
- SK_UNUSED(smc) ;
- SMTSETPARA(vers,SMT_P_VERSION) ;
- vers->v_pad = 0 ;
- vers->v_n = 1 ; /* one version is enough .. */
- vers->v_index = 1 ;
- vers->v_version[0] = SMT_VID_2 ;
- vers->v_pad2 = 0 ;
- }
- #ifdef SMT6_10
- /*
- * fill frame status capabilities
- */
- /*
- * note: this para 200B is NOT in swap table, because it's also set in
- * PMF add_para
- */
- static void smt_fill_fsc(struct s_smc *smc, struct smt_p_fsc *fsc)
- {
- SK_UNUSED(smc) ;
- SMTSETPARA(fsc,SMT_P_FSC) ;
- fsc->fsc_pad0 = 0 ;
- fsc->fsc_mac_index = INDEX_MAC ; /* this is MIB ; MIB is NOT
- * mac_index ()i !
- */
- fsc->fsc_pad1 = 0 ;
- fsc->fsc_value = FSC_TYPE0 ; /* "normal" node */
- #ifdef LITTLE_ENDIAN
- fsc->fsc_mac_index = smt_swap_short(INDEX_MAC) ;
- fsc->fsc_value = smt_swap_short(FSC_TYPE0) ;
- #endif
- }
- #endif
- /*
- * fill mac counter field
- */
- static void smt_fill_mac_counter(struct s_smc *smc, struct smt_p_mac_counter *mc)
- {
- SMTSETPARA(mc,SMT_P_MAC_COUNTER) ;
- mc->mc_mib_index = INDEX_MAC ;
- mc->mc_index = mac_index(smc,1) ;
- mc->mc_receive_ct = smc->mib.m[MAC0].fddiMACCopied_Ct ;
- mc->mc_transmit_ct = smc->mib.m[MAC0].fddiMACTransmit_Ct ;
- }
- /*
- * fill mac frame not copied counter
- */
- static void smt_fill_mac_fnc(struct s_smc *smc, struct smt_p_mac_fnc *fnc)
- {
- SMTSETPARA(fnc,SMT_P_MAC_FNC) ;
- fnc->nc_mib_index = INDEX_MAC ;
- fnc->nc_index = mac_index(smc,1) ;
- fnc->nc_counter = smc->mib.m[MAC0].fddiMACNotCopied_Ct ;
- }
- /*
- * fill manufacturer field
- */
- static void smt_fill_manufacturer(struct s_smc *smc,
- struct smp_p_manufacturer *man)
- {
- SMTSETPARA(man,SMT_P_MANUFACTURER) ;
- memcpy((char *) man->mf_data,
- (char *) smc->mib.fddiSMTManufacturerData,
- sizeof(man->mf_data)) ;
- }
- /*
- * fill user field
- */
- static void smt_fill_user(struct s_smc *smc, struct smp_p_user *user)
- {
- SMTSETPARA(user,SMT_P_USER) ;
- memcpy((char *) user->us_data,
- (char *) smc->mib.fddiSMTUserData,
- sizeof(user->us_data)) ;
- }
- /*
- * fill set count
- */
- static void smt_fill_setcount(struct s_smc *smc, struct smt_p_setcount *setcount)
- {
- SK_UNUSED(smc) ;
- SMTSETPARA(setcount,SMT_P_SETCOUNT) ;
- setcount->count = smc->mib.fddiSMTSetCount.count ;
- memcpy((char *)setcount->timestamp,
- (char *)smc->mib.fddiSMTSetCount.timestamp,8) ;
- }
- /*
- * fill echo data
- */
- static void smt_fill_echo(struct s_smc *smc, struct smt_p_echo *echo, u_long seed,
- int len)
- {
- u_char *p ;
- SK_UNUSED(smc) ;
- SMTSETPARA(echo,SMT_P_ECHODATA) ;
- echo->para.p_len = len ;
- for (p = echo->ec_data ; len ; len--) {
- *p++ = (u_char) seed ;
- seed += 13 ;
- }
- }
- /*
- * clear DNA and UNA
- * called from CFM if configuration changes
- */
- static void smt_clear_una_dna(struct s_smc *smc)
- {
- smc->mib.m[MAC0].fddiMACUpstreamNbr = SMT_Unknown ;
- smc->mib.m[MAC0].fddiMACDownstreamNbr = SMT_Unknown ;
- }
- static void smt_clear_old_una_dna(struct s_smc *smc)
- {
- smc->mib.m[MAC0].fddiMACOldUpstreamNbr = SMT_Unknown ;
- smc->mib.m[MAC0].fddiMACOldDownstreamNbr = SMT_Unknown ;
- }
- u_long smt_get_tid(struct s_smc *smc)
- {
- u_long tid ;
- while ((tid = ++(smc->sm.smt_tid) ^ SMT_TID_MAGIC) == 0)
- ;
- return tid & 0x3fffffffL;
- }
- /*
- * table of parameter lengths
- */
- static const struct smt_pdef {
- int ptype ;
- int plen ;
- const char *pswap ;
- } smt_pdef[] = {
- { SMT_P_UNA, sizeof(struct smt_p_una) ,
- SWAP_SMT_P_UNA } ,
- { SMT_P_SDE, sizeof(struct smt_p_sde) ,
- SWAP_SMT_P_SDE } ,
- { SMT_P_STATE, sizeof(struct smt_p_state) ,
- SWAP_SMT_P_STATE } ,
- { SMT_P_TIMESTAMP,sizeof(struct smt_p_timestamp) ,
- SWAP_SMT_P_TIMESTAMP } ,
- { SMT_P_POLICY, sizeof(struct smt_p_policy) ,
- SWAP_SMT_P_POLICY } ,
- { SMT_P_LATENCY, sizeof(struct smt_p_latency) ,
- SWAP_SMT_P_LATENCY } ,
- { SMT_P_NEIGHBORS,sizeof(struct smt_p_neighbor) ,
- SWAP_SMT_P_NEIGHBORS } ,
- { SMT_P_PATH, sizeof(struct smt_p_path) ,
- SWAP_SMT_P_PATH } ,
- { SMT_P_MAC_STATUS,sizeof(struct smt_p_mac_status) ,
- SWAP_SMT_P_MAC_STATUS } ,
- { SMT_P_LEM, sizeof(struct smt_p_lem) ,
- SWAP_SMT_P_LEM } ,
- { SMT_P_MAC_COUNTER,sizeof(struct smt_p_mac_counter) ,
- SWAP_SMT_P_MAC_COUNTER } ,
- { SMT_P_MAC_FNC,sizeof(struct smt_p_mac_fnc) ,
- SWAP_SMT_P_MAC_FNC } ,
- { SMT_P_PRIORITY,sizeof(struct smt_p_priority) ,
- SWAP_SMT_P_PRIORITY } ,
- { SMT_P_EB,sizeof(struct smt_p_eb) ,
- SWAP_SMT_P_EB } ,
- { SMT_P_MANUFACTURER,sizeof(struct smp_p_manufacturer) ,
- SWAP_SMT_P_MANUFACTURER } ,
- { SMT_P_REASON, sizeof(struct smt_p_reason) ,
- SWAP_SMT_P_REASON } ,
- { SMT_P_REFUSED, sizeof(struct smt_p_refused) ,
- SWAP_SMT_P_REFUSED } ,
- { SMT_P_VERSION, sizeof(struct smt_p_version) ,
- SWAP_SMT_P_VERSION } ,
- #ifdef ESS
- { SMT_P0015, sizeof(struct smt_p_0015) , SWAP_SMT_P0015 } ,
- { SMT_P0016, sizeof(struct smt_p_0016) , SWAP_SMT_P0016 } ,
- { SMT_P0017, sizeof(struct smt_p_0017) , SWAP_SMT_P0017 } ,
- { SMT_P0018, sizeof(struct smt_p_0018) , SWAP_SMT_P0018 } ,
- { SMT_P0019, sizeof(struct smt_p_0019) , SWAP_SMT_P0019 } ,
- { SMT_P001A, sizeof(struct smt_p_001a) , SWAP_SMT_P001A } ,
- { SMT_P001B, sizeof(struct smt_p_001b) , SWAP_SMT_P001B } ,
- { SMT_P001C, sizeof(struct smt_p_001c) , SWAP_SMT_P001C } ,
- { SMT_P001D, sizeof(struct smt_p_001d) , SWAP_SMT_P001D } ,
- #endif
- #if 0
- { SMT_P_FSC, sizeof(struct smt_p_fsc) ,
- SWAP_SMT_P_FSC } ,
- #endif
- { SMT_P_SETCOUNT,0, SWAP_SMT_P_SETCOUNT } ,
- { SMT_P1048, 0, SWAP_SMT_P1048 } ,
- { SMT_P208C, 0, SWAP_SMT_P208C } ,
- { SMT_P208D, 0, SWAP_SMT_P208D } ,
- { SMT_P208E, 0, SWAP_SMT_P208E } ,
- { SMT_P208F, 0, SWAP_SMT_P208F } ,
- { SMT_P2090, 0, SWAP_SMT_P2090 } ,
- #ifdef ESS
- { SMT_P320B, sizeof(struct smt_p_320b) , SWAP_SMT_P320B } ,
- { SMT_P320F, sizeof(struct smt_p_320f) , SWAP_SMT_P320F } ,
- { SMT_P3210, sizeof(struct smt_p_3210) , SWAP_SMT_P3210 } ,
- #endif
- { SMT_P4050, 0, SWAP_SMT_P4050 } ,
- { SMT_P4051, 0, SWAP_SMT_P4051 } ,
- { SMT_P4052, 0, SWAP_SMT_P4052 } ,
- { SMT_P4053, 0, SWAP_SMT_P4053 } ,
- } ;
- #define N_SMT_PLEN ARRAY_SIZE(smt_pdef)
- int smt_check_para(struct s_smc *smc, struct smt_header *sm,
- const u_short list[])
- {
- const u_short *p = list ;
- while (*p) {
- if (!sm_to_para(smc,sm,(int) *p)) {
- DB_SMT("SMT: smt_check_para - missing para %x\n",*p,0);
- return -1;
- }
- p++ ;
- }
- return 0;
- }
- void *sm_to_para(struct s_smc *smc, struct smt_header *sm, int para)
- {
- char *p ;
- int len ;
- int plen ;
- void *found = NULL;
- SK_UNUSED(smc) ;
- len = sm->smt_len ;
- p = (char *)(sm+1) ; /* pointer to info */
- while (len > 0 ) {
- if (((struct smt_para *)p)->p_type == para)
- found = (void *) p ;
- plen = ((struct smt_para *)p)->p_len + PARA_LEN ;
- p += plen ;
- len -= plen ;
- if (len < 0) {
- DB_SMT("SMT : sm_to_para - length error %d\n",plen,0) ;
- return NULL;
- }
- if ((plen & 3) && (para != SMT_P_ECHODATA)) {
- DB_SMT("SMT : sm_to_para - odd length %d\n",plen,0) ;
- return NULL;
- }
- if (found)
- return found;
- }
- return NULL;
- }
- #if 0
- /*
- * send ANTC data test frame
- */
- void fddi_send_antc(struct s_smc *smc, struct fddi_addr *dest)
- {
- SK_UNUSED(smc) ;
- SK_UNUSED(dest) ;
- #if 0
- SMbuf *mb ;
- struct smt_header *smt ;
- int i ;
- char *p ;
- mb = smt_get_mbuf() ;
- mb->sm_len = 3000+12 ;
- p = smtod(mb, char *) + 12 ;
- for (i = 0 ; i < 3000 ; i++)
- *p++ = 1 << (i&7) ;
- smt = smtod(mb, struct smt_header *) ;
- smt->smt_dest = *dest ;
- smt->smt_source = smc->mib.m[MAC0].fddiMACSMTAddress ;
- smt_send_mbuf(smc,mb,FC_ASYNC_LLC) ;
- #endif
- }
- #endif
- #ifdef DEBUG
- char *addr_to_string(struct fddi_addr *addr)
- {
- int i ;
- static char string[6*3] = "****" ;
- for (i = 0 ; i < 6 ; i++) {
- string[i * 3] = hex_asc_hi(addr->a[i]);
- string[i * 3 + 1] = hex_asc_lo(addr->a[i]);
- string[i * 3 + 2] = ':';
- }
- string[5 * 3 + 2] = 0;
- return string;
- }
- #endif
- #ifdef AM29K
- int smt_ifconfig(int argc, char *argv[])
- {
- if (argc >= 2 && !strcmp(argv[0],"opt_bypass") &&
- !strcmp(argv[1],"yes")) {
- smc->mib.fddiSMTBypassPresent = 1 ;
- return 0;
- }
- return amdfddi_config(0, argc, argv);
- }
- #endif
- /*
- * return static mac index
- */
- static int mac_index(struct s_smc *smc, int mac)
- {
- SK_UNUSED(mac) ;
- #ifdef CONCENTRATOR
- SK_UNUSED(smc) ;
- return NUMPHYS + 1;
- #else
- return (smc->s.sas == SMT_SAS) ? 2 : 3;
- #endif
- }
- /*
- * return static phy index
- */
- static int phy_index(struct s_smc *smc, int phy)
- {
- SK_UNUSED(smc) ;
- return phy + 1;
- }
- /*
- * return dynamic mac connection resource index
- */
- static int mac_con_resource_index(struct s_smc *smc, int mac)
- {
- #ifdef CONCENTRATOR
- SK_UNUSED(smc) ;
- SK_UNUSED(mac) ;
- return entity_to_index(smc, cem_get_downstream(smc, ENTITY_MAC));
- #else
- SK_UNUSED(mac) ;
- switch (smc->mib.fddiSMTCF_State) {
- case SC9_C_WRAP_A :
- case SC5_THRU_B :
- case SC11_C_WRAP_S :
- return 1;
- case SC10_C_WRAP_B :
- case SC4_THRU_A :
- return 2;
- }
- return smc->s.sas == SMT_SAS ? 2 : 3;
- #endif
- }
- /*
- * return dynamic phy connection resource index
- */
- static int phy_con_resource_index(struct s_smc *smc, int phy)
- {
- #ifdef CONCENTRATOR
- return entity_to_index(smc, cem_get_downstream(smc, ENTITY_PHY(phy))) ;
- #else
- switch (smc->mib.fddiSMTCF_State) {
- case SC9_C_WRAP_A :
- return phy == PA ? 3 : 2;
- case SC10_C_WRAP_B :
- return phy == PA ? 1 : 3;
- case SC4_THRU_A :
- return phy == PA ? 3 : 1;
- case SC5_THRU_B :
- return phy == PA ? 2 : 3;
- case SC11_C_WRAP_S :
- return 2;
- }
- return phy;
- #endif
- }
- #ifdef CONCENTRATOR
- static int entity_to_index(struct s_smc *smc, int e)
- {
- if (e == ENTITY_MAC)
- return mac_index(smc, 1);
- else
- return phy_index(smc, e - ENTITY_PHY(0));
- }
- #endif
- #ifdef LITTLE_ENDIAN
- static int smt_swap_short(u_short s)
- {
- return ((s>>8)&0xff) | ((s&0xff)<<8);
- }
- void smt_swap_para(struct smt_header *sm, int len, int direction)
- /* int direction; 0 encode 1 decode */
- {
- struct smt_para *pa ;
- const struct smt_pdef *pd ;
- char *p ;
- int plen ;
- int type ;
- int i ;
- /* printf("smt_swap_para sm %x len %d dir %d\n",
- sm,len,direction) ;
- */
- smt_string_swap((char *)sm,SWAP_SMTHEADER,len) ;
- /* swap args */
- len -= sizeof(struct smt_header) ;
- p = (char *) (sm + 1) ;
- while (len > 0) {
- pa = (struct smt_para *) p ;
- plen = pa->p_len ;
- type = pa->p_type ;
- pa->p_type = smt_swap_short(pa->p_type) ;
- pa->p_len = smt_swap_short(pa->p_len) ;
- if (direction) {
- plen = pa->p_len ;
- type = pa->p_type ;
- }
- /*
- * note: paras can have 0 length !
- */
- if (plen < 0)
- break ;
- plen += PARA_LEN ;
- for (i = N_SMT_PLEN, pd = smt_pdef; i ; i--,pd++) {
- if (pd->ptype == type)
- break ;
- }
- if (i && pd->pswap) {
- smt_string_swap(p+PARA_LEN,pd->pswap,len) ;
- }
- len -= plen ;
- p += plen ;
- }
- }
- static void smt_string_swap(char *data, const char *format, int len)
- {
- const char *open_paren = NULL ;
- int x ;
- while (len > 0 && *format) {
- switch (*format) {
- case '[' :
- open_paren = format ;
- break ;
- case ']' :
- format = open_paren ;
- break ;
- case '1' :
- case '2' :
- case '3' :
- case '4' :
- case '5' :
- case '6' :
- case '7' :
- case '8' :
- case '9' :
- data += *format - '0' ;
- len -= *format - '0' ;
- break ;
- case 'c':
- data++ ;
- len-- ;
- break ;
- case 's' :
- x = data[0] ;
- data[0] = data[1] ;
- data[1] = x ;
- data += 2 ;
- len -= 2 ;
- break ;
- case 'l' :
- x = data[0] ;
- data[0] = data[3] ;
- data[3] = x ;
- x = data[1] ;
- data[1] = data[2] ;
- data[2] = x ;
- data += 4 ;
- len -= 4 ;
- break ;
- }
- format++ ;
- }
- }
- #else
- void smt_swap_para(struct smt_header *sm, int len, int direction)
- /* int direction; 0 encode 1 decode */
- {
- SK_UNUSED(sm) ;
- SK_UNUSED(len) ;
- SK_UNUSED(direction) ;
- }
- #endif
- /*
- * PMF actions
- */
- int smt_action(struct s_smc *smc, int class, int code, int index)
- {
- int event ;
- int port ;
- DB_SMT("SMT: action %d code %d\n",class,code) ;
- switch(class) {
- case SMT_STATION_ACTION :
- switch(code) {
- case SMT_STATION_ACTION_CONNECT :
- smc->mib.fddiSMTRemoteDisconnectFlag = FALSE ;
- queue_event(smc,EVENT_ECM,EC_CONNECT) ;
- break ;
- case SMT_STATION_ACTION_DISCONNECT :
- queue_event(smc,EVENT_ECM,EC_DISCONNECT) ;
- smc->mib.fddiSMTRemoteDisconnectFlag = TRUE ;
- RS_SET(smc,RS_DISCONNECT) ;
- AIX_EVENT(smc, (u_long) FDDI_RING_STATUS, (u_long)
- FDDI_SMT_EVENT, (u_long) FDDI_REMOTE_DISCONNECT,
- smt_get_event_word(smc));
- break ;
- case SMT_STATION_ACTION_PATHTEST :
- AIX_EVENT(smc, (u_long) FDDI_RING_STATUS, (u_long)
- FDDI_SMT_EVENT, (u_long) FDDI_PATH_TEST,
- smt_get_event_word(smc));
- break ;
- case SMT_STATION_ACTION_SELFTEST :
- AIX_EVENT(smc, (u_long) FDDI_RING_STATUS, (u_long)
- FDDI_SMT_EVENT, (u_long) FDDI_REMOTE_SELF_TEST,
- smt_get_event_word(smc));
- break ;
- case SMT_STATION_ACTION_DISABLE_A :
- if (smc->y[PA].pc_mode == PM_PEER) {
- RS_SET(smc,RS_EVENT) ;
- queue_event(smc,EVENT_PCM+PA,PC_DISABLE) ;
- }
- break ;
- case SMT_STATION_ACTION_DISABLE_B :
- if (smc->y[PB].pc_mode == PM_PEER) {
- RS_SET(smc,RS_EVENT) ;
- queue_event(smc,EVENT_PCM+PB,PC_DISABLE) ;
- }
- break ;
- case SMT_STATION_ACTION_DISABLE_M :
- for (port = 0 ; port < NUMPHYS ; port++) {
- if (smc->mib.p[port].fddiPORTMy_Type != TM)
- continue ;
- RS_SET(smc,RS_EVENT) ;
- queue_event(smc,EVENT_PCM+port,PC_DISABLE) ;
- }
- break ;
- default :
- return 1;
- }
- break ;
- case SMT_PORT_ACTION :
- switch(code) {
- case SMT_PORT_ACTION_ENABLE :
- event = PC_ENABLE ;
- break ;
- case SMT_PORT_ACTION_DISABLE :
- event = PC_DISABLE ;
- break ;
- case SMT_PORT_ACTION_MAINT :
- event = PC_MAINT ;
- break ;
- case SMT_PORT_ACTION_START :
- event = PC_START ;
- break ;
- case SMT_PORT_ACTION_STOP :
- event = PC_STOP ;
- break ;
- default :
- return 1;
- }
- queue_event(smc,EVENT_PCM+index,event) ;
- break ;
- default :
- return 1;
- }
- return 0;
- }
- /*
- * canonical conversion of <len> bytes beginning form *data
- */
- #ifdef USE_CAN_ADDR
- static void hwm_conv_can(struct s_smc *smc, char *data, int len)
- {
- int i ;
- SK_UNUSED(smc) ;
- for (i = len; i ; i--, data++)
- *data = bitrev8(*data);
- }
- #endif
- #endif /* no SLIM_SMT */
|