dependencies/yaz_3.0.14/src/z-acckrb1.c

   1 /** \file z-acckrb1.c
   2     \brief ASN.1 Module AccessControlFormat-krb-1
   3
   4     Generated automatically by YAZ ASN.1 Compiler 0.4
   5 */
   6
   7 #include <yaz/z-acckrb1.h>
   8
   9 int z_KRBObject (ODR o, Z_KRBObject **p, int opt, const char *name)
  10 {
  11         static Odr_arm arm[] = {
  12                 {ODR_IMPLICIT, ODR_CONTEXT, 1, Z_KRBObject_challenge,
  13                 (Odr_fun) z_KRBRequest, "challenge"},
  14                 {ODR_IMPLICIT, ODR_CONTEXT, 2, Z_KRBObject_response,
  15                 (Odr_fun) z_KRBResponse, "response"},
  16                 {-1, -1, -1, -1, (Odr_fun) 0, 0}
  17         };
  18         if (!odr_initmember(o, p, sizeof(**p)))
  19                 return odr_missing(o, opt, name);
  20         if (odr_choice(o, arm, &(*p)->u, &(*p)->which, name))
  21                 return 1;
  22         if(o->direction == ODR_DECODE)
  23                 *p = 0;
  24         return odr_missing(o, opt, name);
  25 }
  26
  27 int z_KRBRequest (ODR o, Z_KRBRequest **p, int opt, const char *name)
  28 {
  29         if (!odr_sequence_begin (o, p, sizeof(**p), name))
  30                 return odr_missing(o, opt, name) && odr_ok (o);
  31         return
  32                 odr_implicit_tag (o, z_InternationalString,
  33                         &(*p)->service, ODR_CONTEXT, 1, 0, "service") &&
  34                 odr_implicit_tag (o, z_InternationalString,
  35                         &(*p)->instance, ODR_CONTEXT, 2, 1, "instance") &&
  36                 odr_implicit_tag (o, z_InternationalString,
  37                         &(*p)->realm, ODR_CONTEXT, 3, 1, "realm") &&
  38                 odr_sequence_end (o);
  39 }
  40
  41 int z_KRBResponse (ODR o, Z_KRBResponse **p, int opt, const char *name)
  42 {
  43         if (!odr_sequence_begin (o, p, sizeof(**p), name))
  44                 return odr_missing(o, opt, name) && odr_ok (o);
  45         return
  46                 odr_implicit_tag (o, z_InternationalString,
  47                         &(*p)->userid, ODR_CONTEXT, 1, 1, "userid") &&
  48                 odr_implicit_tag (o, odr_octetstring,
  49                         &(*p)->ticket, ODR_CONTEXT, 2, 0, "ticket") &&
  50                 odr_sequence_end (o);
  51 }