This is the third request :RECOMMENDATION FOR ADVANCED ORBITING SYSTEMSsnw ! SubnetID(0,0,0,0,0,0,0,1)! Add(1, Add(0, NullSNSAP))! Add(1, NullSNSAP)! Make<strong>CCSDS</strong>Packet(MakePrimaryHeader(MakePacketID(Version1,PacketType(0),SHF(0),APID(0,0,0,0,0,0,0,0,1,0,1)),MakePacketSC(PacketSequenceUnSeg,PacketSequenceCount(0,0,0,0,0,0,0,0,0,0,0,0,0,0)),PacketLength(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1)),AddFront(Octet(0,0,0,0,0,0,0,1),AddFront(Octet(0,0,0,0,0,0,1,0), NullOS))) ;success ; exit)endprocendproc<strong>CCSDS</strong> HISTORICAL DOCUMENT<strong>CCSDS</strong> 705.2-B-1 Page A-39 May 1994<strong>CCSDS</strong> HISTORICAL DOCUMENT
Path Protocol Test 10RECOMMENDATION FOR ADVANCED ORBITING SYSTEMSThis test checks that multicasting and routing is possible from a path entity.Run the test using the command:ts pp.t10.lot pp.lotType START at the hippo prompt (after some time) and then select ppt10 from the menu. Stepthrough the events offered using the NEXT command of hippo. Eventually the success eventshould take place and the next NEXT command will result in deadlock.The choice taken when multiple events are offered is not important for the success of this test;the exception to this is that the success event should not be selected if alternatives exist.This is just the holder for the test behaviour:process ppt10 (pType : PacketType,dataLossFlags : Bool) : noexit :=(hide pkt, oct, man, snw in(test[pkt, oct, man, snw]|[pkt, oct, man, snw]|PathProtocol[pkt, oct, man, snw] (pType, dataLossFlags)))whereThis is the test behaviour itself:process test[pkt,oct,man,snw] : exit :=hide success, failure in(<strong>CCSDS</strong> HISTORICAL DOCUMENTSet up the paths through the management gate:man ! MakePathID(APID(0,0,0,0,0,0,0,0,1,1,0),Add(1, NullAPIDQual))! Succ(Succ(8))! SubnetID(0,0,0,0,0,0,1,0)! Add(1, Add(0, NullSNSAP))! False! UserFormatted! Add(MakeRelay(SubnetID(0,0,0,0,0,0,0,1),Add(1, Add(0, NullSNSAP)),Add(1, NullSNSAP)),Add(MakeRelay(SubnetID(0,0,0,0,0,0,0,1),Add(1, Add(0, NullSNSAP)),Add(0, NullSNSAP)),Add(MakeRelay(SubnetID(0,0,0,0,0,0,1,0),Add(1, Add(0, NullSNSAP)),Add(1, Add(0, Add(1, NullSNSAP)))),CreateRT))) ;<strong>CCSDS</strong> 705.2-B-1 Page A-40 May 1994<strong>CCSDS</strong> HISTORICAL DOCUMENT