msg6.pl

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

( CONT 0x0
    ( UNIV SET
        ( APPL 0x0
            ( UNIV SEQ
                ( APPL 0x1
                    ( UNIV PRTS 0x0 )
                )
                ( APPL 0x2
                    ( UNIV PRTS 0x0 )
                )
                ( CONT 0x2
                    ( UNIV PRTS 0x7
                        "osir"
                        "ide"
                    )
                )
            )
            ( UNIV SEQ
                ( UNIV SEQ
                    ( UNIV PRTS 0x0 )
                    ( UNIV PRTS 0x6
                        "lanc"
                        "ia"
                    )
                )
                ( UNIV SEQ
                    ( UNIV PRTS 0x0 )
                    ( UNIV PRTS 0x8
                        "iasi"
                        ".cnr"
                    )
                )
            )
        )
        ( 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
                    0x078d
                )
                ( UNIV INT 0x1
                    0x00
                )
                ( CONT 0x0 0x1
                    0x01
                )
            )
        )
        ( APPL 0x6 0x1
            0x02
        )
        ( APPL 0x4
            ( APPL 0x3
                ( APPL 0x1
                    ( UNIV PRTS 0x5
                        "ital"
                        "y"
                    )
                )
                ( APPL 0x2
                    ( UNIV PRTS 0x0 )
                )
                ( UNIV PRTS 0x7
                    "osir"
                    "ide"
                )
            )
            ( UNIV IA5S 0xc
                "8512"
                "0915"
                "0738"
            )
        )
        ( APPL 0x9
            ( UNIV SEQ
                ( APPL 0x3
                    ( APPL 0x1
                        ( UNIV PRTS 0x5
                            "ital"
                            "y"
                        )
                    )
                    ( APPL 0x2
                        ( UNIV PRTS 0x0 )
                    )
                    ( UNIV PRTS 0x7
                        "osir"
                        "ide"
                    )
                )
                ( UNIV SET
                    ( CONT 0x0 0x11
                        0x38353132
                        0x30393037
                        0x30373338
                        0x2d303830
                        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 0x7
                        "osir"
                        "ide"
                    )
                )
            )
            ( UNIV SEQ
                ( UNIV SEQ
                    ( UNIV PRTS 0x0 )
                    ( UNIV PRTS 0x6
                        "lanc"
                        "ia"
                    )
                )
                ( UNIV SEQ
                    ( UNIV PRTS 0x0 )
                    ( UNIV PRTS 0x8
                        "iasi"
                        ".cnr"
                    )
                )
            )
        )
        ( CONT 0x0 0xf
            0x4d617572
            0x697a696f
            0x204c616e
            0x636961
        )
    )
    ( 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
            "133"
        )
    )
    ( CONT 0x0
        ( CONT 0x1
            ( CONT 0x0 0x11
                0x38353132
                0x30393037
                0x30373338
                0x2d303830
                0x30
            )
            ( CONT 0x1 0x1
                0x01
            )
        )
    )
)