Finance::Bank::Cahoot::CredentialsProvider::CryptFile - Credentials provider for encrypted stored data

  my $credentials = Finance::Bank::Cahoot::CredentialsProvider::CrpytFile->new(
     credentials => [qw(account password)],
     options => {key => 'verysecret', keyfile => '/etc/cahoot'});

Provides a credentials provider that uses credentials stored in an encrypted file. Each credential is available with its own access method of the same name. All methods may be optionally supplied a character offset in the credentials value (first character is 0).

new

Create a new instance of a static data credentials provider.

credentials is an array ref of all the credentials types available via the credentials provider.

options a hash ref of options for the credentials provider.

key Is the text passphrase for encrypting/decrypting the credentials store.

keyfile is an optional path to the credentials store. The default store is $HOME/.cahoot.

fallback is the name of a Finance::Bank::Cahoot::CredentialsProvider credentials provider to use for any credentials that are not present in the encrypted store. Newly discovered credentials and encrypted and written back to the store.

fallback_options is a hash ref that is passed to the fallback credentials provider's constructor as options.

  my $provider =
    Finance::Bank::Cahoot::CredentialsProvider::CryptFile->new(
      credentials => [qw(account username password)],
      options => { key => 'verysecret',
		   keyfile => '/etc/cahoot,
		   fallback => 'Constant',
		   fallback_options => { account => '12345678',
			 		 username => 'acmeuser',
				 	 password => 'secret' } });

get

Returns a credential value whose name is passed as the first parameter. An optional character offset (0 is the first character) may also be provided.

  my $password_char = $provider->password(5);

Jon Connell <jon@figsandfudge.com>

This module takes its inspiration from Finance::Bank::Natwest by Jody Belka. The crypto access routes are heavily borrowed from Finance::Bank::Wachovia by Jim Gariv.

Copyright 2004 Jim Garvin Copyright 2007 by Jon Connell

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.