| | 1 | /* |
| | 2 | * Author: Tatu Ylonen <ylo@cs.hut.fi> |
| | 3 | * Copyright (c) 1995 Tatu Ylonen <ylo@cs.hut.fi>, Espoo, Finland |
| | 4 | * All rights reserved |
| | 5 | * This file contains various auxiliary functions related to multiple |
| | 6 | * precision integers. |
| | 7 | * |
| | 8 | * As far as I am concerned, the code I have written for this software |
| | 9 | * can be used freely for any purpose. Any derived versions of this |
| | 10 | * software must be clearly marked as such, and if the derived work is |
| | 11 | * incompatible with the protocol description in the RFC file, it must be |
| | 12 | * called by a name other than "ssh" or "Secure Shell". |
| | 13 | */ |
| | 14 | |
| | 15 | #include "includes.h" |
| | 16 | RCSID("$OpenBSD: mpaux.c,v 1.14 2000/09/07 20:27:52 deraadt Exp $"); |
| | 17 | |
| | 18 | #include <openssl/bn.h> |
| | 19 | #include "getput.h" |
| | 20 | #include "xmalloc.h" |
| | 21 | |
| | 22 | #include <openssl/md5.h> |
| | 23 | |
| | 24 | void |
| | 25 | compute_session_id(unsigned char session_id[16], |
| | 26 | unsigned char cookie[8], |
| | 27 | BIGNUM* host_key_n, |
| | 28 | BIGNUM* session_key_n) |
| | 29 | { |
| | 30 | unsigned int host_key_bytes = BN_num_bytes(host_key_n); |
| | 31 | unsigned int session_key_bytes = BN_num_bytes(session_key_n); |
| | 32 | unsigned int bytes = host_key_bytes + session_key_bytes; |
| | 33 | unsigned char *buf = xmalloc(bytes); |
| | 34 | MD5_CTX md; |
| | 35 | |
| | 36 | BN_bn2bin(host_key_n, buf); |
| | 37 | BN_bn2bin(session_key_n, buf + host_key_bytes); |
| | 38 | MD5_Init(&md); |
| | 39 | MD5_Update(&md, buf, bytes); |
| | 40 | MD5_Update(&md, cookie, 8); |
| | 41 | MD5_Final(session_id, &md); |
| | 42 | memset(buf, 0, bytes); |
| | 43 | xfree(buf); |
| | 44 | } |
andersk / openssh.git / blame_incremental