asn/prt-acc.c

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