|
|
1.1 ! root 1: -- th-dec.py - Thorn and RARE defined attribute sytaxes ! 2: ! 3: -- $Header: /f/osi/dsap/x500as/RCS/th-dec.py,v 7.0 89/11/23 21:50:53 mrose Rel $ ! 4: -- ! 5: -- ! 6: -- $Log: th-dec.py,v $ ! 7: -- Revision 7.0 89/11/23 21:50:53 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: Thorn ! 23: { ! 24: ccitt ! 25: data(9) ! 26: pss(2342) ! 27: ucl(19200300) ! 28: thorn(100) ! 29: directoryDefinitions(1) ! 30: } ! 31: ! 32: DEFINITIONS ::= ! 33: ! 34: %{ ! 35: #include <stdio.h> ! 36: #include "quipu/util.h" ! 37: #include "quipu/entry.h" ! 38: ! 39: extern LLog * log_dsap; ! 40: ! 41: #define decode_UNIV_PrintableString parse_UNIV_PrintableString ! 42: #define decode_UNIV_IA5String parse_UNIV_IA5String ! 43: ! 44: %} ! 45: ! 46: PREFIXES encode decode print ! 47: ! 48: BEGIN ! 49: ! 50: DECODER decode ! 51: ! 52: MailBox [[P struct mailbox *]] ! 53: ::= ! 54: %{ ! 55: DLOG(log_dsap, LLOG_TRACE, ("About to decode MailBox")); ! 56: %} ! 57: SEQUENCE ! 58: { ! 59: mailboxType ! 60: PrintableString [[s parm->mtype]], ! 61: mailbox ! 62: IA5String [[s parm->mbox]] ! 63: } ! 64: %{ ! 65: DLOG(log_dsap, LLOG_TRACE, ("Done decode MailBox")); ! 66: %} ! 67: ! 68: END
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.