Scalaz（46）－ scalaz-stream 基础介绍详解编程语言

scalaz-stream是一个泛函数据流配件库（functional stream combinator library），特别适用于函数式编程。scalar-stream是由一个以上各种状态的Process串联组成。stream代表一连串的元素，可能是自动产生或者由外部的源头输入，如：一连串鼠标位置；文件中的文字行；数据库记录；又或者一连串的HTTP请求等。Process就是stream转换器（transducer），它可以把一种stream转换成另一种stream。Process的类型款式如下：

sealed trait Process[+F[_], +O]

其中F是个高阶类，是一种算法，O是Process的运算值。从类型款式上看Process是个对O类型值进行F运算的节点，那么scalaz-stream就应该是个运算流了。Process包含以下几种状态：

case class Emit[+O](seq: Seq[O]) extends HaltEmitOrAwait[Nothing, O] with EmitOrAwait[Nothing, O] 
 
case class Await[+F[_], A, +O]( 
    req: F[A] 
    , rcv: (EarlyCause // A) => Trampoline[Process[F, O]] @uncheckedVariance 
    , preempt : A => Trampoline[Process[F,Nothing]] @uncheckedVariance = (_:A) => Trampoline.delay(halt:Process[F,Nothing]) 
    ) extends HaltEmitOrAwait[F, O] with EmitOrAwait[F, O] { 
... 
} 
case class Halt(cause: Cause) extends HaltEmitOrAwait[Nothing, Nothing] with HaltOrStep[Nothing, Nothing] 
 
case class Append[+F[_], +O]( 
    head: HaltEmitOrAwait[F, O] 
    , stack: Vector[Cause => Trampoline[Process[F, O]]] @uncheckedVariance 
    ) extends Process[F, O] { 
... 
}

scalaz-stream是个主动读取模式的流（pull model stream）,Process转换stream的方式不是以Stream[I] => Stream[O]这种函数方式，而是一种状态转换方式进行（state transition），所以这些状态就等于向一个驱动程序发出的请求：

Emit[+O]：请求发一个O值

Await[+F[_],A,+O]：要求运算F[A]，得出F[A]的结果A后输入函数rcv再运算得出下一个Process状态。这个是flatMap函数的结构化版本

Halt：停止发送

Append：连接前后两个Process

可以看到Emit,Await,Halt,Append都是Process类型的结构化状态。其中Await就是flatMap函数的结构化，Emit就像Return，所以Process就是一个Free Monad。

Emit的作用是发出一个O值，Await的作用是运算F然后连接下一个Process, Append的作用则是把前一个Process的信息传递到下一个Process。Await和Append分别是不同方式的Process连接方式。

Process又分以下几类：

  type Process0[+O] = Process[Nothing,O] 
 
  /** 
   * A single input stream transducer. Accepts input of type `I`, 
   * and emits values of type `O`. 
   */ 
  type Process1[-I,+O] = Process[Env[I,Any]#Is, O] 
 
  /** 
   * A stream transducer that can read from one of two inputs, 
   * the 'left' (of type `I`) or the 'right' (of type `I2`). 
   * `Process1[I,O] <: Tee[I,I2,O]`. 
   */ 
  type Tee[-I,-I2,+O] = Process[Env[I,I2]#T, O] 
 
  /** 
   * A stream transducer that can read from one of two inputs, 
   * non-deterministically. 
   */ 
  type Wye[-I,-I2,+O] = Process[Env[I,I2]#Y, O] 
 
  /** 
   * An effectful sink, to which we can send values. Modeled 
   * as a source of effectful functions. 
   */ 
  type Sink[+F[_],-O] = Process[F, O => F[Unit]] 
 
  /** 
   * An effectful channel, to which we can send values and 
   * get back responses. Modeled as a source of effectful 
   * functions. 
   */ 
  type Channel[+F[_],-I,O] = Process[F, I => F[O]]

Process[F[_],O]：source:运算流源点，由此发送F[O]运算

Process0[+O]：>>>Process[Nothing,+O]：source:纯数据流源点，发送O类型元素

Process1[-I,+O]：一对一的数据转换节点：接收一个I类型输入，经过处理转换成O类型数据输出

Tee[-I1,-I2,+O]：二对一的有序输入数据转换节点：从左右两边一左一右有顺接受I1,I2类型输入后转换成O类型数据输出

Wye[-I1,-I2,+O]：二对一的无序输入数据转换节点：不按左右顺序，按上游数据发送情况接受I1,I2类型输入后转换成O类型数据输出

Sink[+F[_],-O]：运算终点，在此对O类型数据进行F运算，不返回值：O => F[Unit]

Channel[+F[_],-I,O]：运算终点，接受I类型输入，进行F运算后返回F[O]：I => F[O]

以下是一些简单的Process构建方法：

1  Process.emit(1)                                  //> res0: scalaz.stream.Process0[Int] = Emit(Vector(1)) 
2  Process.emitAll(Seq(1,2,3))                      //> res1: scalaz.stream.Process0[Int] = Emit(List(1, 2, 3)) 
3  Process.halt                                     //> res2: scalaz.stream.Process0[Nothing] = Halt(End) 
4  Process.range(1,2,3)           //> res3: scalaz.stream.Process0[Int] = Append(Halt(End),Vector(<function1>))

这些是纯数据流的构建方法。scalaz-stream通常把Task作为F运算，下面是Task运算流的构建或者转换方法：

1 val p: Process[Task,Int] = Process.emitAll(Seq(1,2,3))  //> p  : scalaz.stream.Process[scalaz.concurrent.Task,Int] = Append(Halt(End),Vector(<function1>)) 
2  Process.range(1,2,3).toSource                   //> res4: scalaz.stream.Process[scalaz.concurrent.Task,Int] = Append(Halt(End),Vector(<function1>)) 
3  //把F[A]升格成Process[F,A] 
4 Process.eval(Task.delay {5 * 8})                 //> res5: scalaz.stream.Process[scalaz.concurrent.Task,Int] = Await([email protected],<function1>,<function1>)

对stream的Process进行运算有下面几种run方法：

/** 
   * Collect the outputs of this `Process[F,O]` into a Monoid `B`, given a `Monad[F]` in 
   * which we can catch exceptions. This function is not tail recursive and 
   * relies on the `Monad[F]` to ensure stack safety. 
   */ 
final def runFoldMap[F2[x] >: F[x], B](f: O => B)(implicit F: Monad[F2], C: Catchable[F2], B: Monoid[B]): F2[B] = { 
...} 
/** 
   * Collect the outputs of this `Process[F,O]`, given a `Monad[F]` in 
   * which we can catch exceptions. This function is not tail recursive and 
   * relies on the `Monad[F]` to ensure stack safety. 
   */ 
final def runLog[F2[x] >: F[x], O2 >: O](implicit F: Monad[F2], C: Catchable[F2]): F2[Vector[O2]] = { 
...} 
/** Run this `Process` solely for its final emitted value, if one exists. */ 
final def runLast[F2[x] >: F[x], O2 >: O](implicit F: Monad[F2], C: Catchable[F2]): F2[Option[O2]] = { 
...} 
/** Run this `Process` solely for its final emitted value, if one exists, using `o2` otherwise. */ 
final def runLastOr[F2[x] >: F[x], O2 >: O](o2: => O2)(implicit F: Monad[F2], C: Catchable[F2]): F2[O2] = 
    runLast[F2, O2] map { _ getOrElse o2 } 
/** Run this `Process`, purely for its effects. */ 
final def run[F2[x] >: F[x]](implicit F: Monad[F2], C: Catchable[F2]): F2[Unit] = 
    F.void(drain.runLog(F, C))

这几个函数都返回F2运算，如果F2是Task的话那么我们就可以用Task.run来获取结果值：

 1  //runFoldMap就好比Monoid的sum 
 2  p.runFoldMap(identity).run                       //> res6: Int = 6 
 3  p.runFoldMap(i => i * 2).run                     //> res7: Int = 12 
 4  p.runFoldMap(_.toString).run                     //> res8: String = 123 
 5  //runLog把收到的元素放入vector中 
 6  p.runLog.run                                     //> res9: Vector[Int] = Vector(1, 2, 3) 
 7  //runLast取最后一个元素，返回Option 
 8  p.runLast.run                                    //> res10: Option[Int] = Some(3) 
 9  Process.halt.toSource.runLast.run                //> res11: Option[Nothing] = None 
10  Process.halt.toSource.runLastOr(65).run          //> res12: Int = 65 
11  //run只进行F的运算，放弃所有元素 
12  p.run      //> res13: scalaz.concurrent.Task[Unit] = [email protected] 
13  p.run.run  //Task[Unit] 返回Unit 
14  Process.emit(print("haha")).toSource.run.run     //> haha

与List和Stream操作相似，我们同样可以对scalar-stream Process施用同样的操作函数，也就是一些stream转换函数：

1  p.take(2).runLog.run                             //> res14: Vector[Int] = Vector(1, 2) 
2  p.filter {_ > 2}.runLog.run                      //> res15: Vector[Int] = Vector(3) 
3  p.last.runLog.run                                //> res16: Vector[Int] = Vector(3) 
4  p.drop(1).runLog.run                             //> res17: Vector[Int] = Vector(2, 3) 
5  p.exists{_ > 5}.runLog.run                       //> res18: Vector[Boolean] = Vector(false)

以上这些函数与scala标准库的stream很相似。再看看map,flatMap吧：

1  p.map{i => s"Int:$i"}.runLog.run                 //> res19: Vector[String] = Vector(Int:1, Int:2, Int:3) 
2  p.flatMap{i => Process(i,i-1)}.runLog.run        //> res20: Vector[Int] = Vector(1, 0, 2, 1, 3, 2)

仔细检查可以看出来上面的这些转换操作都是针对Process1类型的，都是元素在流通过程中得到转换。我们会在下篇讨论中介绍一些更复杂的Process操作，如：Sink,Tee,Wyn…，然后是scalaz-stream的具体应用

原创文章，作者：奋斗，如若转载，请注明出处：https://blog.ytso.com/12902.html

Scalaz（46）－ scalaz-stream 基础介绍详解编程语言

相关推荐

发表回复