/*
    * 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.shardingsphere.encrypt.rewrite.token.generator;
  
  import lombok.Setter;
  import org.apache.shardingsphere.encrypt.rewrite.aware.DatabaseTypeAware;
  import org.apache.shardingsphere.encrypt.rewrite.aware.EncryptRuleAware;
  import org.apache.shardingsphere.encrypt.rule.EncryptRule;
  import org.apache.shardingsphere.encrypt.rule.EncryptTable;
  import org.apache.shardingsphere.encrypt.rule.column.EncryptColumn;
  import org.apache.shardingsphere.infra.binder.context.segment.select.orderby.OrderByItem;
  import org.apache.shardingsphere.infra.binder.context.segment.select.projection.Projection;
  import org.apache.shardingsphere.infra.binder.context.segment.select.projection.impl.ColumnProjection;
  import org.apache.shardingsphere.infra.binder.context.statement.SQLStatementContext;
  import org.apache.shardingsphere.infra.binder.context.statement.dml.SelectStatementContext;
  import org.apache.shardingsphere.infra.database.core.metadata.database.enums.QuoteCharacter;
  import org.apache.shardingsphere.infra.database.core.type.DatabaseType;
  import org.apache.shardingsphere.infra.database.core.type.DatabaseTypeRegistry;
  import org.apache.shardingsphere.infra.metadata.database.schema.model.ShardingSphereSchema;
  import org.apache.shardingsphere.infra.rewrite.sql.token.generator.CollectionSQLTokenGenerator;
  import org.apache.shardingsphere.infra.rewrite.sql.token.generator.aware.SchemaMetaDataAware;
  import org.apache.shardingsphere.infra.rewrite.sql.token.pojo.SQLToken;
  import org.apache.shardingsphere.infra.rewrite.sql.token.pojo.generic.SubstitutableColumnNameToken;
  import org.apache.shardingsphere.sql.parser.sql.common.segment.dml.column.ColumnSegment;
  import org.apache.shardingsphere.sql.parser.sql.common.segment.dml.order.item.ColumnOrderByItemSegment;
  import org.apache.shardingsphere.sql.parser.sql.common.value.identifier.IdentifierValue;
  
  import java.util.Collection;
  import java.util.Collections;
  import java.util.LinkedHashSet;
  import java.util.LinkedList;
  import java.util.Map;
  import java.util.Optional;
  
  /**
   * Group by item token generator for encrypt.
   */
  @Setter
  public final class EncryptGroupByItemTokenGenerator implements CollectionSQLTokenGenerator<SQLStatementContext>, SchemaMetaDataAware, EncryptRuleAware, DatabaseTypeAware {
      
      private String databaseName;
      
      private Map<String, ShardingSphereSchema> schemas;
      
      private EncryptRule encryptRule;
      
      private DatabaseType databaseType;
      
      @Override
      public boolean isGenerateSQLToken(final SQLStatementContext sqlStatementContext) {
          return sqlStatementContext instanceof SelectStatementContext && containsGroupByItem(sqlStatementContext);
      }
      
      @Override
      public Collection<SQLToken> generateSQLTokens(final SQLStatementContext sqlStatementContext) {
          Collection<SQLToken> result = new LinkedHashSet<>();
          String defaultSchema = new DatabaseTypeRegistry(sqlStatementContext.getDatabaseType()).getDefaultSchemaName(databaseName);
          ShardingSphereSchema schema = sqlStatementContext.getTablesContext().getSchemaName().map(schemas::get).orElseGet(() -> schemas.get(defaultSchema));
          for (OrderByItem each : getGroupByItems(sqlStatementContext)) {
              if (each.getSegment() instanceof ColumnOrderByItemSegment) {
                  ColumnSegment columnSegment = ((ColumnOrderByItemSegment) each.getSegment()).getColumn();
                  Map<String, String> columnTableNames = sqlStatementContext.getTablesContext().findTableNamesByColumnSegment(Collections.singleton(columnSegment), schema);
                  result.addAll(generateSQLTokensWithColumnSegments(Collections.singleton(columnSegment), columnTableNames));
              }
          }
          return result;
      }
      
      private Collection<SubstitutableColumnNameToken> generateSQLTokensWithColumnSegments(final Collection<ColumnSegment> columnSegments, final Map<String, String> columnTableNames) {
          Collection<SubstitutableColumnNameToken> result = new LinkedList<>();
          for (ColumnSegment each : columnSegments) {
              String tableName = columnTableNames.getOrDefault(each.getExpression(), "");
              Optional<EncryptTable> encryptTable = encryptRule.findEncryptTable(tableName);
              String columnName = each.getIdentifier().getValue();
              if (!encryptTable.isPresent() || !encryptTable.get().isEncryptColumn(columnName)) {
                  continue;
              }
              int startIndex = each.getOwner().isPresent() ? each.getOwner().get().getStopIndex() + 2 : each.getStartIndex();
              int stopIndex = each.getStopIndex();
              EncryptColumn encryptColumn = encryptTable.get().getEncryptColumn(columnName);
              SubstitutableColumnNameToken encryptColumnNameToken = encryptColumn.getAssistedQuery()
                      .map(optional -> new SubstitutableColumnNameToken(startIndex, stopIndex, createColumnProjections(optional.getName(), each.getIdentifier().getQuoteCharacter()), databaseType))
                      .orElseGet(() -> new SubstitutableColumnNameToken(startIndex, stopIndex, createColumnProjections(encryptColumn.getCipher().getName(), each.getIdentifier().getQuoteCharacter()),
                              databaseType));
             result.add(encryptColumnNameToken);
         }
         return result;
     }
     
     private Collection<OrderByItem> getGroupByItems(final SQLStatementContext sqlStatementContext) {
         if (!(sqlStatementContext instanceof SelectStatementContext)) {
             return Collections.emptyList();
         }
         SelectStatementContext statementContext = (SelectStatementContext) sqlStatementContext;
         Collection<OrderByItem> result = new LinkedList<>(statementContext.getGroupByContext().getItems());
         for (SelectStatementContext each : statementContext.getSubqueryContexts().values()) {
             result.addAll(getGroupByItems(each));
         }
         return result;
     }
     
     private boolean containsGroupByItem(final SQLStatementContext sqlStatementContext) {
         if (!(sqlStatementContext instanceof SelectStatementContext)) {
             return false;
         }
         SelectStatementContext statementContext = (SelectStatementContext) sqlStatementContext;
         if (!statementContext.getGroupByContext().getItems().isEmpty()) {
             return true;
         }
         for (SelectStatementContext each : statementContext.getSubqueryContexts().values()) {
             if (containsGroupByItem(each)) {
                 return true;
             }
         }
         return false;
     }
     
     private Collection<Projection> createColumnProjections(final String columnName, final QuoteCharacter quoteCharacter) {
         return Collections.singleton(new ColumnProjection(null, new IdentifierValue(columnName, quoteCharacter), null, databaseType));
     }
 }