package de.srsoftware.web4rail.tiles;

import java.io.BufferedReader;
import java.io.BufferedWriter;
import java.io.File;
import java.io.FileReader;
import java.io.FileWriter;
import java.io.IOException;
import java.lang.reflect.InvocationTargetException;
import java.nio.charset.StandardCharsets;
import java.util.HashMap;
import java.util.HashSet;
import java.util.List;
import java.util.Map;
import java.util.Map.Entry;
import java.util.Scanner;
import java.util.Vector;

import org.json.JSONObject;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;

import de.keawe.tools.translations.Translation;
import de.srsoftware.tools.Tag;
import de.srsoftware.web4rail.Application;
import de.srsoftware.web4rail.Connector;
import de.srsoftware.web4rail.Constants;
import de.srsoftware.web4rail.Plan;
import de.srsoftware.web4rail.Plan.Direction;
import de.srsoftware.web4rail.Route;
import de.srsoftware.web4rail.Window;
import de.srsoftware.web4rail.moving.Train;
import de.srsoftware.web4rail.tags.Button;
import de.srsoftware.web4rail.tags.Checkbox;
import de.srsoftware.web4rail.tags.Form;
import de.srsoftware.web4rail.tags.Input;
import de.srsoftware.web4rail.tags.Radio;

public abstract class Tile implements Constants{
	
	public static final String ID = "id";
	private static final String TYPE = "type";
	private static final String LOCKED = "locked";
	
	private static final String POS = "pos";
	private static final String X = "x";
	private static final String Y = "y";
	public int x = -1,y = -1;
	
	private static final String ROUTE = "route";
	protected Route route;
	
	private static final String OCCUPIED = "occupied";
	protected Train train;
	
	private static final String ONEW_WAY = "one_way";
	protected Direction oneWay = null;

	protected HashSet<Shadow> shadows = new HashSet<>();
	private HashSet<Route> routes = new HashSet<>();
	protected Plan plan;
	private boolean disabled = false;
	
	protected static Logger LOG = LoggerFactory.getLogger(Tile.class);	
	
	protected Vector<String> classes(){
		Vector<String> classes = new Vector<String>();
		classes.add("tile");
		classes.add(getClass().getSimpleName());
		if (route != null) classes.add(LOCKED);
		if (train != null) classes.add(OCCUPIED);
		if (disabled) classes.add(DISABLED);
		return classes;
	}

	public void add(Route route) {
		this.routes.add(route);
	}

	public void addShadow(Shadow shadow) {
		shadows.add(shadow);
	}
	
	public Object click() throws IOException {
		LOG.debug("{}.click()",getClass().getSimpleName());
		return propMenu();
	}
	
	public JSONObject config() {
		return new JSONObject();
	}
	
	public Map<Connector,Turnout.State> connections(Direction from){
		return new HashMap<>();
	}

	public boolean free() {
		if (disabled) return false;
		if (route != null) return false;
		if (train != null) return false;
		return true;
	}
	
	public int height() {
		return 1;
	}
	
	public String id() {
		return Tile.id(x, y);
	}
	
	public static String id(int x, int y) {
		return x+"-"+y;
	}
	
	private static void inflate(String clazz, JSONObject json, Plan plan) throws InstantiationException, IllegalAccessException, IllegalArgumentException, InvocationTargetException, NoSuchMethodException, SecurityException, ClassNotFoundException, IOException {
		clazz = Tile.class.getName().replace(".Tile", "."+clazz);
		Tile tile = (Tile) Tile.class.getClassLoader().loadClass(clazz).getDeclaredConstructor().newInstance();
		tile.plan(plan);
		tile.load(json);
		plan.set(tile.x, tile.y, tile);
	}
	
	public JSONObject json() {
		JSONObject json = new JSONObject();
		json.put(TYPE, getClass().getSimpleName());
		JSONObject pos = new JSONObject(Map.of(X,x,Y,y));
		json.put(POS, pos);
		if (route != null) json.put(ROUTE, route.id());
		if (oneWay != null) json.put(ONEW_WAY, oneWay);
		if (disabled) json.put(DISABLED, true);
		return json;
	}
	
	public int len() {
		return 1;
	}
	
	public static void loadAll(String filename, Plan plan) throws IOException {		
		BufferedReader file = new BufferedReader(new FileReader(filename));
		String line = file.readLine();
		while (line != null) {
			JSONObject json = new JSONObject(line);
			String clazz = json.getString(TYPE);
			
			try {
				Tile.inflate(clazz,json,plan);
			} catch (InstantiationException | IllegalAccessException | IllegalArgumentException | InvocationTargetException | NoSuchMethodException | SecurityException | ClassNotFoundException e) {
				e.printStackTrace();
			}			
			
			line = file.readLine();
		}
		file.close();
	}

	protected Tile load(JSONObject json) throws IOException {
		JSONObject pos = json.getJSONObject(POS);
		x = pos.getInt(X);
		y = pos.getInt(Y);
		if (json.has(ONEW_WAY)) oneWay = Direction.valueOf(json.getString(ONEW_WAY));
		if (json.has(DISABLED)) disabled = json.getBoolean(DISABLED);
		return this;
	}
	
	public Tile lock(Route lockingRoute) {
		if (route == lockingRoute) return this;
		if (route != null && lockingRoute != null) throw new IllegalStateException(this.toString());
		route = lockingRoute;
		return plan.place(this);
	}
	
	public Plan plan() {
		return plan;
	}
	
	public Tile plan(Plan plan) {
		this.plan = plan;
		return this;
	}

	public Tile position(int x, int y) {
		this.x = x;
		this.y = y;
		return this;
	}
	
	public List<Direction> possibleDirections() {
		return new Vector<Plan.Direction>();
	}
	
	public Tag propForm(String formId) {
		Form form = new Form(formId);
		new Input(ACTION, ACTION_UPDATE).hideIn(form);
		new Input(REALM, REALM_PLAN).hideIn(form);
		new Input(ID,id()).hideIn(form);


		List<Direction> pd = possibleDirections();
		if (!pd.isEmpty()) {
			new Tag("h4").content(t("One way:")).addTo(form);
			new Radio("oneway","none",t("No"),oneWay == null).addTo(form);		
			for (Direction d:pd) {
				new Radio("oneway",d.toString(),t(d.toString()),d == oneWay).addTo(form);
			}
		}
		return form;
	}
	
	public Tag propMenu() {	
		Window window = new Window("tile-properties",t("Properties of {} @ ({},{})",title(),x,y));
		String formId = "tile-properties-"+id();
		Tag form = propForm(formId);
		new Tag("h4").content(t("Availability")).addTo(form);
		new Checkbox(DISABLED, t("disabled"), disabled).addTo(form);
		new Button(t("Apply"),"submitForm('"+formId+"')").addTo(form);
		form.addTo(window);
		
		if (route != null) {
			new Tag("p").content(t("Locked by {}",route)).addTo(window);
		}
		
		if (!routes.isEmpty()) {
			new Tag("h4").content(t("Routes using this tile:")).addTo(window);
			Tag routeList = new Tag("ol");
			for (Route route : routes) {
				String json = new JSONObject(Map.of(REALM,ROUTE,ID,route.id(),ACTION,ACTION_PROPS,CONTEXT,REALM_PLAN+":"+id())).toString().replace("\"", "'");
				Tag li = new Tag("span").attr("onclick","return request("+json+");").content(route.name()+NBSP).addTo(new Tag("li").clazz("link"));
				Map<String, Object> params = Map.of(REALM,REALM_ROUTE,ID,route.id(),ACTION,ACTION_DROP,Tile.class.getSimpleName(),id());
				new Button(t("delete route"),params).addTo(li);
				li.addTo(routeList);
			}
			routeList.addTo(window);
		}		
		return window;
	}
	
	public void remove(Route route) {
		routes.remove(route);
	}

	private static String replace(String line, Entry<String, Object> replacement) {
		String key = replacement.getKey();
		Object val = replacement.getValue();
		int start = line.indexOf(key);
		int len = key.length();
		while (start>0) {
			int end = line.indexOf("\"",start);
			int end2 = line.indexOf("<",start);
			if (end2>0 && (end<0 || end2<end)) end=end2;
			String tag = line.substring(start, end);
			if (tag.length()>len) {
				val = Integer.parseInt(tag.substring(len)) + (int) val;
			}
			line = line.replace(tag, ""+val);
			start = line.indexOf(key);
		}
		return line;
	}

	public Route route() {
		return route;
	}
	
	public HashSet<Route> routes() {
		return routes;
	}
	
	public static void saveAll(HashMap<String, Tile> tiles ,String filename) throws IOException {
		BufferedWriter file = new BufferedWriter(new FileWriter(filename));
		for (Tile tile : tiles.values()) {
			if (tile == null || tile instanceof Shadow) continue;
			file.append(tile.json()+"\n");
		}
		file.close();
	}

	protected static String t(String txt, Object...fills) {
		return Translation.get(Application.class, txt, fills);
	}

	public Tag tag(Map<String,Object> replacements) throws IOException {
		int width = 100*len();
		int height = 100*height();
		if (replacements == null) replacements = new HashMap<String, Object>();
		replacements.put("%width%",width);
		replacements.put("%height%",height);
		String style = "";
		Tag svg = new Tag("svg")
				.id((x!=-1 && y!=-1)?(id()):(getClass().getSimpleName()))
				.clazz(classes())
				.size(100,100)
				.attr("name", getClass().getSimpleName())				
				.attr("viewbox", "0 0 "+width+" "+height);
				if (x>-1) style="left: "+(30*x)+"px; top: "+(30*y)+"px;";
				if (len()>1) style+=" width: "+(30*len())+"px;";
				if (height()>1) style+=" height: "+(30*height())+"px;";
		
		if (!style.isEmpty()) svg.style(style);

		File file = new File(System.getProperty("user.dir")+"/resources/svg/"+getClass().getSimpleName()+".svg");
		if (file.exists()) {
			Scanner scanner = new Scanner(file, StandardCharsets.UTF_8);
			StringBuffer sb = new StringBuffer();
			while (scanner.hasNextLine()) {
				String line = scanner.nextLine();
				if (line.startsWith("<svg") || line.endsWith("svg>")) continue;
				for (Entry<String, Object> replacement : replacements.entrySet()) {
					line = replace(line,replacement);
				}
				sb.append(line+"\n");
			}
			scanner.close();
			svg.content(sb.toString());
			
			if (oneWay != null) {
				switch (oneWay) {
			
				case EAST:
					new Tag("polygon").clazz("oneway").attr("points", "100,50 75,35 75,65").addTo(svg);
					break;
				case WEST:
					new Tag("polygon").clazz("oneway").attr("points", "0,50 25,35 25,65").addTo(svg);
					break;
				case SOUTH:
					new Tag("polygon").clazz("oneway").attr("points", "50,100 35,75 65,75").addTo(svg);
					break;
				case NORTH:
					new Tag("polygon").clazz("oneway").attr("points", "50,0 35,25 65,25").addTo(svg);
					break;
				default:
				}
			}
		} else {
			new Tag("title").content(t("No display defined for this tile ({})",getClass().getSimpleName())).addTo(svg);
			new Tag("text")
				.pos(35,70)	
				.content("?")
				.addTo(svg);
		}
		String title = title();
		if (title!=null) new Tag("title").content(title()).addTo(svg);

		return svg;
	}
	
	public String title() {
		return getClass().getSimpleName() + " @ ("+x+", "+y+")";
	}
	
	@Override
	public String toString() {
		return t("{}({},{})",getClass().getSimpleName(),x,y) ;
	}
	
	public Train train() {
		return train;
	}
	
	public Tile train(Train train) {
		if (this.train == train) return this; // nothing to update
		this.train = train;		
		return plan.place(this);
	}	

	public void unlock() {
		route = null;
		train = null;
		plan.place(this);
	}

	public Tile update(HashMap<String, String> params) throws IOException {
		LOG.debug("{}.update({})",getClass().getSimpleName(),params);
		String oneWayDir = params.get("oneway");
		if (oneWayDir != null) {
			try {
				oneWay = Direction.valueOf(oneWayDir);
			} catch (Exception e) {
				oneWay = null;
			}
		}
		disabled = "on".equals(params.get(DISABLED));
		plan.stream(tag(null).toString());
		return this;
	}
}