Posted to tcl by colin at Wed Feb 15 03:59:52 GMT 2012view raw

  1. set key [pki::rsa::generate 1024]
  2. set csr [::pki::pkcs::create_csr $key [list C AU ST NSW L Sydney O imap OU bsd CN test]]
  3. set pcsr [::pki::pkcs::parse_csr $csr]
  4. exit
  5.  
  6. RESULT:
  7.  
  8. Unknown hashing algorithm: unknown
  9. while executing
  10. "::pki::verify $signature $cert_req_info_saved $keylist"
  11. (procedure "::pki::pkcs::parse_csr" line 52)
  12. invoked from within
  13. "::pki::pkcs::parse_csr $csr"
  14. invoked from within
  15. "set pcsr [::pki::pkcs::parse_csr $csr]"
  16. (file "pkigen.tcl" line 7)