package com.esophose.playerparticles.command;

import java.text.DecimalFormat;
import java.util.ArrayList;
import java.util.Collections;
import java.util.List;

import org.bukkit.Location;
import org.bukkit.Material;
import org.bukkit.entity.Player;

import com.esophose.playerparticles.manager.DataManager;
import com.esophose.playerparticles.manager.LangManager;
import com.esophose.playerparticles.manager.ParticleManager;
import com.esophose.playerparticles.manager.PermissionManager;
import com.esophose.playerparticles.manager.LangManager.Lang;
import com.esophose.playerparticles.particles.FixedParticleEffect;
import com.esophose.playerparticles.particles.PPlayer;
import com.esophose.playerparticles.particles.ParticleEffect;
import com.esophose.playerparticles.particles.ParticleEffect.NoteColor;
import com.esophose.playerparticles.particles.ParticleEffect.OrdinaryColor;
import com.esophose.playerparticles.particles.ParticleEffect.ParticleProperty;
import com.esophose.playerparticles.particles.ParticlePair;
import com.esophose.playerparticles.styles.api.ParticleStyle;
import com.esophose.playerparticles.styles.api.ParticleStyleManager;
import com.esophose.playerparticles.util.ParticleUtils;

public class FixedCommandModule implements CommandModule {

	public void onCommandExecute(PPlayer pplayer, String[] args) {
		Player p = pplayer.getPlayer();

		if (!PermissionManager.canUseFixedEffects(p)) {
			LangManager.sendMessage(p, Lang.NO_PERMISSION_FIXED);
			return;
		}

		if (args.length == 0) { // General information on command
			LangManager.sendMessage(p, Lang.INVALID_FIXED_COMMAND);
			LangManager.sendMessage(p, Lang.FIXED_COMMAND_DESC_CREATE);
			LangManager.sendMessage(p, Lang.FIXED_COMMAND_DESC_REMOVE);
			LangManager.sendMessage(p, Lang.FIXED_COMMAND_DESC_LIST);
			LangManager.sendMessage(p, Lang.FIXED_COMMAND_DESC_INFO);
			if (p.hasPermission("playerparticles.fixed.clear"))
				LangManager.sendMessage(p, Lang.FIXED_COMMAND_DESC_CLEAR);
			return;
		}

		String cmd = args[0];

		String[] cmdArgs = new String[args.length - 1];
		for (int i = 1; i < args.length; i++) {
			cmdArgs[i - 1] = args[i];
		}
		args = cmdArgs;

		if (cmd.equalsIgnoreCase("create")) {
			boolean reachedMax = DataManager.hasPlayerReachedMaxFixedEffects(pplayer);
			if (reachedMax) {
				LangManager.sendMessage(p, Lang.MAX_FIXED_EFFECTS_REACHED);
				return;
			}

			if (args.length < 5) {
				LangManager.sendMessage(p, Lang.CREATE_FIXED_MISSING_ARGS, (5 - args.length) + "");
				return;
			}

			double xPos = -1, yPos = -1, zPos = -1;
			try {
				if (args[0].startsWith("~")) {
					if (args[0].equals("~"))
						xPos = p.getLocation().getX();
					else
						xPos = p.getLocation().getX() + Double.parseDouble(args[0].substring(1));
				} else {
					xPos = Double.parseDouble(args[0]);
				}

				if (args[1].startsWith("~")) {
					if (args[1].equals("~"))
						yPos = p.getLocation().getY() + 1;
					else
						yPos = p.getLocation().getY() + 1 + Double.parseDouble(args[1].substring(1));
				} else {
					yPos = Double.parseDouble(args[1]);
				}

				if (args[2].startsWith("~")) {
					if (args[2].equals("~"))
						zPos = p.getLocation().getZ();
					else
						zPos = p.getLocation().getZ() + Double.parseDouble(args[2].substring(1));
				} else {
					zPos = Double.parseDouble(args[2]);
				}
			} catch (Exception e) {
				LangManager.sendMessage(p, Lang.CREATE_FIXED_INVALID_COORDS);
				return;
			}

			double distanceFromEffect = p.getLocation().distance(new Location(p.getWorld(), xPos, yPos, zPos));
			int maxCreationDistance = DataManager.getMaxFixedEffectCreationDistance();
			if (maxCreationDistance != 0 && distanceFromEffect > maxCreationDistance) {
				LangManager.sendMessage(p, Lang.CREATE_FIXED_OUT_OF_RANGE, maxCreationDistance + "");
				return;
			}

			ParticleEffect effect = ParticleManager.effectFromString(args[3]);
			if (effect == null) {
				LangManager.sendMessage(p, Lang.CREATE_FIXED_INVALID_EFFECT, args[3]);
				return;
			} else if (!PermissionManager.hasEffectPermission(p, effect)) {
				LangManager.sendMessage(p, Lang.CREATE_FIXED_NO_PERMISSION_EFFECT, effect.getName());
				return;
			}

			ParticleStyle style = ParticleStyleManager.styleFromString(args[4]);
			if (style == null) {
				LangManager.sendMessage(p, Lang.CREATE_FIXED_INVALID_STYLE, args[4]);
				return;
			} else if (!PermissionManager.hasStylePermission(p, style)) {
				LangManager.sendMessage(p, Lang.CREATE_FIXED_NO_PERMISSION_STYLE, args[4]);
				return;
			}

			if (!style.canBeFixed()) {
				LangManager.sendMessage(p, Lang.CREATE_FIXED_NON_FIXABLE_STYLE, style.getName());
				return;
			}

			Material itemData = null;
			Material blockData = null;
			OrdinaryColor colorData = null;
			NoteColor noteColorData = null;

			if (args.length > 5) {
				if (effect.hasProperty(ParticleProperty.COLORABLE)) {
					if (effect == ParticleEffect.NOTE) {
						if (args[5].equalsIgnoreCase("rainbow")) {
							noteColorData = new NoteColor(99);
						} else {
							int note = -1;
							try {
								note = Integer.parseInt(args[5]);
							} catch (Exception e) {
								LangManager.sendMessage(p, Lang.CREATE_FIXED_DATA_ERROR, "note");
								return;
							}

							if (note < 0 || note > 23) {
								LangManager.sendMessage(p, Lang.CREATE_FIXED_DATA_ERROR, "note");
								return;
							}

							noteColorData = new NoteColor(note);
						}
					} else {
						if (args[5].equalsIgnoreCase("rainbow")) {
							colorData = new OrdinaryColor(999, 999, 999);
						} else {
							int r = -1;
							int g = -1;
							int b = -1;

							try {
								r = Integer.parseInt(args[5]);
								g = Integer.parseInt(args[6]);
								b = Integer.parseInt(args[7]);
							} catch (Exception e) {
								LangManager.sendMessage(p, Lang.CREATE_FIXED_DATA_ERROR, "color");
								return;
							}

							if (r < 0 || r > 255 || g < 0 || g > 255 || b < 0 || b > 255) {
								LangManager.sendMessage(p, Lang.CREATE_FIXED_DATA_ERROR, "color");
								return;
							}

							colorData = new OrdinaryColor(r, g, b);
						}
					}
				} else if (effect.hasProperty(ParticleProperty.REQUIRES_MATERIAL_DATA)) {
					if (effect == ParticleEffect.BLOCK || effect == ParticleEffect.FALLING_DUST) {
						Material material = null;
						try {
							material = ParticleUtils.closestMatch(args[5]);
							if (material == null)
								material = Material.matchMaterial(args[5]);
							if (material == null)
								throw new Exception();
						} catch (Exception e) {
							LangManager.sendMessage(p, Lang.CREATE_FIXED_DATA_ERROR, "block");
							return;
						}

						blockData = material;
					} else if (effect == ParticleEffect.ITEM) {
						Material material = null;
						try {
							material = ParticleUtils.closestMatch(args[5]);
							if (material == null)
								material = Material.matchMaterial(args[5]);
							if (material == null)
								throw new Exception();
						} catch (Exception e) {
							LangManager.sendMessage(p, Lang.CREATE_FIXED_DATA_ERROR, "item");
							return;
						}

						itemData = material;
					}
				}
			}
			
			int nextFixedEffectId = pplayer.getNextFixedEffectId();
			ParticlePair particle = new ParticlePair(pplayer.getUniqueId(), nextFixedEffectId, effect, style, itemData, blockData, colorData, noteColorData);
			FixedParticleEffect fixedEffect = new FixedParticleEffect(p.getUniqueId(), nextFixedEffectId, p.getLocation().getWorld().getName(), xPos, yPos, zPos, particle);

			LangManager.sendMessage(p, Lang.CREATE_FIXED_SUCCESS);
			DataManager.saveFixedEffect(fixedEffect);
		} else if (cmd.equalsIgnoreCase("remove")) {
			if (args.length < 1) {
				LangManager.sendMessage(p, Lang.REMOVE_FIXED_NO_ARGS);
				return;
			}

			int id = -1;
			try {
				id = Integer.parseInt(args[0]);
			} catch (Exception e) {
				LangManager.sendMessage(p, Lang.REMOVE_FIXED_INVALID_ARGS);
				return;
			}

			if (pplayer.getFixedEffectById(id) != null) {
				DataManager.removeFixedEffect(pplayer.getUniqueId(), id);
				LangManager.sendMessage(p, Lang.REMOVE_FIXED_SUCCESS, id + "");
			} else {
				LangManager.sendMessage(p, Lang.REMOVE_FIXED_NONEXISTANT, id + "");
			}
		} else if (cmd.equalsIgnoreCase("list")) {
			List<Integer> ids = pplayer.getFixedEffectIds();
			Collections.sort(ids);

			if (ids.isEmpty()) {
				LangManager.sendMessage(p, Lang.LIST_FIXED_NONE);
				return;
			}

			String msg = Lang.LIST_FIXED_SUCCESS.get();
			boolean first = true;
			for (int id : ids) {
				if (!first)
					msg += ", ";
				else
					first = false;
				msg += id;
			}

			LangManager.sendCustomMessage(p, msg);
		} else if (cmd.equalsIgnoreCase("info")) {
			if (args.length < 1) {
				LangManager.sendMessage(p, Lang.INFO_FIXED_NO_ARGS);
				return;
			}

			int id = -1;
			try {
				id = Integer.parseInt(args[0]);
			} catch (Exception e) {
				LangManager.sendMessage(p, Lang.INFO_FIXED_INVALID_ARGS);
				return;
			}

			FixedParticleEffect fixedEffect = pplayer.getFixedEffectById(id);
			if (fixedEffect == null) {
				LangManager.sendMessage(p, Lang.INFO_FIXED_NONEXISTANT, id + "");
				return;
			}
			
			ParticlePair particle = fixedEffect.getParticlePair();
			

			DecimalFormat df = new DecimalFormat("0.##"); // Decimal formatter so the coords aren't super long
			String listMessage = Lang.INFO_FIXED_INFO.get() // @formatter:off
					.replaceAll("\\{0\\}", fixedEffect.getId() + "")
					.replaceAll("\\{1\\}", fixedEffect.getLocation().getWorld().getName())
					.replaceAll("\\{2\\}", df.format(fixedEffect.getLocation().getX()) + "")
					.replaceAll("\\{3\\}", df.format(fixedEffect.getLocation().getY()) + "")
					.replaceAll("\\{4\\}", df.format(fixedEffect.getLocation().getZ()) + "")
					.replaceAll("\\{5\\}", particle.getEffect().getName())
					.replaceAll("\\{6\\}", particle.getStyle().getName())
					.replaceAll("\\{7\\}", particle.getDataString()); // @formatter:on
			LangManager.sendCustomMessage(p, listMessage);
		} else if (cmd.equalsIgnoreCase("clear")) {
			if (!p.hasPermission("playerparticles.fixed.clear")) {
				LangManager.sendMessage(p, Lang.CLEAR_FIXED_NO_PERMISSION);
				return;
			}

			if (args.length < 1) {
				LangManager.sendMessage(p, Lang.CLEAR_FIXED_NO_ARGS);
				return;
			}

			int radius = -1;
			try {
				radius = Math.abs(Integer.parseInt(args[0]));
			} catch (Exception e) {
				LangManager.sendMessage(p, Lang.CLEAR_FIXED_INVALID_ARGS);
				return;
			}

			ArrayList<FixedParticleEffect> fixedEffectsToRemove = new ArrayList<FixedParticleEffect>();

			for (PPlayer ppl : ParticleManager.getPPlayers())
				for (FixedParticleEffect fixedEffect : ppl.getFixedParticles())
					if (fixedEffect.getLocation().getWorld().equals(p.getLocation().getWorld())
							&& fixedEffect.getLocation().distance(p.getLocation()) <= radius)
						fixedEffectsToRemove.add(fixedEffect);

			for (FixedParticleEffect fixedEffect : fixedEffectsToRemove)
				DataManager.removeFixedEffect(fixedEffect.getOwnerUniqueId(), fixedEffect.getId());

			String clearMessage = Lang.CLEAR_FIXED_SUCCESS.get() // @formatter:off
					.replaceAll("\\{0\\}", fixedEffectsToRemove.size() + "").replaceAll("\\{1\\}", radius + ""); // @formatter:on
			LangManager.sendCustomMessage(pplayer, clearMessage);
			return;
		} else {
			LangManager.sendMessage(pplayer, Lang.INVALID_FIXED_COMMAND);
			LangManager.sendMessage(pplayer, Lang.FIXED_COMMAND_DESC_CREATE);
			LangManager.sendMessage(pplayer, Lang.FIXED_COMMAND_DESC_REMOVE);
			LangManager.sendMessage(pplayer, Lang.FIXED_COMMAND_DESC_LIST);
			LangManager.sendMessage(pplayer, Lang.FIXED_COMMAND_DESC_INFO);
			if (p.hasPermission("playerparticles.fixed.clear"))
				LangManager.sendMessage(p, Lang.FIXED_COMMAND_DESC_CLEAR);
		}
	}

	public List<String> onTabComplete(PPlayer pplayer, String[] args) {
		return null;
	}

	public String getName() {
		return "fixed";
	}

	public String getDescription() {
		return Lang.FIXED_COMMAND_DESCRIPTION.get();
	}

	public String getArguments() {
		return "<args>";
	}

	public boolean requiresEffects() {
		return true;
	}

}