config.ml

   1 (* This contains lots of configuration specifics which are
   2  * unlikely to be useful unless you are me ...
   3  *)
   4
   5 open Goaljobs
   6 open Printf
   7
   8 (* General. *)
   9 let buildtmp = sprintf "%s/tmp/builds" (Sys.getenv "HOME")
  10
  11 (* Fedora *)
  12 let fedora_dir = Sys.getenv "HOME" // "d/fedora"
  13 let fedora_repo pkg branch = fedora_dir // pkg // branch
  14 let fedora_specfile pkg branch =
  15   sprintf "%s/%s.spec" (fedora_repo pkg branch) pkg
  16
  17 (* libguestfs *)
  18 let libguestfs_query_mins = 60
  19
  20 let websites_repo =
  21   sprintf "%s/d/websites" (Sys.getenv "HOME")
  22 let libguestfs_website_repo =
  23   sprintf "%s/libguestfs" websites_repo
  24 let libguestfs_builder_repo =
  25   sprintf "%s/libguestfs-builder" websites_repo
  26 let libguestfs_download_repo =
  27   sprintf "%s/libguestfs-download" websites_repo
  28
  29 let libguestfs_localconfigure source =
  30   let configure =
  31     match source with
  32       `Git -> "./autogen.sh"
  33     | `Tarball -> "./configure" in
  34   sprintf "\
  35 #!/bin/bash -
  36 . localenv
  37
  38 # erlang is disabled because it is broken in Rawhide:
  39 # https://bugzilla.redhat.com/show_bug.cgi?id=1316206
  40
  41 %s \\
  42   --prefix /usr \\
  43   --disable-static \\
  44   --with-default-backend=libvirt \\
  45   --enable-gtk-doc \\
  46   --disable-golang \\
  47   --disable-erlang \\
  48   -C \\
  49   \"$@\"
  50 " configure
  51
  52 let libguestfs_localenv supermin =
  53   "\
  54 # Use the real virt-builder configuration from /etc.
  55 export XDG_CONFIG_DIRS=/etc
  56
  57 # Fails under valgrind because of a leak in the fuse library,
  58 # although I could not work out exactly why.
  59 export SKIP_TEST_PARALLEL_MOUNT_LOCAL=1
  60
  61 # Fails under valgrind because cpio subprocess has a memory leak.
  62 export SKIP_TEST_FILE_ARCHITECTURE_11=1
  63 export SKIP_TEST_FILE_ARCHITECTURE_15=1
  64
  65 # Fails under valgrind because xzcat subprocess has a memory leak.
  66 export SKIP_TEST_FILE_ARCHITECTURE_17=1
  67
  68 # This test fails because we build the ISO after encoding the checksum
  69 # of the ISO in the test itself.  Need to fix the test to work out the
  70 # checksum at runtime.
  71 export SKIP_TEST_CHECKSUM_DEVICE=1
  72
  73 # Disable parallel virt-alignment-scan & virt-df tests (RHBZ#1025942).
  74 export SKIP_TEST_VIRT_ALIGNMENT_SCAN_GUESTS_SH=1
  75 export SKIP_TEST_VIRT_DF_GUESTS_SH=1
  76
  77 # fusermount behaviour seems to have broken the test (RHBZ#1220751).
  78 export SKIP_TEST_FUSE_UMOUNT_RACE_SH=1
  79 export SKIP_TEST_GUESTMOUNT_FD=1
  80
  81 # xfs_admin has no effect in Rawhide (RHBZ#1233220).
  82 export SKIP_TEST_XFS_ADMIN=1
  83 export SKIP_TEST_XFS_MISC_PL=1
  84
  85 # syslinux broken by mtools (RHBZ#1275087).
  86 export SKIP_TEST_SYSLINUX_PL=1
  87
  88 # See https://www.redhat.com/archives/libguestfs/2015-November/msg00144.html
  89 export SKIP_TEST_INOTIFY_ADD_WATCH=1
  90
  91 # libguestfs: error: mkfs_btrfs: /dev/sda1: not enough free space
  92 # (RHBZ#1291715).
  93 export SKIP_TEST_BTRFS_IMAGE_0=1
  94
  95 # Yawn, btrfs broken again. RHBZ#1372037
  96 export SKIP_TEST_BTRFS_DEVICES_SH=1
  97
  98 # Kernel takes lots of RAM for virtio-scsi RHBZ#1478201
  99 export SKIP_TEST_255_DISKS_SH=1
 100 export SKIP_TEST_ADD_LOTS_OF_DISKS_SH=1
 101
 102 # virtio-9p modules don't all get loaded RHBZ#1499896
 103 export SKIP_TEST_9P_SH=1
 104
 105 # These tests are broken by libvirt not supporting qemu >= 2.10 locking.
 106 # REMOVE THIS when fixed.
 107 export SKIP_TEST820RHBZ912499_PY=1
 108
 109 # ntfsclone is broken in Rawhide (RHBZ#1601146).
 110 export SKIP_TEST_NTFSCLONE_SH=1
 111
 112 # Kernel broken.
 113 # https://bugzilla.redhat.com/show_bug.cgi?id=1657200
 114 export SKIP_TEST_BIG_DIRS_PL=1
 115
 116 # Setting hostname on Ubuntu 18.04 is broken.
 117 # https://bugzilla.redhat.com/show_bug.cgi?id=1658307
 118 export SKIP_TEST_SETTINGS_UBUNTU_18_04_SH=1
 119 " ^
 120     match supermin with
 121     | None -> ""
 122     | Some (supermin, supermin_helper) ->
 123       sprintf "\
 124 # Needs a modified path to supermin binaries:
 125 export SUPERMIN=%s
 126 export SUPERMIN_HELPER=%s
 127
 128 " supermin supermin_helper