/*
 *  This file is part of RawTherapee.
 *
 *  Copyright (c) 2004-2010 Gabor Horvath <hgabor@rawtherapee.com>
 *
 *  RawTherapee is free software: you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation, either version 3 of the License, or
 *  (at your option) any later version.
 *
 *  RawTherapee is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with RawTherapee.  If not, see <http://www.gnu.org/licenses/>.
 */
#include "improccoordinator.h"
#include "curves.h"
#include "mytime.h"
#include "refreshmap.h"
#include "../rtgui/ppversion.h"
#include "colortemp.h"
#include "improcfun.h"
#include <iostream>
#include <fstream>
#include <string>
#include "iccstore.h"
#ifdef _OPENMP
#include <omp.h>
#endif
namespace rtengine
{

extern const Settings* settings;

ImProcCoordinator::ImProcCoordinator ()
    : orig_prev (nullptr), oprevi (nullptr), oprevl (nullptr), nprevl (nullptr), previmg (nullptr), workimg (nullptr),
      ncie (nullptr), imgsrc (nullptr), shmap (nullptr), lastAwbEqual (0.), ipf (&params, true), monitorIntent (RI_RELATIVE),
      softProof (false), gamutCheck (false), scale (10), highDetailPreprocessComputed (false), highDetailRawComputed (false),
      allocated (false), bwAutoR (-9000.f), bwAutoG (-9000.f), bwAutoB (-9000.f), CAMMean (NAN), coordX (0), coordY (0), localX (0), localY (0),
      dataspot (nullptr), retistr (nullptr), retistrsav (nullptr), llstr (nullptr), lhstr (nullptr), ccstr (nullptr),
      ctColorCurve(),
//      localcurve(65536, 0),
      hltonecurve (65536),
      shtonecurve (65536),
      tonecurve (65536, 0), //,1);
      lumacurve (32770, 0), // lumacurve[32768] and lumacurve[32769] will be set to 32768 and 32769 later to allow linear interpolation
      chroma_acurve (65536, 0),
      chroma_bcurve (65536, 0),
      satcurve (65536, 0),
      lhskcurve (65536, 0),
      clcurve (65536, 0),
      wavclCurve (65536, 0),
      clToningcurve (65536, 0),
      lllocalcurve (65536, 0),
      cclocalcurve (65536, 0),

      cl2Toningcurve (65536, 0),
      Noisecurve (65536, 0),
      NoiseCCcurve (65536, 0),
      vhist16 (65536), vhist16bw (65536),
      lhist16CAM (65536),
      lhist16CCAM (65536),
      lhist16RETI(),
      lhist16LClad (65536),
      histRed (256), histRedRaw (256),
      histGreen (256), histGreenRaw (256),
      histBlue (256), histBlueRaw (256),
      histLuma (256),
      histToneCurve (256),
      histToneCurveBW (256),
      histLCurve (256),
      histCCurve (256),
      histLLCurve (256),

      histLCAM (256),
      histCCAM (256),
      histClad (256),
      bcabhist (256),
      histChroma (256),

      histLRETI (256),

      CAMBrightCurveJ(), CAMBrightCurveQ(),
      circrads (500, -10000),
      locx (500, -10000),
      locy (500, -10000),
      centerx (500, -10000),
      centery (500, -10000),
      locxl (500, -10000),
      locyt (500, -10000),
      lights (500, -100000),
      contrs (500, -10000),
      chroms (500, -10000),
      sensis (500, -10000),
      transits (500, -10000),
      inverss (500, -10000),
      curvactivs (500, -10000),
      smeths (500, -10000),
      curens (500, -10000),
      radiuss (500, -10000),
      strengths (500, -10000),
      sensibns (500, -10000),
      inversrads (500, -10000),
      strs (500, 10000),
      chrrts (500, -10000),
      neighs (500, -10000),
      varts (500, -10000),
      sensihs (500, -10000),
      inversrets (500, -10000),
      retinexs (500, -10000),
      sps (500, -10000),
      sharradiuss (500, -10000),
      sharamounts (500, -10000),
      shardampings (500, -10000),
      shariters (500, -10000),
      inversshas (500, -10000),
      sensishas (500, -10000),
      qualitys (500, -10000),
      proxis (500, -10000),
      thress (500, -10000),
      noiselumfs (500, -10000),
      noiselumcs (500, -10000),
      noisechrofs (500, -10000),
      noisechrocs (500, -10000),
      mult0s (500, -10000),
      mult1s (500, -10000),
      mult2s (500, -10000),
      mult3s (500, -10000),
      mult4s (500, -10000),
      thresholds (500, -10000),
      sensicbs (500, -10000),
      activlums (500, -10000),
      versionmip (0),
      strens (500, -10000),
      gammas (500, -10000),
      estops (500, -10000),
      scaltms (500, -10000),
      reweis (500, -10000),
      sensitms (500, -10000),
      reticurvs (25000, -10000), //allow 500 values for each control point * 500
      sizeretics (500, -10000),
      retrabs (500, -10000),
      llcurvs (25000, -10000), //allow 500 values for each control point * 500
      sizellcs (500, -10000),
      lhcurvs (25000, -10000), //allow 500 values for each control point * 500
      sizelhcs (500, -10000),
      cccurvs (25000, -10000), //allow 500 values for each control point * 500
      sizecccs (500, -10000),
      qualitycurves (500, -10000),

      lumarefs (500, -100000.f),
      chromarefs (500, -100000.f),
      huerefs (500, -100000.f),


      rCurve(),
      gCurve(),
      bCurve(),
      rcurvehist (256), rcurvehistCropped (256), rbeforehist (256),
      gcurvehist (256), gcurvehistCropped (256), gbeforehist (256),
      bcurvehist (256), bcurvehistCropped (256), bbeforehist (256),
      fw (0), fh (0), tr (0),
      fullw (1), fullh (1),
      pW (-1), pH (-1),
      plistener (nullptr), imageListener (nullptr), aeListener (nullptr), acListener (nullptr), abwListener (nullptr), aloListener (nullptr), actListener (nullptr), adnListener (nullptr), awavListener (nullptr), dehaListener (nullptr), hListener (nullptr),
      resultValid (false), lastOutputProfile ("BADFOOD"), lastOutputIntent (RI__COUNT), lastOutputBPC (false), thread (nullptr), changeSinceLast (0), updaterRunning (false), destroying (false), utili (false), autili (false), wavcontlutili (false),
      butili (false), ccutili (false), cclutili (false), clcutili (false), opautili (false), conversionBuffer (1, 1), colourToningSatLimit (0.f), colourToningSatLimitOpacity (0.f)


{}

void ImProcCoordinator::assign (ImageSource* imgsrc)
{
    this->imgsrc = imgsrc;
}

ImProcCoordinator::~ImProcCoordinator ()
{

    destroying = true;
    updaterThreadStart.lock ();

    if (updaterRunning && thread) {
        thread->join ();
    }

    mProcessing.lock();
    mProcessing.unlock();
    freeAll ();

    std::vector<Crop*> toDel = crops;

    for (size_t i = 0; i < toDel.size(); i++) {
        delete toDel[i];
    }

    imgsrc->decreaseRef ();
    updaterThreadStart.unlock ();
}

DetailedCrop* ImProcCoordinator::createCrop  (::EditDataProvider *editDataProvider, bool isDetailWindow)
{

    return new Crop (this, editDataProvider, isDetailWindow);
}


// todo: bitmask containing desired actions, taken from changesSinceLast
// cropCall: calling crop, used to prevent self-updates  ...doesn't seem to be used
void ImProcCoordinator::updatePreviewImage (int todo, Crop* cropCall)
{

    MyMutex::MyLock processingLock (mProcessing);
    int numofphases = 14;
    int readyphase = 0;

    bwAutoR = bwAutoG = bwAutoB = -9000.f;

    if (todo == CROP && ipf.needsPCVignetting()) {
        todo |= TRANSFORM;    // Change about Crop does affect TRANSFORM
    }

    bool highDetailNeeded = false;

    if (options.prevdemo == PD_Sidecar) {
        highDetailNeeded = true;    //i#2664
    } else {
        highDetailNeeded = (todo & M_HIGHQUAL);
    }

    // Check if any detail crops need high detail. If not, take a fast path short cut
    if (!highDetailNeeded) {
        for (size_t i = 0; i < crops.size(); i++)
            if (crops[i]->get_skip() == 1 ) {  // skip=1 -> full resolution
                highDetailNeeded = true;
                break;
            }
    }

    RAWParams rp = params.raw;
    ColorManagementParams cmp = params.icm;
    LCurveParams  lcur = params.labCurve;

    if ( !highDetailNeeded ) {
        // if below 100% magnification, take a fast path
        if (rp.bayersensor.method != RAWParams::BayerSensor::methodstring[RAWParams::BayerSensor::none] && rp.bayersensor.method != RAWParams::BayerSensor::methodstring[RAWParams::BayerSensor::mono]) {
            rp.bayersensor.method = RAWParams::BayerSensor::methodstring[RAWParams::BayerSensor::fast];
        }

        //bayerrp.all_enhance = false;

        if (rp.xtranssensor.method != RAWParams::XTransSensor::methodstring[RAWParams::XTransSensor::none] && rp.xtranssensor.method != RAWParams::XTransSensor::methodstring[RAWParams::XTransSensor::mono]) {
            rp.xtranssensor.method = RAWParams::XTransSensor::methodstring[RAWParams::XTransSensor::fast];
        }

        rp.bayersensor.ccSteps = 0;
        rp.xtranssensor.ccSteps = 0;
        //rp.deadPixelFilter = rp.hotPixelFilter = false;
    }

    progress ("Applying white balance, color correction & sRGB conversion...", 100 * readyphase / numofphases);

    // raw auto CA is bypassed if no high detail is needed, so we have to compute it when high detail is needed
    if ( (todo & M_PREPROC) || (!highDetailPreprocessComputed && highDetailNeeded)) {
        imgsrc->preprocess ( rp, params.lensProf, params.coarse );
        imgsrc->getRAWHistogram ( histRedRaw, histGreenRaw, histBlueRaw );

        if (highDetailNeeded) {
            highDetailPreprocessComputed = true;
        } else {
            highDetailPreprocessComputed = false;
        }
    }

    /*
    Demosaic is kicked off only when
    Detail considerations:
        accurate detail is not displayed yet needed based on preview specifics (driven via highDetailNeeded flag)
    OR
    HLR considerations:
        Color HLR alters rgb output of demosaic, so re-demosaic is needed when Color HLR is being turned off;
        if HLR is enabled and changing method *from* Color to any other method
        OR HLR gets disabled when Color method was selected
    */
    // If high detail (=100%) is newly selected, do a demosaic update, since the last was just with FAST

    if (   (todo & M_RAW)
            || (!highDetailRawComputed && highDetailNeeded)
            || ( params.toneCurve.hrenabled && params.toneCurve.method != "Color" && imgsrc->IsrgbSourceModified())
            || (!params.toneCurve.hrenabled && params.toneCurve.method == "Color" && imgsrc->IsrgbSourceModified())) {

        if (settings->verbose) {
            if (imgsrc->getSensorType() == ST_BAYER) {
                printf ("Demosaic Bayer image using method: %s\n", rp.bayersensor.method.c_str());
            } else if (imgsrc->getSensorType() == ST_FUJI_XTRANS) {
                printf ("Demosaic X-Trans image with using method: %s\n", rp.xtranssensor.method.c_str());
            }
        }

        imgsrc->demosaic ( rp); //enabled demosaic
        // if a demosaic happened we should also call getimage later, so we need to set the M_INIT flag
        todo |= M_INIT;

        if (highDetailNeeded) {
            highDetailRawComputed = true;
        } else {
            highDetailRawComputed = false;
        }

        if (params.retinex.enabled) {
            lhist16RETI (32768);
            lhist16RETI.clear();

            imgsrc->retinexPrepareBuffers (params.icm, params.retinex, conversionBuffer, lhist16RETI);
        }
    }

    if ((todo & (M_RETINEX | M_INIT)) && params.retinex.enabled) {
        bool dehacontlutili = false;
        bool mapcontlutili = false;
        bool useHsl = false;
        LUTf cdcurve (65536, 0);
        LUTf mapcurve (65536, 0);

        imgsrc->retinexPrepareCurves (params.retinex, cdcurve, mapcurve, dehatransmissionCurve, dehagaintransmissionCurve, dehacontlutili, mapcontlutili, useHsl, lhist16RETI, histLRETI);
        float minCD, maxCD, mini, maxi, Tmean, Tsigma, Tmin, Tmax;
        imgsrc->retinex ( params.icm, params.retinex,  params.toneCurve, cdcurve, mapcurve, dehatransmissionCurve, dehagaintransmissionCurve, conversionBuffer, dehacontlutili, mapcontlutili, useHsl, minCD, maxCD, mini, maxi, Tmean, Tsigma, Tmin, Tmax, histLRETI); //enabled Retinex

        if (dehaListener) {
            dehaListener->minmaxChanged (maxCD, minCD, mini, maxi, Tmean, Tsigma, Tmin, Tmax);
        }
    }


    // Updating toneCurve.hrenabled if necessary
    // It has to be done there, because the next 'if' statement will use the value computed here
    if (todo & M_AUTOEXP) {
        if (params.toneCurve.autoexp) {// this enabled HLRecovery
            if (ToneCurveParams::HLReconstructionNecessary (histRedRaw, histGreenRaw, histBlueRaw) && !params.toneCurve.hrenabled) {
                // switching params.toneCurve.hrenabled to true -> shouting in listener's ears!
                params.toneCurve.hrenabled = true;

                // forcing INIT to be done, to reconstruct HL again
                todo |= M_INIT;
            }
        }
    }

    if (todo & (M_INIT | M_LINDENOISE)) {
        MyMutex::MyLock initLock (minit); // Also used in crop window

        imgsrc->HLRecovery_Global ( params.toneCurve); // this handles Color HLRecovery


        if (settings->verbose) {
            printf ("Applying white balance, color correction & sRBG conversion...\n");
        }

        currWB = ColorTemp (params.wb.temperature, params.wb.green, params.wb.equal, params.wb.method);

        if (params.wb.method == "Camera") {
            currWB = imgsrc->getWB ();
        } else if (params.wb.method == "Auto") {
            if (lastAwbEqual != params.wb.equal) {
                double rm, gm, bm;
                imgsrc->getAutoWBMultipliers (rm, gm, bm);

                if (rm != -1.) {
                    autoWB.update (rm, gm, bm, params.wb.equal);
                    lastAwbEqual = params.wb.equal;
                } else {
                    lastAwbEqual = -1.;
                    autoWB.useDefaults (params.wb.equal);
                }

                //double rr,gg,bb;
                //autoWB.getMultipliers(rr,gg,bb);
            }

            currWB = autoWB;
        }

        params.wb.temperature = currWB.getTemp ();
        params.wb.green = currWB.getGreen ();

        int tr = getCoarseBitMask (params.coarse);

        imgsrc->getFullSize (fw, fh, tr);

        // Will (re)allocate the preview's buffers
        setScale (scale);
        PreviewProps pp (0, 0, fw, fh, scale);
        // Tells to the ImProcFunctions' tools what is the preview scale, which may lead to some simplifications
        ipf.setScale (scale);

        imgsrc->getImage (currWB, tr, orig_prev, pp, params.toneCurve, params.icm, params.raw);
        denoiseInfoStore.valid = false;
        //ColorTemp::CAT02 (orig_prev, &params) ;
        //   printf("orig_prevW=%d\n  scale=%d",orig_prev->width, scale);
        /* Issue 2785, disabled some 1:1 tools
                if (todo & M_LINDENOISE) {
                    DirPyrDenoiseParams denoiseParams = params.dirpyrDenoise;
                    if (denoiseParams.enabled && (scale==1)) {
                        Imagefloat *calclum = NULL ;

                        denoiseParams.getCurves(noiseLCurve,noiseCCurve);
                        int nbw=6;//nb tile W
                        int nbh=4;//

                        float ch_M[nbw*nbh];
                        float max_r[nbw*nbh];
                        float max_b[nbw*nbh];

                        if(denoiseParams.Lmethod == "CUR") {
                            if(noiseLCurve)
                                denoiseParams.luma = 0.5f;
                            else
                                denoiseParams.luma = 0.0f;
                        } else if(denoiseParams.Lmethod == "SLI")
                            noiseLCurve.Reset();


                        if(noiseLCurve || noiseCCurve){//only allocate memory if enabled and scale=1
                            // we only need image reduced to 1/4 here
                            calclum = new Imagefloat ((pW+1)/2, (pH+1)/2);//for luminance denoise curve
                            for(int ii=0;ii<pH;ii+=2){
                                for(int jj=0;jj<pW;jj+=2){
                                    calclum->r(ii>>1,jj>>1) = orig_prev->r(ii,jj);
                                    calclum->g(ii>>1,jj>>1) = orig_prev->g(ii,jj);
                                    calclum->b(ii>>1,jj>>1) = orig_prev->b(ii,jj);
                                }
                            }
                            imgsrc->convertColorSpace(calclum, params.icm, currWB);//claculate values after colorspace conversion
                        }

                        int kall=1;
                        ipf.RGB_denoise(kall, orig_prev, orig_prev, calclum, ch_M, max_r, max_b, imgsrc->isRAW(), denoiseParams, imgsrc->getDirPyrDenoiseExpComp(), noiseLCurve, noiseCCurve, chaut, redaut, blueaut, maxredaut, maxblueaut, nresi, highresi);
                    }
                }
        */
        imgsrc->convertColorSpace (orig_prev, params.icm, currWB);

        ipf.firstAnalysis (orig_prev, params, vhist16);
    }

    readyphase++;

    progress ("Rotate / Distortion...", 100 * readyphase / numofphases);
    // Remove transformation if unneeded
    bool needstransform = ipf.needsTransform();

    if (!needstransform && ! ((todo & (M_TRANSFORM | M_RGBCURVE))  && params.dirpyrequalizer.cbdlMethod == "bef" && params.dirpyrequalizer.enabled && !params.colorappearance.enabled) && orig_prev != oprevi) {
        delete oprevi;
        oprevi = orig_prev;
    }

    if ((needstransform || ((todo & (M_TRANSFORM | M_RGBCURVE))  && params.dirpyrequalizer.cbdlMethod == "bef" && params.dirpyrequalizer.enabled && !params.colorappearance.enabled)) ) {
        if (!oprevi || oprevi == orig_prev) {
            oprevi = new Imagefloat (pW, pH);
        }

        if (needstransform)
            ipf.transform (orig_prev, oprevi, 0, 0, 0, 0, pW, pH, fw, fh, imgsrc->getMetaData()->getFocalLen(),
                           imgsrc->getMetaData()->getFocalLen35mm(), imgsrc->getMetaData()->getFocusDist(), imgsrc->getRotateDegree(), false);
        else {
            orig_prev->copyData (oprevi);
        }
    }

    if ((todo & (M_TRANSFORM | M_RGBCURVE))  && params.dirpyrequalizer.cbdlMethod == "bef" && params.dirpyrequalizer.enabled && !params.colorappearance.enabled) {
        const int W = oprevi->getWidth();
        const int H = oprevi->getHeight();
        LabImage labcbdl (W, H);
        ipf.rgb2lab (*oprevi, labcbdl, params.icm.working);
        ipf.dirpyrequalizer (&labcbdl, scale);
        ipf.lab2rgb (labcbdl, *oprevi, params.icm.working);
    }

    readyphase++;
    progress ("Preparing shadow/highlight map...", 100 * readyphase / numofphases);

    if ((todo & M_BLURMAP) && params.sh.enabled) {
        double radius = sqrt (double (pW * pW + pH * pH)) / 2.0;
        double shradius = params.sh.radius;

        if (!params.sh.hq) {
            shradius *= radius / 1800.0;
        }

        if (!shmap) {
            shmap = new SHMap (pW, pH, true);
        }

        shmap->update (oprevi, shradius, ipf.lumimul, params.sh.hq, scale);
    }



    readyphase++;

    if (todo & M_AUTOEXP) {
        if (params.toneCurve.autoexp) {
            LUTu aehist;
            int aehistcompr;
            imgsrc->getAutoExpHistogram (aehist, aehistcompr);
            ipf.getAutoExp (aehist, aehistcompr, imgsrc->getDefGain(), params.toneCurve.clip, params.toneCurve.expcomp,
                            params.toneCurve.brightness, params.toneCurve.contrast, params.toneCurve.black, params.toneCurve.hlcompr, params.toneCurve.hlcomprthresh);

            if (aeListener)
                aeListener->autoExpChanged (params.toneCurve.expcomp, params.toneCurve.brightness, params.toneCurve.contrast,
                                            params.toneCurve.black, params.toneCurve.hlcompr, params.toneCurve.hlcomprthresh, params.toneCurve.hrenabled);
        }
    }

    progress ("Exposure curve & CIELAB conversion...", 100 * readyphase / numofphases);

    if ((todo & M_RGBCURVE) || (todo & M_CROP)) {
//        if (hListener) oprevi->calcCroppedHistogram(params, scale, histCropped);

        //complexCurve also calculated pre-curves histogram depending on crop
        CurveFactory::complexCurve (params.toneCurve.expcomp, params.toneCurve.black / 65535.0,
                                    params.toneCurve.hlcompr, params.toneCurve.hlcomprthresh,
                                    params.toneCurve.shcompr, params.toneCurve.brightness, params.toneCurve.contrast,
                                    params.toneCurve.curveMode, params.toneCurve.curve, params.toneCurve.curveMode2, params.toneCurve.curve2,
                                    vhist16, hltonecurve, shtonecurve, tonecurve, histToneCurve, customToneCurve1, customToneCurve2, 1);

        CurveFactory::RGBCurve (params.rgbCurves.rcurve, rCurve, 1);
        CurveFactory::RGBCurve (params.rgbCurves.gcurve, gCurve, 1);
        CurveFactory::RGBCurve (params.rgbCurves.bcurve, bCurve, 1);


        opautili = false;

        if (params.colorToning.enabled) {
            TMatrix wprof = iccStore->workingSpaceMatrix (params.icm.working);
            double wp[3][3] = {
                {wprof[0][0], wprof[0][1], wprof[0][2]},
                {wprof[1][0], wprof[1][1], wprof[1][2]},
                {wprof[2][0], wprof[2][1], wprof[2][2]}
            };
            TMatrix wiprof = iccStore->workingSpaceInverseMatrix (params.icm.working);
            double wip[3][3] = {
                {wiprof[0][0], wiprof[0][1], wiprof[0][2]},
                {wiprof[1][0], wiprof[1][1], wiprof[1][2]},
                {wiprof[2][0], wiprof[2][1], wiprof[2][2]}
            };
            params.colorToning.getCurves (ctColorCurve, ctOpacityCurve, wp, wip, opautili);
            CurveFactory::curveToning (params.colorToning.clcurve, clToningcurve, scale == 1 ? 1 : 16);
            CurveFactory::curveToning (params.colorToning.cl2curve, cl2Toningcurve, scale == 1 ? 1 : 16);
        }

        if (params.blackwhite.enabled) {
            CurveFactory::curveBW (params.blackwhite.beforeCurve, params.blackwhite.afterCurve, vhist16bw, histToneCurveBW, beforeToneCurveBW, afterToneCurveBW, 1);
        }

        colourToningSatLimit = float (params.colorToning.satProtectionThreshold) / 100.f * 0.7f + 0.3f;
        colourToningSatLimitOpacity = 1.f - (float (params.colorToning.saturatedOpacity) / 100.f);

        int satTH = 80;
        int satPR = 30;
        int indi = 0;

        if (params.colorToning.enabled  && params.colorToning.autosat) { //for colortoning evaluation of saturation settings
            float moyS = 0.f;
            float eqty = 0.f;
            ipf.moyeqt (oprevi, moyS, eqty);//return image : mean saturation and standard dev of saturation
            //printf("moy=%f ET=%f\n", moyS,eqty);
            float satp = ((moyS + 1.5f * eqty) - 0.3f) / 0.7f; //1.5 sigma ==> 93% pixels with high saturation -0.3 / 0.7 convert to Hombre scale

            if (satp >= 0.92f) {
                satp = 0.92f;    //avoid values too high (out of gamut)
            }

            if (satp <= 0.15f) {
                satp = 0.15f;    //avoid too low values
            }

            //satTH=(int) 100.f*satp;
            //satPR=(int) 100.f*(moyS-0.85f*eqty);//-0.85 sigma==>20% pixels with low saturation
            colourToningSatLimit = 100.f * satp;
            satTH = (int) 100.f * satp;

            colourToningSatLimitOpacity = 100.f * (moyS - 0.85f * eqty); //-0.85 sigma==>20% pixels with low saturation
            satPR = (int) 100.f * (moyS - 0.85f * eqty);
        }

        if (actListener) {
            //if(params.blackwhite.enabled) {actListener->autoColorTonChanged(0, satTH, satPR);}
            if (params.blackwhite.enabled && params.colorToning.autosat) {
                actListener->autoColorTonChanged (0, satTH, satPR);   //hide sliders only if autosat
                indi = 0;
            } else {
                if (params.colorToning.autosat) {
                    if     (params.colorToning.method == "Lab") {
                        indi = 1;
                    } else if (params.colorToning.method == "RGBCurves") {
                        indi = 1;
                    } else if (params.colorToning.method == "RGBSliders") {
                        indi = 1;
                    } else if (params.colorToning.method == "Splico") {
                        indi = 2;
                    } else if (params.colorToning.method == "Splitlr") {
                        indi = 2;
                    }

                    //actListener->autoColorTonChanged(indi, satTH, satPR);
                }
            }
        }

        // if it's just crop we just need the histogram, no image updates
        if ( todo & M_RGBCURVE ) {
            //initialize rrm bbm ggm different from zero to avoid black screen in some cases
            double rrm = 33.;
            double ggm = 33.;
            double bbm = 33.;

            DCPProfile::ApplyState as;
            DCPProfile *dcpProf = imgsrc->getDCP (params.icm, currWB, as);

            ipf.rgbProc (oprevi, oprevl, nullptr, hltonecurve, shtonecurve, tonecurve, shmap, params.toneCurve.saturation,
                         rCurve, gCurve, bCurve, colourToningSatLimit , colourToningSatLimitOpacity, ctColorCurve, ctOpacityCurve, opautili, clToningcurve, cl2Toningcurve, customToneCurve1, customToneCurve2, beforeToneCurveBW, afterToneCurveBW, rrm, ggm, bbm, bwAutoR, bwAutoG, bwAutoB, params.toneCurve.expcomp, params.toneCurve.hlcompr, params.toneCurve.hlcomprthresh, dcpProf, as, histToneCurve);

            if (params.blackwhite.enabled && params.blackwhite.autoc && abwListener) {
                if (settings->verbose) {
                    printf ("ImProcCoordinator / Auto B&W coefs:   R=%.2f   G=%.2f   B=%.2f\n", bwAutoR, bwAutoG, bwAutoB);
                }

                abwListener->BWChanged ((float) rrm, (float) ggm, (float) bbm);
            }

            if (params.colorToning.autosat && actListener) {
                if (settings->verbose) {
                    printf ("ImProcCoordinator / Auto CT:  indi=%d   satH=%d  satPR=%d\n", indi, (int)colourToningSatLimit , (int) colourToningSatLimitOpacity);
                }

                actListener->autoColorTonChanged (indi, (int) colourToningSatLimit, (int)colourToningSatLimitOpacity); //change sliders autosat
            }

            // correct GUI black and white with value
        }

        //  ipf.Lab_Tile(oprevl, oprevl, scale);

        // compute L channel histogram
        int x1, y1, x2, y2;
        params.crop.mapToResized (pW, pH, scale, x1, x2,  y1, y2);
    }

    readyphase++;
    LUTu lhist16 (32768);

    if (todo & (M_LUMACURVE | M_CROP)) {
        lhist16.clear();
#ifdef _OPENMP
        const int numThreads = min (max (pW * pH / (int)lhist16.getSize(), 1), omp_get_max_threads());
        #pragma omp parallel num_threads(numThreads) if(numThreads>1)
#endif
        {
            LUTu lhist16thr (lhist16.getSize());
            lhist16thr.clear();
#ifdef _OPENMP
            #pragma omp for nowait
#endif

            for (int x = 0; x < pH; x++)
                for (int y = 0; y < pW; y++) {
                    int pos = (int) (oprevl->L[x][y]);
                    lhist16thr[pos]++;
                }

#ifdef _OPENMP
            #pragma omp critical
#endif
            lhist16 += lhist16thr;
        }
        CurveFactory::complexLCurve (params.labCurve.brightness, params.labCurve.contrast, params.labCurve.lcurve, lhist16, lumacurve, histLCurve, scale == 1 ? 1 : 16, utili);
    }

    if (todo & M_LUMACURVE) {

        CurveFactory::curveCL (clcutili, params.labCurve.clcurve, clcurve, scale == 1 ? 1 : 16);

        CurveFactory::complexsgnCurve (autili, butili, ccutili, cclutili, params.labCurve.acurve, params.labCurve.bcurve, params.labCurve.cccurve,
                                       params.labCurve.lccurve, chroma_acurve, chroma_bcurve, satcurve, lhskcurve, scale == 1 ? 1 : 16);
    }

    //scale = 1;
    if (todo & (M_LUMINANCE + M_COLOR) ) {
        nprevl->CopyFrom (oprevl);
        int maxspot = settings->nspot + 1;
        progress ("Applying Color Boost...", 100 * readyphase / numofphases);


        if (params.locallab.enabled) {
            /*
             *  This file is part of RawTherapee.
             *
             *  Copyright (c) 2004-2010 Gabor Horvath <hgabor@rawtherapee.com>
             *
             *  RawTherapee is free software: you can redistribute it and/or modify
             *  it under the terms of the GNU General Public License as published by
             *  the Free Software Foundation, either version 3 of the License, or
             *  (at your option) any later version.
             *
             *  RawTherapee is distributed in the hope that it will be useful,
             *  but WITHOUT ANY WARRANTY; without even the implied warranty of
             *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
             *  GNU General Public License for more details.
             *
             *  You should have received a copy of the GNU General Public License
             *  along with RawTherapee.  If not, see <http://www.gnu.org/licenses/>.
             *  2017 Jacques Desmis <jdesmis@gmail.com>
             */

            bool isascii = true;
            Glib::ustring datainterm = imgsrc->getFileName() + ".ii";//extansion ii arbitrary to test if mip file is possible

            ofstream finterm (datainterm, ios::out);

            if (finterm.fail()) {
                printf ("Non ascii Mip file possible..switch to Profiles\n");
                isascii = false;
            } else {
                printf ("ascii Mip file possible!\n");
            }

            finterm.close();

            if (isascii == true) {
                if ( std::remove (datainterm.c_str()) != 0 ) {
                    perror ( "Error deleting test ii file" );
                } else {
                    puts ( "Test ii file successfully deleted" );
                }
            }

            //  printf("mip file=%s \n", datalab.c_str());
            //   Glib::ustring pop = options.getUserProfilePath() + "/";
            Glib::ustring pop = options.cacheBaseDir + "/mip/";

            Glib::ustring datal;


            if (options.mip == MI_opt || !isascii) {
                datal = pop + Glib::path_get_basename (imgsrc->getFileName () + ".mip");
            }

            if (options.mip == MI_prev && isascii) {//&& isascii
                datal = imgsrc->getFileName() + ".mip";
            }

            /*
            //test to see if wofstream and wifstream works with NON ASCII, but it's bad
                        wofstream test(datal, ios::out);
                        if(test.fail()) printf("ca va pas\n");
                        else ("ca va bien\n");
                        test.close();
            */
            ifstream fic0 (datal, ios::in);

            printf ("mip files in=%s\n", datal.c_str());
            //    if(! fic0.fail())    {
            float **shbuffer;
            versionmip = 0;
            int maxdat;
            int sca = 1;
            //string delim ==> delimiter to separate integer in a string, 70 is lagely enough for curves : noramlly 3 to 21 must be suffisant
            std::string delim[69] = {"A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z",
                                     "a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z",
                                     "&", "#", "{", "[", "]", "}", "$", "*", "?", ">", "!", ";", "<", "(", ")", "+", "-"
                                    };



            if (fic0) {
                //find current version mip
                std::string line;
                std::string spotline;
                int cont = 0;

                while (getline (fic0, line)) {
                    spotline = line;
                    std::size_t pos = spotline.find ("=");
                    std::size_t posend = spotline.find ("@"); //in case of for futur use

                    if (spotline.substr (0, pos) == "Mipversion") {
                        std::string strversion = spotline.substr (pos + 1, (posend - pos));
                        versionmip = std::stoi (strversion.c_str());
                    }

                    if (spotline.substr (0, pos) == "Spot") {
                        // string str2 = spotline.substr (pos + 1, (posend - pos));
                        cont = 0;
                    }


                }

                fic0.close();
            }

            printf ("mipvers=%i\n", versionmip);
            ifstream fic (datal, ios::in);
            bool reinit = false;

            //printf("versionmip=%i  nbspot=%i\n", versionmip, params.locallab.nbspot) ;


            if (fic.fail() || versionmip == 0  || params.locallab.nbspot == 0) { //initialize mip with default values if no file or old file to prevent crash

                ofstream fic (datal, ios::out | ios::trunc); // ouverture en écriture avec effacement du fichier ouvert

                if (params.locallab.nbspot == 0) {
                    params.locallab.nbspot = 1;
                }


                if (fic)

                {
                    for (int sp = 1; sp < maxspot; sp++) { // spots default
                        int t_sp = sp;
                        int t_mipversion = 10007;//new value for tone mapping
                        int t_circrad = 18;
                        int t_locX = 250;
                        int t_locY = 250;
                        int t_locYT = 250;
                        int t_locXL = 250;
                        int t_centerX = 0;
                        int t_centerY = 0;
                        int t_lightness = 0;
                        int t_contrast = 0;
                        int t_chroma = 0;
                        int t_sensi = 19;
                        int t_transit = 60;
                        int t_invers = 0;
                        int t_Smeth = 0;
                        int t_currentspot = 1;
                        int t_radius = 1;
                        int t_strength = 0;
                        int t_sensibn = 60;
                        int t_inversrad = 0;
                        int t_str = 0;
                        int t_chrrt = 0;
                        int t_neigh = 50;
                        int t_vart = 200;
                        int t_sensih = 19;
                        int t_inversret = 0;
                        int t_retinexMethod = 2;
                        int t_sharradius = 40;
                        int t_sharamount = 75;
                        int t_shardamping = 75;
                        int t_shariter = 30;
                        int t_sensisha = 19;
                        int t_inverssha = 0;
                        int t_qualityMethod = 2;
                        int t_thres = 18;
                        int t_proxi = 20;
                        int t_noiselumf = 0;
                        int t_noiselumc = 0;
                        int t_noisechrof = 0;
                        int t_noisechroc = 0;
                        int t_mult0 = 100;
                        int t_mult1 = 100;
                        int t_mult2 = 100;
                        int t_mult3 = 100;
                        int t_mult4 = 100;
                        int t_threshold = 20;
                        int t_sensicb = 19;
                        int t_activlum = 0;

                        // end versionmip = 10000

                        //begin versionmip = 10001 Tone mapping
                        int t_stren = 0;
                        int t_gamma = 100;
                        int t_estop = 140;
                        int t_scaltm = 3;
                        int t_rewei = 0;
                        int t_sensitm = 19;

                        //versionmip = 10002 Reticurv
                        int t_retrab = 500;

                        std::string t_curvret = "1000A0B120C350D350E700F500G350H350I1000J120K350L350M";//12 points
                        //10003
                        //std::string t_curvll = "0A";
                        std::string t_curvll = "3000A0B0C1000D1000E"; //"3000A0B0C499D501E1000F1000G";// "3000A0B0C1000D1000E";//with that it works !

                        //versionmip = 10004 LHcurv
                        std::string t_curvlh = "1000A0B500C350D350E166F500G350H350I333J500K350L350M500N500O350P350Q666R500S350T350U833V500W350X350Y";
                        //10005
                        int t_curvactiv = 0;
                        //10006
                        std::string t_curvcc = "3000A0B0C1000D1000E"; //"3000A0B0C499D501E1000F1000G";// "3000A0B0C1000D1000E";//with that it works !

                        //10007
                        int t_qualitycurveMethod = 0;

                        //all variables except locRETgainCurve 'coomon for all)
                        fic << "Mipversion=" << t_mipversion << '@' << endl;
                        fic << "Spot=" << t_sp << '@' << endl;
                        fic << "Circrad=" << t_circrad << '@' << endl;
                        fic << "LocX=" << t_locX << '@' << endl;
                        fic << "LocY=" << t_locY << '@' << endl;
                        fic << "LocYT=" << t_locYT << '@' << endl;
                        fic << "LocXL=" << t_locXL << '@' << endl ;
                        fic << "CenterX=" << t_centerX << '@' << endl;
                        fic << "CenterY=" << t_centerY << '@' << endl;
                        fic << "Lightness=" << t_lightness << '@' << endl;
                        fic << "Contrast=" << t_contrast << '@' <<  endl;
                        fic << "Chroma=" << t_chroma << '@' << endl;
                        fic << "Sensi=" << t_sensi << '@' << endl;
                        fic << "Transit=" << t_transit << '@' << endl;
                        fic << "Invers=" << t_invers << '@' << endl;
                        fic << "Smethod=" << t_Smeth << '@' << endl;
                        fic << "Currentspot=" << t_currentspot << '@' << endl;
                        fic << "Radius=" << t_radius << '@' << endl;
                        fic << "Strength=" << t_strength << '@' << endl;
                        fic << "Sensibn=" << t_sensibn << '@' << endl;
                        fic << "Inversrad=" << t_inversrad << '@' << endl;
                        fic << "Str=" << t_str << '@' << endl;
                        fic << "Chroma=" << t_chrrt << '@' << endl;
                        fic << "Neigh=" << t_neigh << '@' << endl;
                        fic << "Vart=" << t_vart << '@' << endl;
                        fic << "Sensih=" << t_sensih << '@' << endl;
                        fic << "Inversret=" << t_inversret << '@' << endl;
                        fic << "retinexMethod=" << t_retinexMethod << '@' << endl;
                        fic << "Sharradius=" << t_sharradius << '@' << endl;
                        fic << "Sharamount=" << t_sharamount << '@' << endl;
                        fic << "Shardamping=" << t_shardamping << '@' << endl;
                        fic << "Shariter=" << t_shariter << '@' << endl;
                        fic << "Sensisha=" << t_sensisha << '@' << endl;
                        fic << "Inverssha=" << t_inverssha << '@' << endl;
                        fic << "qualityMethod=" << t_qualityMethod << '@' << endl;
                        fic << "Thres=" << t_thres << '@' << endl;
                        fic << "Proxi=" << t_proxi << '@' << endl;
                        fic << "Noiselumf=" << t_noiselumf << '@' << endl;
                        fic << "Noiselumc=" << t_noiselumc << '@' << endl;
                        fic << "Noisechrof=" << t_noisechrof << '@' << endl;
                        fic << "Noisechroc=" << t_noisechroc << '@' << endl;
                        fic << "Mult0=" << t_mult0 << '@' << endl;
                        fic << "Mult1=" << t_mult1 << '@' << endl;
                        fic << "Mult2=" << t_mult2 << '@' << endl;
                        fic << "Mult3=" << t_mult3 << '@' << endl;
                        fic << "Mult4=" << t_mult4 << '@' << endl;
                        fic << "Threshold=" << t_threshold << '@' << endl;
                        fic << "Sensicb=" << t_sensicb << '@' << endl;
                        fic << "Activblurlum=" << t_activlum << '@' << endl;

                        fic << "Stren=" << t_stren << '@' << endl;
                        fic << "Gamma=" << t_gamma << '@' << endl;
                        fic << "Estop=" << t_estop << '@' << endl;
                        fic << "Scaltm=" << t_scaltm << '@' << endl;
                        fic << "Rewei=" << t_rewei << '@' << endl;
                        fic << "Sensitm=" << t_sensitm << '@' << endl;

                        fic << "Retrab=" << t_retrab << '@' << endl;
                        fic << "Curvactiv=" << t_curvactiv << '@' << endl;
                        fic << "qualitycurveMethod=" << t_qualitycurveMethod << '@' << endl;

                        fic << "curveReti=" << t_curvret << '@' << endl;
                        fic << "curveLL=" << t_curvll << '@' << endl;
                        fic << "curveLH=" << t_curvlh << '@' << endl;
                        fic << "curveCC=" << t_curvcc << '@' << endl;

                        fic << endl;
                    }

                    fic.close();

                } else

                {
                    cerr << "can't open file !" << endl;
                }

            }



            int realspot = params.locallab.nbspot;
            std::string inser;
            dataspot = new int*[61];

            for (int i = 0; i < 61; i++) {
                dataspot[i] = new int[maxspot];
            }

            retistr = new std::string[maxspot];
            llstr = new std::string[maxspot];
            lhstr = new std::string[maxspot];
            ccstr = new std::string[maxspot];


            {
                sps[0] = 0;
                dataspot[2][0] =  circrads[0] = params.locallab.circrad;
                dataspot[3][0] =  locx[0] = params.locallab.locX;
                dataspot[4][0] =  locy[0] = params.locallab.locY;
                dataspot[5][0] =  locyt[0] = params.locallab.locYT;
                dataspot[6][0] =  locxl[0] = params.locallab.locXL;
                dataspot[7][0] =  centerx[0] = params.locallab.centerX;
                dataspot[8][0] =  centery[0] = params.locallab.centerY;
                dataspot[9][0] =  lights[0] = params.locallab.lightness;
                dataspot[10][0] =  contrs[0] = params.locallab.contrast;
                dataspot[11][0] =  chroms[0] = params.locallab.chroma;
                dataspot[12][0] =  sensis[0] = params.locallab.sensi;
                dataspot[13][0] =  transits[0] = params. locallab.transit;

                if (!params.locallab.invers) {
                    dataspot[14][0] = inverss[0] = 0;
                } else {
                    dataspot[14][0] = inverss[0] = 1;
                }

                if (params.locallab.Smethod == "IND") {
                    dataspot[15][0] = smeths[0] =  0;
                } else if (params.locallab.Smethod == "SYM") {
                    dataspot[15][0] = smeths[0] =  1;
                } else if (params.locallab.Smethod == "INDSL") {
                    dataspot[15][0] = smeths[0] =  2;
                } else if (params.locallab.Smethod == "SYMSL") {
                    dataspot[15][0] =  smeths[0] = 3;
                }

                dataspot[16][0] = curens[0] = params.locallab.nbspot;
                dataspot[17][0] =  radiuss[0] = params.locallab.radius;
                dataspot[18][0] =  strengths[0] = params.locallab.strength;
                dataspot[19][0] =  sensibns[0] = params.locallab.sensibn;


                if (!params.locallab.inversrad) {
                    dataspot[20][0] =  inversrads[0] = 0;
                } else {
                    dataspot[20][0] =  inversrads[0] = 1;
                }

                dataspot[21][0] = strs[0] = params.locallab.str;
                dataspot[22][0] = chrrts[0] = params.locallab.chrrt;
                dataspot[23][0] = neighs[0] = params.locallab.neigh;
                dataspot[24][0] = varts[0] = params.locallab.vart;
                dataspot[25][0] = sensihs[0] = params.locallab.sensih;

                if (!params.locallab.inversret) {
                    dataspot[26][0] =  inversrets[0] = 0;
                } else {
                    dataspot[26][0] =  inversrets[0] = 1;
                }

                if (params.locallab.retinexMethod == "low") {
                    dataspot[27][0] =  retinexs[0] = 0;
                } else if (params.locallab.retinexMethod == "uni") {
                    dataspot[27][0] =  retinexs[0] = 1;
                } else if (params.locallab.retinexMethod == "high") {
                    dataspot[27][0] =  retinexs[0] = 2;
                }

                dataspot[28][0] = sharradiuss[0] = params.locallab.sharradius;
                dataspot[29][0] = sharamounts[0] = params.locallab.sharamount;
                dataspot[30][0] = shardampings[0] = params.locallab.shardamping;
                dataspot[31][0] = shariters[0] = params.locallab.shariter;
                dataspot[32][0] = sensishas[0] = params.locallab.sensisha;

                if (!params.locallab.inverssha) {
                    dataspot[33][0] =  inversshas[0] = 0;
                } else {
                    dataspot[33][0] =  inversshas[0] = 1;
                }

                if (params.locallab.qualityMethod == "std") {
                    dataspot[34][0] =  qualitys[0] = 0;
                } else if (params.locallab.qualityMethod == "enh") {
                    dataspot[34][0] =  qualitys[0] = 1;
                } else if (params.locallab.qualityMethod == "enhden") {
                    dataspot[34][0] =  qualitys[0] = 2;
                }

                dataspot[35][0] = thress[0] = params.locallab.thres;
                dataspot[36][0] = proxis[0] = params.locallab.proxi;
                dataspot[37][0] = noiselumfs[0] = params.locallab.noiselumf;
                dataspot[38][0] = noiselumcs[0] = params.locallab.noiselumc;
                dataspot[39][0] = noisechrofs[0] = params.locallab.noisechrof;
                dataspot[40][0] = noisechrocs[0] = params.locallab.noisechroc;

                dataspot[41][0] = mult0s[0] = params.locallab.mult[0];
                dataspot[42][0] = mult1s[0] = params.locallab.mult[1];
                dataspot[43][0] = mult2s[0] = params.locallab.mult[2];
                dataspot[44][0] = mult3s[0] = params.locallab.mult[3];
                dataspot[45][0] = mult4s[0] = params.locallab.mult[4];
                dataspot[46][0] = thresholds[0] = params.locallab.threshold;
                dataspot[47][0] = sensicbs[0] = params.locallab.sensicb;

                if (!params.locallab.activlum) {
                    dataspot[48][0] =  activlums[0] = 0;
                } else {
                    dataspot[48][0] =  activlums[0] = 1;
                }

                dataspot[49][0] = strens[0] = params.locallab.stren;
                dataspot[50][0] = gammas[0] = params.locallab.gamma;
                dataspot[51][0] = estops[0] = params.locallab.estop;
                dataspot[52][0] = scaltms[0] = params.locallab.scaltm;
                dataspot[53][0] = reweis[0] = params.locallab.rewei;
                dataspot[54][0] = sensitms[0] = params.locallab.sensitm;
                dataspot[55][0] = retrabs[0] = params.locallab.retrab;

                if (!params.locallab.curvactiv) {
                    dataspot[56][0] = curvactivs[0] = 0;
                } else {
                    dataspot[56][0] = curvactivs[0] = 1;
                }

                if (params.locallab.qualitycurveMethod == "none") {
                    dataspot[57][0] =  qualitycurves[0] = 0;
                } else if (params.locallab.qualitycurveMethod == "std") {
                    dataspot[57][0] =  qualitycurves[0] = 1;
                } else if (params.locallab.qualitycurveMethod == "enh") {
                    dataspot[57][0] =  qualitycurves[0] = 2;
                }

                //curve Reti local
                int siz = params.locallab.localTgaincurve.size();

                if (siz > 69) {
                    siz = 69;    //to avoid crash
                }

                int s_cur[siz + 1];
                int s_datcur[siz + 1];

                for (int j = 0; j < siz; j++) {
                    s_datcur[j] = reticurvs[0 + j] = (int)  (1000. * params.locallab.localTgaincurve[j]);
                }

                std::string cur_str = "";

                for (int j = 0; j < siz; j++) {
                    cur_str = cur_str + std::to_string (s_datcur[j]) + delim[j];
                }

                inser = retistr[0] = cur_str + "@";
                //end retistr

                //curve local L Lum
                int sizl = params.locallab.llcurve.size();

                if (sizl > 69) {
                    sizl = 69;//to avoid crash
                }

                int s_curl[sizl + 1];
                int s_datcurl[sizl + 1];

                for (int j = 0; j < sizl; j++) {
                    s_datcurl[j] = llcurvs[0 + j] = (int)  (1000. * params.locallab.llcurve[j]);
                }

                std::string ll_str = "";

                for (int j = 0; j < sizl; j++) {
                    ll_str = ll_str + std::to_string (s_datcurl[j]) + delim[j];
                }

                llstr[0] = ll_str + "@";
                //end local L f(L)

                //curve local C chrom
                int sizc = params.locallab.cccurve.size();

                if (sizc > 69) {
                    sizc = 69;//to avoid crash
                }

                int s_curc[sizc + 1];
                int s_datcurc[sizc + 1];

                for (int j = 0; j < sizc; j++) {
                    s_datcurc[j] = cccurvs[0 + j] = (int)  (1000. * params.locallab.cccurve[j]);
                }

                std::string cc_str = "";

                for (int j = 0; j < sizc; j++) {
                    cc_str = cc_str + std::to_string (s_datcurc[j]) + delim[j];
                }

                ccstr[0] = cc_str + "@";
                //end local C f(C)


                //curve local L f(H)
                int sizh = params.locallab.LHcurve.size();

                if (sizh > 69) {
                    sizh = 69;//to avoid crash
                }

                int s_curh[sizh + 1];
                int s_datcurh[sizh + 1];

                for (int j = 0; j < sizh; j++) {
                    s_datcurh[j] = lhcurvs[0 + j] = (int)  (1000. * params.locallab.LHcurve[j]);
                }

                std::string lh_str = "";

                for (int j = 0; j < sizh; j++) {
                    lh_str = lh_str + std::to_string (s_datcurh[j]) + delim[j];
                }

                lhstr[0] = lh_str + "@";
                //end local L = f(H)




                if (params.locallab.anbspot == 0) {
                    //update GUI and MIP after current spot ==> params, shift with the other alolistener
                    if (aloListener  && params.locallab.anbspot == 0) {
                        aloListener->localretChanged (dataspot, retistr[0], llstr[0], lhstr[0], ccstr[0], 0, 1);
                    }
                }

                locallutili = false;

            }



            //end save


            int ns;
            int realsp = params.locallab.nbspot;
            bool excurvret = true;
            bool excurvll = true;
            bool excurvlh = true;
            bool excurvcc = true;

            ifstream fich (datal, ios::in);

            if (fich) {//may be a file with versionmip = 10000
                //    if(versionmip == 10000) add new blank fields for tone-mapping because TM is 10001
                //we must add new fields at the good place
                std::string line;
                std::string spotline;
                int cont = 0;
                int maxind = 58;

                if (versionmip == 10000) {
                    maxind = 49;
                    excurvret = false;
                    excurvll = false;
                    excurvlh = false;
                }

                if (versionmip == 10001) {
                    maxind = 55;
                    excurvret = false;
                    excurvll = false;
                    excurvlh = false;

                }

                if (versionmip == 10004) {
                    maxind = 56;
                }

                if (versionmip == 10005) {
                    excurvcc = false;
                }

                if (versionmip == 10006) {
                    maxind = 57;
                }

                int sizecu;
                int sizell;
                int sizelh;
                int sizecc;

                while (getline (fich, line)) {
                    spotline = line;
                    std::size_t pos = spotline.find ("=");
                    std::size_t posend = spotline.find ("@"); //in case of for futur use

                    if (spotline.substr (0, pos) == "Mipversion") {
                        std::string strversion = spotline.substr (pos + 1, (posend - pos));
                        versionmip = std::stoi (strversion.c_str());
                    }

                    if (spotline.substr (0, pos) == "Spot") {
                        cont = 0;
                    }

                    cont++;
                    std::string str3 = spotline.substr (pos + 1, (posend - pos));

                    if (cont == 1) {
                        ns =  std::stoi (str3.c_str());
                    }

                    if (cont >= 2  && cont < 16) {
                        dataspot[cont][ns] = std::stoi (str3.c_str());

                    }

                    if (spotline.substr (0, pos) == "Currentspot") {
                        dataspot[16][0] = std::stoi (str3.c_str());
                    }

                    if (cont > 16  && cont < maxind) {
                        dataspot[cont][ns] = std::stoi (str3.c_str());

                    }


                    if (excurvret && spotline.substr (0, pos) == "curveReti") {
                        std::string curstr;
                        int longecur;
                        std::string strend = spotline.substr (posend - 1, 1);
                        std::size_t posz = spotline.find (strend);
                        int longe;

                        for (int sl = 0; sl < 69; sl++) {
                            if (delim[sl] == strend) {
                                longe = sl + 1;
                            }
                        }

                        retistr[ns] = str3;
                        sizecu = longe;

                        //   printf("lecture str=%s ns=%i  si=%i\n",  retistr[ns].c_str(), ns, sizecu);
                    }

                    if (excurvll && spotline.substr (0, pos) == "curveLL") {
                        std::string curstrl;
                        int longecurl;
                        std::string strendl = spotline.substr (posend - 1, 1);
                        std::size_t poszl = spotline.find (strendl);
                        int longel;

                        for (int sl = 0; sl < 69; sl++) {
                            if (delim[sl] == strendl) {
                                longel = sl + 1;
                            }
                        }

                        llstr[ns] = str3;
                        sizell = longel;
                        //    printf("lecture strLL=%s ns=%i  si=%i\n",  llstr[ns].c_str(), ns, sizell);
                    }


                    if (excurvlh && spotline.substr (0, pos) == "curveLH") {
                        std::string curstrh;
                        int longecurh;
                        std::string strendh = spotline.substr (posend - 1, 1);
                        std::size_t poszh = spotline.find (strendh);
                        int longeh;

                        for (int sh = 0; sh < 69; sh++) {
                            if (delim[sh] == strendh) {
                                longeh = sh + 1;
                            }
                        }

                        lhstr[ns] = str3;
                        sizelh = longeh;
                        //printf("lecture strLH=%s ns=%i  si=%i\n",  lhstr[ns].c_str(), ns, sizelh);
                    }

                    if (excurvcc && spotline.substr (0, pos) == "curveCC") {
                        std::string curstrc;
                        int longecurc;
                        std::string strendc = spotline.substr (posend - 1, 1);
                        std::size_t poszc = spotline.find (strendc);
                        int longec;

                        for (int sl = 0; sl < 69; sl++) {
                            if (delim[sl] == strendc) {
                                longec = sl + 1;
                            }
                        }

                        ccstr[ns] = str3;
                        sizecc = longec;
                        //    printf("lecture strCC=%s ns=%i  si=%i\n",  ccstr[ns].c_str(), ns, sizecc);
                    }



                }

                fich.close();
            }



            //new fields for TM
            if (versionmip == 10000) {
                for (int sp = 1; sp < maxspot; sp++) { // spots default
                    dataspot[49][sp] = 0; //stren
                    dataspot[50][sp] = 100; //gamma
                    dataspot[51][sp] = 140; //estop
                    dataspot[52][sp] = 3; //scaltm
                    dataspot[53][sp] = 0; //rewei
                    dataspot[54][sp] = 40; //sensitm

                }
            }

            if (versionmip == 10001) {

                for (int sp = 1; sp < maxspot; sp++) { // spots default
                    dataspot[55][sp] = 500; //retrab
                    std::string cur_str = "1000A0B120C350D350E700F500G350H350I1000J120K350L350M";//12 points
                    retistr[sp] = cur_str + "@";
                }
            }

            if (versionmip == 10002) {

                for (int sp = 1; sp < maxspot; sp++) { // spots default
                    std::string ll_str = "3000A0B0C1000D1000E"; //"3000A0B0C499D501E1000F1000G"; //"3000A0B0C1000D1000E"; //"3000A0B0C200D200E800F800G1000H1000I";//"0A"
                    llstr[sp] = ll_str + "@";
                }
            }

            if (versionmip == 10003) {

                for (int sp = 1; sp < maxspot; sp++) { // spots default
                    std::string lh_str = "1000A0B500C350D350E166F500G350H350I333J500K350L350M500N500O350P350Q666R500S350T350U833V500W350X350Y";
                    lhstr[sp] = lh_str + "@";
                }
            }

            if (versionmip == 10004) {

                for (int sp = 1; sp < maxspot; sp++) { // spots default
                    dataspot[56][sp] = 0; //curvactiv
                }
            }

            if (versionmip == 10005) {

                for (int sp = 1; sp < maxspot; sp++) { // spots default
                    std::string cc_str = "3000A0B0C1000D1000E";
                    ccstr[sp] = cc_str + "@";
                }
            }

            if (versionmip == 10006) {

                for (int sp = 1; sp < maxspot; sp++) { // spots default
                    dataspot[57][sp] = 0; //qualitycurveMethod
                }
            }

            if (ns <  (maxspot - 1)) {
                ofstream fic (datal, ios::out | ios::app); // ouverture en écriture avec effacement du fichier ouvert


                for (int sp = ns + 1 ; sp < maxspot; sp++) { // spots default
                    int t_sp = sp;
                    int t_mipversion = 10007;
                    int t_circrad = 18;
                    int t_locX = 250;
                    int t_locY = 250;
                    int t_locYT = 250;
                    int t_locXL = 250;
                    int t_centerX = 0;
                    int t_centerY = 0;
                    int t_lightness = 0;
                    int t_contrast = 0;
                    int t_chroma = 0;
                    int t_sensi = 19;
                    int t_transit = 60;
                    int t_invers = 0;
                    int t_Smeth = 0;
                    int t_currentspot = 1;
                    int t_radius = 1;
                    int t_strength = 0;
                    int t_sensibn = 60;
                    int t_inversrad = 0;
                    int t_str = 0;
                    int t_chrrt = 0;
                    int t_neigh = 50;
                    int t_vart = 200;
                    int t_sensih = 19;
                    int t_inversret = 0;
                    int t_retinexMethod = 2;
                    int t_sharradius = 40;
                    int t_sharamount = 75;
                    int t_shardamping = 75;
                    int t_shariter = 30;
                    int t_sensisha = 19;
                    int t_inverssha = 0;
                    int t_qualityMethod = 2;
                    int t_thres = 18;
                    int t_proxi = 20;
                    int t_noiselumf = 0;
                    int t_noiselumc = 0;
                    int t_noisechrof = 0;
                    int t_noisechroc = 0;
                    int t_mult0 = 100;
                    int t_mult1 = 100;
                    int t_mult2 = 100;
                    int t_mult3 = 100;
                    int t_mult4 = 100;
                    int t_threshold = 20;
                    int t_sensicb = 19;
                    int t_activlum = 0;
                    //10001 TM
                    int t_stren = 0;
                    int t_gamma = 100;
                    int t_estop = 140;
                    int t_scaltm = 3;
                    int t_rewei = 0;
                    int t_sensitm = 19;

                    //10002 curve
                    int t_retrab = 500;

                    std::string t_curvret = "1000A0B120C350D350E700F500G350H350I1000J120K350L350M";//12 points
                    //10003
                    std::string t_curvll = "3000A0B0C1000D1000E"; //"3000A0B0C499D501E1000F1000G"; //"3000A0B0C1000D1000E";//0 points with marks
                    //10004
                    std::string t_curvlh = "1000A0B500C350D350E166F500G350H350I333J500K350L350M500N500O350P350Q666R500S350T350U833V500W350X350Y";
                    //10005
                    int t_curvactiv = 0;
                    //10006
                    std::string t_curvcc = "3000A0B0C1000D1000E";
                    //10007
                    int t_qualitycurveMethod = 0;

                    fic << "Mipversion=" << t_mipversion << '@' << endl;
                    fic << "Spot=" << t_sp << '@' << endl;
                    fic << "Circrad=" << t_circrad << '@' << endl;
                    fic << "LocX=" << t_locX << '@' << endl;
                    fic << "LocY=" << t_locY << '@' << endl;
                    fic << "LocYT=" << t_locYT << '@' << endl;
                    fic << "LocXL=" << t_locXL << '@' << endl ;
                    fic << "CenterX=" << t_centerX << '@' << endl;
                    fic << "CenterY=" << t_centerY << '@' << endl;
                    fic << "Lightness=" << t_lightness << '@' << endl;
                    fic << "Contrast=" << t_contrast << '@' <<  endl;
                    fic << "Chroma=" << t_chroma << '@' << endl;
                    fic << "Sensi=" << t_sensi << '@' << endl;
                    fic << "Transit=" << t_transit << '@' << endl;
                    fic << "Invers=" << t_invers << '@' << endl;
                    fic << "Smethod=" << t_Smeth << '@' << endl;
                    fic << "Currentspot=" << t_currentspot << '@' << endl;
                    fic << "Radius=" << t_radius << '@' << endl;
                    fic << "Strength=" << t_strength << '@' << endl;
                    fic << "Sensibn=" << t_sensibn << '@' << endl;
                    fic << "Inversrad=" << t_inversrad << '@' << endl;
                    fic << "Str=" << t_str << '@' << endl;
                    fic << "Chroma=" << t_chrrt << '@' << endl;
                    fic << "Neigh=" << t_neigh << '@' << endl;
                    fic << "Vart=" << t_vart << '@' << endl;
                    fic << "Sensih=" << t_sensih << '@' << endl;
                    fic << "Inversret=" << t_inversret << '@' << endl;
                    fic << "retinexMethod=" << t_retinexMethod << '@' << endl;
                    fic << "Sharradius=" << t_sharradius << '@' << endl;
                    fic << "Sharamount=" << t_sharamount << '@' << endl;
                    fic << "Shardamping=" << t_shardamping << '@' << endl;
                    fic << "Shariter=" << t_shariter << '@' << endl;
                    fic << "Sensisha=" << t_sensisha << '@' << endl;
                    fic << "Inverssha=" << t_inverssha << '@' << endl;
                    fic << "qualityMethod=" << t_qualityMethod << '@' << endl;
                    fic << "Thres=" << t_thres << '@' << endl;
                    fic << "Proxi=" << t_proxi << '@' << endl;
                    fic << "Noiselumf=" << t_noiselumf << '@' << endl;
                    fic << "Noiselumc=" << t_noiselumc << '@' << endl;
                    fic << "Noisechrof=" << t_noisechrof << '@' << endl;
                    fic << "Noisechroc=" << t_noisechroc << '@' << endl;
                    fic << "Mult0=" << t_mult0 << '@' << endl;
                    fic << "Mult1=" << t_mult1 << '@' << endl;
                    fic << "Mult2=" << t_mult2 << '@' << endl;
                    fic << "Mult3=" << t_mult3 << '@' << endl;
                    fic << "Mult4=" << t_mult4 << '@' << endl;
                    fic << "Threshold=" << t_threshold << '@' << endl;
                    fic << "Sensicb=" << t_sensicb << '@' << endl;
                    fic << "Activblurlum=" << t_activlum << '@' << endl;

                    fic << "Stren=" << t_stren << '@' << endl;
                    fic << "Gamma=" << t_gamma << '@' << endl;
                    fic << "Estop=" << t_estop << '@' << endl;
                    fic << "Scaltm=" << t_scaltm << '@' << endl;
                    fic << "Rewei=" << t_rewei << '@' << endl;
                    fic << "Sensitm=" << t_sensitm << '@' << endl;
                    fic << "Retrab=" << t_retrab << '@' << endl;
                    fic << "Curvactiv=" << t_curvactiv << '@' << endl;
                    fic << "qualitycurveMethod=" << t_qualitycurveMethod << '@' << endl;

                    fic << "curveReti=" << t_curvret << '@' << endl;
                    fic << "curveLL=" << t_curvll << '@' << endl;
                    fic << "curveLH=" << t_curvlh << '@' << endl;
                    fic << "curveCC=" << t_curvcc << '@' << endl;

                    fic << endl;
                }

                fic.close();


                ifstream fich2 (datal, ios::in);

                if (fich2) {

                    std::string line2;
                    std::string spotline2;
                    int cont2 = 0;
                    int ns2;
                    int maxin = 58;
                    int sizecu2;
                    int sizell2;
                    int sizelh2;
                    int sizecc2;

                    while (getline (fich2, line2)) {
                        spotline2 = line2;
                        std::size_t pos2 = spotline2.find ("=");
                        std::size_t posend2 = spotline2.find ("@"); //in case of for futur use

                        if (spotline2.substr (0, pos2) == "Mipversion") {
                            std::string strversion = spotline2.substr (pos2 + 1, (posend2 - pos2));
                            versionmip = std::stoi (strversion.c_str());
                        }

                        if (spotline2.substr (0, pos2) == "Spot") {
                            cont2 = 0;
                        }

                        cont2++;
                        std::string str32 = spotline2.substr (pos2 + 1, (posend2 - pos2));

                        if (cont2 == 1) {
                            ns2 =  std::stoi (str32.c_str());
                        }

                        if (cont2 >= 2  && cont2 < 16) {
                            dataspot[cont2][ns2] = std::stoi (str32.c_str());

                        }

                        if (spotline2.substr (0, pos2) == "Currentspot") {
                            dataspot[16][0] = std::stoi (str32.c_str());
                        }

                        if (cont2 > 16  && cont2 < maxin) {
                            dataspot[cont2][ns2] = std::stoi (str32.c_str());

                        }

                        if (spotline2.substr (0, pos2) == "curveReti") {
                            std::string curstr2;
                            int longecur2;
                            std::string strend2 = spotline2.substr (posend2 - 1, 1);
                            std::size_t posz2 = spotline2.find (strend2);
                            int longe2;

                            for (int sl = 0; sl < 69; sl++) {
                                if (delim[sl] == strend2) {
                                    longe2 = sl + 1;
                                }
                            }

                            retistr[ns] = str32;
                            sizecu2 = longe2;

                        }

                        if (spotline2.substr (0, pos2) == "curveLL") {
                            std::string curstr2l;
                            int longecur2l;
                            std::string strend2l = spotline2.substr (posend2 - 1, 1);
                            std::size_t posz2l = spotline2.find (strend2l);
                            int longe2l;

                            for (int sl = 0; sl < 69; sl++) {
                                if (delim[sl] == strend2l) {
                                    longe2l = sl + 1;
                                }
                            }

                            llstr[ns] = str32;
                            sizell2 = longe2l;

                        }


                        if (spotline2.substr (0, pos2) == "curveLH") {
                            std::string curstr2h;
                            int longecur2h;
                            std::string strend2h = spotline2.substr (posend2 - 1, 1);
                            std::size_t posz2h = spotline2.find (strend2h);
                            int longe2h;

                            for (int sh = 0; sh < 69; sh++) {
                                if (delim[sh] == strend2h) {
                                    longe2h = sh + 1;
                                }
                            }

                            lhstr[ns] = str32;
                            sizelh2 = longe2h;

                        }

                        if (spotline2.substr (0, pos2) == "curveCC") {
                            std::string curstr2c;
                            int longecur2c;
                            std::string strend2c = spotline2.substr (posend2 - 1, 1);
                            std::size_t posz2lc = spotline2.find (strend2c);
                            int longe2c;

                            for (int sl = 0; sl < 69; sl++) {
                                if (delim[sl] == strend2c) {
                                    longe2c = sl + 1;
                                }
                            }

                            ccstr[ns] = str32;
                            sizecc2 = longe2c;

                        }


                    }

                    fich2.close() ;

                }


            }



            for (int sp = 1; sp < maxspot; sp++) { //spots default
                params.locallab.hueref = INFINITY;
                params.locallab.chromaref = INFINITY;
                bool locutili = locutili;
                params.locallab.lumaref = INFINITY;
                params.locallab.circrad = circrads[sp] = dataspot[2][sp];
                params.locallab.locX = locx[sp] = dataspot[3][sp];
                params.locallab.locY = locy[sp] = dataspot[4][sp];
                params.locallab.locYT = locyt[sp] = dataspot[5][sp];
                params.locallab.locXL = locxl[sp] = dataspot[6][sp];
                params.locallab.centerX = centerx[sp] = dataspot[7][sp];
                params.locallab.centerY = centery[sp] = dataspot[8][sp];
                params.locallab.lightness = lights[sp] = dataspot[9][sp];
                params.locallab.contrast = contrs[sp] = dataspot[10][sp];
                params.locallab.chroma = chroms[sp] = dataspot[11][sp];
                params.locallab.sensi = sensis[sp] = dataspot[12][sp];
                params.locallab.transit = transits[sp] = dataspot[13][sp];
                sps[sp] = sp;

                if (dataspot[14][sp] ==  0) {
                    inverss[sp] = 0;
                    params.locallab.invers = false;
                } else {
                    inverss[sp] = 1;
                    params.locallab.invers = true;
                }

                if (dataspot[15][sp] ==  0) {
                    smeths[sp] = 0;
                    params.locallab.Smethod = "IND" ;
                } else if (dataspot[15][sp] ==  1) {
                    smeths[sp] = 1;
                    params.locallab.Smethod = "SYM" ;
                } else if (dataspot[15][sp] ==  2) {
                    smeths[sp] = 2;
                    params.locallab.Smethod = "INDSL";
                } else if (dataspot[15][sp] ==  3) {
                    smeths[sp] = 3;
                    params.locallab.Smethod = "SYMSL";
                }

                radiuss[sp] = dataspot[17][sp];
                strengths[sp] = dataspot[18][sp];
                params.locallab.radius = dataspot[17][sp];
                params.locallab.strength = dataspot[18][sp];
                params.locallab.sensibn = dataspot[19][sp];

                if (dataspot[20][sp] ==  0) {
                    inversrads[sp] = 0;
                    params.locallab.inversrad = false;
                } else {
                    inversrads[sp] = 1;
                    params.locallab.inversrad = true;
                }


                params.locallab.str = strs[sp] = dataspot[21][sp];
                params.locallab.chrrt = chrrts[sp] = dataspot[22][sp];
                params.locallab.neigh = neighs[sp] = dataspot[23][sp];
                params.locallab.vart = varts[sp] = dataspot[24][sp];
                params.locallab.sensih = sensihs[sp] = dataspot[25][sp];

                if (dataspot[26][sp] ==  0) {
                    inversrets[sp] = 0;
                    params.locallab.inversret = false;
                } else {
                    inversrets[sp] = 1;
                    params.locallab.inversret = true;
                }

                if (dataspot[27][sp] ==  0) {
                    retinexs[sp] = 0;
                    params.locallab.retinexMethod = "low" ;
                } else if (dataspot[27][sp] ==  1) {
                    retinexs[sp] = 1;
                    params.locallab.retinexMethod = "uni" ;
                } else if (dataspot[27][sp] ==  2) {
                    retinexs[sp] = 2;
                    params.locallab.retinexMethod = "high";
                }

                sharradiuss[sp] = dataspot[28][sp];
                params.locallab.sharradius = dataspot[28][sp];

                params.locallab.sharamount = sharamounts[sp] = dataspot[29][sp];
                params.locallab.shardamping = shardampings[sp] = dataspot[30][sp];
                params.locallab.shariter = shariters[sp] = dataspot[31][sp];
                params.locallab.sensisha = sensishas[sp] = dataspot[32][sp];

                if (dataspot[33][sp] ==  0) {
                    inversshas[sp] = 0;
                    params.locallab.inverssha = false;
                } else {
                    inversshas[sp] = 1;
                    params.locallab.inverssha = true;
                }

                if (dataspot[34][sp] ==  0) {
                    qualitys[sp] = 0;
                    params.locallab.qualityMethod = "std" ;
                } else if (dataspot[34][sp] ==  1) {
                    qualitys[sp] = 1;
                    params.locallab.qualityMethod = "enh" ;
                } else if (dataspot[34][sp] ==  2) {
                    qualitys[sp] = 2;
                    params.locallab.qualityMethod = "enhden" ;
                }

                params.locallab.thres = thress[sp] = dataspot[35][sp];
                params.locallab.proxi = proxis[sp] = dataspot[36][sp];
                params.locallab.noiselumf = noiselumfs[sp] = dataspot[37][sp];
                params.locallab.noiselumc = noiselumcs[sp] = dataspot[38][sp];
                params.locallab.noisechrof = noisechrofs[sp] = dataspot[39][sp];
                params.locallab.noisechroc = noisechrocs[sp] = dataspot[40][sp];
                params.locallab.mult[0] = mult0s[sp] = dataspot[41][sp];
                params.locallab.mult[1] = mult1s[sp] = dataspot[42][sp];
                params.locallab.mult[2] = mult2s[sp] = dataspot[43][sp];
                params.locallab.mult[3] = mult3s[sp] = dataspot[44][sp];
                params.locallab.mult[4] = mult4s[sp] = dataspot[45][sp];
                params.locallab.threshold = thresholds[sp] = dataspot[46][sp];
                params.locallab.sensicb = sensicbs[sp] = dataspot[47][sp];

                if (dataspot[48][sp] ==  0) {
                    activlums[sp] = 0;
                    params.locallab.activlum = false;
                } else {
                    activlums[sp] = 1;
                    params.locallab.activlum = true;
                }

                params.locallab.stren = strens[sp] = dataspot[49][sp];
                params.locallab.gamma = gammas[sp] = dataspot[50][sp];
                params.locallab.estop = estops[sp] = dataspot[51][sp];
                params.locallab.scaltm = scaltms[sp] = dataspot[52][sp];
                params.locallab.rewei = reweis[sp] = dataspot[53][sp];
                params.locallab.sensitm = sensitms[sp] = dataspot[54][sp];
                params.locallab.retrab = retrabs[sp] = dataspot[55][sp];

                if (dataspot[56][sp] ==  0) {
                    curvactivs[sp] = 0;
                    params.locallab.curvactiv = false;
                } else {
                    curvactivs[sp] = 1;
                    params.locallab.curvactiv = true;
                }

                if (dataspot[57][sp] ==  0) {
                    qualitycurves[sp] = 0;
                    params.locallab.qualitycurveMethod = "none" ;
                } else if (dataspot[57][sp] ==  1) {
                    qualitycurves[sp] = 1;
                    params.locallab.qualitycurveMethod = "std" ;
                } else if (dataspot[57][sp] ==  2) {
                    qualitycurves[sp] = 2;
                    params.locallab.qualitycurveMethod = "enh" ;
                }

                int *s_datc;
                s_datc = new int[70];
                int siz;

                ipf.strcurv_data (retistr[sp], s_datc, siz);

                sizeretics[sp] = siz;

                std::vector<double>   cretiend;

                for (int j = 0; j < siz; j++) {
                    reticurvs[sp * 500 + j] =  s_datc[j];
                    cretiend.push_back ((double) (s_datc[j]) / 1000.);
                }

                delete [] s_datc;

                int *s_datcl;
                s_datcl = new int[70];
                int sizl;

                ipf.strcurv_data (llstr[sp], s_datcl, sizl);

                sizellcs[sp] = sizl;

                std::vector<double>   cllend;

                for (int j = 0; j < sizl; j++) {
                    llcurvs[sp * 500 + j] =  s_datcl[j];
                    cllend.push_back ((double) (s_datcl[j]) / 1000.);
                }

                delete [] s_datcl;


                int *s_datcc;
                s_datcc = new int[70];
                int sizc;

                ipf.strcurv_data (ccstr[sp], s_datcc, sizc);

                sizecccs[sp] = sizc;

                std::vector<double>   cccend;

                for (int j = 0; j < sizc; j++) {
                    cccurvs[sp * 500 + j] =  s_datcc[j];
                    cccend.push_back ((double) (s_datcc[j]) / 1000.);
                }

                delete [] s_datcc;

                int *s_datch;
                s_datch = new int[70];
                int sizh;

                ipf.strcurv_data (lhstr[sp], s_datch, sizh);

                sizelhcs[sp] = sizh;

                std::vector<double>   clhend;

                for (int j = 0; j < sizh; j++) {
                    lhcurvs[sp * 500 + j] =  s_datch[j];
                    clhend.push_back ((double) (s_datch[j]) / 1000.);
                }

                delete [] s_datch;

                params.locallab.localTgaincurve.clear();
                params.locallab.localTgaincurve = cretiend;

                int lenc = params.locallab.localTgaincurve.size();

                params.locallab.llcurve.clear();
                params.locallab.llcurve = cllend;

                params.locallab.LHcurve.clear();
                params.locallab.LHcurve = clhend;

                params.locallab.cccurve.clear();
                params.locallab.cccurve = cccend;

                locallutili = false;
                localcutili = false;

                params.locallab.getCurves (locRETgainCurve, locRETgainCurverab, loclhCurve);
                CurveFactory::curveLocal (locallutili, params.locallab.llcurve, lllocalcurve, sca); //scale == 1 ? 1 : 16);
                CurveFactory::curveCCLocal (localcutili, params.locallab.cccurve, cclocalcurve, sca); //scale == 1 ? 1 : 16);

                ipf.Lab_Local (3, sp, (float**)shbuffer, nprevl, nprevl, 0, 0, 0, 0, pW, pH, fw, fh, locutili, scale, locRETgainCurve, locallutili, lllocalcurve, loclhCurve, cclocalcurve, params.locallab.hueref, params.locallab.chromaref, params.locallab.lumaref);
                dataspot[58][sp] = huerefs[sp] = 100.f * params.locallab.hueref;
                dataspot[59][sp] = chromarefs[sp] = params.locallab.chromaref;
                dataspot[60][sp] = lumarefs[sp] = params.locallab.lumaref;
                nextParams.locallab.hueref = params.locallab.hueref;
                nextParams.locallab.chromaref = params.locallab.chromaref;
                nextParams.locallab.lumaref = params.locallab.lumaref;
                lllocalcurve.clear();
                cclocalcurve.clear();

            }



            int sp ;
            sp = realspot;


            int maxreal = 1;//do nothing..in case of

            if (aloListener && realspot != dataspot[16][0]) {
                //update GUI and MIP
                aloListener->localChanged (dataspot, retistr[sp], llstr[sp], lhstr[sp], ccstr[sp], sp, maxreal);
            }


            int sis = 1;
            params.locallab.hueref = INFINITY;
            params.locallab.chromaref = INFINITY;
            params.locallab.lumaref = INFINITY;
            locallutili = false;

            sps[sp] = sp;
            dataspot[2][sp] = circrads[sp] = params.locallab.circrad = dataspot[2][0];
            dataspot[3][sp] = locx[sp] = params.locallab.locX = dataspot[3][0];
            dataspot[4][sp] = locy[sp] = params.locallab.locY = dataspot[4][0];
            dataspot[5][sp] = locyt[sp] = params.locallab.locYT = dataspot[5][0];
            dataspot[6][sp] = locxl[sp] = params.locallab.locXL = dataspot[6][0];
            dataspot[7][sp] = centerx[sp] = params.locallab.centerX = dataspot[7][0];
            dataspot[8][sp] = centery[sp] = params.locallab.centerY = dataspot[8][0];
            dataspot[9][sp] = lights[sp] = params.locallab.lightness = dataspot[9][0];
            dataspot[10][sp] = contrs[sp] = params.locallab.contrast = dataspot[10][0];
            dataspot[11][sp] = chroms[sp] = params.locallab.chroma = dataspot[11][0];
            dataspot[12][sp] = sensis[sp] = params.locallab.sensi = dataspot[12][0];
            dataspot[13][sp] = transits[sp] = params.locallab.transit = dataspot[13][0];

            if (dataspot[14][0] == 0) {
                params.locallab.invers = false;
                dataspot[14][sp] = 0;
                inverss[sp] = 0;
            } else {
                params.locallab.invers = true;
                dataspot[14][sp] = 1;
                inverss[sp] = 1;
            }

            if (dataspot[15][0] == 0) {
                params.locallab.Smethod = "IND" ;
                smeths[sp] = 0;
                dataspot[15][sp] = 0;
            } else if (dataspot[15][0] == 1) {
                params.locallab.Smethod = "SYM" ;
                smeths[sp] = 1;
                dataspot[15][sp] = 1;

            } else if (dataspot[15][0] == 2) {
                params.locallab.Smethod = "INDSL" ;
                smeths[sp] = 2;
                dataspot[15][sp] = 2;
            } else if (dataspot[15][0] == 3) {
                params.locallab.Smethod = "SYMSL" ;
                smeths[sp] = 3;
                dataspot[15][sp] = 3;
            }

            params.locallab.radius = dataspot[17][0];
            params.locallab.strength = dataspot[18][0];
            params.locallab.sensibn = dataspot[19][0];

            dataspot[17][sp] = radiuss[sp] = params.locallab.radius;
            dataspot[18][sp] = strengths[sp] = params.locallab.strength;
            dataspot[19][sp] = sensibns[sp] = params.locallab.sensibn;

            if (dataspot[20][0] == 0) {
                params.locallab.inversrad = false;
                dataspot[20][sp] = 0;
                inversrads[sp] = 0;
            } else {
                params.locallab.inversrad = true;
                dataspot[20][sp] = 1;
                inversrads[sp] = 1;
            }

            dataspot[21][sp] = strs[sp] = params.locallab.str = dataspot[21][0];
            dataspot[22][sp] = chrrts[sp] = params.locallab.chrrt = dataspot[22][0];
            dataspot[23][sp] = neighs[sp] = params.locallab.neigh = dataspot[23][0];
            dataspot[24][sp] = varts[sp] = params.locallab.vart = dataspot[24][0];
            dataspot[25][sp] = sensihs[sp] = params.locallab.sensih = dataspot[25][0];

            if (dataspot[26][0] == 0) {
                params.locallab.inversret = false;
                inversrets[sp] = 0;
                dataspot[26][sp] = 0;
            } else {
                params.locallab.inversret = true;
                inversrets[sp] = 1;
                dataspot[26][sp] = 1;
            }

            if (dataspot[27][0] == 0) {
                params.locallab.retinexMethod = "low" ;
                retinexs[sp] = 0;
                dataspot[27][sp] = 0;
            } else if (dataspot[27][0] == 1) {
                params.locallab.retinexMethod = "uni" ;
                retinexs[sp] = 1;
                dataspot[27][sp] = 1;
            } else if (dataspot[27][0] == 2) {
                params.locallab.Smethod = "high" ;
                retinexs[sp] = 2;
                dataspot[27][sp] = 2;
            }

            dataspot[28][sp] = sharradiuss[sp] = params.locallab.sharradius = dataspot[28][0];

            dataspot[29][sp] = sharamounts[sp] = params.locallab.sharamount = dataspot[29][0];
            dataspot[30][sp] = shardampings[sp] = params.locallab.shardamping = dataspot[30][0];
            dataspot[31][sp] = shariters[sp] = params.locallab.shariter = dataspot[31][0];
            dataspot[32][sp] = sensishas[sp] = params.locallab.sensisha = dataspot[32][0];

            if (dataspot[33][0] == 0) {
                params.locallab.inverssha = 0;
                inversshas[sp] = 0;
                dataspot[33][sp] = 0;
            } else {
                params.locallab.inverssha = 1;
                inversshas[sp] = 1;
                dataspot[33][sp] = 1;
            }

            if (dataspot[34][0] == 0) {
                params.locallab.qualityMethod = "std" ;
                qualitys[sp] = 0;
                dataspot[34][sp] = 0;
            } else if (dataspot[34][0] == 1) {
                params.locallab.qualityMethod = "enh" ;
                qualitys[sp] = 1;
                dataspot[34][sp] = 1;
            } else if (dataspot[34][0] == 2) {
                params.locallab.qualityMethod = "enhden" ;
                qualitys[sp] = 2;
                dataspot[34][sp] = 2;
            }

            dataspot[35][sp] = thress[sp] = params.locallab.thres = dataspot[35][0];
            dataspot[36][sp] = proxis[sp] = params.locallab.proxi = dataspot[36][0];
            dataspot[37][sp] = noiselumfs[sp] = params.locallab.noiselumf = dataspot[37][0];
            dataspot[38][sp] = noiselumcs[sp] = params.locallab.noiselumc = dataspot[38][0];
            dataspot[39][sp] = noisechrofs[sp] = params.locallab.noisechrof = dataspot[39][0];
            dataspot[40][sp] = noisechrocs[sp] = params.locallab.noisechroc = dataspot[40][0];
            dataspot[41][sp] = mult0s[sp] = params.locallab.mult[0] = dataspot[41][0];
            dataspot[42][sp] = mult1s[sp] = params.locallab.mult[1] = dataspot[42][0];
            dataspot[43][sp] = mult2s[sp] = params.locallab.mult[2] = dataspot[43][0];
            dataspot[44][sp] = mult3s[sp] = params.locallab.mult[3] = dataspot[44][0];
            dataspot[45][sp] = mult4s[sp] = params.locallab.mult[4] = dataspot[45][0];
            dataspot[46][sp] = thresholds[sp] = params.locallab.threshold = dataspot[46][0];
            dataspot[47][sp] = sensicbs[sp] = params.locallab.sensicb = dataspot[47][0];

            if (dataspot[48][0] == 0) {
                params.locallab.activlum = 0;
                activlums[sp] = 0;
                dataspot[48][sp] = 0;
            } else {
                params.locallab.activlum = 1;
                activlums[sp] = 1;
                dataspot[48][sp] = 1;
            }

            dataspot[49][sp] = strens[sp] = params.locallab.stren = dataspot[49][0];
            dataspot[50][sp] = gammas[sp] = params.locallab.gamma = dataspot[50][0];
            dataspot[51][sp] = estops[sp] = params.locallab.estop = dataspot[51][0];
            dataspot[52][sp] = scaltms[sp] = params.locallab.scaltm = dataspot[52][0];
            dataspot[53][sp] = reweis[sp] = params.locallab.rewei = dataspot[53][0];
            dataspot[54][sp] = sensitms[sp] = params.locallab.sensitm = dataspot[54][0];
            dataspot[55][sp] = retrabs[sp] = params.locallab.retrab = dataspot[55][0];

            if (dataspot[56][0] == 0) {
                params.locallab.curvactiv = false;
                dataspot[56][sp] = 0;
                curvactivs[sp] = 0;
            } else {
                params.locallab.curvactiv = true;
                dataspot[56][sp] = 1;
                curvactivs[sp] = 1;
            }

            if (dataspot[57][0] == 0) {
                params.locallab.qualitycurveMethod = "none" ;
                qualitycurves[sp] = 0;
                dataspot[57][sp] = 0;
            } else if (dataspot[57][0] == 1) {
                params.locallab.qualitycurveMethod = "std" ;
                qualitycurves[sp] = 1;
                dataspot[57][sp] = 1;
            } else if (dataspot[57][0] == 2) {
                params.locallab.qualitycurveMethod = "enh" ;
                qualitycurves[sp] = 2;
                dataspot[57][sp] = 2;
            }

            int *s_datc;
            s_datc = new int[70];
            int siz;

            ipf.strcurv_data (retistr[0], s_datc, siz);
            sizeretics[sp] = siz;
            std::vector<double>   cretiend;

            retistr[sp] = retistr[0];

            for (int j = 0; j < siz; j++) {
                reticurvs[sp * 500 + j] = s_datc[j];
                cretiend.push_back ((double) (s_datc[j]) / 1000.);

            }

            params.locallab.localTgaincurve.clear();
            params.locallab.localTgaincurve = cretiend;

            int lenc = params.locallab.localTgaincurve.size();


            delete [] s_datc;

            int *s_datcl;
            s_datcl = new int[70];
            int sizl;

            ipf.strcurv_data (llstr[0], s_datcl, sizl);
            sizellcs[sp] = sizl;
            std::vector<double>   cllend;

            llstr[sp] = llstr[0];

            for (int j = 0; j < sizl; j++) {
                llcurvs[sp * 500 + j] = s_datcl[j];
                cllend.push_back ((double) (s_datcl[j]) / 1000.);

            }

            params.locallab.llcurve.clear();
            params.locallab.llcurve = cllend;

            delete [] s_datcl;


            int *s_datcc;
            s_datcc = new int[70];
            int sizc;

            ipf.strcurv_data (ccstr[0], s_datcc, sizc);
            sizecccs[sp] = sizc;
            std::vector<double>   cccend;

            ccstr[sp] = ccstr[0];

            for (int j = 0; j < sizc; j++) {
                cccurvs[sp * 500 + j] = s_datcc[j];
                cccend.push_back ((double) (s_datcc[j]) / 1000.);

            }

            params.locallab.cccurve.clear();
            params.locallab.cccurve = cccend;

            delete [] s_datcc;

            int *s_datch;
            s_datch = new int[70];
            int sizh;

            ipf.strcurv_data (lhstr[0], s_datch, sizh);
            sizelhcs[sp] = sizh;
            std::vector<double>   clhend;

            lhstr[sp] = lhstr[0];

            for (int j = 0; j < sizh; j++) {
                lhcurvs[sp * 500 + j] = s_datch[j];
                clhend.push_back ((double) (s_datch[j]) / 1000.);

            }

            params.locallab.LHcurve.clear();
            params.locallab.LHcurve = clhend;

            delete [] s_datch;

            params.locallab.getCurves (locRETgainCurve, locRETgainCurverab, loclhCurve);
            locallutili = false;
            localcutili = false;

            CurveFactory::curveLocal (locallutili, params.locallab.llcurve, lllocalcurve, sca); //scale == 1 ? 1 : 16);
            CurveFactory::curveCCLocal (localcutili, params.locallab.cccurve, cclocalcurve, sca); //scale == 1 ? 1 : 16);

            ipf.Lab_Local (3, sp, (float**)shbuffer, nprevl, nprevl, 0, 0, 0, 0, pW, pH, fw, fh, locutili, scale, locRETgainCurve, locallutili, lllocalcurve, loclhCurve, cclocalcurve, params.locallab.hueref, params.locallab.chromaref, params.locallab.lumaref);
            dataspot[58][sp] = huerefs[sp] = 100.f * params.locallab.hueref;
            dataspot[59][sp] = chromarefs[sp] = params.locallab.chromaref;
            dataspot[60][sp] = lumarefs[sp] = params.locallab.lumaref;
            lllocalcurve.clear();
            cclocalcurve.clear();

            nextParams.locallab.hueref = params.locallab.hueref;
            nextParams.locallab.chromaref = params.locallab.chromaref;
            nextParams.locallab.lumaref = params.locallab.lumaref;


            ofstream fou (datal, ios::out | ios::trunc);

            if (fou)

            {

                for (int spe = 1; spe < maxspot; spe++) {
                    int t_sp = spe;
                    int t_mipversion = 10007;
                    int t_circrad  = dataspot[2][spe];
                    int t_locX  = dataspot[3][spe];
                    int t_locY  = dataspot[4][spe];
                    int t_locYT  = dataspot[5][spe];
                    int t_locXL  = dataspot[6][spe];
                    int t_centerX  = dataspot[7][spe];
                    int t_centerY  = dataspot[8][spe];
                    int t_lightness  = dataspot[9][spe];
                    int t_contrast  = dataspot[10][spe];
                    int t_chroma  = dataspot[11][spe];
                    int t_sensi  = dataspot[12][spe];
                    int t_transit  = dataspot[13][spe];
                    int t_invers = dataspot[14][spe];
                    int t_Smeth = dataspot[15][spe];
                    int t_currentspot  = realspot;
                    int t_radius = dataspot[17][spe];
                    int t_strength = dataspot[18][spe];
                    int t_sensibn = dataspot[19][spe];
                    int t_inversrad = dataspot[20][spe];
                    int t_str = dataspot[21][spe];
                    int t_chrrt = dataspot[22][spe];
                    int t_neigh = dataspot[23][spe];
                    int t_vart = dataspot[24][spe];
                    int t_sensih = dataspot[25][spe];
                    int t_inversret = dataspot[26][spe];
                    int t_retinexMethod = dataspot[27][spe];
                    int t_sharradius = dataspot[28][spe];
                    int t_sharamount = dataspot[29][spe];
                    int t_shardamping = dataspot[30][spe];
                    int t_shariter = dataspot[31][spe];
                    int t_sensisha = dataspot[32][spe];
                    int t_inverssha = dataspot[33][spe];
                    int t_qualityMethod =  dataspot[34][spe];
                    int t_thres =  dataspot[35][spe];
                    int t_proxi =  dataspot[36][spe];
                    int t_noiselumf = dataspot[37][spe];
                    int t_noiselumc = dataspot[38][spe];
                    int t_noisechrof = dataspot[39][spe];
                    int t_noisechroc = dataspot[40][spe];
                    int t_mult0 = dataspot[41][spe];
                    int t_mult1 = dataspot[42][spe];
                    int t_mult2 = dataspot[43][spe];
                    int t_mult3 = dataspot[44][spe];
                    int t_mult4 = dataspot[45][spe];
                    int t_threshold = dataspot[46][spe];
                    int t_sensicb = dataspot[47][spe];
                    int t_activlum = dataspot[48][spe];

                    int t_stren = dataspot[49][spe];
                    int t_gamma = dataspot[50][spe];
                    int t_estop = dataspot[51][spe];
                    int t_scaltm = dataspot[52][spe];
                    int t_rewei = dataspot[53][spe];
                    int t_sensitm = dataspot[54][spe];
                    int t_retrab = dataspot[55][spe];
                    int t_curvactiv = dataspot[56][spe];
                    int t_qualitycurveMethod =  dataspot[57][spe];

                    int t_hueref = dataspot[58][spe];
                    int t_chromaref = dataspot[59][spe];
                    int t_lumaref = dataspot[60][spe];

                    std::string t_curvret = retistr[spe];
                    std::string t_curvll = llstr[spe];
                    std::string t_curvlh = lhstr[spe];
                    std::string t_curvcc = ccstr[spe];

                    fou << "Mipversion=" << t_mipversion << '@' << endl;
                    fou << "Spot=" << t_sp << '@' << endl;
                    fou << "Circrad=" << t_circrad << '@' << endl;
                    fou << "LocX=" << t_locX << '@' << endl;
                    fou << "LocY=" << t_locY << '@' << endl;
                    fou << "LocYT=" << t_locYT << '@' << endl;
                    fou << "LocXL=" << t_locXL << '@' << endl ;
                    fou << "CenterX=" << t_centerX << '@' << endl;
                    fou << "CenterY=" << t_centerY << '@' << endl;
                    fou << "Lightness=" << t_lightness << '@' << endl;
                    fou << "Contrast=" << t_contrast << '@' <<  endl;
                    fou << "Chroma=" << t_chroma << '@' << endl;
                    fou << "Sensi=" << t_sensi << '@' << endl;
                    fou << "Transit=" << t_transit << '@' << endl;
                    fou << "Invers=" << t_invers << '@' << endl;
                    fou << "Smethod=" << t_Smeth << '@' << endl;
                    fou << "Currentspot=" << t_currentspot << '@' << endl;
                    fou << "Radius=" << t_radius << '@' << endl;
                    fou << "Strength=" << t_strength << '@' << endl;
                    fou << "Sesibn=" << t_sensibn << '@' << endl;
                    fou << "Inversrad=" << t_inversrad << '@' << endl;
                    fou << "Str=" << t_str << '@' << endl;
                    fou << "Chroma=" << t_chrrt << '@' << endl;
                    fou << "Neigh=" << t_neigh << '@' << endl;
                    fou << "Vart=" << t_vart << '@' << endl;
                    fou << "Sensih=" << t_sensih << '@' << endl;
                    fou << "Inversret=" << t_inversret << '@' << endl;
                    fou << "retinexMethod=" << t_retinexMethod << '@' << endl;
                    fou << "Sharradius=" << t_sharradius << '@' << endl;
                    fou << "Sharamount=" << t_sharamount << '@' << endl;
                    fou << "Shardamping=" << t_shardamping << '@' << endl;
                    fou << "Shariter=" << t_shariter << '@' << endl;
                    fou << "Sensisha=" << t_sensisha << '@' << endl;
                    fou << "Inverssha=" << t_inverssha << '@' << endl;
                    fou << "qualityMethod=" << t_qualityMethod << '@' << endl;
                    fou << "Thres=" << t_thres << '@' << endl;
                    fou << "Proxi=" << t_proxi << '@' << endl;
                    fou << "Noiselumf=" << t_noiselumf << '@' << endl;
                    fou << "Noiselumc=" << t_noiselumc << '@' << endl;
                    fou << "Noisechrof=" << t_noisechrof << '@' << endl;
                    fou << "Noisechroc=" << t_noisechroc << '@' << endl;
                    fou << "Mult0=" << t_mult0 << '@' << endl;
                    fou << "Mult1=" << t_mult1 << '@' << endl;
                    fou << "Mult2=" << t_mult2 << '@' << endl;
                    fou << "Mult3=" << t_mult3 << '@' << endl;
                    fou << "Mult4=" << t_mult4 << '@' << endl;
                    fou << "Threshold=" << t_threshold << '@' << endl;
                    fou << "Sensicb=" << t_sensicb << '@' << endl;
                    fou << "Activblurlum=" << t_activlum << '@' << endl;

                    fou << "Stren=" << t_stren << '@' << endl;
                    fou << "Gamma=" << t_gamma << '@' << endl;
                    fou << "Estop=" << t_estop << '@' << endl;
                    fou << "Scaltm=" << t_scaltm << '@' << endl;
                    fou << "Rewei=" << t_rewei << '@' << endl;
                    fou << "Sensitm=" << t_sensitm << '@' << endl;

                    fou << "Retrab=" << t_retrab << '@' << endl;
                    fou << "Curvactiv=" << t_curvactiv << '@' << endl;
                    fou << "qualitycurveMethod=" << t_qualitycurveMethod << '@' << endl;

                    fou << "hueref=" << t_hueref << '@' << endl;
                    fou << "chromaref=" << t_chromaref << '@' << endl;
                    fou << "lumaref=" << t_lumaref << '@' << endl;
                    fou << "curveReti=" << t_curvret << endl;
                    fou << "curveLL=" << t_curvll << endl;
                    fou << "curveLH=" << t_curvlh << endl;
                    fou << "curveCC=" << t_curvcc << endl;

                    fou << endl;
                }

                fou.close();
            }



            for (int i = 0; i < 61; i++) {
                delete [] dataspot[i];
            }

            delete [] dataspot;

            delete [] retistr;
            delete [] llstr;
            delete [] lhstr;
            delete [] ccstr;


            //          }
        }


        histCCurve.clear();
        histLCurve.clear();
        ipf.chromiLuminanceCurve (nullptr, pW, nprevl, nprevl, chroma_acurve, chroma_bcurve, satcurve, lhskcurve, clcurve, lumacurve, utili, autili, butili, ccutili, cclutili, clcutili, histCCurve, histLCurve);
        ipf.vibrance (nprevl);

        if ((params.colorappearance.enabled && !params.colorappearance.tonecie) ||  (!params.colorappearance.enabled)) {
            ipf.EPDToneMap (nprevl, 5, 1);
        }

        // for all treatments Defringe, Sharpening, Contrast detail , Microcontrast they are activated if "CIECAM" function are disabled
        readyphase++;

        /* Issue 2785, disabled some 1:1 tools
                if (scale==1) {
                    if((params.colorappearance.enabled && !settings->autocielab) || (!params.colorappearance.enabled)){
                        progress ("Denoising luminance impulse...",100*readyphase/numofphases);
                        ipf.impulsedenoise (nprevl);
                        readyphase++;
                    }
                    if((params.colorappearance.enabled && !settings->autocielab) || (!params.colorappearance.enabled)){
                        progress ("Defringing...",100*readyphase/numofphases);
                        ipf.defringe (nprevl);
                        readyphase++;
                    }
                    if (params.sharpenEdge.enabled) {
                        progress ("Edge sharpening...",100*readyphase/numofphases);
                        ipf.MLsharpen (nprevl);
                        readyphase++;
                    }
                    if (params.sharpenMicro.enabled) {
                        if(( params.colorappearance.enabled && !settings->autocielab) || (!params.colorappearance.enabled)){
                            progress ("Microcontrast...",100*readyphase/numofphases);
                            ipf.MLmicrocontrast (nprevl);
                            readyphase++;
                        }
                    }
                    if(((params.colorappearance.enabled && !settings->autocielab) || (!params.colorappearance.enabled)) && params.sharpening.enabled) {
                        progress ("Sharpening...",100*readyphase/numofphases);

                        float **buffer = new float*[pH];
                        for (int i=0; i<pH; i++)
                            buffer[i] = new float[pW];

                        ipf.sharpening (nprevl, (float**)buffer);

                        for (int i=0; i<pH; i++)
                            delete [] buffer[i];
                        delete [] buffer;
                        readyphase++;
                    }
                }
        */
        if (params.dirpyrequalizer.cbdlMethod == "aft") {
            if (((params.colorappearance.enabled && !settings->autocielab) || (!params.colorappearance.enabled)) ) {
                progress ("Pyramid wavelet...", 100 * readyphase / numofphases);
                ipf.dirpyrequalizer (nprevl, scale);
                //ipf.Lanczoslab (ip_wavelet(LabImage * lab, LabImage * dst, const procparams::EqualizerParams & eqparams), nprevl, 1.f/scale);
                readyphase++;
            }
        }


        wavcontlutili = false;
        //CurveFactory::curveWavContL ( wavcontlutili,params.wavelet.lcurve, wavclCurve, LUTu & histogramwavcl, LUTu & outBeforeWavCLurveHistogram,int skip);
        CurveFactory::curveWavContL (wavcontlutili, params.wavelet.wavclCurve, wavclCurve, scale == 1 ? 1 : 16);


        if ((params.wavelet.enabled)) {
            WaveletParams WaveParams = params.wavelet;
            //      WaveParams.getCurves(wavCLVCurve, waOpacityCurveRG, waOpacityCurveBY);
            WaveParams.getCurves (wavCLVCurve, waOpacityCurveRG, waOpacityCurveBY, waOpacityCurveW, waOpacityCurveWL);

            int kall = 0;
            progress ("Wavelet...", 100 * readyphase / numofphases);
            //  ipf.ip_wavelet(nprevl, nprevl, kall, WaveParams, wavCLVCurve, waOpacityCurveRG, waOpacityCurveBY, scale);
            ipf.ip_wavelet (nprevl, nprevl, kall, WaveParams, wavCLVCurve, waOpacityCurveRG, waOpacityCurveBY, waOpacityCurveW, waOpacityCurveWL, wavclCurve, wavcontlutili, scale);

        }


        if (params.colorappearance.enabled) {
            //L histo  and Chroma histo for ciecam
            // histogram well be for Lab (Lch) values, because very difficult to do with J,Q, M, s, C
            int x1, y1, x2, y2;
            params.crop.mapToResized (pW, pH, scale, x1, x2,  y1, y2);
            lhist16CAM.clear();
            lhist16CCAM.clear();

            if (!params.colorappearance.datacie) {
                for (int x = 0; x < pH; x++)
                    for (int y = 0; y < pW; y++) {
                        int pos = CLIP ((int) (nprevl->L[x][y]));
                        int posc = CLIP ((int)sqrt (nprevl->a[x][y] * nprevl->a[x][y] + nprevl->b[x][y] * nprevl->b[x][y]));
                        lhist16CAM[pos]++;
                        lhist16CCAM[posc]++;
                    }
            }

            CurveFactory::curveLightBrightColor (params.colorappearance.curve, params.colorappearance.curve2, params.colorappearance.curve3,
                                                 lhist16CAM, histLCAM, lhist16CCAM, histCCAM,
                                                 customColCurve1, customColCurve2, customColCurve3, 1);
            float fnum = imgsrc->getMetaData()->getFNumber  ();        // F number
            float fiso = imgsrc->getMetaData()->getISOSpeed () ;       // ISO
            float fspeed = imgsrc->getMetaData()->getShutterSpeed () ; // Speed
            double fcomp = imgsrc->getMetaData()->getExpComp  ();      // Compensation +/-
            double adap;

            if (fnum < 0.3f || fiso < 5.f || fspeed < 0.00001f) { //if no exif data or wrong
                adap = 2000.;
            } else {
                double E_V = fcomp + log2 (double ((fnum * fnum) / fspeed / (fiso / 100.f)));
                E_V += params.toneCurve.expcomp;// exposure compensation in tonecurve ==> direct EV
                E_V += log2 (params.raw.expos); // exposure raw white point ; log2 ==> linear to EV
                adap = powf (2.f, E_V - 3.f); // cd / m2
                // end calculation adaptation scene luminosity
            }

            int begh = 0;
            int endh = pH;
            float d;
            bool execsharp = false;

            if (!ncie) {
                ncie = new CieImage (pW, pH);
            }

            if (!CAMBrightCurveJ && (params.colorappearance.algo == "JC" || params.colorappearance.algo == "JS" || params.colorappearance.algo == "ALL")) {
                CAMBrightCurveJ (32768, 0);
            }

            if (!CAMBrightCurveQ && (params.colorappearance.algo == "QM" || params.colorappearance.algo == "ALL")) {
                CAMBrightCurveQ (32768, 0);
            }

            // Issue 2785, only float version of ciecam02 for navigator and pan background
            CAMMean = NAN;
            CAMBrightCurveJ.dirty = true;
            CAMBrightCurveQ.dirty = true;

            ipf.ciecam_02float (ncie, float (adap), begh, endh, pW, 2, nprevl, &params, customColCurve1, customColCurve2, customColCurve3, histLCAM, histCCAM, CAMBrightCurveJ, CAMBrightCurveQ, CAMMean, 5, 1, execsharp, d, scale, 1);

            if (params.colorappearance.autodegree && acListener && params.colorappearance.enabled) {
                acListener->autoCamChanged (100.* (double)d);
            }

            if (params.colorappearance.autoadapscen && acListener && params.colorappearance.enabled) {
                acListener->adapCamChanged (adap);   //real value of adapt scene luminosity
            }

            readyphase++;
        } else {
            // CIECAM is disabled, we free up its image buffer to save some space
            if (ncie) {
                delete ncie;
            }

            ncie = nullptr;

            if (CAMBrightCurveJ) {
                CAMBrightCurveJ.reset();
            }

            if (CAMBrightCurveQ) {
                CAMBrightCurveQ.reset();
            }
        }
    }

// Update the monitor color transform if necessary
    if ((todo & M_MONITOR) || (lastOutputProfile != params.icm.output) || lastOutputIntent != params.icm.outputIntent || lastOutputBPC != params.icm.outputBPC) {
        lastOutputProfile = params.icm.output;
        lastOutputIntent = params.icm.outputIntent;
        lastOutputBPC = params.icm.outputBPC;
        ipf.updateColorProfiles (monitorProfile, monitorIntent, softProof, gamutCheck);
    }

// process crop, if needed
    for (size_t i = 0; i < crops.size(); i++)
        if (crops[i]->hasListener () && cropCall != crops[i] ) {
            crops[i]->update (todo);    // may call ourselves
        }

    progress ("Conversion to RGB...", 100 * readyphase / numofphases);

    if ((todo != CROP && todo != MINUPDATE) || (todo & M_MONITOR)) {
        MyMutex::MyLock prevImgLock (previmg->getMutex());

        try {
            // Computing the preview image, i.e. converting from WCS->Monitor color space (soft-proofing disabled) or WCS->Output profile->Monitor color space (soft-proofing enabled)
            ipf.lab2monitorRgb (nprevl, previmg);

            // Computing the internal image for analysis, i.e. conversion from WCS->Output profile
            delete workimg;
            workimg = ipf.lab2rgb (nprevl, 0, 0, pW, pH, params.icm);
        } catch (char * str) {
            progress ("Error converting file...", 0);
            return;
        }
    }

    if (!resultValid) {
        resultValid = true;

        if (imageListener) {
            imageListener->setImage (previmg, scale, params.crop);
        }
    }

    if (imageListener)
        // TODO: The WB tool should be advertised too in order to get the AutoWB's temp and green values
    {
        imageListener->imageReady (params.crop);
    }

    readyphase++;

    if (hListener) {
        updateLRGBHistograms ();
        hListener->histogramChanged (histRed, histGreen, histBlue, histLuma, histToneCurve, histLCurve, histCCurve, /*histCLurve, histLLCurve,*/ histLCAM, histCCAM, histRedRaw, histGreenRaw, histBlueRaw, histChroma, histLRETI);
    }
}


void ImProcCoordinator::freeAll ()
{

    if (settings->verbose) {
        printf ("freeall starts %d\n", (int)allocated);
    }

    if (allocated) {
        if (orig_prev != oprevi) {
            delete oprevi;
        }

        oprevi    = nullptr;
        delete orig_prev;
        orig_prev = nullptr;
        delete oprevl;
        oprevl    = nullptr;
        delete nprevl;
        nprevl    = nullptr;

        if (ncie) {
            delete ncie;
        }

        ncie      = nullptr;

        if (imageListener) {
            imageListener->delImage (previmg);
        } else {
            delete previmg;
        }

        delete workimg;

        if (shmap) {
            delete shmap;
        }

        shmap = nullptr;

    }

    allocated = false;
}

/** @brief Handles image buffer (re)allocation and trigger sizeChanged of SizeListener[s]
 * If the scale change, this method will free all buffers and reallocate ones of the new size.
 * It will then tell to the SizeListener that size has changed (sizeChanged)
 *
 * @param prevscale New Preview's scale.
 */
void ImProcCoordinator::setScale (int prevscale)
{

    if (settings->verbose) {
        printf ("setscale before lock\n");
    }

    tr = getCoarseBitMask (params.coarse);

    int nW, nH;
    imgsrc->getFullSize (fw, fh, tr);

    prevscale++;

    do {
        prevscale--;
        PreviewProps pp (0, 0, fw, fh, prevscale);
        imgsrc->getSize (pp, nW, nH);
    } while (nH < 400 && prevscale > 1 && (nW * nH < 1000000) ); // sctually hardcoded values, perhaps a better choice is possible

    if (settings->verbose) {
        printf ("setscale starts (%d, %d)\n", nW, nH);
    }

    if (nW != pW || nH != pH) {

        freeAll ();

        pW = nW;
        pH = nH;

        orig_prev = new Imagefloat (pW, pH);
        oprevi = orig_prev;
        oprevl = new LabImage (pW, pH);
        nprevl = new LabImage (pW, pH);
        //  nprevloc = new LabImage (pW, pH);
        //ncie is only used in ImProcCoordinator::updatePreviewImage, it will be allocated on first use and deleted if not used anymore
        previmg = new Image8 (pW, pH);
        workimg = new Image8 (pW, pH);

        if (params.sh.enabled) {
            shmap = new SHMap (pW, pH, true);
        }

        allocated = true;
    }

    scale = prevscale;
    resultValid = false;
    fullw = fw;
    fullh = fh;

    if (settings->verbose) {
        printf ("setscale ends\n");
    }

    if (!sizeListeners.empty())
        for (size_t i = 0; i < sizeListeners.size(); i++) {
            sizeListeners[i]->sizeChanged (fullw, fullh, fw, fh);
        }

    if (settings->verbose) {
        printf ("setscale ends2\n");
    }

}


void ImProcCoordinator::updateLRGBHistograms ()
{

    int x1, y1, x2, y2;
    params.crop.mapToResized (pW, pH, scale, x1, x2, y1, y2);

    #pragma omp parallel sections
    {
        #pragma omp section
        {
            histChroma.clear();

            for (int i = y1; i < y2; i++)
                for (int j = x1; j < x2; j++)
                {
                    histChroma[ (int) (sqrtf (SQR (nprevl->a[i][j]) + SQR (nprevl->b[i][j])) / 188.f)]++; //188 = 48000/256
                }
        }
        #pragma omp section
        {
            histLuma.clear();

            for (int i = y1; i < y2; i++)
                for (int j = x1; j < x2; j++)
                {
                    histLuma[ (int) (nprevl->L[i][j] / 128.f)]++;
                }
        }
        #pragma omp section
        {
            histRed.clear();
            histGreen.clear();
            histBlue.clear();

            for (int i = y1; i < y2; i++)
            {
                int ofs = (i * pW + x1) * 3;

                for (int j = x1; j < x2; j++) {
                    int r = workimg->data[ofs++];
                    int g = workimg->data[ofs++];
                    int b = workimg->data[ofs++];

                    histRed[r]++;
                    histGreen[g]++;
                    histBlue[b]++;
                }
            }
        }
    }

}

void ImProcCoordinator::progress (Glib::ustring str, int pr)
{

    /*  if (plistener) {
        plistener->setProgressStr (str);
        plistener->setProgress ((double)pr / 100.0);
      }*/
}

bool ImProcCoordinator::getAutoWB (double & temp, double & green, double equal)
{

    if (imgsrc) {
        if (lastAwbEqual != equal) {
// Issue 2500            MyMutex::MyLock lock(minit);  // Also used in crop window
            double rm, gm, bm;
            imgsrc->getAutoWBMultipliers (rm, gm, bm);

            if (rm != -1) {
                autoWB.update (rm, gm, bm, equal);
                lastAwbEqual = equal;
            } else {
                lastAwbEqual = -1.;
                autoWB.useDefaults (equal);
            }
        }

        temp = autoWB.getTemp ();
        green = autoWB.getGreen ();
        return true;
    } else {
        //temp = autoWB.getTemp();
        temp = -1.0;
        green = -1.0;
        return false;
    }
}

void ImProcCoordinator::getCamWB (double & temp, double & green)
{

    if (imgsrc) {
        temp = imgsrc->getWB().getTemp ();
        green = imgsrc->getWB().getGreen ();
    }
}

void ImProcCoordinator::getSpotWB (int x, int y, int rect, double & temp, double & tgreen)
{

    ColorTemp ret;

    {
        MyMutex::MyLock lock (mProcessing);
        std::vector<Coord2D> points, red, green, blue;

        for (int i = y - rect; i <= y + rect; i++)
            for (int j = x - rect; j <= x + rect; j++) {
                points.push_back (Coord2D (j, i));
            }

        ipf.transCoord (fw, fh, points, red, green, blue);

        int tr = getCoarseBitMask (params.coarse);

        ret = imgsrc->getSpotWB (red, green, blue, tr, params.wb.equal);
        currWB = ColorTemp (params.wb.temperature, params.wb.green, params.wb.equal, params.wb.method);
        //double rr,gg,bb;
        //currWB.getMultipliers(rr,gg,bb);

    } // end of mutex lockong

    if (ret.getTemp() > 0) {
        temp = ret.getTemp ();
        tgreen = ret.getGreen ();
    } else {
        temp = currWB.getTemp ();
        tgreen = currWB.getGreen ();
    }
}

void ImProcCoordinator::getAutoCrop (double ratio, int &x, int &y, int &w, int &h)
{

    MyMutex::MyLock lock (mProcessing);

    LCPMapper *pLCPMap = nullptr;

    if (params.lensProf.lcpFile.length() && imgsrc->getMetaData()->getFocalLen() > 0) {
        LCPProfile *pLCPProf = lcpStore->getProfile (params.lensProf.lcpFile);

        if (pLCPProf) pLCPMap = new LCPMapper (pLCPProf, imgsrc->getMetaData()->getFocalLen(), imgsrc->getMetaData()->getFocalLen35mm(), imgsrc->getMetaData()->getFocusDist(),
                                                   0, false, params.lensProf.useDist, fullw, fullh, params.coarse, imgsrc->getRotateDegree());
    }

    double fillscale = ipf.getTransformAutoFill (fullw, fullh, pLCPMap);

    if (ratio > 0) {
        w = fullw * fillscale;
        h = w / ratio;

        if (h > fullh * fillscale) {
            h = fullh * fillscale;
            w = h * ratio;
        }
    } else {
        w = fullw * fillscale;
        h = fullh * fillscale;
    }

    x = (fullw - w) / 2;
    y = (fullh - h) / 2;
}

void ImProcCoordinator::setMonitorProfile (const Glib::ustring & profile, RenderingIntent intent)
{
    monitorProfile = profile;
    monitorIntent = intent;
}

void ImProcCoordinator::getMonitorProfile (Glib::ustring & profile, RenderingIntent & intent) const
{
    profile = monitorProfile;
    intent = monitorIntent;
}

void ImProcCoordinator::setSoftProofing (bool softProof, bool gamutCheck)
{
    this->softProof = softProof;
    this->gamutCheck = gamutCheck;
}

void ImProcCoordinator::getSoftProofing (bool & softProof, bool & gamutCheck)
{
    softProof = this->softProof;
    gamutCheck = this->gamutCheck;
}

void ImProcCoordinator::saveInputICCReference (const Glib::ustring & fname, bool apply_wb)
{

    MyMutex::MyLock lock (mProcessing);

    int fW, fH;

    int tr = getCoarseBitMask (params.coarse);

    imgsrc->getFullSize (fW, fH, tr);
    PreviewProps pp (0, 0, fW, fH, 1);
    ProcParams ppar = params;
    ppar.toneCurve.hrenabled = false;
    ppar.icm.input = "(none)";
    Imagefloat* im = new Imagefloat (fW, fH);
    imgsrc->preprocess ( ppar.raw, ppar.lensProf, ppar.coarse );
    imgsrc->demosaic (ppar.raw );
    ColorTemp currWB = ColorTemp (params.wb.temperature, params.wb.green, params.wb.equal, params.wb.method);

    if (params.wb.method == "Camera") {
        currWB = imgsrc->getWB ();
    } else if (params.wb.method == "Auto") {
        if (lastAwbEqual != params.wb.equal) {
            double rm, gm, bm;
            imgsrc->getAutoWBMultipliers (rm, gm, bm);

            if (rm != -1.) {
                autoWB.update (rm, gm, bm, params.wb.equal);
                lastAwbEqual = params.wb.equal;
            } else {
                lastAwbEqual = -1.;
                autoWB.useDefaults (params.wb.equal);
            }
        }

        currWB = autoWB;
    }

    if (!apply_wb) {
        currWB = ColorTemp(); // = no white balance
    }

    imgsrc->getImage (currWB, tr, im, pp, ppar.toneCurve, ppar.icm, ppar.raw);
    ImProcFunctions ipf (&ppar, true);

    if (ipf.needsTransform()) {
        Imagefloat* trImg = new Imagefloat (fW, fH);
        ipf.transform (im, trImg, 0, 0, 0, 0, fW, fH, fW, fH, imgsrc->getMetaData()->getFocalLen(), imgsrc->getMetaData()->getFocalLen35mm(),
                       imgsrc->getMetaData()->getFocusDist(), imgsrc->getRotateDegree(), true);
        delete im;
        im = trImg;
    }

    if (params.crop.enabled) {
        Imagefloat *tmpim = new Imagefloat (params.crop.w, params.crop.h);
        int cx = params.crop.x;
        int cy = params.crop.y;
        int cw = params.crop.w;
        int ch = params.crop.h;
        #pragma omp parallel for

        for (int i = cy; i < cy + ch; i++) {
            for (int j = cx; j < cx + cw; j++) {
                tmpim->r (i - cy, j - cx) = im->r (i, j);
                tmpim->g (i - cy, j - cx) = im->g (i, j);
                tmpim->b (i - cy, j - cx) = im->b (i, j);
            }
        }

        delete im;
        im = tmpim;
    }

    // image may contain out of range samples, clip them to avoid wrap-arounds
    #pragma omp parallel for

    for (int i = 0; i < im->height; i++) {
        for (int j = 0; j < im->width; j++) {
            im->r (i, j) = CLIP (im->r (i, j));
            im->g (i, j) = CLIP (im->g (i, j));
            im->b (i, j) = CLIP (im->b (i, j));
        }
    }

    Image16* im16 = im->to16();
    delete im;

    int imw, imh;
    double tmpScale = ipf.resizeScale (&params, fW, fH, imw, imh);

    if (tmpScale != 1.0) {
        Image16* tempImage = new Image16 (imw, imh);
        ipf.resize (im16, tempImage, tmpScale);
        delete im16;
        im16 = tempImage;
    }

    im16->saveTIFF (fname, 16, true);
    delete im16;

    if (plistener) {
        plistener->setProgressState (false);
    }

    //im->saveJPEG (fname, 85);
}

void ImProcCoordinator::stopProcessing ()
{

    updaterThreadStart.lock ();

    if (updaterRunning && thread) {
        changeSinceLast = 0;
        thread->join ();
    }

    updaterThreadStart.unlock ();
}

void ImProcCoordinator::startProcessing ()
{

#undef THREAD_PRIORITY_NORMAL

    if (!destroying) {
        if (!updaterRunning) {
            updaterThreadStart.lock ();
            thread = nullptr;
            updaterRunning = true;
            updaterThreadStart.unlock ();

            //batchThread->yield(); //the running batch should wait other threads to avoid conflict

            thread = Glib::Thread::create (sigc::mem_fun (*this, &ImProcCoordinator::process), 0, true, true, Glib::THREAD_PRIORITY_NORMAL);

        }
    }
}

void ImProcCoordinator::startProcessing (int changeCode)
{
    paramsUpdateMutex.lock();
    changeSinceLast |= changeCode;
    paramsUpdateMutex.unlock();

    startProcessing ();
}

void ImProcCoordinator::process ()
{
    if (plistener) {
        plistener->setProgressState (true);
    }

    paramsUpdateMutex.lock ();

    while (changeSinceLast) {
        params = nextParams;
        int change = changeSinceLast;
        changeSinceLast = 0;
        paramsUpdateMutex.unlock ();

        // M_VOID means no update, and is a bit higher that the rest
        if (change & (M_VOID - 1)) {
            updatePreviewImage (change);
        }

        paramsUpdateMutex.lock ();
    }

    paramsUpdateMutex.unlock ();
    updaterRunning = false;

    if (plistener) {
        plistener->setProgressState (false);
    }
}

ProcParams* ImProcCoordinator::beginUpdateParams ()
{
    paramsUpdateMutex.lock ();

    return &nextParams;
}

void ImProcCoordinator::endUpdateParams (ProcEvent change)
{
    endUpdateParams ( refreshmap[ (int)change] );
}

void ImProcCoordinator::endUpdateParams (int changeFlags)
{
    changeSinceLast |= changeFlags;

    paramsUpdateMutex.unlock ();
    startProcessing ();
}


}