From ecc5dc7d7798358dd52b2ad19274f31e03ddddf9 Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Sat, 21 Jul 2018 05:00:29 -0700 Subject: [PATCH] supporting iguana's --- config/dev.edn | 4 ++++ config/local.edn | 4 ++++ config/prod.edn | 8 ++++++-- config/staging.edn | 8 ++++++-- src/clj/auto_ap/yodlee/core.clj | 18 +++++++++--------- 5 files changed, 29 insertions(+), 13 deletions(-) diff --git a/config/dev.edn b/config/dev.edn index e34d4fc8..c9a7e936 100644 --- a/config/dev.edn +++ b/config/dev.edn @@ -8,6 +8,10 @@ :invoice-email "invoices-staging@mail.app.integreatconsult.com" :data-bucket "data.staging.app.integreatconsult.com" + :yodlee-cobrand-name "restserver" :yodlee-cobrand-login "sbCobda48aa19712a83c3ca4e935dd5e5d46b1a" :yodlee-cobrand-password "0a07ea32-1b5d-461b-ad0f-2752cdd77602" + :yodlee-user-login "sbMemda48aa19712a83c3ca4e935dd5e5d46b1a1" + :yodlee-user-password "sbMemda48aa19712a83c3ca4e935dd5e5d46b1a1#123" + :yodlee-base-url "https://developer.api.yodlee.com/ysl" } diff --git a/config/local.edn b/config/local.edn index bcd4cd71..4a06d221 100644 --- a/config/local.edn +++ b/config/local.edn @@ -7,6 +7,10 @@ :invoice-import-queue-url "https://sqs.us-east-1.amazonaws.com/679918342773/integreat-mail-staging" :data-bucket "data.staging.app.integreatconsult.com" + :yodlee-cobrand-name "restserver" :yodlee-cobrand-login "sbCobda48aa19712a83c3ca4e935dd5e5d46b1a" :yodlee-cobrand-password "0a07ea32-1b5d-461b-ad0f-2752cdd77602" + :yodlee-user-login "sbMemda48aa19712a83c3ca4e935dd5e5d46b1a1" + :yodlee-user-password "sbMemda48aa19712a83c3ca4e935dd5e5d46b1a1#123" + :yodlee-base-url "https://developer.api.yodlee.com/ysl" } diff --git a/config/prod.edn b/config/prod.edn index 9dc55dd2..cfd5f221 100644 --- a/config/prod.edn +++ b/config/prod.edn @@ -8,6 +8,10 @@ :invoice-email "invoices@mail.app.integreatconsult.com" :data-bucket "data.prod.app.integreatconsult.com" - :yodlee-cobrand-login "sbCobda48aa19712a83c3ca4e935dd5e5d46b1a" - :yodlee-cobrand-password "0a07ea32-1b5d-461b-ad0f-2752cdd77602" + :yodlee-cobrand-name "qstartus12" + :yodlee-cobrand-login "qstartus12" + :yodlee-cobrand-password "MPD@mg78hd" + :yodlee-user-login "integreat" + :yodlee-user-password "Import3transactions!" + :yodlee-base-url "https://quickstart2.api.yodlee.com/ysl" } diff --git a/config/staging.edn b/config/staging.edn index 2a2861d1..fe0c898e 100644 --- a/config/staging.edn +++ b/config/staging.edn @@ -8,6 +8,10 @@ :invoice-email "invoices-staging@mail.app.integreatconsult.com" :data-bucket "data.staging.app.integreatconsult.com" - :yodlee-cobrand-login "sbCobda48aa19712a83c3ca4e935dd5e5d46b1a" - :yodlee-cobrand-password "0a07ea32-1b5d-461b-ad0f-2752cdd77602" + :yodlee-cobrand-name "qstartus12" + :yodlee-cobrand-login "qstartus12" + :yodlee-cobrand-password "MPD@mg78hd" + :yodlee-user-login "integreat" + :yodlee-user-password "Import3transactions!" + :yodlee-base-url "https://quickstart2.api.yodlee.com/ysl" } diff --git a/src/clj/auto_ap/yodlee/core.clj b/src/clj/auto_ap/yodlee/core.clj index 40610e56..fb829591 100644 --- a/src/clj/auto_ap/yodlee/core.clj +++ b/src/clj/auto_ap/yodlee/core.clj @@ -8,11 +8,11 @@ ([cob-session user-session] (str "{cobSession=" cob-session ",userSession=" user-session "}"))) (def base-headers {"Api-Version" "1.1" - "Cobrand-Name" "restserver" + "Cobrand-Name" (:yodlee-cobrand-name env) "Content-Type" "application/json"}) (defn login-cobrand [] - (-> "https://developer.api.yodlee.com/ysl/cobrand/login" + (-> (str (:yodlee-base-url env) "/cobrand/login") (client/post {:headers base-headers :body (json/write-str {:cobrand {:cobrandLogin (:yodlee-cobrand-login env) @@ -26,11 +26,11 @@ (defn login-user [cob-session] - (-> "https://developer.api.yodlee.com/ysl/user/login" + (-> (str (:yodlee-base-url env) "/user/login") (client/post {:headers (merge base-headers {"Authorization" (auth-header cob-session)}) :body - (json/write-str {:user {:loginName "sbMemda48aa19712a83c3ca4e935dd5e5d46b1a1" - :password "sbMemda48aa19712a83c3ca4e935dd5e5d46b1a1#123" + (json/write-str {:user {:loginName (:yodlee-user-login env) + :password (:yodlee-user-password env) :locale "en_US"}}) :as :json}) :body @@ -41,14 +41,14 @@ (defn get-accounts [] (let [cob-session (login-cobrand) user-session (login-user cob-session)] - (-> "https://developer.api.yodlee.com/ysl/accounts" + (-> (str (:yodlee-base-url env) "/accounts") (client/get {:headers (merge base-headers {"Authorization" (auth-header cob-session user-session)}) :as :json})))) (defn get-provider-accounts [] (let [cob-session (login-cobrand) user-session (login-user cob-session)] - (-> "https://developer.api.yodlee.com/ysl/providerAccounts/11049210" + (-> (str (:yodlee-base-url env) "/providerAccounts") (client/get {:headers (merge base-headers {"Authorization" (auth-header cob-session user-session)}) :as :json})))) @@ -57,7 +57,7 @@ user-session (login-user cob-session) batch-size 100 get-transaction-batch (fn [skip] - (-> (str "https://developer.api.yodlee.com/ysl/transactions?top=" batch-size "&skip=" skip) + (-> (str (:yodlee-base-url env) "/transactions?top=" batch-size "&skip=" skip) (client/get {:headers (merge base-headers {"Authorization" (auth-header cob-session user-session)}) :as :json}) :body @@ -73,7 +73,7 @@ (defn create-user [] (let [cob-session (login-cobrand)] - (-> "https://developer.api.yodlee.com/ysl/user/register" + (-> (str (:yodlee-base-url env) "/user/register") (client/post {:headers (merge base-headers {"Authorization" (auth-header cob-session)}) :body (json/write-str {:user {:loginName "brycesPersoonal2" :password "kV@mdv3TU11"