mirrors/apparmor
1
0
Fork 0
mirror of https://gitlab.com/apparmor/apparmor.git synced 2025-03-04 08:24:42 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Merge from trunk rev 1644: Purge utils/severity.pl due to incorrect

Browse source 
license/copyright statement. It should have been covered under both
the Immunix acquisition by Novell Inc and by the open sourcing of
the apparmor tree by Novell Inc.
This commit is contained in:
Steve Beattie 2011-02-08 15:56:43 -08:00
parent 34c013f036
commit 08df8d93ce
1 changed files with 0 additions and 56 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

56
utils/severity.pl
View file

@ -1,56 +0,0 @@
#!/usr/bin/perl -w
# ----------------------------------------------------------------------
# PROPRIETARY DATA of IMMUNIX INC.
# Copyright (c) 2004, 2005 IMMUNIX (All rights reserved)
#
# This document contains trade secret data which is the property
# of IMMUNIX Inc. This document is submitted to recipient in
# confidence. Information contained herein may not be used, copied
# or disclosed in whole or in part except as permitted by written
# agreement signed by an officer of IMMUNIX, Inc.
# ----------------------------------------------------------------------
# This is just a quick-n-dirty tester and demo; not intended for use by
# end users.
use strict;
use Immunix::Severity;
sub ranker {
my $ob = shift;
my ($resource, $mode) = @_;
if (defined $mode) {
print "$mode $resource " . $ob->rank($resource, $mode);
} else {
print "$resource " . $ob->rank($resource);
}
print "\n";
}
my ($ob);
$ob = Immunix::Severity->new;
$ob->init("/tmp/severity.db");
ranker($ob, "CAP_SYS_ADMIN");
ranker($ob, "CAP_SETUID");
ranker($ob, "CAP_MISSPELLED");
ranker($ob, "MISSPELLED");
ranker($ob, "/etc/passwd","rw");
ranker($ob, "/etc/passwd","w");
ranker($ob, "/etc/passwd","r");
ranker($ob, "/etc/nothere","r");
print "\n";
$ob->init("/tmp/severity.db", -1111);
ranker($ob, "CAP_SYS_ADMIN");
ranker($ob, "CAP_SETUID");
ranker($ob, "CAP_MISSPELLED");
ranker($ob, "MISSPELLED");
ranker($ob, "/etc/passwd","rw");
ranker($ob, "/etc/passwd","w");
ranker($ob, "/etc/passwd","r");
ranker($ob, "/etc/nothere","r");