rpms/perl-Sys-Virt/F-9 perl-Sys-Virt-free.patch, NONE, 1.1 .cvsignore, 1.3, 1.4 perl-Sys-Virt.spec, 1.13, 1.14 sources, 1.3, 1.4 perl-Sys-Virt-0.1.2-free.patch, 1.1, NONE

Štěpán Kasal kasal at fedoraproject.org
Mon Mar 30 15:20:48 UTC 2009


Author: kasal

Update of /cvs/extras/rpms/perl-Sys-Virt/F-9
In directory cvs1.fedora.phx.redhat.com:/tmp/cvs-serv20862

Modified Files:
	.cvsignore perl-Sys-Virt.spec sources 
Added Files:
	perl-Sys-Virt-free.patch 
Removed Files:
	perl-Sys-Virt-0.1.2-free.patch 
Log Message:
sync with rawhide

perl-Sys-Virt-free.patch:

--- NEW FILE perl-Sys-Virt-free.patch ---
2009-03-30  Stepan Kasal  <skasal at redhat.com>

	* Virt.xs: call Safefree before bailing out.

Adapted from a similar patch to Sys-Virt-0.1.2.

diff -urpN Sys-Virt-0.2.0.orig/Virt.xs Sys-Virt-0.2.0/Virt.xs
--- Sys-Virt-0.2.0.orig/Virt.xs	2009-03-27 20:45:33.000000000 +0100
+++ Sys-Virt-0.2.0/Virt.xs	2009-03-30 16:51:16.000000000 +0200
@@ -670,6 +670,7 @@ list_domain_ids(con, maxids)
   PPCODE:
       Newx(ids, maxids, int);
       if ((nid = virConnectListDomains(con, ids, maxids)) < 0) {
+        Safefree(ids);
 	_croak_error(virConnGetLastError(con));
       }
       EXTEND(SP, nid);
@@ -700,7 +701,7 @@ list_defined_domain_names(con, maxnames)
   PPCODE:
       Newx(names, maxnames, char *);
       if ((ndom = virConnectListDefinedDomains(con, names, maxnames)) < 0) {
-	free(names);
+	Safefree(names);
 	_croak_error(virConnGetLastError(con));
       }
       EXTEND(SP, ndom);
@@ -731,6 +732,7 @@ list_network_names(con, maxnames)
   PPCODE:
       Newx(names, maxnames, char *);
       if ((nnet = virConnectListNetworks(con, names, maxnames)) < 0) {
+        Safefree(names);
 	_croak_error(virConnGetLastError(con));
       }
       EXTEND(SP, nnet);
@@ -762,7 +764,7 @@ list_defined_network_names(con, maxnames
   PPCODE:
       Newx(names, maxnames, char *);
       if ((ndom = virConnectListDefinedNetworks(con, names, maxnames)) < 0) {
-	free(names);
+	Safefree(names);
 	_croak_error(virConnGetLastError(con));
       }
       EXTEND(SP, ndom);
@@ -793,6 +795,7 @@ list_storage_pool_names(con, maxnames)
   PPCODE:
       Newx(names, maxnames, char *);
       if ((nnet = virConnectListStoragePools(con, names, maxnames)) < 0) {
+        Safefree(names);
 	_croak_error(virConnGetLastError(con));
       }
       EXTEND(SP, nnet);
@@ -824,7 +827,7 @@ list_defined_storage_pool_names(con, max
   PPCODE:
       Newx(names, maxnames, char *);
       if ((ndom = virConnectListDefinedStoragePools(con, names, maxnames)) < 0) {
-	free(names);
+	Safefree(names);
 	_croak_error(virConnGetLastError(con));
       }
       EXTEND(SP, ndom);
@@ -859,6 +862,7 @@ list_node_device_names(con, cap, maxname
   PPCODE:
       Newx(names, maxnames, char *);
       if ((nnet = virNodeListDevices(con, cap, names, maxnames, flags)) < 0) {
+        Safefree(names);
 	_croak_error(virConnGetLastError(con));
       }
       EXTEND(SP, nnet);


Index: .cvsignore
===================================================================
RCS file: /cvs/extras/rpms/perl-Sys-Virt/F-9/.cvsignore,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- .cvsignore	6 Mar 2008 16:11:54 -0000	1.3
+++ .cvsignore	30 Mar 2009 15:20:17 -0000	1.4
@@ -1 +1 @@
-Sys-Virt-0.1.2.tar.gz
+Sys-Virt-0.2.0.tar.gz


Index: perl-Sys-Virt.spec
===================================================================
RCS file: /cvs/extras/rpms/perl-Sys-Virt/F-9/perl-Sys-Virt.spec,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -r1.13 -r1.14
--- perl-Sys-Virt.spec	7 Mar 2008 22:47:03 -0000	1.13
+++ perl-Sys-Virt.spec	30 Mar 2009 15:20:17 -0000	1.14
@@ -1,12 +1,12 @@
 Name:           perl-Sys-Virt
-Version:        0.1.2
-Release:        3%{?dist}
+Version:        0.2.0
+Release:        1%{?dist}
 Summary:        Represent and manage a libvirt hypervisor connection
 License:        GPLv2+ or Artistic
 Group:          Development/Libraries
 URL:            http://search.cpan.org/dist/Sys-Virt/
 Source0:        http://www.cpan.org/authors/id/D/DA/DANBERR/Sys-Virt-%{version}.tar.gz
-Patch1:         %{name}-%{version}-free.patch
+Patch1:         %{name}-free.patch
 BuildRoot:      %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
 BuildRequires:  perl(ExtUtils::MakeMaker)
 BuildRequires:  perl(Test::Pod)
@@ -61,6 +61,12 @@
 %{_mandir}/man3/*
 
 %changelog
+* Mon Mar 30 2009 Stepan Kasal <skasal at redhat.com> - 0.2.0-1
+- new upstream version (#237421)
+
+* Thu Feb 26 2009 Fedora Release Engineering <rel-eng at lists.fedoraproject.org> - 0.1.2-4
+- Rebuilt for https://fedoraproject.org/wiki/Fedora_11_Mass_Rebuild
+
 * Fri Mar 07 2008 Daniel P. Berrange <berrange at redhat.com> - 0.1.2-3
 - Fix calls to free() in XS binding
 


Index: sources
===================================================================
RCS file: /cvs/extras/rpms/perl-Sys-Virt/F-9/sources,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- sources	6 Mar 2008 16:11:54 -0000	1.3
+++ sources	30 Mar 2009 15:20:18 -0000	1.4
@@ -1 +1 @@
-9df07b687585672ed699949b45096e9b  Sys-Virt-0.1.2.tar.gz
+c8968a476c9130521b317f9f729a22d9  Sys-Virt-0.2.0.tar.gz


--- perl-Sys-Virt-0.1.2-free.patch DELETED ---




More information about the Fedora-perl-devel-list mailing list