Split up `cask` package into subpackages

1 files changed, 60 insertions, 0 deletions

diff --git a/cask/src/cask/main/Routes.scala b/cask/src/cask/main/Routes.scala
new file mode 100644
index 0000000..fdd39bd
--- /dev/null
+++ b/cask/src/cask/main/Routes.scala
@@ -0,0 +1,60 @@
+package cask.main
+
+import cask.endpoints.Endpoint
+import cask.internal.Router.EntryPoint
+import io.undertow.server.HttpServerExchange
+
+import scala.reflect.macros.blackbox.Context
+import language.experimental.macros
+
+object Routes{
+  case class EndpointMetadata[T](metadata: Endpoint[_],
+                                 entryPoint: EntryPoint[_, T, (HttpServerExchange, Seq[String])])
+  case class RoutesEndpointsMetadata[T](value: EndpointMetadata[T]*)
+  object RoutesEndpointsMetadata{
+    implicit def initialize[T] = macro initializeImpl[T]
+    implicit def initializeImpl[T: c.WeakTypeTag](c: Context): c.Expr[RoutesEndpointsMetadata[T]] = {
+      import c.universe._
+      val router = new cask.internal.Router[c.type](c)
+
+      val routeParts = for{
+        m <- c.weakTypeOf[T].members
+        annot <- m.annotations.filter(_.tree.tpe <:< c.weakTypeOf[Endpoint[_]])
+      } yield {
+        val annotObject = q"new ${annot.tree.tpe}(..${annot.tree.children.tail})"
+        val annotObjectSym = c.universe.TermName(c.freshName("annotObject"))
+        val route = router.extractMethod(
+          m.asInstanceOf[MethodSymbol],
+          weakTypeOf[T],
+          (t: router.c.universe.Tree) => q"$annotObjectSym.wrapMethodOutput($t)",
+          c.weakTypeOf[(io.undertow.server.HttpServerExchange, Seq[String])],
+          q"$annotObjectSym.parseMethodInput",
+          tq"$annotObjectSym.InputType"
+        )
+
+
+        q"""{
+          val $annotObjectSym = $annotObject
+          cask.main.Routes.EndpointMetadata(
+            $annotObjectSym,
+            $route
+          )
+        }"""
+      }
+
+      c.Expr[RoutesEndpointsMetadata[T]](q"""cask.main.Routes.RoutesEndpointsMetadata(..$routeParts)""")
+    }
+  }
+}
+
+trait Routes{
+  private[this] var metadata0: Routes.RoutesEndpointsMetadata[this.type] = null
+  def caskMetadata =
+    if (metadata0 != null) metadata0
+    else throw new Exception("Routes not yet initialize")
+
+  protected[this] def initialize()(implicit routes: Routes.RoutesEndpointsMetadata[this.type]): Unit = {
+    metadata0 = routes
+  }
+}
+