msg4.pl

ftam等标准协议服务器和客户端的源代码。

( CONT 0x0
    ( UNIV SET
        ( APPL 0x0
            ( UNIV SEQ
                ( APPL 0x1
                    ( UNIV PRTS 0x0 )
                )
                ( APPL 0x2
                    ( UNIV PRTS 0x0 )
                )
                ( CONT 0x2
                    ( UNIV PRTS 0x3
                        "dfn"
                    )
                )
            )
            ( UNIV SEQ
                ( UNIV SEQ
                    ( UNIV PRTS 0x0 )
                    ( UNIV PRTS 0x5
                        "busc"
                        "h"
                    )
                )
                ( UNIV SEQ
                    ( UNIV PRTS 0x0 )
                    ( UNIV PRTS 0x7
                        "xps."
                        "gmd"
                    )
                )
            )
        )
        ( UNIV SET 0x0 )
        ( APPL 0x7 0x1
            0x00
        )
        ( CONT 0x2
            ( UNIV SET
                ( APPL 0x0
                    ( UNIV SEQ
                        ( APPL 0x1
                            ( UNIV PRTS 0x0 )
                        )
                        ( APPL 0x2
                            ( UNIV PRTS 0x0 )
                        )
                        ( CONT 0x2
                            ( UNIV PRTS 0x2
                                "uk"
                            )
                        )
                    )
                    ( UNIV SEQ
                        ( UNIV SEQ
                            ( UNIV PRTS 0x0 )
                            ( UNIV PRTS 0x5
                                "alin"
                                "a"
                            )
                        )
                        ( UNIV SEQ
                            ( UNIV PRTS 0x0 )
                            ( UNIV PRTS 0x12
                                "ean."
                                "vax2"
                                ".cs."
                                "ucl."
                                "ac"
                            )
                        )
                    )
                )
                ( CONT 0x1 0x2
                    0x078a
                )
                ( UNIV INT 0x1
                    0x00
                )
                ( CONT 0x0 0x1
                    0x01
                )
            )
        )
        ( APPL 0x6 0x1
            0x02
        )
        ( APPL 0x4
            ( APPL 0x3
                ( APPL 0x1
                    ( UNIV PRTS 0x0 )
                )
                ( APPL 0x2
                    ( UNIV PRTS 0x0 )
                )
                ( UNIV PRTS 0x3
                    "dfn"
                )
            )
            ( UNIV IA5S 0xc
                "8511"
                "1417"
                "1228"
            )
        )
        ( APPL 0x9
            ( UNIV SEQ
                ( APPL 0x3
                    ( APPL 0x1
                        ( UNIV PRTS 0x0 )
                    )
                    ( APPL 0x2
                        ( UNIV PRTS 0x0 )
                    )
                    ( UNIV PRTS 0x3
                        "dfn"
                    )
                )
                ( UNIV SET
                    ( CONT 0x0 0x11
                        0x38353131
                        0x31343136
                        0x31323238
                        0x2d303130
                        0x30
                    )
                    ( CONT 0x2 0x1
                        0x00
                    )
                )
            )
        )
    )
)
( CONT 0x1
    ( CONT 0x1
        ( APPL 0x0
            ( UNIV SEQ
                ( APPL 0x1
                    ( UNIV PRTS 0x0 )
                )
                ( APPL 0x2
                    ( UNIV PRTS 0x0 )
                )
                ( CONT 0x2
                    ( UNIV PRTS 0x3
                        "dfn"
                    )
                )
            )
            ( UNIV SEQ
                ( UNIV SEQ
                    ( UNIV PRTS 0x0 )
                    ( UNIV PRTS 0x5
                        "busc"
                        "h"
                    )
                )
                ( UNIV SEQ
                    ( UNIV PRTS 0x0 )
                    ( UNIV PRTS 0x7
                        "xps."
                        "gmd"
                    )
                )
            )
        )
        ( CONT 0x0 0xd
            0x6d617274
            0x696e6120
            0x62757363
            0x68
        )
    )
    ( APPL 0xb
        ( APPL 0x0
            ( UNIV SEQ
                ( APPL 0x1
                    ( UNIV PRTS 0x0 )
                )
                ( APPL 0x2
                    ( UNIV PRTS 0x0 )
                )
                ( CONT 0x2
                    ( UNIV PRTS 0x2
                        "uk"
                    )
                )
            )
            ( UNIV SEQ
                ( UNIV SEQ
                    ( UNIV PRTS 0x0 )
                    ( UNIV PRTS 0x5
                        "alin"
                        "a"
                    )
                )
                ( UNIV SEQ
                    ( UNIV PRTS 0x0 )
                    ( UNIV PRTS 0x12
                        "ean."
                        "vax2"
                        ".cs."
                        "ucl."
                        "ac"
                    )
                )
            )
        )
        ( UNIV PRTS 0x3
            "124"
        )
    )
    ( CONT 0x0
        ( CONT 0x1
            ( CONT 0x0 0x11
                0x38353131
                0x31343136
                0x31323238
                0x2d303130
                0x30
            )
            ( CONT 0x1 0x1
                0x01
            )
        )
    )
)