From af90e8639a79071f6a6c0339cd7cab48cbc6cf27 Mon Sep 17 00:00:00 2001 From: flynn Date: Sat, 8 Jun 2019 19:45:39 +0200 Subject: [PATCH] remove unneeded logs --- resources/html/home.html | 2 +- src/clj/cat/routes/oauth.clj | 48 +++++++++++++++++++----------------- 2 files changed, 26 insertions(+), 24 deletions(-) diff --git a/resources/html/home.html b/resources/html/home.html index 642e728..a63c614 100644 --- a/resources/html/home.html +++ b/resources/html/home.html @@ -71,7 +71,7 @@ Enable admin - {%endif%} + {% endif %} {% endif %} {% if user %} diff --git a/src/clj/cat/routes/oauth.clj b/src/clj/cat/routes/oauth.clj index 67570f7..82b6ea8 100644 --- a/src/clj/cat/routes/oauth.clj +++ b/src/clj/cat/routes/oauth.clj @@ -46,35 +46,37 @@ (-> (found "/") (assoc :flash {:denied true})) ; fetch the request token and do anything else you wanna do if not denied. - (let [{:keys [access_token refresh_token]} (mo/get-authentication-response nil req_token)] - (log/debug "Successfully fetched access-id: " access_token) - (log/debug "Fetching user info") - (let [fetched-user (mo/get-user-info access_token)] - (log/debug "Fetched user info: " fetched-user) - (let [local-user (db/get-zeus-user {:zeusid (:id fetched-user)})] - (log/debug "Zeus user from db: " local-user) - (if local-user - (set-user! local-user session "/") - (try - (let [user-template {:name (:username fetched-user) - :gender nil - :zeusid (:id fetched-user)} - generated-key (-> user-template - (db/create-user!))] - (log/debug "Created user: " generated-key) - (set-user! (assoc user-template :id (:generated_key generated-key)) session "/")) - (catch Exception e - (do - (log/warn "fetched user" fetched-user "already exists, but was not found") - (log/warn (:cause (Throwable->map e))) - (-> (found "/") - (assoc :flash {:error "An error occurred, please try again."}))))))))))) + (let [{:keys [access_token refresh_token]} (mo/get-authentication-response nil req_token) + fetched-user (mo/get-user-info access_token) + local-user (db/get-zeus-user {:zeusid (:id fetched-user)})] + (if local-user + (set-user! local-user session "/") + (try + (let [user-template {:name (:username fetched-user) + :gender nil + :zeusid (:id fetched-user)} + generated-key (-> user-template + (db/create-user!))] + (set-user! (assoc user-template :id (:generated_key generated-key)) session "/")) + (catch Exception e + (do + (log/warn "fetched user" fetched-user "already exists, but was not found") + (log/warn (:cause (Throwable->map e))) + (-> (found "/") + (assoc :flash {:error "An error occurred, please try again."}))))))))) ;(catch [:status 401] _ ; (error-page {:status 401 ; :title "Error authenticating" ; :message "Please contact your system administrator to fix this issue"})) +; TODO catch using +;(defn multiple-status-endpoint [req] +; (let [resp (do-external-request req)] +; (condp = (:status resp) +; 201 (println ok) +; 401 (println error)))) + (defroutes oauth-routes (GET "/oauth/oauth-init" req (oauth-init req))