/*
 *  Copyright 2017 Anyware Services
 *
 *  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 org.ametys.cms.search.query;

import java.util.Arrays;
import java.util.Collection;
import java.util.Collections;
import java.util.LinkedHashSet;
import java.util.List;
import java.util.Map;
import java.util.Objects;
import java.util.Optional;
import java.util.Set;
import java.util.stream.Collector;
import java.util.stream.Collectors;

import org.apache.commons.lang3.StringUtils;

import org.ametys.core.util.LambdaUtils;

/**
 * Represents a search {@link Query} corresponding to the logical "or" between several other queries.
 */
public class OrQuery implements Query
{
    /** The list of queries. The queries on this list are distinct. */
    protected List<Query> _queries;
    
    /**
     * Build an OrQuery object.
     * @param queries the queries.
     */
    public OrQuery(Query... queries)
    {
        this(Arrays.asList(queries));
    }
    
    /**
     * Build an OrQuery object.
     * @param queries the queries as a Collection.
     */
    public OrQuery(Collection<Query> queries)
    {
        _queries = queries.stream().distinct().toList();
    }
    
    /**
     * Returns a {@link Collector} which collects {@link Query Queries} into an OR query
     * @return a {@link Collector} which collects {@link Query Queries} into an OR query
     */
    public static Collector<Query, ?, OrQuery> collector()
    {
        return LambdaUtils.Collectors.withListAccumulation(OrQuery::new);
    }
    
    /**
     * Get the list of queries in this "or".
     * @return the list of queries.
     */
    public List<Query> getQueries()
    {
        return Collections.unmodifiableList(_queries);
    }
    
    @Override
    public String build() throws QuerySyntaxException
    {
        // Optimize before building to build the simplest query possible
        Optional<Query> rewrittenQueryAsOptional = rewrite();
        if (rewrittenQueryAsOptional.isEmpty())
        {
            return "";
        }
        
        // handles case where query has been converted to match none, match all, or single query
        Query rewrittenQuery = rewrittenQueryAsOptional.get();
        if (!(rewrittenQuery instanceof OrQuery orQuery))
        {
            return rewrittenQuery.build();
        }
        
        // At this point we know that the query contains only non-null queries
        // but they can still build to a blank query
        List<Query> rewrittenQueries = orQuery.getQueries();
        
        boolean isFirst = true;
        StringBuilder sb = new StringBuilder();
        
        for (Query subQuery : rewrittenQueries)
        {
            String exprAsString = subQuery.build();
            if (StringUtils.isNotBlank(exprAsString))
            {
                if (!isFirst)
                {
                    sb.append(" OR ");
                }
                sb.append("(").append(exprAsString).append(")");
                isFirst = false;
            }
        }
        
        if (isFirst)
        {
            return "";
        }
        else
        {
            return sb.toString();
        }
    }
    
    public Optional<Object> buildAsJson() throws QuerySyntaxException
    {
        // Optimize before building to build the simplest query possible
        Optional<Query> rewrittenQueryAsOptional = rewrite();
        if (rewrittenQueryAsOptional.isEmpty())
        {
            return Optional.empty();
        }
        
        // handles case where query has been converted to match none, match all, or single query
        Query rewrittenQuery = rewrittenQueryAsOptional.get();
        if (!(rewrittenQuery instanceof OrQuery orQuery))
        {
            return rewrittenQuery.buildAsJson();
        }
        
        List<Query> rewrittenQueries = orQuery.getQueries();
        
        // At this point we know that the query contains only non-null queries
        // but they can still build to a blank query
        List<Object> builtQueries = rewrittenQueries.stream()
                                                    .map(LambdaUtils.wrap(Query::buildAsJson))
                                                    // filter out empty queries
                                                    .flatMap(Optional::stream)
                                                    .filter(q -> !(q instanceof String s) || !StringUtils.isBlank(s))
                                                    .toList();

        if (builtQueries.isEmpty())
        {
            return Optional.empty();
        }
        
        if (builtQueries.size() == 1)
        {
            return Optional.of(builtQueries.get(0));
        }

        return Optional.of(Map.of("bool", Map.of(Query.BOOL_SHOULD, builtQueries)));
    }
    
    public Optional<Query> rewrite()
    {
        boolean matchNone = false;
        Set<Query> queries = new LinkedHashSet<>();
        for (Query orignalQuery : _queries)
        {
            if (orignalQuery != null)
            {
                Optional<Query> rewrite = orignalQuery.rewrite();
                if (rewrite.isPresent())
                {
                    Query rewrittenQuery = rewrite.get();
                    // do not use instanceof here, as we don't want to match OrQuery subclasses
                    if (rewrittenQuery.getClass().getName().equals(OrQuery.class.getName()))
                    {
                        queries.addAll(((OrQuery) rewrittenQuery).getQueries());
                    }
                    else if (rewrittenQuery instanceof MatchAllQuery)
                    {
                        return Optional.of(new MatchAllQuery());
                    }
                    else if (rewrittenQuery instanceof MatchNoneQuery)
                    {
                        matchNone = true;
                    }
                    else
                    {
                        queries.add(rewrittenQuery);
                    }
                }
            }
        }

        if (queries.isEmpty())
        {
            return matchNone ? Optional.of(new MatchNoneQuery()) : Optional.empty();
        }
        
        if (queries.size() == 1)
        {
            return Optional.of(queries.iterator().next());
        }
        
        return Optional.of(new OrQuery(queries));
    }
    
    @Override
    public String toString(int indent)
    {
        String tagName = _tagNameForToString();
        final String orLineIndent = StringUtils.repeat(' ', indent);
        final int subIndent = indent + 2;
        final String subQueries = _queries
                .stream()
                .filter(Objects::nonNull)
                .map(sq -> sq.toString(subIndent))
                .collect(Collectors.joining("\n"));
        return orLineIndent + "[" + tagName + "]\n" + subQueries + "\n" + orLineIndent + "[/" + tagName + "]";
    }
    
    /**
     * The tag name for {@link #toString(int)} debug method.
     * @return The tag name for {@link #toString(int)} debug method.
     */
    protected String _tagNameForToString()
    {
        return "OR";
    }

    @Override
    public int hashCode()
    {
        return _queries.hashCode();
    }

    @Override
    public boolean equals(Object obj)
    {
        if (this == obj)
        {
            return true;
        }
        
        if (obj == null || getClass() != obj.getClass())
        {
            return false;
        }
        
        OrQuery other = (OrQuery) obj;
        return Objects.equals(_queries, other._queries);
    }
}