705x2b1s - CCSDS

Path Service Test 5RECOMMENDATION FOR ADVANCED ORBITING SYSTEMSThis test attempts to send octet strings on a path which is set up as a octet source, only the validrequests should be accepted, leaving the badly formatted ones.It tests that the secondary header flag, the sequence count, the data length, the data, the packettype and the sequence flag fields are all carried through correctly.Run the test using the command:ts ps.t5.lot ps.lotType START at the hippo prompt (after some time) and then select pst5 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.Exceptions to this are the losepacket event which should only be selected at the time indicatedbelow in the test spec. and the success event which should only be selected when there are noother alternatives.This process just looks after the test behaviourprocess pst5 : 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 paths through the management gate:man ! MakePathID(APID(0,0,0,0,0,0,0,0,0,1,0),Add(1, Add(0, NullAPIDQual)))! OctetString! Add(MakeEndpoint(OctetString, True), CreateTL)! PacketType(0)! Succ(Succ(8)) ;CCSDS 705.2-B-1 Page A-82 May 1994CCSDS HISTORICAL DOCUMENT