Hello community,
here is the log from the commit of package yast2-apparmor for openSUSE:Factory checked in at 2017-11-01 11:08:38
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/yast2-apparmor (Old)
and /work/SRC/openSUSE:Factory/.yast2-apparmor.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "yast2-apparmor"
Wed Nov 1 11:08:38 2017 rev:64 rq:537517 version:4.0.1
Changes:
--------
--- /work/SRC/openSUSE:Factory/yast2-apparmor/yast2-apparmor.changes 2017-09-27 16:53:32.322382449 +0200
+++ /work/SRC/openSUSE:Factory/.yast2-apparmor.new/yast2-apparmor.changes 2017-11-01 11:08:37.415997177 +0100
@@ -1,0 +2,14 @@
+Wed Oct 18 11:11:36 CDT 2017 - rgoldwyn@suse.com
+
+- Remove more perl dependencies (boo#1062656)
+- Remove ancient subdomain dependencies (boo#1062656)
+- Fix yast-apparmor.spec description
+- Fix "New" which renders GetString Dialog (boo#1062653)
+- 4.0.1
+
+-------------------------------------------------------------------
+Tue Sep 30 14:09:45 CDT 2017 - rgoldwyn@suse.com
+
+- Add VStretch() and HStretch() to aa-settings (bsc#1056942)
+
+-------------------------------------------------------------------
Old:
----
yast2-apparmor-4.0.0.tar.bz2
New:
----
yast2-apparmor-4.0.1.tar.bz2
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ yast2-apparmor.spec ++++++
--- /var/tmp/diff_new_pack.FTKdrg/_old 2017-11-01 11:08:37.879980229 +0100
+++ /var/tmp/diff_new_pack.FTKdrg/_new 2017-11-01 11:08:37.879980229 +0100
@@ -17,7 +17,7 @@
Name: yast2-apparmor
-Version: 4.0.0
+Version: 4.0.1
Release: 0
Summary: YaST2 - Plugins for AppArmor Profile Management
License: GPL-2.0
@@ -27,34 +27,16 @@
BuildRequires: update-desktop-files
BuildRequires: yast2
BuildRequires: yast2-devtools >= 3.1.10
-Requires: perl-TimeDate
Requires: yast2
Requires: yast2-ruby-bindings >= 1.0.0
-Requires: perl(Data::Dumper)
-Requires: perl(Encode)
-Requires: perl(Getopt::Long)
-Requires: perl(Immunix::AppArmor)
-Requires: perl(Locale::gettext)
-Requires: perl(POSIX)
-Requires: perl(ycp)
-Obsoletes: yast2-subdomain
-Provides: yast2-subdomain
BuildRoot: %{_tmppath}/%{name}-%{version}-build
BuildArch: noarch
-%if 0%{?suse_version} >= 1140
-# openSUSE-11.4 or newer
-BuildRequires: perl-macros
-%{perl_requires}
-%endif
%description
-Yast2 forms and components for the management of Novell AppArmor
+Yast2 forms and components for the management of AppArmor
profiles.
-This package is part of a suite of tools that used to be named
-SubDomain.
-
%prep
%setup -q
@@ -66,15 +48,11 @@
%files
%defattr(-,root,root)
-%{_bindir}/*
%{yast_clientdir}
%{yast_yncludedir}/apparmor
%{yast_libdir}/apparmor
%{yast_moduledir}
%{yast_desktopdir}
-%dir %{_sysconfdir}/apparmor
-%config(noreplace) %{_sysconfdir}/apparmor/reports.crontab
-%config(noreplace) %{_sysconfdir}/apparmor/reports.conf
%doc %{yast_docdir}
%changelog
++++++ yast2-apparmor-4.0.0.tar.bz2 -> yast2-apparmor-4.0.1.tar.bz2 ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/yast2-apparmor-4.0.0/bin/Makefile.am new/yast2-apparmor-4.0.1/bin/Makefile.am
--- old/yast2-apparmor-4.0.0/bin/Makefile.am 2017-09-26 16:43:58.480756337 +0200
+++ new/yast2-apparmor-4.0.1/bin/Makefile.am 1970-01-01 01:00:00.000000000 +0100
@@ -1,7 +0,0 @@
-usrbin_SCRIPTS = \
- reportgen.pl
-
-usrbindir = /usr/bin/
-
-EXTRA_DIST = $(usrbin_SCRIPTS)
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/yast2-apparmor-4.0.0/bin/reportgen.pl new/yast2-apparmor-4.0.1/bin/reportgen.pl
--- old/yast2-apparmor-4.0.0/bin/reportgen.pl 2017-09-26 16:43:58.480756337 +0200
+++ new/yast2-apparmor-4.0.1/bin/reportgen.pl 1970-01-01 01:00:00.000000000 +0100
@@ -1,595 +0,0 @@
-#!/usr/bin/perl
-
-# ------------------------------------------------------------------
-#
-# Copyright (C) 2002-2005 Novell/SUSE
-#
-# This program is free software; you can redistribute it and/or
-# modify it under the terms of version 2 of the GNU General Public
-# License published by the Free Software Foundation.
-#
-# ------------------------------------------------------------------
-
-################################################################################
-# /usr/bin/reportgen.pl
-#
-# - Calls Immunix::Reports.pm to write AppArmor events to a specified logfile
-# - Expected to be executed by a cron job.
-#
-# Requires:
-# /usr/lib/perl5/site_perl/Immunix::Reports.pm
-#
-# Input (Optional):
-# -Report Name
-# -Program Name 'progName'
-# -Profile Name 'profile'
-# -PID 'pid'
-# -Severity 'sevLevel'
-# -Denied Resources 'resource'
-# -AA Mode 'aamode'
-# -Mode 'mode'
-#
-################################################################################
-use strict;
-use Immunix::Reports;
-#use POSIX; # causes locale error w/ Exporter
-use Locale::gettext;
-
-#setlocale(LC_MESSAGES, ""); # causes locale error w/ Exporter
-textdomain("yast2-apparmor");
-
-# Sloppy Global
-my $headerFile = "/var/log/apparmor/reports/reportgen.header";
-
-# Routines
-################################################################################
-sub logMessage {
-
- my ($msg,$date) = @_;
-
- if (! $date) {
- $date = localtime;
- }
-
- my $msgLog = '/var/log/apparmor/cron-reports.log';
-
- if (open (MLOG, ">>$msgLog") ) {
- print MLOG "$date - reportgen.pl: $msg\n";
- close MLOG;
- }
-
- return 0;
-}
-
-sub makeHeader {
-
- my ($repType,$repConf,$filts) = @_; # Filters & Time are only for SIR
-
- my $header = undef;
- my $date = localtime;
- my $start = localtime($repConf->{'startTime'});
-
- if ( $repType eq 'ess' ) {
-
- # Write ESS Header in csv format
- $header->{'csv'} = gettext("# Executive Security Summary - Generated by AppArmor\n");
- $header->{'csv'} .= sprintf(gettext("# Period: %s to %s\n\n"), $start,$date);
-
- # Write ESS Header in html format
- $header->{'html'} = "<table border='1' cellpadding='2'>\n";
- $header->{'html'} .= gettext("<tr><th colspan='7'>Executive Security
- Summary - Generated by AppArmor</th></tr>");
- $header->{'html'} .= sprintf(gettext("<tr><th colspan='7'>Period: %s to
- %s</th></tr>\n"), $start, $date);
-
- } elsif ( $repType eq 'aud' ) {
-
- # Write AUD Header in csv format
- $header->{'csv'} = gettext("# Application Audit Report - Generated
- by AppArmor\n");
- $header->{'csv'} .= sprintf(gettext("# Date Run: %s\n\n"), $date);
-
- # Write AUD Header in html format
- $header->{'html'} = gettext("<table border='1' cellpadding='2'><tr>
Applications Audit Report - Generated by AppArmor</th></tr>\n");
-
- } else {
-
- # Write SIR Header in csv format
- $header->{'csv'} = gettext("# Security Incident Report - Generated by AppArmor\n");
- $header->{'csv'} .= sprintf(gettext("# Period: %s - %s\n"), $start, $date);
-
- my $count = 0;
-
- if ( $filts ) {
- # We don't want startdate/enddate to be listed as filters
- $count = keys(%$filts);
- if ($filts->{'startdate'}) {
- $filts->{'startdate'} = localtime($filts->{'startdate'});
- $count--;
- }
- if ($filts->{'enddate'}) {
- $filts->{'enddate'} = localtime($filts->{'enddate'});
- $count--;
- }
- }
-
- if ( $count > 0 ) {
- $header->{'csv'} .= gettext("# The following filters were used for report generation:\n");
- for (sort keys(%$filts)) {
- unless ( $filts->{'startdate'} || $filts->{'enddate'} ) {
- $header->{'csv'} .= sprintf(gettext("# Filter: %s, Value: %s\n\n"), $_, $filts->{$_});
- }
- }
- } else {
- $header->{'csv'} .= gettext("# No filters were used for report generation:\n\n\n");
- }
-
- # Write SIR Header in html format
- $header->{'html'} = gettext("<h3>Security Incident Report - Generated by AppArmor</h3>\n");
- $header->{'html'} .= sprintf(gettext("<h4>Period: %s - %s</h4>\n"), $start, $date);
-
- if ( $count > 0 ) {
-
- $header->{'html'} .= gettext("<h4>The following filters were used for report generation:</h4>");
-
- for (sort keys(%$filts)) {
- $header->{'html'} .= sprintf(gettext("<p>Filter: %s, Value: %s</p>"), $_, $filts->{$_});
- }
-
- } else {
- $header->{'html'} .= gettext("<h4>No filters were used for report generation.</h4>");
- }
-
- $header->{'html'} .= "<hr>\n";
-
- }
-
- my $mailHeader = $header->{'csv'};
- $mailHeader =~ s/^#\s*//;
-
- if ( open (HDR, ">$headerFile") ) {
- print HDR "$mailHeader";
- close HDR;
- }
-
- return $header;
-}
-
-# Sets name of new report file to generate
-sub getRepFileName {
-
- my ($hashName,$dir,$repConf) = @_;
- my @dirList = ();
-
- my $plainName = $hashName->{'base'};
-
- # Append date info to help id reports
- my ($sec,$min,$hour,$mday,$month,$year,@junk) = localtime;
-
- $year += 1900;
- $month += 1;
-
- $month = sprintf("%02d", $month);
- $mday = sprintf("%02d", $mday);
- $hour = sprintf("%02d", $hour);
- $min = sprintf("%02d", $min);
- $sec = sprintf("%02d", $sec);
- $mday = sprintf("%02d", $mday);
-
- my $suffix = "-$year-$month-$mday\_$hour.$min.$sec";
- $plainName = $plainName . $suffix;
- my $qtName = "\"$plainName\"";
-
- if (opendir (DIR, $dir)) {
- @dirList = grep(/$qtName/, readdir(DIR) );
- close DIR;
- }
- my $numReps = scalar(@dirList) + 1;
- $numReps = sprintf("%03d", $numReps);
- my $newName = undef;
-
- # Prefix all names w/ .csv -- we'll change to .html later if required
- $newName = "$dir/$plainName.$numReps.csv";
-
- return $newName;
-}
-
-sub getRepConf {
-
- my $repName = shift;
-
- my $repConf = '/etc/apparmor/reports.conf';
- my $tmpConf = '/var/log/apparmor/reports/reports.conf';
- my $config = undef;
- my @mailList = ();
- my %filts = (); # Report 'record' filters
- my $rep = Immunix::Reports::getXmlReport($repName);
-
- if ( scalar(keys(%$rep)) < 2 ) {
- logMessage(sprintf(gettext("Fatal Error: Couldn't get report configuration information %s. Exiting."), $repConf));
- exit 1;
- }
-
- # Clear unnecessary filters
- for my $filt (keys %$rep) {
- #$rep->{$filt} =~ s/\s+//g; # repname won't be in here, so no spaces
- if ( $rep->{$filt} eq "-" || $rep->{$filt} eq 'All' ||
- $rep->{$filt} eq '*' )
- {
- delete($rep->{$filt});
- }
- }
-
- #mark
- my $filts = Immunix::Reports::getFilterList($rep);
-
- # Mail Type - csv, html, or both
- if ( $rep->{'csv'} eq '1' && $rep->{'html'} eq '1' ) {
- $rep->{'mailType'} = 'both';
- } elsif ( $rep->{'csv'} eq '1' && $rep->{'html'} eq '0' ) {
- $rep->{'mailType'} = 'csv';
- } elsif ( $rep->{'csv'} eq '0' && $rep->{'html'} eq '1' ) {
- $rep->{'mailType'} = 'html';
- } else {
- $rep->{'mailType'} = 'none';
- }
-
- # Mail Address List
- if ( $rep->{'addr1'} ) { push(@mailList,$rep->{'addr1'}); }
- if ( $rep->{'addr2'} ) { push(@mailList,$rep->{'addr2'}); }
- if ( $rep->{'addr3'} ) { push(@mailList,$rep->{'addr3'}); }
-
-
- $rep->{'startTime'} = $rep->{'time'};
- $rep->{'endTime'} = time;
- $rep->{'filters'} = %$filts; # mark ($filts needs to be hash, not hash ref
- $rep->{'mailList'} = \@mailList;
-
- return $rep;
-
-}
-
-# Updates last-run time sig. in reports.conf
-sub updateConf {
-
- my ($repName, $repConf) = @_;
- my $time = $repConf->{'endTime'};
-
- if (! $time) { $time = time; }
-
- #if ( ref($repName) ) { $repName = $repName->{'base'}; }
-
- my $repCfFile = '/etc/apparmor/reports.conf';
- my $tmpConf = '/var/log/apparmor/reports/reports.conf';
-
- if ( open(OCF, "<$repCfFile") ) {
-
- if ( open(TCF, ">$tmpConf") ) {
-
- my $nameFlag = 0;
-
- while(<OCF>) {
-
- chomp;
-
- if ( /\/ ) {
- #my $name = (split(/\"/, $_))[1];
- /\(.+)\<\/name\>/;
- my $name = $1;
- if ( $name eq $repName->{'base'} ) {
- $nameFlag = 1;
- }
- } elsif ( $nameFlag == 1 ) {
- if ( /\ |