// -*- mode: c; tab-width: 4; indent-tabs-mode: nil; st-rulers: [132] -*-
// vim: ts=4 sw=4 ft=c et

#include "libsodium_api_crypto_aead_aes256gcm.h"

static void LS_API_EXEC(crypto_aead_aes256gcm, is_available);
static void LS_API_EXEC(crypto_aead_aes256gcm, keybytes);
static void LS_API_EXEC(crypto_aead_aes256gcm, nsecbytes);
static void LS_API_EXEC(crypto_aead_aes256gcm, npubbytes);
static void LS_API_EXEC(crypto_aead_aes256gcm, abytes);
static void LS_API_EXEC(crypto_aead_aes256gcm, messagebytes_max);
static void LS_API_EXEC(crypto_aead_aes256gcm, statebytes);
static int LS_API_INIT(crypto_aead_aes256gcm, encrypt);
static void LS_API_EXEC(crypto_aead_aes256gcm, encrypt);
static int LS_API_INIT(crypto_aead_aes256gcm, decrypt);
static void LS_API_EXEC(crypto_aead_aes256gcm, decrypt);
static int LS_API_INIT(crypto_aead_aes256gcm, encrypt_detached);
static void LS_API_EXEC(crypto_aead_aes256gcm, encrypt_detached);
static int LS_API_INIT(crypto_aead_aes256gcm, decrypt_detached);
static void LS_API_EXEC(crypto_aead_aes256gcm, decrypt_detached);
// NOTE: As of 2022-08-31, the *nm variant functions all cause segmentation faults in aead_aes256gcm_aesni.c:526.
// static int LS_API_INIT(crypto_aead_aes256gcm, beforenm);
// static void LS_API_EXEC(crypto_aead_aes256gcm, beforenm);
// static int LS_API_INIT(crypto_aead_aes256gcm, encrypt_afternm);
// static void LS_API_EXEC(crypto_aead_aes256gcm, encrypt_afternm);
// static int LS_API_INIT(crypto_aead_aes256gcm, decrypt_afternm);
// static void LS_API_EXEC(crypto_aead_aes256gcm, decrypt_afternm);
// static int LS_API_INIT(crypto_aead_aes256gcm, encrypt_detached_afternm);
// static void LS_API_EXEC(crypto_aead_aes256gcm, encrypt_detached_afternm);
static void LS_API_EXEC(crypto_aead_aes256gcm, keygen);

libsodium_function_t libsodium_functions_crypto_aead_aes256gcm[] = {
    LS_API_R_ARG0(crypto_aead_aes256gcm, is_available),
    LS_API_R_ARG0(crypto_aead_aes256gcm, keybytes),
    LS_API_R_ARG0(crypto_aead_aes256gcm, nsecbytes),
    LS_API_R_ARG0(crypto_aead_aes256gcm, npubbytes),
    LS_API_R_ARG0(crypto_aead_aes256gcm, abytes),
    LS_API_R_ARG0(crypto_aead_aes256gcm, messagebytes_max),
    LS_API_R_ARG0(crypto_aead_aes256gcm, statebytes),
    LS_API_R_ARGV(crypto_aead_aes256gcm, encrypt, 5),
    LS_API_R_ARGV(crypto_aead_aes256gcm, decrypt, 5),
    LS_API_R_ARGV(crypto_aead_aes256gcm, encrypt_detached, 5),
    LS_API_R_ARGV(crypto_aead_aes256gcm, decrypt_detached, 6),
    // LS_API_R_ARGV(crypto_aead_aes256gcm, beforenm, 1),
    // LS_API_R_ARGV(crypto_aead_aes256gcm, encrypt_afternm, 5),
    // LS_API_R_ARGV(crypto_aead_aes256gcm, decrypt_afternm, 5),
    // LS_API_R_ARGV(crypto_aead_aes256gcm, encrypt_detached_afternm, 5),
    LS_API_R_ARG0(crypto_aead_aes256gcm, keygen),
    {NULL}};

/* crypto_aead_aes256gcm_is_available/0 */

LS_API_GET_SINT(crypto_aead_aes256gcm, is_available);

/* crypto_aead_aes256gcm_keybytes/0 */

LS_API_GET_SIZE(crypto_aead_aes256gcm, keybytes);

/* crypto_aead_aes256gcm_nsecbytes/0 */

LS_API_GET_SIZE(crypto_aead_aes256gcm, nsecbytes);

/* crypto_aead_aes256gcm_npubbytes/0 */

LS_API_GET_SIZE(crypto_aead_aes256gcm, npubbytes);

/* crypto_aead_aes256gcm_abytes/0 */

LS_API_GET_SIZE(crypto_aead_aes256gcm, abytes);

/* crypto_aead_aes256gcm_messagebytes_max/0 */

LS_API_GET_SIZE(crypto_aead_aes256gcm, messagebytes_max);

/* crypto_aead_aes256gcm_statebytes/0 */

LS_API_GET_SIZE(crypto_aead_aes256gcm, statebytes);

/* crypto_aead_aes256gcm_encrypt/5 */

typedef struct LS_API_F_ARGV(crypto_aead_aes256gcm, encrypt) {
    const unsigned char *m;
    unsigned long long mlen;
    const unsigned char *ad;
    unsigned long long adlen;
    const unsigned char *nsec;
    const unsigned char *npub;
    const unsigned char *k;
} LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt);

static int
LS_API_INIT(crypto_aead_aes256gcm, encrypt)
{
    LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt) * argv;
    int skip;
    int type;
    int type_length;
    unsigned long long mlen;
    unsigned long long adlen;
    size_t nsecbytes;
    size_t npubbytes;
    size_t keybytes;
    ErlDrvSizeT x;
    void *p;

    if (ei_get_type(buffer, index, &type, &type_length) < 0 || type != ERL_BINARY_EXT) {
        return -1;
    }

    mlen = (unsigned long long)(type_length);

    skip = *index;

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT) {
        return -1;
    }

    adlen = (unsigned long long)(type_length);

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    nsecbytes = crypto_aead_aes256gcm_nsecbytes();

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != nsecbytes) {
        return -1;
    }

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    npubbytes = crypto_aead_aes256gcm_npubbytes();

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != npubbytes) {
        return -1;
    }

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    keybytes = crypto_aead_aes256gcm_keybytes();

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != keybytes) {
        return -1;
    }

    x = (ErlDrvSizeT)(mlen + adlen + nsecbytes + npubbytes + keybytes + (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt))));
    p = (void *)(driver_alloc(x));

    if (p == NULL) {
        return -1;
    }

    argv = (LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt) *)(p);
    p += (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt)));
    argv->m = (const unsigned char *)(p);
    p += mlen;
    if (adlen == 0) {
        argv->ad = NULL;
        argv->adlen = 0;
    } else {
        argv->ad = (const unsigned char *)(p);
        p += adlen;
    }
    if (nsecbytes == 0) {
        argv->nsec = NULL;
    } else {
        argv->nsec = (const unsigned char *)(p);
        p += nsecbytes;
    }
    argv->npub = (const unsigned char *)(p);
    p += npubbytes;
    argv->k = (const unsigned char *)(p);

    if (ei_decode_binary(buffer, index, (void *)(argv->m), (long *)&(argv->mlen)) < 0) {
        (void)driver_free(argv);
        return -1;
    }

    if (adlen == 0) {
        if (ei_skip_term(buffer, index) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    } else {
        if (ei_decode_binary(buffer, index, (void *)(argv->ad), (long *)&(argv->adlen)) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    }

    if (nsecbytes == 0) {
        if (ei_skip_term(buffer, index) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    } else {
        if (ei_decode_binary(buffer, index, (void *)(argv->nsec), NULL) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    }

    if (ei_decode_binary(buffer, index, (void *)(argv->npub), NULL) < 0) {
        (void)driver_free(argv);
        return -1;
    }

    if (ei_decode_binary(buffer, index, (void *)(argv->k), NULL) < 0) {
        (void)driver_free(argv);
        return -1;
    }

    request->argv = (void *)(argv);

    return 0;
}

static void
LS_API_EXEC(crypto_aead_aes256gcm, encrypt)
{
    LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt) * argv;
    LS_API_READ_ARGV(crypto_aead_aes256gcm, encrypt);

    size_t abytes = crypto_aead_aes256gcm_abytes();
    size_t cbytes = argv->mlen + abytes;
    unsigned char c[cbytes];
    unsigned long long clen;

    LS_SAFE_REPLY(
        crypto_aead_aes256gcm_encrypt(c, &clen, argv->m, argv->mlen, argv->ad, argv->adlen, argv->nsec, argv->npub, argv->k),
        LS_PROTECT({LS_RES_TAG(request), ERL_DRV_BUF2BINARY, (ErlDrvTermData)(c), clen, ERL_DRV_TUPLE, 2}), __FILE__, __LINE__);

    (void)sodium_memzero(c, cbytes);
}

/* crypto_aead_aes256gcm_decrypt/5 */

typedef struct LS_API_F_ARGV(crypto_aead_aes256gcm, decrypt) {
    unsigned char *nsec;
    const unsigned char *c;
    unsigned long long clen;
    const unsigned char *ad;
    unsigned long long adlen;
    const unsigned char *npub;
    const unsigned char *k;
} LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt);

static int
LS_API_INIT(crypto_aead_aes256gcm, decrypt)
{
    LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt) * argv;
    int skip;
    int type;
    int type_length;
    size_t nsecbytes;
    unsigned long long clen;
    unsigned long long adlen;
    size_t npubbytes;
    size_t keybytes;
    ErlDrvSizeT x;
    void *p;

    nsecbytes = crypto_aead_aes256gcm_nsecbytes();

    if (ei_get_type(buffer, index, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != nsecbytes) {
        return -1;
    }

    skip = *index;

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT) {
        return -1;
    }

    clen = (unsigned long long)(type_length);

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT) {
        return -1;
    }

    adlen = (unsigned long long)(type_length);

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    npubbytes = crypto_aead_aes256gcm_npubbytes();

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != npubbytes) {
        return -1;
    }

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    keybytes = crypto_aead_aes256gcm_keybytes();

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != keybytes) {
        return -1;
    }

    x = (ErlDrvSizeT)(nsecbytes + clen + adlen + npubbytes + keybytes + (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt))));
    p = (void *)(driver_alloc(x));

    if (p == NULL) {
        return -1;
    }

    argv = (LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt) *)(p);
    p += (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt)));
    if (nsecbytes == 0) {
        argv->nsec = NULL;
    } else {
        argv->nsec = (unsigned char *)(p);
        p += nsecbytes;
    }
    argv->c = (const unsigned char *)(p);
    p += clen;
    if (adlen == 0) {
        argv->ad = NULL;
        argv->adlen = 0;
    } else {
        argv->ad = (const unsigned char *)(p);
        p += adlen;
    }
    argv->npub = (const unsigned char *)(p);
    p += npubbytes;
    argv->k = (const unsigned char *)(p);

    if (nsecbytes == 0) {
        if (ei_skip_term(buffer, index) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    } else {
        if (ei_decode_binary(buffer, index, (void *)(argv->nsec), NULL) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    }

    if (ei_decode_binary(buffer, index, (void *)(argv->c), (long *)&(argv->clen)) < 0) {
        (void)driver_free(argv);
        return -1;
    }

    if (adlen == 0) {
        if (ei_skip_term(buffer, index) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    } else {
        if (ei_decode_binary(buffer, index, (void *)(argv->ad), (long *)&(argv->adlen)) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    }

    if (ei_decode_binary(buffer, index, (void *)(argv->npub), NULL) < 0) {
        (void)driver_free(argv);
        return -1;
    }

    if (ei_decode_binary(buffer, index, (void *)(argv->k), NULL) < 0) {
        (void)driver_free(argv);
        return -1;
    }

    request->argv = (void *)(argv);

    return 0;
}

static void
LS_API_EXEC(crypto_aead_aes256gcm, decrypt)
{
    LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt) * argv;
    LS_API_READ_ARGV(crypto_aead_aes256gcm, decrypt);

    size_t abytes = crypto_aead_aes256gcm_abytes();
    size_t mbytes = (abytes > argv->clen) ? argv->clen : argv->clen - abytes;
    unsigned char m[mbytes];
    unsigned long long mlen;

    LS_SAFE_REPLY(
        crypto_aead_aes256gcm_decrypt(m, &mlen, argv->nsec, argv->c, argv->clen, argv->ad, argv->adlen, argv->npub, argv->k),
        LS_PROTECT({LS_RES_TAG(request), ERL_DRV_BUF2BINARY, (ErlDrvTermData)(m), mlen, ERL_DRV_TUPLE, 2}), __FILE__, __LINE__);

    (void)sodium_memzero(m, mbytes);
}

/* crypto_aead_aes256gcm_encrypt_detached/5 */

typedef struct LS_API_F_ARGV(crypto_aead_aes256gcm, encrypt_detached) {
    const unsigned char *m;
    unsigned long long mlen;
    const unsigned char *ad;
    unsigned long long adlen;
    const unsigned char *nsec;
    const unsigned char *npub;
    const unsigned char *k;
} LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_detached);

static int
LS_API_INIT(crypto_aead_aes256gcm, encrypt_detached)
{
    LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_detached) * argv;
    int skip;
    int type;
    int type_length;
    unsigned long long mlen;
    unsigned long long adlen;
    size_t nsecbytes;
    size_t npubbytes;
    size_t keybytes;
    ErlDrvSizeT x;
    void *p;

    if (ei_get_type(buffer, index, &type, &type_length) < 0 || type != ERL_BINARY_EXT) {
        return -1;
    }

    mlen = (unsigned long long)(type_length);

    skip = *index;

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT) {
        return -1;
    }

    adlen = (unsigned long long)(type_length);

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    nsecbytes = crypto_aead_aes256gcm_nsecbytes();

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != nsecbytes) {
        return -1;
    }

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    npubbytes = crypto_aead_aes256gcm_npubbytes();

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != npubbytes) {
        return -1;
    }

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    keybytes = crypto_aead_aes256gcm_keybytes();

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != keybytes) {
        return -1;
    }

    x = (ErlDrvSizeT)(mlen + adlen + nsecbytes + npubbytes + keybytes +
                      (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_detached))));
    p = (void *)(driver_alloc(x));

    if (p == NULL) {
        return -1;
    }

    argv = (LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_detached) *)(p);
    p += (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_detached)));
    argv->m = (const unsigned char *)(p);
    p += mlen;
    if (adlen == 0) {
        argv->ad = NULL;
        argv->adlen = 0;
    } else {
        argv->ad = (const unsigned char *)(p);
        p += adlen;
    }
    if (nsecbytes == 0) {
        argv->nsec = NULL;
    } else {
        argv->nsec = (const unsigned char *)(p);
        p += nsecbytes;
    }
    argv->npub = (const unsigned char *)(p);
    p += npubbytes;
    argv->k = (const unsigned char *)(p);

    if (ei_decode_binary(buffer, index, (void *)(argv->m), (long *)&(argv->mlen)) < 0) {
        (void)driver_free(argv);
        return -1;
    }

    if (adlen == 0) {
        if (ei_skip_term(buffer, index) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    } else {
        if (ei_decode_binary(buffer, index, (void *)(argv->ad), (long *)&(argv->adlen)) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    }

    if (nsecbytes == 0) {
        if (ei_skip_term(buffer, index) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    } else {
        if (ei_decode_binary(buffer, index, (void *)(argv->nsec), NULL) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    }

    if (ei_decode_binary(buffer, index, (void *)(argv->npub), NULL) < 0) {
        (void)driver_free(argv);
        return -1;
    }

    if (ei_decode_binary(buffer, index, (void *)(argv->k), NULL) < 0) {
        (void)driver_free(argv);
        return -1;
    }

    request->argv = (void *)(argv);

    return 0;
}

static void
LS_API_EXEC(crypto_aead_aes256gcm, encrypt_detached)
{
    LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_detached) * argv;
    LS_API_READ_ARGV(crypto_aead_aes256gcm, encrypt_detached);

    size_t abytes = crypto_aead_aes256gcm_abytes();
    unsigned long long clen = argv->mlen;
    unsigned char c[clen];
    unsigned char mac[abytes];
    unsigned long long maclen;

    LS_SAFE_REPLY(crypto_aead_aes256gcm_encrypt_detached(c, mac, &maclen, argv->m, argv->mlen, argv->ad, argv->adlen, argv->nsec,
                                                         argv->npub, argv->k),
                  LS_PROTECT({LS_RES_TAG(request), ERL_DRV_BUF2BINARY, (ErlDrvTermData)(c), clen, ERL_DRV_BUF2BINARY,
                              (ErlDrvTermData)(mac), maclen, ERL_DRV_TUPLE, 2, ERL_DRV_TUPLE, 2}),
                  __FILE__, __LINE__);

    (void)sodium_memzero(c, clen);
    (void)sodium_memzero(mac, maclen);
}

/* crypto_aead_aes256gcm_decrypt_detached/6 */

typedef struct LS_API_F_ARGV(crypto_aead_aes256gcm, decrypt_detached) {
    unsigned char *nsec;
    const unsigned char *c;
    unsigned long long clen;
    const unsigned char *mac;
    const unsigned char *ad;
    unsigned long long adlen;
    const unsigned char *npub;
    const unsigned char *k;
} LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt_detached);

static int
LS_API_INIT(crypto_aead_aes256gcm, decrypt_detached)
{
    LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt_detached) * argv;
    int skip;
    int type;
    int type_length;
    size_t nsecbytes;
    unsigned long long clen;
    size_t abytes;
    unsigned long long adlen;
    size_t npubbytes;
    size_t keybytes;
    ErlDrvSizeT x;
    void *p;

    nsecbytes = crypto_aead_aes256gcm_nsecbytes();

    if (ei_get_type(buffer, index, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != nsecbytes) {
        return -1;
    }

    skip = *index;

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT) {
        return -1;
    }

    clen = (unsigned long long)(type_length);

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    abytes = crypto_aead_aes256gcm_abytes();

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != abytes) {
        return -1;
    }

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT) {
        return -1;
    }

    adlen = (unsigned long long)(type_length);

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    npubbytes = crypto_aead_aes256gcm_npubbytes();

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != npubbytes) {
        return -1;
    }

    if (ei_skip_term(buffer, &skip) < 0) {
        return -1;
    }

    keybytes = crypto_aead_aes256gcm_keybytes();

    if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != keybytes) {
        return -1;
    }

    x = (ErlDrvSizeT)(nsecbytes + clen + abytes + adlen + npubbytes + keybytes +
                      (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt_detached))));
    p = (void *)(driver_alloc(x));

    if (p == NULL) {
        return -1;
    }

    argv = (LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt_detached) *)(p);
    p += (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt_detached)));
    if (nsecbytes == 0) {
        argv->nsec = NULL;
    } else {
        argv->nsec = (unsigned char *)(p);
        p += nsecbytes;
    }
    argv->c = (const unsigned char *)(p);
    p += clen;
    argv->mac = (const unsigned char *)(p);
    p += abytes;
    if (adlen == 0) {
        argv->ad = NULL;
        argv->adlen = 0;
    } else {
        argv->ad = (const unsigned char *)(p);
        p += adlen;
    }
    argv->npub = (const unsigned char *)(p);
    p += npubbytes;
    argv->k = (const unsigned char *)(p);

    if (nsecbytes == 0) {
        if (ei_skip_term(buffer, index) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    } else {
        if (ei_decode_binary(buffer, index, (void *)(argv->nsec), NULL) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    }

    if (ei_decode_binary(buffer, index, (void *)(argv->c), (long *)&(argv->clen)) < 0) {
        (void)driver_free(argv);
        return -1;
    }

    if (ei_decode_binary(buffer, index, (void *)(argv->mac), NULL) < 0) {
        (void)driver_free(argv);
        return -1;
    }

    if (adlen == 0) {
        if (ei_skip_term(buffer, index) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    } else {
        if (ei_decode_binary(buffer, index, (void *)(argv->ad), (long *)&(argv->adlen)) < 0) {
            (void)driver_free(argv);
            return -1;
        }
    }

    if (ei_decode_binary(buffer, index, (void *)(argv->npub), NULL) < 0) {
        (void)driver_free(argv);
        return -1;
    }

    if (ei_decode_binary(buffer, index, (void *)(argv->k), NULL) < 0) {
        (void)driver_free(argv);
        return -1;
    }

    request->argv = (void *)(argv);

    return 0;
}

static void
LS_API_EXEC(crypto_aead_aes256gcm, decrypt_detached)
{
    LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt_detached) * argv;
    LS_API_READ_ARGV(crypto_aead_aes256gcm, decrypt_detached);

    unsigned long long mlen = argv->clen;
    unsigned char m[mlen];

    LS_SAFE_REPLY(crypto_aead_aes256gcm_decrypt_detached(m, argv->nsec, argv->c, argv->clen, argv->mac, argv->ad, argv->adlen,
                                                         argv->npub, argv->k),
                  LS_PROTECT({LS_RES_TAG(request), ERL_DRV_BUF2BINARY, (ErlDrvTermData)(m), mlen, ERL_DRV_TUPLE, 2}), __FILE__,
                  __LINE__);

    (void)sodium_memzero(m, mlen);
}

// /* crypto_aead_aes256gcm_beforenm/1 */

// typedef struct LS_API_F_ARGV(crypto_aead_aes256gcm, beforenm) {
//     const unsigned char k[crypto_aead_aes256gcm_KEYBYTES];
// } LS_API_F_ARGV_T(crypto_aead_aes256gcm, beforenm);

// static int
// LS_API_INIT(crypto_aead_aes256gcm, beforenm)
// {
//     LS_API_F_ARGV_T(crypto_aead_aes256gcm, beforenm) * argv;
//     int skip;
//     int type;
//     int type_length;
//     size_t keybytes;
//     ErlDrvSizeT x;
//     void *p;

//     keybytes = crypto_aead_aes256gcm_keybytes();

//     if (ei_get_type(buffer, index, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != keybytes) {
//         return -1;
//     }

//     skip = *index;

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     x = (ErlDrvSizeT)((sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, beforenm))));
//     p = (void *)(driver_alloc(x));

//     if (p == NULL) {
//         return -1;
//     }

//     argv = (LS_API_F_ARGV_T(crypto_aead_aes256gcm, beforenm) *)(p);
//     // p += (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, beforenm)));

//     if (ei_decode_binary(buffer, index, (void *)(argv->k), NULL) < 0) {
//         (void)driver_free(argv);
//         return -1;
//     }

//     request->argv = (void *)(argv);

//     return 0;
// }

// static void
// LS_API_EXEC(crypto_aead_aes256gcm, beforenm)
// {
//     size_t statebytes;
//     // crypto_aead_aes256gcm_state ctx_buf;
//     crypto_aead_aes256gcm_state *ctx = NULL;

//     LS_API_F_ARGV_T(crypto_aead_aes256gcm, beforenm) * argv;
//     LS_API_READ_ARGV(crypto_aead_aes256gcm, beforenm);

//     statebytes = crypto_aead_aes256gcm_statebytes();
//     ctx = sodium_malloc(statebytes);
//     if (ctx == NULL) {
//         LS_FAIL_OOM(request->port->drv_port);
//         return;
//     }

//     LS_SAFE_REPLY(crypto_aead_aes256gcm_beforenm(ctx, argv->k),
//                   LS_PROTECT({LS_RES_TAG(request), ERL_DRV_BUF2BINARY, (ErlDrvTermData)(ctx), statebytes, ERL_DRV_TUPLE, 2}),
//                   __FILE__, __LINE__);

//     (void)sodium_memzero(ctx, statebytes);
//     (void)sodium_free(ctx);
// }

// /* crypto_aead_aes256gcm_encrypt_afternm/5 */

// typedef struct LS_API_F_ARGV(crypto_aead_aes256gcm, encrypt_afternm) {
//     const unsigned char *m;
//     unsigned long long mlen;
//     const unsigned char *ad;
//     unsigned long long adlen;
//     const unsigned char *nsec;
//     const unsigned char *npub;
//     const crypto_aead_aes256gcm_state *ctx;
// } LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_afternm);

// static int
// LS_API_INIT(crypto_aead_aes256gcm, encrypt_afternm)
// {
//     LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_afternm) * argv;
//     int skip;
//     int type;
//     int type_length;
//     unsigned long long mlen;
//     unsigned long long adlen;
//     size_t nsecbytes;
//     size_t npubbytes;
//     size_t statebytes;
//     ErlDrvSizeT x;
//     void *p;
//     long readlen;

//     skip = *index;

//     if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT) {
//         return -1;
//     }

//     mlen = (unsigned long long)(type_length);

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT) {
//         return -1;
//     }

//     adlen = (unsigned long long)(type_length);

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     nsecbytes = crypto_aead_aes256gcm_nsecbytes();

//     if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != nsecbytes) {
//         return -1;
//     }

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     npubbytes = crypto_aead_aes256gcm_npubbytes();

//     if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != npubbytes) {
//         return -1;
//     }

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     statebytes = crypto_aead_aes256gcm_statebytes();

//     if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != statebytes) {
//         return -1;
//     }

//     x = (ErlDrvSizeT)(mlen + adlen + nsecbytes + npubbytes + statebytes +
//                       (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_afternm))));
//     p = (void *)(driver_alloc(x));

//     if (p == NULL) {
//         return -1;
//     }

//     argv = (LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_afternm) *)(p);
//     p += (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_afternm)));
//     argv->m = (const unsigned char *)(p);
//     p += mlen;
//     if (adlen == 0) {
//         argv->ad = NULL;
//         argv->adlen = 0;
//     } else {
//         argv->ad = (const unsigned char *)(p);
//         p += adlen;
//     }
//     if (nsecbytes == 0) {
//         argv->nsec = NULL;
//     } else {
//         argv->nsec = (const unsigned char *)(p);
//         p += nsecbytes;
//     }
//     argv->npub = (const unsigned char *)(p);
//     p += npubbytes;
//     argv->ctx = (const crypto_aead_aes256gcm_state *)(p);
//     p += statebytes;

//     if (ei_decode_binary(buffer, index, (void *)(argv->m), (long *)&(argv->mlen)) < 0) {
//         (void)driver_free(argv);
//         return -1;
//     }
//     if (argv->mlen != mlen) {
//         (void)driver_free(argv);
//         return -1;
//     }

//     if (adlen == 0) {
//         if (ei_skip_term(buffer, index) < 0) {
//             (void)driver_free(argv);
//             return -1;
//         }
//     } else {
//         if (ei_decode_binary(buffer, index, (void *)(argv->ad), (long *)&(argv->adlen)) < 0) {
//             (void)driver_free(argv);
//             return -1;
//         }
//         if (argv->adlen != adlen) {
//             (void)driver_free(argv);
//             return -1;
//         }
//     }

//     if (nsecbytes == 0) {
//         if (ei_skip_term(buffer, index) < 0) {
//             (void)driver_free(argv);
//             return -1;
//         }
//     } else {
//         if (ei_decode_binary(buffer, index, (void *)(argv->nsec), &readlen) < 0) {
//             (void)driver_free(argv);
//             return -1;
//         }
//         if (readlen != nsecbytes) {
//             (void)driver_free(argv);
//             return -1;
//         }
//     }

//     if (ei_decode_binary(buffer, index, (void *)(argv->npub), &readlen) < 0) {
//         (void)driver_free(argv);
//         return -1;
//     }
//     if (readlen != npubbytes) {
//         (void)driver_free(argv);
//         return -1;
//     }

//     if (ei_decode_binary(buffer, index, (void *)(argv->ctx), &readlen) < 0) {
//         (void)driver_free(argv);
//         return -1;
//     }
//     if (readlen != statebytes) {
//         (void)driver_free(argv);
//         return -1;
//     }

//     request->argv = (void *)(argv);

//     return 0;
// }

// static void
// LS_API_EXEC(crypto_aead_aes256gcm, encrypt_afternm)
// {
//     size_t abytes;
//     size_t cbytes;
//     unsigned char *c = NULL;
//     unsigned long long clen;

//     LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_afternm) * argv;
//     LS_API_READ_ARGV(crypto_aead_aes256gcm, encrypt_afternm);

//     abytes = crypto_aead_aes256gcm_abytes();
//     cbytes = (argv->mlen + abytes) + 1;
//     c = driver_alloc(cbytes);
//     if (c == NULL) {
//         LS_FAIL_OOM(request->port->drv_port);
//         return;
//     }

//     LS_SAFE_REPLY(crypto_aead_aes256gcm_encrypt_afternm(c, &clen, argv->m, argv->mlen, argv->ad, argv->adlen, argv->nsec,
//                                                         argv->npub, argv->ctx),
//                   LS_PROTECT({LS_RES_TAG(request), ERL_DRV_BUF2BINARY, (ErlDrvTermData)(c), clen, ERL_DRV_TUPLE, 2}), __FILE__,
//                   __LINE__);

//     // (void)sodium_memzero(c, cbytes);
//     (void)driver_free(c);
// }

// /* crypto_aead_aes256gcm_decrypt_afternm/5 */

// typedef struct LS_API_F_ARGV(crypto_aead_aes256gcm, decrypt_afternm) {
//     unsigned char *nsec;
//     const unsigned char *c;
//     unsigned long long clen;
//     const unsigned char *ad;
//     unsigned long long adlen;
//     const unsigned char *npub;
//     crypto_aead_aes256gcm_state ctx_buf;
// } LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt_afternm);

// static int
// LS_API_INIT(crypto_aead_aes256gcm, decrypt_afternm)
// {
//     LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt_afternm) * argv;
//     int skip;
//     int type;
//     int type_length;
//     unsigned long long clen;
//     unsigned long long adlen;
//     size_t nsecbytes;
//     size_t npubbytes;
//     size_t statebytes;
//     ErlDrvSizeT x;
//     void *p;
//     long readlen;

//     skip = *index;

//     nsecbytes = crypto_aead_aes256gcm_nsecbytes();

//     if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != nsecbytes) {
//         return -1;
//     }

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT) {
//         return -1;
//     }

//     clen = (unsigned long long)(type_length);

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT) {
//         return -1;
//     }

//     adlen = (unsigned long long)(type_length);

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     npubbytes = crypto_aead_aes256gcm_npubbytes();

//     if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != npubbytes) {
//         return -1;
//     }

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     statebytes = crypto_aead_aes256gcm_statebytes();

//     if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != statebytes) {
//         return -1;
//     }

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     x = (ErlDrvSizeT)(nsecbytes + clen + adlen + npubbytes + (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt_afternm))));
//     p = (void *)(driver_alloc(x));

//     if (p == NULL) {
//         return -1;
//     }

//     argv = (LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt_afternm) *)(p);
//     p += (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt_afternm)));
//     if (nsecbytes == 0) {
//         argv->nsec = NULL;
//     } else {
//         argv->nsec = (unsigned char *)(p);
//         p += nsecbytes;
//     }
//     argv->c = (const unsigned char *)(p);
//     p += clen;
//     if (adlen == 0) {
//         argv->ad = NULL;
//         argv->adlen = 0;
//     } else {
//         argv->ad = (const unsigned char *)(p);
//         p += adlen;
//     }
//     argv->npub = (const unsigned char *)(p);
//     p += npubbytes;

//     if (nsecbytes == 0) {
//         if (ei_skip_term(buffer, index) < 0) {
//             (void)driver_free(argv);
//             return -1;
//         }
//     } else {
//         if (ei_decode_binary(buffer, index, (void *)(argv->nsec), &readlen) < 0) {
//             (void)driver_free(argv);
//             return -1;
//         }
//         if (readlen != nsecbytes) {
//             (void)driver_free(argv);
//             return -1;
//         }
//     }

//     if (ei_decode_binary(buffer, index, (void *)(argv->c), (long *)&(argv->clen)) < 0) {
//         (void)driver_free(argv);
//         return -1;
//     }

//     if (adlen == 0) {
//         if (ei_skip_term(buffer, index) < 0) {
//             (void)driver_free(argv);
//             return -1;
//         }
//     } else {
//         if (ei_decode_binary(buffer, index, (void *)(argv->ad), (long *)&(argv->adlen)) < 0) {
//             (void)driver_free(argv);
//             return -1;
//         }
//     }

//     if (ei_decode_binary(buffer, index, (void *)(argv->npub), &readlen) < 0) {
//         (void)driver_free(argv);
//         return -1;
//     }
//     if (readlen != npubbytes) {
//         (void)driver_free(argv);
//         return -1;
//     }

//     if (ei_decode_binary(buffer, index, (void *)(&argv->ctx_buf), &readlen) < 0) {
//         (void)driver_free(argv);
//         return -1;
//     }
//     if (readlen != statebytes) {
//         (void)driver_free(argv);
//         return -1;
//     }

//     request->argv = (void *)(argv);

//     return 0;
// }

// static void
// LS_API_EXEC(crypto_aead_aes256gcm, decrypt_afternm)
// {
//     size_t abytes;
//     size_t mbytes;
//     unsigned char *m = NULL;
//     unsigned long long mlen;

//     LS_API_F_ARGV_T(crypto_aead_aes256gcm, decrypt_afternm) * argv;
//     LS_API_READ_ARGV(crypto_aead_aes256gcm, decrypt_afternm);

//     abytes = crypto_aead_aes256gcm_abytes();
//     mbytes = ((abytes > argv->clen) ? argv->clen : argv->clen - abytes) + 1;
//     m = sodium_malloc(mbytes);
//     if (m == NULL) {
//         LS_FAIL_OOM(request->port->drv_port);
//         return;
//     }

//     LS_SAFE_REPLY(crypto_aead_aes256gcm_decrypt_afternm(m, &mlen, argv->nsec, argv->c, argv->clen, argv->ad, argv->adlen,
//                                                         argv->npub, &argv->ctx_buf),
//                   LS_PROTECT({LS_RES_TAG(request), ERL_DRV_BUF2BINARY, (ErlDrvTermData)(m), mlen, ERL_DRV_TUPLE, 2}), __FILE__,
//                   __LINE__);

//     (void)sodium_memzero(m, mbytes);
//     (void)sodium_free(m);
// }

// /* crypto_aead_aes256gcm_encrypt_detached_afternm/5 */

// typedef struct LS_API_F_ARGV(crypto_aead_aes256gcm, encrypt_detached_afternm) {
//     const unsigned char *m;
//     unsigned long long mlen;
//     const unsigned char *ad;
//     unsigned long long adlen;
//     const unsigned char *nsec;
//     const unsigned char *npub;
//     crypto_aead_aes256gcm_state ctx_buf;
// } LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_detached_afternm);

// static int
// LS_API_INIT(crypto_aead_aes256gcm, encrypt_detached_afternm)
// {
//     LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_detached_afternm) * argv;
//     int skip;
//     int type;
//     int type_length;
//     size_t messagebytes_max;
//     unsigned long long mlen;
//     unsigned long long adlen;
//     size_t nsecbytes;
//     size_t npubbytes;
//     size_t statebytes;
//     ErlDrvSizeT x;
//     void *p;

//     messagebytes_max = crypto_aead_aes256gcm_messagebytes_max();

//     if (ei_get_type(buffer, index, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length > messagebytes_max) {
//         return -1;
//     }

//     mlen = (unsigned long long)(type_length);

//     skip = *index;

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT) {
//         return -1;
//     }

//     adlen = (unsigned long long)(type_length);

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     nsecbytes = crypto_aead_aes256gcm_nsecbytes();

//     if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != nsecbytes) {
//         return -1;
//     }

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     npubbytes = crypto_aead_aes256gcm_npubbytes();

//     if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != npubbytes) {
//         return -1;
//     }

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     statebytes = crypto_aead_aes256gcm_statebytes();

//     if (ei_get_type(buffer, &skip, &type, &type_length) < 0 || type != ERL_BINARY_EXT || type_length != statebytes) {
//         return -1;
//     }

//     if (ei_skip_term(buffer, &skip) < 0) {
//         return -1;
//     }

//     x = (ErlDrvSizeT)(mlen + adlen + nsecbytes + npubbytes +
//                       (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_detached_afternm))));
//     p = (void *)(driver_alloc(x));

//     if (p == NULL) {
//         return -1;
//     }

//     argv = (LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_detached_afternm) *)(p);
//     p += (sizeof(LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_detached_afternm)));
//     argv->m = (const unsigned char *)(p);
//     p += mlen;
//     if (adlen == 0) {
//         argv->ad = NULL;
//         argv->adlen = 0;
//     } else {
//         argv->ad = (const unsigned char *)(p);
//         p += adlen;
//     }
//     if (nsecbytes == 0) {
//         argv->nsec = NULL;
//     } else {
//         argv->nsec = (const unsigned char *)(p);
//         p += nsecbytes;
//     }
//     argv->npub = (const unsigned char *)(p);
//     p += npubbytes;

//     if (ei_decode_binary(buffer, index, (void *)(argv->m), (long *)&(argv->mlen)) < 0) {
//         (void)driver_free(argv);
//         return -1;
//     }

//     if (adlen == 0) {
//         if (ei_skip_term(buffer, index) < 0) {
//             (void)driver_free(argv);
//             return -1;
//         }
//     } else {
//         if (ei_decode_binary(buffer, index, (void *)(argv->ad), (long *)&(argv->adlen)) < 0) {
//             (void)driver_free(argv);
//             return -1;
//         }
//     }

//     if (nsecbytes == 0) {
//         if (ei_skip_term(buffer, index) < 0) {
//             (void)driver_free(argv);
//             return -1;
//         }
//     } else {
//         if (ei_decode_binary(buffer, index, (void *)(argv->nsec), NULL) < 0) {
//             (void)driver_free(argv);
//             return -1;
//         }
//     }

//     if (ei_decode_binary(buffer, index, (void *)(argv->npub), NULL) < 0) {
//         (void)driver_free(argv);
//         return -1;
//     }

//     if (ei_decode_binary(buffer, index, (void *)(&argv->ctx_buf), NULL) < 0) {
//         (void)driver_free(argv);
//         return -1;
//     }

//     request->argv = (void *)(argv);

//     return 0;
// }

// static void
// LS_API_EXEC(crypto_aead_aes256gcm, encrypt_detached_afternm)
// {
//     size_t abytes;
//     size_t cbytes;
//     size_t macbytes;
//     unsigned char *c = NULL;
//     unsigned char *mac = NULL;
//     unsigned long long clen;
//     unsigned long long maclen;

//     LS_API_F_ARGV_T(crypto_aead_aes256gcm, encrypt_detached_afternm) * argv;
//     LS_API_READ_ARGV(crypto_aead_aes256gcm, encrypt_detached_afternm);

//     abytes = crypto_aead_aes256gcm_abytes();
//     cbytes = (argv->mlen) + 1;
//     c = sodium_malloc(cbytes);
//     if (c == NULL) {
//         LS_FAIL_OOM(request->port->drv_port);
//         return;
//     }
//     clen = argv->mlen;
//     macbytes = (abytes) + 1;
//     mac = sodium_malloc(macbytes);
//     if (mac == NULL) {
//         (void)sodium_free(c);
//         LS_FAIL_OOM(request->port->drv_port);
//         return;
//     }

//     LS_SAFE_REPLY(crypto_aead_aes256gcm_encrypt_detached_afternm(c, mac, &maclen, argv->m, argv->mlen, argv->ad, argv->adlen,
//                                                                  argv->nsec, argv->npub, &argv->ctx_buf),
//                   LS_PROTECT({LS_RES_TAG(request), ERL_DRV_BUF2BINARY, (ErlDrvTermData)(c), clen, ERL_DRV_BUF2BINARY,
//                               (ErlDrvTermData)(mac), maclen, ERL_DRV_TUPLE, 2, ERL_DRV_TUPLE, 2}),
//                   __FILE__, __LINE__);

//     (void)sodium_memzero(mac, maclen);
//     (void)sodium_free(mac);
//     (void)sodium_memzero(c, clen);
//     (void)sodium_free(c);
// }

/* crypto_aead_aes256gcm_keygen/0 */

static void
LS_API_EXEC(crypto_aead_aes256gcm, keygen)
{
    unsigned char k[crypto_aead_aes256gcm_KEYBYTES];

    (void)crypto_aead_aes256gcm_keygen(k);

    ErlDrvTermData spec[] = {
        LS_RES_TAG(request), ERL_DRV_BUF2BINARY, (ErlDrvTermData)(k), crypto_aead_aes256gcm_KEYBYTES, ERL_DRV_TUPLE, 2};

    LS_RESPOND(request, spec, __FILE__, __LINE__);
}