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 libguestfs_website_repo =
  21   sprintf "%s/d/websites/libguestfs" (Sys.getenv "HOME")
  22
  23 let libguestfs_localconfigure source =
  24   let configure =
  25     match source with
  26       `Git -> "./autogen.sh"
  27     | `Tarball -> "./configure" in
  28   sprintf "\
  29 #!/bin/bash -
  30 . localenv
  31
  32 # NB: --enable-valgrind-daemon is disabled because we
  33 # should be checking production builds.
  34
  35 %s \\
  36   --prefix /usr \\
  37   --disable-static \\
  38   --with-default-backend=libvirt \\
  39   --enable-werror \\
  40   --enable-gtk-doc \\
  41   --disable-golang \\
  42   -C \\
  43   \"$@\"
  44 " configure
  45
  46 let libguestfs_localenv supermin =
  47   "\
  48 # Fails under valgrind because of a leak in the fuse library,
  49 # although I could not work out exactly why.
  50 export SKIP_TEST_PARALLEL_MOUNT_LOCAL=1
  51
  52 # Fails under valgrind because cpio subprocess has a memory leak.
  53 export SKIP_TEST_FILE_ARCHITECTURE_11=1
  54 export SKIP_TEST_FILE_ARCHITECTURE_15=1
  55
  56 # Fails under valgrind because xzcat subprocess has a memory leak.
  57 export SKIP_TEST_FILE_ARCHITECTURE_17=1
  58
  59 # This test fails because we build the ISO after encoding the checksum
  60 # of the ISO in the test itself.  Need to fix the test to work out the
  61 # checksum at runtime.
  62 export SKIP_TEST_CHECKSUM_DEVICE=1
  63
  64 # Disable parallel virt-alignment-scan & virt-df tests (RHBZ#1025942).
  65 export SKIP_TEST_VIRT_ALIGNMENT_SCAN_GUESTS_SH=1
  66 export SKIP_TEST_VIRT_DF_GUESTS_SH=1
  67
  68 # fusermount behaviour seems to have broken the test (RHBZ#1220751).
  69 export SKIP_TEST_FUSE_UMOUNT_RACE_SH=1
  70 export SKIP_TEST_GUESTMOUNT_FD=1
  71
  72 # xfs_admin has no effect in Rawhide (RHBZ#1233220).
  73 export SKIP_TEST_XFS_ADMIN=1
  74 export SKIP_TEST_XFS_MISC_PL=1
  75
  76 # syslinux broken by mtools (RHBZ#1275087).
  77 export SKIP_TEST_SYSLINUX_PL=1
  78
  79 # See https://www.redhat.com/archives/libguestfs/2015-November/msg00144.html
  80 export SKIP_TEST_INOTIFY_ADD_WATCH=1
  81
  82 # libguestfs: error: mkfs_btrfs: /dev/sda1: not enough free space
  83 # (RHBZ#1291715).
  84 export SKIP_TEST_BTRFS_IMAGE_0=1
  85 " ^
  86     match supermin with
  87     | None -> ""
  88     | Some (supermin, supermin_helper) ->
  89       sprintf "\
  90 # Needs a modified path to supermin binaries:
  91 export SUPERMIN=%s
  92 export SUPERMIN_HELPER=%s
  93
  94 " supermin supermin_helper