sources/hv-collector-utils/src/main/kotlin/org/onap/dcae/collectors/veshv/utils/arrow/core.kt

   1 /*
   2  * ============LICENSE_START=======================================================
   3  * dcaegen2-collectors-veshv
   4  * ================================================================================
   5  * Copyright (C) 2018 NOKIA
   6  * ================================================================================
   7  * Licensed under the Apache License, Version 2.0 (the "License");
   8  * you may not use this file except in compliance with the License.
   9  * You may obtain a copy of the License at
  10  *
  11  *      http://www.apache.org/licenses/LICENSE-2.0
  12  *
  13  * Unless required by applicable law or agreed to in writing, software
  14  * distributed under the License is distributed on an "AS IS" BASIS,
  15  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  16  * See the License for the specific language governing permissions and
  17  * limitations under the License.
  18  * ============LICENSE_END=========================================================
  19  */
  20 package org.onap.dcae.collectors.veshv.utils.arrow
  21
  22 import arrow.core.Either
  23 import arrow.core.ForOption
  24 import arrow.core.Option
  25 import arrow.core.Try
  26 import arrow.core.extensions.option.monad.monad
  27 import arrow.core.fix
  28 import arrow.core.identity
  29 import arrow.syntax.collections.firstOption
  30 import arrow.typeclasses.MonadContinuation
  31 import reactor.core.publisher.Flux
  32 import reactor.core.publisher.Mono
  33 import java.util.concurrent.atomic.AtomicReference
  34
  35 /**
  36  * @author Piotr Jaszczyk <piotr.jaszczyk@nokia.com>
  37  * @since July 2018
  38  */
  39
  40 object OptionUtils {
  41     fun <A> binding(c: suspend MonadContinuation<ForOption, *>.() -> A)
  42             : Option<A> = Option.monad().binding(c).fix()
  43 }
  44
  45 fun <A> Either<A, A>.flatten() = fold(::identity, ::identity)
  46
  47 fun <B> Either<Throwable, B>.rightOrThrow() = fold({ throw it }, ::identity)
  48
  49 fun <A, B> Either<A, B>.rightOrThrow(mapper: (A) -> Throwable) = fold({ throw mapper(it) }, ::identity)
  50
  51 fun <A : Exception, B> Flux<Either<A, B>>.throwOnLeft(): Flux<B> = map { it.rightOrThrow() }
  52
  53 fun <A, B> Flux<Either<A, B>>.throwOnLeft(f: (A) -> Exception): Flux<B> = map { it.rightOrThrow(f) }
  54
  55 fun <A, B> Mono<Either<A, B>>.throwOnLeft(f: (A) -> Exception): Mono<B> = map { it.rightOrThrow(f) }
  56
  57 fun <A> AtomicReference<A>.getOption() = Option.fromNullable(get())
  58
  59 fun <A> Option.Companion.fromNullablesChain(firstValue: A?, vararg nextValues: () -> A?): Option<A> =
  60         if (firstValue != null)
  61             Option.just(firstValue)
  62         else nextValues.asSequence()
  63                 .map { it() }
  64                 .filter { it != null }
  65                 .firstOption()
  66
  67
  68 fun <A, B> Either<A, B>.doOnLeft(action: () -> Unit): Either<A, B> = apply { if (isLeft()) action() }
  69
  70 fun <A> Option<A>.doOnEmpty(action: () -> Unit): Option<A> = apply { if (isEmpty()) action() }
  71
  72 fun <A> Try<A>.doOnFailure(action: (Throwable) -> Unit): Try<A> = apply {
  73     if (this is Try.Failure) {
  74         action(exception)
  75     }
  76 }
  77
  78 fun <A, B> A.mapBinding(c: suspend MonadContinuation<ForOption, *>.(A) -> B)
  79         : Option<B> = let { OptionUtils.binding { c(it) } }
  80
  81
  82
  83
  84
  85
  86