/* -------------------------------------------------------------------
 * Setup - a program for making changes in micro dec. bios (18_Jan_84)
 * -------------------------------------------------------------------
 */

# include "su1hdr.h"


char *id = " by L. W. Edmondson  1983";
unsigned char	
	*bios    = DEFBIOS,
	*biosbuf = NULL,
	cbaud    = B9600,
	pbaud    = B9600,
	ptype    = SERIAL,
	protocol = XONXOFF,
	cent     = NO,		/* centronics printer flag */
	hard     = NO,		/* hardware handshaking */
	*ramdaty = DEFRAMDATY;

/* --------------------------------------------------------------------
 * Main Line
 * ---------
 */

_main ()
	{
	return main ();
	}

main ()
	{
	char b [BIOSSIZE];

	biosbuf = b;
	sysinit ();
	readsettings ();
	setup ();
	}

/* --------------------------------------------------------------------
 * Main Control Structure
 * ----------------------
 */

setup ()
	{
	mainmenu ();

	for (;;)
		{
		switch (cgetc ())
			{
			case 'a': /* toggle console baud rate */
				{
				toggle (CBAUD);
				set_cursor (CBAUDSPOT);
				prs (baudname [cbaud]);
				selection ();
				break;
				}

			case 'b': /* toggle printer type */
				{
				toggle (PTYPE);
				set_cursor (TYPESPOT);
				prs (pname [ptype]);
				selection ();
				break;
				}

			case 'c': /* toggle printer speed */
				{
				toggle (PBAUD);
				set_cursor (PBAUDSPOT);
				prs (baudname [pbaud]);
				selection ();
				break;
				}

			case 'd': /* toggle printer protocol */
				{
				toggle (PROTOCOL);
				set_cursor (PROTOSPOT);
				prs (protoname [protocol]);
				selection ();
				break;
				}

			case 'e': /* Make changes effective immediately */
				{
				softset ();
				mainmenu ();
				break;
				}

			case 'f': /* make changes permanent */
				{
				hardset ();
				mainmenu ();
				break;
				}

			case ESC: /* quit */
			case 'g':
				{
				clear ();
				exit ();
				break;
				}
			}
		}
	}


/* --------------------------------------------------------------------
 * Toggle an Option
 * ----------------
 */

toggle (a)
	{
	switch (a)
		{
		case CBAUD:
			{
			if (cbaud == HIGHBAUD)
				cbaud = LOWBAUD;
			else
				cbaud++;

			break;
			}

		case PBAUD:
			{
			if (pbaud == HIGHBAUD)
				pbaud = LOWBAUD;
			else
				pbaud++;

			break;
			}

		case PTYPE:
			{
			if (ptype == CENTRONICS)
				ptype = SERIAL;
			else
				ptype = CENTRONICS;

			break;
			}

		case PROTOCOL:
			{
			if (protocol == XONXOFF)
				protocol = HARDHAND;
			else
				protocol = XONXOFF;

			break;
			}
		}
	}