Annotation of 43BSDReno/contrib/isode-beta/vt/send_udq.py, revision 1.1

1.1     ! root        1: -- VTPM: encode UDQ PDU
        !             2: 
        !             3: -- $Header: /f/osi/vt/RCS/send_udq.py,v 7.0 89/11/23 22:31:45 mrose Rel $
        !             4: --
        !             5: --
        !             6: -- $Log:       send_udq.py,v $
        !             7: -- Revision 7.0  89/11/23  22:31:45  mrose
        !             8: -- Release 6.0
        !             9: -- 
        !            10: 
        !            11: --
        !            12: --                               NOTICE
        !            13: --
        !            14: --    Acquisition, use, and distribution of this module and related
        !            15: --    materials are subject to the restrictions of a license agreement.
        !            16: --    Consult the Preface in the User's Manual for the full terms of
        !            17: --    this agreement.
        !            18: --
        !            19: --
        !            20: 
        !            21: 
        !            22: UDQPDU DEFINITIONS ::=
        !            23: 
        !            24: %{
        !            25: #include <stdio.h>
        !            26: #include "sector1.h"
        !            27: 
        !            28: #undef PEPYPARM
        !            29: #define PEPYPARM int *
        !            30:     
        !            31: 
        !            32: %}
        !            33: 
        !            34: BEGIN
        !            35: 
        !            36: SECTIONS build none none
        !            37: 
        !            38: UDQpdu ::= CHOICE <<1>>
        !            39: 
        !            40: {
        !            41:        udqpdu [7] IMPLICIT COupdate [[p (PEPYPARM)parm]]
        !            42: }
        !            43: 
        !            44: 
        !            45: COupdate 
        !            46: %{
        !            47:        TEXT_UPDATE     *ud = (TEXT_UPDATE *) parm;
        !            48:        CO_UPDATE       *arg = (CO_UPDATE *) &(ud->updates.co_list);
        !            49: %}
        !            50:        ::= SEQUENCE {
        !            51:                coName          PrintableString
        !            52:                        [[s arg->co_name]],
        !            53: 
        !            54:                objectUpdate    CHOICE <<arg->co_type + 1>> {
        !            55:                        characterUpdate [0] IMPLICIT PrintableString
        !            56:                        [[s arg->co_cmd.char_update]],
        !            57: 
        !            58:                        booleanUpdate [1] IMPLICIT SEQUENCE {
        !            59:                                values [0] IMPLICIT BITSTRING
        !            60:                                [[x arg->co_cmd.bool_update.value $ arg->co_cmd.bool_update.val_count]],
        !            61: 
        !            62:                                mask [1] IMPLICIT BITSTRING
        !            63:                                [[x arg->co_cmd.bool_update.mask $ arg->co_cmd.bool_update.mask_count]]
        !            64:                        },
        !            65: 
        !            66:                        symbolicUpdate [2] IMPLICIT INTEGER
        !            67:                        [[i arg->co_cmd.sym_update]],
        !            68: 
        !            69:                        integerUpdate [3] IMPLICIT INTEGER
        !            70:                        [[i arg->co_cmd.int_update]],
        !            71: 
        !            72:                        bitStringUpdate [4] IMPLICIT BITSTRING
        !            73:                        [[x int2strb (arg->co_cmd.bit_update.bitstring,
        !            74:                                      arg->co_cmd.bit_update.bitcount)
        !            75:                          $ arg->co_cmd.bit_update.bitcount]]
        !            76:                }
        !            77:        }
        !            78: END

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.