Merge kmx's remote_credential branch

[catagits/Catalyst-Plugin-Authentication.git] / t / lib / RemoteTestEngine.pm

diff --git a/t/lib/RemoteTestEngine.pm b/t/lib/RemoteTestEngine.pm
new file mode 100644 (file)
index 0000000..16dfe59
--- /dev/null
+++ b/t/lib/RemoteTestEngine.pm
@@ -0,0 +1,15 @@
+package RemoteTestEngine;
+use base 'Catalyst::Engine::CGI';
+
+our $REMOTE_USER;
+our $SSL_CLIENT_S_DN;
+
+sub env {
+    my $self = shift;
+    my %e = %ENV;
+    $e{REMOTE_USER} = $REMOTE_USER;
+    $e{SSL_CLIENT_S_DN} = $SSL_CLIENT_S_DN;
+    return \%e;    
+};
+
+1;