parsing POSTed data

diff --git a/msva b/msva
index d1a22817cd7fe4b20fd1ff242ef117309861c242..9f7e5b7e72850030282b6401726e5d94dc0d24c2 100755 (executable)
--- a/msva
+++ b/msva
@@ -41,11 +41,12 @@ use strict;
     return if !ref $cgi;
 
     # FIXME: these should be opening up a json blob instead of using CGI params.
-    my $uid = $cgi->param('uid');
-    my $pkc = $cgi->param('pkc');
-    my $context = $cgi->param('context');
+    my $data = from_json($cgi->param('POSTDATA'));
 
-    my $ret = { foo => 'bar' };
+    use Data::Dumper;
+    print STDERR Dumper($data);
+
+    my $ret = { valid => 'true' };
     # my $status = '404 no match found for the public key in this certificate';
     # or:
     my $status = '200 match found, authentication details to follow';