/*
 * Copyright (c) 2005 Jakub Vana
 * Copyright (c) 2005 Jakub Jermar
 * Copyright (c) 2007 Vojtech Mencl
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

#include <print.h>
#include <debug.h>

#include <test.h>
#include <atomic.h>
#include <proc/thread.h>

#include <arch.h>

#define THREADS 5
#define RUN_TIME 10

static atomic_t finish;
static atomic_t threads_finished;
static atomic_t run_time;
static bool sh_quiet;

static void timeouttest(void *data)
{
	unsigned int tmp;
	thread_detach(THREAD);	

	while (atomic_get(&finish)) {
		tmp = atomic_get(&run_time) + 10000;
		if (!sh_quiet)
			printf("%llu sleeps %u mikrosec\n", THREAD->tid, tmp);
		atomic_set(&run_time, tmp + 10000);
		thread_usleep(atomic_get(&run_time));
		if (atomic_get(&run_time) > 300000)
			atomic_set(&run_time,10000);
	}
	atomic_inc(&threads_finished);
}

char * test_timeout1(bool quiet)
{
	unsigned int i, total = 0;
	sh_quiet = quiet;
	
	atomic_set(&finish, 1);
	atomic_set(&threads_finished, 0);
	atomic_set(&run_time, 10000);

	for (i = 0; i < THREADS; i++) {  
		thread_t *t;
		if (!(t = thread_create(timeouttest, NULL, TASK, 0, "timeouttest", false))) {
			if (!quiet)
				printf("Could not create thread %d\n", i);
			break;
		}
		thread_ready(t);
		total++;
	}
	
	if (!quiet)
		printf("Running threads for %d seconds...\n",RUN_TIME);
	thread_sleep(RUN_TIME);
	
	atomic_set(&finish, 0);
	while (atomic_get(&threads_finished) < total) {
		if (!quiet)
			printf("Threads left: %d\n", total - atomic_get(&threads_finished));
		thread_sleep(1);
	}
	
	return NULL;
}