diff --git a/src/com/sompani/onboarding.clj b/src/com/sompani/onboarding.clj index b7665e8..81198d2 100644 --- a/src/com/sompani/onboarding.clj +++ b/src/com/sompani/onboarding.clj @@ -9,7 +9,7 @@ LinkOption) (java.nio.file.attribute PosixFileAttributeView FileAttribute) - (java.io BufferedReader File) + (java.io BufferedReader #_File) (org.openqa.selenium.firefox FirefoxDriver) (org.openqa.selenium By))) @@ -93,7 +93,7 @@ (Files/getFileAttributeView path PosixFileAttributeView (into-array LinkOption [LinkOption/NOFOLLOW_LINKS])) (.setOwner owner))) -(defn- set-group [path group] +#_(defn- set-group [path group] (-> (Files/getFileAttributeView path PosixFileAttributeView (into-array LinkOption [LinkOption/NOFOLLOW_LINKS])) (.setGroup group))) @@ -152,7 +152,7 @@ (printf " ok.\n")) ;; ## Certificates -(defn generate-certs! [{:keys [company-name company-domain] :as datamap}] +(defn generate-certs! [{:keys [_company-name _company-domain] :as datamap}] (println "Generating certificates...") (let [command (map #(cljstache/render % datamap) ["certbot" "certonly" "--nginx" @@ -174,8 +174,8 @@ {:type "A" :name (format "staging.%s" company-name) :content "185.163.117.139"} {:type "AAAA" :name company-name :content "2a03:4000:3b:2bb:18ea:e0ff:fe8c:aa9a"} {:type "AAAA" :name (format "staging.%s" company-name) :content "2a03:4000:3b:2bb:18ea:e0ff:fe8c:aa9a"} - {:type "MX" :name company-name :content "mx.yandex.net." :priority 50} - {:type "MX" :name (format "m.%s.talent.careers" company-name) :content "feedback-smtp.eu-west-1.amazonses.com" :priority 50} + {:type "MX" :name company-name :content "mx.yandex.net." :priority 0} + {:type "MX" :name (format "m.%s.talent.careers" company-name) :content "feedback-smtp.eu-west-1.amazonses.com" :priority 0} {:type "TXT" :name (format "m.%s.talent.careers" company-name) :content "v=spf1 include:amazonses.com ~all"} {:type "TXT" :name (format "%s.talent.careers" company-name) :content "v=spf1 redirect=_spf.yandex.net"} {:type "TXT" :name (format "_dmarc.%s" company-name) :content "v=DMARC1; p=none; rua=sompani-d@dmarc.report-uri.com"}]) @@ -197,10 +197,10 @@ ;; # Main initialization (def cli-options - [["-d" "--domain VCDOMAIN" "The domain of the VC to onboard" + [["-d" "--domain VCDOMAIN" "The domain of the VC to onboard. Example: connectventures.co" :default nil :id :vc-domain] - ["-n" "--name VCNAME" "The name of the VC to onboard" + ["-n" "--name VCNAME" "The name of the VC to onboard. Example: connectventures" :default nil :id :vc-name] [nil "--deploy-directories" "Create deploy directories"] @@ -219,7 +219,7 @@ nginx certify help] - :as options} + :as _options} (:options (parse-opts args cli-options)) datamap {:company-name vc-name :company-domain vc-domain}] (if help