mirror of
https://github.com/OpenVPN/openvpn.git
synced 2025-05-09 21:51:05 +08:00
34cb9132ef
Suitable for mature project. root - administrative stuff doc - documents src - sources tests - tests distro - distro specific files sample - samples SIDE EFFECT: many changes to rpm spec. Signed-off-by: Alon Bar-Lev <alon.barlev@gmail.com> Acked-by: Adriaan de Jong <dejong@fox-it.com> Signed-off-by: David Sommerseth <davids@redhat.com>
12 lines
339 B
Perl
Executable File
12 lines
339 B
Perl
Executable File
#!/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);
|