// SPDX-License-Identifier: GPL-2.0
/*
* Test soft offline behavior for HugeTLB pages:
* - if enable_soft_offline = 0, hugepages should stay intact and soft
* offlining failed with EOPNOTSUPP.
* - if enable_soft_offline = 1, a hugepage should be dissolved and
* nr_hugepages/free_hugepages should be reduced by 1.
*
* Before running, make sure more than 2 hugepages of default_hugepagesz
* are allocated. For example, if /proc/meminfo/Hugepagesize is 2048kB:
* echo 8 > /sys/kernel/mm/hugepages/hugepages-2048kB/nr_hugepages
*/
#define _GNU_SOURCE
#include <errno.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <unistd.h>
#include <linux/magic.h>
#include <linux/memfd.h>
#include <sys/mman.h>
#include <sys/statfs.h>
#include <sys/types.h>
#include "../kselftest.h"
#ifndef MADV_SOFT_OFFLINE
#define MADV_SOFT_OFFLINE 101
#endif
#define EPREFIX " !!! "
static int do_soft_offline(int fd, size_t len, int expect_errno)
{
char *filemap = NULL;
char *hwp_addr = NULL;
const unsigned long pagesize = getpagesize();
int ret = 0;
if (ftruncate(fd, len) < 0) {
ksft_perror(EPREFIX "ftruncate to len failed");
return -1;
}
filemap = mmap(NULL, len, PROT_READ | PROT_WRITE,
MAP_SHARED | MAP_POPULATE, fd, 0);
if (filemap == MAP_FAILED) {
ksft_perror(EPREFIX "mmap failed");
ret = -1;
goto untruncate;
}
memset(filemap, 0xab, len);
ksft_print_msg("Allocated %#lx bytes of hugetlb pages\n", len);
hwp_addr = filemap + len / 2;
ret = madvise(hwp_addr, pagesize, MADV_SOFT_OFFLINE);
ksft_print_msg("MADV_SOFT_OFFLINE %p ret=%d, errno=%d\n",
hwp_addr, ret, errno);
if (ret != 0)
ksft_perror(EPREFIX "madvise failed");
if (errno == expect_errno)
ret = 0;
else {
ksft_print_msg("MADV_SOFT_OFFLINE should ret %d\n",
expect_errno);
ret = -1;
}
munmap(filemap, len);
untruncate:
if (ftruncate(fd, 0) < 0)
ksft_perror(EPREFIX "ftruncate back to 0 failed");
return ret;
}
static int set_enable_soft_offline(int value)
{
char cmd[256] = {0};
FILE *cmdfile = NULL;
if (value != 0 && value != 1)
return -EINVAL;
sprintf(cmd, "echo %d > /proc/sys/vm/enable_soft_offline", value);
cmdfile = popen(cmd, "r");
if (cmdfile)
ksft_print_msg("enable_soft_offline => %d\n", value);
else {
ksft_perror(EPREFIX "failed to set enable_soft_offline");
return errno;
}
pclose(cmdfile);
return 0;
}
static int read_nr_hugepages(unsigned long hugepage_size,
unsigned long *nr_hugepages)
{
char buffer[256] = {0};
char cmd[256] = {0};
sprintf(cmd, "cat /sys/kernel/mm/hugepages/hugepages-%ldkB/nr_hugepages",
hugepage_size);
FILE *cmdfile = popen(cmd, "r");
if (cmdfile == NULL) {
ksft_perror(EPREFIX "failed to popen nr_hugepages");
return -1;
}
if (!fgets(buffer, sizeof(buffer), cmdfile)) {
ksft_perror(EPREFIX "failed to read nr_hugepages");
pclose(cmdfile);
return -1;
}
*nr_hugepages = atoll(buffer);
pclose(cmdfile);
return 0;
}
static int create_hugetlbfs_file(struct statfs *file_stat)
{
int fd;
fd = memfd_create("hugetlb_tmp", MFD_HUGETLB);
if (fd < 0) {
ksft_perror(EPREFIX "could not open hugetlbfs file");
return -1;
}
memset(file_stat, 0, sizeof(*file_stat));
if (fstatfs(fd, file_stat)) {
ksft_perror(EPREFIX "fstatfs failed");
goto close;
}
if (file_stat->f_type != HUGETLBFS_MAGIC) {
ksft_print_msg(EPREFIX "not hugetlbfs file\n");
goto close;
}
return fd;
close:
close(fd);
return -1;
}
static void test_soft_offline_common(int enable_soft_offline)
{
int fd;
int expect_errno = enable_soft_offline ? 0 : EOPNOTSUPP;
struct statfs file_stat;
unsigned long hugepagesize_kb = 0;
unsigned long nr_hugepages_before = 0;
unsigned long nr_hugepages_after = 0;
int ret;
ksft_print_msg("Test soft-offline when enabled_soft_offline=%d\n",
enable_soft_offline);
fd = create_hugetlbfs_file(&file_stat);
if (fd < 0)
ksft_exit_fail_msg("Failed to create hugetlbfs file\n");
hugepagesize_kb = file_stat.f_bsize / 1024;
ksft_print_msg("Hugepagesize is %ldkB\n", hugepagesize_kb);
if (set_enable_soft_offline(enable_soft_offline) != 0) {
close(fd);
ksft_exit_fail_msg("Failed to set enable_soft_offline\n");
}
if (read_nr_hugepages(hugepagesize_kb, &nr_hugepages_before) != 0) {
close(fd);
ksft_exit_fail_msg("Failed to read nr_hugepages\n");
}
ksft_print_msg("Before MADV_SOFT_OFFLINE nr_hugepages=%ld\n",
nr_hugepages_before);
ret = do_soft_offline(fd, 2 * file_stat.f_bsize, expect_errno);
if (read_nr_hugepages(hugepagesize_kb, &nr_hugepages_after) != 0) {
close(fd);
ksft_exit_fail_msg("Failed to read nr_hugepages\n");
}
ksft_print_msg("After MADV_SOFT_OFFLINE nr_hugepages=%ld\n",
nr_hugepages_after);
// No need for the hugetlbfs file from now on.
close(fd);
if (enable_soft_offline) {
if (nr_hugepages_before != nr_hugepages_after + 1) {
ksft_test_result_fail("MADV_SOFT_OFFLINE should reduced 1 hugepage\n");
return;
}
} else {
if (nr_hugepages_before != nr_hugepages_after) {
ksft_test_result_fail("MADV_SOFT_OFFLINE reduced %lu hugepages\n",
nr_hugepages_before - nr_hugepages_after);
return;
}
}
ksft_test_result(ret == 0,
"Test soft-offline when enabled_soft_offline=%d\n",
enable_soft_offline);
}
int main(int argc, char **argv)
{
ksft_print_header();
ksft_set_plan(2);
test_soft_offline_common(1);
test_soft_offline_common(0);
ksft_finished();
}