Jaska Kivelä > IRC-Crypt-0.01 > IRC::Crypt

Download:
IRC/Crypt/IRC-Crypt-0.01.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.01   Source  

NAME ^

IRC::Crypt - Perl wrapper for the irc-crypt library

SYNOPSIS ^

  use IRC::Crypt;
  IRC::Crypt::add_default_key("#chan",  "key");
  my $crypted = IRC::Crypt::encrypt_message_to_address("#chan", "myNick", "hello, world");
  my ($plain, $nick, $tdiff) = IRC::Crypt::decrypt_message($crypted);
  print $plain;

DESCRIPTION ^

Simple wrapper for the irc-crypt -library.

FUNCTIONS ^

add_known_key( key )

  Add key to the known key pool.

delete_known_key( key )

  Delete key from the known key pool.

add_default_key( addr, key )

  Add default key for recipient (channel or nick).

delete_default_key( addr )

  Delete default key from a recipient (channel or nick).

delete_all_keys( )

  Delete all default and known keys.

delete_all_default_keys( )

  Delete all default keys.

delete_all_known_keys( )

  Delete all known keys.

encrypt_message_to_address( addr, sender_nick, message )

  Encrypt message to address (with default key).
  Returns the encrypted message or undef on failure.

encrypt_message_with_key( key, sender_nick, message )

  Encrypt message with key.
  Returns the encrypted message or undef on failure.

decrypt_message( crypted )

  Decrypts message. Returns ( msg, nick, tdiff )
  if succesful, ( msg, undef, undef ) otherwise.

is_encrypted_message_p( msg )

  Return true if message is in valid crypto message format.

set_key_expand_version( n )

  Set default key expand version to n = (1,2,3).

key_expand_version( )

  Return current default key expand version.

SEE ALSO ^

http://people.ssh.fi/tri/irchat/index.html http://www.kivela.net/jaska/projects/perl-IRC-Crypt/

AUTHOR ^

Jaska Kivelä, <jaska@kivela.net>

COPYRIGHT AND LICENSE ^

Copyright (C) 2004 by Jaska Kivelä

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.3 or, at your option, any later version of Perl 5 you may have available.

syntax highlighting: