/*
	Little program used to test and debug mapmalloc
*/
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <unistd.h>
#include <sys/wait.h>

static void a()
{
}
static void b()
{
	malloc(1000);
	a();
}

static void c()
{
	b();
}
static void d()
{
	c();
}
static void e()
{
	d();
}
static void f(bool do_realloc, bool do_2free)
{
	void *pt = malloc(100);
	e();
	if (do_realloc) pt = realloc(pt,120);
	free (pt);
	if (do_2free) free (pt);
}


int main (int argc, char *argv[])
{
	bool do_realloc = false;
	bool do_2free = false;
	bool do_fork = false;
	bool do_stop = false;
	for (int i=1; i<argc; i++){
		if (strcmp(argv[i],"--realloc")==0){
			do_realloc = true;
		}else if (strcmp(argv[i],"--2free")==0){
			do_2free = true;
		}else if (strcmp(argv[i],"--fork")==0){
			do_fork = true;
		}else if (strcmp(argv[i],"--stop")==0){
			do_stop = true;
		}else{
			fprintf (stderr,"Option inconnu %s\n",argv[i]);
			exit(-1);
		}
	}
	for (int i=0; i<100; i++){
		f(do_realloc,do_2free);
	}
	if (do_stop){
		char line[10];
		printf ("Press enter to continue\n");
		fgets(line,sizeof(line)-1,stdin);
		for (int i=0; i<100; i++){
			f(do_realloc,do_2free);
		}
	}
	if (do_fork){
		if (fork()==0){
			fork();
			for (int i=0; i<10; i++){
				f(do_realloc,do_2free);
			}
			_exit (0);
		}else{
			int status;
			wait (&status);
		}
		for (int i=0; i<5; i++){
			f(do_realloc,do_2free);
		}
	}
	return 0;
}