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 # erlang is disabled because it is broken in Rawhide:
  33 # https://bugzilla.redhat.com/show_bug.cgi?id=1316206
  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   --disable-erlang \\
  43   -C \\
  44   \"$@\"
  45 " configure
  46
  47 let libguestfs_localenv supermin =
  48   "\
  49 # Use the real virt-builder configuration from /etc.
  50 export XDG_CONFIG_DIRS=/etc
  51
  52 # Fails under valgrind because of a leak in the fuse library,
  53 # although I could not work out exactly why.
  54 export SKIP_TEST_PARALLEL_MOUNT_LOCAL=1
  55
  56 # Fails under valgrind because cpio subprocess has a memory leak.
  57 export SKIP_TEST_FILE_ARCHITECTURE_11=1
  58 export SKIP_TEST_FILE_ARCHITECTURE_15=1
  59
  60 # Fails under valgrind because xzcat subprocess has a memory leak.
  61 export SKIP_TEST_FILE_ARCHITECTURE_17=1
  62
  63 # This test fails because we build the ISO after encoding the checksum
  64 # of the ISO in the test itself.  Need to fix the test to work out the
  65 # checksum at runtime.
  66 export SKIP_TEST_CHECKSUM_DEVICE=1
  67
  68 # Disable parallel virt-alignment-scan & virt-df tests (RHBZ#1025942).
  69 export SKIP_TEST_VIRT_ALIGNMENT_SCAN_GUESTS_SH=1
  70 export SKIP_TEST_VIRT_DF_GUESTS_SH=1
  71
  72 # fusermount behaviour seems to have broken the test (RHBZ#1220751).
  73 export SKIP_TEST_FUSE_UMOUNT_RACE_SH=1
  74 export SKIP_TEST_GUESTMOUNT_FD=1
  75
  76 # xfs_admin has no effect in Rawhide (RHBZ#1233220).
  77 export SKIP_TEST_XFS_ADMIN=1
  78 export SKIP_TEST_XFS_MISC_PL=1
  79
  80 # syslinux broken by mtools (RHBZ#1275087).
  81 export SKIP_TEST_SYSLINUX_PL=1
  82
  83 # See https://www.redhat.com/archives/libguestfs/2015-November/msg00144.html
  84 export SKIP_TEST_INOTIFY_ADD_WATCH=1
  85
  86 # libguestfs: error: mkfs_btrfs: /dev/sda1: not enough free space
  87 # (RHBZ#1291715).
  88 export SKIP_TEST_BTRFS_IMAGE_0=1
  89
  90 # Yawn, btrfs broken again. RHBZ#1372037
  91 export SKIP_TEST_BTRFS_DEVICES_SH=1
  92 " ^
  93     match supermin with
  94     | None -> ""
  95     | Some (supermin, supermin_helper) ->
  96       sprintf "\
  97 # Needs a modified path to supermin binaries:
  98 export SUPERMIN=%s
  99 export SUPERMIN_HELPER=%s
 100
 101 " supermin supermin_helper