X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=perl%2FGuestfs.xs;h=7d9b3dfd2441e707ab4016f8fa9e325012330849;hb=feb188d27787c595f12507ce5bff5431c4932523;hp=93abd9ec0612005df49f98f7e8f658e2159d0ca9;hpb=ad5abc8d367c9c410051062cae066b1b141b4c76;p=libguestfs.git diff --git a/perl/Guestfs.xs b/perl/Guestfs.xs index 93abd9e..7d9b3df 100644 --- a/perl/Guestfs.xs +++ b/perl/Guestfs.xs @@ -239,6 +239,91 @@ PREINIT: OUTPUT: RETVAL +SV * +is_ready (g) + guestfs_h *g; +PREINIT: + int ready; + CODE: + ready = guestfs_is_ready (g); + if (ready == -1) + croak ("is_ready: %s", guestfs_last_error (g)); + RETVAL = newSViv (ready); + OUTPUT: + RETVAL + +SV * +is_config (g) + guestfs_h *g; +PREINIT: + int config; + CODE: + config = guestfs_is_config (g); + if (config == -1) + croak ("is_config: %s", guestfs_last_error (g)); + RETVAL = newSViv (config); + OUTPUT: + RETVAL + +SV * +is_launching (g) + guestfs_h *g; +PREINIT: + int launching; + CODE: + launching = guestfs_is_launching (g); + if (launching == -1) + croak ("is_launching: %s", guestfs_last_error (g)); + RETVAL = newSViv (launching); + OUTPUT: + RETVAL + +SV * +is_busy (g) + guestfs_h *g; +PREINIT: + int busy; + CODE: + busy = guestfs_is_busy (g); + if (busy == -1) + croak ("is_busy: %s", guestfs_last_error (g)); + RETVAL = newSViv (busy); + OUTPUT: + RETVAL + +SV * +get_state (g) + guestfs_h *g; +PREINIT: + int state; + CODE: + state = guestfs_get_state (g); + if (state == -1) + croak ("get_state: %s", guestfs_last_error (g)); + RETVAL = newSViv (state); + OUTPUT: + RETVAL + +void +set_busy (g) + guestfs_h *g; +PREINIT: + int r; + PPCODE: + r = guestfs_set_busy (g); + if (r == -1) + croak ("set_busy: %s", guestfs_last_error (g)); + +void +set_ready (g) + guestfs_h *g; +PREINIT: + int r; + PPCODE: + r = guestfs_set_ready (g); + if (r == -1) + croak ("set_ready: %s", guestfs_last_error (g)); + void mount (g, device, mountpoint) guestfs_h *g; @@ -1106,3 +1191,169 @@ PREINIT: } free (superblock); +void +blockdev_setro (g, device) + guestfs_h *g; + char *device; +PREINIT: + int r; + PPCODE: + r = guestfs_blockdev_setro (g, device); + if (r == -1) + croak ("blockdev_setro: %s", guestfs_last_error (g)); + +void +blockdev_setrw (g, device) + guestfs_h *g; + char *device; +PREINIT: + int r; + PPCODE: + r = guestfs_blockdev_setrw (g, device); + if (r == -1) + croak ("blockdev_setrw: %s", guestfs_last_error (g)); + +SV * +blockdev_getro (g, device) + guestfs_h *g; + char *device; +PREINIT: + int ro; + CODE: + ro = guestfs_blockdev_getro (g, device); + if (ro == -1) + croak ("blockdev_getro: %s", guestfs_last_error (g)); + RETVAL = newSViv (ro); + OUTPUT: + RETVAL + +SV * +blockdev_getss (g, device) + guestfs_h *g; + char *device; +PREINIT: + int sectorsize; + CODE: + sectorsize = guestfs_blockdev_getss (g, device); + if (sectorsize == -1) + croak ("blockdev_getss: %s", guestfs_last_error (g)); + RETVAL = newSViv (sectorsize); + OUTPUT: + RETVAL + +SV * +blockdev_getbsz (g, device) + guestfs_h *g; + char *device; +PREINIT: + int blocksize; + CODE: + blocksize = guestfs_blockdev_getbsz (g, device); + if (blocksize == -1) + croak ("blockdev_getbsz: %s", guestfs_last_error (g)); + RETVAL = newSViv (blocksize); + OUTPUT: + RETVAL + +void +blockdev_setbsz (g, device, blocksize) + guestfs_h *g; + char *device; + int blocksize; +PREINIT: + int r; + PPCODE: + r = guestfs_blockdev_setbsz (g, device, blocksize); + if (r == -1) + croak ("blockdev_setbsz: %s", guestfs_last_error (g)); + +SV * +blockdev_getsz (g, device) + guestfs_h *g; + char *device; +PREINIT: + int64_t sizeinsectors; + CODE: + sizeinsectors = guestfs_blockdev_getsz (g, device); + if (sizeinsectors == -1) + croak ("blockdev_getsz: %s", guestfs_last_error (g)); + RETVAL = my_newSVll (sizeinsectors); + OUTPUT: + RETVAL + +SV * +blockdev_getsize64 (g, device) + guestfs_h *g; + char *device; +PREINIT: + int64_t sizeinbytes; + CODE: + sizeinbytes = guestfs_blockdev_getsize64 (g, device); + if (sizeinbytes == -1) + croak ("blockdev_getsize64: %s", guestfs_last_error (g)); + RETVAL = my_newSVll (sizeinbytes); + OUTPUT: + RETVAL + +void +blockdev_flushbufs (g, device) + guestfs_h *g; + char *device; +PREINIT: + int r; + PPCODE: + r = guestfs_blockdev_flushbufs (g, device); + if (r == -1) + croak ("blockdev_flushbufs: %s", guestfs_last_error (g)); + +void +blockdev_rereadpt (g, device) + guestfs_h *g; + char *device; +PREINIT: + int r; + PPCODE: + r = guestfs_blockdev_rereadpt (g, device); + if (r == -1) + croak ("blockdev_rereadpt: %s", guestfs_last_error (g)); + +void +upload (g, filename, remotefilename) + guestfs_h *g; + char *filename; + char *remotefilename; +PREINIT: + int r; + PPCODE: + r = guestfs_upload (g, filename, remotefilename); + if (r == -1) + croak ("upload: %s", guestfs_last_error (g)); + +void +download (g, remotefilename, filename) + guestfs_h *g; + char *remotefilename; + char *filename; +PREINIT: + int r; + PPCODE: + r = guestfs_download (g, remotefilename, filename); + if (r == -1) + croak ("download: %s", guestfs_last_error (g)); + +SV * +checksum (g, csumtype, path) + guestfs_h *g; + char *csumtype; + char *path; +PREINIT: + char *checksum; + CODE: + checksum = guestfs_checksum (g, csumtype, path); + if (checksum == NULL) + croak ("checksum: %s", guestfs_last_error (g)); + RETVAL = newSVpv (checksum, 0); + free (checksum); + OUTPUT: + RETVAL +