1999-10-27 03:42:43 +00:00
|
|
|
/*
|
1999-11-24 13:26:21 +00:00
|
|
|
*
|
|
|
|
* mpaux.c
|
|
|
|
*
|
|
|
|
* Author: Tatu Ylonen <ylo@cs.hut.fi>
|
|
|
|
*
|
|
|
|
* Copyright (c) 1995 Tatu Ylonen <ylo@cs.hut.fi>, Espoo, Finland
|
|
|
|
* All rights reserved
|
|
|
|
*
|
|
|
|
* Created: Sun Jul 16 04:29:30 1995 ylo
|
|
|
|
*
|
|
|
|
* This file contains various auxiliary functions related to multiple
|
|
|
|
* precision integers.
|
|
|
|
*
|
1999-10-27 03:42:43 +00:00
|
|
|
*/
|
|
|
|
|
|
|
|
#include "includes.h"
|
2000-04-01 01:09:21 +00:00
|
|
|
RCSID("$Id: mpaux.c,v 1.9 2000/04/01 01:09:24 damien Exp $");
|
1999-11-24 13:26:21 +00:00
|
|
|
|
|
|
|
#include "getput.h"
|
|
|
|
#include "xmalloc.h"
|
1999-10-27 03:42:43 +00:00
|
|
|
|
1999-10-28 03:25:17 +00:00
|
|
|
#ifdef HAVE_OPENSSL
|
1999-10-27 03:42:43 +00:00
|
|
|
#include <openssl/bn.h>
|
1999-10-28 03:25:17 +00:00
|
|
|
#include <openssl/md5.h>
|
|
|
|
#endif
|
|
|
|
#ifdef HAVE_SSL
|
|
|
|
#include <ssl/bn.h>
|
|
|
|
#include <ssl/md5.h>
|
|
|
|
#endif
|
|
|
|
|
1999-10-27 03:42:43 +00:00
|
|
|
void
|
|
|
|
compute_session_id(unsigned char session_id[16],
|
2000-04-01 01:09:21 +00:00
|
|
|
unsigned char cookie[8],
|
|
|
|
BIGNUM* host_key_n,
|
|
|
|
BIGNUM* session_key_n)
|
1999-10-27 03:42:43 +00:00
|
|
|
{
|
1999-12-13 23:47:15 +00:00
|
|
|
unsigned int host_key_bytes = BN_num_bytes(host_key_n);
|
|
|
|
unsigned int session_key_bytes = BN_num_bytes(session_key_n);
|
|
|
|
unsigned int bytes = host_key_bytes + session_key_bytes;
|
1999-11-24 13:26:21 +00:00
|
|
|
unsigned char *buf = xmalloc(bytes);
|
|
|
|
MD5_CTX md;
|
|
|
|
|
|
|
|
BN_bn2bin(host_key_n, buf);
|
1999-12-13 23:47:15 +00:00
|
|
|
BN_bn2bin(session_key_n, buf + host_key_bytes);
|
1999-11-24 13:26:21 +00:00
|
|
|
MD5_Init(&md);
|
|
|
|
MD5_Update(&md, buf, bytes);
|
1999-12-13 23:47:15 +00:00
|
|
|
MD5_Update(&md, cookie, 8);
|
1999-11-24 13:26:21 +00:00
|
|
|
MD5_Final(session_id, &md);
|
|
|
|
memset(buf, 0, bytes);
|
|
|
|
xfree(buf);
|
1999-10-27 03:42:43 +00:00
|
|
|
}
|