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