search for: string_of_arch

...sprintf "%s/Server/optional/source/SRPMS" topurl) | 7, (X86_64|PPC64|PPC64le|S390X) -> let topurl = @@ -1246,7 +1247,8 @@ and make_rhel_yum_conf major minor arch = major major minor in sprintf "%s/Server/%s/os" topurl (string_of_arch arch), sprintf "%s/Server/source/tree" topurl, - Some (sprintf "%s/Server-optional/%s/os" topurl (string_of_arch arch), + Some ("Optional", + sprintf "%s/Server-optional/%s/os" topurl (string_of_arch arch),...

...ilder.ml +++ b/builder/builder.ml @@ -94,7 +94,7 @@ let selected_cli_item cmdline index = let item = try List.find ( fun (name, { Index.arch = a }) -> - name = arg && cmdline.arch = normalize_arch a + name = arg && cmdline.arch = normalize_arch (Index.string_of_arch a) ) index with Not_found -> error (f_"cannot find os-version ‘%s’ with architecture ‘%s’.\nUse --list to list available guest types.") @@ -252,7 +252,7 @@ let main () = List.iter ( fun (name, { Index.revision; file_uri; proxy }) -&g...

I was attempting one way to solve: https://bugzilla.redhat.com/show_bug.cgi?id=1400332 "RFE: virt-builder should support templates with encrypted filesystems" However this approach doesn't really work because templates containing encrypted partitions cannot be compressed, and therefore the guest template would be a multi-gigabyte download. I better approach will likely be to use

...tml Pino ^ x 2 ? > + if res <> 0 then > + error (f_"‘xz’ command failed"); > + outimg > + > +let get_mime_type filepath = > + let file_cmd = "file --mime-type --brief " ^ (quote filepath) in Don't need parens. > +let cmp a b = > + let string_of_arch = function Index.Arch s -> s | Index.GuessedArch s -> s in > + (string_of_arch a) = (string_of_arch b) You don't need parens here. If you define Index.string_of_arch in the earlier then you can remove the definition of string_of_arch here as well. > + > +let has_entry id arch...

Hi there! Here is the latest version of the series including Richard's comments. I also reworked the repository_main.ml code to avoid setting an empty entry if not found. Cédric Bosdonnat (3): builder: change arch type to distinguish guesses builder: add a template parameter to get_index New tool: virt-builder-repository .gitignore | 4 +

Hey there, Here is an update of the series. The changes: * Incorporate Richard's comments. Left out the with_openfile one since that leads to a double close. * Change the ask option return type to string (removing the option) since if the use doesn't input anything we're using the default, and the default is now a mandatory parameter. * Make sure there are items in the

...; distro major - | "sles" -> - sprintf "%s%dsp%d" distro major minor - | "ubuntu" -> - sprintf "%s%d.%02d" distro major minor - | _ (* Any other combination. *) -> - sprintf "%s%d.%d" distro major minor - let cmp a b = Index.string_of_arch a = Index.string_of_arch b @@ -260,14 +243,10 @@ let process_image acc_entries filename repo tmprepo index interactive let root = Array.get roots 0 in let inspected_arch = g#inspect_get_arch root in let product = g#inspect_get_product_name root in - let distro = g#inspect_get_di...

Try to guess the possible osinfo-db short ID for the specified OS. Related to: https://bugzilla.redhat.com/show_bug.cgi?id=1544842 --- generator/actions_inspection.ml | 14 ++++++++ lib/Makefile.am | 1 + lib/inspect-osinfo.c | 75 +++++++++++++++++++++++++++++++++++++++++ 3 files changed, 90 insertions(+) create mode 100644 lib/inspect-osinfo.c diff --git

...;aarch64" -> Aarch64 + | "armv7l" -> Armv7 + | "i686" -> I686 + | "ppc64" -> PPC64 + | "ppc64le" -> PPC64le + | "s390x" -> S390X + | _ -> + eprintf "%s: unknown or unsupported arch\n" prog; exit 1 + +and string_of_arch = function + | X86_64 -> "x86_64" + | Aarch64 -> "aarch64" + | Armv7 -> "armv7l" + | I686 -> "i686" + | PPC64 -> "ppc64" + | PPC64le -> "ppc64le" + | S390X -> "s390x" + +and filename_of_os os arch ext...

...ot; distro major + | "sles" -> + sprintf "%s%dsp%d" distro major minor + | "ubuntu" -> + sprintf "%s%d.%02d" distro major minor + | _ (* Any other combination. *) -> + sprintf "%s%d.%d" distro major minor + +let cmp a b = + let string_of_arch = function Index.Arch s -> s | Index.GuessedArch s -> s in + (string_of_arch a) = (string_of_arch b) + +let has_entry id arch index = + List.exists ( + fun (item_id, { Index.arch = item_arch }) -> + item_id = id && (cmp item_arch arch) + ) index + +let process_image acc_...

...dex_fragment ^ ".new") in > + let fpf fs = fprintf chan fs in > + > + fpf "[%s]\n" (string_of_os_noarch os); > + fpf "name=%s\n" (long_name_of_os os arch); > + fpf "osinfo=%s\n" (true_os_variant_of_os os); > + fpf "arch=%s\n" (string_of_arch arch); > + fpf "file=%s\n" output; > + (match revision with > + | None -> () > + | Some i -> fpf "revision=%d\n" i > + ); > + fpf "checksum[sha512]=%s\n" (sha512sum_of_file output); > + fpf "format=raw\n"; > + fpf &quot...

Hi, this series improves the generation of Debian templates, automating basically almost all the steps needed. Also, it fixes the generation of aarch64 images with NVRAM, which is currently removed too soon, and thus not saved and compressed. Thanks, Pino Toscano (5): builder: templates: update Debian preseed from Stretch builder: templates: generalize debian location builder: templates:

An evolution of: https://www.redhat.com/archives/libguestfs/2018-August/msg00155.html