Mini Shell
Mini Shell
| Direktori : /proc/self/root/proc/10577/cwd/usr/share/doc/openvpn-2.4.11/sample/sample-scripts/ |
| Current File : //proc/self/root/proc/10577/cwd/usr/share/doc/openvpn-2.4.11/sample/sample-scripts/ucn.pl |
#!/usr/bin/perl -t
# OpenVPN --auth-user-pass-verify script.
# Only authenticate if username equals common_name.
# In OpenVPN config file:
# auth-user-pass-verify ./ucn.pl via-env
$username = $ENV{'username'};
$common_name = $ENV{'common_name'};
exit !(length($username) > 0 && length($common_name) > 0 && $username eq $common_name);