/* Copyright 2012 Malcolm Herring
 *
 * This is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, version 3 of the License.
 *
 * For a copy of the GNU General Public License, see <http://www.gnu.org/licenses/>.
 */

package seamap;

import java.util.ArrayList;
import java.util.EnumMap;
import java.util.HashMap;

import s57.S57att;
import s57.S57att.Att;
import s57.S57obj;
import s57.S57obj.*;
import s57.S57val;
import s57.S57val.*;

public class SeaMap {

	public enum Fflag {
		UNKN, NODE, WAY, AREA
	}

	public class AttItem {
		Conv conv;
		Object val;

		AttItem(Conv iconv, Object ival) {
			conv = iconv;
			val = ival;
		}
	}

	public class AttMap extends EnumMap<Att, AttItem> {
		private static final long serialVersionUID = 1L;
		public AttMap() {
			super(Att.class);
		}
	}
	
	public class ObjTab extends HashMap<Integer, AttMap> {
		private static final long serialVersionUID = 1L;
		public ObjTab() {
			super();
		}
	}
	
	public class ObjMap extends EnumMap<Obj, ObjTab> {
		private static final long serialVersionUID = 1L;
		public ObjMap() {
			super(Obj.class);
		}
	}
	
	public class NodeTab extends HashMap<Long, Coord> {
		private static final long serialVersionUID = 1L;
		public NodeTab() {
			super();
		}
	}
	
	public class WayTab extends HashMap<Long, ArrayList<Long>> {
		private static final long serialVersionUID = 1L;
		public WayTab() {
			super();
		}
	}
	
	public class FtrMap extends EnumMap<Obj, ArrayList<Feature>> {
		private static final long serialVersionUID = 1L;
		public FtrMap() {
			super(Obj.class);
		}
	}
	
	public class FtrTab extends HashMap<Long, Feature> {
		private static final long serialVersionUID = 1L;
		public FtrTab() {
			super();
		}
	}
	
	public class Feature {
		public Fflag flag;
		public long refs;
		public Obj type;
		public AttMap atts;
		public ObjMap objs;

		Feature() {
			flag = Fflag.UNKN;
			refs = 0;
			type = Obj.UNKOBJ;
			atts = new AttMap();
			objs = new ObjMap();
		}
	}

	public class Coord {
		public double lat;
		public double lon;

		public Coord(double ilat, double ilon) {
			lat = ilat;
			lon = ilon;
		}
	}

	public NodeTab nodes;
	public WayTab ways;
	public WayTab mpolys;
	public FtrMap features;
	public FtrTab index;

	private Feature feature;
	private ArrayList<Long> list;

	public SeaMap() {
		nodes = new NodeTab();
		ways = new WayTab();
		mpolys = new WayTab();
		feature = new Feature();
		features = new FtrMap();
		index = new FtrTab();
	}

	public void addNode(long id, double lat, double lon) {
		nodes.put(id, new Coord(lat, lon));
		feature = new Feature();
		feature.refs = id;
		feature.flag = Fflag.NODE;
	}

	public void moveNode(long id, double lat, double lon) {
		nodes.put(id, new Coord(lat, lon));
	}

	public void addWay(long id) {
		list = new ArrayList<Long>();
		ways.put(id, list);
		feature = new Feature();
		feature.refs = id;
		feature.flag = Fflag.WAY;
	}

	public void addMpoly(long id) {
		list = new ArrayList<Long>();
		mpolys.put(id, list);
	}

	public void addToWay(long node) {
		list.add(node);
	}

	public void addToMpoly(long way, boolean outer) {
		if (outer)
			list.add(0, way);
		else
			list.add(way);
	}

	public void tagsDone(long id) {
		if ((feature.type != Obj.UNKOBJ) && !((feature.flag == Fflag.WAY) && (list.size() < 2))) {
			index.put(id, feature);
			if ((feature.flag == Fflag.WAY) && (list.size() > 0) && (list.get(0).equals(list.get(list.size() - 1)))) {
				feature.flag = Fflag.AREA;
			}
			if (features.get(feature.type) == null) {
				features.put(feature.type, new ArrayList<Feature>());
			}
			features.get(feature.type).add(feature);
		}
	}

	public void addTag(String key, String val) {
		String subkeys[] = key.split(":");
		if ((subkeys.length > 1) && subkeys[0].equals("seamark")) {
			Obj obj = S57obj.enumType(subkeys[1]);
			if ((subkeys.length > 2) && (obj != Obj.UNKOBJ)) {
				int idx = 0;
				Att att = Att.UNKATT;
				try {
					idx = Integer.parseInt(subkeys[2]);
					if (subkeys.length == 4) {
						att = s57.S57att.enumAttribute(subkeys[3], obj);
					}
				} catch (Exception e) {
					att = S57att.enumAttribute(subkeys[2], obj);
				}
				ObjTab items = feature.objs.get(obj);
				if (items == null) {
					items = new ObjTab();
					feature.objs.put(obj, items);
				}
				AttMap atts = items.get(idx);
				if (atts == null) {
					atts = new AttMap();
					items.put(idx, atts);
				}
				AttVal attval = S57val.convertValue(val, att);
				if (attval.val != null) atts.put(att, new AttItem(attval.conv, attval.val));
			} else {
				if (subkeys[1].equals("type")) {
					feature.type = S57obj.enumType(val);
				} else {
					Att att = S57att.enumAttribute(subkeys[1], Obj.UNKOBJ);
					if (att != Att.UNKATT) {
						AttVal attval = S57val.convertValue(val, att);
						if (attval.val != null) feature.atts.put(att, new AttItem(attval.conv, attval.val));
					}
				}
			}
		}
	}
}