/*
 * Licensed to the Apache Software Foundation (ASF) under one or more
 * contributor license agreements.  See the NOTICE file distributed with
 * this work for additional information regarding copyright ownership.
 * The ASF licenses this file to You 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 org.apache.servicecomb.governance.marker;

import java.util.HashMap;
import java.util.Map;
import java.util.Map.Entry;

import org.apache.commons.lang3.StringUtils;
import org.apache.servicecomb.governance.marker.operator.MatchOperator;
import org.apache.servicecomb.governance.marker.operator.RawOperator;
import org.apache.servicecomb.governance.utils.CustomMatch;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.beans.BeansException;
import org.springframework.beans.factory.support.BeanDefinitionBuilder;
import org.springframework.beans.factory.support.BeanDefinitionRegistry;
import org.springframework.context.ApplicationContext;
import org.springframework.context.ApplicationContextAware;

/**
 * Request Processor checks if a request matches a configuration.
 */
public class RequestProcessor implements ApplicationContextAware {

  private static final Logger LOGGER = LoggerFactory.getLogger(RequestProcessor.class);

  public static final String errorMessageForNotImplements = " didn't implement interface org.apache.servicecomb.governance.utils.CustomMatch";

  public static final String errorMessageForAbstractClass = " should be a instantiable class rather than abstract class or other else";

  public static final String infoMessageForCreatingClass = "is not in spring container, create one and register it to spring container";

  private final Map<String, MatchOperator> operatorMap;

  private ApplicationContext applicationContext;

  public RequestProcessor(Map<String, MatchOperator> operatorMap) {
    this.operatorMap = new HashMap<>(operatorMap.size());
    operatorMap.forEach((k, v) -> this.operatorMap.put(v.name(), v));
  }

  public boolean match(GovernanceRequestExtractor request, Matcher matcher) {
    if (!methodMatch(request, matcher)) {
      return false;
    }
    if (!apiPathMatch(request, matcher)) {
      return false;
    }
    if (!headersMatch(request, matcher)) {
      return false;
    }
    if (!queriesMatch(request, matcher)) {
      return false;
    }
    if (!serviceNameMatch(request, matcher)) {
      return false;
    }
    return customMatch(request, matcher);
  }

  private boolean serviceNameMatch(GovernanceRequestExtractor request, Matcher matcher) {
    if (matcher.getServiceName() == null) {
      return true;
    }
    return matcher.getServiceName().equals(request.serviceName());
  }

  private boolean headersMatch(GovernanceRequestExtractor request, Matcher matcher) {
    if (matcher.getHeaders() == null) {
      return true;
    }
    for (Entry<String, RawOperator> entry : matcher.getHeaders().entrySet()) {
      if (request.header(entry.getKey()) == null ||
          !operatorMatch(request.header(entry.getKey()), entry.getValue())) {
        return false;
      }
    }
    return true;
  }

  private boolean queriesMatch(GovernanceRequestExtractor request, Matcher matcher) {
    if (matcher.getQueries() == null) {
      return true;
    }
    for (Entry<String, RawOperator> entry : matcher.getQueries().entrySet()) {
      if (request.query(entry.getKey()) == null ||
          !operatorMatch(request.query(entry.getKey()), entry.getValue())) {
        return false;
      }
    }
    return true;
  }

  private boolean apiPathMatch(GovernanceRequestExtractor request, Matcher matcher) {
    if (matcher.getApiPath() == null) {
      return true;
    }
    return operatorMatch(request.apiPath(), matcher.getApiPath());
  }

  private boolean methodMatch(GovernanceRequestExtractor request, Matcher matcher) {
    if (matcher.getMethod() == null) {
      return true;
    }
    return matcher.getMethod().contains(request.method());
  }

  private boolean operatorMatch(String str, RawOperator rawOperator) {
    if (rawOperator.isEmpty()) {
      return false;
    }

    for (Entry<String, String> entry : rawOperator.entrySet()) {
      MatchOperator operator = operatorMap.get(entry.getKey());
      if (operator == null) {
        LOGGER.error("unsupported operator:" + entry.getKey() + ", please use one of :" + operatorMap.keySet());
        return false;
      }
      if (!operator.match(str, entry.getValue())) {
        return false;
      }
    }
    return true;
  }

  private boolean customMatch(GovernanceRequestExtractor request, Matcher matcher) {
    if (matcher.getCustomMatcher() == null) {
      return true;
    }
    String customMatcherHandlerName = matcher.getCustomMatcher().getCustomMatcherHandler();
    String customMatcherParameters = matcher.getCustomMatcher().getCustomMatcherParameters();

    if (StringUtils.isEmpty(customMatcherHandlerName) || StringUtils.isEmpty(customMatcherParameters)) {
      return true;
    }

    CustomMatch customMatcherHandler = generateHandler(customMatcherHandlerName);
    return customMatcherHandler.matchRequest(request, customMatcherParameters);
  }

  private CustomMatch getBeanByHandlerName(String customMatcherHandler) {
    Object extractObject = null;
    if (applicationContext.containsBean(customMatcherHandler)) {
      extractObject = applicationContext.getBean(customMatcherHandler);
      if (!(extractObject instanceof CustomMatch)) {
        LOGGER.error("{} {}", customMatcherHandler, errorMessageForNotImplements);
        throw new RuntimeException(customMatcherHandler + errorMessageForNotImplements);
      }
      return (CustomMatch) extractObject;
    }
    return null;
  }


  public CustomMatch generateHandler(String customMatcherHandler) {
    CustomMatch extractObject = getBeanByHandlerName(customMatcherHandler);
    if (extractObject != null) {
      return extractObject;
    }

    LOGGER.info("{} {}", customMatcherHandler, infoMessageForCreatingClass);
    Class<?> extractionHandlerClass = null;
    try {
      extractionHandlerClass = Class.forName(customMatcherHandler);
    } catch (ClassNotFoundException e) {
      LOGGER.error(e.getMessage(), e);
      throw new RuntimeException(e);
    }

    if (!CustomMatch.class.isAssignableFrom(extractionHandlerClass)) {
      LOGGER.error("{} {}", customMatcherHandler, errorMessageForNotImplements);
      throw new RuntimeException(customMatcherHandler + errorMessageForNotImplements);
    }
    BeanDefinitionBuilder builder = BeanDefinitionBuilder.genericBeanDefinition(extractionHandlerClass);
    BeanDefinitionRegistry registry = (BeanDefinitionRegistry) applicationContext;
    registry.registerBeanDefinition(customMatcherHandler, builder.getBeanDefinition());
    try {
      extractObject = (CustomMatch) applicationContext.getBean(customMatcherHandler);
      return extractObject;
    } catch (BeansException e) {
      LOGGER.error(e.getMessage(), e);
      throw new RuntimeException(customMatcherHandler + errorMessageForAbstractClass, e);
    }
  }

  @Override
  public void setApplicationContext(ApplicationContext applicationContext) throws BeansException {
    this.applicationContext = applicationContext;
  }
}
