I think you should try to avoid the string concatenation games. I'm not
sure what your current code is, but I suspect you're still ending up with
array toString's slipping in.

How about the following?

On Mon, Mar 4, 2013 at 1:31 PM, larry google groups <
lawrencecloj...@gmail.com> wrote:

> So, right now I am using this code:
>
>  (let [username (get-in @um/interactions [:omniture-api-
> credentials :username])
>   secret (get-in @um/interactions [:omniture-api-credentials :shared-
> secret])
>   nonce (DigestUtils/md5Hex (str (math/round (* (rand 1 ) 1000000))))
>   nonce-encoded-base64 (Base64/encodeBase64 (.getBytes nonce))
>   date-formatter (new SimpleDateFormat "yyyy-MM-dd'T'HH:mm:ss")
>   formatter gmt-timezone)
>   created (.format date-formatter (new Date))
>

   nonce-bytes (.getBytes nonce)
   created-bytes (.getBytes created)
   secret-bytes (.getBytes secret)
   digest (-> (java.security.MessageDigest/getInstance "sha1")
                    .reset
                    (.update nonce-bytes)
                    (.update create-bytes)
                    (.update secret-bytes)
                    .digest)
    digest-base64 (Base64/encodeBase64 digest)

;; Should "UsernameToken Username" really be unquoted in the following line?
;; All the other variable names are quoted
    header (apply str " UsernameToken Username=\""  username

;; You may want digest-base64 here?
                              "\"PasswordDigest=\"" digest


                              "\" Nonce=\"" nonce-encoded-base64
                              "\"Created=\"" created "\"")]
             header)

-- 
-- 
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your 
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
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 clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.


Reply via email to