[Libguestfs] [PATCH 7/8] perl: Add binding for guestfs_user_cancel.
Richard W.M. Jones
rjones at redhat.com
Fri Jul 15 14:24:32 UTC 2011
--
Richard Jones, Virtualization Group, Red Hat http://people.redhat.com/~rjones
virt-top is 'top' for virtual machines. Tiny program with many
powerful monitoring features, net stats, disk stats, logging, etc.
http://et.redhat.com/~rjones/virt-top
-------------- next part --------------
>From f4dadd0fcfe41b9cc6fcd6097c4c3cf509d69879 Mon Sep 17 00:00:00 2001
From: "Richard W.M. Jones" <rjones at redhat.com>
Date: Fri, 15 Jul 2011 14:47:09 +0100
Subject: [PATCH 7/8] perl: Add binding for guestfs_user_cancel.
---
generator/generator_perl.ml | 11 +++++++++++
1 files changed, 11 insertions(+), 0 deletions(-)
diff --git a/generator/generator_perl.ml b/generator/generator_perl.ml
index e2ec254..f42bc87 100644
--- a/generator/generator_perl.ml
+++ b/generator/generator_perl.ml
@@ -277,6 +277,12 @@ PREINIT:
OUTPUT:
RETVAL
+void
+user_cancel (g)
+ guestfs_h *g;
+ PPCODE:
+ guestfs_user_cancel (g);
+
";
List.iter (
@@ -776,6 +782,11 @@ errnos:
# mkdir failed because the directory exists already.
}
+=item $h->user_cancel ();
+
+Cancel current transfer. This is safe to call from Perl signal
+handlers and threads.
+
=cut
";
--
1.7.5.2
More information about the Libguestfs
mailing list