CEqual.java

/*
 * @cond LICENSE
 * ######################################################################################
 * # LGPL License                                                                       #
 * #                                                                                    #
 * # This file is part of the LightJason AgentSpeak(L++)                                #
 * # Copyright (c) 2015-19, LightJason (info@lightjason.org)                            #
 * # This program is free software: you can redistribute it and/or modify               #
 * # it under the terms of the GNU Lesser General Public License as                     #
 * # published by the Free Software Foundation, either version 3 of the                 #
 * # License, or (at your option) any later version.                                    #
 * #                                                                                    #
 * # This program is distributed in the hope that it will be useful,                    #
 * # but WITHOUT ANY WARRANTY; without even the implied warranty of                     #
 * # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                      #
 * # GNU Lesser General Public License for more details.                                #
 * #                                                                                    #
 * # You should have received a copy of the GNU Lesser General Public License           #
 * # along with this program. If not, see http://www.gnu.org/licenses/                  #
 * ######################################################################################
 * @endcond
 */

package org.lightjason.agentspeak.action.builtin.bool;

import com.google.common.collect.Multimap;
import org.lightjason.agentspeak.action.builtin.IBuiltinAction;
import org.lightjason.agentspeak.language.CCommon;
import org.lightjason.agentspeak.language.CRawTerm;
import org.lightjason.agentspeak.language.ITerm;
import org.lightjason.agentspeak.language.execution.IContext;
import org.lightjason.agentspeak.language.fuzzy.CFuzzyValue;
import org.lightjason.agentspeak.language.fuzzy.IFuzzyValue;

import javax.annotation.Nonnegative;
import javax.annotation.Nonnull;
import java.util.Arrays;
import java.util.Collection;
import java.util.List;
import java.util.Map;
import java.util.stream.Stream;


/**
 * checks elements of equality.
 * The actions checks the first argument
 * to all others arguments of equality,
 * list structures won't be unflaten, but
 * elementwise compared, the action never fails.
 * On number arguments not the value must equal, also the type (double / integral) must be equal,
 * so keep in mind, that you use the correct number type on the argument input
 *
 * {@code [E1|E2] = bool/equal( "this is equal", "this is equal", [123, "test"] );}
 */
public class CEqual extends IBuiltinAction
{
    /**
     * serial id
     */
    private static final long serialVersionUID = -2953614515361905328L;

    @Nonnegative
    @Override
    public final int minimalArgumentNumber()
    {
        return 2;
    }

    @Nonnull
    @Override
    public final IFuzzyValue<Boolean> execute( final boolean p_parallel, @Nonnull final IContext p_context,
                                               @Nonnull final List<ITerm> p_argument, @Nonnull final List<ITerm> p_return
    )
    {
        if ( CCommon.rawvalueAssignableTo( p_argument.get( 0 ), Collection.class ) )
            return this.pack(
                p_return,
                p_argument.stream()
                          .skip( 1 )
                          .map( i -> p_argument.get( 0 ).equals( i )
                                     || ( CCommon.rawvalueAssignableTo( i, Collection.class )
                                     && equalcollection(  p_argument.get( 0 ).<Collection<?>>raw().toArray(), i.raw() ) )
                          )
            );

        if ( CCommon.rawvalueAssignableTo( p_argument.get( 0 ), Map.class ) )
            return this.pack(
                p_return,
                p_argument.stream()
                          .skip( 1 )
                          .map( i -> p_argument.get( 0 ).equals( i )
                                     || ( CCommon.rawvalueAssignableTo( i, Map.class )
                                     && equalmap(  p_argument.get( 0 ).<Map<?, ?>>raw(), i.<Map<?, ?>>raw() ) )
                          )
            );

        if ( CCommon.rawvalueAssignableTo( p_argument.get( 0 ), Multimap.class ) )
            return this.pack(
                p_return,
                p_argument.stream()
                          .skip( 1 )
                          .map( i -> p_argument.get( 0 ).equals( i )
                                     || ( CCommon.rawvalueAssignableTo( i, Multimap.class )
                                     && equalmultimap(  p_argument.get( 0 ).<Multimap<?, ?>>raw(), i.<Multimap<?, ?>>raw() ) )
                          )
            );


        return this.pack(
            p_return,
            p_argument.stream()
                      .skip( 1 )
                      .map( i -> equalobject(  p_argument.get( 0 ).<Object>raw(), i.<Object>raw() ) )
        );
    }


    /**
     * apply to change boolean result
     *
     * @param p_value boolean result
     * @return boolean value
     */
    protected boolean apply( final boolean p_value )
    {
        return p_value;
    }


    /**
     * pack the result values into term
     *
     * @param p_return return item list
     * @param p_stream boolean input stream
     * @return boolean flag
     */
    private IFuzzyValue<Boolean> pack( @Nonnull final List<ITerm> p_return, @Nonnull final Stream<Boolean> p_stream )
    {
        p_stream.map( this::apply )
                .map( CRawTerm::from )
                .forEach( p_return::add );

        return CFuzzyValue.from( true );
    }


    /**
     * compare any objects
     * @param p_source source object
     * @param p_target object to compare
     * @return equality boolean flag
     */
    private static boolean equalobject( @Nonnull final Object p_source, @Nonnull final Object p_target )
    {
        return p_source.equals( p_target );
    }


    /**
     * compares collections
     *
     * @param p_source source array (converted collection to array)
     * @param p_target collection to compare
     * @return equality boolean flag
     */
    private static boolean equalcollection( @Nonnull final Object[] p_source, @Nonnull final Collection<?> p_target )
    {
        return Arrays.equals( p_source, p_target.toArray() );
    }


    /**
     * compare maps
     *
     * @param p_source source map
     * @param p_target map to compare
     * @return equality boolean flag
     */
    private static boolean equalmap( @Nonnull final Map<?, ?> p_source, @Nonnull final Map<?, ?> p_target )
    {
        return Arrays.equals( p_source.keySet().toArray(), p_target.keySet().toArray() )
               && Arrays.equals( p_source.values().toArray(), p_target.values().toArray() );
    }


    /**
     * compare multimap
     *
     * @param p_source source multimap
     * @param p_target multimap to compare
     * @return equality boolean flag
     */
    private static boolean equalmultimap( @Nonnull final Multimap<?, ?> p_source, @Nonnull final Multimap<?, ?> p_target )
    {
        return Arrays.equals( p_source.asMap().keySet().toArray(), p_target.asMap().keySet().toArray() )
               && Arrays.equals( p_source.values().toArray(), p_target.values().toArray() );
    }

}