--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/server.coffee	Sat Dec 14 21:40:24 2013 +0100
@@ -0,0 +1,41 @@
+Q = require 'q'
+Http = require 'q-io/http'
+Apps = require 'q-io/http-apps'
+bunyan = require 'bunyan'
+
+log = bunyan.createLogger {
+  name: 'asa-test-server'
+  level: 'debug'
+}
+
+route = Apps.Branch {
+  'ok': (rq,rs) => {
+    status: 200
+    headers: {}
+    data:
+      result: 'ok'
+      request:
+        path: rq.path
+        pathInfo: rq.pathInfo
+      response: rs
+  }
+  'post': Apps.Method {
+    'POST': new Apps.Chain().use(Apps.JsonRequest).use(() => (o, rq, rs) => {
+      status: 200
+      headers: {}
+      data:
+        post: o
+        request:
+          path: rq.path
+          pathInfo: rq.pathInfo
+        response: rs
+    }).end()
+  }, Apps.methodNotAllowed
+}
+
+app = Apps.Chain().use(() => Apps.HandleJsonResponses(route, null, "  "))
+  .end()
+
+Http.Server(app).listen(3000)
+
+# vim: et ts=2 sw=2