Cleanse buffers
Cleanse various intermediate buffers used by the PRF.
Reviewed-by: Richard Levitte <levitte@openssl.org>
diff --git a/ssl/s3_enc.c b/ssl/s3_enc.c
index 8dda5d0..83a576a 100644
--- a/ssl/s3_enc.c
+++ b/ssl/s3_enc.c
@@ -871,6 +871,7 @@
s, s->msg_callback_arg);
}
#endif
+ OPENSSL_cleanse(buf, sizeof buf);
return (ret);
}
diff --git a/ssl/t1_enc.c b/ssl/t1_enc.c
index 6fad8be..1833eb7 100644
--- a/ssl/t1_enc.c
+++ b/ssl/t1_enc.c
@@ -949,6 +949,8 @@
s->session->master_key, s->session->master_key_length,
out, buf2, sizeof buf2))
return 0;
+ OPENSSL_cleanse(hash, hashlen);
+ OPENSSL_cleanse(buf2, sizeof(buf2));
return sizeof buf2;
}
@@ -1112,6 +1114,7 @@
s->s3->server_random, SSL3_RANDOM_SIZE,
NULL, 0, p, len, s->session->master_key, buff, sizeof buff);
}
+ OPENSSL_cleanse(buff, sizeof buff);
#ifdef SSL_DEBUG
fprintf(stderr, "Premaster Secret:\n");
BIO_dump_fp(stderr, (char *)p, len);
@@ -1225,6 +1228,8 @@
NULL, 0,
s->session->master_key, s->session->master_key_length,
out, buff, olen);
+ OPENSSL_cleanse(val, vallen);
+ OPENSSL_cleanse(buff, olen);
#ifdef KSSL_DEBUG
fprintf(stderr, "tls1_export_keying_material() complete\n");