package dk.daoas.adressevedligehold.afstandandenrute;

import java.io.IOException;
import java.sql.Connection;
import java.sql.PreparedStatement;
import java.sql.ResultSet;
import java.sql.SQLException;
import java.sql.Statement;
import java.util.ArrayList;
import java.util.HashMap;
import java.util.List;
import java.util.Map;
import java.util.Queue;
import java.util.Set;
import java.util.TreeSet;
import java.util.concurrent.ConcurrentLinkedQueue;
import java.util.logging.Logger;

import dk.daoas.adressevedligehold.beans.Address;
import dk.daoas.adressevedligehold.util.DeduplicateHelper;



public class Database {	
	Logger logger = Logger.getLogger(Database.class.getName());

	int batchCount = 0;

	Connection conn;
	PreparedStatement saveStmt;
	
	List<Address> alleAddressr;
	Address alleIkkeDaekkede[];
	
	Map<Short,List<Address>> daekkedeAddressrHO = new HashMap<Short,List<Address>>();
	
	
	
	

	DeduplicateHelper<String> vejnavnCache = new DeduplicateHelper<String>();
	DeduplicateHelper<String> husnrbogstavCache = new DeduplicateHelper<String>();
	DeduplicateHelper<String> ruteCache = new DeduplicateHelper<String>(); 
	
	Set<Short> postnumre = new TreeSet<Short>();
	
	//Map<Short, List<Address>> ikkeDaekkedePrPost = new HashMap<Short, List<Address>>(); 
	
	
	private HashMap<Short,BoundingBox> bbCache = new HashMap<Short,BoundingBox>();

	public Database(Connection conn)  throws SQLException,IOException {
		this.conn = conn;

		String sql = "INSERT INTO fulddaekning.afstand_anden_rute_ny (orgId,orgPostnr, orgAddress,orgGadeid,orgHusnr,orgHusnrBogstav,orgRute,id,postnr,Address,gadeid,husnr,husnrbogstav,rute,afstand,`timestamp`) "+
				"VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?, now() )";

		saveStmt = conn.prepareStatement(sql);		

	}

	public void resetResultTable() throws SQLException {
		try (Statement stmt = conn.createStatement()) {
			logger.info("Dropping old result table (if exists)");
			String sql = "DROP TABLE IF EXISTS fulddaekning.afstand_anden_rute_ny";
			stmt.executeUpdate(sql);
			
			logger.info("Create new result table");
			sql = "CREATE TABLE fulddaekning.afstand_anden_rute_ny LIKE fulddaekning.afstand_anden_rute";
			stmt.executeUpdate(sql);		
			
		}
	}	
	
	public void renameResultTables() throws SQLException {
		if (AfstandAndenRuteTask.test_mode == true) {
			throw new RuntimeException("Can not rename tables in test mode");
		}
		
		Constants consts = Constants.getInstance();
		
		try (Statement stmt = conn.createStatement()) {
			
			String ext = consts.getTableExtension();
			
			logger.info("Dropping old backup table (if exists)");
			String sql = "DROP TABLE IF EXISTS fulddaekning.afstand_anden_rute_old" + ext;
			stmt.executeUpdate(sql);
			
			logger.info("Rename tables");
			String sql2 = "RENAME TABLE fulddaekning.afstand_anden_rute" + ext + " TO fulddaekning.afstand_anden_rute_old" + ext + ", fulddaekning.afstand_anden_rute_ny TO fulddaekning.afstand_anden_rute" + ext;

			logger.info("Executing: " + sql2);
			stmt.executeUpdate(sql2);			
		}

		
	}
	
	public BoundingBox getBoundingbox(short postnr)  {
		BoundingBox bb = bbCache.get(postnr);
		return bb.clone();//never return the original / cached object
	}
	
	
	public Set<Short> hentPostnumreCache() {
		return postnumre;
	}


	public Queue<Address> hentAlleIkkedaekkedeAdresser(int minPostnr, int maxPostnr)  throws SQLException {
		
		logger.info("Henter alle IKKE-daekkede Addressr");

		String sql = "SELECT id,a.postnr,vejnavn,gadeid,husnr,husnrbogstav,latitude,longitude,ruteMa,p.distributor as ho " + 
				"FROM fulddaekning.Addresstabel a " +
				"LEFT JOIN bogleveringer.postnummerdistributor p on (a.postnr=p.postnr) " +
				"WHERE ruteMa IS NULL " +  //Ingen dækning
				"AND a.postnr BETWEEN ? AND ? " +
				"AND latitude IS NOT NULL " +
				"AND longitude IS NOT NULL " +
				"AND gadeid IS NOT NULL " +
				"AND (a.distributor IS NULL OR a.distributor<>'LUKKET') " 
				;		
		
		if (AfstandAndenRuteTask.test_mode == true) {
			sql = sql + " LIMIT 100 ";
		}
		
		try (PreparedStatement stmt = conn.prepareStatement(sql)) {
			
		
			stmt.setInt(1, minPostnr);
			stmt.setInt(2, maxPostnr);
	
			List<Address> list = hentAdresseListe( stmt );
			alleIkkeDaekkede = list.toArray( new Address[ list.size() ] );
			
			logger.info("Analyserer ikke-daekkede Addressr");
			
			for (Address a : alleIkkeDaekkede) {
				
				
				BoundingBox bbox;
				
				if (! postnumre.contains(a.postnr )) {
					postnumre.add( a.postnr );
					
					bbox = new BoundingBox(); 
					
					bbCache.put( a.postnr, bbox);											
					
				} else {
					 bbox = bbCache.get( a.postnr);
				}
				
				bbox.latitudeMax = Math.max(bbox.latitudeMax, a.latitude);
				bbox.latitudeMin = Math.min(bbox.latitudeMin, a.latitude);
				bbox.longitudeMax = Math.max(bbox.longitudeMax, a.longitude);
				bbox.longitudeMin = Math.min(bbox.longitudeMin, a.longitude);
				
				
			}
			return new ConcurrentLinkedQueue<Address>( list );
		}
	}
	

	
	
	public Map<Short, List<Address>> getDaekkedeAdresserHO() {
		return daekkedeAddressrHO;
	}
	
	public int hentAlleDaekkedeAdresser(String distributor) throws SQLException {
		
		if ( alleAddressr == null ) {
			String sql = "SELECT id,a.postnr,vejnavn,gadeid,husnr,husnrbogstav,latitude,longitude,ruteMa,p.distributor as ho " + 
					"FROM fulddaekning.Addresstabel a " +
					"LEFT JOIN bogleveringer.postnummerdistributor p on (a.postnr=p.postnr) " +
					"WHERE ruteMa IS NOT NULL " + 
					"AND latitude IS NOT NULL " +
					"AND longitude IS NOT NULL " +
					"AND a.distributor = ? ";

			if (AfstandAndenRuteTask.test_mode == true) {
				sql = sql + " AND a.postnr BETWEEN 6000 and 7200 ";
			}
	
			// Forward only + concur_read_only + fetchsize tvinger driver til at hente en række af gangen (bedre performance ved store result sets)
			// Se http://dev.mysql.com/doc/connector-j/en/connector-j-reference-implementation-notes.html
			
			try (PreparedStatement stmt = conn.prepareStatement(sql, java.sql.ResultSet.TYPE_FORWARD_ONLY, java.sql.ResultSet.CONCUR_READ_ONLY)) {
				stmt.setFetchSize(Integer.MIN_VALUE);
		
				stmt.setString(1, distributor);
		
				List<Address> list = hentAdresseListe( stmt );
				
				alleAddressr = new ArrayList<Address>();
				alleAddressr.addAll(list);
				
				for(Address addr : list) {
					short ho = addr.ho;
					List<Address> hoListe = daekkedeAddressrHO.get(ho);
					if ( hoListe == null) {
						hoListe = new ArrayList<Address>();
						daekkedeAddressrHO.put(ho, hoListe);					
					}
					
					hoListe.add(addr);								
					
				}
			}
		}
		
		return alleAddressr.size();
		
	}
	
	

	public synchronized void gemResultat(Address orgAddress, Address bedsteAddress, double bedsteAfstand) throws SQLException {
		/*String sql = "INSERT INTO fulddaekning.afstand_anden_rute_thn (orgId,orgPostnr, orgVejnavn,orgGadeid,orgHusnr,orgHusnrBogstav,orgLatitude,orgLongitude,orgRute,id,postnr,vejnavn,gadeid,husnr,husnrbogstav,latitude,longitude,rute,afstand,`timestamp`) "+
				"VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?, now() )";


		PreparedStatement saveStmt = conn.prepareStatement(sql);*/

		saveStmt.setInt(1, orgAddress.id);
		saveStmt.setShort(2, orgAddress.postnr);
		saveStmt.setString(3, orgAddress.vejnavn);
		saveStmt.setInt(4, orgAddress.gadeid);
		saveStmt.setShort(5, orgAddress.husnr);
		saveStmt.setString(6, orgAddress.husnrbogstav);
		saveStmt.setString(7, orgAddress.ruteMandag);


		saveStmt.setInt(8, bedsteAddress.id);
		saveStmt.setShort(9, bedsteAddress.postnr);
		saveStmt.setString(10, bedsteAddress.vejnavn);
		saveStmt.setInt(11, bedsteAddress.gadeid);
		saveStmt.setShort(12, bedsteAddress.husnr);
		saveStmt.setString(13, bedsteAddress.husnrbogstav);
		saveStmt.setString(14, bedsteAddress.ruteMandag);

		saveStmt.setDouble(15, bedsteAfstand);

		saveStmt.addBatch();
		batchCount++;
		if (batchCount >= 1000) {
			saveStmt.executeBatch();
			batchCount = 0;
		}
		//saveStmt.executeUpdate();	
		//saveStmt.clearParameters();

		//saveStmt.close();	
	}
	
	public synchronized void saveBatch() throws SQLException{
		saveStmt.executeBatch();
		batchCount = 0;
	}



	protected ArrayList<Address> hentAdresseListe(PreparedStatement stmt) throws SQLException{
		ArrayList<Address> list = new ArrayList<Address>( 1000000 );
		
		Constants consts = Constants.getInstance();

		//logger.info("Starting query");
		ResultSet res = stmt.executeQuery();
		//logger.info("Starting exec query done");

		while (res.next()) {
			
			double latitude = res.getDouble(7);
			double longitude = res.getDouble(8);

			
			Address adr = new Address(latitude,longitude);

			adr.id = res.getInt(1);
			adr.postnr = res.getShort(2);
			adr.vejnavn = vejnavnCache.getInstance( res.getString(3) );
			adr.gadeid = res.getInt(4);
			adr.husnr = res.getShort(5);
			adr.husnrbogstav = husnrbogstavCache.getInstance( res.getString(6) );
			//adr.latitude = res.getDouble(7);
			//adr.longitude = res.getDouble(8);
			adr.ruteMandag =  ruteCache.getInstance( res.getString(9) );
			adr.ho = res.getShort(10);

			list.add(adr);

			if (consts.doCheckHO() == true && adr.ho == 0) {
				System.out.println( "Mangler HO" );
				System.out.println( adr );
				System.exit(0);
			}

			//logger.info( "Adress:" + adr);
		}

		res.close();
		stmt.close();

		return list;
	}
		
}