Add query and post parameter parsing

Added for both mochiweb and misultin Follows the same setup simple_bridge
jeroenvandijk · Aug 23, 2011 · f392a7c · f392a7c
1 parent 821e5fa
commit f392a7c
Show file tree

Hide file tree

Showing 2 changed files with 33 additions and 2 deletions.
diff --git a/lib/ex_bridge/misultin/request.ex b/lib/ex_bridge/misultin/request.ex
@@ -14,11 +14,27 @@ module ExBridge::Misultin::Request
     path
   end
 
+  def query_params
+    @query_params || begin
+      list = Erlang.apply(@request, 'parse_qs, [])
+      OrderedDict.from_list list.map(-> ({x,y}) { x.to_bin, y.to_bin })
+    end
+  end
+
+  def post_params
+    @post_params || begin
+      list = Erlang.apply(@request, 'parse_post, [])
+      OrderedDict.from_list list.map(-> ({x,y}) { x.to_bin, y.to_bin })
+    end
+  end
+
+
   def headers
     @headers || begin
       list = Erlang.apply(@request, 'get, ['headers])
       list = list.map -> ({x,y}) { upcase_headers(x), y.to_bin }
       OrderedDict.from_list list
     end
   end
-end
+end
+
diff --git a/lib/ex_bridge/mochiweb/request.ex b/lib/ex_bridge/mochiweb/request.ex
@@ -15,6 +15,20 @@ module ExBridge::Mochiweb::Request
     path
   end
 
+  def query_params
+    @query_params || begin
+      list = Erlang.apply(@request, 'parse_qs, [])
+      OrderedDict.from_list list.map(-> ({x,y}) { x.to_bin, y.to_bin })
+    end
+  end
+
+  def post_params
+    @post_params || begin
+      list = Erlang.apply(@request, 'parse_post, [])
+      OrderedDict.from_list list.map(-> ({x,y}) { x.to_bin, y.to_bin })
+    end
+  end
+
   def headers
     @headers || begin
       list = Erlang.mochiweb_headers.to_list(Erlang.apply(@request, 'get, ['headers]))
@@ -29,4 +43,5 @@ module ExBridge::Mochiweb::Request
       OrderedDict.from_list list.map(-> ({x,y}) { x.to_bin, y.to_bin })
     end
   end
-end
+end
+