X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F07google.t;h=37d7d74d5a66612c415ad02a32faf54711159ed3;hb=1697030541bac46294ecf45c0996f66d05d05e72;hp=f4f5eae71474f3a35d247a5b69c335917f796dc6;hpb=fbb4eba95e854ade8db07b9bb3204c50039ee234;p=scpubgit%2Fstemmaweb.git

diff --git a/t/07google.t b/t/07google.t
index f4f5eae..37d7d74 100644
--- a/t/07google.t
+++ b/t/07google.t
@@ -13,6 +13,7 @@ use Test::WWW::Mechanize;
 use Test::More;
 use HTML::TreeBuilder;
 use Data::Dumper;
+use IO::All;
 
 use stemmaweb::Test::DB;
 
@@ -22,91 +23,205 @@ my $dir = stemmaweb::Test::DB->new_db;
 # to check user accounts really have been created.
 # It'll need to be changed once that is replaced...
 
-my $scope = $dir->new_scope;
-
 LWP::Protocol::PSGI->register(stemmaweb->psgi_app);
 
 my $ua = Test::WWW::Mechanize->new;
 
-$ua->get_ok('http://localhost/login');
+io("$FindBin::Bin/var")->rmtree;
+
+{
+    my $scope = $dir->new_scope;
+
+    $ua->get_ok('http://localhost/login');
+
+    local *Catalyst::Authentication::Credential::OpenID::authenticate = sub {
+        my ( $self, $c, $realm, $authinfo ) = @_;
+
+        return $realm->find_user({ url => 'https://www.google.com/accounts/o8/id' }, $c);
+    };
+
+    ok !$dir->find_user({ url => 'https://www.google.com/accounts/o8/id' }), 'No such user, yet.';
+
+    $ua->submit_form(
+        form_number => 2,
+        fields => {
+            openid_identifier => 'https://www.google.com/accounts/o8/id',
+        },
+    );
+
+    $ua->content_contains('You have logged in.', 'Openid login works');
+
+    $ua->get('/');
+
+    $ua->content_contains('Hello! https://www.google.com/accounts/o8/id!', 'We are logged in.');
+
+    ok $dir->find_user({ url => 'https://www.google.com/accounts/o8/id' }), 'The user is now there.';
+    $ua->get('/logout');
+
+    # Converting to Google ID.
+
+    local *stemmaweb::Authentication::Credential::Google::authenticate = sub {
+        my ( $self, $c, $realm, $authinfo ) = @_;
+
+        return $realm->find_user({
+                openid_id => 'https://www.google.com/accounts/o8/id',
+                sub        => 42,
+            }, $c);
+    };
+    $ua->get_ok('http://localhost/login');
+
+    $ua->submit_form(
+        form_number => 1,
+        fields => {
+            id_token => 'something',
+            email    => 'email@example.org',
+        },
+    );
+
+    $ua->content_contains('You have logged in.', 'G+ login works');
+
+    $ua->get('/');
+
+    $ua->content_contains('Hello! 42!', 'We are logged in.');
+}
+
+{
+    my $scope = $dir->new_scope;
+
+    ok !$dir->find_user({ url => 'https://www.google.com/accounts/o8/id' }), 'Old google-openid is gone.';
+
+    ok $dir->find_user({ sub => 42, openid_id => 'https://www.google.com/accounts/o8/id' }), 'The G+ user is there.';
+
+    $ua->get('/logout');
+
+    $ua->get_ok('http://localhost/login');
+
+    local *stemmaweb::Authentication::Credential::Google::authenticate = sub {
+        my ( $self, $c, $realm, $authinfo ) = @_;
+
+        return $realm->find_user({
+                openid_id => 'https://www.google.com/accounts/o8/id',
+                sub        => 42,
+            }, $c);
+    };
+
+    $ua->submit_form(
+        form_number => 1,
+        fields => {
+            id_token => 'something',
+            email   => 'email@example.org',
+        },
+    );
+
+    $ua->content_contains('You have logged in.', 'We can now log in to our created user');
+
+    $ua->get('/');
+
+    $ua->content_contains('Hello! 42!', 'We are logged in.');
+}
+
+# Brand new user just from open id.
+
+{
+    my $scope = $dir->new_scope;
+
+
+    ok !$dir->find_user({ sub => 2, openid_id => 'https://www.google.com/accounts/o8/id2' }), 'The G+ user is not yet there.';
+
+    $ua->get('/logout');
+
+    $ua->get_ok('http://localhost/login');
+
+    local *stemmaweb::Authentication::Credential::Google::authenticate = sub {
+        my ( $self, $c, $realm, $authinfo ) = @_;
+
+        return $realm->find_user({
+                openid_id => 'https://www.google.com/accounts/o8/id2',
+                sub        => 2,
+            }, $c);
+    };
 
-# Creating an openID user.
+    $ua->submit_form(
+        form_number => 1,
+        fields => {
+            id_token => 'something',
+            email   => 'email@example.org',
+        },
+    );
 
-local *Catalyst::Authentication::Credential::OpenID::authenticate = sub {
-    my ( $self, $c, $realm, $authinfo ) = @_;
+    $ua->content_contains('You have logged in.', 'We can now log in to our created user');
 
-    return $realm->find_user({ url => 'https://www.google.com/accounts/o8/id' }, $c);
-};
+    $ua->get('/');
 
-ok !$dir->find_user({ url => 'https://www.google.com/accounts/o8/id' }), 'No such user, yet.';
+    $ua->content_contains('Hello! 2!', 'We are logged in.');
 
-$ua->submit_form(
-    form_number => 2,
-    fields => {
-        openid_identifier => 'https://www.google.com/accounts/o8/id',
-    },
-);
+    ok $dir->find_user({ sub => 2, openid_id => 'https://www.google.com/accounts/o8/id2' }), 'The G+ user is there.';
 
-$ua->content_contains('You have logged in.', 'Openid login works');
+    $ua->get('/logout');
 
-$ua->get('/');
+    $ua->get_ok('http://localhost/login');
 
-$ua->content_contains('Hello! https://www.google.com/accounts/o8/id!', 'We are logged in.');
+    $ua->submit_form(
+        form_number => 1,
+        fields => {
+            id_token => 'something',
+            email   => 'email@example.org',
+        },
+    );
 
-ok $dir->find_user({ url => 'https://www.google.com/accounts/o8/id' }), 'The user is now there.';
-$ua->get('/logout');
+    $ua->content_contains('You have logged in.', 'We can login again');
 
-# Converting to Google ID.
+    $ua->get('/');
 
-local *stemmaweb::Authentication::Credential::Google::authenticate = sub {
-    my ( $self, $c, $realm, $authinfo ) = @_;
+    $ua->content_contains('Hello! 2!', 'We are logged in.');
+}
 
-    return $realm->find_user({
-            openid_id => 'https://www.google.com/accounts/o8/id',
-            sub        => 42,
-        }, $c);
-};
-$ua->get_ok('http://localhost/login');
+# Decoding token
 
-$ua->submit_form(
-    form_number => 1,
-    fields => {
-        id_token => 'something',
-        email    => 'email@example.org',
-    },
-);
+{
+    my $scope = $dir->new_scope;
 
-$ua->content_contains('You have logged in.', 'G+ login works');
+    ok !$dir->find_user({ sub => 4242, openid_id => 'https://www.google.com/accounts/o8/id3' }), 'The G+ user is not yet there.';
 
-$ua->get('/');
+    $ua->get('/logout');
 
-$ua->content_contains('Hello! 42!', 'We are logged in.');
+    $ua->get_ok('http://localhost/login');
 
+    $ua->submit_form(
+        form_number => 1,
+        fields => {
+            id_token => 'eyJraWQiOiJhIiwiYWxnIjoiUlMyNTYifQ.eyJzdWIiOiI0MjQyIiwib3BlbmlkX2lkIjoiaHR0cHM6Ly93d3cuZ29vZ2xlLmNvbS9hY2NvdW50cy9vOC9pZDMifQ.moNERe3UHCY4xGMPxdCqmbg2JKW5feVnYlA8jeB4CdE4c_KL3YHvICQeql-S486HT-AlWBeDJWMr6wWH1kkwz11a2D1oyJ8qCWBssHIkhfv8dm3dphmRbtzYssAOFdGsmnPH1oXolCnl-Qu9WgHkhYYnRJWHr3CkeNA6Yh1xOV3nkaa8REtJckuzh3jyKQgx_rjIFsWBPDmT1rqa_Q0XOGVK34N5tADwpcWmkb3fFnbddzd9L6MnybbFzF_S238Bpr5vNa9doXRBwvJ85AdSn1AWX8R6qVpDbbaiGL2RCahuZYF9XECYm6anee-KTKvxh02KXkG2zniKVvweaMlcbQ',
+            email    => 'email@example.org',
+        },
+    );
 
-my $ouser =$dir->find_user({ url => 'https://www.google.com/accounts/o8/id' });
+    $ua->content_contains('You have logged in.', 'We can now log in to our created user - the token was decoded');
 
-diag $ouser->id . "\n\n\n";
+    $ua->get('/');
 
+    $ua->content_contains('Hello! 4242!', 'We are logged in.');
 
-ok $dir->find_user({ sub => 42, openid_id => 'https://www.google.com/accounts/o8/id' }), 'The G+ user is there.';
+    ok $dir->find_user({ sub => 4242, openid_id => 'https://www.google.com/accounts/o8/id3' }), 'The G+ user is there.';
 
+    $ua->get('/logout');
 
-$ua->get('/logout');
+    $ua->get_ok('http://localhost/login');
 
-$ua->get_ok('http://localhost/login');
+    $ua->submit_form(
+        form_number => 1,
+        fields => {
+            id_token => 'eyJraWQiOiJhIiwiYWxnIjoiUlMyNTYifQ.eyJzdWIiOiI0MjQyIiwib3BlbmlkX2lkIjoiaHR0cHM6Ly93d3cuZ29vZ2xlLmNvbS9hY2NvdW50cy9vOC9pZDMifQ.moNERe3UHCY4xGMPxdCqmbg2JKW5feVnYlA8jeB4CdE4c_KL3YHvICQeql-S486HT-AlWBeDJWMr6wWH1kkwz11a2D1oyJ8qCWBssHIkhfv8dm3dphmRbtzYssAOFdGsmnPH1oXolCnl-Qu9WgHkhYYnRJWHr3CkeNA6Yh1xOV3nkaa8REtJckuzh3jyKQgx_rjIFsWBPDmT1rqa_Q0XOGVK34N5tADwpcWmkb3fFnbddzd9L6MnybbFzF_S238Bpr5vNa9doXRBwvJ85AdSn1AWX8R6qVpDbbaiGL2RCahuZYF9XECYm6anee-KTKvxh02KXkG2zniKVvweaMlcbQ',
+            email   => 'email@example.org',
+        },
+    );
 
-$ua->submit_form(
-    form_number => 1,
-    fields => {
-        id_token => 'something',
-        email   => 'email@example.org',
-    },
-);
+    $ua->content_contains('You have logged in.', 'We can login again');
 
-$ua->content_contains('You have logged in.', 'We can now log in to our created user');
+    $ua->get('/');
 
-$ua->get('/');
+    $ua->content_contains('Hello! 4242!', 'We are logged in.');
+}
 
-$ua->content_contains('Hello! 42!', 'We are logged in.');
+io("$FindBin::Bin/var")->rmtree;
 
 done_testing;