SourceFormat Enforcement

[thirdparty/squid.git] / helpers / external_acl / wbinfo_group / ext_wbinfo_group_acl.pl.in

diff --git a/helpers/external_acl/wbinfo_group/ext_wbinfo_group_acl.pl.in b/helpers/external_acl/wbinfo_group/ext_wbinfo_group_acl.pl.in
index f2b6be15ff1b0f323842ffd4aab0e4bb46aa8616..5570f1a1df164c2b71a9dc0b95c13d925ca0349a 100755 (executable)
--- a/helpers/external_acl/wbinfo_group/ext_wbinfo_group_acl.pl.in
+++ b/helpers/external_acl/wbinfo_group/ext_wbinfo_group_acl.pl.in
@@ -1,48 +1,23 @@
 #!@PERL@ -w
-#
-# external_acl helper to Squid to verify NT Domain group
-# membership using wbinfo
-#
-# This program is put in the public domain by Jerry Murdock 
-# <jmurdock@itraktech.com>. It is distributed in the hope that it will
-# be useful, but WITHOUT ANY WARRANTY; without even the implied warranty
-# of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-#
-# Author:
-#   Jerry Murdock <jmurdock@itraktech.com>
-#
-# Version history:
-#   2010-08-27 Hank Hampel <hh@nr-city.net>
-#               Add Kerberos to NTLM conversion of credentials (-K)
-#
-#   2005-12-26 Guido Serassio <guido.serassio@acmeconsulting.it>
-#               Add '-d' command line debugging option
-#
-#   2005-12-24 Guido Serassio <guido.serassio@acmeconsulting.it>
-#               Fix for wbinfo from Samba 3.0.21
-#
-#   2004-08-15 Henrik Nordstrom <hno@squid-cache.org>
-#              Helper protocol changed to URL escaped in Squid-3.0
-#
-#   2005-06-28 Arno Streuli <astreuli@gmail.com>
-#               Add multi group check
-#
-#   2002-07-05 Jerry Murdock <jmurdock@itraktech.com>
-#              Initial release
+
+use strict;
+use Pod::Usage;
+use Getopt::Long;
+
 =pod
 
 =head1 NAME
 
-ext_wbinfo_group_acl - external ACL helper for Squid to verify NT Domain group membership using wbinfo.
+ ext_wbinfo_group_acl - external ACL helper for Squid to verify NT Domain group membership using wbinfo.
 
 =head1 SYNOPSIS
 
-ext_wbinfo_group_acl [-dh]
+ ext_wbinfo_group_acl [-dhK]
 
 =head1 DESCRIPTION
 
-ext_wbinfo_group_acl is an installed executable script.
-It uses wbinfo from Samba to lookup group membership of logged in users.
+B<ext_wbinfo_group_acl> is an installed executable script.
+It uses B<wbinfo> from Samba to lookup group membership of logged in users.
 
 This helper must be used in with an authentication scheme (typically
 Basic or NTLM) based on Windows NT/2000 domain users.
@@ -53,19 +28,31 @@ username.
 
 =head1 OPTIONS
 
-       -d Write debug info to stderr.
-       -h Print the help.
-       -K downgrade Kerberos credentials to NTLM.
+=over 12
+
+=item B<-d>
+
+Write debug info to stderr.
+
+=item B<-h>
+
+Print the help.
+
+=item B<-K>
+
+Downgrade Kerberos credentials to NTLM.
+
+=back
 
 =head1 CONFIGURATION
 
-       external_acl_type wbinfo_check %LOGIN /path/to/ext_wbinfo_group_acl
-       acl allowed_group external wbinfo_check Group1 Group2
-       http_access allow allowed_group
+  external_acl_type wbinfo_check %LOGIN /path/to/ext_wbinfo_group_acl
+  acl allowed_group external wbinfo_check Group1 Group2
+  http_access allow allowed_group
 
 If the local perl interpreter is in a unusual location it may need to be added:
 
-       external_acl_type wbinfo_check %LOGIN /path/to/perl /path/to/ext_wbinfo_group_acl
+  external_acl_type wbinfo_check %LOGIN /path/to/perl /path/to/ext_wbinfo_group_acl
 
 =head1 AUTHOR
 
@@ -75,15 +62,20 @@ This manual was written by Amos Jeffries <amosjeffries@squid-cache.org>
 
 =head1 COPYRIGHT
 
-This program is put in the public domain by Jerry Murdock
-<jmurdock@itraktech.com>. It is distributed in the hope that it will
-be useful, but WITHOUT ANY WARRANTY; without even the implied warranty
-of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+ * Copyright (C) 1996-2015 The Squid Software Foundation and contributors
+ *
+ * Squid software is distributed under GPLv2+ license and includes
+ * contributions from numerous individuals and organizations.
+ * Please see the COPYING and CONTRIBUTORS files for details.
+
+ This program is put in the public domain by Jerry Murdock
+ <jmurdock@itraktech.com>. It is distributed in the hope that it will
+ be useful, but WITHOUT ANY WARRANTY; without even the implied warranty
+ of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 =head1 QUESTIONS
 
-Questions on the usage of this program can be sent to the
-Squid Users mailing list <squid-users@squid-cache.org>
+Questions on the usage of this program can be sent to the I<Squid Users mailing list <squid-users@squid-cache.org>>
 
 =head1 REPORTING BUGS
 
@@ -92,10 +84,9 @@ See http://wiki.squid-cache.org/SquidFaq/BugReporting for details of what you ne
 
 Report bugs or bug fixes using http://bugs.squid-cache.org/
 
-Report serious security bugs to Squid Bugs <squid-bugs@squid-cache.org>
+Report serious security bugs to I<Squid Bugs <squid-bugs@squid-cache.org>>
 
-Report ideas for new improvements to the
-Squid Developers mailing list <squid-dev@squid-cache.org>
+Report ideas for new improvements to the I<Squid Developers mailing list <squid-dev@squid-cache.org>>
 
 =head1 SEE ALSO
 
@@ -105,6 +96,26 @@ The Squid Configuration Manual http://www.squid-cache.org/Doc/config/
 
 =cut
 
+#
+# Version history:
+#   2010-08-27 Hank Hampel <hh@nr-city.net>
+#               Add Kerberos to NTLM conversion of credentials (-K)
+#
+#   2005-12-26 Guido Serassio <guido.serassio@acmeconsulting.it>
+#               Add '-d' command line debugging option
+#
+#   2005-12-24 Guido Serassio <guido.serassio@acmeconsulting.it>
+#               Fix for wbinfo from Samba 3.0.21
+#
+#   2004-08-15 Henrik Nordstrom <hno@squid-cache.org>
+#              Helper protocol changed to URL escaped in Squid-3.0
+#
+#   2005-06-28 Arno Streuli <astreuli@gmail.com>
+#               Add multi group check
+#
+#   2002-07-05 Jerry Murdock <jmurdock@itraktech.com>
+#              Initial release
+
 #
 # Globals
 #