如何解决针对Gmail使用POP3的Freeradius-Perl脚本
有人在freeradiu 3中使用pop3 perl脚本成功通过gmail进行身份验证吗?我正在关注本教程(https://kerker.website/freeradiusgmail802-1x%e8%a8%ad%e5%ae%9apop3s/),但是perl继续拒绝用户。
这是脚本:
use Data::Dumper;
use Mail::POP3Client;
use IO::Socket::SSL;
sub authenticate {
my $pop = Mail::POP3Client->new(
USER => $RAD_REQUEST{'User-Name'},PASSWORD => $RAD_REQUEST{'User-Password'},HOST => "pop.gmail.com",USESSL => 1,DEBUG => 1,);
if($pop->Connect()){
return RLM_MODULE_OK;
}else{
return RLM_MODULE_REJECT;
}
$pop->Close;
}
我现在不能发布输出,但是它拒绝用户,并且我无法调试脚本。我只想知道最近是否有人在验证gmail以及如何进行验证。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。