Page MenuHomeFreeBSD
Differential D33524 Diff 100181 sys/crypto/chacha20_poly1305.c

Changeset View

Standalone View

View Options

sys/crypto/chacha20_poly1305.c

  • This file was added.
/*-
* SPDX-License-Identifier: BSD-2-Clause-FreeBSD
*
* Copyright (c) 2021 The FreeBSD Foundation
*
* This software was developed by Ararat River Consulting, LLC under
* sponsorship from the FreeBSD Foundation.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/
#include <sys/endian.h>
#include <crypto/chacha20_poly1305.h>
#include <opencrypto/xform_enc.h>
static const uint8_t zeroes[POLY1305_BLOCK_LEN];
void
chacha20_poly1305_encrypt(uint8_t *dst, const uint8_t *src, size_t src_len,
const uint8_t *aad, size_t aad_len, const uint8_t *nonce, size_t nonce_len,
markjUnsubmitted
Not Done
Inline Actions

src_len, aad_len and nonce_len could perhaps be defined const. That'd be another deviation from the Linux interface, I guess, but hopefully not an incompatible one?

markj: `src_len`, `aad_len` and `nonce_len` could perhaps be defined const. That'd be another…
jhbAuthorUnsubmitted
Done
Inline Actions

I don't know that making size_t arguments passed by value const buys a whole lot, but it should be fine to do (and shouldn't be a meaningful API change relative to Linux as the caller doesn't care, the const only impacts the implementation)

jhb: I don't know that making size_t arguments passed by value `const` buys a whole lot, but it…
const uint8_t *key)
{
const struct enc_xform *exf;
void *ctx;
size_t resid;
uint64_t lengths[2];
exf = &enc_xform_chacha20_poly1305;
ctx = __builtin_alloca(exf->ctxsize);
exf->setkey(ctx, key, CHACHA20_POLY1305_KEY);
exf->reinit(ctx, nonce, nonce_len);
exf->update(ctx, aad, aad_len);
if (aad_len % POLY1305_BLOCK_LEN != 0)
exf->update(ctx, zeroes,
POLY1305_BLOCK_LEN - aad_len % POLY1305_BLOCK_LEN);
resid = src_len;
while (resid >= CHACHA20_NATIVE_BLOCK_LEN) {
jhbAuthorUnsubmitted
Done
Inline Actions

Note that my other series I uploaded that adds multi_block encrypt/decrypt would be applicable here and in other places in this file. I have a followup change in my branch that replaces these loops with a single call to the multi-block variants. If multi-block lands first I will probably squash that into this change.

jhb: Note that my other series I uploaded that adds multi_block encrypt/decrypt would be applicable…
exf->encrypt(ctx, src, dst);
exf->update(ctx, dst, CHACHA20_NATIVE_BLOCK_LEN);
src += CHACHA20_NATIVE_BLOCK_LEN;
dst += CHACHA20_NATIVE_BLOCK_LEN;
resid -= CHACHA20_NATIVE_BLOCK_LEN;
}
if (resid > 0) {
exf->encrypt_last(ctx, src, dst, resid);
exf->update(ctx, dst, resid);
dst += src_len;
markjUnsubmitted
Done
Inline Actions

Shouldn't this be adding resid instead of src_len?

markj: Shouldn't this be adding `resid` instead of `src_len`?
jhbAuthorUnsubmitted
Done
Inline Actions

Yes, this is a leftover from an earlier version that modified src_len rather than having a local resid.

jhb: Yes, this is a leftover from an earlier version that modified `src_len` rather than having a…
if (resid % POLY1305_BLOCK_LEN != 0)
exf->update(ctx, zeroes,
markjUnsubmitted
Not Done
Inline Actions

I think resid % POLY1305_BLOCK_LEN != 0 is always true here, since we know resid > 0 and resid < CHACHA20_NATIVE_BLOCK_LEN.

markj: I think `resid % POLY1305_BLOCK_LEN != 0` is always true here, since we know `resid > 0` and…
jhbAuthorUnsubmitted
Done
Inline Actions

Not necessarily. CHACHA20_NATIVE_BLOCK_LEN is 64 whereas POLY1305_BLOCK_LEN, so resid values of 16, 32, and 48 would make this false.

jhb: Not necessarily. CHACHA20_NATIVE_BLOCK_LEN is 64 whereas POLY1305_BLOCK_LEN, so resid values…
markjUnsubmitted
Not Done
Inline Actions

Oops, not sure what I was thinking.

markj: Oops, not sure what I was thinking.
POLY1305_BLOCK_LEN - resid % POLY1305_BLOCK_LEN);
}
lengths[0] = htole64(aad_len);
lengths[1] = htole64(src_len);
exf->update(ctx, lengths, sizeof(lengths));
exf->final(dst, ctx);
explicit_bzero(ctx, exf->ctxsize);
explicit_bzero(lengths, sizeof(lengths));
}
bool
chacha20_poly1305_decrypt(uint8_t *dst, const uint8_t *src, size_t src_len,
const uint8_t *aad, size_t aad_len, const uint8_t *nonce, size_t nonce_len,
const uint8_t *key)
{
const struct enc_xform *exf;
void *ctx;
size_t resid;
union {
uint64_t lengths[2];
char tag[POLY1305_HASH_LEN];
} u;
bool result;
if (src_len < POLY1305_HASH_LEN)
return (false);
resid = src_len - POLY1305_HASH_LEN;
exf = &enc_xform_chacha20_poly1305;
ctx = __builtin_alloca(exf->ctxsize);
exf->setkey(ctx, key, CHACHA20_POLY1305_KEY);
exf->reinit(ctx, nonce, nonce_len);
exf->update(ctx, aad, aad_len);
if (aad_len % POLY1305_BLOCK_LEN != 0)
exf->update(ctx, zeroes,
POLY1305_BLOCK_LEN - aad_len % POLY1305_BLOCK_LEN);
exf->update(ctx, src, resid);
if (resid % POLY1305_BLOCK_LEN != 0)
exf->update(ctx, zeroes,
POLY1305_BLOCK_LEN - resid % POLY1305_BLOCK_LEN);
u.lengths[0] = htole64(aad_len);
u.lengths[1] = htole64(resid);
exf->update(ctx, u.lengths, sizeof(u.lengths));
exf->final(u.tag, ctx);
result = (timingsafe_bcmp(u.tag, src + resid, POLY1305_HASH_LEN) == 0);
if (!result)
goto out;
while (resid >= CHACHA20_NATIVE_BLOCK_LEN) {
exf->decrypt(ctx, src, dst);
src += CHACHA20_NATIVE_BLOCK_LEN;
dst += CHACHA20_NATIVE_BLOCK_LEN;
resid -= CHACHA20_NATIVE_BLOCK_LEN;
}
if (resid > 0)
exf->decrypt_last(ctx, src, dst, resid);
out:
explicit_bzero(ctx, exf->ctxsize);
explicit_bzero(&u, sizeof(u));
return (result);
}
void
xchacha20_poly1305_encrypt(uint8_t *dst, const uint8_t *src, size_t src_len,
const uint8_t *aad, size_t aad_len, const uint8_t *nonce,
const uint8_t *key)
{
const struct enc_xform *exf;
void *ctx;
size_t resid;
uint64_t lengths[2];
exf = &enc_xform_xchacha20_poly1305;
ctx = __builtin_alloca(exf->ctxsize);
exf->setkey(ctx, key, CHACHA20_POLY1305_KEY);
markjUnsubmitted
Done
Inline Actions

I guess it should technically be XCHACHA20_POLY1305_KEY.

markj: I guess it should technically be XCHACHA20_POLY1305_KEY.
exf->reinit(ctx, nonce, XCHACHA20_POLY1305_IV_LEN);
exf->update(ctx, aad, aad_len);
if (aad_len % POLY1305_BLOCK_LEN != 0)
exf->update(ctx, zeroes,
POLY1305_BLOCK_LEN - aad_len % POLY1305_BLOCK_LEN);
resid = src_len;
while (resid >= CHACHA20_NATIVE_BLOCK_LEN) {
exf->encrypt(ctx, src, dst);
exf->update(ctx, dst, CHACHA20_NATIVE_BLOCK_LEN);
src += CHACHA20_NATIVE_BLOCK_LEN;
dst += CHACHA20_NATIVE_BLOCK_LEN;
resid -= CHACHA20_NATIVE_BLOCK_LEN;
}
if (resid > 0) {
exf->encrypt_last(ctx, src, dst, resid);
exf->update(ctx, dst, resid);
dst += resid;
if (resid % POLY1305_BLOCK_LEN != 0)
exf->update(ctx, zeroes,
POLY1305_BLOCK_LEN - resid % POLY1305_BLOCK_LEN);
}
lengths[0] = htole64(aad_len);
lengths[1] = htole64(src_len);
exf->update(ctx, lengths, sizeof(lengths));
exf->final(dst, ctx);
explicit_bzero(ctx, exf->ctxsize);
explicit_bzero(lengths, sizeof(lengths));
}
bool
xchacha20_poly1305_decrypt(uint8_t *dst, const uint8_t *src, size_t src_len,
const uint8_t *aad, size_t aad_len, const uint8_t *nonce,
const uint8_t *key)
{
const struct enc_xform *exf;
void *ctx;
size_t resid;
union {
uint64_t lengths[2];
char tag[POLY1305_HASH_LEN];
} u;
bool result;
if (src_len < POLY1305_HASH_LEN)
return (false);
resid = src_len - POLY1305_HASH_LEN;
exf = &enc_xform_xchacha20_poly1305;
ctx = __builtin_alloca(exf->ctxsize);
exf->setkey(ctx, key, CHACHA20_POLY1305_KEY);
exf->reinit(ctx, nonce, XCHACHA20_POLY1305_IV_LEN);
exf->update(ctx, aad, aad_len);
if (aad_len % POLY1305_BLOCK_LEN != 0)
exf->update(ctx, zeroes,
POLY1305_BLOCK_LEN - aad_len % POLY1305_BLOCK_LEN);
exf->update(ctx, src, resid);
if (resid % POLY1305_BLOCK_LEN != 0)
exf->update(ctx, zeroes,
POLY1305_BLOCK_LEN - resid % POLY1305_BLOCK_LEN);
u.lengths[0] = htole64(aad_len);
u.lengths[1] = htole64(resid);
exf->update(ctx, u.lengths, sizeof(u.lengths));
exf->final(u.tag, ctx);
result = (timingsafe_bcmp(u.tag, src + resid, POLY1305_HASH_LEN) == 0);
if (!result)
goto out;
while (resid >= CHACHA20_NATIVE_BLOCK_LEN) {
exf->decrypt(ctx, src, dst);
src += CHACHA20_NATIVE_BLOCK_LEN;
dst += CHACHA20_NATIVE_BLOCK_LEN;
resid -= CHACHA20_NATIVE_BLOCK_LEN;
}
if (resid > 0)
exf->decrypt_last(ctx, src, dst, resid);
out:
explicit_bzero(ctx, exf->ctxsize);
explicit_bzero(&u, sizeof(u));
return (result);
}