Authen::TacacsPlus

Perl extension for authentication using tacacs+ server
Download

Authen::TacacsPlus Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Mike McCauley
  • Publisher web site:
  • http://search.cpan.org/~mikem/

Authen::TacacsPlus Tags


Authen::TacacsPlus Description

Authen::TacacsPlus is a Perl module that allows you to authenticate using tacacs+ server. $tac = new Authen::TacacsPlus(Host=>$server, Key=>$key, , ); Opens new session with tacacs+ server on host $server, encrypted with key $key. Undefined object is returned if something wrong (check errmsg()).With a list of servers the order is relevant. It checks the availability of the Tacacs+ service using the order you defined. Authen::TacacsPlus::errmsg();Returns last error message. $tac->authen($username,$password,$authen_type);Tries an authentication with $username and $password. 1 is returned if authenticaton succeded and 0 if failed (check errmsg() for reason).$authen_type is an optional argument that specifies what type of authentication to perform. Allowable options are: Authen::TacacsPlus::TAC_PLUS_AUTHEN_TYPE_ASCII (default) Authen::TacacsPlus::TAC_PLUS_AUTHEN_TYPE_PAP Authen::TacacsPlus::TAC_PLUS_AUTHEN_TYPE_CHAPASCII uses Tacacs+ version 0, and will authenticate against the "login" or "global" password on the Tacacs+ server. If no authen_type is specified, it defaults to this type of authentication.PAP uses Tacacs+ version 1, and will authenticate against the "pap" or "global" password on the Tacacs+ server.CHAP uses Tacacs+ version 1, and will authenticate against the "chap" or "global" password on the Tacacs+ server. With CHAP, the password if formed by the concatenation of chap id + chap challenge + chap responseThere is example code in test.plIf you use a list of servers you can continue using $tac->authen if one of them goes down or become unreachable. $tac->close();Closes session with tacacs+ server.SYNOPSIS use Authen::TacacsPlus; $tac = new Authen::TacacsPlus(Host=>$server, Key=>$key, , ); or $tac = new Authen::TacacsPlus( , ], , ], , ], ... ); $tac->authen($username,$passwords); Authen::TacacsPlus::errmsg(); $tac->close();Product's homepage


Authen::TacacsPlus Related Software