Hi,
I'm currently trying to get a password from the user in case it wasn't
supplied by other means, but it seems to be a bit more difficult than I
expected. I've already searched both the web and this mail list finding
only partial solutions to the problem. I must say I'm not completely fluent
in Clojure, so I'm sure there is a lot of room for improvement both in my
solution and also the way I write it. Help on both is appreciated.
Up to now what I've got so far are a couple of solutions that I'm not happy
with, I'll put some comments on each one to clarify any problems:
(defn- get-passkey1
[]
;; - not a good method, it can be copied back selecting where
;; text appears to be (cursor moves although nothing is printed)
;; - code is ugly as hell
;; - ansi control codes are not portable
(print (str "password: \033[8m"))
(flush)
(let [pass (read-line)]
(print (str "\033[K\033[0m")) ;; k should kill the line, but since
read-line expects a newline,
;; I don't get to really kill it, so the
pass is exposed
(flush)
pass))
(defn- get-passkey2
[]
;; - doesn't work as it initially fails due to a null pointer both with
repl and lein run
;; - improves a little if run with lein trampoline run (not ideal), but
;; complains that there is no readPassword method that matches.
(let [console (System/console)]
(.readPassword console "Password: %s")))
;; this one needs (:import [jline.console ConsoleReader])
(defn- get-passkey3
[]
;; - in a repl this freezes the interpreter
;; - seems to work fine with lein run, but getting the whole
;; library for two lines of code seems expensive to me.
;; - still I'd go this route if this was the way to go (no freezing at
least)
(print "Enter password")
(flush)
(let [cr (ConsoleReader.)]
(.readLine cr "password?" \*)))
The best solution I've worked up to now is a mix between 1 and 3, detecting
if I'm in a repl (via another ugly hack to see if there are command line
parameters) and choose between them to sort each one's shortcommings.
I'm wondering if there is a better way (and hoping there is) or if I can
fix the issues with any of the implementations so I don't have to apply
patch of code over patch of code.
Thanks for any help given,
Guillermo Vayá
--
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to [email protected]
Note that posts from new members are moderated - please be patient with your
first post.
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
---
You received this message because you are subscribed to the Google Groups
"Clojure" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
For more options, visit https://groups.google.com/d/optout.
