odr/test.c

   1 #include <stdio.h>
   2 #include <odr.h>
   3 #include <odr_use.h>
   4
   5 #if 0
   6
   7 typedef Odr_bitmask Z_ReferenceId;
   8
   9 typedef struct Z_InitRequest
  10 {
  11     Z_ReferenceId *referenceId;    /* OPTIONAL */
  12     Odr_bitmask *options;
  13     Odr_bitmask *protocolVersion;
  14     int *preferredMessageSize;
  15     int *maximumRecordSize;
  16     char *idAuthentication;      /* OPTIONAL */
  17     char *implementationId;      /* OPTIONAL */
  18     char *implementationName;    /* OPTIONAL */
  19     char *implementationVersion; /* OPTIONAL */
  20 } Z_InitRequest;
  21
  22 int z_ReferenceId(ODR o, Z_ReferenceId **p, int opt)
  23 {
  24     return odr_implicit(o, odr_octetstring, (Odr_oct**) p, ODR_CONTEXT, 2, opt);
  25 }
  26
  27 int z_InitRequest(ODR o, Z_InitRequest **p, int opt)
  28 {
  29     Z_InitRequest *pp;
  30
  31     if (!odr_sequence_begin(o, p, sizeof(Z_InitRequest)))
  32         return opt;
  33     pp = *p;
  34     return
  35         z_ReferenceId(o, &pp->referenceId, 1) &&
  36         odr_implicit(o, odr_bitstring, &pp->protocolVersion, ODR_CONTEXT,
  37             3, 0) &&
  38         odr_implicit(o, odr_bitstring, &pp->options, ODR_CONTEXT, 4, 0) &&
  39         odr_implicit(o, odr_integer, &pp->preferredMessageSize, ODR_CONTEXT,
  40             5, 0) &&
  41         odr_implicit(o, odr_integer, &pp->maximumRecordSize, ODR_CONTEXT,
  42             6, 0) &&
  43         odr_implicit(o, odr_visiblestring, &pp->idAuthentication, ODR_CONTEXT,
  44             7, 1) &&
  45         odr_implicit(o, odr_visiblestring, &pp->implementationId, ODR_CONTEXT,
  46             110, 1) &&
  47         odr_implicit(o, odr_visiblestring, &pp->implementationName, ODR_CONTEXT,
  48             111, 1) &&
  49         odr_implicit(o, odr_visiblestring, &pp->implementationVersion,
  50             ODR_CONTEXT, 112, 1) &&
  51         odr_sequence_end(o);
  52 }
  53
  54 struct A
  55 {
  56     int which;
  57     union
  58     {
  59         int *b;   /* integer */
  60         char *c;  /* visstring */
  61     } u;
  62 };
  63
  64 int f_A(ODR o, struct A **p, int opt)
  65 {
  66     int res;
  67     Odr_arm arm[] =
  68     {
  69         { -1, -1, -1, 0, (Odr_fun) odr_integer },
  70         { ODR_IMPLICIT, ODR_CONTEXT, 200, 1, (Odr_fun) odr_visiblestring },
  71         { -1, -1, -1, -1, 0 }
  72     };
  73
  74     if (o->direction == ODR_DECODE && !*p)
  75         *p = odr_malloc(o, sizeof(**p));
  76     res = odr_choice(o, arm, &(*p)->u, &(*p)->which);
  77     if (!res)
  78     {
  79         *p = 0;
  80         return opt;
  81     }
  82     return 1;
  83 }
  84
  85 #if 0
  86 int main()
  87 {
  88     int i;
  89     unsigned char buf[4048];
  90     struct odr o;
  91     Z_InitRequest ireq, *ireqp, *ireq2p;
  92     Odr_bitmask options, protocolVersion;
  93     char *iId = "YAZ", *iName = "Yet Another Z39.50 Implementation",
  94         *iVersion = "0.1";
  95     int maximumRS = 4096, preferredMS = 2048;
  96     static Odr_oid oid[] = {1, 2, 3, 4, -1}, *oidp1, *oidp2;
  97
  98     oidp1 = oid;
  99
 100     ODR_MASK_ZERO(&protocolVersion);
 101     ODR_MASK_SET(&protocolVersion, 0);
 102     ODR_MASK_SET(&protocolVersion, 1);
 103
 104     ODR_MASK_ZERO(&options);
 105     ODR_MASK_SET(&options, 0);
 106     ODR_MASK_SET(&options, 1);
 107     ODR_MASK_SET(&options, 2);
 108
 109     ireq.referenceId = 0;
 110     ireq.protocolVersion = &protocolVersion;
 111     ireq.options = &options;
 112     ireq.preferredMessageSize = &preferredMS;
 113     ireq.maximumRecordSize = &maximumRS;
 114     ireq.idAuthentication = 0;
 115     ireq.implementationId = iId;
 116     ireq.implementationName = iName;
 117     ireq.implementationVersion = iVersion;
 118     ireqp = &ireq;
 119
 120     o.buf = buf;
 121     o.bp=o.buf;
 122     o.left = o.buflen = 1024;
 123     o.direction = ODR_PRINT;
 124     o.print = stdout;
 125     o.t_class = -1;
 126
 127     odr_oid(&o, &oidp1, 0);
 128
 129     exit(0);
 130
 131     o.direction = ODR_DECODE;
 132     o.bp = o.buf;
 133
 134     odr_oid(&o, &oidp2, 0);
 135 }
 136 #endif
 137
 138 #endif
 139
 140 int main()
 141 {
 142     Odr_bitmask a;
 143     char command;
 144     int val;
 145     char line[100];
 146
 147     ODR_MASK_ZERO(&a);
 148     while (gets(line))
 149     {
 150         int i;
 151
 152         sscanf(line, "%c %d", &command, &val);
 153         switch (command)
 154         {
 155             case 's': ODR_MASK_SET(&a, val); break;
 156             case 'c': ODR_MASK_CLEAR(&a, val); break;
 157             case 'g': printf("%d\n", ODR_MASK_GET(&a, val)); break;
 158             case 'l': break;
 159             default: printf("enter c <v> or s <v> or l\n"); continue;
 160         }
 161         printf("top is %d\n", a.top);
 162         for (i = 0; i <= a.top; i++)
 163             printf("%2.2x ", a.bits[i] );
 164         printf("\n");
 165      }
 166 }