package net.minecraft.server.commands;

import com.mojang.brigadier.CommandDispatcher;
import com.mojang.brigadier.exceptions.DynamicCommandExceptionType;
import java.util.ArrayList;
import java.util.Comparator;
import java.util.List;
import java.util.Objects;
import java.util.function.ToIntFunction;
import java.util.stream.Stream;
import net.minecraft.Util;
import net.minecraft.commands.CommandSourceStack;
import net.minecraft.commands.Commands;
import net.minecraft.commands.arguments.ResourceKeyArgument;
import net.minecraft.core.BlockPos;
import net.minecraft.core.HolderLookup;
import net.minecraft.core.Holder.Reference;
import net.minecraft.core.component.DataComponents;
import net.minecraft.core.registries.Registries;
import net.minecraft.network.chat.Component;
import net.minecraft.resources.ResourceKey;
import net.minecraft.server.level.ServerLevel;
import net.minecraft.world.entity.EquipmentSlot;
import net.minecraft.world.entity.decoration.ArmorStand;
import net.minecraft.world.entity.player.Player;
import net.minecraft.world.item.Item;
import net.minecraft.world.item.ItemStack;
import net.minecraft.world.item.equipment.Equippable;
import net.minecraft.world.item.equipment.trim.ArmorTrim;
import net.minecraft.world.item.equipment.trim.TrimMaterial;
import net.minecraft.world.item.equipment.trim.TrimMaterials;
import net.minecraft.world.item.equipment.trim.TrimPattern;
import net.minecraft.world.item.equipment.trim.TrimPatterns;

public class SpawnArmorTrimsCommand {
	private static final List<ResourceKey<TrimPattern>> VANILLA_TRIM_PATTERNS = List.of(
		TrimPatterns.SENTRY,
		TrimPatterns.DUNE,
		TrimPatterns.COAST,
		TrimPatterns.WILD,
		TrimPatterns.WARD,
		TrimPatterns.EYE,
		TrimPatterns.VEX,
		TrimPatterns.TIDE,
		TrimPatterns.SNOUT,
		TrimPatterns.RIB,
		TrimPatterns.SPIRE,
		TrimPatterns.WAYFINDER,
		TrimPatterns.SHAPER,
		TrimPatterns.SILENCE,
		TrimPatterns.RAISER,
		TrimPatterns.HOST,
		TrimPatterns.FLOW,
		TrimPatterns.BOLT
	);
	private static final List<ResourceKey<TrimMaterial>> VANILLA_TRIM_MATERIALS = List.of(
		TrimMaterials.QUARTZ,
		TrimMaterials.IRON,
		TrimMaterials.NETHERITE,
		TrimMaterials.REDSTONE,
		TrimMaterials.COPPER,
		TrimMaterials.GOLD,
		TrimMaterials.EMERALD,
		TrimMaterials.DIAMOND,
		TrimMaterials.LAPIS,
		TrimMaterials.AMETHYST,
		TrimMaterials.RESIN
	);
	private static final ToIntFunction<ResourceKey<TrimPattern>> TRIM_PATTERN_ORDER = Util.createIndexLookup(VANILLA_TRIM_PATTERNS);
	private static final ToIntFunction<ResourceKey<TrimMaterial>> TRIM_MATERIAL_ORDER = Util.createIndexLookup(VANILLA_TRIM_MATERIALS);
	private static final DynamicCommandExceptionType ERROR_INVALID_PATTERN = new DynamicCommandExceptionType(
		object -> Component.translatableEscape("Invalid pattern", object)
	);

	public static void register(CommandDispatcher<CommandSourceStack> dispatcher) {
		dispatcher.register(
			Commands.literal("spawn_armor_trims")
				.requires(commandSourceStack -> commandSourceStack.hasPermission(2))
				.then(
					Commands.literal("*_lag_my_game")
						.executes(commandContext -> spawnAllArmorTrims(commandContext.getSource(), commandContext.getSource().getPlayerOrException()))
				)
				.then(
					Commands.argument("pattern", ResourceKeyArgument.key(Registries.TRIM_PATTERN))
						.executes(
							commandContext -> spawnArmorTrim(
								commandContext.getSource(),
								commandContext.getSource().getPlayerOrException(),
								ResourceKeyArgument.getRegistryKey(commandContext, "pattern", Registries.TRIM_PATTERN, ERROR_INVALID_PATTERN)
							)
						)
				)
		);
	}

	private static int spawnAllArmorTrims(CommandSourceStack source, Player player) {
		return spawnArmorTrims(source, player, source.getServer().registryAccess().lookupOrThrow(Registries.TRIM_PATTERN).listElements());
	}

	private static int spawnArmorTrim(CommandSourceStack source, Player player, ResourceKey<TrimPattern> pattern) {
		return spawnArmorTrims(
			source, player, Stream.of((Reference)source.getServer().registryAccess().lookupOrThrow(Registries.TRIM_PATTERN).get(pattern).orElseThrow())
		);
	}

	private static int spawnArmorTrims(CommandSourceStack source, Player player, Stream<Reference<TrimPattern>> patterns) {
		ServerLevel serverLevel = source.getLevel();
		List<Reference<TrimPattern>> list = patterns.sorted(Comparator.comparing(referencex -> TRIM_PATTERN_ORDER.applyAsInt(referencex.key()))).toList();
		List<Reference<TrimMaterial>> list2 = serverLevel.registryAccess()
			.lookupOrThrow(Registries.TRIM_MATERIAL)
			.listElements()
			.sorted(Comparator.comparing(referencex -> TRIM_MATERIAL_ORDER.applyAsInt(referencex.key())))
			.toList();
		List<Reference<Item>> list3 = findEquippableItemsWithAssets(serverLevel.registryAccess().lookupOrThrow(Registries.ITEM));
		BlockPos blockPos = player.blockPosition().relative(player.getDirection(), 5);
		double d = 3.0;

		for (int i = 0; i < list2.size(); i++) {
			Reference<TrimMaterial> reference = (Reference<TrimMaterial>)list2.get(i);

			for (int j = 0; j < list.size(); j++) {
				Reference<TrimPattern> reference2 = (Reference<TrimPattern>)list.get(j);
				ArmorTrim armorTrim = new ArmorTrim(reference, reference2);

				for (int k = 0; k < list3.size(); k++) {
					Reference<Item> reference3 = (Reference<Item>)list3.get(k);
					double e = blockPos.getX() + 0.5 - k * 3.0;
					double f = blockPos.getY() + 0.5 + i * 3.0;
					double g = blockPos.getZ() + 0.5 + j * 10;
					ArmorStand armorStand = new ArmorStand(serverLevel, e, f, g);
					armorStand.setYRot(180.0F);
					armorStand.setNoGravity(true);
					ItemStack itemStack = new ItemStack(reference3);
					Equippable equippable = (Equippable)Objects.requireNonNull(itemStack.get(DataComponents.EQUIPPABLE));
					itemStack.set(DataComponents.TRIM, armorTrim);
					armorStand.setItemSlot(equippable.slot(), itemStack);
					if (k == 0) {
						armorStand.setCustomName(
							armorTrim.pattern().value().copyWithStyle(armorTrim.material()).copy().append(" & ").append(armorTrim.material().value().description())
						);
						armorStand.setCustomNameVisible(true);
					} else {
						armorStand.setInvisible(true);
					}

					serverLevel.addFreshEntity(armorStand);
				}
			}
		}

		source.sendSuccess(() -> Component.literal("Armorstands with trimmed armor spawned around you"), true);
		return 1;
	}

	private static List<Reference<Item>> findEquippableItemsWithAssets(HolderLookup<Item> itemRegistry) {
		List<Reference<Item>> list = new ArrayList();
		itemRegistry.listElements().forEach(reference -> {
			Equippable equippable = ((Item)reference.value()).components().get(DataComponents.EQUIPPABLE);
			if (equippable != null && equippable.slot().getType() == EquipmentSlot.Type.HUMANOID_ARMOR && equippable.assetId().isPresent()) {
				list.add(reference);
			}
		});
		return list;
	}
}