/*
 * aiq3a_util.cpp - aiq 3a utility:
 *
 *  Copyright (c) 2015 Intel Corporation
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *      http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 *
 * Author: Wind Yuan <feng.yuan@intel.com>
 * Author: Shincy Tu <shincy.tu@intel.com>
 */

#include "aiq3a_utils.h"
#include "x3a_isp_config.h"

namespace XCam {

bool
translate_3a_stats (XCam3AStats *from, struct atomisp_3a_statistics *to)
{
    XCAM_ASSERT (from);
    XCAM_ASSERT (to);

    struct atomisp_grid_info &to_info = to->grid_info;
    XCam3AStatsInfo &from_info = from->info;
    uint32_t color_count = (from_info.grid_pixel_size / 2) * (from_info.grid_pixel_size / 2);

    XCAM_ASSERT (to_info.bqs_per_grid_cell == 8);

    for (uint32_t i = 0; i < from_info.height; ++i)
        for (uint32_t j = 0; j < from_info.width; ++j) {
            to->data [i * to_info.aligned_width + j].ae_y =
                from->stats [i * from_info.aligned_width + j].avg_y * color_count;
            to->data [i * to_info.aligned_width + j].awb_gr =
                from->stats [i * from_info.aligned_width + j].avg_gr * color_count;
            to->data [i * to_info.aligned_width + j].awb_r =
                from->stats [i * from_info.aligned_width + j].avg_r * color_count;
            to->data [i * to_info.aligned_width + j].awb_b =
                from->stats [i * from_info.aligned_width + j].avg_b * color_count;
            to->data [i * to_info.aligned_width + j].awb_gb =
                from->stats [i * from_info.aligned_width + j].avg_gb * color_count;
            to->data [i * to_info.aligned_width + j].awb_cnt =
                from->stats [i * from_info.aligned_width + j].valid_wb_count;
            to->data [i * to_info.aligned_width + j].af_hpf1 =
                from->stats [i * from_info.aligned_width + j].f_value1;
            to->data [i * to_info.aligned_width + j].af_hpf2 =
                from->stats [i * from_info.aligned_width + j].f_value2;
        }
    return true;
}

static void
matrix_3x3_mutiply (double *dest, const double *src1, const double *src2)
{
    dest[0] = src1[0] * src2[0] + src1[1] * src2[3] + src1[2] * src2[6];
    dest[1] = src1[0] * src2[1] + src1[1] * src2[4] + src1[2] * src2[7];
    dest[2] = src1[0] * src2[2] + src1[1] * src2[5] + src1[2] * src2[8];

    dest[3] = src1[3] * src2[0] + src1[4] * src2[3] + src1[5] * src2[6];
    dest[4] = src1[3] * src2[1] + src1[4] * src2[4] + src1[5] * src2[7];
    dest[5] = src1[3] * src2[2] + src1[4] * src2[5] + src1[5] * src2[8];

    dest[6] = src1[6] * src2[0] + src1[7] * src2[3] + src1[8] * src2[6];
    dest[7] = src1[6] * src2[1] + src1[7] * src2[4] + src1[8] * src2[7];
    dest[8] = src1[6] * src2[2] + src1[7] * src2[5] + src1[8] * src2[8];
}

static uint32_t
translate_atomisp_parameters (
    const struct atomisp_parameters &atomisp_params,
    XCam3aResultHead *results[], uint32_t max_count)
{
    uint32_t result_count = 0;
    double coefficient = 0.0;

    /* Translation for white balance */
    XCAM_ASSERT (result_count < max_count);
    if (atomisp_params.wb_config) {
        XCam3aResultWhiteBalance *wb = xcam_malloc0_type (XCam3aResultWhiteBalance);
        XCAM_ASSERT (wb);
        wb->head.type = XCAM_3A_RESULT_WHITE_BALANCE;
        wb->head.process_type = XCAM_IMAGE_PROCESS_ALWAYS;
        wb->head.version = xcam_version ();
        coefficient = pow (2, (16 - atomisp_params.wb_config->integer_bits));
        wb->r_gain = atomisp_params.wb_config->r / coefficient;
        wb->gr_gain = atomisp_params.wb_config->gr / coefficient;
        wb->gb_gain = atomisp_params.wb_config->gb / coefficient;
        wb->b_gain = atomisp_params.wb_config->b / coefficient;
        results[result_count++] = (XCam3aResultHead*)wb;
    }

    /* Translation for black level correction */
    XCAM_ASSERT (result_count < max_count);
    if (atomisp_params.ob_config) {
        XCam3aResultBlackLevel *blc = xcam_malloc0_type (XCam3aResultBlackLevel);
        XCAM_ASSERT (blc);
        blc->head.type =    XCAM_3A_RESULT_BLACK_LEVEL;
        blc->head.process_type = XCAM_IMAGE_PROCESS_ALWAYS;
        blc->head.version = xcam_version ();
        if (atomisp_params.ob_config->mode == atomisp_ob_mode_fixed) {
            blc->r_level = atomisp_params.ob_config->level_r / (double)65536;
            blc->gr_level = atomisp_params.ob_config->level_gr / (double)65536;
            blc->gb_level = atomisp_params.ob_config->level_gb / (double)65536;
            blc->b_level = atomisp_params.ob_config->level_b / (double)65536;
        }
        results[result_count++] = (XCam3aResultHead*)blc;
    }

    /* Translation for color correction */
    XCAM_ASSERT (result_count < max_count);
    if (atomisp_params.yuv2rgb_cc_config) {
        static const double rgb2yuv_matrix [XCAM_COLOR_MATRIX_SIZE] = {
            0.299, 0.587, 0.114,
            -0.14713, -0.28886, 0.436,
            0.615, -0.51499, -0.10001
        };
        static const double r_ycgco_matrix [XCAM_COLOR_MATRIX_SIZE] = {
            0.25, 0.5, 0.25,
            -0.25, 0.5, -0.25,
            0.5, 0, -0.5
        };

        double tmp_matrix [XCAM_COLOR_MATRIX_SIZE] = {0.0};
        double cc_matrix [XCAM_COLOR_MATRIX_SIZE] = {0.0};
        XCam3aResultColorMatrix *cm = xcam_malloc0_type (XCam3aResultColorMatrix);
        XCAM_ASSERT (cm);
        cm->head.type = XCAM_3A_RESULT_RGB2YUV_MATRIX;
        cm->head.process_type = XCAM_IMAGE_PROCESS_ALWAYS;
        cm->head.version = xcam_version ();
        coefficient = pow (2, atomisp_params.yuv2rgb_cc_config->fraction_bits);
        for (int i = 0; i < XCAM_COLOR_MATRIX_SIZE; i++) {
            tmp_matrix [i] = atomisp_params.yuv2rgb_cc_config->matrix [i] / coefficient;
        }
        matrix_3x3_mutiply (cc_matrix, tmp_matrix, r_ycgco_matrix);
        matrix_3x3_mutiply (cm->matrix, rgb2yuv_matrix, cc_matrix);
        //results = yuv2rgb_matrix * tmp_matrix * r_ycgco_matrix
        results[result_count++] = (XCam3aResultHead*)cm;
    }

    /* Translation for gamma table */
    XCAM_ASSERT (result_count < max_count);
    if (atomisp_params.g_gamma_table) {
        XCam3aResultGammaTable *gt = xcam_malloc0_type (XCam3aResultGammaTable);
        XCAM_ASSERT (gt);
        gt->head.type = XCAM_3A_RESULT_G_GAMMA;
        gt->head.process_type = XCAM_IMAGE_PROCESS_ALWAYS;
        gt->head.version = xcam_version ();
        for (int i = 0; i < XCAM_GAMMA_TABLE_SIZE; i++) {
            gt->table[i] = (double)atomisp_params.g_gamma_table->data.vamem_2[i] / 16;
        }
        results[result_count++] = (XCam3aResultHead*)gt;
    }

    /* Translation for macc matrix table */
    XCAM_ASSERT (result_count < max_count);
    if (atomisp_params.macc_config) {
        XCam3aResultMaccMatrix *macc = xcam_malloc0_type (XCam3aResultMaccMatrix);
        XCAM_ASSERT (macc);
        macc->head.type = XCAM_3A_RESULT_MACC;
        macc->head.process_type = XCAM_IMAGE_PROCESS_ALWAYS;
        macc->head.version = xcam_version ();
        coefficient = pow (2, (13 - atomisp_params.macc_config->color_effect));
        for (int i = 0; i < XCAM_CHROMA_AXIS_SIZE * XCAM_CHROMA_MATRIX_SIZE; i++) {
            macc->table[i] = (double)atomisp_params.macc_table->data[i] / coefficient;
        }
        results[result_count++] = (XCam3aResultHead*)macc;
    }

    /* Translation for defect pixel correction */
    XCAM_ASSERT (result_count < max_count);
    if (atomisp_params.dp_config) {
        XCam3aResultDefectPixel *dpc = xcam_malloc0_type (XCam3aResultDefectPixel);
        XCAM_ASSERT (dpc);
        dpc->head.type = XCAM_3A_RESULT_DEFECT_PIXEL_CORRECTION;
        dpc->head.process_type = XCAM_IMAGE_PROCESS_ALWAYS;
        dpc->head.version = xcam_version ();
        coefficient = pow (2, 16);
        dpc->gr_threshold = atomisp_params.dp_config->threshold / coefficient;
        dpc->r_threshold = atomisp_params.dp_config->threshold / coefficient;
        dpc->b_threshold = atomisp_params.dp_config->threshold / coefficient;
        dpc->gb_threshold = atomisp_params.dp_config->threshold / coefficient;
        results[result_count++] = (XCam3aResultHead*)dpc;
    }

    /* OCL has defined BNR config, no need to translate ISP BNR config */
#if 0
    /* Translation for bnr config */
    XCAM_ASSERT (result_count < max_count);
    if (atomisp_params.nr_config) {
        XCam3aResultBayerNoiseReduction *bnr = xcam_malloc0_type (XCam3aResultBayerNoiseReduction);
        XCAM_ASSERT (bnr);
        bnr->head.type = XCAM_3A_RESULT_BAYER_NOISE_REDUCTION;
        bnr->head.process_type = XCAM_IMAGE_PROCESS_ALWAYS;
        bnr->head.version = xcam_version ();
        bnr->bnr_gain = (double)atomisp_params.nr_config->bnr_gain / pow(2, 16);
        bnr->direction = (double)atomisp_params.nr_config->direction / pow(2, 16);
        results[result_count++] = (XCam3aResultHead*)bnr;
    }
#endif

    return result_count;
}

uint32_t
translate_3a_results_to_xcam (X3aResultList &list,
                              XCam3aResultHead *results[], uint32_t max_count)
{
    uint32_t result_count = 0;
    for (X3aResultList::iterator iter = list.begin (); iter != list.end (); ++iter) {
        SmartPtr<X3aResult> &isp_result = *iter;

        switch (isp_result->get_type()) {
        case X3aIspConfig::IspExposureParameters: {
            SmartPtr<X3aIspExposureResult> isp_exposure =
                isp_result.dynamic_cast_ptr<X3aIspExposureResult> ();
            XCAM_ASSERT (isp_exposure.ptr ());
            const XCam3aResultExposure &exposure = isp_exposure->get_standard_result ();
            XCam3aResultExposure *new_exposure = xcam_malloc0_type (XCam3aResultExposure);
            XCAM_ASSERT (new_exposure);
            *new_exposure = exposure;
            new_exposure->head.type = XCAM_3A_RESULT_EXPOSURE;
            new_exposure->head.process_type = XCAM_IMAGE_PROCESS_ALWAYS;
            new_exposure->head.version = xcam_version ();
            results[result_count++] = (XCam3aResultHead*)new_exposure;
            break;
        }
        case X3aIspConfig::IspAllParameters: {
            SmartPtr<X3aAtomIspParametersResult> isp_3a_all =
                isp_result.dynamic_cast_ptr<X3aAtomIspParametersResult> ();
            XCAM_ASSERT (isp_3a_all.ptr ());
            const struct atomisp_parameters &atomisp_params = isp_3a_all->get_isp_config ();
            result_count += translate_atomisp_parameters (atomisp_params, &results[result_count], max_count - result_count);
            break;
        }
        case XCAM_3A_RESULT_BRIGHTNESS: {
            SmartPtr<X3aBrightnessResult> xcam_brightness =
                isp_result.dynamic_cast_ptr<X3aBrightnessResult>();
            const XCam3aResultBrightness &brightness = xcam_brightness->get_standard_result();
            XCam3aResultBrightness *new_brightness = xcam_malloc0_type(XCam3aResultBrightness);
            XCAM_ASSERT (new_brightness);
            *new_brightness = brightness;
            results[result_count++] = (XCam3aResultHead*)new_brightness;
            break;
        }
        case XCAM_3A_RESULT_3D_NOISE_REDUCTION:
        case XCAM_3A_RESULT_TEMPORAL_NOISE_REDUCTION_YUV:
        {
            SmartPtr<X3aTemporalNoiseReduction> xcam_tnr =
                isp_result.dynamic_cast_ptr<X3aTemporalNoiseReduction> ();
            const XCam3aResultTemporalNoiseReduction &tnr = xcam_tnr->get_standard_result();
            XCam3aResultTemporalNoiseReduction *new_tnr = xcam_malloc0_type(XCam3aResultTemporalNoiseReduction);
            XCAM_ASSERT (new_tnr);
            *new_tnr = tnr;
            results[result_count++] = (XCam3aResultHead*)new_tnr;
            break;
        }
        case XCAM_3A_RESULT_EDGE_ENHANCEMENT:
        {
            SmartPtr<X3aEdgeEnhancementResult> xcam_ee =
                isp_result.dynamic_cast_ptr<X3aEdgeEnhancementResult> ();
            const XCam3aResultEdgeEnhancement &ee = xcam_ee->get_standard_result();
            XCam3aResultEdgeEnhancement *new_ee = xcam_malloc0_type(XCam3aResultEdgeEnhancement);
            XCAM_ASSERT (new_ee);
            *new_ee = ee;
            results[result_count++] = (XCam3aResultHead*)new_ee;
            break;
        }
        case XCAM_3A_RESULT_BAYER_NOISE_REDUCTION:
        {
            SmartPtr<X3aBayerNoiseReduction> xcam_bnr =
                isp_result.dynamic_cast_ptr<X3aBayerNoiseReduction> ();
            const XCam3aResultBayerNoiseReduction &bnr = xcam_bnr->get_standard_result();
            XCam3aResultBayerNoiseReduction *new_bnr = xcam_malloc0_type(XCam3aResultBayerNoiseReduction);
            XCAM_ASSERT (new_bnr);
            *new_bnr = bnr;
            results[result_count++] = (XCam3aResultHead*)new_bnr;
            break;
        }
        case XCAM_3A_RESULT_WAVELET_NOISE_REDUCTION:
        {
            SmartPtr<X3aWaveletNoiseReduction> xcam_wavelet =
                isp_result.dynamic_cast_ptr<X3aWaveletNoiseReduction> ();
            const XCam3aResultWaveletNoiseReduction &wavelet = xcam_wavelet->get_standard_result();
            XCam3aResultWaveletNoiseReduction *new_wavelet = xcam_malloc0_type(XCam3aResultWaveletNoiseReduction);
            XCAM_ASSERT (new_wavelet);
            *new_wavelet = wavelet;
            results[result_count++] = (XCam3aResultHead*)new_wavelet;
            break;
        }
        default: {
            XCAM_LOG_WARNING ("unknown type(%d) in translation", isp_result->get_type());
            break;
        }
        }
    }
    return result_count;
}

void
free_3a_result (XCam3aResultHead *result)
{
    xcam_free (result);
}

}