List tokens of a client
Change-Id: Ib4752a9f4fc502f79fefd870857405634ef5ebb9
diff --git a/t/server/mock.pl b/t/server/mock.pl
index 43f4f5f..7e3eedb 100644
--- a/t/server/mock.pl
+++ b/t/server/mock.pl
@@ -544,8 +544,8 @@
push @$list, {
"client_id" => $tokens{new_client_id},
"client_name" => $name,
- "description" => $desc,
- "url" => $url
+ "client_description" => $desc,
+ "client_url" => $url
};
# Confidential server application
@@ -577,6 +577,29 @@
);
};
+
+# Get token list
+post '/v1.0/oauth2/token/list' => sub {
+ my $c = shift;
+ return $c->render(json => [
+ {
+ "client_description" => "Nur ein Beispiel",
+ "client_id" => $tokens{new_client_id},
+ "client_name" => "Beispiel",
+ "client_url" => "",
+ "created_date" => "2021-04-14T19:40:26.742+02:00[Europe\/Berlin]",
+ "expires_in" => "31533851",
+ "scope" => [
+ "match_info",
+ "search",
+ "openid"
+ ],
+ "token" => "jhkhkjhk_hjgjsfz67i",
+ "user_authentication_time" => "2021-04-14T19:39:41.81+02:00[Europe\/Berlin]"
+ }
+ ]);
+};
+
del '/v1.0/oauth2/client/deregister/:client_id' => sub {
my $c = shift;
my $client_id = $c->stash('client_id');