src/key-func.c: Add basic support of encrypted keys.

* examples/sssh.scm (main): Ask the user for a passphrase.
* src/key-func.c (guile_ssh_private_key_from_file): Change
  argument list: add optional argument `passphrase'.