progress on authentication.
This commit is contained in:
@@ -1,5 +1,5 @@
|
||||
(ns auto-ap.routes.auth
|
||||
(:require [auto-ap.db.users :as users]
|
||||
(:require [auto-ap.datomic.users :as users]
|
||||
[buddy.sign.jwt :as jwt]
|
||||
[clj-http.client :as http]
|
||||
[clj-time.core :as time]
|
||||
@@ -27,17 +27,19 @@
|
||||
{:headers {"Authorization" (str "Bearer " token)} :as :json})
|
||||
:body
|
||||
(doto println))
|
||||
user (users/find-or-insert! {:provider "google"
|
||||
:provider-id (:id profile)
|
||||
:role "none"
|
||||
:name (:name profile)})]
|
||||
user (users/find-or-insert! {:user/provider "google"
|
||||
:user/provider-id (:id profile)
|
||||
:user/role :user-role/none
|
||||
:user/name (:name profile)})
|
||||
]
|
||||
(println "authenticated as user" user)
|
||||
|
||||
(if (and token user)
|
||||
{:status 301
|
||||
:headers {"Location" (str "/?jwt=" (jwt/sign {:user "test"
|
||||
:exp (time/plus (time/now) (time/days 7))
|
||||
:companies (:companies user)
|
||||
:role (:role user)
|
||||
:companies (:user/clients user)
|
||||
:role (name (:user/role user))
|
||||
:name (:name profile)}
|
||||
(:jwt-secret env)
|
||||
{:alg :hs512}))}}
|
||||
|
||||
Reference in New Issue
Block a user