add route_pattern request field

Author: leafo

docs/actions.md

@@ -450,6 +450,14 @@ $options_table{
         assert @route_name == "my_page"
     ]]}
   },
+  {
+    name = $self_ref{"route_pattern"},
+    description = "The route pattern string that was matched during routing, if available",
+    example = $dual_code{[[
+      app\match "my_page", "/my-page", =>
+        assert @route_pattern == "/my-page"
+    ]]}
+  },
   {
     name = $self_ref{"params"},
     description = "A table containing all request parameters merged together, including query parameters and form-encoded parameters from the body of the request. See [Request Parameters](#request_parameters) for more details."

lapis/application.lua

@@ -166,6 +166,7 @@ do
         do
           local _with_0 = r
           _with_0.route_name = name
+          _with_0.route_pattern = path
           support.add_params(r, r.req.params_get, "GET")
           support.add_params(r, r.req.params_post, "POST")
           support.add_params(r, params, "url_params")

lapis/application.moon

@@ -220,6 +220,7 @@ class Application
 
       with r
         .route_name = name
+        .route_pattern = path
 
         support.add_params r, r.req.params_get, "GET"
         support.add_params r, r.req.params_post, "POST"
@@ -491,4 +492,3 @@ json_params = (fn) ->
   :capture_errors, :capture_errors_json
   :json_params, :assert_error, :yield_error
 }
-

spec/application_spec.moon

@@ -637,6 +637,27 @@ describe "lapis.application", ->
       assert.has_error ->
         assert_request SomeApp, "/cool", method: "DELETE"
 
+    it "exposes matched route pattern on request", ->
+      local named_pattern, unnamed_pattern
+      local named_route_name, unnamed_route_name
+
+      class SomeApp extends lapis.Application
+        @match "named_user", "/user/:id", =>
+          named_pattern = @route_pattern
+          named_route_name = @route_name
+
+        @match "/post/:slug", =>
+          unnamed_pattern = @route_pattern
+          unnamed_route_name = @route_name
+
+      assert_request SomeApp, "/user/123"
+      assert.same "/user/:id", named_pattern
+      assert.same "named_user", named_route_name
+
+      assert_request SomeApp, "/post/hello-world"
+      assert.same "/post/:slug", unnamed_pattern
+      assert.same nil, unnamed_route_name
+
   describe "instancing", ->
     it "matchs a route", ->
       local res
@@ -887,4 +908,3 @@ describe "lapis.application", ->
         mock_app "/hello", { host: "leaf", port: 2000 }, =>
           @build_url "http://leafo.net"
 
-