[network-manager-fortisslvpn/lr/otp: 1/4] contrib: request OTP

[Lubomir Rintel <lkundrak src gnome org>]

commit c3061f5fd75141a000afd8aba889407c20fcf90a
Author: Lubomir Rintel <lkundrak v3 sk>
Date:   Mon Jul 10 16:27:44 2017 +0200

    contrib: request OTP

 contrib/fortiserve.pl |    9 +++++++--
 1 files changed, 7 insertions(+), 2 deletions(-)
---
diff --git a/contrib/fortiserve.pl b/contrib/fortiserve.pl
index 022fa47..422f51c 100755
--- a/contrib/fortiserve.pl
+++ b/contrib/fortiserve.pl
@@ -249,9 +249,14 @@ sub serve_request
 
        my $response;
 
+
        if ($request->uri eq '/remote/logincheck') {
-               $response = new HTTP::Response (200 => 'OK', [], 'something');
-               $response->header ('Set-Cookie' => 'SVPNCOOKIE=something;');
+               if ($request->content =~ /code=/) {
+                       $response = new HTTP::Response (200 => 'OK', [], '');
+                       $response->header ('Set-Cookie' => 'SVPNCOOKIE=something;');
+               } else {
+                       $response = new HTTP::Response (200 => 'OK', [], 'tokeninfo=helloworld');
+               }
        } elsif ($request->uri eq '/remote/index') {
                $response = new HTTP::Response (200 => 'OK', [], 'something');
        } elsif ($request->uri eq '/remote/fortisslvpn') {