package dk.daoas.adressevedligehold.afstandandenrute;

import java.sql.Connection;
import java.util.HashMap;
import java.util.List;
import java.util.Map;
import java.util.Queue;
import java.util.Set;
import java.util.concurrent.CyclicBarrier;
import java.util.concurrent.Executors;
import java.util.concurrent.ThreadFactory;
import java.util.concurrent.ThreadPoolExecutor;
import java.util.concurrent.atomic.AtomicInteger;
import java.util.logging.FileHandler;
import java.util.logging.Logger;
import java.util.logging.SimpleFormatter;

import ags.utils.dataStructures.trees.thirdGenKD.KdTree;
import dk.daoas.adressevedligehold.ServiceConfig;
import dk.daoas.adressevedligehold.beans.Address;
import dk.daoas.adressevedligehold.db.DBConnection;
import dk.daoas.adressevedligehold.tasks.Task;
import dk.daoas.adressevedligehold.util.HttpUtil;



public class AfstandAndenRuteTask extends Task {

	final Logger logger = Logger.getLogger( AfstandAndenRuteTask.class.toString() );

	final boolean verbose = false;//


	static boolean test_mode;


	String distributor;
	int antalIkkeDaekkede = -1;
	
	AtomicInteger antalBeregnet = new AtomicInteger();



	ThreadPoolExecutor threadPool;



	public AfstandAndenRuteTask(String distributor) {
		this.distributor = distributor;
	}


	@Override
	protected void taskRun() throws Exception {




		//Setup j.u.l Logger
		//Logger root = Logger.getLogger("");
		//FileHandler fhandler = new FileHandler("fulddaekning.log"); // Ingen max størrelse, ingen rotation og ingen append
		//fhandler.setFormatter( new SimpleFormatter() );
		//root.addHandler( fhandler );



		Constants.init(distributor);
		Constants consts = Constants.getInstance();

		int max_workers = ServiceConfig.getInstance().maxWorkers;	 
		if (max_workers <= 0) {	 
			logger.info("!!! AUTO-DETECT MAX_WORKERS !!!");	 
			int cores = Runtime.getRuntime().availableProcessors();	 
			cores -= 1;//Efterlad 1 core/cpu i reserve til systemet	 

			max_workers = Math.max(1, cores); //Dog skal der som minimum være 1 core til beregning	 

		}	 
		if (test_mode) {
			max_workers = 1;
		}
		logger.info("Starting with MAX_WORKERS:" + max_workers);	 
		setupThreadPool(max_workers);



		try (Connection conn = DBConnection.getConnection() ) {
			Database db = new Database(conn);

			Queue<Address> ikkeDaekkede = db.hentAlleIkkedaekkedeAdresser(consts.getMinPostnr(), consts.getMaxPostnr() );
			antalIkkeDaekkede = ikkeDaekkede.size();
			logger.info("Antal ikke-daekkede: " + antalIkkeDaekkede );


			boolean testRun= false;

			AtomicInteger antalFundne = new AtomicInteger(0);

			long beregnStart =0;
			long start = System.currentTimeMillis();
			int antalDaekkedeAdresser = -1;

			if (testRun == false) {

				logger.info("Finder postnumre");
				Set<Short> postnumre = db.hentPostnumreCache();

				// Først validerer vi BBox på alle postnummre, for at undgå fuldt stop midt i beregningen
				for(short postnr : postnumre) { //
					logger.info("Validerer BBox for " + postnr);
					BoundingBox bbox = db.getBoundingbox(postnr);
					bbox.validateBbox();
				}


				logger.info("Henter alle daekkede adresser");
				antalDaekkedeAdresser = db.hentAlleDaekkedeAdresser(distributor);
				logger.info( "AlleDaekkedeAdresser.length=" + antalDaekkedeAdresser );

				Map<Short, List<Address>> addrHoList = db.getDaekkedeAdresserHO();

				Map<Short, KdTree<Address>> hoTrees = new HashMap<Short,KdTree<Address>>();

				for ( Map.Entry<Short, List<Address>> entry : addrHoList.entrySet() ) {
					short ho = entry.getKey();
					List<Address> geopoints = entry.getValue();

					logger.info("Opbygger KDTree for " + ho + " - antal=" + geopoints.size() );

					int bucketSize = 96*12;

					KdTree<Address> addressTree = new KdTree<Address>( 3, bucketSize );
					for(Address a: geopoints) {
						addressTree.addPoint(a.xyz, a);
					}

					hoTrees.put(ho, addressTree);				
				}

				db.resetResultTable();

				beregnStart = System.currentTimeMillis();
				logger.info("Starter beregning");

				//pre-check er ok - reset tmp tabel og start søgningen

				CyclicBarrier barrier = new CyclicBarrier(max_workers + 1);

				for (int i=0; i<max_workers; i++) {
					LookupWorker worker = new LookupWorker(i, this, barrier, ikkeDaekkede, hoTrees,antalFundne,antalBeregnet,db,verbose,consts);
					threadPool.submit( worker );
				}

				barrier.await(); // Afvent at workerne bliver færdige

				logger.info("Calc is done - cleaning up remaining bits");

				threadPool.shutdown(); //Calc is done now


				db.saveBatch();

				if (test_mode == false && this.isAborted() == false) {
					db.renameResultTables();

					String trigger_url = ServiceConfig.getInstance().trigger_url;

					logger.info("Calling trigger URL");
					String url = trigger_url + "&trigger=AfstandAndenRute/" + distributor;

					HttpUtil.getContentString(url, 500);

				} else {
					logger.info( "Rename tables is disabled !!!" );
				}



			} else {
				/// Test
				/*
				db.resetResultTable();


				alleDaekkedeAdresser = db.hentAlleDaekkedeAdresser();
				logger.info( "AlleDaekkedeAdresser.length=" + alleDaekkedeAdresser.size());

				short post = (short) 2700;			
				Lookup lookup = new Lookup(post, db, threadPool);
				lookup.doLookup();*/								
			}


			long now = System.currentTimeMillis();
			long elapsed = now - start ;
			long elapsedBeregn = now - beregnStart;


			logger.info("Fuld load done : " + formatMilliSeconds(elapsed) );
			logger.info("Fuld load done (beregning) : " + formatMilliSeconds(elapsedBeregn) );
			logger.info("Antal daekkede : " + antalDaekkedeAdresser );
			logger.info("Antal ikke-daekkede : " + antalIkkeDaekkede );
			logger.info("Heraf, antal fundne : " + antalFundne );

			logger.info( String.format("Fandt adresser til : %.2f %%", (antalFundne.get() *100.0)/antalIkkeDaekkede ) );
			//logger.info("Fandt adresser til : " + (antalFundne*100.0)/ikkeDaekkede.length + "%" );

		}
	}



	static String formatMilliSeconds(long milliseconds) {
		int mseconds = (int) milliseconds % 1000;
		int seconds = (int) (milliseconds / 1000) % 60 ;
		int minutes = (int) ((milliseconds / (1000*60)) % 60);
		int hours   = (int) ((milliseconds / (1000*60*60)) % 24);

		return String.format("%02d:%02d:%02d.%03d", hours, minutes, seconds, mseconds);
	}

	private void setupThreadPool(int max_workers) {	 
		threadPool = (ThreadPoolExecutor) Executors.newFixedThreadPool(max_workers, new WorkerThreadFactory() );	 
	}

	static class WorkerThreadFactory implements ThreadFactory {	 
		int count = 0;	 

		@Override	 
		public Thread newThread(Runnable r) {	 
			return new Thread(r, "lookupWorker/" + count++);	 
		}
	}






	@Override
	public String getDescription() {
		return "Afstand anden rute/" + distributor;
	}



	@Override
	public String getDetail() {
		// TODO Auto-generated method stub
		return "";
	}



	@Override
	public double getPercentCompleted() {
		return (antalBeregnet.get() / ((float)antalIkkeDaekkede)) * 100.0;
	}
}