blob: 0e34bc14f8f255af57779f4ce93938a4642d56b4 [file] [log] [blame]
/******************************************************************************/
/* Copyright (c) Crackerjack Project., 2007-2008 ,Hitachi, Ltd */
/* Author(s): Takahiro Yasui <takahiro.yasui.mp@hitachi.com>, */
/* Yumiko Sugita <yumiko.sugita.yf@hitachi.com>, */
/* Satoshi Fujiwara <sa-fuji@sdl.hitachi.co.jp> */
/* */
/* This program is free software; you can redistribute it and/or modify */
/* it under the terms of the GNU General Public License as published by */
/* the Free Software Foundation; either version 2 of the License, or */
/* (at your option) any later version. */
/* */
/* This program is distributed in the hope that it will be useful, */
/* but WITHOUT ANY WARRANTY; without even the implied warranty of */
/* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See */
/* the GNU General Public License for more details. */
/* */
/* You should have received a copy of the GNU General Public License */
/* along with this program; if not, write to the Free Software */
/* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
/* */
/******************************************************************************/
/******************************************************************************/
/* */
/* File: get_mempolicy01.c */
/* */
/* Description: This tests the get_mempolicy() syscall */
/* */
/* */
/* */
/* */
/* */
/* */
/* Usage: <for command-line> */
/* get_mempolicy01 [-c n] [-e][-i n] [-I x] [-p x] [-t] */
/* where, -c n : Run n copies concurrently. */
/* -e : Turn on errno logging. */
/* -i n : Execute test n times. */
/* -I x : Execute test for x seconds. */
/* -P x : Pause for x seconds between iterations. */
/* -t : Turn on syscall timing. */
/* */
/* Total Tests: 1 */
/* */
/* Test Name: get_mempolicy01 */
/* History: Porting from Crackerjack to LTP is done by */
/* Manas Kumar Nayak maknayak@in.ibm.com> */
/******************************************************************************/
#include <sys/syscall.h>
#include <sys/types.h>
#include <sys/mman.h>
#include <getopt.h>
#include <string.h>
#include <stdlib.h>
#include <errno.h>
#include <stdio.h>
#include <unistd.h>
#include <libgen.h>
#include "numaif.h"
#include "include_j_h.h"
#include "common_j_h.c"
/* Harness Specific Include Files. */
#include "test.h"
#include "usctest.h"
/* Extern Global Variables */
extern int Tst_count; /* counter for tst_xxx routines. */
extern char *TESTDIR; /* temporary dir created by tst_tmpdir() */
/* Global Variables */
char *TCID = "get_mempolicy01"; /* Test program identifier.*/
int testno;
int TST_TOTAL = 1; /* total number of tests in this file. */
/*
* Macros
*/
#define SYSCALL_NAME "get_mempolicy"
/* Extern Global Functions */
/******************************************************************************/
/* */
/* Function: cleanup */
/* */
/* Description: Performs all one time clean up for this test on successful */
/* completion, premature exit or failure. Closes all temporary */
/* files, removes all temporary directories exits the test with */
/* appropriate return code by calling tst_exit() function. */
/* */
/* Input: None. */
/* */
/* Output: None. */
/* */
/* Return: On failure - Exits calling tst_exit(). Non '0' return code. */
/* On success - Exits calling tst_exit(). With '0' return code. */
/* */
/******************************************************************************/
extern void cleanup() {
/* Remove tmp dir and all files in it */
TEST_CLEANUP;
tst_rmdir();
/* Exit with appropriate return code. */
tst_exit();
}
/* Local Functions */
/******************************************************************************/
/* */
/* Function: setup */
/* */
/* Description: Performs all one time setup for this test. This function is */
/* typically used to capture signals, create temporary dirs */
/* and temporary files that may be used in the course of this */
/* test. */
/* */
/* Input: None. */
/* */
/* Output: None. */
/* */
/* Return: On failure - Exits by calling cleanup(). */
/* On success - returns 0. */
/* */
/******************************************************************************/
void setup() {
/* Capture signals if any */
/* Create temporary directories */
TEST_PAUSE;
tst_tmpdir();
}
/*
* Global variables
*/
static int opt_debug;
static char *progname;
enum test_type {
DEFAULT, /* get default policy */
ADDR, /* get policy of memory which include mapped address */
INVALID_POINTER,
INVALID_FLAGS,
};
enum from_node {
NONE,
SELF,
};
/*
* Data Structure
*/
struct test_case {
int ttype;
int policy;
int from_node;
int ret;
int err;
};
/* Test cases
*
* test status of errors on man page
*
* (NONE) man page hadn't been completed.
*
* test status of errors NOT on man page
*
* EFAULT v (invalid address)
* EINVAL v (invalid parameters)
*/
static struct test_case tcase[] = {
{ /* case00 */
.ttype = DEFAULT,
.policy = MPOL_DEFAULT,
.from_node = NONE,
.ret = 0,
.err = 0,
},
{ /* case01 */
.ttype = DEFAULT,
.policy = MPOL_BIND,
.from_node = SELF,
.ret = 0,
.err = 0,
},
{ /* case02 */
.ttype = DEFAULT,
.policy = MPOL_INTERLEAVE,
.from_node = SELF,
.ret = 0,
.err = 0,
},
{ /* case03 */
.ttype = DEFAULT,
.policy = MPOL_PREFERRED,
.from_node = NONE,
.ret = 0,
.err = 0,
},
{ /* case04 */
.ttype = DEFAULT,
.policy = MPOL_PREFERRED,
.from_node = SELF,
.ret = 0,
.err = 0,
},
{ /* case05 */
.ttype = ADDR,
.policy = MPOL_DEFAULT,
.from_node = NONE,
.ret = 0,
.err = 0,
},
{ /* case06 */
.ttype = ADDR,
.policy = MPOL_BIND,
.from_node = SELF,
.ret = 0,
.err = 0,
},
{ /* case07 */
.ttype = ADDR,
.policy = MPOL_INTERLEAVE,
.from_node = SELF,
.ret = 0,
.err = 0,
},
{ /* case08 */
.ttype = ADDR,
.policy = MPOL_PREFERRED,
.from_node = NONE,
.ret = 0,
.err = 0,
},
{ /* case09 */
.ttype = ADDR,
.policy = MPOL_PREFERRED,
.from_node = SELF,
.ret = 0,
.err = 0,
},
{ /* case10 */
.ttype = INVALID_POINTER,
.policy = MPOL_DEFAULT,
.from_node = NONE,
.ret = -1,
.err = EFAULT,
},
{ /* case11 */
.ttype = INVALID_FLAGS,
.policy = MPOL_DEFAULT,
.from_node = NONE,
.ret = -1,
.err = EINVAL,
},
};
#define MEM_LENGTH (4 * 1024 * 1024)
/*
* do_test()
*
* Input : TestCase Data
* Return : RESULT_OK(0), RESULT_NG(1)
*
*/
static int do_test (struct test_case *tc)
{
int sys_ret;
int sys_errno;
int result = RESULT_OK;
int rc, policy, flags, cmp_ok = 1;
nodemask_t nodemask, getnodemask;
unsigned long maxnode = NUMA_NUM_NODES;
char *p = NULL;
unsigned long len = MEM_LENGTH;
/* We assume that there is only one node(node0). */
nodemask_zero(&nodemask);
nodemask_set(&nodemask, 0);
nodemask_zero(&getnodemask);
switch (tc->ttype) {
case DEFAULT:
flags = 0;
p = NULL;
/* set memory policy */
if (tc->from_node == NONE)
TEST(rc = syscall(__NR_set_mempolicy, tc->policy, NULL, 0));
else
TEST(rc = syscall(__NR_set_mempolicy, tc->policy, &nodemask, maxnode));
if (TEST_RETURN < 0) {
tst_resm(TFAIL|TTERRNO, "set_mempolicy() failed");
result = 1;
cleanup();
tst_exit();
}
break;
default:
flags = MPOL_F_ADDR;
/* mmap memory */
p = mmap(NULL, len, PROT_READ|PROT_WRITE,MAP_PRIVATE|MAP_ANONYMOUS, 0, 0);
if (p == (void*)-1) {
tst_resm(TFAIL|TERRNO, "mmap() failed");
result = 1;
cleanup();
tst_exit();
}
/* set memory policy */
if (tc->from_node == NONE)
TEST(rc = syscall(__NR_mbind, p, len, tc->policy,NULL, 0, 0));
else
TEST(rc = syscall(__NR_mbind, p, len, tc->policy,&nodemask, maxnode, 0));
if (tc->ttype == INVALID_POINTER)
p = NULL;
if (tc->ttype == INVALID_FLAGS){
flags = -1;
break;
}
}
/*
* Execute system call
*/
errno = 0;
TEST(sys_ret = syscall(__NR_get_mempolicy, &policy, &getnodemask, maxnode,p, flags));
sys_errno = errno;
if (sys_ret < 0)
goto TEST_END;
// When policy equals MPOL_DEFAULT, then get_mempolicy not return node
if (tc->policy == MPOL_DEFAULT)
nodemask_zero(&nodemask);
cmp_ok = tc->policy == policy && (tc->from_node == NONE || nodemask_equal(&nodemask,&getnodemask));
if (opt_debug) {
nodemask_dump("nodemask Expect:", &nodemask);
nodemask_dump("nodemask Result:", &getnodemask);
tst_resm(TINFO,"policy E:%d R:%d", tc->policy, policy);
}
TEST_END:
/*
* Check results
*/
result |= (sys_errno != tc->err) || !cmp_ok;
PRINT_RESULT_CMP(0, tc->ret, tc->err, sys_ret, sys_errno, cmp_ok);
return result;
}
/*
* usage()
*/
void usage(const char *progname)
{
tst_resm(TINFO, "usage: %s [options]", progname);
tst_resm(TINFO, "This is a regression test program of %s system call.", SYSCALL_NAME);
tst_resm(TINFO, "options:");
tst_resm(TINFO, " -d --debug Show debug messages");
tst_resm(TINFO, " -h --help Show this message");
tst_resm(TINFO,"NG");
exit(1);
}
/*
* main()
*/
int main(int argc, char **argv) {
int c, i, lc, ret;
char *msg; /* message returned from parse_opts */
struct option long_options[] = {
{ "debug", no_argument, 0, 'd' },
{ "help", no_argument, 0, 'h' },
{ NULL, 0, NULL, 0 }
};
progname = basename(argv[0]);
/* parse standard options */
if ((msg = parse_opts(argc, argv, (option_t *)NULL, NULL)) != (char *)NULL){
tst_brkm(TBROK, cleanup, "OPTION PARSING ERROR - %s", msg);
tst_exit();
}
setup();
/* Check looping state if -i option given */
for (lc = 0; TEST_LOOPING(lc); lc++) {
Tst_count = 0;
for (testno = 0; testno < TST_TOTAL; ++testno) {
TEST(c = getopt_long(argc, argv, "dh", long_options, NULL));
while (TEST_RETURN != -1) {
switch (c) {
case 'd':
opt_debug = 1;
break;
default:
usage(progname);
// NOTREACHED
}
}
/*
* Execute test
*/
for (i = 0; i < (int)(sizeof(tcase) / sizeof(*tcase)); i++) {
tst_resm(TINFO, "(case%02d) START", i);
ret = do_test(&tcase[i]);
tst_resm((ret == 0 ? TPASS : TFAIL | TERRNO),
"(case%02d) END", i);
}
}
}
cleanup();
tst_exit();
}