crypto/openssh-3.8.1p1/kexgex.c

   1 /*
   2  * Copyright (c) 2000 Niels Provos.  All rights reserved.
   3  * Copyright (c) 2001 Markus Friedl.  All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  15  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  16  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  17  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  18  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  19  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  20  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  21  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  22  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  23  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  24  */
  25
  26 #include "includes.h"
  27 RCSID("$OpenBSD: kexgex.c,v 1.23 2003/02/16 17:09:57 markus Exp $");
  28
  29 #include <openssl/evp.h>
  30
  31 #include "buffer.h"
  32 #include "bufaux.h"
  33 #include "kex.h"
  34 #include "ssh2.h"
  35
  36 u_char *
  37 kexgex_hash(
  38     char *client_version_string,
  39     char *server_version_string,
  40     char *ckexinit, int ckexinitlen,
  41     char *skexinit, int skexinitlen,
  42     u_char *serverhostkeyblob, int sbloblen,
  43     int min, int wantbits, int max, BIGNUM *prime, BIGNUM *gen,
  44     BIGNUM *client_dh_pub,
  45     BIGNUM *server_dh_pub,
  46     BIGNUM *shared_secret)
  47 {
  48         Buffer b;
  49         static u_char digest[EVP_MAX_MD_SIZE];
  50         const EVP_MD *evp_md = EVP_sha1();
  51         EVP_MD_CTX md;
  52
  53         buffer_init(&b);
  54         buffer_put_cstring(&b, client_version_string);
  55         buffer_put_cstring(&b, server_version_string);
  56
  57         /* kexinit messages: fake header: len+SSH2_MSG_KEXINIT */
  58         buffer_put_int(&b, ckexinitlen+1);
  59         buffer_put_char(&b, SSH2_MSG_KEXINIT);
  60         buffer_append(&b, ckexinit, ckexinitlen);
  61         buffer_put_int(&b, skexinitlen+1);
  62         buffer_put_char(&b, SSH2_MSG_KEXINIT);
  63         buffer_append(&b, skexinit, skexinitlen);
  64
  65         buffer_put_string(&b, serverhostkeyblob, sbloblen);
  66         if (min == -1 || max == -1)
  67                 buffer_put_int(&b, wantbits);
  68         else {
  69                 buffer_put_int(&b, min);
  70                 buffer_put_int(&b, wantbits);
  71                 buffer_put_int(&b, max);
  72         }
  73         buffer_put_bignum2(&b, prime);
  74         buffer_put_bignum2(&b, gen);
  75         buffer_put_bignum2(&b, client_dh_pub);
  76         buffer_put_bignum2(&b, server_dh_pub);
  77         buffer_put_bignum2(&b, shared_secret);
  78
  79 #ifdef DEBUG_KEXDH
  80         buffer_dump(&b);
  81 #endif
  82         EVP_DigestInit(&md, evp_md);
  83         EVP_DigestUpdate(&md, buffer_ptr(&b), buffer_len(&b));
  84         EVP_DigestFinal(&md, digest, NULL);
  85
  86         buffer_free(&b);
  87
  88 #ifdef DEBUG_KEXDH
  89         dump_digest("hash", digest, EVP_MD_size(evp_md));
  90 #endif
  91         return digest;
  92 }