/****************************************************************
 *								*
 *	Copyright 2001, 2007 Fidelity Information Services, Inc	*
 *								*
 *	This source code contains the intellectual property	*
 *	of its copyright holder(s), and is made available	*
 *	under a license.  If you do not know the terms of	*
 *	the license, please stop and do not read further.	*
 *								*
 ****************************************************************/

#include "mdef.h"

#include "gtm_stdio.h"
#include "io.h"
#include "rtnhdr.h"
#include "stack_frame.h"
#include "outofband.h"

GBLREF volatile int4		outofband;
GBLREF volatile int4 		ctrap_action_is;
GBLREF io_pair		io_std_device;
GBLREF stack_frame	*frame_pointer;
GBLREF unsigned char	*restart_pc;
GBLREF unsigned char	*restart_ctxt;
GBLREF void             (*tp_timeout_action_ptr)(void);

void outofband_action(bool lnfetch_or_start)
{
	error_def(ERR_CTRAP);
	error_def(ERR_CTRLC);
	error_def(ERR_CTRLY);
	error_def(ERR_JOBINTRRQST);

	if (outofband)
	{
		if (io_std_device.in->type == tt)
			iott_flush(io_std_device.in);
		if (lnfetch_or_start)
		{
			restart_pc =  frame_pointer->mpc;
			restart_ctxt = frame_pointer->ctxt;
		}

		switch(outofband)
		{
			case (ctrly):
				rts_error(VARLSTCNT(1) ERR_CTRLY);
				break;
			case (ctrlc):
				rts_error(VARLSTCNT(1) ERR_CTRLC);
				break;
			case (ctrap):
				rts_error(VARLSTCNT(3) ERR_CTRAP, 1, ctrap_action_is);
				break;
			case (tptimeout):
				/*
				 * Currently following is nothing but an rts_error.
				 * Function pointer is used flexibility.
				 */
				(*tp_timeout_action_ptr)();
				break;
			case (jobinterrupt):
				rts_error(VARLSTCNT(1) ERR_JOBINTRRQST);
				break;
			default:
				GTMASSERT;
				break;
		}
	}
}