package ftbsc.lll.processor.tools;

import com.squareup.javapoet.*;
import ftbsc.lll.exceptions.AmbiguousDefinitionException;
import ftbsc.lll.exceptions.MappingNotFoundException;
import ftbsc.lll.exceptions.NotAProxyException;
import ftbsc.lll.exceptions.TargetNotFoundException;
import ftbsc.lll.processor.annotations.Find;
import ftbsc.lll.processor.annotations.Patch;
import ftbsc.lll.processor.annotations.Target;
import ftbsc.lll.processor.tools.obfuscation.ObfuscationMapper;
import ftbsc.lll.proxies.FieldProxy;
import ftbsc.lll.proxies.MethodProxy;

import javax.annotation.processing.ProcessingEnvironment;
import javax.lang.model.element.*;
import javax.lang.model.type.*;
import javax.lang.model.util.Elements;
import java.lang.annotation.Annotation;
import java.util.ArrayList;
import java.util.Arrays;
import java.util.List;
import java.util.function.Function;
import java.util.stream.Collectors;

import static ftbsc.lll.processor.tools.JavaPoetUtils.descriptorFromExecutableElement;
import static ftbsc.lll.processor.tools.JavaPoetUtils.methodDescriptorFromParams;

/**
 * Collection of AST-related static utils that didn't really fit into the main class.
 */
public class ASTUtils {
	/**
	 * Finds, among the methods of a class cl, the one annotated with ann, and tries to build
	 * a {@link ExecutableElement} from it.
	 * @param cl the {@link ExecutableElement} for the class containing the desired method
	 * @param ann the {@link Class} corresponding to the desired annotation
	 * @return a {@link List} of {@link MethodSpec}s annotated with the given annotation
	 * @since 0.2.0
	 */
	public static List<ExecutableElement> findAnnotatedMethods(TypeElement cl, Class<? extends Annotation> ann) {
		return cl.getEnclosedElements()
			.stream()
			.filter(e -> e.getAnnotationsByType(ann).length != 0)
			.map(e -> (ExecutableElement) e)
			.collect(Collectors.toList());
	}

	/**
	 * Maps a {@link javax.lang.model.element.Modifier} to its reflective
	 * {@link java.lang.reflect.Modifier} equivalent.
	 * @param m the {@link Modifier} to map
	 * @return an integer representing the modifier
	 * @see java.lang.reflect.Modifier
	 * @since 0.2.0
	 */
	public static int mapModifier(Modifier m) {
		switch(m) {
			case PUBLIC:
				return java.lang.reflect.Modifier.PUBLIC;
			case PROTECTED:
				return java.lang.reflect.Modifier.PROTECTED;
			case PRIVATE:
				return java.lang.reflect.Modifier.PRIVATE;
			case ABSTRACT:
				return java.lang.reflect.Modifier.ABSTRACT;
			case STATIC:
				return java.lang.reflect.Modifier.STATIC;
			case FINAL:
				return java.lang.reflect.Modifier.FINAL;
			case TRANSIENT:
				return java.lang.reflect.Modifier.TRANSIENT;
			case VOLATILE:
				return java.lang.reflect.Modifier.VOLATILE;
			case SYNCHRONIZED:
				return java.lang.reflect.Modifier.SYNCHRONIZED;
			case NATIVE:
				return java.lang.reflect.Modifier.NATIVE;
			case STRICTFP:
				return java.lang.reflect.Modifier.STRICT;
			default:
				return 0;
		}
	}

	/**
	 * Safely extracts a {@link Class} from an annotation and gets its fully qualified name.
	 * @param ann the annotation containing the class
	 * @param parentFunction the annotation function returning the class
	 * @param innerName a string containing the inner class name or anonymous class number, may be null
	 * @param <T> the type of the annotation carrying the information
	 * @return the fully qualified name of the given class
	 * @since 0.3.0
	 */
	public static <T extends Annotation> String getClassFullyQualifiedName(T ann, Function<T, Class<?>> parentFunction, String innerName) {
		String fqn;
		try {
			fqn = parentFunction.apply(ann).getCanonicalName();
		} catch(MirroredTypeException e) {
			fqn = e.getTypeMirror().toString();
		}
		if(innerName != null)
			fqn = String.format("%s$%s", fqn, innerName);
		return fqn;
	}

	/**
	 * Extracts
	 * @param ann the annotation containing the class
	 * @param innerClassFunction the annotation function returning the inner class name
	 * @param anonymousCounterFunction the annotation function returning the anonymous class counter
	 * @param <T> the type of the annotation carrying the information
	 * @return the fully qualified name of the given class
	 * @since 0.3.0
	 */
	public static <T extends Annotation> String getInnerName(T ann, Function<T, String> innerClassFunction, Function<T, Integer> anonymousCounterFunction) {
		String inner = null;
		if(!innerClassFunction.apply(ann).equals(""))
			inner =  innerClassFunction.apply(ann);
		if(anonymousCounterFunction.apply(ann) != 0) {
			if(inner != null)
				throw new AmbiguousDefinitionException(String.format("Unclear inner class, is it %s or %d?", inner, anonymousCounterFunction.apply(ann)));
			else inner = anonymousCounterFunction.apply(ann).toString();
		}
		return inner;
	}

	/**
	 * Safely extracts a {@link Class} array from an annotation.
	 * @param ann the annotation containing the class
	 * @param fun the annotation function returning the class
	 * @param elementUtils the element utils corresponding to the {@link ProcessingEnvironment}
	 * @param <T> the type of the annotation carrying the information
	 * @return a list of {@link TypeMirror}s representing the classes
	 * @since 0.3.0
	 */
	public static <T extends Annotation> List<TypeMirror> classArrayFromAnnotation(T ann, Function<T, Class<?>[]> fun, Elements elementUtils) {
		List<TypeMirror> params = new ArrayList<>();
		try {
			params.addAll(Arrays.stream(fun.apply(ann))
				.map(Class::getCanonicalName)
				.map(fqn -> elementUtils.getTypeElement(fqn).asType())
				.collect(Collectors.toList()));
		} catch(MirroredTypesException e) {
			params.addAll(e.getTypeMirrors());
		}
		return params;
	}


	/**
	 * Finds the class name and maps it to the correct format.
	 * @param name the fully qualified name of the class to convert
	 * @param mapper the {@link ObfuscationMapper} to use, may be null
	 * @return the fully qualified class name
	 * @since 0.3.0
	 */
	public static String findClassName(String name, ObfuscationMapper mapper) {
		try {
			return mapper == null ? name : mapper.obfuscateClass(name).replace('/', '.');
		} catch(MappingNotFoundException e) {
			return name;
		}
	}

	/**
	 * Finds the class name and maps it to the correct format.
	 * @param patchAnn  the {@link Patch} annotation containing target class info
	 * @param finderAnn an annotation containing metadata about the target, may be null
	 * @return the fully qualified class name
	 * @since 0.3.0
	 */
	private static String findClassName(Patch patchAnn, Find finderAnn) {
		String fullyQualifiedName;
		if(finderAnn != null) {
			fullyQualifiedName =
				getClassFullyQualifiedName(
					finderAnn,
					Find::parent,
					getInnerName(finderAnn, Find::parentInnerClass, Find::parentAnonymousClassCounter)
				);
			if(!fullyQualifiedName.equals("java.lang.Object"))
				return findClassName(fullyQualifiedName, null);
		}
		fullyQualifiedName =
			getClassFullyQualifiedName(
				patchAnn,
				Patch::value,
				getInnerName(patchAnn, Patch::innerClass, Patch::anonymousClassCounter)
			);
		return findClassName(fullyQualifiedName, null);
	}

	/**
	 * Finds the member name and maps it to the correct format.
	 * @param parentFQN the already mapped FQN of the parent class
	 * @param memberName the name of the member
	 * @param methodDescriptor the descriptor of the method, may be null if it's not a method
	 * @param mapper the {@link ObfuscationMapper} to use, may be null
	 * @return the internal class name
	 * @since 0.3.0
	 */
	public static String findMemberName(String parentFQN, String memberName, String methodDescriptor, ObfuscationMapper mapper) {
		try {
			return mapper == null ? memberName : mapper.obfuscateMember(parentFQN, memberName, methodDescriptor);
		} catch(MappingNotFoundException e) {
			return memberName;
		}
	}

	/**
	 * Finds a member given the name, the container class and (if it's a method) the descriptor.
	 * @param parentFQN the fully qualified name of the parent class
	 * @param name the name to search for
	 * @param descr the descriptor to search for, or null if it's not a method
	 * @param strict whether the search should be strict (see {@link Target#strict()} for more info),
	 *               only applies to method searches
	 * @param field whether the member being searched is a field
	 * @param env the {@link ProcessingEnvironment} to perform the operation in
	 * @return the desired member, if it exists
	 * @throws AmbiguousDefinitionException if it finds more than one candidate
	 * @throws TargetNotFoundException if it finds no valid candidate
	 * @since 0.3.0
	 */
	private static Element findMember(String parentFQN, String name, String descr, boolean strict, boolean field, ProcessingEnvironment env) {
		TypeElement parent = env.getElementUtils().getTypeElement(parentFQN);
		if(parent == null)
			throw new AmbiguousDefinitionException(String.format("Could not find parent class %s!", parentFQN));
		//try to find by name
		List<Element> candidates = parent.getEnclosedElements()
			.stream()
			.filter(e -> (field && e instanceof VariableElement) || e instanceof ExecutableElement)
			.filter(e -> e.getSimpleName().contentEquals(name))
			.collect(Collectors.toList());
		if(candidates.size() == 0)
			throw new TargetNotFoundException(String.format("%s %s", name, descr));
		if(candidates.size() == 1 && (!strict || field))
			return candidates.get(0);
		if(descr == null) {
			throw new AmbiguousDefinitionException(
				String.format("Found %d methods named %s in class %s!", candidates.size(), name, parentFQN)
			);
		} else {
			candidates = candidates.stream()
				.map(e -> (ExecutableElement) e)
				.filter(strict
					? c -> descr.equals(descriptorFromExecutableElement(c))
					: c -> descr.split("\\)")[0].equalsIgnoreCase(descriptorFromExecutableElement(c).split("\\)")[0])
				).collect(Collectors.toList());
			if(candidates.size() == 0)
				throw new TargetNotFoundException(String.format("%s %s", name, descr));
			if(candidates.size() > 1)
				throw new AmbiguousDefinitionException(
					String.format("Found %d methods named %s in class %s!", candidates.size(), name, parentFQN)
				);
			return candidates.get(0);
		}
	}

	/**
	 * Finds the real class member (field or method) corresponding to a stub annotated with
	 * {@link Target} or {@link Find}.
	 * @param stub the {@link ExecutableElement} for the stub
	 * @param env the {@link ProcessingEnvironment} to perform the operation in
	 * @return the {@link Element} corresponding to the method or field
	 * @throws AmbiguousDefinitionException if it finds more than one candidate
	 * @throws TargetNotFoundException if it finds no valid candidate
	 * @since 0.3.0
	 */
	public static Element findMemberFromStub(ExecutableElement stub, ProcessingEnvironment env) {
		//the parent always has a @Patch annotation
		Patch patchAnn = stub.getEnclosingElement().getAnnotation(Patch.class);
		//there should ever only be one of these two
		Target targetAnn = stub.getAnnotation(Target.class); //if this is null strict mode is always disabled
		Find findAnn = stub.getAnnotation(Find.class); //this may be null, it means no fallback info
		String parentFQN = findClassName(patchAnn, findAnn);
		String methodDescriptor =
			findAnn != null
				? methodDescriptorFromParams(findAnn, Find::params, env.getElementUtils())
				: descriptorFromExecutableElement(stub);
		String memberName =
			findAnn != null && !findAnn.name().equals("")
				? findAnn.name()
				: stub.getSimpleName().toString();
		return findMember(
			parentFQN,
			memberName,
			methodDescriptor,
			targetAnn != null && targetAnn.strict(),
			targetAnn == null && !isMethodProxyStub(stub), //only evaluate if target is null
			env
		);
	}

	/**
	 * Utility method for finding out what type of proxy a method is.
	 * It will fail if the return type is not a known type of proxy.
	 * @param m the annotated {@link ExecutableElement}
	 * @return whether it returns a {@link MethodProxy} or a {@link FieldProxy}
	 * @throws NotAProxyException if it's neither
	 * @since 0.4.0
	 */
	public static boolean isMethodProxyStub(ExecutableElement m) {
		String returnTypeFQN = m.getReturnType().toString();
		if(returnTypeFQN.equals("ftbsc.lll.proxies.FieldProxy"))
			return false;
		else if(returnTypeFQN.equals("ftbsc.lll.proxies.MethodProxy"))
			return true;
		else throw new NotAProxyException(m.getEnclosingElement().getSimpleName().toString(), m.getSimpleName().toString());
	}
}