如果返回值无关，则添加日志记录

Question

假设有两个功能 findUser(id:String):Option[User] 和 findAddress(user:User):Option[Address] 调用如下：

for(user <- findUser(id); address <- findAddress(user)) println(address)

现在我想添加错误记录的错误 for-comprehension. 。我想打电话 log(msg:String) 功能，如果这两个 user 或者 address 找不到。

for(user <- findUser(id) ifNone log("user not found"); 
    address <- findAddress(user) ifNone log("address not found")) 
       println(address)

我可以在不更改功能签名的情况下执行此操作吗？

Answer 1

也许

implicit def withIfNone[A](o: Option[A]) = new {
  def ifNone(action: => Unit) = { if (o == None) action; o }
}

您也可以考虑使用“而不是选项”（或将选项转换为两者）。那将无法与foreach一起使用（无收益率），但是您可能会做

for(
  a <- option1.toRight("option1 missing").right; 
  b <- option2.toRight("option2 missing").right)
yield f(a,b)

然后，您可以将结果与

case Left(error) => log (error)
case Right(result) => // use result

Answer 2

升降机 Box 是适合您的使用情况的更合适的课程。一个 Box 就像一个 Option, ，但有两个空状态：确定和错误。您可以这样使用：

val addr = for {
  user <- findUser(id) ?~ "user not found"
  address <- findAddress(user) ?~ "address not found"
} yield address

address match {
  case Full(addr) => println(addr)
  case oops: Failure => println(oops.msg) // see Failure for more details
}

看 这个博客 有关与您的问题有关的各种建议。

Answer 3

它可能是个过度杀伤力，但看起来很像您想要的；）

object Extensions {
  // You need a wrapper since Option is sealed
  class OptionWrapper[E](option: Option[E]) {
    def foreach[U](f: E => U) {
      option foreach f
    }
    def isEmpty = option.isEmpty
  }

  // Modification trait for OptionWrapper
  trait ErrorLogging[E] extends OptionWrapper[E] {
    abstract override def foreach[U](f: E => U) {
      if (isEmpty)
        println("error")
      else
        super.foreach(f)
    }
  }

  // Accessor for the new mixin
  def log[E](option: Option[E]) = new OptionWrapper(option) with ErrorLogging[E]
}

object TestingLogger extends App {
  case class User(address: String)
  def findUser(id: Int): Option[User] = if (id == 1) Some(User("address")) else None
  def findAddress(user: User): Option[String] = Some(user.address)

  import Extensions._

  for {
    user <- log(findUser(1)) // prints out address
    address <- log(findAddress(user))
  } println(address)

  for {
    user <- log(findUser(2)) // prints out error
    address <- log(findAddress(user))
  } println(address)
}

如果您不知道刚刚发生的事情 这个.