summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--Spline/Srs.pm17
1 files changed, 17 insertions, 0 deletions
diff --git a/Spline/Srs.pm b/Spline/Srs.pm
index ed83bac..915f1fb 100644
--- a/Spline/Srs.pm
+++ b/Spline/Srs.pm
@@ -121,6 +121,23 @@ sub handle($$) {
elsif ($map eq 'reverse') {
$result = $self->reverse($key);
}
+ elsif ($map eq 'check') {
+ eval {
+ $self->reverse($key);
+ };
+
+ my $err = $@;
+ if ($err) {
+ if ($err =~ m/(Invalid hash|Invalid timestamp)/) {
+ return 'REJECT Invalid SRS';
+ }
+
+ return 'DUNNO';
+ }
+ else {
+ return 'OK';
+ }
+ }
else {
die 'Invalid request';
}