Added a project frame for the command line interface.

It parses the command line arguments, and currently accepts a test command and a server option (which is required, but defaults to the environment variable DELPHI_SERVER).
Closes #1

Author: bhermann

build.sbt

@@ -0,0 +1,20 @@
+name := "delphi-cli"
+
+version := "1.0.0-SNAPSHOT"
+
+scalaVersion := "2.12.4"
+
+libraryDependencies += "com.github.scopt" %% "scopt" % "3.7.0"
+libraryDependencies ++= Seq(
+  "com.typesafe.akka" %% "akka-http-core" % "10.0.11"
+)
+
+lazy val root = (project in file(".")).
+  enablePlugins(JavaAppPackaging).
+  enablePlugins(DockerPlugin).
+  enablePlugins(BuildInfoPlugin).
+  settings(
+    buildInfoKeys := Seq[BuildInfoKey](name, version, scalaVersion, sbtVersion),
+    buildInfoPackage := "de.upb.cs.swt.delphi.cli"
+  )
+

project/build.properties

@@ -0,0 +1 @@
+sbt.version = 0.13.17

project/plugins.sbt

@@ -0,0 +1,2 @@
+addSbtPlugin("com.eed3si9n" % "sbt-buildinfo" % "0.7.0")
+addSbtPlugin("com.typesafe.sbt" % "sbt-native-packager" % "1.3.2")

src/main/scala/de/upb/cs/swt/delphi/cli/Command.scala

@@ -0,0 +1,14 @@
+package de.upb.cs.swt.delphi.cli
+
+/**
+  * Represents the implementation of a command of the CLI
+  */
+trait Command {
+
+  /**
+    * Executes the command implementation
+    * @param config The current configuration for the command
+    */
+  def execute(config: Config) : Unit
+
+}

src/main/scala/de/upb/cs/swt/delphi/cli/Config.scala

@@ -0,0 +1,11 @@
+package de.upb.cs.swt.delphi.cli
+
+/**
+  * Represents a configuration for the Delphi CLI
+  * @param server A server base uri (Defaults to env variable DELPHI_SERVER)
+  * @param verbose Marker if logging should be verbose
+  * @param mode The command to be run
+  */
+case class Config (server : String = sys.env.getOrElse("DELPHI_SERVER", ""), verbose: Boolean = false, mode : String = "") {
+
+}

src/main/scala/de/upb/cs/swt/delphi/cli/DelphiCLI.scala

@@ -0,0 +1,41 @@
+package de.upb.cs.swt.delphi.cli
+
+
+/**
+  * The application class for the Delphi command line interface
+  */
+object DelphiCLI extends App {
+
+  val cliParser = {
+    new scopt.OptionParser[Config]("delphi-cli") {
+      head("Delphi Command Line Tool", s"(${BuildInfo.version})")
+
+
+      version("version").text("Prints the version of the command line tool.")
+
+      help("help").text("Prints this help text.")
+      override def showUsageOnError = true
+
+      opt[String]("server").action( (x,c) => c.copy(server = x)).text("The url to the Delphi server")
+      checkConfig(c => if (c.server.isEmpty()) failure("Option server is required.") else success)
+
+      cmd("test").action((_,c) => c.copy(mode = "test"))
+      //cmd("search")
+      //cmd("retrieve")
+    }
+  }
+
+
+  cliParser.parse(args, Config()) match {
+    case Some(config) =>
+      cliParser.showHeader()
+      config.mode match {
+        case "test" => TestCommand.execute(config)
+        case _ => println("Unknown command")
+      }
+
+    case None => println("nope")
+  }
+
+
+}

src/main/scala/de/upb/cs/swt/delphi/cli/TestCommand.scala

@@ -0,0 +1,47 @@
+package de.upb.cs.swt.delphi.cli
+
+import akka.actor.ActorSystem
+import akka.http.scaladsl.Http
+import akka.http.scaladsl.model.{HttpRequest, Uri}
+import akka.stream.{ActorMaterializer, ActorMaterializerSettings}
+import akka.util.ByteString
+
+import scala.util.{Failure, Success}
+
+/**
+  * The implementation of the test command.
+  * Tries to connect to the Delphi server and reports on the results of the version call.
+  */
+object TestCommand extends Command {
+  override def execute(config: Config): Unit = {
+
+    implicit val system = ActorSystem()
+    implicit val executionContext = system.dispatcher
+    implicit val materializer: ActorMaterializer = ActorMaterializer(ActorMaterializerSettings(system))
+
+    val uri = Uri(config.server)
+    println(s"Contacting server ${uri}...")
+    val resp = Http().singleRequest(HttpRequest(uri = uri.withPath(uri.path + "/version")))
+
+    resp.onComplete {
+      case Success(res) =>
+        res.status match {
+           case x if x.isSuccess() => {
+             res.entity.dataBytes.runFold(ByteString(""))(_ ++ _).foreach { body =>
+               println("Successfully contacted Delphi server. ")
+               println("Server version: " + body.utf8String)
+             } }
+             case _ => {
+               println(s"Could not validate server ${config.server}. Error: ${res.status}.")
+             }
+           }
+        system.terminate()
+      case Failure(_) => {
+        println(s"Could not reach server ${config.server}.")
+
+        system.terminate()
+      }
+    }
+
+  }
+}