// SPDX-License-Identifier: GPL-2.0-only
/*
 * Copyright 2022 Red Hat, Inc.
 */

#include <linux/bio.h>
#include <linux/blk-crypto.h>
#include <linux/blk-integrity.h>

#include "dm-core.h"

static inline bool dm_bvec_iter_rewind(const struct bio_vec *bv,
                                       struct bvec_iter *iter,
                                       unsigned int bytes)
{
        int idx;

        iter->bi_size += bytes;
        if (bytes <= iter->bi_bvec_done) {
                iter->bi_bvec_done -= bytes;
                return true;
        }

        bytes -= iter->bi_bvec_done;
        idx = iter->bi_idx - 1;

        while (idx >= 0 && bytes && bytes > bv[idx].bv_len) {
                bytes -= bv[idx].bv_len;
                idx--;
        }

        if (WARN_ONCE(idx < 0 && bytes,
                      "Attempted to rewind iter beyond bvec's boundaries\n")) {
                iter->bi_size -= bytes;
                iter->bi_bvec_done = 0;
                iter->bi_idx = 0;
                return false;
        }

        iter->bi_idx = idx;
        iter->bi_bvec_done = bv[idx].bv_len - bytes;
        return true;
}

#if defined(CONFIG_BLK_DEV_INTEGRITY)

/**
 * dm_bio_integrity_rewind - Rewind integrity vector
 * @bio:        bio whose integrity vector to update
 * @bytes_done: number of data bytes to rewind
 *
 * Description: This function calculates how many integrity bytes the
 * number of completed data bytes correspond to and rewind the
 * integrity vector accordingly.
 */
static void dm_bio_integrity_rewind(struct bio *bio, unsigned int bytes_done)
{
        struct bio_integrity_payload *bip = bio_integrity(bio);
        struct blk_integrity *bi = blk_get_integrity(bio->bi_bdev->bd_disk);
        unsigned int bytes = bio_integrity_bytes(bi, bytes_done >> 9);

        bip->bip_iter.bi_sector -= bio_integrity_intervals(bi, bytes_done >> 9);
        dm_bvec_iter_rewind(bip->bip_vec, &bip->bip_iter, bytes);
}

#else /* CONFIG_BLK_DEV_INTEGRITY */

static inline void dm_bio_integrity_rewind(struct bio *bio,
                                           unsigned int bytes_done)
{
}

#endif

#if defined(CONFIG_BLK_INLINE_ENCRYPTION)

/* Decrements @dun by @dec, treating @dun as a multi-limb integer. */
static void dm_bio_crypt_dun_decrement(u64 dun[BLK_CRYPTO_DUN_ARRAY_SIZE],
                                       unsigned int dec)
{
        int i;

        for (i = 0; dec && i < BLK_CRYPTO_DUN_ARRAY_SIZE; i++) {
                u64 prev = dun[i];

                dun[i] -= dec;
                if (dun[i] > prev)
                        dec = 1;
                else
                        dec = 0;
        }
}

static void dm_bio_crypt_rewind(struct bio *bio, unsigned int bytes)
{
        struct bio_crypt_ctx *bc = bio->bi_crypt_context;

        dm_bio_crypt_dun_decrement(bc->bc_dun,
                                   bytes >> bc->bc_key->data_unit_size_bits);
}

#else /* CONFIG_BLK_INLINE_ENCRYPTION */

static inline void dm_bio_crypt_rewind(struct bio *bio, unsigned int bytes)
{
}

#endif

static inline void dm_bio_rewind_iter(const struct bio *bio,
                                      struct bvec_iter *iter, unsigned int bytes)
{
        iter->bi_sector -= bytes >> 9;

        /* No advance means no rewind */
        if (bio_no_advance_iter(bio))
                iter->bi_size += bytes;
        else
                dm_bvec_iter_rewind(bio->bi_io_vec, iter, bytes);
}

/**
 * dm_bio_rewind - update ->bi_iter of @bio by rewinding @bytes.
 * @bio: bio to rewind
 * @bytes: how many bytes to rewind
 *
 * WARNING:
 * Caller must ensure that @bio has a fixed end sector, to allow
 * rewinding from end of bio and restoring its original position.
 * Caller is also responsibile for restoring bio's size.
 */
static void dm_bio_rewind(struct bio *bio, unsigned int bytes)
{
        if (bio_integrity(bio))
                dm_bio_integrity_rewind(bio, bytes);

        if (bio_has_crypt_ctx(bio))
                dm_bio_crypt_rewind(bio, bytes);

        dm_bio_rewind_iter(bio, &bio->bi_iter, bytes);
}

void dm_io_rewind(struct dm_io *io, struct bio_set *bs)
{
        struct bio *orig = io->orig_bio;
        struct bio *new_orig = bio_alloc_clone(orig->bi_bdev, orig,
                                               GFP_NOIO, bs);
        /*
         * dm_bio_rewind can restore to previous position since the
         * end sector is fixed for original bio, but we still need
         * to restore bio's size manually (using io->sectors).
         */
        dm_bio_rewind(new_orig, ((io->sector_offset << 9) -
                                 orig->bi_iter.bi_size));
        bio_trim(new_orig, 0, io->sectors);

        bio_chain(new_orig, orig);
        /*
         * __bi_remaining was increased (by dm_split_and_process_bio),
         * so must drop the one added in bio_chain.
         */
        atomic_dec(&orig->__bi_remaining);
        io->orig_bio = new_orig;
}