| Index | index by Group | index by Distribution | index by Vendor | index by creation date | index by Name | Feedback | Help | Search |
| Name: perl-Authen-NTLM | Distribution: Unknown |
| Version: 0.30 | Vendor: Yee Man Chan <ymc@yahoo.com> |
| Release: dc1 | Build date: Thu May 22 23:22:07 2003 |
| Group: Applications/CPAN | Build host: brenalf |
| Size: 66615 | Source RPM: perl-Authen-NTLM-0.30-dc1.src.rpm |
| Packager: Dano Carroll <dano@xernolan.org> | |
| Url: http://www.cpan.org | |
| Summary: Authen-NTLM - Perl extension for NTLM related computations | |
use Authen::NTLM qw(nt_hash lm_hash); $my_pass = "mypassword"; $client = new_client Authen::NTLM(lm_hash($my_pass), nt_hash($my_pass)); $flags = Authen::NTLM::NTLMSSP_NEGOTIATE_80000000 | Authen::NTLM::NTLMSSP_NEGOTIATE_128 | Authen::NTLM::NTLMSSP_NEGOTIATE_ALWAYS_SIGN | Authen::NTLM::NTLMSSP_NEGOTIATE_OEM_DOMAIN_SUPPLIED | Authen::NTLM::NTLMSSP_NEGOTIATE_OEM_WORKSTATION_SUPPLIED | Authen::NTLM::NTLMSSP_NEGOTIATE_NTLM | Authen::NTLM::NTLMSSP_NEGOTIATE_UNICODE | Authen::NTLM::NTLMSSP_NEGOTIATE_OEM | Authen::NTLM::NTLMSSP_REQUEST_TARGET; $negotiate_msg = $client->negotiate_msg($flags); $server = new_server Authen::NTLM; ($flags, $domain, $machine) = $server->parse_negotiate($negotiate_msg); $flags = Authen::NTLM::NTLMSSP_NEGOTIATE_ALWAYS_SIGN | Authen::NTLM::NTLMSSP_NEGOTIATE_NTLM | Authen::NTLM::NTLMSSP_REQUEST_INIT_RESPONSE | Authen::NTLM::NTLMSSP_NEGOTIATE_UNICODE | Authen::NTLM::NTLMSSP_REQUEST_TARGET; $challenge_msg = $server->challenge_msg($flags); ($domain, $flags, $nonce, $ctx_upper, $ctx_lower) = $client->parse_challenge($challenge_msg); $flags = Authen::NTLM::NTLMSSP_NEGOTIATE_ALWAYS_SIGN | Authen::NTLM::NTLMSSP_NEGOTIATE_NTLM | Authen::NTLM::NTLMSSP_NEGOTIATE_UNICODE | Authen::NTLM::NTLMSSP_REQUEST_TARGET; $auth_msg = $client->auth_msg($nonce, $flags); ($flags, $lm_resp, $nt_resp, $user_domain, $username, $machine) = $server->parse_auth($auth_msg);
Artistic
internal MD5: d4653db21d5bbd3b35b67b77e8d1bee7
* Thu May 22 2003 dano@lennier.bab5.dazel.com - Initial build.
/usr/local/doc/perl-Authen-NTLM-0.30 /usr/local/doc/perl-Authen-NTLM-0.30/README /usr/local/lib/perl5/site_perl/5.8.0/Authen /usr/local/lib/perl5/site_perl/5.8.0/Authen/NTLM /usr/local/lib/perl5/site_perl/5.8.0/Authen/NTLM.pm /usr/local/lib/perl5/site_perl/5.8.0/Authen/NTLM/HTTP.pm /usr/local/man/man3/Authen::NTLM.3 /usr/local/man/man3/Authen::NTLM::HTTP.3
Generated by rpm2html 1.9.2
Dano Carroll, Tue Jan 1 20:41:57 2008