/*
 * 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.drill.exec.store.enumerable.plan;

import java.util.concurrent.ExecutionException;
import java.util.concurrent.TimeUnit;
import java.util.function.Predicate;

import org.apache.calcite.adapter.jdbc.JdbcConvention;
import org.apache.calcite.adapter.jdbc.JdbcRules;
import org.apache.calcite.plan.RelOptRuleCall;
import org.apache.calcite.plan.RelTrait;
import org.apache.calcite.rel.RelCollations;
import org.apache.calcite.rel.RelNode;
import org.apache.calcite.rel.convert.ConverterRule;
import org.apache.calcite.rel.core.Sort;
import org.apache.calcite.rel.logical.LogicalFilter;
import org.apache.calcite.rel.logical.LogicalProject;
import org.apache.calcite.rex.RexNode;

import org.apache.drill.exec.planner.common.DrillLimitRelBase;
import com.google.common.cache.CacheBuilder;
import com.google.common.cache.CacheLoader;
import com.google.common.cache.LoadingCache;
import org.apache.drill.exec.planner.logical.DrillRelFactories;

public abstract class DrillJdbcRuleBase extends ConverterRule {

  protected final LoadingCache<RexNode, Boolean> checkedExpressions = CacheBuilder.newBuilder()
      .maximumSize(1000)
      .expireAfterWrite(10, TimeUnit.MINUTES)
      .build(
          new CacheLoader<RexNode, Boolean>() {
            @Override
            public Boolean load(RexNode expr) {
              return JdbcExpressionCheck.isOnlyStandardExpressions(expr);
            }
          });

  protected final JdbcConvention out;

  protected DrillJdbcRuleBase(Class<? extends RelNode> clazz, RelTrait in, JdbcConvention out, String description) {
    super(Config.INSTANCE
      .withConversion(clazz, (Predicate<RelNode>) input -> true, in, out, description)
      .withRelBuilderFactory(DrillRelFactories.LOGICAL_BUILDER)
      .as(Config.class));
    this.out = out;
  }

  public static class DrillJdbcProjectRule extends DrillJdbcRuleBase {

    public DrillJdbcProjectRule(RelTrait in, JdbcConvention out) {
      super(LogicalProject.class, in, out, "DrillJdbcProjectRule");
    }

    @Override
    public RelNode convert(RelNode rel) {
      LogicalProject project = (LogicalProject) rel;
      return new JdbcRules.JdbcProject(rel.getCluster(), rel.getTraitSet().replace(this.out), convert(
          project.getInput(), project.getInput().getTraitSet().replace(this.out).simplify()), project.getProjects(),
          project.getRowType());
    }

    @Override
    public boolean matches(RelOptRuleCall call) {
      try {

        final LogicalProject project = call.rel(0);
        for (RexNode node : project.getProjects()) {
          if (!checkedExpressions.get(node)) {
            return false;
          }
        }
        return true;

      } catch (ExecutionException e) {
        throw new IllegalStateException("Failure while trying to evaluate pushdown.", e);
      }
    }
  }

  public static class DrillJdbcFilterRule extends DrillJdbcRuleBase {

    public DrillJdbcFilterRule(RelTrait in, JdbcConvention out) {
      super(LogicalFilter.class, in, out, "DrillJdbcFilterRule");
    }

    @Override
    public RelNode convert(RelNode rel) {
      LogicalFilter filter = (LogicalFilter) rel;

      return new JdbcRules.JdbcFilter(rel.getCluster(), rel.getTraitSet().replace(this.out), convert(filter.getInput(),
          filter.getInput().getTraitSet().replace(this.out).simplify()), filter.getCondition());
    }

    @Override
    public boolean matches(RelOptRuleCall call) {
      try {
        LogicalFilter filter = call.rel(0);
        return checkedExpressions.get(filter.getCondition());
      } catch (ExecutionException e) {
        throw new IllegalStateException("Failure while trying to evaluate push down.", e);
      }
    }
  }

  public static class DrillJdbcSortRule extends DrillJdbcRuleBase {

    public DrillJdbcSortRule(RelTrait in, JdbcConvention out) {
      super(Sort.class, in, out, "DrillJdbcSortRule");
    }

    @Override
    public RelNode convert(RelNode rel) {
      Sort sort = (Sort) rel;

      return new DrillJdbcSort(sort.getCluster(), sort.getTraitSet().replace(this.out),
          convert(sort.getInput(), sort.getInput().getTraitSet().replace(this.out).simplify()),
          sort.collation, sort.offset, sort.fetch);
    }
  }

  public static class DrillJdbcLimitRule extends DrillJdbcRuleBase {

    public DrillJdbcLimitRule(RelTrait in, JdbcConvention out) {
      super(DrillLimitRelBase.class, in, out, "DrillJdbcLimitRule");
    }

    @Override
    public boolean matches(RelOptRuleCall call) {
      DrillLimitRelBase limit = call.rel(0);
      return !limit.isPushDown() && super.matches(call);
    }

    @Override
    public RelNode convert(RelNode rel) {
      DrillLimitRelBase limit = (DrillLimitRelBase) rel;

      return new DrillJdbcSort(limit.getCluster(), limit.getTraitSet().plus(RelCollations.EMPTY).replace(this.out).simplify(),
          convert(limit.getInput(), limit.getInput().getTraitSet().replace(this.out).simplify()),
          RelCollations.EMPTY, limit.getOffset(), limit.getFetch());
    }
  }
}
