All Downloads are FREE. Search and download functionalities are using the official Maven repository.
Many resources are needed to download a project. Please understand that we have to compensate our server costs. Thank you in advance.
Project price only 1 $
You can buy this project and download/modify it how often you want.
eu.lunisolar.magma.func.tuple.LSingle Maven / Gradle / Ivy
/*
* This file is part of "lunisolar-magma".
*
* (C) Copyright 2014-2019 Lunisolar (http://lunisolar.eu/).
*
* 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 eu.lunisolar.magma.func.tuple;
import eu.lunisolar.magma.basics.meta.LTuple;
import eu.lunisolar.magma.basics.Null;
import eu.lunisolar.magma.basics.fluent.Fluent;
import eu.lunisolar.magma.func.function.LFunction;
import eu.lunisolar.magma.func.function.to.*;
import eu.lunisolar.magma.func.operator.unary.*;
import eu.lunisolar.magma.func.operator.binary.*;
import eu.lunisolar.magma.func.predicate.*;
import javax.annotation.Nullable;
import javax.annotation.concurrent.Immutable;
import java.util.*;
/**
* Exact equivalent of input parameters used in LConsumer.
*/
@SuppressWarnings("UnusedDeclaration")
public interface LSingle extends LTuple {
int SIZE = 1;
T value();
default T first() {
return value();
}
default Object get(int index) {
switch (index) {
case 1 :
return value();
default :
throw new NoSuchElementException();
}
}
/** Tuple size */
default int size() {
return SIZE;
}
/** Static hashCode() implementation method that takes same arguments as fields of the LSingle and calculates hash from it. */
static int argHashCode(T a) {
final int prime = 31;
int result = 1;
result = prime * result + ((a == null) ? 0 : a.hashCode());
return result;
}
/** Static equals() implementation that takes same arguments (doubled) as fields of the LSingle and checks if all values are equal. */
static boolean argEquals(T a, T b) {
return Null.equals(a, b); //
}
/**
* Static equals() implementation that takes two tuples asnd checks if they are equal.
*
* Tuples are considered equal if are implementing same interface and their tuple values are equal regardless of the implementing class.
*/
static boolean argEquals(LSingle the, Object that) {
return Null.equals(the, that, (one, two) -> {
// Intentionally all implementations of LSingle are allowed.
if (!(two instanceof LSingle)) {
return false;
}
LSingle other = (LSingle) two;
return argEquals(one.value(), other.value());
});
}
default Iterator iterator() {
return new Iterator() {
private int index;
@Override
public boolean hasNext() {
return index < SIZE;
}
@Override
public Object next() {
index++;
return get(index);
}
};
}
interface ComparableSingle> extends LSingle, Comparable> {
@Override
default int compareTo(LSingle that) {
return Null.compare(this, that, (one, two) -> {
int retval = 0;
return (retval = Null.compare(one.value(), two.value())) != 0 ? retval : 0; //
});
}
}
abstract class AbstractSingle implements LSingle {
@Override
public boolean equals(Object that) {
return LSingle.argEquals(this, that);
}
@Override
public int hashCode() {
return LSingle.argHashCode(value());
}
@Override
public String toString() {
StringBuilder sb = new StringBuilder();
sb.append('(');
sb.append(value());
sb.append(')');
return sb.toString();
}
}
/**
* Mutable, non-comparable tuple.
*/
final class MutSingle extends AbstractSingle {
private T value;
public MutSingle(T a) {
this.value = a;
}
public static MutSingle of(T a) {
return new MutSingle(a);
}
public static MutSingle copyOf(LSingle tuple) {
return of(tuple.value());
}
public T value() {
return value;
}
public MutSingle value(T value) {
this.value = value;
return this;
}
public MutSingle setValue(T value) {
this.value = value;
return this;
}
/** Sets value if predicate(newValue) OR newValue::predicate is true */
public MutSingle setValueIfArg(T value, LPredicate predicate) {
if (predicate.test(value)) {
this.value = value;
}
return this;
}
/** Sets value derived from non-null argument, only if argument is not null. */
public MutSingle setValueIfArgNotNull(R arg, LFunction func) {
if (arg != null) {
this.value = func.apply(arg);
}
return this;
}
/** Sets value if predicate(current) OR current::predicate is true */
public MutSingle setValueIf(LPredicate predicate, T value) {
if (predicate.test(this.value)) {
this.value = value;
}
return this;
}
/** Sets new value if predicate predicate(newValue, current) OR newValue::something(current) is true. */
public MutSingle setValueIf(T value, LBiPredicate predicate) {
// the order of arguments is intentional, to allow predicate:
if (predicate.test(value, this.value)) {
this.value = value;
}
return this;
}
/** Sets new value if predicate predicate(current, newValue) OR current::something(newValue) is true. */
public MutSingle setValueIf(LBiPredicate predicate, T value) {
if (predicate.test(this.value, value)) {
this.value = value;
}
return this;
}
public void reset() {
value = null;
}
}
/**
* Mutable, comparable tuple.
*/
final class MutCompSingle> extends AbstractSingle implements ComparableSingle {
private T value;
public MutCompSingle(T a) {
this.value = a;
}
public static > MutCompSingle of(T a) {
return new MutCompSingle(a);
}
public static > MutCompSingle copyOf(LSingle tuple) {
return of(tuple.value());
}
public T value() {
return value;
}
public MutCompSingle value(T value) {
this.value = value;
return this;
}
public MutCompSingle setValue(T value) {
this.value = value;
return this;
}
/** Sets value if predicate(newValue) OR newValue::predicate is true */
public MutCompSingle setValueIfArg(T value, LPredicate predicate) {
if (predicate.test(value)) {
this.value = value;
}
return this;
}
/** Sets value derived from non-null argument, only if argument is not null. */
public MutCompSingle setValueIfArgNotNull(R arg, LFunction func) {
if (arg != null) {
this.value = func.apply(arg);
}
return this;
}
/** Sets value if predicate(current) OR current::predicate is true */
public MutCompSingle setValueIf(LPredicate predicate, T value) {
if (predicate.test(this.value)) {
this.value = value;
}
return this;
}
/** Sets new value if predicate predicate(newValue, current) OR newValue::something(current) is true. */
public MutCompSingle setValueIf(T value, LBiPredicate predicate) {
// the order of arguments is intentional, to allow predicate:
if (predicate.test(value, this.value)) {
this.value = value;
}
return this;
}
/** Sets new value if predicate predicate(current, newValue) OR current::something(newValue) is true. */
public MutCompSingle setValueIf(LBiPredicate predicate, T value) {
if (predicate.test(this.value, value)) {
this.value = value;
}
return this;
}
public void reset() {
value = null;
}
}
/**
* Immutable, non-comparable tuple.
*/
@Immutable
final class ImmSingle extends AbstractSingle {
private final T value;
public ImmSingle(T a) {
this.value = a;
}
public static ImmSingle of(T a) {
return new ImmSingle(a);
}
public static ImmSingle copyOf(LSingle tuple) {
return of(tuple.value());
}
public T value() {
return value;
}
}
/**
* Immutable, comparable tuple.
*/
@Immutable
final class ImmCompSingle> extends AbstractSingle implements ComparableSingle {
private final T value;
public ImmCompSingle(T a) {
this.value = a;
}
public static > ImmCompSingle of(T a) {
return new ImmCompSingle(a);
}
public static > ImmCompSingle copyOf(LSingle tuple) {
return of(tuple.value());
}
public T value() {
return value;
}
}
}
