705x2b1s - CCSDS

Path Service Test 4RECOMMENDATION FOR ADVANCED ORBITING SYSTEMSThis test checks that multicasting is possible from a path entity using the path service.A path will be set up which has three endpoints.Run the test using the command:ts ps.t4.lot ps.lotType START at the hippo prompt (after some time) and then select pst4 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 exceptions are that the losepacket event should not be chosen at all and that the success eventshould only be selected if there are no other choices.This is just a holder for the test behaviour:process pst4 : noexit :=(hide pkt, oct, man in(test[pkt, oct, man]|[pkt, oct, man]|PathService[pkt, oct, man]))whereThis is the test behaviour itself:process test[pkt,oct,man] : exit :=hide success, failure in(CCSDS HISTORICAL DOCUMENTSet up the path through the management gate:man ! MakePathID(APID(0,0,0,0,0,0,0,0,1,0,1),Add(1, NullAPIDQual))! UserFormatted! Add(MakeEndpoint(OctetString, False),Add(MakeEndpoint(UserFormatted, False),Add(MakeEndpoint(UserFormatted, False), CreateTL)))! PacketType(0)! Succ(Succ(8)) ;CCSDS 705.2-B-1 Page A-80 May 1994CCSDS HISTORICAL DOCUMENT