16718: Merge branch 'master' into 16718-group-contents-collection-versions
[arvados.git] / lib / controller / localdb / login_oidc.go
1 // Copyright (C) The Arvados Authors. All rights reserved.
2 //
3 // SPDX-License-Identifier: AGPL-3.0
4
5 package localdb
6
7 import (
8         "bytes"
9         "context"
10         "crypto/hmac"
11         "crypto/sha256"
12         "encoding/base64"
13         "errors"
14         "fmt"
15         "net/http"
16         "net/url"
17         "strings"
18         "sync"
19         "text/template"
20         "time"
21
22         "git.arvados.org/arvados.git/lib/controller/rpc"
23         "git.arvados.org/arvados.git/sdk/go/arvados"
24         "git.arvados.org/arvados.git/sdk/go/auth"
25         "git.arvados.org/arvados.git/sdk/go/ctxlog"
26         "git.arvados.org/arvados.git/sdk/go/httpserver"
27         "github.com/coreos/go-oidc"
28         "golang.org/x/oauth2"
29         "google.golang.org/api/option"
30         "google.golang.org/api/people/v1"
31 )
32
33 type oidcLoginController struct {
34         Cluster            *arvados.Cluster
35         RailsProxy         *railsProxy
36         Issuer             string // OIDC issuer URL, e.g., "https://accounts.google.com"
37         ClientID           string
38         ClientSecret       string
39         UseGooglePeopleAPI bool   // Use Google People API to look up alternate email addresses
40         EmailClaim         string // OpenID claim to use as email address; typically "email"
41         EmailVerifiedClaim string // If non-empty, ensure claim value is true before accepting EmailClaim; typically "email_verified"
42         UsernameClaim      string // If non-empty, use as preferred username
43
44         // override Google People API base URL for testing purposes
45         // (normally empty, set by google pkg to
46         // https://people.googleapis.com/)
47         peopleAPIBasePath string
48
49         provider   *oidc.Provider        // initialized by setup()
50         oauth2conf *oauth2.Config        // initialized by setup()
51         verifier   *oidc.IDTokenVerifier // initialized by setup()
52         mu         sync.Mutex            // protects setup()
53 }
54
55 // Initialize ctrl.provider and ctrl.oauth2conf.
56 func (ctrl *oidcLoginController) setup() error {
57         ctrl.mu.Lock()
58         defer ctrl.mu.Unlock()
59         if ctrl.provider != nil {
60                 // already set up
61                 return nil
62         }
63         redirURL, err := (*url.URL)(&ctrl.Cluster.Services.Controller.ExternalURL).Parse("/" + arvados.EndpointLogin.Path)
64         if err != nil {
65                 return fmt.Errorf("error making redirect URL: %s", err)
66         }
67         provider, err := oidc.NewProvider(context.Background(), ctrl.Issuer)
68         if err != nil {
69                 return err
70         }
71         ctrl.oauth2conf = &oauth2.Config{
72                 ClientID:     ctrl.ClientID,
73                 ClientSecret: ctrl.ClientSecret,
74                 Endpoint:     provider.Endpoint(),
75                 Scopes:       []string{oidc.ScopeOpenID, "profile", "email"},
76                 RedirectURL:  redirURL.String(),
77         }
78         ctrl.verifier = provider.Verifier(&oidc.Config{
79                 ClientID: ctrl.ClientID,
80         })
81         ctrl.provider = provider
82         return nil
83 }
84
85 func (ctrl *oidcLoginController) Logout(ctx context.Context, opts arvados.LogoutOptions) (arvados.LogoutResponse, error) {
86         return noopLogout(ctrl.Cluster, opts)
87 }
88
89 func (ctrl *oidcLoginController) Login(ctx context.Context, opts arvados.LoginOptions) (arvados.LoginResponse, error) {
90         err := ctrl.setup()
91         if err != nil {
92                 return loginError(fmt.Errorf("error setting up OpenID Connect provider: %s", err))
93         }
94         if opts.State == "" {
95                 // Initiate OIDC sign-in.
96                 if opts.ReturnTo == "" {
97                         return loginError(errors.New("missing return_to parameter"))
98                 }
99                 state := ctrl.newOAuth2State([]byte(ctrl.Cluster.SystemRootToken), opts.Remote, opts.ReturnTo)
100                 return arvados.LoginResponse{
101                         RedirectLocation: ctrl.oauth2conf.AuthCodeURL(state.String(),
102                                 // prompt=select_account tells Google
103                                 // to show the "choose which Google
104                                 // account" page, even if the client
105                                 // is currently logged in to exactly
106                                 // one Google account.
107                                 oauth2.SetAuthURLParam("prompt", "select_account")),
108                 }, nil
109         }
110         // Callback after OIDC sign-in.
111         state := ctrl.parseOAuth2State(opts.State)
112         if !state.verify([]byte(ctrl.Cluster.SystemRootToken)) {
113                 return loginError(errors.New("invalid OAuth2 state"))
114         }
115         oauth2Token, err := ctrl.oauth2conf.Exchange(ctx, opts.Code)
116         if err != nil {
117                 return loginError(fmt.Errorf("error in OAuth2 exchange: %s", err))
118         }
119         rawIDToken, ok := oauth2Token.Extra("id_token").(string)
120         if !ok {
121                 return loginError(errors.New("error in OAuth2 exchange: no ID token in OAuth2 token"))
122         }
123         idToken, err := ctrl.verifier.Verify(ctx, rawIDToken)
124         if err != nil {
125                 return loginError(fmt.Errorf("error verifying ID token: %s", err))
126         }
127         authinfo, err := ctrl.getAuthInfo(ctx, oauth2Token, idToken)
128         if err != nil {
129                 return loginError(err)
130         }
131         ctxRoot := auth.NewContext(ctx, &auth.Credentials{Tokens: []string{ctrl.Cluster.SystemRootToken}})
132         return ctrl.RailsProxy.UserSessionCreate(ctxRoot, rpc.UserSessionCreateOptions{
133                 ReturnTo: state.Remote + "," + state.ReturnTo,
134                 AuthInfo: *authinfo,
135         })
136 }
137
138 func (ctrl *oidcLoginController) UserAuthenticate(ctx context.Context, opts arvados.UserAuthenticateOptions) (arvados.APIClientAuthorization, error) {
139         return arvados.APIClientAuthorization{}, httpserver.ErrorWithStatus(errors.New("username/password authentication is not available"), http.StatusBadRequest)
140 }
141
142 // Use a person's token to get all of their email addresses, with the
143 // primary address at index 0. The provided defaultAddr is always
144 // included in the returned slice, and is used as the primary if the
145 // Google API does not indicate one.
146 func (ctrl *oidcLoginController) getAuthInfo(ctx context.Context, token *oauth2.Token, idToken *oidc.IDToken) (*rpc.UserSessionAuthInfo, error) {
147         var ret rpc.UserSessionAuthInfo
148         defer ctxlog.FromContext(ctx).WithField("ret", &ret).Debug("getAuthInfo returned")
149
150         var claims map[string]interface{}
151         if err := idToken.Claims(&claims); err != nil {
152                 return nil, fmt.Errorf("error extracting claims from ID token: %s", err)
153         } else if verified, _ := claims[ctrl.EmailVerifiedClaim].(bool); verified || ctrl.EmailVerifiedClaim == "" {
154                 // Fall back to this info if the People API call
155                 // (below) doesn't return a primary && verified email.
156                 name, _ := claims["name"].(string)
157                 if names := strings.Fields(strings.TrimSpace(name)); len(names) > 1 {
158                         ret.FirstName = strings.Join(names[0:len(names)-1], " ")
159                         ret.LastName = names[len(names)-1]
160                 } else {
161                         ret.FirstName = names[0]
162                 }
163                 ret.Email, _ = claims[ctrl.EmailClaim].(string)
164         }
165
166         if ctrl.UsernameClaim != "" {
167                 ret.Username, _ = claims[ctrl.UsernameClaim].(string)
168         }
169
170         if !ctrl.UseGooglePeopleAPI {
171                 if ret.Email == "" {
172                         return nil, fmt.Errorf("cannot log in with unverified email address %q", claims[ctrl.EmailClaim])
173                 }
174                 return &ret, nil
175         }
176
177         svc, err := people.NewService(ctx, option.WithTokenSource(ctrl.oauth2conf.TokenSource(ctx, token)), option.WithScopes(people.UserEmailsReadScope))
178         if err != nil {
179                 return nil, fmt.Errorf("error setting up People API: %s", err)
180         }
181         if p := ctrl.peopleAPIBasePath; p != "" {
182                 // Override normal API endpoint (for testing)
183                 svc.BasePath = p
184         }
185         person, err := people.NewPeopleService(svc).Get("people/me").PersonFields("emailAddresses,names").Do()
186         if err != nil {
187                 if strings.Contains(err.Error(), "Error 403") && strings.Contains(err.Error(), "accessNotConfigured") {
188                         // Log the original API error, but display
189                         // only the "fix config" advice to the user.
190                         ctxlog.FromContext(ctx).WithError(err).WithField("email", ret.Email).Error("People API is not enabled")
191                         return nil, errors.New("configuration error: Login.GoogleAlternateEmailAddresses is true, but Google People API is not enabled")
192                 }
193                 return nil, fmt.Errorf("error getting profile info from People API: %s", err)
194         }
195
196         // The given/family names returned by the People API and
197         // flagged as "primary" (if any) take precedence over the
198         // split-by-whitespace result from above.
199         for _, name := range person.Names {
200                 if name.Metadata != nil && name.Metadata.Primary {
201                         ret.FirstName = name.GivenName
202                         ret.LastName = name.FamilyName
203                         break
204                 }
205         }
206
207         altEmails := map[string]bool{}
208         if ret.Email != "" {
209                 altEmails[ret.Email] = true
210         }
211         for _, ea := range person.EmailAddresses {
212                 if ea.Metadata == nil || !ea.Metadata.Verified {
213                         ctxlog.FromContext(ctx).WithField("address", ea.Value).Info("skipping unverified email address")
214                         continue
215                 }
216                 altEmails[ea.Value] = true
217                 if ea.Metadata.Primary || ret.Email == "" {
218                         ret.Email = ea.Value
219                 }
220         }
221         if len(altEmails) == 0 {
222                 return nil, errors.New("cannot log in without a verified email address")
223         }
224         for ae := range altEmails {
225                 if ae == ret.Email {
226                         continue
227                 }
228                 ret.AlternateEmails = append(ret.AlternateEmails, ae)
229                 if ret.Username == "" {
230                         i := strings.Index(ae, "@")
231                         if i > 0 && strings.ToLower(ae[i+1:]) == strings.ToLower(ctrl.Cluster.Users.PreferDomainForUsername) {
232                                 ret.Username = strings.SplitN(ae[:i], "+", 2)[0]
233                         }
234                 }
235         }
236         return &ret, nil
237 }
238
239 func loginError(sendError error) (resp arvados.LoginResponse, err error) {
240         tmpl, err := template.New("error").Parse(`<h2>Login error:</h2><p>{{.}}</p>`)
241         if err != nil {
242                 return
243         }
244         err = tmpl.Execute(&resp.HTML, sendError.Error())
245         return
246 }
247
248 func (ctrl *oidcLoginController) newOAuth2State(key []byte, remote, returnTo string) oauth2State {
249         s := oauth2State{
250                 Time:     time.Now().Unix(),
251                 Remote:   remote,
252                 ReturnTo: returnTo,
253         }
254         s.HMAC = s.computeHMAC(key)
255         return s
256 }
257
258 type oauth2State struct {
259         HMAC     []byte // hash of other fields; see computeHMAC()
260         Time     int64  // creation time (unix timestamp)
261         Remote   string // remote cluster if requesting a salted token, otherwise blank
262         ReturnTo string // redirect target
263 }
264
265 func (ctrl *oidcLoginController) parseOAuth2State(encoded string) (s oauth2State) {
266         // Errors are not checked. If decoding/parsing fails, the
267         // token will be rejected by verify().
268         decoded, _ := base64.RawURLEncoding.DecodeString(encoded)
269         f := strings.Split(string(decoded), "\n")
270         if len(f) != 4 {
271                 return
272         }
273         fmt.Sscanf(f[0], "%x", &s.HMAC)
274         fmt.Sscanf(f[1], "%x", &s.Time)
275         fmt.Sscanf(f[2], "%s", &s.Remote)
276         fmt.Sscanf(f[3], "%s", &s.ReturnTo)
277         return
278 }
279
280 func (s oauth2State) verify(key []byte) bool {
281         if delta := time.Now().Unix() - s.Time; delta < 0 || delta > 300 {
282                 return false
283         }
284         return hmac.Equal(s.computeHMAC(key), s.HMAC)
285 }
286
287 func (s oauth2State) String() string {
288         var buf bytes.Buffer
289         enc := base64.NewEncoder(base64.RawURLEncoding, &buf)
290         fmt.Fprintf(enc, "%x\n%x\n%s\n%s", s.HMAC, s.Time, s.Remote, s.ReturnTo)
291         enc.Close()
292         return buf.String()
293 }
294
295 func (s oauth2State) computeHMAC(key []byte) []byte {
296         mac := hmac.New(sha256.New, key)
297         fmt.Fprintf(mac, "%x %s %s", s.Time, s.Remote, s.ReturnTo)
298         return mac.Sum(nil)
299 }