user.id 0 a pospora X-Roles

lib/CF/Helpers/Auth.pm

@@ -74,7 +74,7 @@ sub register ( $class, $self, $conf) {
     });
 
     $self->helper( user => sub ( $c ) {
-        my $claims = $c->oauth_claims // return;
+        my $claims = $c->oauth_claims // return { id => 0 };
 
         if ( ! $c->stash->{user} ) {
             $c->stash->{user} = {
@@ -88,8 +88,16 @@ sub register ( $class, $self, $conf) {
     });
 
     $self->helper( user_roles => sub ( $c ) {
-        my $claims = $c->oauth_claims // return;
-        $c->stash->{user_roles} //= { map { $_ => 1 } @{ $claims->{roles} // [] }};
+        my @roles = ();
+
+        if ( $c->cfg->{test_x_roles} && $c->req->headers->header('X-Roles')) {
+            @roles = split /\W+/, $c->req->headers('X-Roles');
+        }
+        elsif ( my $claims = $c->oauth_claims ) {
+            @roles = @{ $claims->{roles} // [] };
+        }
+
+        $c->stash->{user_roles} //= { map { $_ => 1 }  @roles };
         return $c->stash->{user_roles};
     });