/* SPDX-License-Identifier: GPL-2.0 OR Linux-OpenIB */
/*
 * Copyright (c) 2020, Mellanox Technologies inc.  All rights reserved.
 */
#ifndef _IBA_DEFS_H_
#define _IBA_DEFS_H_

#include <linux/kernel.h>
#include <linux/bitfield.h>
#include <linux/unaligned.h>

static inline u32 _iba_get8(const u8 *ptr)
{
        return *ptr;
}

static inline void _iba_set8(u8 *ptr, u32 mask, u32 prep_value)
{
        *ptr = (*ptr & ~mask) | prep_value;
}

static inline u16 _iba_get16(const __be16 *ptr)
{
        return be16_to_cpu(*ptr);
}

static inline void _iba_set16(__be16 *ptr, u16 mask, u16 prep_value)
{
        *ptr = cpu_to_be16((be16_to_cpu(*ptr) & ~mask) | prep_value);
}

static inline u32 _iba_get32(const __be32 *ptr)
{
        return be32_to_cpu(*ptr);
}

static inline void _iba_set32(__be32 *ptr, u32 mask, u32 prep_value)
{
        *ptr = cpu_to_be32((be32_to_cpu(*ptr) & ~mask) | prep_value);
}

static inline u64 _iba_get64(const __be64 *ptr)
{
        /*
         * The mads are constructed so that 32 bit and smaller are naturally
         * aligned, everything larger has a max alignment of 4 bytes.
         */
        return be64_to_cpu(get_unaligned(ptr));
}

static inline void _iba_set64(__be64 *ptr, u64 mask, u64 prep_value)
{
        put_unaligned(cpu_to_be64((_iba_get64(ptr) & ~mask) | prep_value), ptr);
}

#define _IBA_SET(field_struct, field_offset, field_mask, num_bits, ptr, value) \
        ({                                                                     \
                field_struct *_ptr = ptr;                                      \
                _iba_set##num_bits((void *)_ptr + (field_offset), field_mask,  \
                                   FIELD_PREP(field_mask, value));             \
        })
#define IBA_SET(field, ptr, value) _IBA_SET(field, ptr, value)

#define _IBA_GET_MEM_PTR(field_struct, field_offset, type, num_bits, ptr)      \
        ({                                                                     \
                field_struct *_ptr = ptr;                                      \
                (type *)((void *)_ptr + (field_offset));                       \
        })
#define IBA_GET_MEM_PTR(field, ptr) _IBA_GET_MEM_PTR(field, ptr)

/* FIXME: A set should always set the entire field, meaning we should zero the trailing bytes */
#define _IBA_SET_MEM(field_struct, field_offset, type, num_bits, ptr, in,      \
                     bytes)                                                    \
        ({                                                                     \
                const type *_in_ptr = in;                                      \
                WARN_ON(bytes * 8 > num_bits);                                 \
                if (in && bytes)                                               \
                        memcpy(_IBA_GET_MEM_PTR(field_struct, field_offset,    \
                                                type, num_bits, ptr),          \
                               _in_ptr, bytes);                                \
        })
#define IBA_SET_MEM(field, ptr, in, bytes) _IBA_SET_MEM(field, ptr, in, bytes)

#define _IBA_GET(field_struct, field_offset, field_mask, num_bits, ptr)        \
        ({                                                                     \
                const field_struct *_ptr = ptr;                                \
                (u##num_bits) FIELD_GET(                                       \
                        field_mask, _iba_get##num_bits((const void *)_ptr +    \
                                                       (field_offset)));       \
        })
#define IBA_GET(field, ptr) _IBA_GET(field, ptr)

#define _IBA_GET_MEM(field_struct, field_offset, type, num_bits, ptr, out,     \
                     bytes)                                                    \
        ({                                                                     \
                type *_out_ptr = out;                                          \
                WARN_ON(bytes * 8 > num_bits);                                 \
                if (out && bytes)                                              \
                        memcpy(_out_ptr,                                       \
                               _IBA_GET_MEM_PTR(field_struct, field_offset,    \
                                                type, num_bits, ptr),          \
                               bytes);                                         \
        })
#define IBA_GET_MEM(field, ptr, out, bytes) _IBA_GET_MEM(field, ptr, out, bytes)

/*
 * The generated list becomes the parameters to the macros, the order is:
 *  - struct this applies to
 *  - starting offset of the max
 *  - GENMASK or GENMASK_ULL in CPU order
 *  - The width of data the mask operations should work on, in bits
 */

/*
 * Extraction using a tabular description like table 106. bit_offset is from
 * the Byte[Bit] notation.
 */
#define IBA_FIELD_BLOC(field_struct, byte_offset, bit_offset, num_bits)        \
        field_struct, byte_offset,                                             \
                GENMASK(7 - (bit_offset), 7 - (bit_offset) - (num_bits - 1)),  \
                8
#define IBA_FIELD8_LOC(field_struct, byte_offset, num_bits)                    \
        IBA_FIELD_BLOC(field_struct, byte_offset, 0, num_bits)

#define IBA_FIELD16_LOC(field_struct, byte_offset, num_bits)                   \
        field_struct, (byte_offset)&0xFFFE,                                    \
                GENMASK(15 - (((byte_offset) % 2) * 8),                        \
                        15 - (((byte_offset) % 2) * 8) - (num_bits - 1)),      \
                16

#define IBA_FIELD32_LOC(field_struct, byte_offset, num_bits)                   \
        field_struct, (byte_offset)&0xFFFC,                                    \
                GENMASK(31 - (((byte_offset) % 4) * 8),                        \
                        31 - (((byte_offset) % 4) * 8) - (num_bits - 1)),      \
                32

#define IBA_FIELD64_LOC(field_struct, byte_offset)                             \
        field_struct, byte_offset, GENMASK_ULL(63, 0), 64
/*
 * In IBTA spec, everything that is more than 64bits is multiple
 * of bytes without leftover bits.
 */
#define IBA_FIELD_MLOC(field_struct, byte_offset, num_bits, type)              \
        field_struct, byte_offset, type, num_bits

#endif /* _IBA_DEFS_H_ */