/*
 * This library is mainly intended to demonstrate how to program an
 * encryption sub library/
 */

char ver[]="$VER: ENCO 1.1 ("__DATE__")";

#define NO_SUB_PRAGMAS

#include <libraries/xpksub.h>

#define A3000 XPKMF_A3000SPEED

XMINFO EncoMode = {
	NULL,    // next
	100,     // upto
	A3000,   // flags
	0,       // packmem
	0,       // unpackmem
	393,     // packspeed,   K/sec
	393,     // unpackspeed, K/sec
	45,      // ratio,      *0.1%
	0,       // reserved
	"normal" // description
};

static struct XpkInfo EncoInfo = {
		1,               /* info version */
		0,               /* lib  version */
		0,               /* master vers  */
		0,               /* pad          */
		"ENCO",          /* short name   */
		"Encoder 0.1",   /* long name    */
		"Totally unsafe encryption", /* description*/
		'ENCO',          /* 4 letter ID  */
		XPKIF_PK_CHUNK  |/* flags        */
		XPKIF_UP_CHUNK  ,
		500000,          /* max in chunk */
		0,               /* min in chunk */
		50000,           /* def in chunk */
		"Encoding",      /* pk message   */
		"Decoding",      /* up message   */
		"Encoded",       /* pk past msg  */
		"Decoded",       /* up past msg  */
		50,              /* def mode     */
		0,               /* pad          */
		&EncoMode        /* modes        */
};

/*
 * Returns an info structure about our packer
 */
struct XpkInfo * __saveds __asm
XpksPackerInfo( void )
{
	return &EncoInfo;
}


void __saveds __asm
XpksPackFree( REG __a0 XPARAMS* xpar )
{
  strcpy( xpar->OutBuf , "PackFree" );
}

/*
 * This forces the next chunk to be uncompressable independent from the
 * previous one. This is always the case in RLEN.
 */
long __saveds __asm
XpksPackReset( REG __a0 XPARAMS* xpar )
{
  strcat( xpar->OutBuf , "PackReset" );
	return 0;
}


void __saveds __asm
XpksUnpackFree( REG __a0 XPARAMS* xpar )
{
}

long __saveds __asm
XpksPackChunk( REG __a0 XPARAMS *xpar )
{
  ((char *)xpar->OutBuf)[10]=0;
  strcat( xpar->OutBuf , "PackChunck1" );
  strcat( xpar->OutBuf , "PackChunck2" );
  xpar->OutLen = 100;
	return 0;
}


long __saveds __asm
XpksUnpackChunk( REG __a0 XPARAMS* xpar )
{
	return 0;
}