|
Packit Service |
4684c1 |
/*
|
|
Packit Service |
4684c1 |
* Copyright (C) 2002-2015 Free Software Foundation, Inc.
|
|
Packit Service |
4684c1 |
* Copyright (C) 2014-2015 Nikos Mavrogiannopoulos
|
|
Packit Service |
4684c1 |
* Copyright (C) 2016-2017 Red Hat, Inc.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Author: Nikos Mavrogiannopoulos
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* This file is part of GnuTLS.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* The GnuTLS is free software; you can redistribute it and/or
|
|
Packit Service |
4684c1 |
* modify it under the terms of the GNU Lesser General Public License
|
|
Packit Service |
4684c1 |
* as published by the Free Software Foundation; either version 2.1 of
|
|
Packit Service |
4684c1 |
* the License, or (at your option) any later version.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* This library is distributed in the hope that it will be useful, but
|
|
Packit Service |
4684c1 |
* WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
Packit Service |
4684c1 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Packit Service |
4684c1 |
* Lesser General Public License for more details.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* You should have received a copy of the GNU Lesser General Public License
|
|
Packit Service |
4684c1 |
* along with this program. If not, see <https://www.gnu.org/licenses/>
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
*/
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
/* Functions for the TLS PRF handling.
|
|
Packit Service |
4684c1 |
*/
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
#include "gnutls_int.h"
|
|
Packit Service |
4684c1 |
#include "errors.h"
|
|
Packit Service |
4684c1 |
#include "handshake.h"
|
|
Packit Service |
4684c1 |
#include "secrets.h"
|
|
Packit Service |
4684c1 |
#include <num.h>
|
|
Packit Service |
4684c1 |
#include <state.h>
|
|
Packit Service |
4684c1 |
#include <algorithms.h>
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
/**
|
|
Packit Service |
4684c1 |
* gnutls_prf_raw:
|
|
Packit Service |
4684c1 |
* @session: is a #gnutls_session_t type.
|
|
Packit Service |
4684c1 |
* @label_size: length of the @label variable.
|
|
Packit Service |
4684c1 |
* @label: label used in PRF computation, typically a short string.
|
|
Packit Service |
4684c1 |
* @seed_size: length of the @seed variable.
|
|
Packit Service |
4684c1 |
* @seed: optional extra data to seed the PRF with.
|
|
Packit Service |
4684c1 |
* @outsize: size of pre-allocated output buffer to hold the output.
|
|
Packit Service |
4684c1 |
* @out: pre-allocated buffer to hold the generated data.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Apply the TLS Pseudo-Random-Function (PRF) on the master secret
|
|
Packit Service |
4684c1 |
* and the provided data.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* The @label variable usually contains a string denoting the purpose
|
|
Packit Service |
4684c1 |
* for the generated data. The @seed usually contains data such as the
|
|
Packit Service |
4684c1 |
* client and server random, perhaps together with some additional
|
|
Packit Service |
4684c1 |
* data that is added to guarantee uniqueness of the output for a
|
|
Packit Service |
4684c1 |
* particular purpose.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Because the output is not guaranteed to be unique for a particular
|
|
Packit Service |
4684c1 |
* session unless @seed includes the client random and server random
|
|
Packit Service |
4684c1 |
* fields (the PRF would output the same data on another connection
|
|
Packit Service |
4684c1 |
* resumed from the first one), it is not recommended to use this
|
|
Packit Service |
4684c1 |
* function directly. The gnutls_prf() function seeds the PRF with the
|
|
Packit Service |
4684c1 |
* client and server random fields directly, and is recommended if you
|
|
Packit Service |
4684c1 |
* want to generate pseudo random data unique for each session.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Note: This function will only operate under TLS versions prior to 1.3.
|
|
Packit Service |
4684c1 |
* In TLS1.3 the use of PRF is replaced with HKDF and the generic
|
|
Packit Service |
4684c1 |
* exporters like gnutls_prf_rfc5705() should be used instead. Under
|
|
Packit Service |
4684c1 |
* TLS1.3 this function returns %GNUTLS_E_INVALID_REQUEST.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Returns: %GNUTLS_E_SUCCESS on success, or an error code.
|
|
Packit Service |
4684c1 |
**/
|
|
Packit Service |
4684c1 |
int
|
|
Packit Service |
4684c1 |
gnutls_prf_raw(gnutls_session_t session,
|
|
Packit Service |
4684c1 |
size_t label_size,
|
|
Packit Service |
4684c1 |
const char *label,
|
|
Packit Service |
4684c1 |
size_t seed_size, const char *seed, size_t outsize,
|
|
Packit Service |
4684c1 |
char *out)
|
|
Packit Service |
4684c1 |
{
|
|
Packit Service |
4684c1 |
int ret;
|
|
Packit Service |
4684c1 |
const version_entry_st *vers = get_version(session);
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
if (vers && vers->tls13_sem)
|
|
Packit Service |
4684c1 |
return gnutls_assert_val(GNUTLS_E_INVALID_REQUEST);
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
if (session->security_parameters.prf == NULL)
|
|
Packit Service |
4684c1 |
return gnutls_assert_val(GNUTLS_E_INVALID_REQUEST);
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
ret = _gnutls_prf_raw(session->security_parameters.prf->id,
|
|
Packit Service |
4684c1 |
GNUTLS_MASTER_SIZE, session->security_parameters.master_secret,
|
|
Packit Service |
4684c1 |
label_size, label,
|
|
Packit Service |
4684c1 |
seed_size, (uint8_t *) seed,
|
|
Packit Service |
4684c1 |
outsize, out);
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
return ret;
|
|
Packit Service |
4684c1 |
}
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
static int
|
|
Packit Service |
4684c1 |
_tls13_derive_exporter(const mac_entry_st *prf,
|
|
Packit Service |
4684c1 |
gnutls_session_t session,
|
|
Packit Service |
4684c1 |
size_t label_size, const char *label,
|
|
Packit Service |
4684c1 |
size_t context_size, const char *context,
|
|
Packit Service |
4684c1 |
size_t outsize, char *out,
|
|
Packit Service |
4684c1 |
bool early)
|
|
Packit Service |
4684c1 |
{
|
|
Packit Service |
4684c1 |
uint8_t secret[MAX_HASH_SIZE];
|
|
Packit Service |
4684c1 |
uint8_t digest[MAX_HASH_SIZE];
|
|
Packit Service |
4684c1 |
unsigned digest_size = prf->output_size;
|
|
Packit Service |
4684c1 |
int ret;
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
ret = _tls13_derive_secret2(prf, label, label_size, NULL, 0,
|
|
Packit Service |
4684c1 |
session->key.proto.tls13.ap_expkey,
|
|
Packit Service |
4684c1 |
secret);
|
|
Packit Service |
4684c1 |
if (ret < 0)
|
|
Packit Service |
4684c1 |
return gnutls_assert_val(ret);
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
ret = gnutls_hash_fast((gnutls_digest_algorithm_t)prf->id,
|
|
Packit Service |
4684c1 |
context, context_size, digest);
|
|
Packit Service |
4684c1 |
if (ret < 0)
|
|
Packit Service |
4684c1 |
return gnutls_assert_val(ret);
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
return _tls13_expand_secret2(prf,
|
|
Packit Service |
4684c1 |
EXPORTER_LABEL, sizeof(EXPORTER_LABEL)-1,
|
|
Packit Service |
4684c1 |
digest, digest_size,
|
|
Packit Service |
4684c1 |
secret, outsize, out);
|
|
Packit Service |
4684c1 |
}
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
/**
|
|
Packit Service |
4684c1 |
* gnutls_prf_rfc5705:
|
|
Packit Service |
4684c1 |
* @session: is a #gnutls_session_t type.
|
|
Packit Service |
4684c1 |
* @label_size: length of the @label variable.
|
|
Packit Service |
4684c1 |
* @label: label used in PRF computation, typically a short string.
|
|
Packit Service |
4684c1 |
* @context_size: length of the @extra variable.
|
|
Packit Service |
4684c1 |
* @context: optional extra data to seed the PRF with.
|
|
Packit Service |
4684c1 |
* @outsize: size of pre-allocated output buffer to hold the output.
|
|
Packit Service |
4684c1 |
* @out: pre-allocated buffer to hold the generated data.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Exports keying material from TLS/DTLS session to an application, as
|
|
Packit Service |
4684c1 |
* specified in RFC5705.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* In the TLS versions prior to 1.3, it applies the TLS
|
|
Packit Service |
4684c1 |
* Pseudo-Random-Function (PRF) on the master secret and the provided
|
|
Packit Service |
4684c1 |
* data, seeded with the client and server random fields.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* In TLS 1.3, it applies HKDF on the exporter master secret derived
|
|
Packit Service |
4684c1 |
* from the master secret.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* The @label variable usually contains a string denoting the purpose
|
|
Packit Service |
4684c1 |
* for the generated data.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* The @context variable can be used to add more data to the seed, after
|
|
Packit Service |
4684c1 |
* the random variables. It can be used to make sure the
|
|
Packit Service |
4684c1 |
* generated output is strongly connected to some additional data
|
|
Packit Service |
4684c1 |
* (e.g., a string used in user authentication).
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* The output is placed in @out, which must be pre-allocated.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Note that, to provide the RFC5705 context, the @context variable
|
|
Packit Service |
4684c1 |
* must be non-null.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Returns: %GNUTLS_E_SUCCESS on success, or an error code.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Since: 3.4.4
|
|
Packit Service |
4684c1 |
**/
|
|
Packit Service |
4684c1 |
int
|
|
Packit Service |
4684c1 |
gnutls_prf_rfc5705(gnutls_session_t session,
|
|
Packit Service |
4684c1 |
size_t label_size, const char *label,
|
|
Packit Service |
4684c1 |
size_t context_size, const char *context,
|
|
Packit Service |
4684c1 |
size_t outsize, char *out)
|
|
Packit Service |
4684c1 |
{
|
|
Packit Service |
4684c1 |
const version_entry_st *vers = get_version(session);
|
|
Packit Service |
4684c1 |
int ret;
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
if (session->security_parameters.prf == NULL)
|
|
Packit Service |
4684c1 |
return gnutls_assert_val(GNUTLS_E_INVALID_REQUEST);
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
if (vers && vers->tls13_sem) {
|
|
Packit Service |
4684c1 |
ret = _tls13_derive_exporter(session->security_parameters.prf,
|
|
Packit Service |
4684c1 |
session,
|
|
Packit Service |
4684c1 |
label_size, label,
|
|
Packit Service |
4684c1 |
context_size, context,
|
|
Packit Service |
4684c1 |
outsize, out,
|
|
Packit Service |
4684c1 |
0);
|
|
Packit Service |
4684c1 |
} else {
|
|
Packit Service |
4684c1 |
char *pctx = NULL;
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
if (context != NULL && context_size > 65535) {
|
|
Packit Service |
4684c1 |
gnutls_assert();
|
|
Packit Service |
4684c1 |
return GNUTLS_E_INVALID_REQUEST;
|
|
Packit Service |
4684c1 |
}
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
if (context != NULL) {
|
|
Packit Service |
4684c1 |
pctx = gnutls_malloc(context_size+2);
|
|
Packit Service |
4684c1 |
if (!pctx) {
|
|
Packit Service |
4684c1 |
gnutls_assert();
|
|
Packit Service |
4684c1 |
return GNUTLS_E_MEMORY_ERROR;
|
|
Packit Service |
4684c1 |
}
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
memcpy(pctx+2, context, context_size);
|
|
Packit Service |
4684c1 |
_gnutls_write_uint16(context_size, (void*)pctx);
|
|
Packit Service |
4684c1 |
context_size += 2;
|
|
Packit Service |
4684c1 |
}
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
ret = gnutls_prf(session, label_size, label, 0,
|
|
Packit Service |
4684c1 |
context_size, pctx, outsize, out);
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
gnutls_free(pctx);
|
|
Packit Service |
4684c1 |
}
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
return ret;
|
|
Packit Service |
4684c1 |
}
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
/**
|
|
Packit Service |
4684c1 |
* gnutls_prf_early:
|
|
Packit Service |
4684c1 |
* @session: is a #gnutls_session_t type.
|
|
Packit Service |
4684c1 |
* @label_size: length of the @label variable.
|
|
Packit Service |
4684c1 |
* @label: label used in PRF computation, typically a short string.
|
|
Packit Service |
4684c1 |
* @context_size: length of the @extra variable.
|
|
Packit Service |
4684c1 |
* @context: optional extra data to seed the PRF with.
|
|
Packit Service |
4684c1 |
* @outsize: size of pre-allocated output buffer to hold the output.
|
|
Packit Service |
4684c1 |
* @out: pre-allocated buffer to hold the generated data.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* This function is similar to gnutls_prf_rfc5705(), but only works in
|
|
Packit Service |
4684c1 |
* TLS 1.3 or later to export early keying material.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Note that the keying material is only available after the
|
|
Packit Service |
4684c1 |
* ClientHello message is processed and before the application traffic
|
|
Packit Service |
4684c1 |
* keys are established. Therefore this function shall be called in a
|
|
Packit Service |
4684c1 |
* handshake hook function for %GNUTLS_HANDSHAKE_CLIENT_HELLO.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* The @label variable usually contains a string denoting the purpose
|
|
Packit Service |
4684c1 |
* for the generated data.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* The @context variable can be used to add more data to the seed, after
|
|
Packit Service |
4684c1 |
* the random variables. It can be used to make sure the
|
|
Packit Service |
4684c1 |
* generated output is strongly connected to some additional data
|
|
Packit Service |
4684c1 |
* (e.g., a string used in user authentication).
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* The output is placed in @out, which must be pre-allocated.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Note that, to provide the RFC5705 context, the @context variable
|
|
Packit Service |
4684c1 |
* must be non-null.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Returns: %GNUTLS_E_SUCCESS on success, or an error code.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Since: 3.6.8
|
|
Packit Service |
4684c1 |
**/
|
|
Packit Service |
4684c1 |
int
|
|
Packit Service |
4684c1 |
gnutls_prf_early(gnutls_session_t session,
|
|
Packit Service |
4684c1 |
size_t label_size, const char *label,
|
|
Packit Service |
4684c1 |
size_t context_size, const char *context,
|
|
Packit Service |
4684c1 |
size_t outsize, char *out)
|
|
Packit Service |
4684c1 |
{
|
|
Packit Service |
4684c1 |
if (session->internals.initial_negotiation_completed ||
|
|
Packit Service |
4684c1 |
session->key.binders[0].prf == NULL)
|
|
Packit Service |
4684c1 |
return gnutls_assert_val(GNUTLS_E_INVALID_REQUEST);
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
return _tls13_derive_exporter(session->key.binders[0].prf, session,
|
|
Packit Service |
4684c1 |
label_size, label,
|
|
Packit Service |
4684c1 |
context_size, context,
|
|
Packit Service |
4684c1 |
outsize, out,
|
|
Packit Service |
4684c1 |
1);
|
|
Packit Service |
4684c1 |
}
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
/**
|
|
Packit Service |
4684c1 |
* gnutls_prf:
|
|
Packit Service |
4684c1 |
* @session: is a #gnutls_session_t type.
|
|
Packit Service |
4684c1 |
* @label_size: length of the @label variable.
|
|
Packit Service |
4684c1 |
* @label: label used in PRF computation, typically a short string.
|
|
Packit Service |
4684c1 |
* @server_random_first: non-zero if server random field should be first in seed
|
|
Packit Service |
4684c1 |
* @extra_size: length of the @extra variable.
|
|
Packit Service |
4684c1 |
* @extra: optional extra data to seed the PRF with.
|
|
Packit Service |
4684c1 |
* @outsize: size of pre-allocated output buffer to hold the output.
|
|
Packit Service |
4684c1 |
* @out: pre-allocated buffer to hold the generated data.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Applies the TLS Pseudo-Random-Function (PRF) on the master secret
|
|
Packit Service |
4684c1 |
* and the provided data, seeded with the client and server random fields.
|
|
Packit Service |
4684c1 |
* For the key expansion specified in RFC5705 see gnutls_prf_rfc5705().
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* The @label variable usually contains a string denoting the purpose
|
|
Packit Service |
4684c1 |
* for the generated data. The @server_random_first indicates whether
|
|
Packit Service |
4684c1 |
* the client random field or the server random field should be first
|
|
Packit Service |
4684c1 |
* in the seed. Non-zero indicates that the server random field is first,
|
|
Packit Service |
4684c1 |
* 0 that the client random field is first.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* The @extra variable can be used to add more data to the seed, after
|
|
Packit Service |
4684c1 |
* the random variables. It can be used to make sure the
|
|
Packit Service |
4684c1 |
* generated output is strongly connected to some additional data
|
|
Packit Service |
4684c1 |
* (e.g., a string used in user authentication).
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* The output is placed in @out, which must be pre-allocated.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Note: This function produces identical output with gnutls_prf_rfc5705()
|
|
Packit Service |
4684c1 |
* when @server_random_first is set to 0 and @extra is %NULL. Under TLS1.3
|
|
Packit Service |
4684c1 |
* this function will only operate when these conditions are true, or otherwise
|
|
Packit Service |
4684c1 |
* return %GNUTLS_E_INVALID_REQUEST.
|
|
Packit Service |
4684c1 |
*
|
|
Packit Service |
4684c1 |
* Returns: %GNUTLS_E_SUCCESS on success, or an error code.
|
|
Packit Service |
4684c1 |
**/
|
|
Packit Service |
4684c1 |
int
|
|
Packit Service |
4684c1 |
gnutls_prf(gnutls_session_t session,
|
|
Packit Service |
4684c1 |
size_t label_size,
|
|
Packit Service |
4684c1 |
const char *label,
|
|
Packit Service |
4684c1 |
int server_random_first,
|
|
Packit Service |
4684c1 |
size_t extra_size, const char *extra,
|
|
Packit Service |
4684c1 |
size_t outsize, char *out)
|
|
Packit Service |
4684c1 |
{
|
|
Packit Service |
4684c1 |
int ret;
|
|
Packit Service |
4684c1 |
uint8_t *seed;
|
|
Packit Service |
4684c1 |
const version_entry_st *vers = get_version(session);
|
|
Packit Service |
4684c1 |
size_t seedsize = 2 * GNUTLS_RANDOM_SIZE + extra_size;
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
if (vers && vers->tls13_sem) {
|
|
Packit Service |
4684c1 |
if (extra == NULL && server_random_first == 0)
|
|
Packit Service |
4684c1 |
return gnutls_prf_rfc5705(session, label_size, label,
|
|
Packit Service |
4684c1 |
extra_size, extra, outsize, out);
|
|
Packit Service |
4684c1 |
else
|
|
Packit Service |
4684c1 |
return gnutls_assert_val(GNUTLS_E_INVALID_REQUEST);
|
|
Packit Service |
4684c1 |
}
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
if (session->security_parameters.prf == NULL)
|
|
Packit Service |
4684c1 |
return gnutls_assert_val(GNUTLS_E_INVALID_REQUEST);
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
seed = gnutls_malloc(seedsize);
|
|
Packit Service |
4684c1 |
if (!seed) {
|
|
Packit Service |
4684c1 |
gnutls_assert();
|
|
Packit Service |
4684c1 |
return GNUTLS_E_MEMORY_ERROR;
|
|
Packit Service |
4684c1 |
}
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
memcpy(seed, server_random_first ?
|
|
Packit Service |
4684c1 |
session->security_parameters.server_random :
|
|
Packit Service |
4684c1 |
session->security_parameters.client_random,
|
|
Packit Service |
4684c1 |
GNUTLS_RANDOM_SIZE);
|
|
Packit Service |
4684c1 |
memcpy(seed + GNUTLS_RANDOM_SIZE,
|
|
Packit Service |
4684c1 |
server_random_first ? session->security_parameters.
|
|
Packit Service |
4684c1 |
client_random : session->security_parameters.server_random,
|
|
Packit Service |
4684c1 |
GNUTLS_RANDOM_SIZE);
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
if (extra && extra_size) {
|
|
Packit Service |
4684c1 |
memcpy(seed + 2 * GNUTLS_RANDOM_SIZE, extra, extra_size);
|
|
Packit Service |
4684c1 |
}
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
ret =
|
|
Packit Service |
4684c1 |
_gnutls_prf_raw(session->security_parameters.prf->id,
|
|
Packit Service |
4684c1 |
GNUTLS_MASTER_SIZE, session->security_parameters.master_secret,
|
|
Packit Service |
4684c1 |
label_size, label,
|
|
Packit Service |
4684c1 |
seedsize, seed,
|
|
Packit Service |
4684c1 |
outsize, out);
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
gnutls_free(seed);
|
|
Packit Service |
4684c1 |
|
|
Packit Service |
4684c1 |
return ret;
|
|
Packit Service |
4684c1 |
}
|
|
Packit Service |
4684c1 |
|