li/cil/oc/common/component/Screen.scala

package li.cil.oc.common.component

import li.cil.oc.api.Persistable
import li.cil.oc.api.network.{Component, Message, Visibility}
import li.cil.oc.common.component
import li.cil.oc.util.TextBuffer
import net.minecraft.nbt.NBTTagCompound

class Screen(val owner: Screen.Environment, val maxResolution: (Int, Int)) extends Persistable {
  private val buffer = new TextBuffer(maxResolution)

  // ----------------------------------------------------------------------- //

  def text = buffer.toString

  def lines = buffer.buffer

  def resolution = buffer.size

  def resolution_=(value: (Int, Int)) = {
    val (w, h) = value
    val (mw, mh) = maxResolution
    if (w <= mw && h <= mh && (buffer.size = value)) {
      owner.onScreenResolutionChange(w, h)
      true
    }
    else false
  }

  def set(col: Int, row: Int, s: String) = if (col < buffer.width && (col >= 0 || -col < s.length)) {
    // Make sure the string isn't longer than it needs to be, in particular to
    // avoid sending too much data to our clients.
    val (x, truncated) =
      if (col < 0) (0, s.substring(-col))
      else (col, s.substring(0, s.length min buffer.width))
    if (buffer.set(x, row, truncated))
      owner.onScreenSet(x, row, truncated)
  }

  def fill(col: Int, row: Int, w: Int, h: Int, c: Char) =
    if (buffer.fill(col, row, w, h, c))
      owner.onScreenFill(col, row, w, h, c)

  def copy(col: Int, row: Int, w: Int, h: Int, tx: Int, ty: Int) =
    if (buffer.copy(col, row, w, h, tx, ty))
      owner.onScreenCopy(col, row, w, h, tx, ty)

  // ----------------------------------------------------------------------- //

  override def readFromNBT(nbt: NBTTagCompound) = {
    buffer.readFromNBT(nbt)
  }

  override def writeToNBT(nbt: NBTTagCompound) = {
    buffer.writeToNBT(nbt)
  }
}

object Screen {

  trait Environment extends Component {
    final val instance = new component.Screen(this, maxResolution)

    override val name = "screen"

    override val visibility = Visibility.Network

    protected def maxResolution: (Int, Int)

    // ----------------------------------------------------------------------- //

    override def receive(message: Message) = Option(super.receive(message)).orElse {
      message.data match {
        case Array(w: Integer, h: Integer) if message.name == "screen.resolution=" =>
          result(instance.resolution = (w, h))
        case Array() if message.name == "screen.resolution" => {
          val (w, h) = instance.resolution
          result(w, h)
        }
        case Array() if message.name == "screen.maxResolution" =>
          val (w, h) = instance.maxResolution
          result(w, h)
        case Array(x: Integer, y: Integer, value: String) if message.name == "screen.set" =>
          instance.set(x, y, value); result(true)
        case Array(x: Integer, y: Integer, w: Integer, h: Integer, value: Character) if message.name == "screen.fill" =>
          instance.fill(x, y, w, h, value); result(true)
        case Array(x: Integer, y: Integer, w: Integer, h: Integer, tx: Integer, ty: Integer) if message.name == "screen.copy" =>
          instance.copy(x, y, w, h, tx, ty); result(true)
        case _ => None
      }
    }.orNull

    // ----------------------------------------------------------------------- //

    override abstract def readFromNBT(nbt: NBTTagCompound) = {
      super.readFromNBT(nbt)

      instance.readFromNBT(nbt.getCompoundTag("screen"))
    }

    override abstract def writeToNBT(nbt: NBTTagCompound) = {
      super.writeToNBT(nbt)

      val screenNbt = new NBTTagCompound
      instance.writeToNBT(screenNbt)
      nbt.setCompoundTag("screen", screenNbt)
    }

    // ----------------------------------------------------------------------- //

    def onScreenResolutionChange(w: Int, h: Int) =
      network.foreach(_.sendToVisible(this, "computer.signal", "screen_resized", Int.box(w), Int.box(h)))

    def onScreenSet(col: Int, row: Int, s: String) {}

    def onScreenFill(col: Int, row: Int, w: Int, h: Int, c: Char) {}

    def onScreenCopy(col: Int, row: Int, w: Int, h: Int, tx: Int, ty: Int) {}
  }

}