src: introduce a new tool called nitweb

Signed-off-by: Alexandre Terrasa <alexandre@moz-code.org>

diff --git a/src/web/web_base.nit b/src/web/web_base.nit
new file mode 100644 (file)
index 0000000..68d132c
--- /dev/null
+++ b/src/web/web_base.nit
@@ -0,0 +1,99 @@
+# This file is part of NIT ( http://www.nitlanguage.org ).
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+# http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+
+# Base classes used by `nitweb`.
+module web_base
+
+import frontend
+import nitcorn
+import json
+
+# Nitcorn server runned by `nitweb`.
+#
+# Usage:
+#
+# ~~~nitish
+# var srv = new NitServer("localhost", 3000)
+# srv.routes.add new Route("/", new MyAction)
+# src.listen
+# ~~~
+class NitServer
+
+       # Host to bind.
+       var host: String
+
+       # Port to use.
+       var port: Int
+
+       # Routes knwon by the server.
+       var routes = new Array[Route]
+
+       # Start listen on `host:port`.
+       fun listen do
+               var iface = "{host}:{port}"
+               print "Launching server on http://{iface}/"
+
+               var vh = new VirtualHost(iface)
+               for route in routes do vh.routes.add route
+
+               var fac = new HttpFactory.and_libevent
+               fac.config.virtual_hosts.add vh
+               fac.run
+       end
+end
+
+# Specific nitcorn Action for nitweb.
+class NitAction
+       super Action
+
+       # Link to the NitServer that runs this action.
+       var srv: NitServer
+
+       # Build a custom http response for errors.
+       fun render_error(code: Int, message: String): HttpResponse do
+               var response = new HttpResponse(code)
+               var tpl = new Template
+               tpl.add "<h1>Error {code}</h1>"
+               tpl.add "<pre><code>{message.html_escape}</code></pre>"
+               response.body = tpl.write_to_string
+               return response
+       end
+
+       # Render a view as a HttpResponse 200.
+       fun render_view(view: NitView): HttpResponse do
+               var response = new HttpResponse(200)
+               response.body = view.render(srv).write_to_string
+               return response
+       end
+
+       # Return a HttpResponse containing `json`.
+       fun render_json(json: Jsonable): HttpResponse do
+               var response = new HttpResponse(200)
+               response.body = json.to_json
+               return response
+       end
+end
+
+# A NitView is rendered by an action.
+interface NitView
+       # Renders this view and returns something that can be written to a HTTP response.
+       fun render(srv: NitServer): Writable is abstract
+end
+
+redef class HttpRequest
+       # Does the client asked for a json formatted response?
+       #
+       # Checks the URL get parameter `?json=true`.
+       fun is_json_asked: Bool do return bool_arg("json") or else false
+end