001/*
002 * Licensed to the Apache Software Foundation (ASF) under one or more
003 * contributor license agreements.  See the NOTICE file distributed with
004 * this work for additional information regarding copyright ownership.
005 * The ASF licenses this file to You under the Apache License, Version 2.0
006 * (the "License"); you may not use this file except in compliance with
007 * the License.  You may obtain a copy of the License at
008 *
009 *      http://www.apache.org/licenses/LICENSE-2.0
010 *
011 * Unless required by applicable law or agreed to in writing, software
012 * distributed under the License is distributed on an "AS IS" BASIS,
013 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
014 * See the License for the specific language governing permissions and
015 * limitations under the License.
016 */
017package org.apache.commons.functor.adapter;
018
019import java.io.Serializable;
020
021import org.apache.commons.functor.BinaryProcedure;
022import org.apache.commons.functor.UnaryProcedure;
023import org.apache.commons.lang3.Validate;
024
025/**
026 * Adapts a
027 * {@link BinaryProcedure BinaryProcedure}
028 * to the
029 * {@link UnaryProcedure UnaryProcedure} interface
030 * using a constant left-side argument.
031 * <p/>
032 * Note that although this class implements
033 * {@link Serializable}, a given instance will
034 * only be truly <code>Serializable</code> if the
035 * underlying objects are.  Attempts to serialize
036 * an instance whose delegates are not
037 * <code>Serializable</code> will result in an exception.
038 *
039 * @param <A> the argument type.
040 * @version $Revision: 1365377 $ $Date: 2012-07-24 20:59:23 -0400 (Tue, 24 Jul 2012) $
041 */
042public final class RightBoundProcedure<A> implements UnaryProcedure<A>, Serializable {
043    /**
044     * serialVersionUID declaration.
045     */
046    private static final long serialVersionUID = 3267188080481758226L;
047    /** The {@link BinaryProcedure BinaryProcedure} I'm wrapping. */
048    private final BinaryProcedure<? super A, Object> procedure;
049    /** The parameter to pass to {@code procedure}. */
050    private final Object param;
051
052    /**
053     * Create a new RightBoundProcedure.
054     * @param <R> bound arg type
055     * @param procedure the procedure to adapt
056     * @param arg the constant argument to use
057     */
058    @SuppressWarnings("unchecked")
059    public <R> RightBoundProcedure(BinaryProcedure<? super A, ? super R> procedure, R arg) {
060        this.procedure =
061            (BinaryProcedure<? super A, Object>) Validate.notNull(procedure,
062                "BinaryProcedure argument was null");
063        this.param = arg;
064    }
065
066    /**
067     * {@inheritDoc}
068     */
069    public void run(A obj) {
070        procedure.run(obj, param);
071    }
072
073    /**
074     * {@inheritDoc}
075     */
076    @Override
077    public boolean equals(Object that) {
078        return that == this || (that instanceof RightBoundProcedure<?> && equals((RightBoundProcedure<?>) that));
079    }
080
081    /**
082     * Learn whether another RightBoundProcedure is equal to this.
083     * @param that RightBoundProcedure to test
084     * @return boolean
085     */
086    public boolean equals(RightBoundProcedure<?> that) {
087        return null != that
088                && procedure.equals(that.procedure)
089                && (null == param ? null == that.param : param.equals(that.param));
090    }
091
092    /**
093     * {@inheritDoc}
094     */
095    @Override
096    public int hashCode() {
097        int hash = "RightBoundProcedure".hashCode();
098        hash <<= 2;
099        hash ^= procedure.hashCode();
100        if (null != param) {
101            hash <<= 2;
102            hash ^= param.hashCode();
103        }
104        return hash;
105    }
106
107    /**
108     * {@inheritDoc}
109     */
110    @Override
111    public String toString() {
112        return "RightBoundProcedure<" + procedure + "(?," + param + ")>";
113    }
114
115    /**
116     * Get a UnaryProcedure from <code>procedure</code>.
117     * @param <L> the left argument type.
118     * @param <R> the right argument type.
119     * @param procedure to adapt
120     * @param arg right side argument
121     * @return RightBoundProcedure
122     */
123    public static <L, R> RightBoundProcedure<L> bind(BinaryProcedure<? super L, ? super R> procedure, R arg) {
124        return null == procedure ? null : new RightBoundProcedure<L>(procedure, arg);
125    }
126
127}