# include <portab.h>
# include <stdio.h>
# include <string.h>
# include <tos.h>
# include "cookie.h"


LONG           i = 0,
               spec_state;
COOKIE_STRUCT  cook,
               *cp;
WORD           j;
UBYTE          expl[100],
               cookie_id[5] = { "XXXX\0" };



WORD  main( VOID )
{
	printf( "\n\033p            CookieJar-Anzeige            \033q" );
	printf( "\n            by Markus H”vener" );


	if( !GetJarPointer() )
	{
		printf( "\n Kein Jar vorhanden." );
		return( -1 );
	}
	
	printf( "\n\n Zeiger auf den Jar : 0x%p", GetJarPointer() );
	printf( "\n Gr”že des Jars     : %ld", GetJarSize() );
	printf( "\n Belegte Cookies    : %ld", GetJarUsed() );

	
	printf("\n\n--------------------------------------------------" );
	printf("\n ID\tWert\t\tErl„uterung" );
	printf("\n--------------------------------------------------" );
	cp = GetJarPointer();

	do
	{
		memcpy( cookie_id, cp[i].id, 4L );
		if( *(LONG *)(cookie_id) != 0L )
			for( j=0; j<=3; j++ )
				cookie_id[j] = cookie_id[j] ? cookie_id[j] : ' ';


		if( !GetCookieExplanation( cp[i].id, cp[i].value, expl ) )
			printf("\n '%s'\t%ld\t\t(%s)", cookie_id, cp[i].value, expl );
		else
			printf("\n '%s'\t%ld", cookie_id, cp[i].value );
	}
	while( *((LONG *)&cp[i++]) );



	spec_state = Kbshift( -1 );	
	while( spec_state )
		spec_state = Kbshift( -1 );	
	
	return( 0 );
}