Add 'command' and 'command-lines'. Fix args freeing in Perl bindings.

[libguestfs.git] / src / guestfs_protocol.x

diff --git a/src/guestfs_protocol.x b/src/guestfs_protocol.x
index c547d0b..68362d6 100644 (file)
--- a/src/guestfs_protocol.x
+++ b/src/guestfs_protocol.x
@@ -328,6 +328,30 @@ struct guestfs_mounts_ret {
   str devices<>;
 };
 
+struct guestfs_file_args {
+  string path<>;
+};
+
+struct guestfs_file_ret {
+  string description<>;
+};
+
+struct guestfs_command_args {
+  str arguments<>;
+};
+
+struct guestfs_command_ret {
+  string output<>;
+};
+
+struct guestfs_command_lines_args {
+  str arguments<>;
+};
+
+struct guestfs_command_lines_ret {
+  str lines<>;
+};
+
 enum guestfs_procedure {
   GUESTFS_PROC_MOUNT = 1,
   GUESTFS_PROC_SYNC = 2,
@@ -377,6 +401,9 @@ enum guestfs_procedure {
   GUESTFS_PROC_MOUNTS = 46,
   GUESTFS_PROC_UMOUNT_ALL = 47,
   GUESTFS_PROC_LVM_REMOVE_ALL = 48,
+  GUESTFS_PROC_FILE = 49,
+  GUESTFS_PROC_COMMAND = 50,
+  GUESTFS_PROC_COMMAND_LINES = 51,
   GUESTFS_PROC_dummy
 };