/*
 * Copyright 2013-present Facebook, Inc.
 *
 * Licensed under the Apache License, Version 2.0 (the "License"); you may
 * not use this file except in compliance with the License. You may obtain
 * a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
 * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
 * License for the specific language governing permissions and limitations
 * under the License.
 */

package com.facebook.buck.rules;

import com.facebook.buck.io.ProjectFilesystem;
import com.facebook.buck.model.BuildTarget;
import com.facebook.buck.model.BuildTargetPattern;
import com.facebook.buck.parser.BuildTargetParser;
import com.facebook.buck.parser.NoSuchBuildTargetException;
import com.facebook.buck.parser.BuildTargetPatternParser;
import com.facebook.buck.rules.coercer.TypeCoercerFactory;
import com.google.common.annotations.VisibleForTesting;
import com.google.common.base.Optional;
import com.google.common.cache.Cache;
import com.google.common.cache.CacheBuilder;
import com.google.common.collect.ImmutableSet;

import java.lang.reflect.Field;
import java.lang.reflect.Modifier;
import java.nio.file.Path;
import java.util.List;
import java.util.Map;
import java.util.Set;
import java.util.concurrent.Callable;
import java.util.concurrent.ExecutionException;

/**
 * Used to derive information from the constructor args returned by {@link Description} instances.
 * There are two major uses this information is put to: populating the DTO object from the
 * deserialized JSON maps, which are outputted by the functions added to Buck's core build file
 * parsing script. The second function of this class is to generate those functions.
 */
public class ConstructorArgMarshaller {

  private final TypeCoercerFactory typeCoercerFactory;
  private final Cache<Class<?>, ImmutableSet<ParamInfo<?>>> coercedTypes;

  /**
   * Constructor. {@code pathFromProjectRootToBuildFile} is the path relative to the project root to
   * the build file that has called the build rule's function in buck.py. This is used for resolving
   * additional paths to ones relative to the project root, and to allow {@link BuildTarget}
   * instances to be fully qualified.
   */
  public ConstructorArgMarshaller() {
    this.typeCoercerFactory = new TypeCoercerFactory();
    this.coercedTypes = CacheBuilder.newBuilder().build();
  }

  /**
   * Use the information contained in the {@code params} to fill in the public fields and settable
   * properties of {@code dto}. The following rules are used:
   * <ul>
   *   <li>Boolean values are set to true or false.</li>
   *   <li>{@link BuildTarget}s are resolved and will be fully qualified.</li>
   *   <li>Numeric values are handled as if being cast from Long.</li>
   *   <li>{@link SourcePath} instances will be set to the appropriate implementation.</li>
   *   <li>{@link Path} declarations will be set to be relative to the project root.</li>
   *   <li>Strings will be set "as is".</li>
   *   <li>{@link List}s and {@link Set}s will be populated with the expected generic type,
   *   provided the wildcarding allows an upperbound to be determined to be one of the above.</li>
   * </ul>
   *
   * Any property that is marked as being an {@link Optional} field will be set to a default value
   * if none is set. This is typically {@link Optional#absent()}, but in the case of collections is
   * an empty collection.
   * @param params The parameters to be used to populate the {@code dto} instance.
   * @param dto The constructor dto to be populated.
   * @param declaredDeps A builder to be populated with the declared dependencies.
   * @param visibilityPatterns A builder to be populated with the visibility patterns.
   */
  public void populate(
      ProjectFilesystem filesystem,
      BuildRuleFactoryParams params,
      Object dto,
      ImmutableSet.Builder<BuildTarget> declaredDeps,
      ImmutableSet.Builder<BuildTargetPattern> visibilityPatterns,
      Map<String, ?> instance) throws ConstructorArgMarshalException, NoSuchBuildTargetException {
    populate(
        filesystem,
        params,
        dto,
        declaredDeps,
        instance,
        /* populate all fields, optional and required */ false);
    populateVisibilityPatterns(params.buildTargetParser, visibilityPatterns, instance);
  }

  @VisibleForTesting
  void populate(
      ProjectFilesystem filesystem,
      BuildRuleFactoryParams params,
      Object dto,
      final ImmutableSet.Builder<BuildTarget> declaredDeps,
      Map<String, ?> instance,
      boolean onlyOptional) throws ConstructorArgMarshalException {
    Set<ParamInfo<?>> allInfo = getAllParamInfo(dto);

    for (ParamInfo<?> info : allInfo) {
      if (onlyOptional && !info.isOptional()) {
        continue;
      }
      try {
        info.setFromParams(filesystem, params, dto, instance);
      } catch (ParamInfoException e) {
        throw new ConstructorArgMarshalException(e.getMessage(), e);
      }
      if (info.getName().equals("deps")) {
        populateDeclaredDeps(info, declaredDeps, dto);
      }
    }
  }

  @SuppressWarnings("unchecked")
  private <T> void populateDeclaredDeps(
      ParamInfo<T> paramInfo,
      final ImmutableSet.Builder<BuildTarget> declaredDeps,
      Object dto) {
    paramInfo.traverse(
        new ParamInfo.Traversal() {
          @Override
          public void traverse(Object object) {
            if (!(object instanceof BuildTarget)) {
              return;
            }
            declaredDeps.add((BuildTarget) object);
          }
        },
        (T) dto);
  }

  @SuppressWarnings("unchecked")
  private void populateVisibilityPatterns(
      BuildTargetParser targetParser,
      ImmutableSet.Builder<BuildTargetPattern> visibilityPatterns,
      Map<String, ?> instance) throws NoSuchBuildTargetException {
    Object value = instance.get("visibility");
    if (value != null) {
      if (!(value instanceof List)) {
        throw new RuntimeException(
            String.format("Expected an array for visibility but was %s", value));
      }

      for (String visibility : (List<String>) value) {
        visibilityPatterns.add(
            BuildTargetPatternParser.forVisibilityArgument(targetParser).parse(visibility));
      }
    }
  }

  ImmutableSet<ParamInfo<?>> getAllParamInfo(Object dto) {
    final Class<?> argClass = dto.getClass();
    try {
      return coercedTypes.get(argClass, new Callable<ImmutableSet<ParamInfo<?>>>() {
            @Override
            public ImmutableSet<ParamInfo<?>> call() {
              ImmutableSet.Builder<ParamInfo<?>> allInfo = ImmutableSet.builder();

              for (Field field : argClass.getFields()) {
                if (Modifier.isFinal(field.getModifiers())) {
                  continue;
                }
                allInfo.add(new ParamInfo<>(typeCoercerFactory, field));
              }

              return allInfo.build();
            }
          });
    } catch (ExecutionException e) {
      // This gets thrown if we saw an error when loading the value. Nothing sane to do here, and
      // we (previously, before using a cache), simply allowed a RuntimeException to bubble up.
      // Maintain that behaviour.
      throw new RuntimeException(e);
    }
  }
}