%(
	****************************************************************

		Copyright (c) 1992, Carnegie Mellon University

		All Rights Reserved

	Permission  is  hereby  granted   to  use,  copy,  modify,  and
	distribute  this software  provided  that the  above  copyright
	notice appears in  all copies and that  any distribution be for
	noncommercial purposes.

	Carnegie Mellon University disclaims all warranties with regard
	to this software.  In no event shall Carnegie Mellon University
	be liable for  any special, indirect,  or consequential damages
	or any damages whatsoever  resulting from loss of use, data, or
	profits  arising  out of  or in  connection  with  the  use  or
	performance of this software.

	****************************************************************
)%
%SBTTL	'IPNCP.REQ'
!++
! IPNCP.REQ	Copyright (c) 1989	Carnegie Mellon University
!
! Description:
!
!	Common information about the IPNCP utility.
!
! Author:	Bruce R. Miller		CMU Network Development
! Date:		September 6, 1989
!
!--

LIBRARY 'SYS$LIBRARY:STARLET';
LIBRARY 'CMUIP_SRC:[central]Netxport';

MACRO
    version_string	= %ASCID'V6.6-5'%;



EXTERNAL LITERAL
!++
! Description:
!
!	These literals come from IPNCPMSG.MSG.
!
!--
	Telnet$_Facility,

!.SEVERITY	FATAL

!.SEVERITY	WARNING

!.SEVERITY	ERROR
	IPNCP$_No_Switch,
	IPNCP$_Error;

!.SEVERITY	INFO

!.SEVERITY	INFO

!.SEVERITY	SUCCESS


	%SBTTL 'Macro for exit handler descriptor block definition'

MACRO
    EXH$L_Flink		=  0, 0, 32, 0%,
    EXH$L_Handler	=  4, 0, 32, 0%,
    EXH$L_NumArgs	=  8, 0, 32, 0%,
    EXH$B_NumArgs	=  8, 0,  8, 0%,
    EXH$L_MBZ		=  9, 0, 24, 0%,
    EXH$L_Status_A	= 12, 0, 32, 0%,
    EXH$L_First_Arg	= 16, 0, 32, 0%;

LITERAL
    EXH$K_Size	= (255 * %upval) + $BYTEOFFSET(EXH$L_First_Arg);



$FIELD IPNCP_Config_Fields =
    SET
    CNF$Invocation_Count	= [$ULong]
    TES;

LITERAL
    IPNCP_Config_Size = $FIELD_SET_SIZE;

MACRO
    IPNCP_Config_Struct = BLOCK[IPNCP_Config_Size] FIELD(IPNCP_Config_Fields)%;



! Macro interface to the formatted printing routines
MACRO
    PrintTT(X) = BEGIN
		   EXTERNAL ROUTINE
			IPNCP_TT_FAO : ADDRESSING_MODE(LONG_RELATIVE);
		    IPNCP_TT_FAO(
			%ASCID X
			%IF NOT %NULL(%REMAINING) %THEN , %REMAINING %FI
			)
		END %;