one oauth approach.

src/cljs/auto_ap/views.cljs

@@ -6,6 +6,7 @@
             [auto-ap.events :as events]
             [cljs.reader :as edn]
             [cljsjs.dropzone :as dz]
+            [cljsjs.auth0-lock :as a0]
             [auto-ap.routes :as routes]
             [bidi.bidi :as bidi]
             [cljs-http.client :as http]
@@ -217,6 +218,37 @@
            [:i.fa.fa-spin.fa-spinner])
          "Save"]]]]]))
 
+(def login
+  (let [lock (reagent/atom nil)
+        user (re-frame/subscribe [::subs/user])]
+    (with-meta (fn []
+                 [:a {:class "navbar-link login" :on-click (fn [x e] (.preventDefault e)  (.show @lock)) } (or (@user "name") "Login")])
+      {:component-did-mount (fn [this]
+                              (let [l (js/Auth0Lock.
+                                       "twbXfoLvL0tKTR6GWORoM-ss51wM1zXZ",
+                                       "app82488100.auth0.com"
+                                       (clj->js {
+                                                 :rememberLastLogin false,
+                                                 :socialButtonStyle "big",
+                                                 :oidcConformant true,
+                                                 :auth {
+                                                        :audience "https://app82488100.auth0.com/api/v2/",
+                                                        :params {:scope "openid email profile"},
+                                                        :responseType "token",
+                                                        :redirect true,
+                                                        :redirectUrl "http://localhost:3449"
+                                                        }
+                                                 :languageDictionary {:title "Auto AP"},
+                                                 :language "en"
+                                                 :theme {:primaryColor "#3A99D8"}
+                                                 }))]
+                                (.on l "authenticated" (fn [result]
+                                                         (.getUserInfo l (.-accessToken result )
+                                                                       (fn [err profile]
+                                                                         (re-frame/dispatch [::events/logged-in (.-accessToken result) (js->clj profile)])))))
+
+                                (reset! lock l)))})))
+
 (defn main-panel []
   (let [company (re-frame/subscribe [::subs/company])
         ap (re-frame/subscribe [::subs/active-page])
@@ -251,7 +283,7 @@
        [:div {:id "navMenu", :class "navbar-menu"}
         [:div {:class "navbar-end"}
          [:div {:class "navbar-item has-dropdown is-active"}
-          [:a {:class "navbar-link login"} "Login"]
+          [login]
           [:div {:class "navbar-dropdown", :style {:display "none"}}
            [:a {:class "navbar-item"} ]
            [:a {:class "navbar-item"} ]