X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=perl%2FGuestfs.xs;h=66eeb29494ebe6dce27c774854663ccd3ca613ee;hp=ff7ca9e1abc14582b97498e0eeec05d65f77c413;hb=3e408f493496597dc026d20778837f421f05a9dd;hpb=5cd39c83e23eb300d1bdfa806902a31b409ff420 diff --git a/perl/Guestfs.xs b/perl/Guestfs.xs index ff7ca9e..66eeb29 100644 --- a/perl/Guestfs.xs +++ b/perl/Guestfs.xs @@ -1870,3 +1870,80 @@ PREINIT: OUTPUT: RETVAL +void +vg_activate_all (g, activate) + guestfs_h *g; + int activate; +PREINIT: + int r; + PPCODE: + r = guestfs_vg_activate_all (g, activate); + if (r == -1) + croak ("vg_activate_all: %s", guestfs_last_error (g)); + +void +vg_activate (g, activate, volgroups) + guestfs_h *g; + int activate; + char **volgroups; +PREINIT: + int r; + PPCODE: + r = guestfs_vg_activate (g, activate, volgroups); + free (volgroups); + if (r == -1) + croak ("vg_activate: %s", guestfs_last_error (g)); + +void +lvresize (g, device, mbytes) + guestfs_h *g; + char *device; + int mbytes; +PREINIT: + int r; + PPCODE: + r = guestfs_lvresize (g, device, mbytes); + if (r == -1) + croak ("lvresize: %s", guestfs_last_error (g)); + +void +resize2fs (g, device) + guestfs_h *g; + char *device; +PREINIT: + int r; + PPCODE: + r = guestfs_resize2fs (g, device); + if (r == -1) + croak ("resize2fs: %s", guestfs_last_error (g)); + +void +find (g, directory) + guestfs_h *g; + char *directory; +PREINIT: + char **names; + int i, n; + PPCODE: + names = guestfs_find (g, directory); + if (names == NULL) + croak ("find: %s", guestfs_last_error (g)); + for (n = 0; names[n] != NULL; ++n) /**/; + EXTEND (SP, n); + for (i = 0; i < n; ++i) { + PUSHs (sv_2mortal (newSVpv (names[i], 0))); + free (names[i]); + } + free (names); + +void +e2fsck_f (g, device) + guestfs_h *g; + char *device; +PREINIT: + int r; + PPCODE: + r = guestfs_e2fsck_f (g, device); + if (r == -1) + croak ("e2fsck_f: %s", guestfs_last_error (g)); +