[Libguestfs] [PATCH (incomplete)] Rewrite virt-sysprep in OCaml.

Wanlong Gao gaowanlong at cn.fujitsu.com
Sun Apr 1 14:31:44 UTC 2012

On 04/01/2012 02:25 AM, Richard W.M. Jones wrote:

> This patch is incomplete but it illustrates the idea.  virt-sysprep is
> rewritten as a modular tool in OCaml.
> Only the 'utmp' and 'hostname' operations are implemented at the
> moment.

ocamlfind ocamlopt -g -warn-error CDEFLMPSUVYZX -package unix -I ../src/.libs -I ../ocaml \
  mlguestfs.cmxa -linkpkg utils.cmx sysprep_operation.cmx sysprep_operation_cron_spool.cmx sysprep_operation_dhcp_client_state.cmx sysprep_operation_dhcp_server_state.cmx sysprep_operation_hostname.cmx sysprep_operation_logfiles.cmx sysprep_operation_mail_spool.cmx sysprep_operation_net_hwaddr.cmx sysprep_operation_random_seed.cmx sysprep_operation_rhn_systemid.cmx sysprep_operation_script.cmx sysprep_operation_smolt_uuid.cmx sysprep_operation_ssh_hostkeys.cmx sysprep_operation_udev_persistent_net.cmx sysprep_operation_utmp.cmx sysprep_operation_yum_uuid.cmx main.cmx -cclib -lncurses -o virt-sysprep
rm -f sysprep-extra-options.pod sysprep-extra-options.pod-t
./virt-sysprep --dump-pod-options > sysprep-extra-options.pod-t
./virt-sysprep: error while loading shared libraries: libguestfs.so.0: cannot open shared object file: No such file or directory
make[2]: *** [sysprep-extra-options.pod] Error 127

some thing wrong with this "-I ../src/.libs" ? I just can't complete compiling :(

Wanlong Gao

> Rich.

More information about the Libguestfs mailing list