/*
 * Copyright (c) 2002, Intel Corporation. All rights reserved.
 * Copyright (c) 2012, Cyril Hrubis <chrubis@suse.cz>
 *
 * This file is licensed under the GPL license.  For the full content
 * of this license, see the COPYING file at the top level of this
 * source tree.
 *
 * When the implementation selects a
 * value for pa, it never places a mapping at address 0.
 *
 * Test steps:
 * This is not a good test. Cannot make sure (pa == 0) never happens.
 * Repeat LOOP_NUM times mmap() and mnumap(),
 * make sure pa will not equal 0.
 */

#define _XOPEN_SOURCE 600

#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <sys/mman.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/wait.h>
#include <fcntl.h>
#include <string.h>
#include <errno.h>
#include "posixtest.h"

#define LOOP_NUM 100000

int main(void)
{
	int rc;
	unsigned long cnt;

	char tmpfname[256];
	long total_size;

	void *pa;
	size_t size;
	int fd;

	total_size = 1024;
	size = total_size;

	snprintf(tmpfname, sizeof(tmpfname), "/tmp/pts_mmap_10_1_%d", getpid());
	unlink(tmpfname);
	fd = open(tmpfname, O_CREAT | O_RDWR | O_EXCL, S_IRUSR | S_IWUSR);
	if (fd == -1) {
		printf("Error at open(): %s\n", strerror(errno));
		return PTS_UNRESOLVED;
	}
	unlink(tmpfname);
	if (ftruncate(fd, total_size) == -1) {
		printf("Error at ftruncate(): %s\n", strerror(errno));
		return PTS_UNRESOLVED;
	}

	for (cnt = 0; cnt < LOOP_NUM; cnt++) {
		pa = mmap(NULL, size, PROT_READ | PROT_WRITE, MAP_SHARED, fd,
			  0);
		if (pa == MAP_FAILED) {
			printf("Test FAILED: Error at mmap: %s\n",
			       strerror(errno));
			return PTS_FAIL;
		}

		if (pa == NULL) {
			printf("Test FAILED:"
			       " mmap() map the file to 0 address "
			       "without setting MAP_FIXED\n");
			return PTS_FAIL;
		}
		rc = munmap(pa, size);
		if (rc != 0) {
			printf("Error at mnumap(): %s\n", strerror(errno));
			return PTS_UNRESOLVED;
		}
	}

	close(fd);
	printf("Test PASSED\n");
	return PTS_PASS;
}
