Hello community,
here is the log from the commit of package perl-Sys-Virt for openSUSE:Factory
checked in at 2019-09-13 14:57:26
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Sys-Virt (Old)
and /work/SRC/openSUSE:Factory/.perl-Sys-Virt.new.7948 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Sys-Virt"
Fri Sep 13 14:57:26 2019 rev:72 rq:728578 version:5.7.0
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Sys-Virt/perl-Sys-Virt.changes
2019-08-19 21:28:00.700638698 +0200
+++ /work/SRC/openSUSE:Factory/.perl-Sys-Virt.new.7948/perl-Sys-Virt.changes
2019-09-13 14:57:26.629275012 +0200
@@ -1,0 +2,6 @@
+Thu Sep 5 16:35:31 UTC 2019 - James Fehlig <jfeh...@suse.com>
+
+- Update to 5.7.0
+ - Add all new APIs and constants in libvirt 5.7.0
+
+-------------------------------------------------------------------
Old:
----
Sys-Virt-v5.6.0.tar.gz
New:
----
Sys-Virt-v5.7.0.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Sys-Virt.spec ++++++
--- /var/tmp/diff_new_pack.510nfr/_old 2019-09-13 14:57:27.057275030 +0200
+++ /var/tmp/diff_new_pack.510nfr/_new 2019-09-13 14:57:27.061275030 +0200
@@ -17,7 +17,7 @@
Name: perl-Sys-Virt
-Version: 5.6.0
+Version: 5.7.0
Release: 0
%define cpan_name Sys-Virt
Summary: Represent and manage a libvirt hypervisor connection
++++++ Sys-Virt-v5.6.0.tar.gz -> Sys-Virt-v5.7.0.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Virt-v5.6.0/Build.PL new/Sys-Virt-v5.7.0/Build.PL
--- old/Sys-Virt-v5.6.0/Build.PL 2019-08-06 14:57:45.000000000 +0200
+++ new/Sys-Virt-v5.7.0/Build.PL 2019-09-04 11:18:50.000000000 +0200
@@ -17,7 +17,7 @@
use strict;
use warnings;
-my $libvirtver = "5.6.0";
+my $libvirtver = "5.7.0";
my $stat = system "pkg-config --atleast-version=$libvirtver libvirt";
die "cannot run pkg-config to check libvirt version" if $stat == -1;
die "libvirt >= $libvirtver is required\n" unless $stat == 0;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Virt-v5.6.0/Changes new/Sys-Virt-v5.7.0/Changes
--- old/Sys-Virt-v5.6.0/Changes 2019-08-06 14:57:45.000000000 +0200
+++ new/Sys-Virt-v5.7.0/Changes 2019-09-04 11:18:50.000000000 +0200
@@ -1,5 +1,10 @@
Revision history for perl module Sys::Virt
+5.7.0 2019-09-04
+
+ - Add virDomainGetGuestInfo API and constants
+ - Fix Sys::Virt::NetworkPort creation
+
5.6.0 2019-08-06
- Add VIR_DOMAIN_SNAPSHOT_CREATE_VALIDATE constant
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Virt-v5.6.0/META.json
new/Sys-Virt-v5.7.0/META.json
--- old/Sys-Virt-v5.6.0/META.json 2019-08-06 14:57:45.000000000 +0200
+++ new/Sys-Virt-v5.7.0/META.json 2019-09-04 11:18:50.000000000 +0200
@@ -41,7 +41,7 @@
"provides" : {
"Sys::Virt" : {
"file" : "lib/Sys/Virt.pm",
- "version" : "v5.6.0"
+ "version" : "v5.7.0"
},
"Sys::Virt::Domain" : {
"file" : "lib/Sys/Virt/Domain.pm"
@@ -100,6 +100,6 @@
},
"x_MailingList" : "http://www.redhat.com/mailman/listinfo/libvir-list";
},
- "version" : "v5.6.0",
+ "version" : "v5.7.0",
"x_serialization_backend" : "JSON::PP version 4.02"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Virt-v5.6.0/META.yml new/Sys-Virt-v5.7.0/META.yml
--- old/Sys-Virt-v5.6.0/META.yml 2019-08-06 14:57:45.000000000 +0200
+++ new/Sys-Virt-v5.7.0/META.yml 2019-09-04 11:18:50.000000000 +0200
@@ -24,7 +24,7 @@
provides:
Sys::Virt:
file: lib/Sys/Virt.pm
- version: v5.6.0
+ version: v5.7.0
Sys::Virt::Domain:
file: lib/Sys/Virt/Domain.pm
Sys::Virt::DomainCheckpoint:
@@ -62,5 +62,5 @@
homepage: http://libvirt.org/
license: http://www.gnu.org/licenses/gpl.html
repository: https://libvirt.org/git/?p=libvirt-perl.git;a=summary
-version: v5.6.0
+version: v5.7.0
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Virt-v5.6.0/README new/Sys-Virt-v5.7.0/README
--- old/Sys-Virt-v5.6.0/README 2019-08-06 14:57:45.000000000 +0200
+++ new/Sys-Virt-v5.7.0/README 2019-09-04 11:18:50.000000000 +0200
@@ -8,6 +8,6 @@
Module::Build buld system. For installation instructions, consult
the INSTALL file.
-The current minimum required version of libvirt is 5.6.0
+The current minimum required version of libvirt is 5.7.0
-- End
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Virt-v5.6.0/lib/Sys/Virt/Domain.pm
new/Sys-Virt-v5.7.0/lib/Sys/Virt/Domain.pm
--- old/Sys-Virt-v5.6.0/lib/Sys/Virt/Domain.pm 2019-08-06 14:57:45.000000000
+0200
+++ new/Sys-Virt-v5.7.0/lib/Sys/Virt/Domain.pm 2019-09-04 11:18:50.000000000
+0200
@@ -2082,7 +2082,7 @@
=item $info = $dom->get_launch_security_info($flags=0)
-Get information about the domaim launch security policy. C<$flags>
+Get information about the domain launch security policy. C<$flags>
is currently unused and defaults to zero. The returned hash may
contain the following keys
@@ -2094,6 +2094,38 @@
=back
+=item $info = $dom->get_guest_info($types, $flags=0)
+
+Get information about the domain guest configuration. The C<$types>
+parameter determines what pieces of information are returned and
+should be the bitwise or of the following constants:
+
+=over 4
+
+=item Sys::Virt::Domain::GUEST_INFO_USERS
+
+Active user information
+
+=item Sys::Virt::Domain::GUEST_INFO_OS
+
+Misc operating system information
+
+=item Sys::Virt::Domain::GUEST_INFO_TIMEZONE
+
+The guest timezone
+
+=item Sys::Virt::Domain::GUEST_INFO_HOSTNAME
+
+The guest hostname
+
+=item Sys::Virt::Domain::GUEST_INFO_FILESYSTEM
+
+Filesystem mount information
+
+=back
+
+C<$flags> is currently unused and defaults to zero.
+
=back
=head1 CONSTANTS
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Virt-v5.6.0/lib/Sys/Virt/DomainCheckpoint.pm
new/Sys-Virt-v5.7.0/lib/Sys/Virt/DomainCheckpoint.pm
--- old/Sys-Virt-v5.6.0/lib/Sys/Virt/DomainCheckpoint.pm 2019-08-06
14:57:45.000000000 +0200
+++ new/Sys-Virt-v5.7.0/lib/Sys/Virt/DomainCheckpoint.pm 2019-09-04
11:18:50.000000000 +0200
@@ -60,14 +60,14 @@
return $self;
}
-=item my $str = $domss->get_name()
+=item my $str = $domchkp->get_name()
Return the name of the checkpoint
-=item my $xml = $domss->get_xml_description($flags)
+=item my $xml = $domchkp->get_xml_description($flags)
Returns an XML document containing a complete description of
-the domain's configuration. The C<$flags> parameter
+the domain checkpoints' configuration. The C<$flags> parameter
accepts the following constants
=over 4
@@ -87,22 +87,22 @@
=back
-=item $domss->delete($flags)
+=item $domchkp->delete($flags)
Deletes this checkpoint object & its data. The optional C<$flags> parameter
controls
what should be deleted via the C<Sys::Virt::DomainCheckpoint::DELETE_*>
constants.
-=item $parentss = $domss->get_parent();
+=item $parentchkp = $domchkp->get_parent();
Return the parent of the checkpoint, if any
-=item $res = $domss->has_metadata()
+=item $res = $domchkp->has_metadata()
Returns a true value if this checkpoint has metadata associated with
it.
-=item my @checkpoints = $domss->list_all_children($flags)
+=item my @checkpoints = $domchkp->list_all_children($flags)
Return a list of all domain checkpoints that are children of this
checkpoint. The elements in the returned list are instances of the
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Virt-v5.6.0/lib/Sys/Virt/DomainSnapshot.pm
new/Sys-Virt-v5.7.0/lib/Sys/Virt/DomainSnapshot.pm
--- old/Sys-Virt-v5.6.0/lib/Sys/Virt/DomainSnapshot.pm 2019-08-06
14:57:45.000000000 +0200
+++ new/Sys-Virt-v5.7.0/lib/Sys/Virt/DomainSnapshot.pm 2019-09-04
11:18:50.000000000 +0200
@@ -67,7 +67,7 @@
=item my $xml = $domss->get_xml_description($flags)
Returns an XML document containing a complete description of
-the domain's configuration. The C<$flags> parameter
+the domain snapshot's configuration. The C<$flags> parameter
accepts the following constants
=over 4
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Virt-v5.6.0/lib/Sys/Virt/Network.pm
new/Sys-Virt-v5.7.0/lib/Sys/Virt/Network.pm
--- old/Sys-Virt-v5.6.0/lib/Sys/Virt/Network.pm 2019-08-06 14:57:45.000000000
+0200
+++ new/Sys-Virt-v5.7.0/lib/Sys/Virt/Network.pm 2019-09-04 11:18:50.000000000
+0200
@@ -212,7 +212,7 @@
my $xml = shift;
my $flags = shift || 0;
- return Sys::Virt::NetworkPort->_new(net => $self, xml => $xml, flags =>
$flags);
+ return Sys::Virt::NetworkPort->_new(network => $self, xml => $xml, flags
=> $flags);
}
@@ -228,7 +228,7 @@
my $self = shift;
my $uuid = shift;
- return Sys::Virt::NetworkPort->_new(net => $self, uuid => $uuid);
+ return Sys::Virt::NetworkPort->_new(network => $self, uuid => $uuid);
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Virt-v5.6.0/lib/Sys/Virt/NetworkPort.pm
new/Sys-Virt-v5.7.0/lib/Sys/Virt/NetworkPort.pm
--- old/Sys-Virt-v5.6.0/lib/Sys/Virt/NetworkPort.pm 2019-08-06
14:57:45.000000000 +0200
+++ new/Sys-Virt-v5.7.0/lib/Sys/Virt/NetworkPort.pm 2019-09-04
11:18:50.000000000 +0200
@@ -67,26 +67,26 @@
}
-=item my $uuid = $net->get_uuid()
+=item my $uuid = $port->get_uuid()
Returns a 16 byte long string containing the raw globally unique identifier
(UUID) for the network port.
-=item my $uuid = $net->get_uuid_string()
+=item my $uuid = $port->get_uuid_string()
Returns a printable string representation of the raw UUID, in the format
'XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX'.
-=item my $xml = $net->get_xml_description()
+=item my $xml = $port->get_xml_description()
Returns an XML document containing a complete description of
the network port's configuration
-=item $net->delete()
+=item $port->delete()
Delete the network port from the managed network.
-=item my $params = $net->get_parameters($flags=0);
+=item my $params = $port->get_parameters($flags=0);
Get tunable parameters associated with the network port. The C<$flags>
parameter is currently unused and defaults to zero. The returned
@@ -125,7 +125,7 @@
=back
-=item $net->set_parameters($params, $flags=0);
+=item $port->set_parameters($params, $flags=0);
Set tunable parameters associated with the network port. The C<$flags>
parameter is currently unused and defaults to zero. The C<$params>
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Virt-v5.6.0/lib/Sys/Virt.pm
new/Sys-Virt-v5.7.0/lib/Sys/Virt.pm
--- old/Sys-Virt-v5.6.0/lib/Sys/Virt.pm 2019-08-06 14:57:45.000000000 +0200
+++ new/Sys-Virt-v5.7.0/lib/Sys/Virt.pm 2019-09-04 11:18:50.000000000 +0200
@@ -81,7 +81,7 @@
use Sys::Virt::DomainCheckpoint;
use Sys::Virt::Stream;
-our $VERSION = '5.6.0';
+our $VERSION = '5.7.0';
require XSLoader;
XSLoader::load('Sys::Virt', $VERSION);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Virt-v5.6.0/lib/Sys/Virt.xs
new/Sys-Virt-v5.7.0/lib/Sys/Virt.xs
--- old/Sys-Virt-v5.6.0/lib/Sys/Virt.xs 2019-08-06 14:57:45.000000000 +0200
+++ new/Sys-Virt-v5.7.0/lib/Sys/Virt.xs 2019-09-04 11:18:50.000000000 +0200
@@ -5034,6 +5034,24 @@
RETVAL
+HV *
+get_guest_info(dom, types=0, flags=0)
+ virDomainPtr dom;
+ int types;
+ unsigned int flags;
+ PREINIT:
+ virTypedParameterPtr params = NULL;
+ int nparams = 0;
+ CODE:
+ if (virDomainGetGuestInfo(dom, types, ¶ms, &nparams, flags) < 0) {
+ _croak_error();
+ }
+ RETVAL = vir_typed_param_to_hv(params, nparams);
+ virTypedParamsFree(params, nparams);
+ OUTPUT:
+ RETVAL
+
+
unsigned long
get_max_memory(dom)
virDomainPtr dom;
@@ -9739,6 +9757,13 @@
REGISTER_CONSTANT_STR(VIR_DOMAIN_LAUNCH_SECURITY_SEV_MEASUREMENT,
LAUNCH_SECURITY_SEV_MEASUREMENT);
+ REGISTER_CONSTANT(VIR_DOMAIN_GUEST_INFO_USERS, GUEST_INFO_USERS);
+ REGISTER_CONSTANT(VIR_DOMAIN_GUEST_INFO_OS, GUEST_INFO_OS);
+ REGISTER_CONSTANT(VIR_DOMAIN_GUEST_INFO_TIMEZONE, GUEST_INFO_TIMEZONE);
+ REGISTER_CONSTANT(VIR_DOMAIN_GUEST_INFO_HOSTNAME, GUEST_INFO_HOSTNAME);
+ REGISTER_CONSTANT(VIR_DOMAIN_GUEST_INFO_FILESYSTEM,
GUEST_INFO_FILESYSTEM);
+
+
stash = gv_stashpv( "Sys::Virt::DomainSnapshot", TRUE );
REGISTER_CONSTANT(VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN, DELETE_CHILDREN);
REGISTER_CONSTANT(VIR_DOMAIN_SNAPSHOT_DELETE_METADATA_ONLY,
DELETE_METADATA_ONLY);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Virt-v5.6.0/perl-Sys-Virt.spec
new/Sys-Virt-v5.7.0/perl-Sys-Virt.spec
--- old/Sys-Virt-v5.6.0/perl-Sys-Virt.spec 2019-08-06 14:57:45.000000000
+0200
+++ new/Sys-Virt-v5.7.0/perl-Sys-Virt.spec 2019-09-04 11:18:50.000000000
+0200
@@ -1,7 +1,7 @@
# Automatically generated by perl-Sys-Virt.spec.PL
Name: perl-Sys-Virt
-Version: 5.6.0
+Version: 5.7.0
Release: 1%{?dist}
Summary: Represent and manage a libvirt hypervisor connection
License: GPLv2+ or Artistic
++++++ suse-set-migration-constraints.patch ++++++
--- /var/tmp/diff_new_pack.510nfr/_old 2019-09-13 14:57:27.225275037 +0200
+++ /var/tmp/diff_new_pack.510nfr/_new 2019-09-13 14:57:27.225275037 +0200
@@ -2,10 +2,10 @@
References: fate#316614, bsc#859868
-Index: Sys-Virt-v5.6.0/lib/Sys/Virt/Domain.pm
+Index: Sys-Virt-v5.7.0/lib/Sys/Virt/Domain.pm
===================================================================
---- Sys-Virt-v5.6.0.orig/lib/Sys/Virt/Domain.pm
-+++ Sys-Virt-v5.6.0/lib/Sys/Virt/Domain.pm
+--- Sys-Virt-v5.7.0.orig/lib/Sys/Virt/Domain.pm
++++ Sys-Virt-v5.7.0/lib/Sys/Virt/Domain.pm
@@ -1141,6 +1141,22 @@ progress is not made
The number of connections used during parallel migration.
@@ -29,11 +29,11 @@
=back
=item $ddom = $dom->migrate(destcon, flags=0, dname=undef, uri=undef,
bandwidth=0)
-Index: Sys-Virt-v5.6.0/lib/Sys/Virt.xs
+Index: Sys-Virt-v5.7.0/lib/Sys/Virt.xs
===================================================================
---- Sys-Virt-v5.6.0.orig/lib/Sys/Virt.xs
-+++ Sys-Virt-v5.6.0/lib/Sys/Virt.xs
-@@ -5337,7 +5337,7 @@ _migrate(dom, destcon, newparams, flags=
+--- Sys-Virt-v5.7.0.orig/lib/Sys/Virt.xs
++++ Sys-Virt-v5.7.0/lib/Sys/Virt.xs
+@@ -5355,7 +5355,7 @@ _migrate(dom, destcon, newparams, flags=
virTypedParameterPtr params;
int nparams;
CODE:
@@ -42,7 +42,7 @@
Newx(params, nparams, virTypedParameter);
strncpy(params[0].field, VIR_MIGRATE_PARAM_URI,
-@@ -5404,6 +5404,22 @@ _migrate(dom, destcon, newparams, flags=
+@@ -5422,6 +5422,22 @@ _migrate(dom, destcon, newparams, flags=
VIR_TYPED_PARAM_FIELD_LENGTH);
params[15].type = VIR_TYPED_PARAM_ULLONG;
@@ -65,7 +65,7 @@
nparams = vir_typed_param_from_hv(newparams, params, nparams);
vir_typed_param_add_string_list_from_hv(newparams, ¶ms, &nparams,
-@@ -5432,7 +5448,7 @@ _migrate_to_uri(dom, desturi, newparams,
+@@ -5450,7 +5466,7 @@ _migrate_to_uri(dom, desturi, newparams,
virTypedParameterPtr params;
int nparams;
PPCODE:
@@ -74,7 +74,7 @@
Newx(params, nparams, virTypedParameter);
strncpy(params[0].field, VIR_MIGRATE_PARAM_URI,
-@@ -5495,10 +5511,26 @@ _migrate_to_uri(dom, desturi, newparams,
+@@ -5513,10 +5529,26 @@ _migrate_to_uri(dom, desturi, newparams,
VIR_TYPED_PARAM_FIELD_LENGTH);
params[14].type = VIR_TYPED_PARAM_INT;
@@ -102,7 +102,7 @@
nparams = vir_typed_param_from_hv(newparams, params, nparams);
vir_typed_param_add_string_list_from_hv(newparams, ¶ms, &nparams,
-@@ -9154,6 +9186,10 @@ BOOT:
+@@ -9172,6 +9204,10 @@ BOOT:
REGISTER_CONSTANT_STR(VIR_MIGRATE_PARAM_PARALLEL_CONNECTIONS,
MIGRATE_PARAM_PARALLEL_CONNECTIONS);
REGISTER_CONSTANT(VIR_DOMAIN_MIGRATE_MAX_SPEED_POSTCOPY,
MIGRATE_MAX_SPEED_POSTCOPY);
