package org.testng.internal.annotations;

import java.lang.annotation.Annotation;
import java.lang.reflect.Constructor;
import java.lang.reflect.Method;
import java.util.Map;
import java.util.concurrent.ConcurrentHashMap;

import org.testng.IAnnotationTransformer;
import org.testng.ITestNGMethod;
import org.testng.annotations.AfterClass;
import org.testng.annotations.AfterGroups;
import org.testng.annotations.AfterMethod;
import org.testng.annotations.AfterSuite;
import org.testng.annotations.AfterTest;
import org.testng.annotations.BeforeClass;
import org.testng.annotations.BeforeGroups;
import org.testng.annotations.BeforeMethod;
import org.testng.annotations.BeforeSuite;
import org.testng.annotations.BeforeTest;
import org.testng.annotations.DataProvider;
import org.testng.annotations.Factory;
import org.testng.annotations.IAnnotation;
import org.testng.annotations.IConfigurationAnnotation;
import org.testng.annotations.IDataProviderAnnotation;
import org.testng.annotations.IFactoryAnnotation;
import org.testng.annotations.IListenersAnnotation;
import org.testng.annotations.IObjectFactoryAnnotation;
import org.testng.annotations.IParametersAnnotation;
import org.testng.annotations.ITestAnnotation;
import org.testng.annotations.Listeners;
import org.testng.annotations.ObjectFactory;
import org.testng.annotations.Optional;
import org.testng.annotations.Parameters;
import org.testng.annotations.Test;
import org.testng.annotations.TestInstance;
import org.testng.internal.ConstructorOrMethod;
import org.testng.internal.collections.Pair;

This class implements IAnnotationFinder with JDK5 annotations
/**
 * This class implements IAnnotationFinder with JDK5 annotations
 */
public class JDK15AnnotationFinder implements IAnnotationFinder {

  private final JDK15TagFactory m_tagFactory = new JDK15TagFactory();
  private final Map<Class<? extends IAnnotation>, Class<? extends Annotation>> m_annotationMap =
      new ConcurrentHashMap<>();
  private final Map<Pair<Annotation, ?>, IAnnotation> m_annotations = new ConcurrentHashMap<>();

  private final IAnnotationTransformer m_transformer;

  public JDK15AnnotationFinder(IAnnotationTransformer transformer) {
    m_transformer = transformer;
    m_annotationMap.put(IListenersAnnotation.class, Listeners.class);
    m_annotationMap.put(IDataProviderAnnotation.class, DataProvider.class);
    m_annotationMap.put(IFactoryAnnotation.class, Factory.class);
    m_annotationMap.put(IObjectFactoryAnnotation.class, ObjectFactory.class);
    m_annotationMap.put(IParametersAnnotation.class, Parameters.class);
    m_annotationMap.put(ITestAnnotation.class, Test.class);
    // internal
    m_annotationMap.put(IBeforeSuite.class, BeforeSuite.class);
    m_annotationMap.put(IAfterSuite.class, AfterSuite.class);
    m_annotationMap.put(IBeforeTest.class, BeforeTest.class);
    m_annotationMap.put(IAfterTest.class, AfterTest.class);
    m_annotationMap.put(IBeforeClass.class, BeforeClass.class);
    m_annotationMap.put(IAfterClass.class, AfterClass.class);
    m_annotationMap.put(IBeforeGroups.class, BeforeGroups.class);
    m_annotationMap.put(IAfterGroups.class, AfterGroups.class);
    m_annotationMap.put(IBeforeMethod.class, BeforeMethod.class);
    m_annotationMap.put(IAfterMethod.class, AfterMethod.class);
  }

  private <A extends Annotation> A findAnnotationInSuperClasses(Class<?> cls, Class<A> a) {
    // Hack for @Listeners: we don't look in superclasses for this annotation
    // because inheritance of this annotation causes aggregation instead of
    // overriding
    if (a.equals(org.testng.annotations.Listeners.class)) {

      return AnnotationHelper.getAnnotationFromClass(cls, a);
    } else {
      while (cls != null) {
        A result = AnnotationHelper.getAnnotationFromClass(cls, a);

        if (result != null) {
          return result;
        } else {
          cls = cls.getSuperclass();
        }
      }
    }

    return null;
  }

  @Override
  public <A extends IAnnotation> A findAnnotation(Method m, Class<A> annotationClass) {
    return findAnnotation(null, m, annotationClass);
  }

  @Override
  public <A extends IAnnotation> A findAnnotation(
      Class<?> clazz, Method m, Class<A> annotationClass) {
    final Class<? extends Annotation> a = m_annotationMap.get(annotationClass);
    if (a == null) {
      throw new IllegalArgumentException(
          "Java @Annotation class for '" + annotationClass + "' not found.");
    }
    Annotation annotation = AnnotationHelper.getAnnotationFromMethod(m, a);
    return findAnnotation(
        m.getDeclaringClass(),
        annotation,
        annotationClass,
        null,
        null,
        m,
        new Pair<>(annotation, m),
        clazz);
  }

  @Override
  public <A extends IAnnotation> A findAnnotation(ITestNGMethod tm, Class<A> annotationClass) {
    final Class<? extends Annotation> a = m_annotationMap.get(annotationClass);
    if (a == null) {
      throw new IllegalArgumentException(
          "Java @Annotation class for '" + annotationClass + "' not found.");
    }
    Method m = tm.getConstructorOrMethod().getMethod();
    Class<?> testClass = m.getDeclaringClass();
    if (tm.getInstance() != null) {
      testClass = tm.getInstance().getClass();
    }
    Annotation annotation = AnnotationHelper.getAnnotationFromMethod(m, a);
    if (annotation == null) {
      annotation = AnnotationHelper.getAnnotationFromClass(testClass, a);
    }
    return findAnnotation(
        testClass, annotation, annotationClass, null, null, m, new Pair<>(annotation, m), null);
  }

  @Override
  public <A extends IAnnotation> A findAnnotation(
      ConstructorOrMethod com, Class<A> annotationClass) {
    if (com.getConstructor() != null) {
      return findAnnotation(com.getConstructor(), annotationClass);
    }
    if (com.getMethod() != null) {
      return findAnnotation(com.getMethod(), annotationClass);
    }
    return null;
  }

  private void transform(
      IAnnotation a,
      Class<?> testClass,
      Constructor<?> testConstructor,
      Method testMethod,
      Class<?> whichClass) {
    //
    // Transform @Test
    //
    if (a instanceof ITestAnnotation) {
      if (m_transformer instanceof org.testng.internal.annotations.IAnnotationTransformer) {
        org.testng.internal.annotations.IAnnotationTransformer transformer =
            (org.testng.internal.annotations.IAnnotationTransformer) m_transformer;
        transformer.transform(
            (ITestAnnotation) a, testClass, testConstructor, testMethod, whichClass);
      } else {
        m_transformer.transform((ITestAnnotation) a, testClass, testConstructor, testMethod);
      }
    } else if (a instanceof IConfigurationAnnotation) {
      IConfigurationAnnotation configuration = (IConfigurationAnnotation) a;
      m_transformer.transform(configuration, testClass, testConstructor, testMethod);
    } else if (a instanceof IDataProviderAnnotation) {
      m_transformer.transform((IDataProviderAnnotation) a, testMethod);
    } else if (a instanceof IFactoryAnnotation) {
      m_transformer.transform((IFactoryAnnotation) a, testMethod);
    } else if (a instanceof IListenersAnnotation) {
      m_transformer.transform((IListenersAnnotation) a, testClass);
    }
  }


  @Override
  public <A extends IAnnotation> A findAnnotation(Class<?> cls, Class<A> annotationClass) {
    final Class<? extends Annotation> a = m_annotationMap.get(annotationClass);
    if (a == null) {
      throw new IllegalArgumentException(
          "Java @Annotation class for '" + annotationClass + "' not found.");
    }
    Annotation annotation = findAnnotationInSuperClasses(cls, a);
    return findAnnotation(
        cls,
        annotation,
        annotationClass,
        cls,
        null,
        null,
        new Pair<>(annotation, annotationClass),
        null);
  }

  @Override
  public <A extends IAnnotation> A findAnnotation(Constructor<?> cons, Class<A> annotationClass) {
    final Class<? extends Annotation> a = m_annotationMap.get(annotationClass);
    if (a == null) {
      throw new IllegalArgumentException(
          "Java @Annotation class for '" + annotationClass + "' not found.");
    }
    Annotation annotation = AnnotationHelper.getAnnotationFromConstructor(cons, a);
    return findAnnotation(
        cons.getDeclaringClass(),
        annotation,
        annotationClass,
        null,
        cons,
        null,
        new Pair<>(annotation, cons),
        null);
  }

  private <A extends IAnnotation> A findAnnotation(
      Class<?> cls,
      Annotation a,
      Class<A> annotationClass,
      Class<?> testClass,
      Constructor<?> testConstructor,
      Method testMethod,
      Pair<Annotation, ?> p,
      Class<?> whichClass) {
    if (a == null) {
      return null;
    }

    IAnnotation result = m_annotations.computeIfAbsent(p, key -> {
      IAnnotation obj = m_tagFactory.createTag(cls, testMethod, a, annotationClass);
      transform(obj, testClass, testConstructor, testMethod, whichClass);
      return obj;
    });
    if (whichClass == null && testClass != null) {
      transform(result, testClass, testConstructor, testMethod, whichClass);
    }
    //noinspection unchecked
    return (A) result;
  }

  @Override
  public boolean hasTestInstance(Method method, int i) {
    final Annotation[][] annotations = method.getParameterAnnotations();
    if (annotations.length > 0 && annotations[i].length > 0) {
      final Annotation[] pa = annotations[i];
      for (Annotation a : pa) {
        if (a instanceof TestInstance) {
          return true;
        }
      }
    }
    return false;
  }

  @Override
  public String[] findOptionalValues(Method method) {
    return optionalValues(method.getParameterAnnotations());
  }

  @Override
  public String[] findOptionalValues(Constructor<?> method) {
    return optionalValues(method.getParameterAnnotations());
  }

  private String[] optionalValues(Annotation[][] annotations) {
    String[] result = new String[annotations.length];
    for (int i = 0; i < annotations.length; i++) {
      for (Annotation a : annotations[i]) {
        if (a instanceof Optional) {
          result[i] = ((Optional) a).value();
          break;
        }
      }
    }
    return result;
  }
}