Hello community, here is the log from the commit of package perl-Sys-Virt for openSUSE:Factory checked in at 2015-04-22 01:18:57 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Sys-Virt (Old) and /work/SRC/openSUSE:Factory/.perl-Sys-Virt.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Sys-Virt" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Sys-Virt/perl-Sys-Virt.changes 2015-03-16 07:01:06.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.perl-Sys-Virt.new/perl-Sys-Virt.changes 2015-04-22 01:18:58.000000000 +0200 @@ -1,0 +2,6 @@ +Mon Apr 13 14:28:53 MDT 2015 - jfeh...@suse.com + +- Update to 1.2.14 + - Add all new APIs and constants in libvirt 1.2.14 + +------------------------------------------------------------------- Old: ---- Sys-Virt-1.2.13.tar.gz New: ---- Sys-Virt-1.2.14.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Sys-Virt.spec ++++++ --- /var/tmp/diff_new_pack.PpDa8Q/_old 2015-04-22 01:18:59.000000000 +0200 +++ /var/tmp/diff_new_pack.PpDa8Q/_new 2015-04-22 01:18:59.000000000 +0200 @@ -17,7 +17,7 @@ Name: perl-Sys-Virt -Version: 1.2.13 +Version: 1.2.14 Release: 0 %define cpan_name Sys-Virt Summary: Represent and manage a libvirt hypervisor connection ++++++ Sys-Virt-1.2.13.tar.gz -> Sys-Virt-1.2.14.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-Virt-1.2.13/Changes new/Sys-Virt-1.2.14/Changes --- old/Sys-Virt-1.2.13/Changes 2015-03-05 18:31:53.000000000 +0100 +++ new/Sys-Virt-1.2.14/Changes 2015-04-09 18:35:58.000000000 +0200 @@ -1,5 +1,18 @@ Revision history for perl module Sys::Virt +1.2.14 2015-04-09 + + - Add VIR_CONNECT_BASELINE_CPU_MIGRATABLE constant + - Add VIR_DOMAIN_CONTROL_ERROR_* constants + - Add virDomainGetIOThreads and virDomainPinIOThread API bindings + - Update the vcpuinfo.pl example to use unpack + - Add VIR_DOMAIN_TUNABLE_CPU_IOTHREADSPIN constant + - Add virDomainInterfaceAddress function & constants + - Add VIR_DOMAIN_PAUSED_STARTING_UP constant + - Adapt to rename of virDomainIOThreadsInfoFree to virDomainIOThreadInfoFree + - Adapt to rename of virDomainGetIOThreadsInfo to virDomainGetIOThreadInfo + - Add VIR_FROM_THREAD constant + 1.2.13 2015-03-05 - Add VIR_STORAGE_VOL_CREATE_REFLINK constant diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-Virt-1.2.13/MANIFEST new/Sys-Virt-1.2.14/MANIFEST --- old/Sys-Virt-1.2.13/MANIFEST 2015-03-06 11:43:58.000000000 +0100 +++ new/Sys-Virt-1.2.14/MANIFEST 2015-04-09 18:36:10.000000000 +0200 @@ -4,6 +4,7 @@ examples/devices.pl examples/dhcp-leases.pl examples/dom-fsinfo.pl +examples/dom-ifinfo.pl examples/dom-stats.pl examples/dump-info.pl examples/dump-xml.pl @@ -11,6 +12,7 @@ examples/events.pl examples/fs-freeze.pl examples/hv-stat.pl +examples/iothreadinfo.pl examples/node-alloc.pl examples/node-cpu.pl examples/node-devlist.pl diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-Virt-1.2.13/META.yml new/Sys-Virt-1.2.14/META.yml --- old/Sys-Virt-1.2.13/META.yml 2015-03-06 11:43:58.000000000 +0100 +++ new/Sys-Virt-1.2.14/META.yml 2015-04-09 18:36:10.000000000 +0200 @@ -1,7 +1,7 @@ --- #YAML:1.0 name: Sys-Virt abstract: Extension for the libvirt library -version: 1.2.13 +version: 1.2.14 author: - Daniel P. Berrange <d...@berrange.com> license: perl diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-Virt-1.2.13/MYMETA.json new/Sys-Virt-1.2.14/MYMETA.json --- old/Sys-Virt-1.2.13/MYMETA.json 2015-03-06 11:43:49.000000000 +0100 +++ new/Sys-Virt-1.2.14/MYMETA.json 2015-04-09 18:36:02.000000000 +0200 @@ -42,5 +42,5 @@ } }, "release_status" : "stable", - "version" : "v1.2.13" + "version" : "v1.2.14" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-Virt-1.2.13/MYMETA.yml new/Sys-Virt-1.2.14/MYMETA.yml --- old/Sys-Virt-1.2.13/MYMETA.yml 2015-03-06 11:43:49.000000000 +0100 +++ new/Sys-Virt-1.2.14/MYMETA.yml 2015-04-09 18:36:02.000000000 +0200 @@ -24,4 +24,4 @@ Test::Pod::Coverage: '0' Time::HiRes: '0' XML::XPath: '0' -version: v1.2.13 +version: v1.2.14 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-Virt-1.2.13/Makefile.PL new/Sys-Virt-1.2.14/Makefile.PL --- old/Sys-Virt-1.2.13/Makefile.PL 2015-03-05 18:31:41.000000000 +0100 +++ new/Sys-Virt-1.2.14/Makefile.PL 2015-04-09 18:35:58.000000000 +0200 @@ -3,7 +3,7 @@ # See lib/ExtUtils/MakeMaker.pm for details of how to influence # the contents of the Makefile that is written. -my $libvirtver = "1.2.13"; +my $libvirtver = "1.2.14"; 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-1.2.13/README new/Sys-Virt-1.2.14/README --- old/Sys-Virt-1.2.13/README 2015-03-05 18:31:41.000000000 +0100 +++ new/Sys-Virt-1.2.14/README 2015-04-09 18:35:58.000000000 +0200 @@ -7,6 +7,6 @@ The only pre-requisite for this module is libvirt itself. For installation instructions, consult the INSTALL file. -The current minimum required version of libvirt is 1.2.13 +The current minimum required version of libvirt is 1.2.14 -- End diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-Virt-1.2.13/Virt.xs new/Sys-Virt-1.2.14/Virt.xs --- old/Sys-Virt-1.2.13/Virt.xs 2015-03-05 18:31:41.000000000 +0100 +++ new/Sys-Virt-1.2.14/Virt.xs 2015-04-09 18:35:58.000000000 +0200 @@ -5014,6 +5014,51 @@ RETVAL +void +get_iothread_info(dom, flags=0) + virDomainPtr dom; + unsigned int flags; + PREINIT: + virDomainIOThreadInfoPtr *iothrinfo; + int niothreads; + int i; + PPCODE: + if ((niothreads = virDomainGetIOThreadInfo(dom, &iothrinfo, + flags)) < 0) + _croak_error(); + + EXTEND(SP, niothreads); + for (i = 0 ; i < niothreads ; i++) { + HV *rec = newHV(); + (void)hv_store(rec, "number", 6, + newSViv(iothrinfo[i]->iothread_id), 0); + (void)hv_store(rec, "affinity", 8, + newSVpvn((char*)iothrinfo[i]->cpumap, + iothrinfo[i]->cpumaplen), 0); + PUSHs(newRV_noinc((SV *)rec)); + } + + for (i = 0 ; i < niothreads ; i++) { + virDomainIOThreadInfoFree(iothrinfo[i]); + } + free(iothrinfo); + + +void +pin_iothread(dom, iothread_id, mask, flags=0) + virDomainPtr dom; + unsigned int iothread_id; + SV *mask; + unsigned int flags; +PREINIT: + STRLEN masklen; + unsigned char *maps; + PPCODE: + maps = (unsigned char *)SvPV(mask, masklen); + if (virDomainPinIOThread(dom, iothread_id, maps, masklen, flags) < 0) + _croak_error(); + + int num_of_snapshots(dom, flags=0) virDomainPtr dom; @@ -5199,6 +5244,45 @@ free(info); void +get_interface_addresses(dom, src, flags=0) + virDomainPtr dom; + unsigned int src; + unsigned int flags; + PREINIT: + virDomainInterfacePtr *info; + int ninfo; + size_t i, j; + PPCODE: + if ((ninfo = virDomainInterfaceAddresses(dom, &info, src, flags)) < 0) + _croak_error(); + + EXTEND(SP, ninfo); + for (i = 0; i < ninfo; i++) { + HV *hv = newHV(); + AV *av = newAV(); + + (void)hv_store(hv, "name", 4, newSVpv(info[i]->name, 0), 0); + if (info[i]->hwaddr) { + (void)hv_store(hv, "hwaddr", 6, newSVpv(info[i]->hwaddr, 0), 0); + } + + for (j = 0; j < info[i]->naddrs; j++) { + HV *subhv = newHV(); + + (void)hv_store(subhv, "type", 4, newSViv(info[i]->addrs[j].type), 0); + (void)hv_store(subhv, "addr", 4, newSVpv(info[i]->addrs[j].addr, 0), 0); + (void)hv_store(subhv, "prefix", 6, newSViv(info[i]->addrs[j].prefix), 0); + av_push(av, newRV_noinc((SV*)subhv)); + } + (void)hv_store(hv, "addrs", 5, newRV_noinc((SV*)av), 0); + + virDomainInterfaceFree(info[i]); + + PUSHs(newRV_noinc((SV*)hv)); + } + free(info); + +void send_process_signal(dom, pidsv, signum, flags=0) virDomainPtr dom; SV *pidsv; @@ -7147,6 +7231,7 @@ REGISTER_CONSTANT_STR(VIR_NODE_MEMORY_SHARED_MERGE_ACROSS_NODES, NODE_MEMORY_SHARED_MERGE_ACROSS_NODES); REGISTER_CONSTANT(VIR_CONNECT_BASELINE_CPU_EXPAND_FEATURES, BASELINE_CPU_EXPAND_FEATURES); + REGISTER_CONSTANT(VIR_CONNECT_BASELINE_CPU_MIGRATABLE, BASELINE_CPU_MIGRATABLE); REGISTER_CONSTANT(VIR_CONNECT_COMPARE_CPU_FAIL_INCOMPATIBLE, COMPARE_CPU_FAIL_INCOMPATIBLE); @@ -7222,6 +7307,7 @@ REGISTER_CONSTANT(VIR_DOMAIN_PAUSED_SHUTTING_DOWN, STATE_PAUSED_SHUTTING_DOWN); REGISTER_CONSTANT(VIR_DOMAIN_PAUSED_SNAPSHOT, STATE_PAUSED_SNAPSHOT); REGISTER_CONSTANT(VIR_DOMAIN_PAUSED_CRASHED, STATE_PAUSED_CRASHED); + REGISTER_CONSTANT(VIR_DOMAIN_PAUSED_STARTING_UP, STATE_PAUSED_STARTING_UP); REGISTER_CONSTANT(VIR_DOMAIN_SHUTDOWN_UNKNOWN, STATE_SHUTDOWN_UNKNOWN); REGISTER_CONSTANT(VIR_DOMAIN_SHUTDOWN_USER, STATE_SHUTDOWN_USER); @@ -7389,6 +7475,10 @@ REGISTER_CONSTANT(VIR_DOMAIN_CONTROL_OCCUPIED, CONTROL_OCCUPIED); REGISTER_CONSTANT(VIR_DOMAIN_CONTROL_ERROR, CONTROL_ERROR); + REGISTER_CONSTANT(VIR_DOMAIN_CONTROL_ERROR_REASON_NONE, CONTROL_ERROR_REASON_NONE); + REGISTER_CONSTANT(VIR_DOMAIN_CONTROL_ERROR_REASON_UNKNOWN, CONTROL_ERROR_REASON_UNKNOWN); + REGISTER_CONSTANT(VIR_DOMAIN_CONTROL_ERROR_REASON_INTERNAL, CONTROL_ERROR_REASON_INTERNAL); + REGISTER_CONSTANT(VIR_DOMAIN_CONTROL_ERROR_REASON_MONITOR, CONTROL_ERROR_REASON_MONITOR); REGISTER_CONSTANT(VIR_DOMAIN_DEVICE_MODIFY_CURRENT, DEVICE_MODIFY_CURRENT); REGISTER_CONSTANT(VIR_DOMAIN_DEVICE_MODIFY_LIVE, DEVICE_MODIFY_LIVE); @@ -7752,6 +7842,12 @@ REGISTER_CONSTANT_STR(VIR_DOMAIN_TUNABLE_BLKDEV_TOTAL_BYTES_SEC_MAX, TUNABLE_BLKDEV_TOTAL_BYTES_SEC_MAX); REGISTER_CONSTANT_STR(VIR_DOMAIN_TUNABLE_BLKDEV_TOTAL_IOPS_SEC_MAX, TUNABLE_BLKDEV_TOTAL_IOPS_SEC_MAX); REGISTER_CONSTANT_STR(VIR_DOMAIN_TUNABLE_BLKDEV_SIZE_IOPS_SEC, TUNABLE_BLKDEV_SIZE_IOPS_SEC); + REGISTER_CONSTANT_STR(VIR_DOMAIN_TUNABLE_CPU_IOTHREADSPIN, TUNABLE_IOTHREADSPIN); + + + REGISTER_CONSTANT(VIR_DOMAIN_INTERFACE_ADDRESSES_SRC_AGENT, INTERFACE_ADDRESSES_SRC_AGENT); + REGISTER_CONSTANT(VIR_DOMAIN_INTERFACE_ADDRESSES_SRC_LEASE, INTERFACE_ADDRESSES_SRC_LEASE); + stash = gv_stashpv( "Sys::Virt::DomainSnapshot", TRUE ); REGISTER_CONSTANT(VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN, DELETE_CHILDREN); @@ -8008,6 +8104,7 @@ REGISTER_CONSTANT(VIR_FROM_CRYPTO, FROM_CRYPTO); REGISTER_CONSTANT(VIR_FROM_FIREWALL, FROM_FIREWALL); REGISTER_CONSTANT(VIR_FROM_POLKIT, FROM_POLKIT); + REGISTER_CONSTANT(VIR_FROM_THREAD, FROM_THREAD); REGISTER_CONSTANT(VIR_ERR_OK, ERR_OK); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-Virt-1.2.13/examples/dom-ifinfo.pl new/Sys-Virt-1.2.14/examples/dom-ifinfo.pl --- old/Sys-Virt-1.2.13/examples/dom-ifinfo.pl 1970-01-01 01:00:00.000000000 +0100 +++ new/Sys-Virt-1.2.14/examples/dom-ifinfo.pl 2015-04-09 18:35:58.000000000 +0200 @@ -0,0 +1,21 @@ +#!/usr/bin/perl + + +use strict; +use warnings; + +use Sys::Virt; +use Sys::Virt::Domain; + +my $uri = @ARGV ? shift @ARGV : undef; + +my $c = Sys::Virt->new(uri => $uri); + +my $dom = $c->get_domain_by_name(shift @ARGV); + +my @fs = $dom->get_interface_addresses( + Sys::Virt::Domain::INTERFACE_ADDRESSES_SRC_LEASE); + +use Data::Dumper; + +print Dumper(@fs); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-Virt-1.2.13/examples/iothreadinfo.pl new/Sys-Virt-1.2.14/examples/iothreadinfo.pl --- old/Sys-Virt-1.2.13/examples/iothreadinfo.pl 1970-01-01 01:00:00.000000000 +0100 +++ new/Sys-Virt-1.2.14/examples/iothreadinfo.pl 2015-04-09 18:35:58.000000000 +0200 @@ -0,0 +1,33 @@ +# -*- perl -*- +use strict; +use warnings; +use Sys::Virt; + +my $addr = @ARGV ? shift @ARGV : ""; +print "Addr $addr\n"; +my $con = Sys::Virt->new(address => $addr, readonly => 1); + +print "VMM type: ", $con->get_type(), "\n"; + +foreach my $dom (sort { $a->get_id <=> $b->get_id } $con->list_all_domains) { + print "Domain: {\n"; + print " ID: ", $dom->get_id(), " '" , $dom->get_name(), "'\n"; + print " UUID: ", $dom->get_uuid_string(), "\n"; + my $nodeinfo = $con->get_node_info; + my @info = $dom->get_iothread_info(Sys::Virt::Domain::AFFECT_CONFIG); + + foreach my $info (@info) { + print " IOThread: {\n"; + foreach (sort { $a cmp $b } keys %{$info}) { + if ($_ eq "affinity") { + print " ", $_, ": "; + my @bits = split(//, unpack("b$nodeinfo->{cpus}", $info->{$_})); + print join ("", @bits), "\n"; + } else { + print " ", $_, ": ", $info->{$_}, "\n"; + } + } + print " }\n"; + } + print "}\n"; +} diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-Virt-1.2.13/examples/vcpuinfo.pl new/Sys-Virt-1.2.14/examples/vcpuinfo.pl --- old/Sys-Virt-1.2.13/examples/vcpuinfo.pl 2015-03-05 18:31:41.000000000 +0100 +++ new/Sys-Virt-1.2.14/examples/vcpuinfo.pl 2015-04-09 18:35:58.000000000 +0200 @@ -21,10 +21,8 @@ foreach (sort { $a cmp $b } keys %{$info}) { if ($_ eq "affinity") { print " ", $_, ": "; - my @mask = split //, $info->{$_}; - for (my $p = 0 ; $p < $nodeinfo->{cpus} ; $p++) { - print ((ord($mask[$p/8]) & (1 << ($p % 8))) ? 1 : 0); - } + my @mask = split(//, unpack("b$nodeinfo->{cpus}", $info->{$_})); + print join ("", @mask), "\n"; print "\n"; } else { print " ", $_, ": ", $info->{$_}, "\n"; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-Virt-1.2.13/lib/Sys/Virt/Domain.pm new/Sys-Virt-1.2.14/lib/Sys/Virt/Domain.pm --- old/Sys-Virt-1.2.13/lib/Sys/Virt/Domain.pm 2015-03-05 18:31:41.000000000 +0100 +++ new/Sys-Virt-1.2.14/lib/Sys/Virt/Domain.pm 2015-04-09 18:35:58.000000000 +0200 @@ -356,6 +356,10 @@ The guest is paused due to a kernel panic +=item Sys::Virt::Domain::STATE_PAUSED_STARTING_UP + +The guest is paused as it is being started up. + =item Sys::Virt::Domain::STATE_RUNNING_BOOTED The guest is running after being booted @@ -1216,6 +1220,23 @@ bitstring, use the C<vec> function with a value of C<1> for the C<BITS> parameter. +=item @iothreadinfo = $dom->get_iothread_info($flags=0) + +Obtain information about the state of all IOThreads in a running +guest domain. The returned list will have one element for each IOThread, +where each elements contains a hash reference. The keys in the hash +are, C<number> the IOThread number and C<affinity> giving the allowed +schedular placement. The value for C<affinity> is a +string representing a bitmask against physical CPUs, 8 cpus per +character. To extract the bits use the C<unpack> function with +the C<b*> template. + +=item $dom->pin_iothread($iothread, $mask) + +Pin the IOThread given by index C<$iothread> to physical CPUs +given by C<$mask>. The C<$mask> is a string representing a bitmask +against physical CPUs, 8 cpus per character. + =item my @stats = $dom->get_cpu_stats($startCpu, $numCpus, $flags=0) Requests the guests host physical CPU usage statistics, starting @@ -1657,6 +1678,61 @@ =back +=item @nics = $dom->get_interface_addresses($src, $flags=0); + +Obtain a list of all guest network interfaces. The C<$src> +parameter is one of the constants + +=over 4 + +=item Sys::Virt::Domain::INTERFACE_ADDRESSES_SRC_LEASE + +Extract the DHCP server lease information + +=item Sys::Virt::Domain::INTERFACE_ADDRESSES_SRC_AGENT + +Query the guest OS via an agent + +=back + +The returned list will contain one element for each interface. +The values in the list will be a hash reference with the +following keys + +=over 4 + +=item name + +The name of the guest interface that is mounted + +=item hwaddr + +The hardware address, aka MAC, if available. + +=item addrs + +An array reference containing list of IP addresses +associated with the guest NIC. Each element in the +array is a further hash containing + +=over 4 + +=item addr + +The IP address string + +=item prefix + +The IP address network prefix + +=item type + +The IP address type (IPv4 vs IPv6) + +=back + +=back + =item $dom->send_process_signal($pid, $signum, $flags=0); Send the process C<$pid> the signal C<$signum>. The @@ -1740,6 +1816,29 @@ =back +If the status is C<Sys::Virt::Domain::CONTROL_ERROR>, then one +of the following constants describes the reason + +=over 4 + +=item Sys::Virt::Domain::CONTROL_ERROR_REASON_NONE + +There is no reason for the error available + +=item Sys::Virt::Domain::CONTROL_ERROR_REASON_UNKNOWN + +The reason for the error is unknown + +=item Sys::Virt::Domain::CONTROL_ERROR_REASON_INTERNAL + +There was an internal error in libvirt + +=item Sys::Virt::Domain::CONTROL_ERROR_REASON_MONITOR + +There was an error speaking to the monitor + +=back + =head2 DOMAIN CREATION The following constants can be used to control the behaviour @@ -3834,6 +3933,10 @@ The maximum I/O operations per second +=item Sys::Virt::Domain::TUNABLE_IOTHREADSPIN + +The I/O threads pinning + =back =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-Virt-1.2.13/lib/Sys/Virt/Error.pm new/Sys-Virt-1.2.14/lib/Sys/Virt/Error.pm --- old/Sys-Virt-1.2.13/lib/Sys/Virt/Error.pm 2015-03-05 18:31:41.000000000 +0100 +++ new/Sys-Virt-1.2.14/lib/Sys/Virt/Error.pm 2015-04-09 18:35:58.000000000 +0200 @@ -378,6 +378,10 @@ The polkit authentication / authorization APIs +=item Sys::Virt::Error::FROM_THREAD + +The thread helper utils + =back =head2 ERROR CODE CONSTANTS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-Virt-1.2.13/lib/Sys/Virt.pm new/Sys-Virt-1.2.14/lib/Sys/Virt.pm --- old/Sys-Virt-1.2.13/lib/Sys/Virt.pm 2015-03-05 18:31:53.000000000 +0100 +++ new/Sys-Virt-1.2.14/lib/Sys/Virt.pm 2015-04-09 18:35:58.000000000 +0200 @@ -78,7 +78,7 @@ use Sys::Virt::DomainSnapshot; use Sys::Virt::Stream; -our $VERSION = '1.2.13'; +our $VERSION = '1.2.14'; require XSLoader; XSLoader::load('Sys::Virt', $VERSION); @@ -1606,6 +1606,10 @@ Expand the CPU definition to list all feature flags, even those implied by the model name. +=item Sys::Virt::BASELINE_CPU_MIGRATABLE + +Only include features which can be live migrated. + =back =item @names = $con->get_cpu_model_names($arch, $flags=0) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-Virt-1.2.13/perl-Sys-Virt.spec new/Sys-Virt-1.2.14/perl-Sys-Virt.spec --- old/Sys-Virt-1.2.13/perl-Sys-Virt.spec 2015-03-06 11:43:58.000000000 +0100 +++ new/Sys-Virt-1.2.14/perl-Sys-Virt.spec 2015-04-09 18:36:10.000000000 +0200 @@ -1,7 +1,7 @@ # Automatically generated by perl-Sys-Virt.spec.PL Name: perl-Sys-Virt -Version: 1.2.13 +Version: 1.2.14 Release: 1%{?dist}%{?extra_release} Summary: Represent and manage a libvirt hypervisor connection License: GPLv2+ or Artistic