#include <kernel.h>
#include <proc.h>
#include <semaphore.h>
#include <stdio.h>

extern void testPass(const char *);
extern void testFail(const char *);

extern bool test_checkSemCount(semaphore s, short c);
extern bool test_checkProcState(ushort pid, uchar state);
extern bool test_checkResult(uchar testResult, uchar expected);

extern void test_semWaiter(semaphore s, int times, uchar *testResult);

int test_semaphore4(int argc, char **argv)
{
	int apid;
	bool passed = TRUE;
	semaphore s;
	uchar testResult = 0;
	char msg[50];

	printf("Test Suite: Semaphore Interruption\n");

	printf("  Semaphore creation: ");
	s = newsem(0);
	if (isbadsem(s))
	{
		passed = FALSE;
		sprintf(msg, "%d", s);
		testFail(msg);
	}
	else if (test_checkSemCount(s, 0))
	{ testPass(""); }
	else
	{ passed = FALSE; }

	ready(apid = create((void *)test_semWaiter, INITSTK, 31, "SEMAPHORE-A", 
						3, s, 1, &testResult), RESCHED_YES);

	printf("  Wait on semaphore: ");
	if ( test_checkProcState(apid, PRWAIT)
		 && test_checkSemCount(s, -1)
		 && test_checkResult(testResult, 0) )
	{ testPass(""); }
	else
	{ passed = FALSE; }

	kill(apid);

	printf("  Kill waiting process: ");
	if ( test_checkProcState(apid, PRFREE)
		 && test_checkSemCount(s, 0)
		 && test_checkResult(testResult, 0) )
	{ testPass(""); }
	else
	{ passed = FALSE; }

	if (TRUE == passed)
	{ testPass(""); }
	else
	{ testFail(""); }

	freesem(s);

	return OK;
}