mirror of
https://github.com/urbit/shrub.git
synced 2024-12-14 20:02:51 +03:00
removes gcp security driver (no longer used by :dns)
This commit is contained in:
parent
3db03a1d44
commit
ab496e5912
@ -1,57 +0,0 @@
|
||||
:: Test url +https://www.googleapis.com/oauth2/v1/userinfo
|
||||
::
|
||||
:::: /hoon/googleapis/com/sec
|
||||
::
|
||||
/+ oauth2, interpolate, hep-to-cab
|
||||
::
|
||||
::::
|
||||
::
|
||||
|%
|
||||
++ user-state {ber/token ref/refresh}:oauth2
|
||||
++ suffix-email
|
||||
%+ cook welp
|
||||
;~ plug
|
||||
(star ;~(less vat prn))
|
||||
;~(pose (plus prn) (easy "@gmail.com"))
|
||||
==
|
||||
::
|
||||
++ auth-usr
|
||||
|= usr/user:eyre
|
||||
=+ lon=(fall (slaw %t usr) usr)
|
||||
%+ add-query:interpolate 'https://accounts.google.com/o/oauth2/v2/auth'
|
||||
%- quay:hep-to-cab
|
||||
:~ login-hint+?~(lon '' (crip (rash lon suffix-email)))
|
||||
access-type+%offline
|
||||
response-type+%code
|
||||
prompt+%consent
|
||||
==
|
||||
++ scopes
|
||||
:~ 'https://mail.google.com'
|
||||
'https://www.googleapis.com/auth/plus.me'
|
||||
'https://www.googleapis.com/auth/userinfo.email'
|
||||
'https://www.googleapis.com/auth/ndev.clouddns.readwrite'
|
||||
'https://www.googleapis.com/auth/cloud-platform.read-only'
|
||||
==
|
||||
::
|
||||
++ exchange-url 'https://www.googleapis.com/oauth2/v4/token'
|
||||
--
|
||||
::
|
||||
::::
|
||||
::
|
||||
|_ {bal/(bale:eyre keys:oauth2) own/user-state}
|
||||
:: ++auth is a "standard refreshing oauth2" core, which implements the
|
||||
:: most common handling of oauth2 semantics. see lib/oauth2 for more details,
|
||||
:: and examples at the bottom of the file.
|
||||
++ auth
|
||||
=+ a=~(standard-refreshing oauth2 bal ber.own)
|
||||
(a(state-usr &) ..auth ref.own |=(a/user-state ..auth(own a)))
|
||||
::
|
||||
++ filter-request (out-refresh-or-add-header:auth exchange-url scopes dialog-url)
|
||||
++ dialog-url (auth-usr usr.bal)
|
||||
::
|
||||
++ filter-response res-save-after-refresh:auth
|
||||
::
|
||||
++ receive-auth-query-string (in-code-to-token:auth exchange-url)
|
||||
++ receive-auth-response bak-save-both-tokens:auth
|
||||
:: ++ update *user-state
|
||||
--
|
Loading…
Reference in New Issue
Block a user