Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
| Comment: | Use Ascii armoured output
Note that this doesn't hugely matter. PWman has no trouble reading the |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
d3432a1e1651ea971abff98858ba349a |
| User & Date: | atomicules@lavabit.com 2013-02-03 21:35:55 |
|
2013-02-03
| ||
| 21:42 |
Store secure notes in the "launch" field as it's 256 vs 64 char
And secure notes are likely to be longer. Since whole file is encrypted Add note to README regarding this known limitation. check-in: 1ead16f19c user: atomicules@lavabit.com tags: master, trunk | |
| 21:35 |
Use Ascii armoured output
Note that this doesn't hugely matter. PWman has no trouble reading the | |
|
2012-12-10
| ||
| 10:04 | Fix identation check-in: e9eafc3f15 user: atomicules@lavabit.com tags: master, trunk | |
Changes to lastpass2pwman.lisp.
46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 |
(xmls:toxml (third entry))))) (format stream "</PwList>")) (return))))) (format stream "</PwList></PWMan_PasswordList>")) ;Move original file to backup (rename-file (concatenate 'string (sb-unix::posix-getenv "HOME") "/.pwman.db") (concatenate 'string (sb-unix::posix-getenv "HOME") "/.pwman.db.bak")) ;gpg encrpyt the file (let ((proc (sb-ext:run-program "gpg" (list "-r" gpgid "-o" (concatenate 'string (sb-unix::posix-getenv "HOME") "/.pwman.db") "-e" "pwman.txt") :search :environment))) (if (= 0 (sb-ext:process-exit-code proc)) ;If that was successful, then delete the un-encrypted files (progn (delete-file infile) (delete-file "pwman.txt")) ;If not restore backup and leave plain text files (otherwise will fail next time on above rename) (progn (rename-file (concatenate 'string (sb-unix::posix-getenv "HOME") "/.pwman.db.bak") (concatenate 'string (sb-unix::posix-getenv "HOME") "/.pwman.db")) (print "Couldn't encrypt file, plain text files have not been deleted")))) |
| |
46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 |
(xmls:toxml (third entry)))))
(format stream "</PwList>"))
(return)))))
(format stream "</PwList></PWMan_PasswordList>"))
;Move original file to backup
(rename-file (concatenate 'string (sb-unix::posix-getenv "HOME") "/.pwman.db") (concatenate 'string (sb-unix::posix-getenv "HOME") "/.pwman.db.bak"))
;gpg encrpyt the file
(let ((proc (sb-ext:run-program "gpg" (list "-a" "-r" gpgid "-o" (concatenate 'string (sb-unix::posix-getenv "HOME") "/.pwman.db") "-e" "pwman.txt") :search :environment)))
(if (= 0 (sb-ext:process-exit-code proc))
;If that was successful, then delete the un-encrypted files
(progn
(delete-file infile)
(delete-file "pwman.txt"))
;If not restore backup and leave plain text files (otherwise will fail next time on above rename)
(progn
(rename-file (concatenate 'string (sb-unix::posix-getenv "HOME") "/.pwman.db.bak") (concatenate 'string (sb-unix::posix-getenv "HOME") "/.pwman.db"))
(print "Couldn't encrypt file, plain text files have not been deleted"))))
|