LXR linux/net/sunrpc/auth_gss/gss_krb5

   1/*
   2 *  linux/net/sunrpc/gss_krb5_seal.c
   3 *
   4 *  Adapted from MIT Kerberos 5-1.2.1 lib/gssapi/krb5/k5seal.c
   5 *
   6 *  Copyright (c) 2000-2008 The Regents of the University of Michigan.
   7 *  All rights reserved.
   8 *
   9 *  Andy Adamson        <andros@umich.edu>
  10 *  J. Bruce Fields     <bfields@umich.edu>
  11 */
  12
  13/*
  14 * Copyright 1993 by OpenVision Technologies, Inc.
  15 *
  16 * Permission to use, copy, modify, distribute, and sell this software
  17 * and its documentation for any purpose is hereby granted without fee,
  18 * provided that the above copyright notice appears in all copies and
  19 * that both that copyright notice and this permission notice appear in
  20 * supporting documentation, and that the name of OpenVision not be used
  21 * in advertising or publicity pertaining to distribution of the software
  22 * without specific, written prior permission. OpenVision makes no
  23 * representations about the suitability of this software for any
  24 * purpose.  It is provided "as is" without express or implied warranty.
  25 *
  26 * OPENVISION DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
  27 * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
  28 * EVENT SHALL OPENVISION BE LIABLE FOR ANY SPECIAL, INDIRECT OR
  29 * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
  30 * USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
  31 * OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
  32 * PERFORMANCE OF THIS SOFTWARE.
  33 */
  34
  35/*
  36 * Copyright (C) 1998 by the FundsXpress, INC.
  37 *
  38 * All rights reserved.
  39 *
  40 * Export of this software from the United States of America may require
  41 * a specific license from the United States Government.  It is the
  42 * responsibility of any person or organization contemplating export to
  43 * obtain such a license before exporting.
  44 *
  45 * WITHIN THAT CONSTRAINT, permission to use, copy, modify, and
  46 * distribute this software and its documentation for any purpose and
  47 * without fee is hereby granted, provided that the above copyright
  48 * notice appear in all copies and that both that copyright notice and
  49 * this permission notice appear in supporting documentation, and that
  50 * the name of FundsXpress. not be used in advertising or publicity pertaining
  51 * to distribution of the software without specific, written prior
  52 * permission.  FundsXpress makes no representations about the suitability of
  53 * this software for any purpose.  It is provided "as is" without express
  54 * or implied warranty.
  55 *
  56 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  57 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  58 * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  59 */
  60
  61#include <linux/types.h>
  62#include <linux/jiffies.h>
  63#include <linux/sunrpc/gss_krb5.h>
  64#include <linux/random.h>
  65#include <linux/crypto.h>
  66
  67#if IS_ENABLED(CONFIG_SUNRPC_DEBUG)
  68# define RPCDBG_FACILITY        RPCDBG_AUTH
  69#endif
  70
  71DEFINE_SPINLOCK(krb5_seq_lock);
  72
  73static void *
  74setup_token(struct krb5_ctx *ctx, struct xdr_netobj *token)
  75{
  76        u16 *ptr;
  77        void *krb5_hdr;
  78        int body_size = GSS_KRB5_TOK_HDR_LEN + ctx->gk5e->cksumlength;
  79
  80        token->len = g_token_size(&ctx->mech_used, body_size);
  81
  82        ptr = (u16 *)token->data;
  83        g_make_token_header(&ctx->mech_used, body_size, (unsigned char **)&ptr);
  84
  85        /* ptr now at start of header described in rfc 1964, section 1.2.1: */
  86        krb5_hdr = ptr;
  87        *ptr++ = KG_TOK_MIC_MSG;
  88        /*
  89         * signalg is stored as if it were converted from LE to host endian, even
  90         * though it's an opaque pair of bytes according to the RFC.
  91         */
  92        *ptr++ = (__force u16)cpu_to_le16(ctx->gk5e->signalg);
  93        *ptr++ = SEAL_ALG_NONE;
  94        *ptr = 0xffff;
  95
  96        return krb5_hdr;
  97}
  98
  99static void *
 100setup_token_v2(struct krb5_ctx *ctx, struct xdr_netobj *token)
 101{
 102        u16 *ptr;
 103        void *krb5_hdr;
 104        u8 *p, flags = 0x00;
 105
 106        if ((ctx->flags & KRB5_CTX_FLAG_INITIATOR) == 0)
 107                flags |= 0x01;
 108        if (ctx->flags & KRB5_CTX_FLAG_ACCEPTOR_SUBKEY)
 109                flags |= 0x04;
 110
 111        /* Per rfc 4121, sec 4.2.6.1, there is no header,
 112         * just start the token */
 113        krb5_hdr = ptr = (u16 *)token->data;
 114
 115        *ptr++ = KG2_TOK_MIC;
 116        p = (u8 *)ptr;
 117        *p++ = flags;
 118        *p++ = 0xff;
 119        ptr = (u16 *)p;
 120        *ptr++ = 0xffff;
 121        *ptr = 0xffff;
 122
 123        token->len = GSS_KRB5_TOK_HDR_LEN + ctx->gk5e->cksumlength;
 124        return krb5_hdr;
 125}
 126
 127static u32
 128gss_get_mic_v1(struct krb5_ctx *ctx, struct xdr_buf *text,
 129                struct xdr_netobj *token)
 130{
 131        char                    cksumdata[GSS_KRB5_MAX_CKSUM_LEN];
 132        struct xdr_netobj       md5cksum = {.len = sizeof(cksumdata),
 133                                            .data = cksumdata};
 134        void                    *ptr;
 135        s32                     now;
 136        u32                     seq_send;
 137        u8                      *cksumkey;
 138
 139        dprintk("RPC:       %s\n", __func__);
 140        BUG_ON(ctx == NULL);
 141
 142        now = get_seconds();
 143
 144        ptr = setup_token(ctx, token);
 145
 146        if (ctx->gk5e->keyed_cksum)
 147                cksumkey = ctx->cksum;
 148        else
 149                cksumkey = NULL;
 150
 151        if (make_checksum(ctx, ptr, 8, text, 0, cksumkey,
 152                          KG_USAGE_SIGN, &md5cksum))
 153                return GSS_S_FAILURE;
 154
 155        memcpy(ptr + GSS_KRB5_TOK_HDR_LEN, md5cksum.data, md5cksum.len);
 156
 157        spin_lock(&krb5_seq_lock);
 158        seq_send = ctx->seq_send++;
 159        spin_unlock(&krb5_seq_lock);
 160
 161        if (krb5_make_seq_num(ctx, ctx->seq, ctx->initiate ? 0 : 0xff,
 162                              seq_send, ptr + GSS_KRB5_TOK_HDR_LEN, ptr + 8))
 163                return GSS_S_FAILURE;
 164
 165        return (ctx->endtime < now) ? GSS_S_CONTEXT_EXPIRED : GSS_S_COMPLETE;
 166}
 167
 168static u32
 169gss_get_mic_v2(struct krb5_ctx *ctx, struct xdr_buf *text,
 170                struct xdr_netobj *token)
 171{
 172        char cksumdata[GSS_KRB5_MAX_CKSUM_LEN];
 173        struct xdr_netobj cksumobj = { .len = sizeof(cksumdata),
 174                                       .data = cksumdata};
 175        void *krb5_hdr;
 176        s32 now;
 177        u64 seq_send;
 178        u8 *cksumkey;
 179        unsigned int cksum_usage;
 180        __be64 seq_send_be64;
 181
 182        dprintk("RPC:       %s\n", __func__);
 183
 184        krb5_hdr = setup_token_v2(ctx, token);
 185
 186        /* Set up the sequence number. Now 64-bits in clear
 187         * text and w/o direction indicator */
 188        spin_lock(&krb5_seq_lock);
 189        seq_send = ctx->seq_send64++;
 190        spin_unlock(&krb5_seq_lock);
 191
 192        seq_send_be64 = cpu_to_be64(seq_send);
 193        memcpy(krb5_hdr + 8, (char *) &seq_send_be64, 8);
 194
 195        if (ctx->initiate) {
 196                cksumkey = ctx->initiator_sign;
 197                cksum_usage = KG_USAGE_INITIATOR_SIGN;
 198        } else {
 199                cksumkey = ctx->acceptor_sign;
 200                cksum_usage = KG_USAGE_ACCEPTOR_SIGN;
 201        }
 202
 203        if (make_checksum_v2(ctx, krb5_hdr, GSS_KRB5_TOK_HDR_LEN,
 204                             text, 0, cksumkey, cksum_usage, &cksumobj))
 205                return GSS_S_FAILURE;
 206
 207        memcpy(krb5_hdr + GSS_KRB5_TOK_HDR_LEN, cksumobj.data, cksumobj.len);
 208
 209        now = get_seconds();
 210
 211        return (ctx->endtime < now) ? GSS_S_CONTEXT_EXPIRED : GSS_S_COMPLETE;
 212}
 213
 214u32
 215gss_get_mic_kerberos(struct gss_ctx *gss_ctx, struct xdr_buf *text,
 216                     struct xdr_netobj *token)
 217{
 218        struct krb5_ctx         *ctx = gss_ctx->internal_ctx_id;
 219
 220        switch (ctx->enctype) {
 221        default:
 222                BUG();
 223        case ENCTYPE_DES_CBC_RAW:
 224        case ENCTYPE_DES3_CBC_RAW:
 225        case ENCTYPE_ARCFOUR_HMAC:
 226                return gss_get_mic_v1(ctx, text, token);
 227        case ENCTYPE_AES128_CTS_HMAC_SHA1_96:
 228        case ENCTYPE_AES256_CTS_HMAC_SHA1_96:
 229                return gss_get_mic_v2(ctx, text, token);
 230        }
 231}
 232
 233