ports/security/enum4BSD/patches/patch-enum4linux_pl

70 lines
2.6 KiB
Text

$OpenBSD$
Index: enum4linux.pl
--- enum4linux.pl.orig
+++ enum4linux.pl
@@ -1,5 +1,5 @@
-#!/usr/bin/perl
-# enum4linux - Windows enumeration tool for Linux
+#!/usr/bin/env perl
+# enum4BSD - Windows enumeration tool for BSD
# Copyright (C) 2011 Mark Lowe
#
# This tool may be used for legal purposes only. Users take full responsibility
@@ -134,7 +134,7 @@ my @nbt_info = (
####################### end of nbtscan-derrived code ############################
my $usage =<<USAGE;
-enum4linux v$VERSION \(http://labs.portcullis.co.uk/application/enum4linux/\)
+enum4BSD v$VERSION \(http://labs.portcullis.co.uk/application/enum4linux/\)
Copyright \(C\) 2011 Mark Lowe \(mrl\@portcullis-security.com\)
Simple wrapper around the tools in the samba package to provide similar
@@ -314,7 +314,7 @@ $global_username =~ s/'/'\\''/g; ($global_userna
$global_password =~ s/'/'\\''/g; ($global_password) = $global_password =~ /(.*)/;
# Output message about options used
-print "Starting enum4linux v$VERSION ( http://labs.portcullis.co.uk/application/enum4linux/ ) on " . scalar(localtime) . "\n";
+print "Starting enum4BSD v$VERSION ( http://labs.portcullis.co.uk/application/enum4linux/ ) on " . scalar(localtime) . "\n";
print_heading("Target Information");
print "Target ........... $global_target\n";
print "RID Range ........ $global_rid_range\n";
@@ -346,7 +346,7 @@ enum_users_rids() if $opts{'r'};
enum_shares_unauth() if $opts{'s'};
get_printer_info() if $opts{'i'};
-print "enum4linux complete on " . scalar(localtime) . "\n\n";
+print "enum4BSD complete on " . scalar(localtime) . "\n\n";
sub get_nbtstat {
print_heading("Nbtstat Information for $global_target");
@@ -543,17 +543,17 @@ sub enum_password_policy {
sub enum_lsa_policy {
print_heading("LSA Policy Information on $global_target");
- print_error("Not implemented in this version of enum4linux.\n");
+ print_error("Not implemented in this version.\n");
}
sub enum_machines {
print_heading("Machine Enumeration on $global_target");
- print_error("Not implemented in this version of enum4linux.\n");
+ print_error("Not implemented in this version.\n");
}
sub enum_names {
print_heading("Name Enumeration on $global_target");
- print_error("Not implemented in this version of enum4linux.\n");
+ print_error("Not implemented in this version.\n");
}
sub enum_groups {
@@ -652,7 +652,7 @@ sub enum_dom_groups {
sub enum_groups_unauth {
print_heading("Groups on $global_target via RID cycling");
- print_error("Not implemented in this version of enum4linux.\n");
+ print_error("Not implemented in this version.\n");
}
sub enum_shares {