package me.clip.placeholderapi.replacer;

import me.clip.placeholderapi.PlaceholderHook;
import org.bukkit.ChatColor;
import org.bukkit.OfflinePlayer;
import org.jetbrains.annotations.NotNull;
import org.jetbrains.annotations.Nullable;

import java.util.function.Function;

public final class CharsReplacer implements Replacer
{

	@NotNull
	private final Closure closure;

	public CharsReplacer(@NotNull final Closure closure)
	{
		this.closure = closure;
	}


	@Override
	public @NotNull String apply(@NotNull final String text, @Nullable final OfflinePlayer player, @NotNull final Function<String, @Nullable PlaceholderHook> lookup)
	{
		final char[]        chars   = text.toCharArray();
		final StringBuilder builder = new StringBuilder(text.length());

		final StringBuilder identifier = new StringBuilder();
		final StringBuilder parameters = new StringBuilder();

		for (int i = 0; i < chars.length; i++)
		{
			final char l = chars[i];

			if (l == '&' && ++i < chars.length)
			{
				final char c = Character.toLowerCase(chars[i]);

				if (c != '0' && c != '1' && c != '2' && c != '3' && c != '4' && c != '5' && c != '6' && c != '7' && c != '8' && c != '9' && c != 'a' && c != 'b' && c != 'c' && c != 'd' && c != 'e' && c != 'f' && c != 'k' && c != 'l' && c != 'm' && c != 'o' && c != 'r' && c != 'x')
				{
					builder.append(l).append(chars[i]);
				}
				else
				{
					builder.append(ChatColor.COLOR_CHAR);

					if (c != 'x')
					{
						builder.append(chars[i]);
						continue;
					}

					if ((i > 1 && chars[i - 2] == '\\') /*allow escaping &x*/)
					{
						builder.setLength(builder.length() - 2);
						builder.append('&').append(chars[i]);
						continue;
					}

					builder.append(c);

					int j = 0;
					while (++j <= 6)
					{
						if (i + j >= chars.length)
						{
							break;
						}

						final char x = chars[i + j];
						builder.append(ChatColor.COLOR_CHAR).append(x);
					}

					if (j == 7)
					{
						i += 6;
					}
					else
					{
						builder.setLength(builder.length() - (j * 2)); // undo &x parsing
					}
				}
				continue;
			}

			if (l != closure.head || i + 1 >= chars.length)
			{
				builder.append(l);
				continue;
			}

			boolean identified = false;
			boolean oopsitsbad = true;

			while (++i < chars.length)
			{
				final char p = chars[i];

				if (p == ' ')
				{
					break;
				}
				if (p == closure.tail)
				{
					oopsitsbad = false;
					break;
				}

				if (p == '_' && !identified)
				{
					identified = true;
					continue;
				}

				if (identified)
				{
					parameters.append(p);
				}
				else
				{
					identifier.append(p);
				}
			}

			final String identifierString = identifier.toString();
			final String parametersString = parameters.toString();

			identifier.setLength(0);
			parameters.setLength(0);

			if (oopsitsbad)
			{
				builder.append(closure.head).append(identifierString);

				if (identified)
				{
					builder.append('_').append(parametersString);
				}

				builder.append(' ');
				continue;
			}

			final PlaceholderHook placeholder = lookup.apply(identifierString);
			if (placeholder == null)
			{
				builder.append(closure.head).append(identifierString);

				if (identified)
				{
					builder.append('_');
				}

				builder.append(parametersString).append(closure.tail);
				continue;
			}

			final String replacement = placeholder.onRequest(player, parametersString);
			if (replacement == null)
			{
				builder.append(closure.head).append(identifierString);

				if (identified)
				{
					builder.append('_');
				}

				builder.append(parametersString).append(closure.tail);
				continue;
			}

			builder.append(replacement);
		}

		return builder.toString();
	}

}