From 937e82cb7d82dbdbd287d82f4708f15d6032eb9f Mon Sep 17 00:00:00 2001
From: Luca Boccassi <bluca@debian.org>
Date: Sat, 17 Jun 2023 00:07:32 +0100
Subject: [PATCH] TEST-55-OOMD: use 'stress' to create high pressure

The test fails on my machine, running Debian stable, because
testsuite-55-testbloat.service just swaps and never goes over the
limit, so it's not killed. Use 'stress' instead which seems to be
able to overwhelm the swap too.
---
 test/TEST-55-OOMD/test.sh                 |  2 ++
 test/units/testsuite-55-slowgrowth.sh     | 40 -----------------------
 test/units/testsuite-55-testbloat.service |  6 ++--
 test/units/testsuite-55-testmunch.service |  4 +--
 test/units/testsuite-55.sh                |  3 ++
 5 files changed, 10 insertions(+), 45 deletions(-)
 delete mode 100755 test/units/testsuite-55-slowgrowth.sh

diff --git a/test/TEST-55-OOMD/test.sh b/test/TEST-55-OOMD/test.sh
index c6dc92c050f..723e80d1158 100755
--- a/test/TEST-55-OOMD/test.sh
+++ b/test/TEST-55-OOMD/test.sh
@@ -14,6 +14,8 @@ test_append_files() {
         mkswap "${LOOPDEV:?}p2"
         image_install swapon swapoff
 
+        inst_binary stress
+
         cat >>"${initdir:?}/etc/fstab" <<EOF
 UUID=$(blkid -o value -s UUID "${LOOPDEV}p2")    none    swap    defaults 0 0
 EOF
diff --git a/test/units/testsuite-55-slowgrowth.sh b/test/units/testsuite-55-slowgrowth.sh
deleted file mode 100755
index df1ea483fb2..00000000000
--- a/test/units/testsuite-55-slowgrowth.sh
+++ /dev/null
@@ -1,40 +0,0 @@
-#!/usr/bin/env bash
-# SPDX-License-Identifier: LGPL-2.1-or-later
-# Don't use set -x here, since it generates a lot of output and slows
-# the script down, causing unexpected test fails.
-set -eu
-set -o pipefail
-
-PAGE_SIZE=$(getconf PAGE_SIZE)
-BLOAT_ITERATION_TARGET=$((100 << 20)) # 100 MB
-BLOAT_HOLDER=()
-PID="$$"
-
-function bloat {
-        local set_size mem_usage target_mem_size
-
-        set_size=$(cut -d " " -f2 "/proc/$PID/statm")
-        mem_usage=$((set_size * PAGE_SIZE))
-        target_mem_size=$((mem_usage + $1))
-
-        BLOAT_HOLDER=()
-        while [[ "$mem_usage" -lt "$target_mem_size" ]]; do
-                echo "target $target_mem_size"
-                echo "mem usage $mem_usage"
-                BLOAT_HOLDER+=("$(printf "=%0.s" {1..1000000})")
-                set_size=$(cut -d " " -f2 "/proc/$PID/statm")
-                mem_usage=$((set_size * PAGE_SIZE))
-        done
-}
-
-function run {
-        local arr=()
-
-        while :; do
-                bloat "$BLOAT_ITERATION_TARGET"
-                arr+=("${BLOAT_HOLDER[@]}")
-                sleep 1
-        done
-}
-
-run
diff --git a/test/units/testsuite-55-testbloat.service b/test/units/testsuite-55-testbloat.service
index 8ec535979df..6c8e3c93aca 100644
--- a/test/units/testsuite-55-testbloat.service
+++ b/test/units/testsuite-55-testbloat.service
@@ -3,8 +3,8 @@
 Description=Create a lot of memory pressure
 
 [Service]
-# A VERY small memory.high will cause the script (trying to use a lot of memory)
+# A VERY small memory.high will cause the 'stress' (trying to use a lot of memory)
 # to throttle and be put under heavy pressure.
-MemoryHigh=5M
+MemoryHigh=3M
 Slice=testsuite-55-workload.slice
-ExecStart=/usr/lib/systemd/tests/testdata/units/testsuite-55-slowgrowth.sh
+ExecStart=stress --timeout 3m --vm 10 --vm-bytes 200M --vm-keep --vm-stride 1
diff --git a/test/units/testsuite-55-testmunch.service b/test/units/testsuite-55-testmunch.service
index 8820dc06782..37300597979 100644
--- a/test/units/testsuite-55-testmunch.service
+++ b/test/units/testsuite-55-testmunch.service
@@ -3,6 +3,6 @@
 Description=Create some memory pressure
 
 [Service]
-MemoryHigh=6M
+MemoryHigh=12M
 Slice=testsuite-55-workload.slice
-ExecStart=/usr/lib/systemd/tests/testdata/units/testsuite-55-slowgrowth.sh
+ExecStart=stress --timeout 3m --vm 10 --vm-bytes 200M --vm-keep --vm-stride 1
diff --git a/test/units/testsuite-55.sh b/test/units/testsuite-55.sh
index 1433e79c5b9..85ebb76732e 100755
--- a/test/units/testsuite-55.sh
+++ b/test/units/testsuite-55.sh
@@ -89,6 +89,7 @@ while [[ $(date -u +%s) -le $timeout ]]; do
     if ! systemctl status testsuite-55-testbloat.service; then
         break
     fi
+    oomctl
     sleep 2
 done
 
@@ -126,6 +127,7 @@ while [[ $(date -u +%s) -le $timeout ]]; do
     if ! systemctl --machine "testuser@.host" --user status testsuite-55-testbloat.service; then
         break
     fi
+    oomctl
     sleep 2
 done
 
@@ -153,6 +155,7 @@ EOF
         if ! systemctl status testsuite-55-testmunch.service; then
             break
         fi
+        oomctl
         sleep 2
     done
 
-- 
2.47.3