package dk.thoerup.traininfoservice.banedk;



import java.net.URL;
import java.sql.SQLException;
import java.util.ArrayList;
import java.util.List;
import java.util.Map;
import java.util.logging.Level;
import java.util.logging.Logger;

import org.jsoup.nodes.Document;
import org.jsoup.nodes.Element;
import org.jsoup.select.Elements;

import dk.thoerup.circuitbreaker.CircuitBreaker;
import dk.thoerup.circuitbreaker.CircuitBreakerManager;
import dk.thoerup.traininfoservice.StationDAO;
import dk.thoerup.traininfoservice.Statistics;

public class TimetableFetcher {

		
	Map<String, List<TimetableBean>> cache; 
	Map<String, Integer> stationCache;

	StationDAO stationDao = new StationDAO();
	
	
	Logger logger = Logger.getLogger(TimetableFetcher.class.getName());
	
	private boolean useTempSite;
	
	public TimetableFetcher(boolean tmpSite, int cacheTimeout) {
		useTempSite = tmpSite;
		
		cache = new TimeoutMap<String,List<TimetableBean>>(cacheTimeout);
		stationCache = new TimeoutMap<String,Integer>( 3*60*60*1000 );
	}
	
	
	List<TimetableBean> cachedLookupTimetable(String trainID, String type) throws Exception {
		String key = trainID+type;
		List<TimetableBean> list = cache.get(key);
		
		if (list == null) {
			list = lookupTimetable(trainID,type);
			cache.put(key, list);
		} else {
			Statistics.getInstance().incrementTimetableCacheHits();
			logger.info("Timetable: Cache hit " + trainID); 
		}
		return list;
	}
	
	List<TimetableBean> lookupTimetable(String trainID, String type) throws Exception {
		if (useTempSite == false ){
			return lookupTimetableRealSite(trainID, type);
		} else {
			return new ArrayList<TimetableBean>(); // no timetable data on temp site
		}
	}
	
	int getStationId(String name) {
		Integer id = stationCache.get(name);
		
		if (id == null) {
			try {
				id = stationDao.getIdByName(name);
				stationCache.put(name, id);
			} catch (SQLException e) {
				logger.log(Level.SEVERE, "getStationId failed", e);
				id = -1;
			}
		} 

		return id;
	}

	List<TimetableBean> lookupTimetableRealSite(String trainID, String type) throws Exception {		
		List<TimetableBean> timetableList = new ArrayList<TimetableBean>();
		
		//String url = "http://www.bane.dk/visRute.asp?W=" + type + "&TogNr=" + trainID + "&artikelId=4276";
		String url = "http://trafikinfo.bane.dk/TrafikInformation/Ruteplan/" + trainID;			

	    
	    JsoupInvocation wrapper = new JsoupInvocation( new URL(url) , 2500);
	    CircuitBreaker breaker = CircuitBreakerManager.getManager().getCircuitBreaker("banedk");
	    
	    Document doc = (Document) breaker.invoke(wrapper);
	    	    
	    
	    boolean currentStation = false;
	    boolean currentStationSaved = false;
	    
	    Elements tables = doc.getElementsByClass("Rute");
	    
	    if (tables.size() == 1) {
	    	Element timetable = tables.get(0);
	    	Elements rows = timetable.getElementsByTag("tr");
	    	
	    	for (int i=0; i<rows.size(); i++) {
	    		if (i==0) //First row is column headers
	    			continue;
	    		
	    		
	    		Element row = rows.get(i);
	    		Elements fields = row.getElementsByTag("td");

	    		
	    		if (currentStationSaved == false && fields.get(0).attr("class").equalsIgnoreCase("Tidsstreg")) {
	    			currentStation = true;
	    			continue;
	    		}
	    		
	    		TimetableBean bean = new TimetableBean();
	    		
	    		String station = fields.get(0).text() ;
	    		if (station.equals("København"))
	    			station = "København H"; //correct inconsistency in naming
	    		
	    		bean.setStation( station );
	    		bean.setArrival( fields.get(1).text() );
	    		bean.setDeparture( fields.get(2).text() );
	    		
	    		boolean cancelled = fields.get(3).text().equalsIgnoreCase("aflyst");
	    		bean.setCancelled(cancelled);
	    		
	    		if (currentStation == true && currentStationSaved == false ) {
	    			bean.setCurrent(currentStation);
	    			currentStationSaved = true;
	    		}
	    		
	    		bean.setStationId( getStationId( station ));
	    		
	    		timetableList.add(bean);
	    	}
	    	
	    	//TODO: There is an off-by-one error in this cancelled parser thingie
	    	final String cancelledString = "Aflyst";
	    	for (int i=0;i<timetableList.size(); i++) { //handle cancelled labels
	    		final int lastIdx = (timetableList.size() - 1);
	    		
	    		TimetableBean current = timetableList.get(i);
	    		if (current.isCancelled()) {
		    		if (i == 0) {
		    			current.setDeparture(cancelledString);
		    		} else if (i == lastIdx) {
		    			current.setArrival(cancelledString);
		    		} else if (i>0 && i<lastIdx) {
		    			TimetableBean next = timetableList.get(i+1);
		    			TimetableBean prev = timetableList.get(i-1);
		    			
		    			if (next.isCancelled())
		    				current.setDeparture(cancelledString);
		    			if (prev.isCancelled())
		    				current.setArrival(cancelledString);
		    		}
	    		}
	    	}
	    	
	    } else {
	    	logger.warning("No time table found, trainID=" + trainID + " type=" + type);
	    }
	    
		
		return timetableList;
	}
	
}