Argonaut.io: Как переименовать свойство JSON для правого / левого класса, содержащего либо

Question

в аргонавте, как легко переименовать соответствующее имя свойства JSON в экземплярах, где класс Case содержит либо.

Например, учитывая это определение:

  case class Foo(f: String)
  case class Bar(b: String)
  case class FooBar(e: Either[Foo, Bar])

  implicit def FooCodecJson: CodecJson[Foo] = casecodec1(Foo.apply, Foo.unapply)("f")

  implicit def BarCodecJson: CodecJson[Bar] = casecodec1(Bar.apply, Bar.unapply)("b")

  implicit def FooBarCodecJson: CodecJson[FooBar] = casecodec1(FooBar.apply, FooBar.unapply)("e")

.

Преобразование генеракодицетагкода в JSON, как FooBar приводит к следующему:

{
    "e" : {
        "Right" : {
            "b" : "hello"
        }
    }
}

.

Какой самый простой способ переименовать «правильно» на что-то более значимое на выходе выше?(Мой фактический сценарий имеет много классов с большими случаями с множеством эртерсов, поэтому я ищу самый краткий путь.)

Answer 1

Вот достаточно простой подход:

def renameFields(replacements: (JsonField, JsonField)*)(json: Json) =
  json.withObject(obj =>
    replacements.foldLeft(obj) {
      case (acc, (before, after)) => 
        acc(before).map(v => (acc - before) + (after, v)).getOrElse(acc)
    }
  )

def renamedEitherCodec[A, B](leftName: String, rightName: String)(implicit
  ee: EncodeJson[Either[A, B]],
  de: DecodeJson[Either[A, B]]
) = CodecJson[Either[A, B]](
  e => renameFields("Left" -> leftName, "Right" -> rightName)(ee(e)),
  c => de(c.withFocus(renameFields(leftName -> "Left", rightName -> "Right")))
)

.

а затем:

val fooOrBar = namedEitherCodec[Foo, Bar]("Foo", "Bar")

implicit def FooBarCodecJson: CodecJson[FooBar] = casecodec1(
  FooBar.apply, FooBar.unapply
)("e")(fooOrBar, fooOrBar)

.

Вы также можете сделать неявный код fooOrBar, но переопределенные экземпляры классов типа, как правило, наклоняется.