Displaying 20 results from an estimated 114 matches for "inspect_get_type".
2016 Feb 03
0
Re: [PATCH 1/3] sysprep, get-kernel: explicit the Guestfs parameter
...ration_abrt_data.ml
> +++ b/sysprep/sysprep_operation_abrt_data.ml
> @@ -21,7 +21,7 @@ open Common_gettext.Gettext
>
> module G = Guestfs
>
> -let abrt_data_perform g root side_effects =
> +let abrt_data_perform (g : Guestfs.guestfs) root side_effects =
> let typ = g#inspect_get_type root in
> if typ <> "windows" then (
> let paths = g#glob_expand "/var/spool/abrt/*" in
> diff --git a/sysprep/sysprep_operation_bash_history.ml b/sysprep/sysprep_operation_bash_history.ml
> index 67eb4e3..5ddd515 100644
> --- a/sysprep/sysprep_opera...
2016 Feb 03
6
[PATCH 1/3] sysprep, get-kernel: explicit the Guestfs parameter
...0d94271 100644
--- a/sysprep/sysprep_operation_abrt_data.ml
+++ b/sysprep/sysprep_operation_abrt_data.ml
@@ -21,7 +21,7 @@ open Common_gettext.Gettext
module G = Guestfs
-let abrt_data_perform g root side_effects =
+let abrt_data_perform (g : Guestfs.guestfs) root side_effects =
let typ = g#inspect_get_type root in
if typ <> "windows" then (
let paths = g#glob_expand "/var/spool/abrt/*" in
diff --git a/sysprep/sysprep_operation_bash_history.ml b/sysprep/sysprep_operation_bash_history.ml
index 67eb4e3..5ddd515 100644
--- a/sysprep/sysprep_operation_bash_history.ml
+++...
2014 Jan 21
1
[PATCH 1/2] sysprep: Update comments.
---
sysprep/sysprep_operation.mli | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/sysprep/sysprep_operation.mli b/sysprep/sysprep_operation.mli
index 61dde72..eb89db4 100644
--- a/sysprep/sysprep_operation.mli
+++ b/sysprep/sysprep_operation.mli
@@ -16,14 +16,16 @@
* 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
*)
-(** Structure used to describe sysprep
2012 Apr 06
2
[PATCH] virt-sysprep:add logging feature
...3e87cb..17bb65b 100644
--- a/sysprep/sysprep_operation_dhcp_client_state.ml
+++ b/sysprep/sysprep_operation_dhcp_client_state.ml
@@ -20,11 +20,16 @@ open Sysprep_operation
module G = Guestfs
-let dhcp_client_state_perform g root =
+let dhcp_client_state_perform g root show_log =
let typ = g#inspect_get_type root in
if typ = "linux" then (
List.iter (
- fun glob -> Array.iter g#rm_rf (g#glob_expand glob)
+ fun glob ->
+ Array.iter (
+ fun glob2 ->
+ g#rm_rf glob2
+ logging show_log "Deleted %s" glob2
+ ) (g#glob_expand gl...
2015 Jul 29
2
[PATCH 1/2] sysprep: machine_id: simplify implementation
...b 100644
--- a/sysprep/sysprep_operation_machine_id.ml
+++ b/sysprep/sysprep_operation_machine_id.ml
@@ -21,15 +21,12 @@ open Common_gettext.Gettext
module G = Guestfs
-let machine_id_perform g root side_effects =
+let machine_id_perform (g : Guestfs.guestfs) root side_effects =
let typ = g#inspect_get_type root in
if typ <> "windows" then (
- let path = "/etc/machine-id" in
- (try g#rm path with G.Error _ -> ());
- (try
- g#touch path;
- side_effects#created_file ()
- with G.Error _ -> ());
+ let paths = [ "/etc/machine-id"; ] i...
2011 Apr 26
1
[PATCH] Don't set distro for non-Linux guests
...ons(+), 1 deletions(-)
diff --git a/lib/Sys/VirtConvert/Converter.pm b/lib/Sys/VirtConvert/Converter.pm
index 28c57d5..6b9f8f9 100644
--- a/lib/Sys/VirtConvert/Converter.pm
+++ b/lib/Sys/VirtConvert/Converter.pm
@@ -102,7 +102,8 @@ sub convert
my %desc;
$desc{os} = $g->inspect_get_type($root);
- $desc{distro} = $g->inspect_get_distro($root);
+ $desc{distro} = $g->inspect_get_distro($root)
+ if $desc{os} eq 'linux';
$desc{product_name} = $g->inspect_get_product_name($root);
$desc{major_version} = $g->inspect_get...
2012 Jan 26
1
[PATCH] gobject: Add a TODO list
...(+), 0 deletions(-)
create mode 100644 gobject/TODO.txt
diff --git a/gobject/TODO.txt b/gobject/TODO.txt
new file mode 100644
index 0000000..7ac64da
--- /dev/null
+++ b/gobject/TODO.txt
@@ -0,0 +1,9 @@
+Tasks required before the GObject bindings can be considered complete:
+
+* Fix the problem of inspect_get_type
+* Build the gtkdoc and make it available to the developer
+* Bind the libguestfs events API
+
+Tasks which would improve the usability of the GObject bindings:
+
+* Implement _async versions of all apis
--
1.7.7.5
2013 Sep 06
7
[PATCH 1/5] sysprep: remove tmp files
...General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+ *)
+
+open Sysprep_operation
+open Common_gettext.Gettext
+
+module G = Guestfs
+
+let tmp_files_perform g root =
+ let typ = g#inspect_get_type root in
+ if typ <> "windows" then (
+ let paths = [ "/tmp/*";
+ "/var/tmp/*"; ] in
+ List.iter (
+ fun path ->
+ let files = g#glob_expand path in
+ Array.iter (
+ fun file ->
+ g#rm_rf file;
+...
2015 May 15
0
[PATCH 3/4] ocaml tools: Use global variables to store trace (-x) and verbose (-v) flags.
...0a79 100644
--- a/sysprep/sysprep_operation_abrt_data.ml
+++ b/sysprep/sysprep_operation_abrt_data.ml
@@ -21,7 +21,7 @@ open Common_gettext.Gettext
module G = Guestfs
-let abrt_data_perform ~verbose ~quiet g root side_effects =
+let abrt_data_perform ~quiet g root side_effects =
let typ = g#inspect_get_type root in
if typ <> "windows" then (
let paths = g#glob_expand "/var/spool/abrt/*" in
diff --git a/sysprep/sysprep_operation_bash_history.ml b/sysprep/sysprep_operation_bash_history.ml
index 01f9962..e88dc5c 100644
--- a/sysprep/sysprep_operation_bash_history.ml
+++...
2017 Mar 13
2
virt-customize fail to inject firstboot script when running it from script.
..."/dev/sda2" "/"
libguestfs: trace: mount = 0
libguestfs: trace: mount "/dev/sda1" "/boot"
libguestfs: trace: mount = 0
libguestfs: trace: inspect_get_arch "/dev/sda2"
libguestfs: trace: inspect_get_arch = "x86_64"
libguestfs: trace: inspect_get_type "/dev/sda2"
libguestfs: trace: inspect_get_type = "linux"
libguestfs: trace: is_dir "/tmp" "followsymlinks:true"
libguestfs: trace: is_dir = 1
libguestfs: trace: inspect_get_type "/dev/sda2"
libguestfs: trace: inspect_get_type = "linux&quo...
2012 May 09
2
[PATCH 1/2] sysprep: remove ca certificates in the guest
...Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+ *)
+
+open Sysprep_operation
+open Sysprep_gettext.Gettext
+
+module G = Guestfs
+
+let ca_certificates_perform g root =
+ let typ = g#inspect_get_type root in
+ if typ <> "windows" then (
+ let paths = [ "/etc/pki/CA/certs/*";
+ "/etc/pki/CA/crl/*";
+ "/etc/pki/CA/newcerts/*";
+ "/etc/pki/CA/private/*";
+ "/etc/pki/...
2019 Apr 24
4
[PATCH 0/3] Few minor changes for bindings
*** BLURB HERE ***
Pino Toscano (3):
python: modernize inspect_vm example
perl: silence usage of add_cdrom in test
python: silence usage of add_cdrom in test
perl/t/060-handle-properties.t | 7 +++++--
python/examples/inspect_vm.py | 26 ++++++++++++--------------
python/t/test050HandleProperties.py | 5 ++++-
3 files changed, 21 insertions(+), 17 deletions(-)
--
2.20.1
2017 Mar 14
0
Re: virt-customize fail to inject firstboot script when running it from script.
..."
> libguestfs: trace: mount = 0
> libguestfs: trace: mount "/dev/sda1" "/boot"
> libguestfs: trace: mount = 0
> libguestfs: trace: inspect_get_arch "/dev/sda2"
> libguestfs: trace: inspect_get_arch = "x86_64"
> libguestfs: trace: inspect_get_type "/dev/sda2"
> libguestfs: trace: inspect_get_type = "linux"
> libguestfs: trace: is_dir "/tmp" "followsymlinks:true"
> libguestfs: trace: is_dir = 1
> libguestfs: trace: inspect_get_type "/dev/sda2"
> libguestfs: trace: inspect_g...
2012 Apr 12
1
[PATCH] sysprep: remove the bash history of users
...eceived a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+ *)
+
+open Sysprep_operation
+
+module G = Guestfs
+
+let bash_history_perform g root =
+ let typ = g#inspect_get_type root in
+ if typ <> "windows" then (
+ let files = g#glob_expand "/home/*/.bash_history" in
+ Array.iter g#rm_rf files;
+ g#rm_rf "/root/.bash_history";
+ []
+ )
+ else []
+
+let bash_history_op = {
+ name = "bash-history";
+ pod_descri...
2015 May 15
5
[PATCH 0/4] Only tell people to use -v -x when reporting bugs if they're not using those flags.
.. and a lot of refactoring.
https://bugzilla.redhat.com/show_bug.cgi?id=1167623
Rich.
2015 May 15
6
[PATCH v2 0/4] Only tell people to use -v -x when reporting bugs if they're not using those flags.
https://bugzilla.redhat.com/show_bug.cgi?id=1167623
2012 May 18
1
[PATCH] sysprep: remove kerberos data in the guest
...program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+ *)
+
+open Sysprep_operation
+open Sysprep_gettext.Gettext
+
+module StringSet = Set.Make (String)
+module G = Guestfs
+
+let kerberos_data_perform g root =
+ let typ = g#inspect_get_type root in
+ if typ <> "windows" then (
+ let excepts = [ "/var/kerberos/krb5kdc/kadm5.acl";
+ "/var/kerberos/krb5kdc/kdc.conf"; ] in
+ let paths = Array.to_list (g#glob_expand "/var/kerberos/krb5kdc/*") in
+ let set = List.fol...
2012 May 25
1
[PATCH] sysprep: remove the data and log files of puppet
...Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+ *)
+
+open Sysprep_operation
+open Sysprep_gettext.Gettext
+
+module G = Guestfs
+
+let puppet_data_log_perform g root =
+ let typ = g#inspect_get_type root in
+ if typ <> "windows" then (
+ let paths = [ "/var/log/puppet/*";
+ "/var/lib/puppet/*/*";
+ "/var/lib/puppet/*/*/*" ] in
+ List.iter (
+ fun path ->
+ let files = g#glob_expand path in
+...
2012 Apr 23
2
[PATCH] sysprep: flag the system for reconfiguration
...eceived a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+ *)
+
+open Sysprep_operation
+
+module G = Guestfs
+
+let flag_reconfiguration g root =
+ let typ = g#inspect_get_type root in
+ if typ <> "windows" then (
+ g#touch "/.unconfigured";
+ [ `Created_files ]
+ )
+ else []
+
+let flag_reconfiguration_op = {
+ name = "flag-reconfiguration";
+ enabled_by_default = true;
+ heading = "Flag the system for reconfiguration&...
2017 Mar 14
2
Re: virt-customize fail to inject firstboot script when running it from script.
...bguestfs: trace: mount = 0
>> libguestfs: trace: mount "/dev/sda1" "/boot"
>> libguestfs: trace: mount = 0
>> libguestfs: trace: inspect_get_arch "/dev/sda2"
>> libguestfs: trace: inspect_get_arch = "x86_64"
>> libguestfs: trace: inspect_get_type "/dev/sda2"
>> libguestfs: trace: inspect_get_type = "linux"
>> libguestfs: trace: is_dir "/tmp" "followsymlinks:true"
>> libguestfs: trace: is_dir = 1
>> libguestfs: trace: inspect_get_type "/dev/sda2"
>> libguestfs: t...