X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=slave.mli;h=2b08e045031871d12d15355fbf8c5b97230cb70e;hb=02614e74adee2a5d499bd557a6adde99a3c56e73;hp=940de14a66c51c6c355d6bd64bfe2e583859e453;hpb=63477ec4c94146bae30af05022b5a064667949a8;p=guestfs-browser.git diff --git a/slave.mli b/slave.mli index 940de14..2b08e04 100644 --- a/slave.mli +++ b/slave.mli @@ -154,6 +154,31 @@ val read_directory : ?fail:exn callback -> source -> string -> direntry list cal If [fail] is passed, then failures cause this callback to be called. If not, the global failure hook is called. *) +val download_file : ?fail:exn callback -> source -> string -> string -> unit callback -> unit + (** [download_file src pathname localfile cb] downloads [pathname] + to the named local file, and then calls the callback function. *) + +type download_dir_tarball_format = Tar | TGZ | TXZ + +val download_dir_tarball : ?fail:exn callback -> source -> string -> download_dir_tarball_format -> string -> unit callback -> unit + (** [download_dir_tarball_format src pathname format localfile cb] + downloads directory [pathname] to the named local file (a + tarball), and then calls the callback function. + + [format] controls the download format, which is one of + uncompressed tar, gzip-compressed tar, or xz-compressed tar. *) + +val download_dir_find0 : ?fail:exn callback -> source -> string -> string -> unit callback -> unit + (** [download_dir_find0 src pathname localfile cb] downloads the + list of filenames of directory [pathname] to the named local + file (a ASCII NUL-separated text file), and then calls the + callback function. *) + +val disk_usage : ?fail:exn callback -> source -> string -> int64 callback -> unit + (** [disk_usage src pathname cb] calculates the disk usage of + directory [pathname] and calls the callback with the answer + (size of {b kilobytes}). *) + val discard_command_queue : unit -> unit (** [discard_command_queue ()] discards any commands on the command queue. @@ -198,6 +223,12 @@ val set_idle_hook : unit callback -> unit the slave thread stops working on a command {i and} has no more commands left in the queue to work on. *) +val set_status_hook : string callback -> unit + (** Set the function in the main thread which is called to + update the status bar. The slave thread updates the + status bar when an operation starts or stops, keeping the + user informed of what is happening. *) + val set_progress_hook : (int64 * int64) callback -> unit (** Set the function in the main thread which is called whenever the slave thread receives a progress notification message