asn/prt-acc.c

   1 /*
   2  * Copyright (c) 1995, Index Data.
   3  * See the file LICENSE for details.
   4  * Sebastian Hammer, Adam Dickmeiss
   5  *
   6  * $Log: prt-acc.c,v $
   7  * Revision 1.2  1995-06-05 10:52:05  quinn
   8  * Fixed some negligences.
   9  *
  10  * Revision 1.1  1995/06/02  09:49:15  quinn
  11  * Adding access control
  12  *
  13  *
  14  */
  15
  16 #include <proto.h>
  17
  18 int z_Encryption1(ODR o, Z_Encryption1 **p, int opt)
  19 {
  20     if (!odr_sequence_begin(o, p, sizeof(**p)))
  21         return opt && odr_ok(o);
  22     return
  23         odr_implicit(o, odr_octetstring, &(*p)->cryptType, ODR_CONTEXT, 1, 1) &&
  24         odr_implicit(o, odr_octetstring, &(*p)->credential, ODR_CONTEXT, 2,
  25             1) &&
  26         odr_implicit(o, odr_octetstring, &(*p)->data, ODR_CONTEXT, 3, 0) &&
  27         odr_sequence_end(o);
  28 }
  29
  30 int z_EnumeratedPrompt1(ODR o, Z_EnumeratedPrompt1 **p, int opt)
  31 {
  32     if (!odr_sequence_begin(o, p, sizeof(**p)))
  33         return opt && odr_ok(o);
  34     return
  35         odr_implicit(o, odr_integer, &(*p)->type, ODR_CONTEXT, 1, 0) &&
  36         odr_implicit(o, odr_visiblestring, &(*p)->suggestedString, ODR_CONTEXT,
  37             2, 1) &&
  38         odr_sequence_end(o);
  39 }
  40
  41 int z_PromptId1(ODR o, Z_PromptId1 **p, int opt)
  42 {
  43     static Odr_arm arm[] =
  44     {
  45         {ODR_IMPLICIT, ODR_CONTEXT, 1, Z_PromptId1_enumeratedPrompt,
  46             z_EnumeratedPrompt1},
  47         {ODR_IMPLICIT, ODR_CONTEXT, 2, Z_PromptId1_nonEnumeratedPrompt,
  48             odr_visiblestring},
  49         {-1, -1, -1, -1, 0}
  50     };
  51
  52     if (o->direction == ODR_DECODE)
  53         *p = odr_malloc(o, sizeof(**p));
  54     else if (!*p)
  55         return opt;
  56     if (odr_choice(o, arm, &(*p)->u, &(*p)->which))
  57         return 1;
  58     *p = 0;
  59     return opt && odr_ok(o);
  60 }
  61
  62 int z_PromptInfo1(ODR o, Z_PromptInfo1 **p, int opt)
  63 {
  64     static Odr_arm arm[] =
  65     {
  66         {ODR_IMPLICIT, ODR_CONTEXT, 1, Z_Challenge1_character,
  67             odr_visiblestring},
  68         {ODR_IMPLICIT, ODR_CONTEXT, 2, Z_Challenge1_encrypted,
  69             z_Encryption1},
  70         {-1, -1, -1, -1, 0}
  71     };
  72
  73     if (o->direction == ODR_DECODE)
  74         *p = odr_malloc(o, sizeof(**p));
  75     else if (!*p)
  76         return opt;
  77     if (odr_choice(o, arm, &(*p)->u, &(*p)->which))
  78         return 1;
  79     *p = 0;
  80     return opt && odr_ok(o);
  81 }
  82
  83 int z_ChallengeUnit1(ODR o, Z_ChallengeUnit1 **p, int opt)
  84 {
  85     if (!odr_sequence_begin(o, p, sizeof(**p)))
  86         return opt && odr_ok(o);
  87     return
  88         odr_explicit(o, z_PromptId1, &(*p)->promptId, ODR_CONTEXT, 1, 0) &&
  89         odr_implicit(o, odr_visiblestring, &(*p)->defaultResponse, ODR_CONTEXT,
  90             2, 1) &&
  91         odr_explicit(o, z_PromptInfo1, &(*p)->promptInfo, ODR_CONTEXT, 3, 1) &&
  92         odr_implicit(o, odr_visiblestring, &(*p)->regExpr, ODR_CONTEXT, 4, 1) &&
  93         odr_implicit(o, odr_null, &(*p)->responseRequired, ODR_CONTEXT, 5, 1) &&
  94         odr_implicit_settag(o, ODR_CONTEXT, 6) &&
  95         (odr_sequence_of(o, odr_visiblestring, &(*p)->allowedValues,
  96             &(*p)->num_values) || odr_ok(o)) &&
  97         odr_implicit(o, odr_null, &(*p)->shouldSave, ODR_CONTEXT, 7, 1) &&
  98         odr_implicit(o, odr_integer, &(*p)->dataType, ODR_CONTEXT, 8, 1) &&
  99         odr_sequence_end(o);
 100 }
 101
 102 int z_Challenge1(ODR o, Z_Challenge1 **p, int opt)
 103 {
 104     if (o->direction == ODR_ENCODE)
 105         *p = odr_malloc(o, sizeof(**p));
 106     else if (!*p)
 107         return opt;
 108     if (odr_sequence_of(o, z_ChallengeUnit1, &(*p)->list,
 109         &(*p)->num_challenges))
 110         return 1;
 111     *p = 0;
 112     return opt && odr_ok(o);
 113 }
 114
 115 int z_DiagRec(ODR, Z_DiagRec **, int);
 116
 117 int z_ResponseUnit1(ODR o, Z_ResponseUnit1 **p, int opt)
 118 {
 119     static Odr_arm arm[] =
 120     {
 121         {ODR_IMPLICIT, ODR_CONTEXT, 1, Z_Response1_string, odr_visiblestring},
 122         {ODR_IMPLICIT, ODR_CONTEXT, 2, Z_Response1_accept, odr_bool},
 123         {ODR_IMPLICIT, ODR_CONTEXT, 3, Z_Response1_acknowledge, odr_null},
 124         {ODR_EXPLICIT, ODR_CONTEXT, 4, Z_Response1_diagnostic, z_DiagRec},
 125         {ODR_IMPLICIT, ODR_CONTEXT, 5, Z_Response1_encrypted, z_Encryption1},
 126         {-1, -1, -1, -1, 0}
 127     };
 128
 129     if (odr_sequence_begin(o, p, sizeof(**p)))
 130         return opt && odr_ok(o);
 131     return
 132         odr_explicit(o, z_PromptId1, &(*p)->promptId, ODR_CONTEXT, 1, 0) &&
 133         odr_constructed_begin(o, p, ODR_CONTEXT, 2) &&
 134         odr_choice(o, arm, &(*p)->u, &(*p)->which) &&
 135         odr_constructed_end(o) &&
 136         odr_sequence_end(o);
 137 }
 138
 139 int z_Response1(ODR o, Z_Response1 **p, int opt)
 140 {
 141     if (o->direction == ODR_ENCODE)
 142         *p = odr_malloc(o, sizeof(**p));
 143     else if (!*p)
 144         return opt;
 145     if (odr_sequence_of(o, z_ResponseUnit1, &(*p)->list,
 146         &(*p)->num_responses))
 147         return 1;
 148     *p = 0;
 149     return opt && odr_ok(o);
 150 }
 151
 152 int z_PromptObject1(ODR o, Z_PromptObject1 **p, int opt)
 153 {
 154     static Odr_arm arm[] =
 155     {
 156         {ODR_IMPLICIT, ODR_CONTEXT, 1, Z_PromptObject1_challenge, z_Challenge1},
 157         {ODR_IMPLICIT, ODR_CONTEXT, 2, Z_PromptObject1_response, z_Response1},
 158         {-1, -1, -1, -1, 0}
 159     };
 160
 161     if (o->direction == ODR_DECODE)
 162         *p = odr_malloc(o, sizeof(**p));
 163     else if (!*p)
 164         return opt;
 165     if (odr_choice(o, arm, &(*p)->u, &(*p)->which))
 166         return 1;
 167     *p = 0;
 168     return opt && odr_ok(o);
 169 }