基于Scala类型的属性提取器 - 仅限Getter镜头?

Nig*_*olf 4 generics scala scalaz lenses shapeless

从数据容器(例如案例类)中提取类型的最佳方法是什么.

例如,如果我有type Tagged[U] = { type Tag = U}标记类型trait PID,标记为Int type ProductId = Int with Tagged[PID]或scalaz样式,type ProductId = Int @@ PID并说明产品type Name = String @@ PName等中的其他字段和包含产品属性的数据容器;

case class Product(pid: ProductId, name: Name, weight: Weight)
Run Code Online (Sandbox Code Playgroud)

如何在A => B不诉诸反射的情况下编写通用的提取器样式方法?

原因是我想在运行时从Product容器中动态提取字段.即,用户传递他们想要提取的产品的属性.

即如果我想动态获取ProductId,我可以编写一个接受类型并返回值的方法,例如

trait Extractor[A] {
  def extract[B](i: A): B = //get type B from the Product class
}
Run Code Online (Sandbox Code Playgroud)

或者我是在复杂的事情.

我可以编写简单的提取器类,它采用A => B函数并为每种类型定义它;

trait Getter[A, B] {
  def extract(i: A): B
}
//... mix this in...
trait GetPID extends Getter[Product, ProductId] {
  override def extract(implicit i: Product) = i.pid
}
trait GetName extends Getter[Product, Name] {
  override def extract(implicit i: Product) = i.name
}
Run Code Online (Sandbox Code Playgroud)

然后在需要的地方添加它们.

val dyn = new DynamicProductExtractor with GetPID 
dyn.extract
Run Code Online (Sandbox Code Playgroud)

但这似乎很麻烦.

我觉得Lens在这里很有用.

Tra*_*own 8

为了完整的例子,假设我们有以下类型和一些示例数据:

import shapeless._, tag._

trait PID; trait PName; trait PWeight

type ProductId = Int @@ PID
type Name = String @@ PName
type Weight = Double @@ PWeight

case class Product(pid: ProductId, name: Name, weight: Weight)

val pid = tag[PID](13)
val name = tag[PName]("foo")
val weight = tag[PWeight](100.0)

val product = Product(pid, name, weight)
Run Code Online (Sandbox Code Playgroud)

我在这里使用的是Shapeless的标签,但下面的所有内容都与Scalaz或您自己的标签一样Tagged.现在假设我们希望能够在任意案例类中按类型查找成员,我们可以使用Shapeless创建一个提取器Generic:

import ops.hlist.Selector

def extract[A] = new {
  def from[C, Repr <: HList](c: C)(implicit
    gen: Generic.Aux[C, Repr],
    sel: Selector[Repr, A]
  ) = sel(gen.to(c))
}
Run Code Online (Sandbox Code Playgroud)

请注意,为了简单和简洁,我使用的是结构类型,但您可以非常轻松地定义一个可以执行相同操作的新类.

现在我们可以写下面的内容:

scala> extract[ProductId].from(product)
res0: Int with shapeless.tag.Tagged[PID] = 13
Run Code Online (Sandbox Code Playgroud)

请注意,如果案例类具有多个具有所请求类型的成员,则将返回第一个成员.如果它没有任何具有正确类型的成员(例如类似的东西extract[Char] from(product)),那么你将得到一个很好的编译时错误.

你可以在这里使用镜头,但你需要写更多或更少相同的机器 - 我不知道一个镜头实现,它给你按类型索引(无形,例如提供位置索引和成员名称索引).

(请注意,这不是真正的"动态",因为您在case类中查找的类型必须在编译时静态知道,但在上面给出的示例中也是如此.)