package dk.thoerup.traininfoservice.banedk;


import java.util.Collections;
import java.util.List;
import java.util.Map;
import java.util.logging.Logger;

import com.gargoylesoftware.htmlunit.BrowserVersion;
import com.gargoylesoftware.htmlunit.WebClient;
import com.gargoylesoftware.htmlunit.html.DomNodeList;
import com.gargoylesoftware.htmlunit.html.HtmlElement;
import com.gargoylesoftware.htmlunit.html.HtmlPage;

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

public class DepartureFetcher {
	
	enum TrainType{
		STOG,
		REGIONAL
	}
	
	Logger logger = Logger.getLogger(DepartureFetcher.class.getName());
	
	Map<String, DepartureBean> cache;
	
	StationDAO stationDao = new StationDAO();
	
	private boolean useTempSite;
	
	public DepartureFetcher(boolean tempSite, int cacheTimeout) {
		useTempSite = tempSite;
		cache = new TimeoutMap<String,DepartureBean>(cacheTimeout);
	}
	
	
		
	
	public DepartureBean cachedLookupDepartures(int stationID, boolean arrival) throws Exception {
		final String key = "" + stationID + ":" + arrival;
		/*
		DepartureBean departureBean = cache.get(key);

		
		if (departureBean == null) {
			departureBean = lookupDepartures(stationID,arrival);
			cache.put(key, departureBean);
		} else {
			Statistics.getInstance().incrementDepartureCacheHits();
			logger.info("Departure: Cache hit " + key); //remove before production
		}
		return departureBean;*/
		
		return lookupDepartures(stationID,arrival);
	}
		

	public DepartureBean lookupDepartures(int stationID, boolean arrival) throws Exception {
		
		DepartureBean departureBean = new DepartureBean();
		
		StationBean station = stationDao.getById(stationID);
		
		if (station.getRegional() != null) {
			DepartureBean tempBean = lookupDepartures(station.getRegional(), TrainType.REGIONAL, arrival);
			departureBean.departureEntries.addAll( tempBean.departureEntries );
			departureBean.notifications.addAll(tempBean.notifications);
		}
		
		if (station.getStrain() != null) {
			DepartureBean tempBean = lookupDepartures(station.getStrain(), TrainType.STOG, arrival);
			departureBean.departureEntries.addAll( tempBean.departureEntries );
			departureBean.notifications.addAll(tempBean.notifications);
		}		
		
		Collections.sort( departureBean.departureEntries );

		
		return departureBean;
	}
	
	public DepartureBean lookupDepartures(String stationcode, TrainType type, boolean arrival) throws Exception {
		if (useTempSite == false) {
			return lookupDeparturesNormalSite(stationcode, type, arrival);
		} else {
			//return lookupDeparturesFromTemporarySite(stationcode, type);
			//TODO: find out what to to if they ever put a temp site up on trafikinfo.bane.dk 
			return null;
		}
	}
	
	private String getTypeString(TrainType type) {
		switch (type) {
		case STOG:
			return "S-Tog";
		case REGIONAL:
			return "Fjerntog";
		default:
			return ""; //Can not happen
		}
	}
	
	public DepartureBean lookupDeparturesNormalSite(String stationcode, TrainType type, boolean arrival) throws Exception {
		
		DepartureBean departureBean = new DepartureBean();
		
	    final WebClient webClient = new WebClient( BrowserVersion.FIREFOX_3 );
	    webClient.setTimeout(2500);
	    webClient.setJavaScriptEnabled(false);
	    
	    
	    String typeString = getTypeString(type);
	    String arrivalDeparture = (arrival==false) ? "Afgang" : "Ankomst"; 
	    	    	    
	    //String uri = "http://www.bane.dk/visStation.asp?ArtikelID=4275&W=" + type + "&S=" + stationcode;
	    String uri = "http://trafikinfo.bane.dk/Trafikinformation/AfgangAnkomst/" + arrivalDeparture + "/" + stationcode + "/" + typeString + "/UdvidetVisning";

	    //logger.info("URI: " + uri);
	    HtmlunitInvocation wrapper = new HtmlunitInvocation(webClient, uri);
	    CircuitBreaker breaker = CircuitBreakerManager.getManager().getCircuitBreaker("banedk");
	    
	    HtmlPage page = (HtmlPage) breaker.invoke(wrapper);
	    
	    String tableName = arrival == false ? "afgangtabel" : "ankomsttabel";
	    HtmlElement table = page.getElementById(tableName);
	    
	    if (table != null) {
		    DomNodeList<HtmlElement> tableRows =  table.getElementsByTagName("tr");
		    
		    for (HtmlElement currentRow : tableRows) {
		    	String rowClass = currentRow.getAttribute("class");
		    	if (rowClass != null && rowClass.toLowerCase().contains("station") ) {
		    		DomNodeList<HtmlElement> fields = currentRow.getElementsByTagName("td");
	
		    		DepartureEntry departure = new DepartureEntry();
		    		
		    		String time = fields.get(0).asText();
		    		if (time.equals(""))
		    			time = "0:00"; //Bane.dk bug work-around
		    		departure.setTime(time);
		    		
		    		int updated = extractUpdated( fields.get(1) );
		    		departure.setUpdated(updated);
		    		
		    		String trainNumber = fields.get(2).asText();
		    		if (type == TrainType.STOG) //If it is S-train we need to extract the trainNumber 
		    			trainNumber = trainNumber + " " + extractTrainNumber(fields.get(2));
		    		departure.setTrainNumber(trainNumber);
		    		
		    		String destination = fields.get(3).asText();
		    		departure.setDestination(destination);
		    		
		    		String origin = fields.get(4).asText();
		    		departure.setOrigin(origin);
		    		
		    		String location = fields.get(5).asText();
		    		departure.setLocation(location);
		    		
		    		String status = fields.get(6).asText().trim();
		    		departure.setStatus(status);
		    		
		    		String note = extractNote( fields.get(7) );
		    		departure.setNote(note);
		    		
		    		departure.setType(typeString);
		    		
		    		departureBean.departureEntries.add( departure );
		    	}
		    }
	    } else {
	    	logger.warning("No departures found for station=" + stationcode + ", type=" + type);
	    }
	    
	    HtmlElement notifDiv = page.getElementById("station_planlagte_text");
	    if (notifDiv != null) {

	    	DomNodeList<HtmlElement> tables = notifDiv.getElementsByTagName("table");
	    	for (HtmlElement tab : tables) {

	    		DomNodeList<HtmlElement> anchors = tab.getElementsByTagName("a");	    	
	    		if (anchors.size() == 2) {
	    			departureBean.notifications.add(  anchors.get(1).getTextContent() );
	    		}
	    	}
	    	
	    }
	    
	    
	    webClient.closeAllWindows();
	    
	    return departureBean;
	}
	
	/*
	@Deprecated
	public List<DepartureBean> lookupDeparturesFromTemporarySite(String stationcode, String type) throws Exception {
		
		List<DepartureBean> departureList = new ArrayList<DepartureBean>();
		
	    final WebClient webClient = new WebClient(BrowserVersion.FIREFOX_3);
	    webClient.setTimeout(2500);
	    webClient.setJavaScriptEnabled(false);
	    

	    String uri = "http://bane.dk/lite/station.asp?w=" + type + "&s=" + stationcode;
	    
	    HtmlunitInvocation wrapper = new HtmlunitInvocation(webClient, uri);
	    CircuitBreaker breaker = CircuitBreakerManager.getManager().getCircuitBreaker("banedk");
	    
	    HtmlPage page = (HtmlPage) breaker.invoke(wrapper);
	    
	    HtmlElement table = page.getElementById("traf_afgang");
	    
	    if (table != null) {		    	
		    DomNodeList<HtmlElement> tableRows =  table.getElementsByTagName("tr");
		    
		    boolean isFirst = true;
		    
		    for (HtmlElement currentRow : tableRows) {
		    	if (isFirst == true) { //skip table headers
		    		isFirst = false;
		    		continue;
		    	}
		    	
		    	DomNodeList<HtmlElement> fields = currentRow.getElementsByTagName("td");

		    	DepartureBean departure = new DepartureBean();

		    	String time = fields.get(0).asText().trim();

		    	if (time.equals(""))
		    		time = "0:00"; //Bane.dk bug work-around
		    	departure.setTime(time);


		    	String trainNumber = fields.get(1).asText();
		    	departure.setTrainNumber(trainNumber);

		    	String destination = fields.get(2).asText();
		    	departure.setDestination(destination);

		    	String origin = fields.get(3).asText();
		    	departure.setOrigin(origin);

		    	String status = fields.get(4).asText();
		    	departure.setStatus(status);

		    	String note = fields.get(5).asText();
		    	departure.setNote(note);

		    	departureList.add(departure);
		    }
	    } else {
	    	logger.warning("No departures found for station=" + stationcode + ", type=" + type);
	    }
	    webClient.closeAllWindows();
	    
	    
	    return departureList;
	}*/

	
	private int extractUpdated(HtmlElement updatedTd) { //extract the digit (in this case: 4) from "media/trafikinfo/opdater4.gif" 
		int updated = -1;
		
		DomNodeList<HtmlElement> updatedImgs = updatedTd.getElementsByTagName("img");
		String updatedStr = updatedImgs.get(0).getAttribute("src");
		
		if (updatedStr != null) {
			for (int i=0; i<updatedStr.length(); i++) {
				char c = updatedStr.charAt(i);
				if ( Character.isDigit(c))  {
					updated = Character.digit(c, 10);
					break;
				}
			}
		}		
		return updated;
	}
	
	private String extractNote(HtmlElement noteTd) {
		String note = noteTd.asText().trim();
		
		List<HtmlElement> elems = noteTd.getElementsByAttribute("span", "class", "bemtype");
		if (elems.size() > 0 && note.charAt(note.length()-1) == 'i')
			note = note.substring(0,note.length() -1 );

		return note;
	}
	
	private String extractTrainNumber(HtmlElement trainTd) {
		HtmlElement anchorElement = trainTd.getElementsByTagName("a").get(0);
		String href = anchorElement.getAttribute("href");
		
		int pos = href.lastIndexOf('/');
		String number = href.substring(pos+1);
		
		return number;
	}
	
	//test
	/*
	public static void main(String args[]) throws Exception {
		DepartureFetcher f = new DepartureFetcher();
		List<DepartureBean> deps = f.lookupDepartures("AR", "FJRN");
		for(DepartureBean d : deps) {
			System.out.println( d.getTime() + ";" + d.getUpdated() + ";" + d.getTrainNumber() + ";" + 
						d.getDestination() + ";" + d.getOrigin() + ";" + d.getLocation() + ";" + d.getStatus() + ";" + d.getNote()   );
		}
		
		System.out.println("--------------------------");
	}*/
}