// SPDX-License-Identifier: GPL-2.0-or-later
/*
 * Coda multi-standard codec IP - JPEG support functions
 *
 * Copyright (C) 2014 Philipp Zabel, Pengutronix
 */

#include <linux/unaligned.h>
#include <linux/irqreturn.h>
#include <linux/kernel.h>
#include <linux/ktime.h>
#include <linux/slab.h>
#include <linux/swab.h>
#include <linux/videodev2.h>

#include <media/v4l2-common.h>
#include <media/v4l2-fh.h>
#include <media/v4l2-jpeg.h>
#include <media/v4l2-mem2mem.h>
#include <media/videobuf2-core.h>
#include <media/videobuf2-dma-contig.h>

#include "coda.h"
#include "trace.h"

#define SOI_MARKER      0xffd8
#define APP9_MARKER     0xffe9
#define DRI_MARKER      0xffdd
#define DQT_MARKER      0xffdb
#define DHT_MARKER      0xffc4
#define SOF_MARKER      0xffc0
#define SOS_MARKER      0xffda
#define EOI_MARKER      0xffd9

enum {
        CODA9_JPEG_FORMAT_420,
        CODA9_JPEG_FORMAT_422,
        CODA9_JPEG_FORMAT_224,
        CODA9_JPEG_FORMAT_444,
        CODA9_JPEG_FORMAT_400,
};

struct coda_huff_tab {
        u8 luma_dc[16 + 12];
        u8 chroma_dc[16 + 12];
        u8 luma_ac[16 + 162];
        u8 chroma_ac[16 + 162];

        /* DC Luma, DC Chroma, AC Luma, AC Chroma */
        s16     min[4 * 16];
        s16     max[4 * 16];
        s8      ptr[4 * 16];
};

#define CODA9_JPEG_ENC_HUFF_DATA_SIZE   (256 + 256 + 16 + 16)

/*
 * Typical Huffman tables for 8-bit precision luminance and
 * chrominance from JPEG ITU-T.81 (ISO/IEC 10918-1) Annex K.3
 */

static const unsigned char luma_dc[16 + 12] = {
        /* bits */
        0x00, 0x01, 0x05, 0x01, 0x01, 0x01, 0x01, 0x01,
        0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
        /* values */
        0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
        0x08, 0x09, 0x0a, 0x0b,
};

static const unsigned char chroma_dc[16 + 12] = {
        /* bits */
        0x00, 0x03, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
        0x01, 0x01, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00,
        /* values */
        0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
        0x08, 0x09, 0x0a, 0x0b,
};

static const unsigned char luma_ac[16 + 162 + 2] = {
        /* bits */
        0x00, 0x02, 0x01, 0x03, 0x03, 0x02, 0x04, 0x03,
        0x05, 0x05, 0x04, 0x04, 0x00, 0x00, 0x01, 0x7d,
        /* values */
        0x01, 0x02, 0x03, 0x00, 0x04, 0x11, 0x05, 0x12,
        0x21, 0x31, 0x41, 0x06, 0x13, 0x51, 0x61, 0x07,
        0x22, 0x71, 0x14, 0x32, 0x81, 0x91, 0xa1, 0x08,
        0x23, 0x42, 0xb1, 0xc1, 0x15, 0x52, 0xd1, 0xf0,
        0x24, 0x33, 0x62, 0x72, 0x82, 0x09, 0x0a, 0x16,
        0x17, 0x18, 0x19, 0x1a, 0x25, 0x26, 0x27, 0x28,
        0x29, 0x2a, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39,
        0x3a, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49,
        0x4a, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59,
        0x5a, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68, 0x69,
        0x6a, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78, 0x79,
        0x7a, 0x83, 0x84, 0x85, 0x86, 0x87, 0x88, 0x89,
        0x8a, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97, 0x98,
        0x99, 0x9a, 0xa2, 0xa3, 0xa4, 0xa5, 0xa6, 0xa7,
        0xa8, 0xa9, 0xaa, 0xb2, 0xb3, 0xb4, 0xb5, 0xb6,
        0xb7, 0xb8, 0xb9, 0xba, 0xc2, 0xc3, 0xc4, 0xc5,
        0xc6, 0xc7, 0xc8, 0xc9, 0xca, 0xd2, 0xd3, 0xd4,
        0xd5, 0xd6, 0xd7, 0xd8, 0xd9, 0xda, 0xe1, 0xe2,
        0xe3, 0xe4, 0xe5, 0xe6, 0xe7, 0xe8, 0xe9, 0xea,
        0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7, 0xf8,
        0xf9, 0xfa, /* padded to 32-bit */
};

static const unsigned char chroma_ac[16 + 162 + 2] = {
        /* bits */
        0x00, 0x02, 0x01, 0x02, 0x04, 0x04, 0x03, 0x04,
        0x07, 0x05, 0x04, 0x04, 0x00, 0x01, 0x02, 0x77,
        /* values */
        0x00, 0x01, 0x02, 0x03, 0x11, 0x04, 0x05, 0x21,
        0x31, 0x06, 0x12, 0x41, 0x51, 0x07, 0x61, 0x71,
        0x13, 0x22, 0x32, 0x81, 0x08, 0x14, 0x42, 0x91,
        0xa1, 0xb1, 0xc1, 0x09, 0x23, 0x33, 0x52, 0xf0,
        0x15, 0x62, 0x72, 0xd1, 0x0a, 0x16, 0x24, 0x34,
        0xe1, 0x25, 0xf1, 0x17, 0x18, 0x19, 0x1a, 0x26,
        0x27, 0x28, 0x29, 0x2a, 0x35, 0x36, 0x37, 0x38,
        0x39, 0x3a, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48,
        0x49, 0x4a, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58,
        0x59, 0x5a, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68,
        0x69, 0x6a, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78,
        0x79, 0x7a, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87,
        0x88, 0x89, 0x8a, 0x92, 0x93, 0x94, 0x95, 0x96,
        0x97, 0x98, 0x99, 0x9a, 0xa2, 0xa3, 0xa4, 0xa5,
        0xa6, 0xa7, 0xa8, 0xa9, 0xaa, 0xb2, 0xb3, 0xb4,
        0xb5, 0xb6, 0xb7, 0xb8, 0xb9, 0xba, 0xc2, 0xc3,
        0xc4, 0xc5, 0xc6, 0xc7, 0xc8, 0xc9, 0xca, 0xd2,
        0xd3, 0xd4, 0xd5, 0xd6, 0xd7, 0xd8, 0xd9, 0xda,
        0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 0xe7, 0xe8, 0xe9,
        0xea, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7, 0xf8,
        0xf9, 0xfa, /* padded to 32-bit */
};

/*
 * Quantization tables for luminance and chrominance components in
 * zig-zag scan order from the Freescale i.MX VPU libraries
 */

static unsigned char luma_q[64] = {
        0x06, 0x04, 0x04, 0x04, 0x05, 0x04, 0x06, 0x05,
        0x05, 0x06, 0x09, 0x06, 0x05, 0x06, 0x09, 0x0b,
        0x08, 0x06, 0x06, 0x08, 0x0b, 0x0c, 0x0a, 0x0a,
        0x0b, 0x0a, 0x0a, 0x0c, 0x10, 0x0c, 0x0c, 0x0c,
        0x0c, 0x0c, 0x0c, 0x10, 0x0c, 0x0c, 0x0c, 0x0c,
        0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c,
        0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c,
        0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c,
};

static unsigned char chroma_q[64] = {
        0x07, 0x07, 0x07, 0x0d, 0x0c, 0x0d, 0x18, 0x10,
        0x10, 0x18, 0x14, 0x0e, 0x0e, 0x0e, 0x14, 0x14,
        0x0e, 0x0e, 0x0e, 0x0e, 0x14, 0x11, 0x0c, 0x0c,
        0x0c, 0x0c, 0x0c, 0x11, 0x11, 0x0c, 0x0c, 0x0c,
        0x0c, 0x0c, 0x0c, 0x11, 0x0c, 0x0c, 0x0c, 0x0c,
        0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c,
        0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c,
        0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c, 0x0c,
};

static const unsigned char width_align[] = {
        [CODA9_JPEG_FORMAT_420] = 16,
        [CODA9_JPEG_FORMAT_422] = 16,
        [CODA9_JPEG_FORMAT_224] = 8,
        [CODA9_JPEG_FORMAT_444] = 8,
        [CODA9_JPEG_FORMAT_400] = 8,
};

static const unsigned char height_align[] = {
        [CODA9_JPEG_FORMAT_420] = 16,
        [CODA9_JPEG_FORMAT_422] = 8,
        [CODA9_JPEG_FORMAT_224] = 16,
        [CODA9_JPEG_FORMAT_444] = 8,
        [CODA9_JPEG_FORMAT_400] = 8,
};

static int coda9_jpeg_chroma_format(u32 pixfmt)
{
        switch (pixfmt) {
        case V4L2_PIX_FMT_YUV420:
        case V4L2_PIX_FMT_NV12:
                return CODA9_JPEG_FORMAT_420;
        case V4L2_PIX_FMT_YUV422P:
                return CODA9_JPEG_FORMAT_422;
        case V4L2_PIX_FMT_YUV444:
                return CODA9_JPEG_FORMAT_444;
        case V4L2_PIX_FMT_GREY:
                return CODA9_JPEG_FORMAT_400;
        }
        return -EINVAL;
}

struct coda_memcpy_desc {
        int offset;
        const void *src;
        size_t len;
};

static void coda_memcpy_parabuf(void *parabuf,
                                const struct coda_memcpy_desc *desc)
{
        u32 *dst = parabuf + desc->offset;
        const u32 *src = desc->src;
        int len = desc->len / 4;
        int i;

        for (i = 0; i < len; i += 2) {
                dst[i + 1] = swab32(src[i]);
                dst[i] = swab32(src[i + 1]);
        }
}

int coda_jpeg_write_tables(struct coda_ctx *ctx)
{
        int i;
        static const struct coda_memcpy_desc huff[8] = {
                { 0,   luma_dc,    sizeof(luma_dc)    },
                { 32,  luma_ac,    sizeof(luma_ac)    },
                { 216, chroma_dc,  sizeof(chroma_dc)  },
                { 248, chroma_ac,  sizeof(chroma_ac)  },
        };
        struct coda_memcpy_desc qmat[3] = {
                { 512, ctx->params.jpeg_qmat_tab[0], 64 },
                { 576, ctx->params.jpeg_qmat_tab[1], 64 },
                { 640, ctx->params.jpeg_qmat_tab[1], 64 },
        };

        /* Write huffman tables to parameter memory */
        for (i = 0; i < ARRAY_SIZE(huff); i++)
                coda_memcpy_parabuf(ctx->parabuf.vaddr, huff + i);

        /* Write Q-matrix to parameter memory */
        for (i = 0; i < ARRAY_SIZE(qmat); i++)
                coda_memcpy_parabuf(ctx->parabuf.vaddr, qmat + i);

        return 0;
}

bool coda_jpeg_check_buffer(struct coda_ctx *ctx, struct vb2_buffer *vb)
{
        void *vaddr = vb2_plane_vaddr(vb, 0);
        u16 soi, eoi;
        int len, i;

        soi = be16_to_cpup((__be16 *)vaddr);
        if (soi != SOI_MARKER)
                return false;

        len = vb2_get_plane_payload(vb, 0);
        vaddr += len - 2;
        for (i = 0; i < 32; i++) {
                eoi = be16_to_cpup((__be16 *)(vaddr - i));
                if (eoi == EOI_MARKER) {
                        if (i > 0)
                                vb2_set_plane_payload(vb, 0, len - i);
                        return true;
                }
        }

        return false;
}

static int coda9_jpeg_gen_dec_huff_tab(struct coda_ctx *ctx, int tab_num);

int coda_jpeg_decode_header(struct coda_ctx *ctx, struct vb2_buffer *vb)
{
        struct coda_dev *dev = ctx->dev;
        u8 *buf = vb2_plane_vaddr(vb, 0);
        size_t len = vb2_get_plane_payload(vb, 0);
        struct v4l2_jpeg_scan_header scan_header;
        struct v4l2_jpeg_reference quantization_tables[4] = { };
        struct v4l2_jpeg_reference huffman_tables[4] = { };
        struct v4l2_jpeg_header header = {
                .scan = &scan_header,
                .quantization_tables = quantization_tables,
                .huffman_tables = huffman_tables,
        };
        struct coda_q_data *q_data_src;
        struct coda_huff_tab *huff_tab;
        int i, j, ret;

        ret = v4l2_jpeg_parse_header(buf, len, &header);
        if (ret < 0) {
                v4l2_err(&dev->v4l2_dev, "failed to parse JPEG header: %pe\n",
                         ERR_PTR(ret));
                return ret;
        }

        ctx->params.jpeg_restart_interval = header.restart_interval;

        /* check frame header */
        if (header.frame.height > ctx->codec->max_h ||
            header.frame.width > ctx->codec->max_w) {
                v4l2_err(&dev->v4l2_dev, "invalid dimensions: %dx%d\n",
                         header.frame.width, header.frame.height);
                return -EINVAL;
        }

        q_data_src = get_q_data(ctx, V4L2_BUF_TYPE_VIDEO_OUTPUT);
        if (header.frame.height != q_data_src->height ||
            header.frame.width != q_data_src->width) {
                v4l2_err(&dev->v4l2_dev,
                         "dimensions don't match format: %dx%d\n",
                         header.frame.width, header.frame.height);
                return -EINVAL;
        }

        if (header.frame.num_components != 3) {
                v4l2_err(&dev->v4l2_dev,
                         "unsupported number of components: %d\n",
                         header.frame.num_components);
                return -EINVAL;
        }

        /* install quantization tables */
        if (quantization_tables[3].start) {
                v4l2_err(&dev->v4l2_dev,
                         "only 3 quantization tables supported\n");
                return -EINVAL;
        }
        for (i = 0; i < 3; i++) {
                if (!quantization_tables[i].start)
                        continue;
                if (quantization_tables[i].length != 64) {
                        v4l2_err(&dev->v4l2_dev,
                                 "only 8-bit quantization tables supported\n");
                        continue;
                }
                if (!ctx->params.jpeg_qmat_tab[i]) {
                        ctx->params.jpeg_qmat_tab[i] = kmalloc(64, GFP_KERNEL);
                        if (!ctx->params.jpeg_qmat_tab[i])
                                return -ENOMEM;
                }
                memcpy(ctx->params.jpeg_qmat_tab[i],
                       quantization_tables[i].start, 64);
        }

        /* install Huffman tables */
        for (i = 0; i < 4; i++) {
                if (!huffman_tables[i].start) {
                        v4l2_err(&dev->v4l2_dev, "missing Huffman table\n");
                        return -EINVAL;
                }
                /* AC tables should be between 17 -> 178, DC between 17 -> 28 */
                if (huffman_tables[i].length < 17 ||
                    huffman_tables[i].length > 178 ||
                    ((i & 2) == 0 && huffman_tables[i].length > 28)) {
                        v4l2_err(&dev->v4l2_dev,
                                 "invalid Huffman table %d length: %zu\n",
                                 i, huffman_tables[i].length);
                        return -EINVAL;
                }
        }
        huff_tab = ctx->params.jpeg_huff_tab;
        if (!huff_tab) {
                huff_tab = kzalloc_obj(struct coda_huff_tab);
                if (!huff_tab)
                        return -ENOMEM;
                ctx->params.jpeg_huff_tab = huff_tab;
        }

        memset(huff_tab, 0, sizeof(*huff_tab));
        memcpy(huff_tab->luma_dc, huffman_tables[0].start, huffman_tables[0].length);
        memcpy(huff_tab->chroma_dc, huffman_tables[1].start, huffman_tables[1].length);
        memcpy(huff_tab->luma_ac, huffman_tables[2].start, huffman_tables[2].length);
        memcpy(huff_tab->chroma_ac, huffman_tables[3].start, huffman_tables[3].length);

        /* check scan header */
        for (i = 0; i < scan_header.num_components; i++) {
                struct v4l2_jpeg_scan_component_spec *scan_component;

                scan_component = &scan_header.component[i];
                for (j = 0; j < header.frame.num_components; j++) {
                        if (header.frame.component[j].component_identifier ==
                            scan_component->component_selector)
                                break;
                }
                if (j == header.frame.num_components)
                        continue;

                ctx->params.jpeg_huff_dc_index[j] =
                        scan_component->dc_entropy_coding_table_selector;
                ctx->params.jpeg_huff_ac_index[j] =
                        scan_component->ac_entropy_coding_table_selector;
        }

        /* Generate Huffman table information */
        for (i = 0; i < 4; i++)
                coda9_jpeg_gen_dec_huff_tab(ctx, i);

        /* start of entropy coded segment */
        ctx->jpeg_ecs_offset = header.ecs_offset;

        switch (header.frame.subsampling) {
        case V4L2_JPEG_CHROMA_SUBSAMPLING_420:
        case V4L2_JPEG_CHROMA_SUBSAMPLING_422:
                ctx->params.jpeg_chroma_subsampling = header.frame.subsampling;
                break;
        default:
                v4l2_err(&dev->v4l2_dev, "chroma subsampling not supported: %d",
                         header.frame.subsampling);
                return -EINVAL;
        }

        return 0;
}

static inline void coda9_jpeg_write_huff_values(struct coda_dev *dev, u8 *bits,
                                                int num_values)
{
        s8 *values = (s8 *)(bits + 16);
        int huff_length, i;

        for (huff_length = 0, i = 0; i < 16; i++)
                huff_length += bits[i];
        for (i = huff_length; i < num_values; i++)
                values[i] = -1;
        for (i = 0; i < num_values; i++)
                coda_write(dev, (s32)values[i], CODA9_REG_JPEG_HUFF_DATA);
}

static void coda9_jpeg_dec_huff_setup(struct coda_ctx *ctx)
{
        struct coda_huff_tab *huff_tab = ctx->params.jpeg_huff_tab;
        struct coda_dev *dev = ctx->dev;
        s16 *huff_min = huff_tab->min;
        s16 *huff_max = huff_tab->max;
        s8 *huff_ptr = huff_tab->ptr;
        int i;

        /* MIN Tables */
        coda_write(dev, 0x003, CODA9_REG_JPEG_HUFF_CTRL);
        coda_write(dev, 0x000, CODA9_REG_JPEG_HUFF_ADDR);
        for (i = 0; i < 4 * 16; i++)
                coda_write(dev, (s32)huff_min[i], CODA9_REG_JPEG_HUFF_DATA);

        /* MAX Tables */
        coda_write(dev, 0x403, CODA9_REG_JPEG_HUFF_CTRL);
        coda_write(dev, 0x440, CODA9_REG_JPEG_HUFF_ADDR);
        for (i = 0; i < 4 * 16; i++)
                coda_write(dev, (s32)huff_max[i], CODA9_REG_JPEG_HUFF_DATA);

        /* PTR Tables */
        coda_write(dev, 0x803, CODA9_REG_JPEG_HUFF_CTRL);
        coda_write(dev, 0x880, CODA9_REG_JPEG_HUFF_ADDR);
        for (i = 0; i < 4 * 16; i++)
                coda_write(dev, (s32)huff_ptr[i], CODA9_REG_JPEG_HUFF_DATA);

        /* VAL Tables: DC Luma, DC Chroma, AC Luma, AC Chroma */
        coda_write(dev, 0xc03, CODA9_REG_JPEG_HUFF_CTRL);
        coda9_jpeg_write_huff_values(dev, huff_tab->luma_dc, 12);
        coda9_jpeg_write_huff_values(dev, huff_tab->chroma_dc, 12);
        coda9_jpeg_write_huff_values(dev, huff_tab->luma_ac, 162);
        coda9_jpeg_write_huff_values(dev, huff_tab->chroma_ac, 162);
        coda_write(dev, 0x000, CODA9_REG_JPEG_HUFF_CTRL);
}

static inline void coda9_jpeg_write_qmat_tab(struct coda_dev *dev,
                                             u8 *qmat, int index)
{
        int i;

        coda_write(dev, index | 0x3, CODA9_REG_JPEG_QMAT_CTRL);
        for (i = 0; i < 64; i++)
                coda_write(dev, qmat[i], CODA9_REG_JPEG_QMAT_DATA);
        coda_write(dev, 0, CODA9_REG_JPEG_QMAT_CTRL);
}

static void coda9_jpeg_qmat_setup(struct coda_ctx *ctx)
{
        struct coda_dev *dev = ctx->dev;
        int *qmat_index = ctx->params.jpeg_qmat_index;
        u8 **qmat_tab = ctx->params.jpeg_qmat_tab;

        coda9_jpeg_write_qmat_tab(dev, qmat_tab[qmat_index[0]], 0x00);
        coda9_jpeg_write_qmat_tab(dev, qmat_tab[qmat_index[1]], 0x40);
        coda9_jpeg_write_qmat_tab(dev, qmat_tab[qmat_index[2]], 0x80);
}

static void coda9_jpeg_dec_bbc_gbu_setup(struct coda_ctx *ctx,
                                         struct vb2_buffer *buf, u32 ecs_offset)
{
        struct coda_dev *dev = ctx->dev;
        int page_ptr, word_ptr, bit_ptr;
        u32 bbc_base_addr, end_addr;
        int bbc_cur_pos;
        int ret, val;

        bbc_base_addr = vb2_dma_contig_plane_dma_addr(buf, 0);
        end_addr = bbc_base_addr + vb2_get_plane_payload(buf, 0);

        page_ptr = ecs_offset / 256;
        word_ptr = (ecs_offset % 256) / 4;
        if (page_ptr & 1)
                word_ptr += 64;
        bit_ptr = (ecs_offset % 4) * 8;
        if (word_ptr & 1)
                bit_ptr += 32;
        word_ptr &= ~0x1;

        coda_write(dev, end_addr, CODA9_REG_JPEG_BBC_WR_PTR);
        coda_write(dev, bbc_base_addr, CODA9_REG_JPEG_BBC_BAS_ADDR);

        /* Leave 3 256-byte page margin to avoid a BBC interrupt */
        coda_write(dev, end_addr + 256 * 3 + 256, CODA9_REG_JPEG_BBC_END_ADDR);
        val = DIV_ROUND_UP(vb2_plane_size(buf, 0), 256) + 3;
        coda_write(dev, BIT(31) | val, CODA9_REG_JPEG_BBC_STRM_CTRL);

        bbc_cur_pos = page_ptr;
        coda_write(dev, bbc_cur_pos, CODA9_REG_JPEG_BBC_CUR_POS);
        coda_write(dev, bbc_base_addr + (bbc_cur_pos << 8),
                        CODA9_REG_JPEG_BBC_EXT_ADDR);
        coda_write(dev, (bbc_cur_pos & 1) << 6, CODA9_REG_JPEG_BBC_INT_ADDR);
        coda_write(dev, 64, CODA9_REG_JPEG_BBC_DATA_CNT);
        coda_write(dev, 0, CODA9_REG_JPEG_BBC_COMMAND);
        do {
                ret = coda_read(dev, CODA9_REG_JPEG_BBC_BUSY);
        } while (ret == 1);

        bbc_cur_pos++;
        coda_write(dev, bbc_cur_pos, CODA9_REG_JPEG_BBC_CUR_POS);
        coda_write(dev, bbc_base_addr + (bbc_cur_pos << 8),
                        CODA9_REG_JPEG_BBC_EXT_ADDR);
        coda_write(dev, (bbc_cur_pos & 1) << 6, CODA9_REG_JPEG_BBC_INT_ADDR);
        coda_write(dev, 64, CODA9_REG_JPEG_BBC_DATA_CNT);
        coda_write(dev, 0, CODA9_REG_JPEG_BBC_COMMAND);
        do {
                ret = coda_read(dev, CODA9_REG_JPEG_BBC_BUSY);
        } while (ret == 1);

        bbc_cur_pos++;
        coda_write(dev, bbc_cur_pos, CODA9_REG_JPEG_BBC_CUR_POS);
        coda_write(dev, 1, CODA9_REG_JPEG_BBC_CTRL);

        coda_write(dev, 0, CODA9_REG_JPEG_GBU_TT_CNT);
        coda_write(dev, word_ptr, CODA9_REG_JPEG_GBU_WD_PTR);
        coda_write(dev, 0, CODA9_REG_JPEG_GBU_BBSR);
        coda_write(dev, 127, CODA9_REG_JPEG_GBU_BBER);
        if (page_ptr & 1) {
                coda_write(dev, 0, CODA9_REG_JPEG_GBU_BBIR);
                coda_write(dev, 0, CODA9_REG_JPEG_GBU_BBHR);
        } else {
                coda_write(dev, 64, CODA9_REG_JPEG_GBU_BBIR);
                coda_write(dev, 64, CODA9_REG_JPEG_GBU_BBHR);
        }
        coda_write(dev, 4, CODA9_REG_JPEG_GBU_CTRL);
        coda_write(dev, bit_ptr, CODA9_REG_JPEG_GBU_FF_RPTR);
        coda_write(dev, 3, CODA9_REG_JPEG_GBU_CTRL);
}

static const int bus_req_num[] = {
        [CODA9_JPEG_FORMAT_420] = 2,
        [CODA9_JPEG_FORMAT_422] = 3,
        [CODA9_JPEG_FORMAT_224] = 3,
        [CODA9_JPEG_FORMAT_444] = 4,
        [CODA9_JPEG_FORMAT_400] = 4,
};

#define MCU_INFO(mcu_block_num, comp_num, comp0_info, comp1_info, comp2_info) \
        (((mcu_block_num) << CODA9_JPEG_MCU_BLOCK_NUM_OFFSET) | \
         ((comp_num) << CODA9_JPEG_COMP_NUM_OFFSET) | \
         ((comp0_info) << CODA9_JPEG_COMP0_INFO_OFFSET) | \
         ((comp1_info) << CODA9_JPEG_COMP1_INFO_OFFSET) | \
         ((comp2_info) << CODA9_JPEG_COMP2_INFO_OFFSET))

static const u32 mcu_info[] = {
        [CODA9_JPEG_FORMAT_420] = MCU_INFO(6, 3, 10, 5, 5),
        [CODA9_JPEG_FORMAT_422] = MCU_INFO(4, 3, 9, 5, 5),
        [CODA9_JPEG_FORMAT_224] = MCU_INFO(4, 3, 6, 5, 5),
        [CODA9_JPEG_FORMAT_444] = MCU_INFO(3, 3, 5, 5, 5),
        [CODA9_JPEG_FORMAT_400] = MCU_INFO(1, 1, 5, 0, 0),
};

/*
 * Convert Huffman table specifcations to tables of codes and code lengths.
 * For reference, see JPEG ITU-T.81 (ISO/IEC 10918-1) [1]
 *
 * [1] https://www.w3.org/Graphics/JPEG/itu-t81.pdf
 */
static int coda9_jpeg_gen_enc_huff_tab(struct coda_ctx *ctx, int tab_num,
                                       int *ehufsi, int *ehufco)
{
        int i, j, k, lastk, si, code, maxsymbol;
        const u8 *bits, *huffval;
        struct {
                int size[256];
                int code[256];
        } *huff;
        static const unsigned char *huff_tabs[4] = {
                luma_dc, luma_ac, chroma_dc, chroma_ac,
        };
        int ret = -EINVAL;

        huff = kzalloc_obj(*huff);
        if (!huff)
                return -ENOMEM;

        bits = huff_tabs[tab_num];
        huffval = huff_tabs[tab_num] + 16;

        maxsymbol = tab_num & 1 ? 256 : 16;

        /* Figure C.1 - Generation of table of Huffman code sizes */
        k = 0;
        for (i = 1; i <= 16; i++) {
                j = bits[i - 1];
                if (k + j > maxsymbol)
                        goto out;
                while (j--)
                        huff->size[k++] = i;
        }
        lastk = k;

        /* Figure C.2 - Generation of table of Huffman codes */
        k = 0;
        code = 0;
        si = huff->size[0];
        while (k < lastk) {
                while (huff->size[k] == si) {
                        huff->code[k++] = code;
                        code++;
                }
                if (code >= (1 << si))
                        goto out;
                code <<= 1;
                si++;
        }

        /* Figure C.3 - Ordering procedure for encoding procedure code tables */
        for (k = 0; k < lastk; k++) {
                i = huffval[k];
                if (i >= maxsymbol || ehufsi[i])
                        goto out;
                ehufco[i] = huff->code[k];
                ehufsi[i] = huff->size[k];
        }

        ret = 0;
out:
        kfree(huff);
        return ret;
}

#define DC_TABLE_INDEX0             0
#define AC_TABLE_INDEX0             1
#define DC_TABLE_INDEX1             2
#define AC_TABLE_INDEX1             3

static u8 *coda9_jpeg_get_huff_bits(struct coda_ctx *ctx, int tab_num)
{
        struct coda_huff_tab *huff_tab = ctx->params.jpeg_huff_tab;

        if (!huff_tab)
                return NULL;

        switch (tab_num) {
        case DC_TABLE_INDEX0: return huff_tab->luma_dc;
        case AC_TABLE_INDEX0: return huff_tab->luma_ac;
        case DC_TABLE_INDEX1: return huff_tab->chroma_dc;
        case AC_TABLE_INDEX1: return huff_tab->chroma_ac;
        }

        return NULL;
}

static int coda9_jpeg_gen_dec_huff_tab(struct coda_ctx *ctx, int tab_num)
{
        int ptr_cnt = 0, huff_code = 0, zero_flag = 0, data_flag = 0;
        u8 *huff_bits;
        s16 *huff_max;
        s16 *huff_min;
        s8 *huff_ptr;
        int ofs;
        int i;

        huff_bits = coda9_jpeg_get_huff_bits(ctx, tab_num);
        if (!huff_bits)
                return -EINVAL;

        /* DC/AC Luma, DC/AC Chroma -> DC Luma/Chroma, AC Luma/Chroma */
        ofs = ((tab_num & 1) << 1) | ((tab_num >> 1) & 1);
        ofs *= 16;

        huff_ptr = ctx->params.jpeg_huff_tab->ptr + ofs;
        huff_max = ctx->params.jpeg_huff_tab->max + ofs;
        huff_min = ctx->params.jpeg_huff_tab->min + ofs;

        for (i = 0; i < 16; i++) {
                if (huff_bits[i]) {
                        huff_ptr[i] = ptr_cnt;
                        ptr_cnt += huff_bits[i];
                        huff_min[i] = huff_code;
                        huff_max[i] = huff_code + (huff_bits[i] - 1);
                        data_flag = 1;
                        zero_flag = 0;
                } else {
                        huff_ptr[i] = -1;
                        huff_min[i] = -1;
                        huff_max[i] = -1;
                        zero_flag = 1;
                }

                if (data_flag == 1) {
                        if (zero_flag == 1)
                                huff_code <<= 1;
                        else
                                huff_code = (huff_max[i] + 1) << 1;
                }
        }

        return 0;
}

static int coda9_jpeg_load_huff_tab(struct coda_ctx *ctx)
{
        struct {
                int size[4][256];
                int code[4][256];
        } *huff;
        u32 *huff_data;
        int i, j;
        int ret;

        huff = kzalloc_obj(*huff);
        if (!huff)
                return -ENOMEM;

        /* Generate all four (luma/chroma DC/AC) code/size lookup tables */
        for (i = 0; i < 4; i++) {
                ret = coda9_jpeg_gen_enc_huff_tab(ctx, i, huff->size[i],
                                                  huff->code[i]);
                if (ret)
                        goto out;
        }

        if (!ctx->params.jpeg_huff_data) {
                ctx->params.jpeg_huff_data =
                        kzalloc(sizeof(u32) * CODA9_JPEG_ENC_HUFF_DATA_SIZE,
                                GFP_KERNEL);
                if (!ctx->params.jpeg_huff_data) {
                        ret = -ENOMEM;
                        goto out;
                }
        }
        huff_data = ctx->params.jpeg_huff_data;

        for (j = 0; j < 4; j++) {
                /* Store Huffman lookup tables in AC0, AC1, DC0, DC1 order */
                int t = (j == 0) ? AC_TABLE_INDEX0 :
                        (j == 1) ? AC_TABLE_INDEX1 :
                        (j == 2) ? DC_TABLE_INDEX0 :
                                   DC_TABLE_INDEX1;
                /* DC tables only have 16 entries */
                int len = (j < 2) ? 256 : 16;

                for (i = 0; i < len; i++) {
                        if (huff->size[t][i] == 0 && huff->code[t][i] == 0)
                                *(huff_data++) = 0;
                        else
                                *(huff_data++) =
                                        ((huff->size[t][i] - 1) << 16) |
                                        huff->code[t][i];
                }
        }

        ret = 0;
out:
        kfree(huff);
        return ret;
}

static void coda9_jpeg_write_huff_tab(struct coda_ctx *ctx)
{
        struct coda_dev *dev = ctx->dev;
        u32 *huff_data = ctx->params.jpeg_huff_data;
        int i;

        /* Write Huffman size/code lookup tables in AC0, AC1, DC0, DC1 order */
        coda_write(dev, 0x3, CODA9_REG_JPEG_HUFF_CTRL);
        for (i = 0; i < CODA9_JPEG_ENC_HUFF_DATA_SIZE; i++)
                coda_write(dev, *(huff_data++), CODA9_REG_JPEG_HUFF_DATA);
        coda_write(dev, 0x0, CODA9_REG_JPEG_HUFF_CTRL);
}

static inline void coda9_jpeg_write_qmat_quotients(struct coda_dev *dev,
                                                   u8 *qmat, int index)
{
        int i;

        coda_write(dev, index | 0x3, CODA9_REG_JPEG_QMAT_CTRL);
        for (i = 0; i < 64; i++)
                coda_write(dev, 0x80000 / qmat[i], CODA9_REG_JPEG_QMAT_DATA);
        coda_write(dev, index, CODA9_REG_JPEG_QMAT_CTRL);
}

static void coda9_jpeg_load_qmat_tab(struct coda_ctx *ctx)
{
        struct coda_dev *dev = ctx->dev;
        u8 *luma_tab;
        u8 *chroma_tab;

        luma_tab = ctx->params.jpeg_qmat_tab[0];
        if (!luma_tab)
                luma_tab = luma_q;

        chroma_tab = ctx->params.jpeg_qmat_tab[1];
        if (!chroma_tab)
                chroma_tab = chroma_q;

        coda9_jpeg_write_qmat_quotients(dev, luma_tab, 0x00);
        coda9_jpeg_write_qmat_quotients(dev, chroma_tab, 0x40);
        coda9_jpeg_write_qmat_quotients(dev, chroma_tab, 0x80);
}

struct coda_jpeg_stream {
        u8 *curr;
        u8 *end;
};

static inline int coda_jpeg_put_byte(u8 byte, struct coda_jpeg_stream *stream)
{
        if (stream->curr >= stream->end)
                return -EINVAL;

        *stream->curr++ = byte;

        return 0;
}

static inline int coda_jpeg_put_word(u16 word, struct coda_jpeg_stream *stream)
{
        if (stream->curr + sizeof(__be16) > stream->end)
                return -EINVAL;

        put_unaligned_be16(word, stream->curr);
        stream->curr += sizeof(__be16);

        return 0;
}

static int coda_jpeg_put_table(u16 marker, u8 index, const u8 *table,
                               size_t len, struct coda_jpeg_stream *stream)
{
        int i, ret;

        ret = coda_jpeg_put_word(marker, stream);
        if (ret < 0)
                return ret;
        ret = coda_jpeg_put_word(3 + len, stream);
        if (ret < 0)
                return ret;
        ret = coda_jpeg_put_byte(index, stream);
        for (i = 0; i < len && ret == 0; i++)
                ret = coda_jpeg_put_byte(table[i], stream);

        return ret;
}

static int coda_jpeg_define_quantization_table(struct coda_ctx *ctx, u8 index,
                                               struct coda_jpeg_stream *stream)
{
        return coda_jpeg_put_table(DQT_MARKER, index,
                                   ctx->params.jpeg_qmat_tab[index], 64,
                                   stream);
}

static int coda_jpeg_define_huffman_table(u8 index, const u8 *table, size_t len,
                                          struct coda_jpeg_stream *stream)
{
        return coda_jpeg_put_table(DHT_MARKER, index, table, len, stream);
}

static int coda9_jpeg_encode_header(struct coda_ctx *ctx, int len, u8 *buf)
{
        struct coda_jpeg_stream stream = { buf, buf + len };
        struct coda_q_data *q_data_src;
        int chroma_format, comp_num;
        int i, ret, pad;

        q_data_src = get_q_data(ctx, V4L2_BUF_TYPE_VIDEO_OUTPUT);
        chroma_format = coda9_jpeg_chroma_format(q_data_src->fourcc);
        if (chroma_format < 0)
                return 0;

        /* Start Of Image */
        ret = coda_jpeg_put_word(SOI_MARKER, &stream);
        if (ret < 0)
                return ret;

        /* Define Restart Interval */
        if (ctx->params.jpeg_restart_interval) {
                ret = coda_jpeg_put_word(DRI_MARKER, &stream);
                if (ret < 0)
                        return ret;
                ret = coda_jpeg_put_word(4, &stream);
                if (ret < 0)
                        return ret;
                ret = coda_jpeg_put_word(ctx->params.jpeg_restart_interval,
                                         &stream);
                if (ret < 0)
                        return ret;
        }

        /* Define Quantization Tables */
        ret = coda_jpeg_define_quantization_table(ctx, 0x00, &stream);
        if (ret < 0)
                return ret;
        if (chroma_format != CODA9_JPEG_FORMAT_400) {
                ret = coda_jpeg_define_quantization_table(ctx, 0x01, &stream);
                if (ret < 0)
                        return ret;
        }

        /* Define Huffman Tables */
        ret = coda_jpeg_define_huffman_table(0x00, luma_dc, 16 + 12, &stream);
        if (ret < 0)
                return ret;
        ret = coda_jpeg_define_huffman_table(0x10, luma_ac, 16 + 162, &stream);
        if (ret < 0)
                return ret;
        if (chroma_format != CODA9_JPEG_FORMAT_400) {
                ret = coda_jpeg_define_huffman_table(0x01, chroma_dc, 16 + 12,
                                                     &stream);
                if (ret < 0)
                        return ret;
                ret = coda_jpeg_define_huffman_table(0x11, chroma_ac, 16 + 162,
                                                     &stream);
                if (ret < 0)
                        return ret;
        }

        /* Start Of Frame */
        ret = coda_jpeg_put_word(SOF_MARKER, &stream);
        if (ret < 0)
                return ret;
        comp_num = (chroma_format == CODA9_JPEG_FORMAT_400) ? 1 : 3;
        ret = coda_jpeg_put_word(8 + comp_num * 3, &stream);
        if (ret < 0)
                return ret;
        ret = coda_jpeg_put_byte(0x08, &stream);
        if (ret < 0)
                return ret;
        ret = coda_jpeg_put_word(q_data_src->height, &stream);
        if (ret < 0)
                return ret;
        ret = coda_jpeg_put_word(q_data_src->width, &stream);
        if (ret < 0)
                return ret;
        ret = coda_jpeg_put_byte(comp_num, &stream);
        if (ret < 0)
                return ret;
        for (i = 0; i < comp_num; i++) {
                static unsigned char subsampling[5][3] = {
                        [CODA9_JPEG_FORMAT_420] = { 0x22, 0x11, 0x11 },
                        [CODA9_JPEG_FORMAT_422] = { 0x21, 0x11, 0x11 },
                        [CODA9_JPEG_FORMAT_224] = { 0x12, 0x11, 0x11 },
                        [CODA9_JPEG_FORMAT_444] = { 0x11, 0x11, 0x11 },
                        [CODA9_JPEG_FORMAT_400] = { 0x11 },
                };

                /* Component identifier, matches SOS */
                ret = coda_jpeg_put_byte(i + 1, &stream);
                if (ret < 0)
                        return ret;
                ret = coda_jpeg_put_byte(subsampling[chroma_format][i],
                                         &stream);
                if (ret < 0)
                        return ret;
                /* Chroma table index */
                ret = coda_jpeg_put_byte((i == 0) ? 0 : 1, &stream);
                if (ret < 0)
                        return ret;
        }

        /* Pad to multiple of 8 bytes */
        pad = (stream.curr - buf) % 8;
        if (pad) {
                pad = 8 - pad;
                while (pad--) {
                        ret = coda_jpeg_put_byte(0x00, &stream);
                        if (ret < 0)
                                return ret;
                }
        }

        return stream.curr - buf;
}

/*
 * Scale quantization table using nonlinear scaling factor
 * u8 qtab[64], scale [50,190]
 */
static void coda_scale_quant_table(u8 *q_tab, int scale)
{
        unsigned int temp;
        int i;

        for (i = 0; i < 64; i++) {
                temp = DIV_ROUND_CLOSEST((unsigned int)q_tab[i] * scale, 100);
                if (temp <= 0)
                        temp = 1;
                if (temp > 255)
                        temp = 255;
                q_tab[i] = (unsigned char)temp;
        }
}

void coda_set_jpeg_compression_quality(struct coda_ctx *ctx, int quality)
{
        unsigned int scale;

        ctx->params.jpeg_quality = quality;

        /* Clip quality setting to [5,100] interval */
        if (quality > 100)
                quality = 100;
        if (quality < 5)
                quality = 5;

        /*
         * Non-linear scaling factor:
         * [5,50] -> [1000..100], [51,100] -> [98..0]
         */
        if (quality < 50)
                scale = 5000 / quality;
        else
                scale = 200 - 2 * quality;

        if (ctx->params.jpeg_qmat_tab[0]) {
                memcpy(ctx->params.jpeg_qmat_tab[0], luma_q, 64);
                coda_scale_quant_table(ctx->params.jpeg_qmat_tab[0], scale);
        }
        if (ctx->params.jpeg_qmat_tab[1]) {
                memcpy(ctx->params.jpeg_qmat_tab[1], chroma_q, 64);
                coda_scale_quant_table(ctx->params.jpeg_qmat_tab[1], scale);
        }
}

/*
 * Encoder context operations
 */

static int coda9_jpeg_start_encoding(struct coda_ctx *ctx)
{
        struct coda_dev *dev = ctx->dev;
        int ret;

        ret = coda9_jpeg_load_huff_tab(ctx);
        if (ret < 0) {
                v4l2_err(&dev->v4l2_dev, "error loading Huffman tables\n");
                return ret;
        }
        if (!ctx->params.jpeg_qmat_tab[0]) {
                ctx->params.jpeg_qmat_tab[0] = kmalloc(64, GFP_KERNEL);
                if (!ctx->params.jpeg_qmat_tab[0])
                        return -ENOMEM;
        }
        if (!ctx->params.jpeg_qmat_tab[1]) {
                ctx->params.jpeg_qmat_tab[1] = kmalloc(64, GFP_KERNEL);
                if (!ctx->params.jpeg_qmat_tab[1])
                        return -ENOMEM;
        }
        coda_set_jpeg_compression_quality(ctx, ctx->params.jpeg_quality);

        return 0;
}

static int coda9_jpeg_prepare_encode(struct coda_ctx *ctx)
{
        struct coda_q_data *q_data_src;
        struct vb2_v4l2_buffer *src_buf, *dst_buf;
        struct coda_dev *dev = ctx->dev;
        u32 start_addr, end_addr;
        u16 aligned_width, aligned_height;
        bool chroma_interleave;
        int chroma_format;
        int header_len;
        int ret;
        ktime_t timeout;

        src_buf = v4l2_m2m_next_src_buf(ctx->fh.m2m_ctx);
        dst_buf = v4l2_m2m_next_dst_buf(ctx->fh.m2m_ctx);
        q_data_src = get_q_data(ctx, V4L2_BUF_TYPE_VIDEO_OUTPUT);

        if (vb2_get_plane_payload(&src_buf->vb2_buf, 0) == 0)
                vb2_set_plane_payload(&src_buf->vb2_buf, 0,
                                      vb2_plane_size(&src_buf->vb2_buf, 0));

        src_buf->sequence = ctx->osequence;
        dst_buf->sequence = ctx->osequence;
        ctx->osequence++;

        src_buf->flags |= V4L2_BUF_FLAG_KEYFRAME;
        src_buf->flags &= ~V4L2_BUF_FLAG_PFRAME;

        coda_set_gdi_regs(ctx);

        start_addr = vb2_dma_contig_plane_dma_addr(&dst_buf->vb2_buf, 0);
        end_addr = start_addr + vb2_plane_size(&dst_buf->vb2_buf, 0);

        chroma_format = coda9_jpeg_chroma_format(q_data_src->fourcc);
        if (chroma_format < 0)
                return chroma_format;

        /* Round image dimensions to multiple of MCU size */
        aligned_width = round_up(q_data_src->width, width_align[chroma_format]);
        aligned_height = round_up(q_data_src->height,
                                  height_align[chroma_format]);
        if (aligned_width != q_data_src->bytesperline) {
                v4l2_err(&dev->v4l2_dev, "wrong stride: %d instead of %d\n",
                         aligned_width, q_data_src->bytesperline);
        }

        header_len =
                coda9_jpeg_encode_header(ctx,
                                         vb2_plane_size(&dst_buf->vb2_buf, 0),
                                         vb2_plane_vaddr(&dst_buf->vb2_buf, 0));
        if (header_len < 0)
                return header_len;

        coda_write(dev, start_addr + header_len, CODA9_REG_JPEG_BBC_BAS_ADDR);
        coda_write(dev, end_addr, CODA9_REG_JPEG_BBC_END_ADDR);
        coda_write(dev, start_addr + header_len, CODA9_REG_JPEG_BBC_WR_PTR);
        coda_write(dev, start_addr + header_len, CODA9_REG_JPEG_BBC_RD_PTR);
        coda_write(dev, 0, CODA9_REG_JPEG_BBC_CUR_POS);
        /* 64 words per 256-byte page */
        coda_write(dev, 64, CODA9_REG_JPEG_BBC_DATA_CNT);
        coda_write(dev, start_addr, CODA9_REG_JPEG_BBC_EXT_ADDR);
        coda_write(dev, 0, CODA9_REG_JPEG_BBC_INT_ADDR);

        coda_write(dev, 0, CODA9_REG_JPEG_GBU_BT_PTR);
        coda_write(dev, 0, CODA9_REG_JPEG_GBU_WD_PTR);
        coda_write(dev, 0, CODA9_REG_JPEG_GBU_BBSR);
        coda_write(dev, BIT(31) | ((end_addr - start_addr - header_len) / 256),
                   CODA9_REG_JPEG_BBC_STRM_CTRL);
        coda_write(dev, 0, CODA9_REG_JPEG_GBU_CTRL);
        coda_write(dev, 0, CODA9_REG_JPEG_GBU_FF_RPTR);
        coda_write(dev, 127, CODA9_REG_JPEG_GBU_BBER);
        coda_write(dev, 64, CODA9_REG_JPEG_GBU_BBIR);
        coda_write(dev, 64, CODA9_REG_JPEG_GBU_BBHR);

        chroma_interleave = (q_data_src->fourcc == V4L2_PIX_FMT_NV12);
        coda_write(dev, CODA9_JPEG_PIC_CTRL_TC_DIRECTION |
                   CODA9_JPEG_PIC_CTRL_ENCODER_EN, CODA9_REG_JPEG_PIC_CTRL);
        coda_write(dev, 0, CODA9_REG_JPEG_SCL_INFO);
        coda_write(dev, chroma_interleave, CODA9_REG_JPEG_DPB_CONFIG);
        coda_write(dev, ctx->params.jpeg_restart_interval,
                   CODA9_REG_JPEG_RST_INTVAL);
        coda_write(dev, 1, CODA9_REG_JPEG_BBC_CTRL);

        coda_write(dev, bus_req_num[chroma_format], CODA9_REG_JPEG_OP_INFO);

        coda9_jpeg_write_huff_tab(ctx);
        coda9_jpeg_load_qmat_tab(ctx);

        if (ctx->params.rot_mode & CODA_ROT_90) {
                aligned_width = aligned_height;
                aligned_height = q_data_src->bytesperline;
                if (chroma_format == CODA9_JPEG_FORMAT_422)
                        chroma_format = CODA9_JPEG_FORMAT_224;
                else if (chroma_format == CODA9_JPEG_FORMAT_224)
                        chroma_format = CODA9_JPEG_FORMAT_422;
        }
        /* These need to be multiples of MCU size */
        coda_write(dev, aligned_width << 16 | aligned_height,
                   CODA9_REG_JPEG_PIC_SIZE);
        coda_write(dev, ctx->params.rot_mode ?
                   (CODA_ROT_MIR_ENABLE | ctx->params.rot_mode) : 0,
                   CODA9_REG_JPEG_ROT_INFO);

        coda_write(dev, mcu_info[chroma_format], CODA9_REG_JPEG_MCU_INFO);

        coda_write(dev, 1, CODA9_GDI_CONTROL);
        timeout = ktime_add_us(ktime_get(), 100000);
        do {
                ret = coda_read(dev, CODA9_GDI_STATUS);
                if (ktime_compare(ktime_get(), timeout) > 0) {
                        v4l2_err(&dev->v4l2_dev, "timeout waiting for GDI\n");
                        return -ETIMEDOUT;
                }
        } while (!ret);

        coda_write(dev, (chroma_format << 17) | (chroma_interleave << 16) |
                   q_data_src->bytesperline, CODA9_GDI_INFO_CONTROL);
        /* The content of this register seems to be irrelevant: */
        coda_write(dev, aligned_width << 16 | aligned_height,
                   CODA9_GDI_INFO_PIC_SIZE);

        coda_write_base(ctx, q_data_src, src_buf, CODA9_GDI_INFO_BASE_Y);

        coda_write(dev, 0, CODA9_REG_JPEG_DPB_BASE00);
        coda_write(dev, 0, CODA9_GDI_CONTROL);
        coda_write(dev, 1, CODA9_GDI_PIC_INIT_HOST);

        coda_write(dev, 1, CODA9_GDI_WPROT_ERR_CLR);
        coda_write(dev, 0, CODA9_GDI_WPROT_RGN_EN);

        trace_coda_jpeg_run(ctx, src_buf);

        coda_write(dev, 1, CODA9_REG_JPEG_PIC_START);

        return 0;
}

static void coda9_jpeg_finish_encode(struct coda_ctx *ctx)
{
        struct vb2_v4l2_buffer *src_buf, *dst_buf;
        struct coda_dev *dev = ctx->dev;
        u32 wr_ptr, start_ptr;
        u32 err_mb;

        if (ctx->aborting) {
                coda_write(ctx->dev, 0, CODA9_REG_JPEG_BBC_FLUSH_CMD);
                return;
        }

        /*
         * Lock to make sure that an encoder stop command running in parallel
         * will either already have marked src_buf as last, or it will wake up
         * the capture queue after the buffers are returned.
         */
        mutex_lock(&ctx->wakeup_mutex);
        src_buf = v4l2_m2m_src_buf_remove(ctx->fh.m2m_ctx);
        dst_buf = v4l2_m2m_dst_buf_remove(ctx->fh.m2m_ctx);

        trace_coda_jpeg_done(ctx, dst_buf);

        /*
         * Set plane payload to the number of bytes written out
         * by the JPEG processing unit
         */
        start_ptr = vb2_dma_contig_plane_dma_addr(&dst_buf->vb2_buf, 0);
        wr_ptr = coda_read(dev, CODA9_REG_JPEG_BBC_WR_PTR);
        vb2_set_plane_payload(&dst_buf->vb2_buf, 0, wr_ptr - start_ptr);

        err_mb = coda_read(dev, CODA9_REG_JPEG_PIC_ERRMB);
        if (err_mb)
                coda_dbg(1, ctx, "ERRMB: 0x%x\n", err_mb);

        coda_write(dev, 0, CODA9_REG_JPEG_BBC_FLUSH_CMD);

        dst_buf->flags &= ~(V4L2_BUF_FLAG_PFRAME | V4L2_BUF_FLAG_LAST);
        dst_buf->flags |= V4L2_BUF_FLAG_KEYFRAME;
        dst_buf->flags |= src_buf->flags & V4L2_BUF_FLAG_LAST;

        v4l2_m2m_buf_copy_metadata(src_buf, dst_buf);

        v4l2_m2m_buf_done(src_buf, VB2_BUF_STATE_DONE);
        coda_m2m_buf_done(ctx, dst_buf, err_mb ? VB2_BUF_STATE_ERROR :
                                                 VB2_BUF_STATE_DONE);
        mutex_unlock(&ctx->wakeup_mutex);

        coda_dbg(1, ctx, "job finished: encoded frame (%u)%s\n",
                 dst_buf->sequence,
                 (dst_buf->flags & V4L2_BUF_FLAG_LAST) ? " (last)" : "");

        /*
         * Reset JPEG processing unit after each encode run to work
         * around hangups when switching context between encoder and
         * decoder.
         */
        coda_hw_reset(ctx);
}

static void coda9_jpeg_encode_timeout(struct coda_ctx *ctx)
{
        struct coda_dev *dev = ctx->dev;
        u32 end_addr, wr_ptr;

        /* Handle missing BBC overflow interrupt via timeout */
        end_addr = coda_read(dev, CODA9_REG_JPEG_BBC_END_ADDR);
        wr_ptr = coda_read(dev, CODA9_REG_JPEG_BBC_WR_PTR);
        if (wr_ptr >= end_addr - 256) {
                v4l2_err(&dev->v4l2_dev, "JPEG too large for capture buffer\n");
                coda9_jpeg_finish_encode(ctx);
                return;
        }

        coda_hw_reset(ctx);
}

static void coda9_jpeg_release(struct coda_ctx *ctx)
{
        int i;

        if (ctx->params.jpeg_qmat_tab[0] == luma_q)
                ctx->params.jpeg_qmat_tab[0] = NULL;
        if (ctx->params.jpeg_qmat_tab[1] == chroma_q)
                ctx->params.jpeg_qmat_tab[1] = NULL;
        for (i = 0; i < 3; i++)
                kfree(ctx->params.jpeg_qmat_tab[i]);
        kfree(ctx->params.jpeg_huff_data);
        kfree(ctx->params.jpeg_huff_tab);
}

const struct coda_context_ops coda9_jpeg_encode_ops = {
        .queue_init = coda_encoder_queue_init,
        .start_streaming = coda9_jpeg_start_encoding,
        .prepare_run = coda9_jpeg_prepare_encode,
        .finish_run = coda9_jpeg_finish_encode,
        .run_timeout = coda9_jpeg_encode_timeout,
        .release = coda9_jpeg_release,
};

/*
 * Decoder context operations
 */

static int coda9_jpeg_start_decoding(struct coda_ctx *ctx)
{
        ctx->params.jpeg_qmat_index[0] = 0;
        ctx->params.jpeg_qmat_index[1] = 1;
        ctx->params.jpeg_qmat_index[2] = 1;
        ctx->params.jpeg_qmat_tab[0] = luma_q;
        ctx->params.jpeg_qmat_tab[1] = chroma_q;
        /* nothing more to do here */

        /* TODO: we could already scan the first header to get the chroma
         * format.
         */

        return 0;
}

static int coda9_jpeg_prepare_decode(struct coda_ctx *ctx)
{
        struct coda_dev *dev = ctx->dev;
        int aligned_width, aligned_height;
        int chroma_format;
        int ret;
        u32 val, dst_fourcc;
        struct coda_q_data *q_data_src, *q_data_dst;
        struct vb2_v4l2_buffer *src_buf, *dst_buf;
        int chroma_interleave;
        int scl_hor_mode, scl_ver_mode;

        src_buf = v4l2_m2m_next_src_buf(ctx->fh.m2m_ctx);
        dst_buf = v4l2_m2m_next_dst_buf(ctx->fh.m2m_ctx);
        q_data_src = get_q_data(ctx, V4L2_BUF_TYPE_VIDEO_OUTPUT);
        q_data_dst = get_q_data(ctx, V4L2_BUF_TYPE_VIDEO_CAPTURE);
        dst_fourcc = q_data_dst->fourcc;

        scl_hor_mode = coda_jpeg_scale(q_data_src->width, q_data_dst->width);
        scl_ver_mode = coda_jpeg_scale(q_data_src->height, q_data_dst->height);

        if (vb2_get_plane_payload(&src_buf->vb2_buf, 0) == 0)
                vb2_set_plane_payload(&src_buf->vb2_buf, 0,
                                      vb2_plane_size(&src_buf->vb2_buf, 0));

        chroma_format = coda9_jpeg_chroma_format(q_data_dst->fourcc);
        if (chroma_format < 0)
                return chroma_format;

        ret = coda_jpeg_decode_header(ctx, &src_buf->vb2_buf);
        if (ret < 0) {
                src_buf = v4l2_m2m_src_buf_remove(ctx->fh.m2m_ctx);
                dst_buf = v4l2_m2m_dst_buf_remove(ctx->fh.m2m_ctx);
                v4l2_m2m_buf_done(src_buf, VB2_BUF_STATE_DONE);
                v4l2_m2m_buf_done(dst_buf, VB2_BUF_STATE_ERROR);

                return ret;
        }

        /* Round image dimensions to multiple of MCU size */
        aligned_width = round_up(q_data_src->width, width_align[chroma_format]);
        aligned_height = round_up(q_data_src->height, height_align[chroma_format]);
        if (aligned_width != q_data_dst->bytesperline) {
                v4l2_err(&dev->v4l2_dev, "stride mismatch: %d != %d\n",
                         aligned_width, q_data_dst->bytesperline);
        }

        coda_set_gdi_regs(ctx);

        val = ctx->params.jpeg_huff_ac_index[0] << 12 |
              ctx->params.jpeg_huff_ac_index[1] << 11 |
              ctx->params.jpeg_huff_ac_index[2] << 10 |
              ctx->params.jpeg_huff_dc_index[0] << 9 |
              ctx->params.jpeg_huff_dc_index[1] << 8 |
              ctx->params.jpeg_huff_dc_index[2] << 7;
        if (ctx->params.jpeg_huff_tab)
                val |= CODA9_JPEG_PIC_CTRL_USER_HUFFMAN_EN;
        coda_write(dev, val, CODA9_REG_JPEG_PIC_CTRL);

        coda_write(dev, aligned_width << 16 | aligned_height,
                        CODA9_REG_JPEG_PIC_SIZE);

        chroma_interleave = (dst_fourcc == V4L2_PIX_FMT_NV12);
        coda_write(dev, 0, CODA9_REG_JPEG_ROT_INFO);
        coda_write(dev, bus_req_num[chroma_format], CODA9_REG_JPEG_OP_INFO);
        coda_write(dev, mcu_info[chroma_format], CODA9_REG_JPEG_MCU_INFO);
        if (scl_hor_mode || scl_ver_mode)
                val = CODA9_JPEG_SCL_ENABLE | (scl_hor_mode << 2) | scl_ver_mode;
        else
                val = 0;
        coda_write(dev, val, CODA9_REG_JPEG_SCL_INFO);
        coda_write(dev, chroma_interleave, CODA9_REG_JPEG_DPB_CONFIG);
        coda_write(dev, ctx->params.jpeg_restart_interval,
                        CODA9_REG_JPEG_RST_INTVAL);

        if (ctx->params.jpeg_huff_tab)
                coda9_jpeg_dec_huff_setup(ctx);

        coda9_jpeg_qmat_setup(ctx);

        coda9_jpeg_dec_bbc_gbu_setup(ctx, &src_buf->vb2_buf,
                                     ctx->jpeg_ecs_offset);

        coda_write(dev, 0, CODA9_REG_JPEG_RST_INDEX);
        coda_write(dev, 0, CODA9_REG_JPEG_RST_COUNT);

        coda_write(dev, 0, CODA9_REG_JPEG_DPCM_DIFF_Y);
        coda_write(dev, 0, CODA9_REG_JPEG_DPCM_DIFF_CB);
        coda_write(dev, 0, CODA9_REG_JPEG_DPCM_DIFF_CR);

        coda_write(dev, 0, CODA9_REG_JPEG_ROT_INFO);

        coda_write(dev, 1, CODA9_GDI_CONTROL);
        do {
                ret = coda_read(dev, CODA9_GDI_STATUS);
        } while (!ret);

        val = (chroma_format << 17) | (chroma_interleave << 16) |
              q_data_dst->bytesperline;
        if (ctx->tiled_map_type == GDI_TILED_FRAME_MB_RASTER_MAP)
                val |= 3 << 20;
        coda_write(dev, val, CODA9_GDI_INFO_CONTROL);

        coda_write(dev, aligned_width << 16 | aligned_height,
                        CODA9_GDI_INFO_PIC_SIZE);

        coda_write_base(ctx, q_data_dst, dst_buf, CODA9_GDI_INFO_BASE_Y);

        coda_write(dev, 0, CODA9_REG_JPEG_DPB_BASE00);
        coda_write(dev, 0, CODA9_GDI_CONTROL);
        coda_write(dev, 1, CODA9_GDI_PIC_INIT_HOST);

        trace_coda_jpeg_run(ctx, src_buf);

        coda_write(dev, 1, CODA9_REG_JPEG_PIC_START);

        return 0;
}

static void coda9_jpeg_finish_decode(struct coda_ctx *ctx)
{
        struct coda_dev *dev = ctx->dev;
        struct vb2_v4l2_buffer *dst_buf, *src_buf;
        struct coda_q_data *q_data_dst;
        u32 err_mb;

        err_mb = coda_read(dev, CODA9_REG_JPEG_PIC_ERRMB);
        if (err_mb)
                v4l2_err(&dev->v4l2_dev, "ERRMB: 0x%x\n", err_mb);

        coda_write(dev, 0, CODA9_REG_JPEG_BBC_FLUSH_CMD);

        /*
         * Lock to make sure that a decoder stop command running in parallel
         * will either already have marked src_buf as last, or it will wake up
         * the capture queue after the buffers are returned.
         */
        mutex_lock(&ctx->wakeup_mutex);
        src_buf = v4l2_m2m_src_buf_remove(ctx->fh.m2m_ctx);
        dst_buf = v4l2_m2m_dst_buf_remove(ctx->fh.m2m_ctx);
        dst_buf->sequence = ctx->osequence++;

        trace_coda_jpeg_done(ctx, dst_buf);

        dst_buf->flags &= ~(V4L2_BUF_FLAG_PFRAME | V4L2_BUF_FLAG_LAST);
        dst_buf->flags |= V4L2_BUF_FLAG_KEYFRAME;
        dst_buf->flags |= src_buf->flags & V4L2_BUF_FLAG_LAST;

        v4l2_m2m_buf_copy_metadata(src_buf, dst_buf);

        q_data_dst = get_q_data(ctx, V4L2_BUF_TYPE_VIDEO_CAPTURE);
        vb2_set_plane_payload(&dst_buf->vb2_buf, 0, q_data_dst->sizeimage);

        v4l2_m2m_buf_done(src_buf, VB2_BUF_STATE_DONE);
        coda_m2m_buf_done(ctx, dst_buf, err_mb ? VB2_BUF_STATE_ERROR :
                                                 VB2_BUF_STATE_DONE);

        mutex_unlock(&ctx->wakeup_mutex);

        coda_dbg(1, ctx, "job finished: decoded frame (%u)%s\n",
                 dst_buf->sequence,
                 (dst_buf->flags & V4L2_BUF_FLAG_LAST) ? " (last)" : "");

        /*
         * Reset JPEG processing unit after each decode run to work
         * around hangups when switching context between encoder and
         * decoder.
         */
        coda_hw_reset(ctx);
}

const struct coda_context_ops coda9_jpeg_decode_ops = {
        .queue_init = coda_encoder_queue_init, /* non-bitstream operation */
        .start_streaming = coda9_jpeg_start_decoding,
        .prepare_run = coda9_jpeg_prepare_decode,
        .finish_run = coda9_jpeg_finish_decode,
        .release = coda9_jpeg_release,
};

irqreturn_t coda9_jpeg_irq_handler(int irq, void *data)
{
        struct coda_dev *dev = data;
        struct coda_ctx *ctx;
        int status;
        int err_mb;

        status = coda_read(dev, CODA9_REG_JPEG_PIC_STATUS);
        if (status == 0)
                return IRQ_HANDLED;
        coda_write(dev, status, CODA9_REG_JPEG_PIC_STATUS);

        if (status & CODA9_JPEG_STATUS_OVERFLOW)
                v4l2_err(&dev->v4l2_dev, "JPEG overflow\n");

        if (status & CODA9_JPEG_STATUS_BBC_INT)
                v4l2_err(&dev->v4l2_dev, "JPEG BBC interrupt\n");

        if (status & CODA9_JPEG_STATUS_ERROR) {
                v4l2_err(&dev->v4l2_dev, "JPEG error\n");

                err_mb = coda_read(dev, CODA9_REG_JPEG_PIC_ERRMB);
                if (err_mb) {
                        v4l2_err(&dev->v4l2_dev,
                                 "ERRMB: 0x%x: rst idx %d, mcu pos (%d,%d)\n",
                                 err_mb, err_mb >> 24, (err_mb >> 12) & 0xfff,
                                 err_mb & 0xfff);
                }
        }

        ctx = v4l2_m2m_get_curr_priv(dev->m2m_dev);
        if (!ctx) {
                v4l2_err(&dev->v4l2_dev,
                         "Instance released before the end of transaction\n");
                mutex_unlock(&dev->coda_mutex);
                return IRQ_HANDLED;
        }

        complete(&ctx->completion);

        return IRQ_HANDLED;
}