From 29356da8032a96d5d78953e4f2d644d1700b1ad5 Mon Sep 17 00:00:00 2001 From: Daniel Kahn Gillmor Date: Tue, 5 Jan 2010 21:33:26 -0500 Subject: [PATCH] do some logging on each request --- msva | 3 +++ 1 file changed, 3 insertions(+) diff --git a/msva b/msva index 738d4c2..af5b657 100755 --- a/msva +++ b/msva @@ -25,7 +25,9 @@ use strict; my $path = $cgi->path_info(); my $handler = $dispatch{$path}; + # FIXME: ensure that this is a POST if (ref($handler) eq "CODE") { + printf STDERR ("Got POST %s\n", $path); my ($status, $object) = $handler->($cgi); printf("HTTP/1.0 %s\r\nContent-Type: application/json\r\n\r\n%s", $status, to_json ($object)); @@ -38,6 +40,7 @@ use strict; my $cgi = shift; # CGI.pm object 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'); -- 2.26.2