使用 Argonaut 或 Circe 从不完整的 JSON 更新案例类

我需要从案例类实例创建一个更新的实例（带有任何需要的DecodeJsons 隐式导出），给定不完整的 json（缺少某些字段）。如何通过 Argonaut（最好）或 Circe（如果必须的话）来实现这一点？

Example:

case class Person(name:String, age:Int)
val person = Person("mr complete", 42)
val incompletePersonJson = """{"name":"mr updated"}"""
val updatedPerson = updateCaseClassFromIncompleteJson(person, incompletePersonJson)

println(updatedPerson)
//yields Person(mr updated, 42) 

我很确定我必须将 json 解析为 json AST，然后将其转换为 ShapelessLabelledGeneric，然后使用 Shapeless update 以某种方式更新案例类实例。

Edit 2

阅读 Shapeless 源代码后，我发现我可以生成自己的“默认”对象。我设法创建了一个解决方案，该解决方案要求在解析 json 时存在案例类的实例。我希望避免这种情况，而是稍后提供实例。无论如何，这里是：

import shapeless._
import argonaut._
import ArgonautShapeless._
import shapeless.ops.hlist.Mapper

case class Person(name: String, age: Int)

object MkDefault {

  object toSome extends Poly1 {
    implicit def default[P] = at[P](Some(_))
  }

  def apply[P, L <: HList, D <: HList]
  (p: P)
  (implicit
   g: Generic.Aux[P, L],
   mpr: Mapper.Aux[toSome.type, L, D]
  ): Default.Aux[P, mpr.Out] =
    Default.mkDefault[P, D](mpr(g.to(p)))
}


object Testy extends App {
    implicit val defs0 = MkDefault(Person("new name? NO", 42))
    implicit def pd = DecodeJson.of[Person]
    val i = """{"name":"Old Name Kept"}"""
    val pp = Parse.decodeOption[Person](i).get
    println(pp)
}

这产生Person(Old Name Kept,42).

为了完整起见：自 0.2 版本以来，circe 中已经提供了对此类“修补”实例的支持：

import io.circe.jawn.decode, io.circe.generic.auto._

case class Person(name: String, age: Int)

val person = Person("mr complete", 42)
val incompletePersonJson = """{"name":"mr updated"}"""

val update = decode[Person => Person](incompletePersonJson)

进而：

scala> println(update.map(_(person)))
Right(Person(mr updated,42))

我原来的博客文章 https://meta.plasm.us/posts/2015/06/21/deriving-incomplete-type-class-instances/关于这项技术使用了 Argonaut（主要是因为我在开始 circe 工作前几个月写了它），并且该实现是可作为图书馆使用 https://github.com/travisbrown/incompletes，尽管我从未在任何地方发表过它。