[List.External:KnownForce-All6plus2008]
int last;		// Last character position, zero-based
int lastofs;		// Last character position offset into charset[]
int lastid;		// Current character index in the last position
int id[0x7f];		// Current character indices for other positions
int charset[0x7f00];	// Character sets, 0x100 elements for each position

void init()
{
	int length;
	int pos, ofs, i, c;

	length = 10;	// Password length to try

/* This defines the character sets for different character positions */
	pos = 0;
	while (pos < 6) {
		ofs = pos++ << 8;
		i = 0;
		c = ' ';
		while (c <= 0x7e)
			charset[ofs + i++] = c++;
		charset[ofs + i] = 0;
	}
/* Use single character "character sets" for the remaining positions */
	ofs = pos << 8;
	charset[ofs] = '2';
	charset[ofs + 1] = 0;
	ofs += 1 << 8;
	charset[ofs] = '0';
	charset[ofs + 1] = 0;
	ofs += 1 << 8;
	charset[ofs] = '0';
	charset[ofs + 1] = 0;
	ofs += 1 << 8;
	charset[ofs] = '8';
	charset[ofs + 1] = 0;

	last = length - 1;
	pos = -1;
	while (++pos <= last)
		word[pos] = charset[id[pos] = pos << 8];
	lastid = (lastofs = last << 8) - 1;
	word[pos] = 0;
}

void generate()
{
	int pos;

/* Handle the typical case specially */
	if (word[last] = charset[++lastid]) return;

	word[pos = last] = charset[lastid = lastofs];
	while (pos--) {			// Have a preceding position?
		if (word[pos] = charset[++id[pos]]) return;
		word[pos] = charset[id[pos] = pos << 8];
	}

	word = 0;			// We're done
}

void restore()
{
	int i, c;

/* Calculate the current length and infer the character indices */
	last = 0;
	while (c = word[last]) {
		i = lastofs = last << 8;
		while (charset[i] != c && charset[i]) i++;
		if (!charset[i]) i = lastofs; // Not found
		id[last++] = i;
	}
	lastid = id[--last];
}