package cgeo.geocaching;

import java.util.ArrayList;
import java.util.List;
import java.util.Locale;

import org.apache.commons.lang3.StringUtils;

import android.content.Context;
import android.content.Intent;
import android.content.SharedPreferences;
import android.os.Bundle;
import android.os.Handler;
import android.os.Message;
import android.os.PowerManager;
import android.util.Log;
import android.view.Menu;
import android.view.MenuItem;
import android.view.SubMenu;
import android.view.WindowManager;
import android.widget.TextView;
import cgeo.geocaching.activity.AbstractActivity;
import cgeo.geocaching.geopoint.Geopoint;


public class cgeonavigate extends AbstractActivity {

	public static List<cgCoord> coordinates = new ArrayList<cgCoord>();
	private PowerManager pm = null;
	private cgGeo geo = null;
	private cgDirection dir = null;
	private cgUpdateLoc geoUpdate = new update();
	private cgUpdateDir dirUpdate = new UpdateDirection();
	private Geopoint dstCoords = null;
	private Double cacheHeading = Double.valueOf(0);
	private Double northHeading = Double.valueOf(0);
	private String title = null;
	private String name = null;
	private TextView navType = null;
	private TextView navAccuracy = null;
	private TextView navSatellites = null;
	private TextView navLocation = null;
	private TextView distanceView = null;
	private TextView headingView = null;
	private cgCompass compassView = null;
	private updaterThread updater = null;
	private Handler updaterHandler = new Handler() {

		@Override
		public void handleMessage(Message msg) {
			try {
				if (compassView != null) {
					compassView.updateNorth(northHeading, cacheHeading);
				}
			} catch (Exception e) {
				Log.e(cgSettings.tag, "cgeonavigate.updaterHandler: " + e.toString());
			}
		}
	};

	public cgeonavigate() {
		super("c:geo-compass");
	}

	@Override
	public void onCreate(Bundle savedInstanceState) {
		super.onCreate(savedInstanceState);

		// set layout
		getWindow().addFlags(WindowManager.LayoutParams.FLAG_KEEP_SCREEN_ON);
		setTheme();
		setContentView(R.layout.navigate);
		setTitle(res.getString(R.string.compass_title));

		// sensor & geolocation manager
		if (geo == null) {
			geo = app.startGeo(this, geoUpdate, base, settings, 0, 0);
		}
		if (settings.useCompass == 1 && dir == null) {
			dir = app.startDir(this, dirUpdate);
		}

		// get parameters
		Bundle extras = getIntent().getExtras();
		if (extras != null) {
			title = extras.getString("geocode");
			name = extras.getString("name");
			dstCoords = new Geopoint(extras.getDouble("latitude"), extras.getDouble("longitude"));

			if (StringUtils.isNotBlank(name)) {
				if (StringUtils.isNotBlank(title)) {
					title = title + ": " + name;
				} else {
					title = name;
				}
			}
		} else {
			Intent pointIntent = new Intent(this, cgeopoint.class);
			startActivity(pointIntent);

			finish();
			return;
		}

		if (StringUtils.isNotBlank(title)) {
			app.setAction(title);
		} else if (StringUtils.isNotBlank(name)) {
			app.setAction(name);
		}

		// set header
		setTitle();
		setDestCoords();

		// get textviews once
		compassView = (cgCompass) findViewById(R.id.rose);

		// start updater thread
		updater = new updaterThread(updaterHandler);
		updater.start();

		if (geo != null) {
			geoUpdate.updateLoc(geo);
		}
		if (dir != null) {
			dirUpdate.updateDir(dir);
		}
	}

	@Override
	public void onResume() {
		super.onResume();

		settings.load();

		if (StringUtils.isNotBlank(title)) {
			app.setAction(title);
		} else if (StringUtils.isNotBlank(name)) {
			app.setAction(name);
		}

		// sensor & geolocation manager
		if (geo == null) {
			geo = app.startGeo(this, geoUpdate, base, settings, 0, 0);
		}
		if (settings.useCompass == 1 && dir == null) {
			dir = app.startDir(this, dirUpdate);
		}

		// keep backlight on
		if (pm == null) {
			pm = (PowerManager) getSystemService(Context.POWER_SERVICE);
		}

		// updater thread
		if (updater == null) {
			updater = new updaterThread(updaterHandler);
			updater.start();
		}
	}

	@Override
	public void onStop() {
		if (geo != null) {
			geo = app.removeGeo();
		}
		if (dir != null) {
			dir = app.removeDir();
		}

		super.onStop();
	}

	@Override
	public void onPause() {
		if (geo != null) {
			geo = app.removeGeo();
		}
		if (dir != null) {
			dir = app.removeDir();
		}

		super.onPause();
	}

	@Override
	public void onDestroy() {
		if (geo != null) {
			geo = app.removeGeo();
		}
		if (dir != null) {
			dir = app.removeDir();
		}

		compassView.destroyDrawingCache();
		compassView = null;

		super.onDestroy();
	}

	@Override
	public boolean onCreateOptionsMenu(Menu menu) {
		if (settings.useCompass == 1) {
			menu.add(0, 1, 0, res.getString(R.string.use_gps)).setIcon(android.R.drawable.ic_menu_compass);
		} else {
			menu.add(0, 1, 0, res.getString(R.string.use_compass)).setIcon(android.R.drawable.ic_menu_compass);
		}
		menu.add(0, 0, 0, res.getString(R.string.caches_on_map)).setIcon(android.R.drawable.ic_menu_mapmode);
		menu.add(0, 2, 0, res.getString(R.string.destination_set)).setIcon(android.R.drawable.ic_menu_edit);
		if (coordinates != null && coordinates.size() > 1) {
			SubMenu subMenu = menu.addSubMenu(0, 3, 0, res.getString(R.string.destination_select)).setIcon(android.R.drawable.ic_menu_myplaces);

			int cnt = 4;
			for (cgCoord coordinate : coordinates) {
				subMenu.add(0, cnt, 0, coordinate.name + " (" + coordinate.type + ")");
				cnt++;
			}

			return true;
		} else {
			menu.add(0, 3, 0, res.getString(R.string.destination_select)).setIcon(android.R.drawable.ic_menu_myplaces).setEnabled(false);

			return true;
		}
	}

	@Override
	public boolean onPrepareOptionsMenu(Menu menu) {
		super.onPrepareOptionsMenu(menu);

		MenuItem item;
		item = menu.findItem(1);
		if (settings.useCompass == 1) {
			item.setTitle(res.getString(R.string.use_gps));
		} else {
			item.setTitle(res.getString(R.string.use_compass));
		}

		return true;
	}

	@Override
	public boolean onOptionsItemSelected(MenuItem item) {
		int id = item.getItemId();

		if (id == 0) {
			Intent mapIntent = new Intent(this, settings.getMapFactory().getMapClass());
			mapIntent.putExtra("detail", false);
			mapIntent.putExtra("latitude", dstCoords.getLatitude());
			mapIntent.putExtra("longitude", dstCoords.getLongitude());

			startActivity(mapIntent);
		} else if (id == 1) {
			if (settings.useCompass == 1) {
				settings.useCompass = 0;

				if (dir != null) {
					dir = app.removeDir();
				}

				SharedPreferences.Editor prefsEdit = getSharedPreferences(cgSettings.preferences, 0).edit();
				prefsEdit.putInt("usecompass", settings.useCompass);
				prefsEdit.commit();
			} else {
				settings.useCompass = 1;

				if (dir == null) {
					dir = app.startDir(this, dirUpdate);
				}

				SharedPreferences.Editor prefsEdit = getSharedPreferences(cgSettings.preferences, 0).edit();
				prefsEdit.putInt("usecompass", settings.useCompass);
				prefsEdit.commit();
			}
		} else if (id == 2) {
			Intent pointIntent = new Intent(this, cgeopoint.class);
			startActivity(pointIntent);

			finish();
			return true;
		} else if (id > 3 && coordinates != null && coordinates.get(id - 4) != null) {
			cgCoord coordinate = coordinates.get(id - 4);

			title = coordinate.name;
			dstCoords = coordinate.coords;
			setTitle();
			setDestCoords();
			updateDistanceInfo();

			Log.d(cgSettings.tag, "destination set: " + title + " (" +
					String.format(Locale.getDefault(), "%.8f", dstCoords.getLatitude()) + " | " +
					String.format(Locale.getDefault(), "%.8f", dstCoords.getLongitude()) + ")");
			return true;
		}

		return false;
	}

	private void setTitle() {
		if (StringUtils.isNotBlank(title)) {
			setTitle(title);
		} else {
			setTitle(res.getString(R.string.navigation));
		}
	}

	private void setDestCoords() {
		if (dstCoords == null) {
			return;
		}

		((TextView) findViewById(R.id.destination)).setText(cgBase.formatCoords(dstCoords, true));
	}

	public void setDest(final Geopoint coords) {
		if (coords == null) {
			return;
		}

		title = "some place";
		setTitle();
		setDestCoords();

		dstCoords = coords;
		updateDistanceInfo();
	}

	public Geopoint getCoordinatesNow() {
		return geo.coordsNow;
	}

	private void updateDistanceInfo() {
		if (geo == null || geo.coordsNow == null || dstCoords == null) {
			return;
		}

		if (distanceView == null) {
			distanceView = (TextView) findViewById(R.id.distance);
		}
		if (headingView == null) {
			headingView = (TextView) findViewById(R.id.heading);
		}

		cacheHeading = cgBase.getHeading(geo.coordsNow, dstCoords);
		distanceView.setText(base.getHumanDistance(cgBase.getDistance(geo.coordsNow, dstCoords)));
		headingView.setText(String.format(Locale.getDefault(), "%.0f", cacheHeading) + "°");
	}

	private class update extends cgUpdateLoc {

		@Override
		public void updateLoc(cgGeo geo) {
			if (geo == null) {
				return;
			}

			try {
				if (navType == null || navLocation == null || navAccuracy == null) {
					navType = (TextView) findViewById(R.id.nav_type);
					navAccuracy = (TextView) findViewById(R.id.nav_accuracy);
					navSatellites = (TextView) findViewById(R.id.nav_satellites);
					navLocation = (TextView) findViewById(R.id.nav_location);
				}

				if (geo.coordsNow != null) {
					String satellites = null;
					if (geo.satellitesVisible != null && geo.satellitesFixed != null && geo.satellitesFixed > 0) {
						satellites = res.getString(R.string.loc_sat) + ": " + geo.satellitesFixed + "/" + geo.satellitesVisible;
					} else if (geo.satellitesVisible != null) {
						satellites = res.getString(R.string.loc_sat) + ": 0/" + geo.satellitesVisible;
					} else {
						satellites = "";
					}
					navSatellites.setText(satellites);

					if (geo.gps == -1) {
						navType.setText(res.getString(R.string.loc_last));
					} else if (geo.gps == 0) {
						navType.setText(res.getString(R.string.loc_net));
					} else {
						navType.setText(res.getString(R.string.loc_gps));
					}

					if (geo.accuracyNow != null) {
						if (settings.units == cgSettings.unitsImperial) {
							navAccuracy.setText("±" + String.format(Locale.getDefault(), "%.0f", (geo.accuracyNow * 3.2808399)) + " ft");
						} else {
							navAccuracy.setText("±" + String.format(Locale.getDefault(), "%.0f", geo.accuracyNow) + " m");
						}
					} else {
						navAccuracy.setText(null);
					}

					if (geo.altitudeNow != null) {
						String humanAlt;
						if (settings.units == cgSettings.unitsImperial) {
							humanAlt = String.format("%.0f", (geo.altitudeNow * 3.2808399)) + " ft";
						} else {
							humanAlt = String.format("%.0f", geo.altitudeNow) + " m";
						}
						navLocation.setText(cgBase.formatCoords(geo.coordsNow, true) + " | " + humanAlt);
					} else {
						navLocation.setText(cgBase.formatCoords(geo.coordsNow, true));
					}

					updateDistanceInfo();
				} else {
					navType.setText(null);
					navAccuracy.setText(null);
					navLocation.setText(res.getString(R.string.loc_trying));
				}

				if (settings.useCompass == 0 || (geo.speedNow != null && geo.speedNow > 5)) { // use GPS when speed is higher than 18 km/h
					if (geo != null && geo.bearingNow != null) {
						northHeading = geo.bearingNow;
					} else {
						northHeading = Double.valueOf(0);
					}
				}
			} catch (Exception e) {
				Log.w(cgSettings.tag, "Failed to update location.");
			}
		}
	}

	private class UpdateDirection extends cgUpdateDir {

		@Override
		public void updateDir(cgDirection dir) {
			if (dir == null || dir.directionNow == null) {
				return;
			}

			if (geo == null || geo.speedNow == null || geo.speedNow <= 5) { // use compass when speed is lower than 18 km/h
				northHeading = dir.directionNow;
			}
		}
	}

	private static class updaterThread extends Thread {

		private Handler handler = null;

		public updaterThread(Handler handlerIn) {
			handler = handlerIn;
		}

		@Override
		public void run() {
			while (!Thread.currentThread().isInterrupted()) {
				if (handler != null) {
					handler.sendMessage(new Message());
				}

				try {
					Thread.sleep(20);
				} catch (Exception e) {
					Thread.currentThread().interrupt();
				}
			}
		}
	}
}