prihoda.net

trait JsTestDriver { self: DefaultWebProject =>

  val jsTestDriverPort = 9876
  val jsTestDriverPath = "lib/JsTestDriver-1.2.2.jar"
  val javacmd = "java"
  val jsTestDriverCmd = "%s -jar %s".format(javacmd, jsTestDriverPath)

  protected var jsTestDriver: Option[Process] = None

  protected def destroyJsTestDriver = {
    jsTestDriver.foreach { _.destroy }
    jsTestDriver = None
  }

  protected def startJsTestDriver = jsTestDriver match {
    case None => {
      jsTestDriver = Some("%s --port %d --browser open".format(jsTestDriverCmd, jsTestDriverPort) run log)
      ExitHooks.register(new ExitHook {
        val name = "Shutdown JsTestDriver"
        def runBeforeExiting() {
          destroyJsTestDriver
        }
        })
      Thread.sleep(2000L)
    }
    case _ =>
  }

  lazy val runJsTestDriver = self.task {
    startJsTestDriver
    None
  }

  lazy val stopJsTestDriver = self.task {
    destroyJsTestDriver
    None
  }

  lazy val testJs = self.task {
    startJsTestDriver
    "%s --tests all".format(jsTestDriverCmd) ! log match {
      case 0 => None
      case x => Some("There were test failures")
    }
  }

}

override def testAction = super.testAction dependsOn (testCompile, copyResources, copyTestResources, testJs)

def lessPaths = (webappPath / "css" * "*.less")

def less2CSS(x: String) = x.replaceAll("\\.less$", ".css")

def dependentCssPaths = Path.lazyPathFinder(lessPaths.get.map(l => less2CSS(l.toString)).map(Path.fromFile _))

override def watchPaths = super.watchPaths --- dependentCssPaths

override def webappResources = super.webappResources --- lessPaths

val lessCompiler = "lessc"

lazy val lessc = task{
  val toCompile = lessPaths.get.filter(l => l.lastModified > Path.fromFile(less2CSS(l.toString)).lastModified).toList
  log.info("Compiling with lessc: %d file(s).".format(toCompile.length))
  def process(paths: List[Path]):Option[String] = paths match {
    case Nil => None
    case x :: xs => {
      log.debug("Compiling less file %s".format(x))
      ("%s %s".format(lessCompiler, x) ! log) match {
        case 0 => process(xs)
        case _ => Some("Error while compiling file: %s".format(x))
      }     
    }
  }
  process(toCompile)
}

override def prepareWebappAction = super.prepareWebappAction dependsOn (compile, lessc, copyResources)