#include "PocketVerbs.h"
#include <iostream>
#include <lv2wrapper.h>

PocketVerbs::PocketVerbs(double rate)
    : LV2Plugin(rate)
{
}

void PocketVerbs::activate()
{
	A = 0.0;
	B = 0.5;
	C = 0.0;
	D = 0.5;
	
	for(count = 0; count < 6; count++) {dAL[count] = 0.0; dBL[count] = 0.0; dCL[count] = 0.0; dDL[count] = 0.0; dEL[count] = 0.0;
		dFL[count] = 0.0; dGL[count] = 0.0; dHL[count] = 0.0; dIL[count] = 0.0; dJL[count] = 0.0; dKL[count] = 0.0; dLL[count] = 0.0;
		dML[count] = 0.0; dNL[count] = 0.0; dOL[count] = 0.0; dPL[count] = 0.0; dQL[count] = 0.0; dRL[count] = 0.0; dSL[count] = 0.0;
		dTL[count] = 0.0; dUL[count] = 0.0; dVL[count] = 0.0; dWL[count] = 0.0; dXL[count] = 0.0; dYL[count] = 0.0; dZL[count] = 0.0;}
	
	for(count = 0; count < 15149; count++) {aAL[count] = 0.0;}
	for(count = 0; count < 15149; count++) {oAL[count] = 0.0;}
	for(count = 0; count < 14617; count++) {aBL[count] = 0.0;}
	for(count = 0; count < 14617; count++) {oBL[count] = 0.0;}
	for(count = 0; count < 14357; count++) {aCL[count] = 0.0;}
	for(count = 0; count < 14357; count++) {oCL[count] = 0.0;}
	for(count = 0; count < 13817; count++) {aDL[count] = 0.0;}
	for(count = 0; count < 13817; count++) {oDL[count] = 0.0;}
	for(count = 0; count < 13561; count++) {aEL[count] = 0.0;}
	for(count = 0; count < 13561; count++) {oEL[count] = 0.0;}
	for(count = 0; count < 13045; count++) {aFL[count] = 0.0;}
	for(count = 0; count < 13045; count++) {oFL[count] = 0.0;}
	for(count = 0; count < 11965; count++) {aGL[count] = 0.0;}
	for(count = 0; count < 11965; count++) {oGL[count] = 0.0;}
	for(count = 0; count < 11129; count++) {aHL[count] = 0.0;}
	for(count = 0; count < 11129; count++) {oHL[count] = 0.0;}
	for(count = 0; count < 10597; count++) {aIL[count] = 0.0;}
	for(count = 0; count < 10597; count++) {oIL[count] = 0.0;}
	for(count = 0; count < 9809; count++) {aJL[count] = 0.0;}
	for(count = 0; count < 9809; count++) {oJL[count] = 0.0;}
	for(count = 0; count < 9521; count++) {aKL[count] = 0.0;}
	for(count = 0; count < 9521; count++) {oKL[count] = 0.0;}
	for(count = 0; count < 8981; count++) {aLL[count] = 0.0;}
	for(count = 0; count < 8981; count++) {oLL[count] = 0.0;}
	for(count = 0; count < 8785; count++) {aML[count] = 0.0;}
	for(count = 0; count < 8785; count++) {oML[count] = 0.0;}
	for(count = 0; count < 8461; count++) {aNL[count] = 0.0;}
	for(count = 0; count < 8461; count++) {oNL[count] = 0.0;}
	for(count = 0; count < 8309; count++) {aOL[count] = 0.0;}
	for(count = 0; count < 8309; count++) {oOL[count] = 0.0;}
	for(count = 0; count < 7981; count++) {aPL[count] = 0.0;}
	for(count = 0; count < 7981; count++) {oPL[count] = 0.0;}
	for(count = 0; count < 7321; count++) {aQL[count] = 0.0;}
	for(count = 0; count < 7321; count++) {oQL[count] = 0.0;}
	for(count = 0; count < 6817; count++) {aRL[count] = 0.0;}
	for(count = 0; count < 6817; count++) {oRL[count] = 0.0;}
	for(count = 0; count < 6505; count++) {aSL[count] = 0.0;}
	for(count = 0; count < 6505; count++) {oSL[count] = 0.0;}
	for(count = 0; count < 6001; count++) {aTL[count] = 0.0;}
	for(count = 0; count < 6001; count++) {oTL[count] = 0.0;}
	for(count = 0; count < 5837; count++) {aUL[count] = 0.0;}
	for(count = 0; count < 5837; count++) {oUL[count] = 0.0;}
	for(count = 0; count < 5501; count++) {aVL[count] = 0.0;}
	for(count = 0; count < 5501; count++) {oVL[count] = 0.0;}
	for(count = 0; count < 5009; count++) {aWL[count] = 0.0;}
	for(count = 0; count < 5009; count++) {oWL[count] = 0.0;}
	for(count = 0; count < 4849; count++) {aXL[count] = 0.0;}
	for(count = 0; count < 4849; count++) {oXL[count] = 0.0;}
	for(count = 0; count < 4295; count++) {aYL[count] = 0.0;}
	for(count = 0; count < 4295; count++) {oYL[count] = 0.0;}
	for(count = 0; count < 4179; count++) {aZL[count] = 0.0;}	
	for(count = 0; count < 4179; count++) {oZL[count] = 0.0;}
	
	for(count = 0; count < 6; count++) {dAR[count] = 0.0; dBR[count] = 0.0; dCR[count] = 0.0; dDR[count] = 0.0; dER[count] = 0.0;
		dFR[count] = 0.0; dGR[count] = 0.0; dHR[count] = 0.0; dIR[count] = 0.0; dJR[count] = 0.0; dKR[count] = 0.0; dLR[count] = 0.0;
		dMR[count] = 0.0; dNR[count] = 0.0; dOR[count] = 0.0; dPR[count] = 0.0; dQR[count] = 0.0; dRR[count] = 0.0; dSR[count] = 0.0;
		dTR[count] = 0.0; dUR[count] = 0.0; dVR[count] = 0.0; dWR[count] = 0.0; dXR[count] = 0.0; dYR[count] = 0.0; dZR[count] = 0.0;}
	
	for(count = 0; count < 15149; count++) {aAR[count] = 0.0;}
	for(count = 0; count < 15149; count++) {oAR[count] = 0.0;}
	for(count = 0; count < 14617; count++) {aBR[count] = 0.0;}
	for(count = 0; count < 14617; count++) {oBR[count] = 0.0;}
	for(count = 0; count < 14357; count++) {aCR[count] = 0.0;}
	for(count = 0; count < 14357; count++) {oCR[count] = 0.0;}
	for(count = 0; count < 13817; count++) {aDR[count] = 0.0;}
	for(count = 0; count < 13817; count++) {oDR[count] = 0.0;}
	for(count = 0; count < 13561; count++) {aER[count] = 0.0;}
	for(count = 0; count < 13561; count++) {oER[count] = 0.0;}
	for(count = 0; count < 13045; count++) {aFR[count] = 0.0;}
	for(count = 0; count < 13045; count++) {oFR[count] = 0.0;}
	for(count = 0; count < 11965; count++) {aGR[count] = 0.0;}
	for(count = 0; count < 11965; count++) {oGR[count] = 0.0;}
	for(count = 0; count < 11129; count++) {aHR[count] = 0.0;}
	for(count = 0; count < 11129; count++) {oHR[count] = 0.0;}
	for(count = 0; count < 10597; count++) {aIR[count] = 0.0;}
	for(count = 0; count < 10597; count++) {oIR[count] = 0.0;}
	for(count = 0; count < 9809; count++) {aJR[count] = 0.0;}
	for(count = 0; count < 9809; count++) {oJR[count] = 0.0;}
	for(count = 0; count < 9521; count++) {aKR[count] = 0.0;}
	for(count = 0; count < 9521; count++) {oKR[count] = 0.0;}
	for(count = 0; count < 8981; count++) {aLR[count] = 0.0;}
	for(count = 0; count < 8981; count++) {oLR[count] = 0.0;}
	for(count = 0; count < 8785; count++) {aMR[count] = 0.0;}
	for(count = 0; count < 8785; count++) {oMR[count] = 0.0;}
	for(count = 0; count < 8461; count++) {aNR[count] = 0.0;}
	for(count = 0; count < 8461; count++) {oNR[count] = 0.0;}
	for(count = 0; count < 8309; count++) {aOR[count] = 0.0;}
	for(count = 0; count < 8309; count++) {oOR[count] = 0.0;}
	for(count = 0; count < 7981; count++) {aPR[count] = 0.0;}
	for(count = 0; count < 7981; count++) {oPR[count] = 0.0;}
	for(count = 0; count < 7321; count++) {aQR[count] = 0.0;}
	for(count = 0; count < 7321; count++) {oQR[count] = 0.0;}
	for(count = 0; count < 6817; count++) {aRR[count] = 0.0;}
	for(count = 0; count < 6817; count++) {oRR[count] = 0.0;}
	for(count = 0; count < 6505; count++) {aSR[count] = 0.0;}
	for(count = 0; count < 6505; count++) {oSR[count] = 0.0;}
	for(count = 0; count < 6001; count++) {aTR[count] = 0.0;}
	for(count = 0; count < 6001; count++) {oTR[count] = 0.0;}
	for(count = 0; count < 5837; count++) {aUR[count] = 0.0;}
	for(count = 0; count < 5837; count++) {oUR[count] = 0.0;}
	for(count = 0; count < 5501; count++) {aVR[count] = 0.0;}
	for(count = 0; count < 5501; count++) {oVR[count] = 0.0;}
	for(count = 0; count < 5009; count++) {aWR[count] = 0.0;}
	for(count = 0; count < 5009; count++) {oWR[count] = 0.0;}
	for(count = 0; count < 4849; count++) {aXR[count] = 0.0;}
	for(count = 0; count < 4849; count++) {oXR[count] = 0.0;}
	for(count = 0; count < 4295; count++) {aYR[count] = 0.0;}
	for(count = 0; count < 4295; count++) {oYR[count] = 0.0;}
	for(count = 0; count < 4179; count++) {aZR[count] = 0.0;}	
	for(count = 0; count < 4179; count++) {oZR[count] = 0.0;}
	
	outAL = 1; alpAL = 1;
	outBL = 1; alpBL = 1;
	outCL = 1; alpCL = 1;
	outDL = 1; alpDL = 1;
	outEL = 1; alpEL = 1;
	outFL = 1; alpFL = 1;
	outGL = 1; alpGL = 1;
	outHL = 1; alpHL = 1;
	outIL = 1; alpIL = 1;
	outJL = 1; alpJL = 1;
	outKL = 1; alpKL = 1;
	outLL = 1; alpLL = 1;
	outML = 1; alpML = 1;
	outNL = 1; alpNL = 1;
	outOL = 1; alpOL = 1;
	outPL = 1; alpPL = 1;
	outQL = 1; alpQL = 1;
	outRL = 1; alpRL = 1;
	outSL = 1; alpSL = 1;
	outTL = 1; alpTL = 1;
	outUL = 1; alpUL = 1;
	outVL = 1; alpVL = 1;
	outWL = 1; alpWL = 1;
	outXL = 1; alpXL = 1;
	outYL = 1; alpYL = 1;
	outZL = 1; alpZL = 1;
	
	outAR = 1; alpAR = 1; delayA = 4; maxdelayA = 7573;
	outBR = 1; alpBR = 1; delayB = 4; maxdelayB = 7307;
	outCR = 1; alpCR = 1; delayC = 4; maxdelayC = 7177;
	outDR = 1; alpDR = 1; delayD = 4; maxdelayD = 6907;
	outER = 1; alpER = 1; delayE = 4; maxdelayE = 6779;
	outFR = 1; alpFR = 1; delayF = 4; maxdelayF = 6521;
	outGR = 1; alpGR = 1; delayG = 4; maxdelayG = 5981;
	outHR = 1; alpHR = 1; delayH = 4; maxdelayH = 5563;
	outIR = 1; alpIR = 1; delayI = 4; maxdelayI = 5297;
	outJR = 1; alpJR = 1; delayJ = 4; maxdelayJ = 4903;
	outKR = 1; alpKR = 1; delayK = 4; maxdelayK = 4759;
	outLR = 1; alpLR = 1; delayL = 4; maxdelayL = 4489;
	outMR = 1; alpMR = 1; delayM = 4; maxdelayM = 4391;
	outNR = 1; alpNR = 1; delayN = 4; maxdelayN = 4229;
	outOR = 1; alpOR = 1; delayO = 4; maxdelayO = 4153;
	outPR = 1; alpPR = 1; delayP = 4; maxdelayP = 3989;
	outQR = 1; alpQR = 1; delayQ = 4; maxdelayQ = 3659;
	outRR = 1; alpRR = 1; delayR = 4; maxdelayR = 3407;
	outSR = 1; alpSR = 1; delayS = 4; maxdelayS = 3251;
	outTR = 1; alpTR = 1; delayT = 4; maxdelayT = 2999;
	outUR = 1; alpUR = 1; delayU = 4; maxdelayU = 2917;
	outVR = 1; alpVR = 1; delayV = 4; maxdelayV = 2749;
	outWR = 1; alpWR = 1; delayW = 4; maxdelayW = 2503;
	outXR = 1; alpXR = 1; delayX = 4; maxdelayX = 2423;
	outYR = 1; alpYR = 1; delayY = 4; maxdelayY = 2146;
	outZR = 1; alpZR = 1; delayZ = 4; maxdelayZ = 2088;
	
	savedRoomsize = -1.0; //force update to begin
	countdown = -1;
	peakL = 1.0;
	peakR = 1.0;
	fpd = 17;
	//this is reset: values being initialized only once. Startup values, whatever they are.
	
}

void PocketVerbs::run(uint32_t num_samples)
{
    A = *params[0];
    B = *params[1];
    C = *params[2];
    D = *params[3];

    processReplacing(const_cast<float **>(in), out, num_samples);
}

//
// Include the processing code from the VST version.
//
#include <cmath>
#include "../../../LinuxVST/src/PocketVerbs/PocketVerbsProc.cpp"

// Create the LV2Wrapper and register the plugin
LV2Wrapper<PocketVerbs> plugin;