zephyr/lib/ZFmtAuth.c

   1 /* This file is part of the Project Athena Zephyr Notification System.
   2  * It contains source for the ZFormatAuthenticNotice function.
   3  *
   4  *      Created by:     Robert French
   5  *
   6  *      $Id$
   7  *
   8  *      Copyright (c) 1987,1988 by the Massachusetts Institute of Technology.
   9  *      For copying and distribution information, see the file
  10  *      "mit-copyright.h".
  11  */
  12
  13 #ifndef lint
  14 static char rcsid_ZFormatAuthenticNotice_c[] = "$Id$";
  15 #endif
  16
  17 #include <internal.h>
  18
  19 #if defined(HAVE_KRB4) || defined(HAVE_KRB5)
  20 Code_t
  21 ZFormatAuthenticNotice(ZNotice_t *notice,
  22                        register char *buffer,
  23                        register int buffer_len,
  24                        int *len,
  25                        C_Block session)
  26 {
  27     ZNotice_t newnotice;
  28     char *ptr;
  29     int retval, hdrlen;
  30
  31     newnotice = *notice;
  32     newnotice.z_auth = 1;
  33     newnotice.z_authent_len = 0;
  34     newnotice.z_ascii_authent = "";
  35
  36     if ((retval = Z_FormatRawHeader(&newnotice, buffer, buffer_len,
  37                                     &hdrlen, &ptr, NULL)) != ZERR_NONE)
  38         return (retval);
  39
  40 #ifdef NOENCRYPTION
  41     newnotice.z_checksum = 0;
  42 #else
  43     newnotice.z_checksum =
  44         (ZChecksum_t)des_quad_cksum(buffer, NULL, ptr - buffer, 0, session);
  45 #endif
  46     if ((retval = Z_FormatRawHeader(&newnotice, buffer, buffer_len,
  47                                     &hdrlen, NULL, NULL)) != ZERR_NONE)
  48         return (retval);
  49
  50     ptr = buffer+hdrlen;
  51
  52     if (newnotice.z_message_len+hdrlen > buffer_len)
  53         return (ZERR_PKTLEN);
  54
  55     (void) memcpy(ptr, newnotice.z_message, newnotice.z_message_len);
  56
  57     *len = hdrlen+newnotice.z_message_len;
  58
  59     if (*len > Z_MAXPKTLEN)
  60         return (ZERR_PKTLEN);
  61
  62     return (ZERR_NONE);
  63 }
  64 #endif
  65
  66 #ifdef HAVE_KRB5
  67 Code_t
  68 ZFormatAuthenticNoticeV5(ZNotice_t *notice,
  69                          register char *buffer,
  70                          register int buffer_len,
  71                          int *len,
  72                          krb5_keyblock *keyblock)
  73 {
  74     ZNotice_t newnotice;
  75     char *ptr;
  76     int retval, hdrlen, hdr_adj;
  77     krb5_enctype enctype;
  78     krb5_cksumtype cksumtype;
  79     int valid;
  80     char *svcinst, *x, *y;
  81     int key_len;
  82     char *cksum_start, *cstart, *cend;
  83     int cksum_len;
  84
  85     key_len = Z_keylen(keyblock);
  86     retval = Z_ExtractEncCksum(keyblock, &enctype, &cksumtype);
  87     if (retval)
  88          return (ZAUTH_FAILED);
  89
  90     if (key_len == 8 && (enctype == ENCTYPE_DES_CBC_CRC ||
  91                          enctype == ENCTYPE_DES_CBC_MD4 ||
  92                          enctype == ENCTYPE_DES_CBC_MD5)) {
  93          C_Block tmp;
  94          memcpy(&tmp, Z_keydata(keyblock), key_len);
  95          return ZFormatAuthenticNotice(notice, buffer, buffer_len, len,
  96                                        tmp);
  97     }
  98
  99     newnotice = *notice;
 100     newnotice.z_auth = 1;
 101     newnotice.z_authent_len = 0;
 102     newnotice.z_ascii_authent = "";
 103
 104     if ((retval = Z_NewFormatRawHeader(&newnotice, buffer, buffer_len,
 105                                        &hdrlen,
 106                                        &cksum_start, &cksum_len, &cstart,
 107                                        &cend)) != ZERR_NONE)
 108         return (retval);
 109
 110     retval = Z_InsertZcodeChecksum(keyblock, &newnotice, buffer,
 111                                    cksum_start, cksum_len, cstart, cend,
 112                                    buffer_len, &hdr_adj);
 113      if (retval)
 114           return retval;
 115
 116      hdrlen += hdr_adj;
 117
 118      ptr = buffer+hdrlen;
 119
 120      if (newnotice.z_message_len+hdrlen > buffer_len)
 121           return (ZERR_PKTLEN);
 122
 123      (void) memcpy(ptr, newnotice.z_message, newnotice.z_message_len);
 124
 125      *len = hdrlen+newnotice.z_message_len;
 126
 127      if (*len > Z_MAXPKTLEN)
 128           return (ZERR_PKTLEN);
 129
 130      return (ZERR_NONE);
 131 }
 132 #endif