NETPROCRE       - PROCESS CREATION                               22-AUG-1978 00:58:55   VAX-11 MACRO X0.3-11               Page   0

TABLE OF CONTENTS   



   (1)    3400  HISTORY

   (1)    4200  DECLARATIONS

   (1)    7400  POST INBOUND CONNECT TO MAILBOX

   (1)    9100  STARTUP A USER IMAGE

NETPROCRE       - PROCESS CREATION                               22-AUG-1978 00:58:55   VAX-11 MACRO X0.3-11               Page   1

X01                                                                                                                              (1)



                                     0000   100 

                                     0000   200 	.TITLE	NETPROCRE - PROCESS CREATION

                                     0000   300 	.IDENT	/X01/

                                     0000   400 

                                     0000   500 ;

                                     0000   600 ; COPYRIGHT (C) 1977, 1978

                                     0000   700 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS 01754

                                     0000   800 ;

                                     0000   900 ; THIS SOFTWARE IS FURNISHED  UNDER A LICENSE FOR USE ONLY ON A SINGLE

                                     0000  1000 ; COMPUTER  SYSTEM AND  MAY BE  COPIED ONLY WITH  THE INCLUSION OF THE

                                     0000  1100 ; ABOVE COPYRIGHT NOTICE.  THIS SOFTWARE, OR ANY OTHER COPIES THEREOF,

                                     0000  1200 ; MAY NOT BE PROVIDED OR  OTHERWISE MADE AVAILABLE TO ANY OTHER PERSON

                                     0000  1300 ; EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO AGREES TO THESE LICENSE

                                     0000  1400 ; TERMS.  TITLE TO AND  OWNERSHIP OF THE  SOFTWARE  SHALL AT ALL TIMES

                                     0000  1500 ; REMAIN IN DEC.

                                     0000  1600 ;

                                     0000  1700 ; THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE

                                     0000  1800 ; AND SHOULD  NOT BE CONSTRUED  AS A COMMITMENT  BY DIGITAL  EQUIPMENT

                                     0000  1900 ; CORPORATION.

                                     0000  2000 ;

                                     0000  2100 ; DEC ASSUMES  NO  RESPONSIBILITY  FOR  THE USE OR  RELIABILITY OF ITS

                                     0000  2200 ; SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.

                                     0000  2300 

                                     0000  2400 ;++

                                     0000  2500 ; FACILITY:	NETWORK ACP

                                     0000  2600 ;

                                     0000  2700 ; ABSTRACT:

                                     0000  2800 ;	THIS MODULE PERFORMS PROCESS CREATION FOR AN INBOUND CONNECT.

                                     0000  2900 ;

                                     0000  3000 ; ENVIRONMENT:

                                     0000  3100 ;	MODE = KERNEL

                                     0000  3200 ;--

NETPROCRE       - PROCESS CREATION                               22-AUG-1978 00:58:55   VAX-11 MACRO X0.3-11               Page   2

X01             HISTORY                                                                                                          (1)



                                     0000  3400 	.SBTTL	HISTORY

                                     0000  3500 ; AUTHOR:	SCOTT G. DAVIS, CREATION DATE: 10-AUG-77

                                     0000  3600 ;

                                     0000  3700 ; MODIFIED BY:

                                     0000  3800 ;

                                     0000  3900 ;	, : VERSION

                                     0000  4000 ; 01	- 

NETPROCRE       - PROCESS CREATION                               22-AUG-1978 00:58:55   VAX-11 MACRO X0.3-11               Page   3

X01             DECLARATIONS                                                                                                     (1)



                                     0000  4200 	.SBTTL	DECLARATIONS

                                     0000  4300 ;

                                     0000  4400 ; INCLUDE FILES:

                                     0000  4500 ;

                                     0000  4600 	$DRDEF

                                     0000  4700 	$MSGDEF

                                     0000  4800 	$UCBDEF

                                     0000  4900 

                                     0000  5000 ;

                                     0000  5100 ; MACROS:

                                     0000  5200 ;

                                     0000  5300 

                                     0000  5400 ;

                                     0000  5500 ; EQUATED SYMBOLS:

                                     0000  5600 ;

                           00000007  0000  5700 STS_NETLOG = 7				; BIT NO. FOR NETWORK LOGIN

                                     0000  5800 

                                     0000  5900 ;

                                     0000  6000 ; OWN STORAGE:

                                     0000  6100 ;

                                 00000000  6200 	.PSECT	NET_PURE,NOWRT,NOEXE

                                     0000  6300 NET$GQ_TERM::

                                     0000  6400 	DESCRIPTOR	<_OPA0:>	; FOR DEBUGGING LOGINOUT

                                     000E  6500 NET_Q_IMAGE:

                                     000E  6600 	DESCRIPTOR	<SYS$SYSTEM:LOGINOUT> ; NETWORK LOGIN IMAGE

                                     0029  6700 

                                 00000000  6800 	.PSECT	NET_IMPURE,WRT,NOEXE

                               0063  0000  6900 NET_PROC_IDX:	.WORD	99		; CREATED PROCESS INDEX

                           00000003  0002  7000 NET_CIR_IDX:	.BLKB	1		; CIR INDEX

NETPROCRE       - PROCESS CREATION                               22-AUG-1978 00:58:55   VAX-11 MACRO X0.3-11               Page   4

X01             DECLARATIONS                                                                                                     (1)



                                 00000000  7200 	.PSECT	NET_CONNECT,NOWRT

                                     0000  7300 

                                     0000  7400 	.SBTTL	POST INBOUND CONNECT TO MAILBOX

                                     0000  7500 

                                     0000  7600 ;++

                                     0000  7700 ;

                                     0000  7800 ; NET$MAILBOX_CI - PUT NCB INTO MAILBOX

                                     0000  7900 ;

                                     0000  8000 ; INPUTS:	R5 - UCB OF CHANNEL THAT HAS MAILBOX

                                     0000  8100 ;		R8,R9 - QUADWORD DESCRIPTOR OF NCB

                                     0000  8200 ;

                                     0000  8300 ;--

                                     0000  8400 

                                     0000  8500 NET$MAILBOX_CI::

            57            32     B0  0000  8600 	MOVW	#MSG$_CONNECT,R7	; THIS IS A CONNECT INITIATE

            5A            59     D0  0003  8700 	MOVL	R9,R10			; NEED ADDRESS IN R10

                          FFF7'  31  0006  8800 	BRW	NET$ATTENTION		; POST ATTENTION AND RETURN

                                     0009  8900 

                                     0009  9000 

                                     0009  9100 	.SBTTL	STARTUP A USER IMAGE

                                     0009  9200 ;++

                                     0009  9300 ; FUNCTIONAL DESCRIPTION:

                                     0009  9400 ;

                                     0009  9500 ; NET$START_USER - THIS ROUTINE STARTS UP A USER IMAGE

                                     0009  9600 ;

                                     0009  9700 ; CALLING SEQUENCE:

                                     0009  9800 ;

                                     0009  9900 ;	BSB	NET$START_USER

                                     0009 10000 ;

                                     0009 10100 ; INPUT PARAMETERS:

                                     0009 10200 ;

                                     0009 10300 ;	NET$GQ_UTL_DESC - DESCRIPTOR OF NCB

                                     0009 10400 ;

                                     0009 10500 ; IMPLICIT INPUTS:

                                     0009 10600 ;

                                     0009 10700 ;	NET_PROC_IDX

                                     0009 10800 ;	NET$GQ_IMAGE

                                     0009 10900 ;

                                     0009 11000 ; IMPLICIT OUTPUTS:

                                     0009 11100 ;

                                     0009 11200 ;	CIR-PENDING BLOCK:

                                     0009 11300 ;

                                     0009 11400 ; SIDE EFFECTS:

                                     0009 11500 ;

                                     0009 11600 ;	PROCESS CREATED, IMAGE STARTED

                                     0009 11700 ;

                                     0009 11800 ;--

                                     0009 11900 

                                     0009 12000 NET$START_USER::

       0000'8F       0000'CF     B1  0009 12100 	CMPW	W^NET$GQ_UTLDESC,#NET$C_CIRNAMLTH ; STRING TOO LONG?

                          0D     1A  0010 12200 	BGTRU	15$			; IF GTRU YES

                                     0012 12300 ;

                                     0012 12400 ; SET UP "CIR PENDING" INDEX

                                     0012 12500 ;

            59            FF'    D0  0012 12600 	MOVL	S^#NET$C_MAXCIR-1,R9	; USE 1-ORIGIN INDEXING

                                     0015 12700 10$:

                     0000'CF49   D5  0015 12800 	TSTL	W^NET$AL_CIRPID[R9]	; SLOT EMPTY?

NETPROCRE       - PROCESS CREATION                               22-AUG-1978 00:58:55   VAX-11 MACRO X0.3-11               Page   5

X01             STARTUP A USER IMAGE                                                                                             (1)



                          06     13  001A 12900 	BEQL	20$			; IF EQL YES

            F6            59     F4  001C 13000 	SOBGEQ	R9,10$			; LOOP

                          009A   31  001F 13100 15$:	BRW	40$			; COULDN'T GET A RESOURCE (CIR BLOCK)

                                     0022 13200 20$:

       0002'CF            59     90  0022 13300 	MOVB	R9,W^NET_CIR_IDX	; SAVE THE CIR INDEX

            58       0000'CF49   7E  0027 13400 	MOVAQ	W^NET$AT_CIRNOD[R9],R8	; POINT TO SEQUENCE NO.

                          68     96  002D 13500 25$:	INCB	(R8)			; BUMP IT

                          FC     13  002F 13600 	BEQL	25$			; IF EQL, AGAIN - DON'T USE ZERO

            56       0000'CF     D0  0031 13700 	MOVL	W^NET$GL_NAME_PTR,R6	; POINT TO WORD IN NCB

            59            01     81  0036 13800 	ADDB3	#1,R9,(R6)+		; PUT IN CIR INDEX, CORRECTED

                          86         0039       

            66            88     90  003A 13900 	MOVB	(R8)+,(R6)		; PUT IN THE SEQUENCE NO.

                     0000'CF     95  003D 14000 	TSTB	W^NET$GB_DSTOBJ		; IS THIS AN OBJTYP-ONLY CONNECT?

                          14     13  0041 14100 	BEQL	30$			; IF EQL YES

                                     0043 14200 ;

                                     0043 14300 ; SEE IF THIS CONNECT IS FOR AN EXISTING PROCESS

                                     0043 14400 ;

                          FFBA'  30  0043 14500 	BSBW	NET$FIND_NAMBLK		; CHECK IT OUT

                          0F     13  0046 14600 	BEQL	30$			; IF EQL THEN CREATE A NEW PROCESS

                                     0048 14700 ;

                                     0048 14800 ; MATCH FOUND - GIVE CONNECT TO AN EXISTING PROCESS

                                     0048 14900 ;

       0000'CF         28 A5     D0  0048 15000 	MOVL	UCB$L_PID(R5),W^NET$GL_RES_PTR ; SAVE THE PID

            58       0000'CF     7D  004E 15100 	MOVQ	W^NET$GQ_UTLDESC,R8	; LTH AND ADDRESS TO R8,R9

                          AB     10  0053 15200 	BSBB	NET$MAILBOX_CI		; POST THE MAILBOX ATTENTION

                          6D     11  0055 15300 	BRB	50$	 	 	; FINISH UP CIR BLOCK

                                     0057 15400 

                                     0057 15500 ;

                                     0057 15600 ; CREATE A NEW PROCESS

                                     0057 15700 ;

                                     0057 15800 30$:

            50       0000'CF     DE  0057 15900 	MOVAL	W^NET_PROC_IDX,R0	; POINT TO PROCESS INDEX

                          60     B6  005C 16000 	INCW	(R0)			; BUMP IT

       03E7 8F            60     B1  005E 16100 	CMPW	(R0),#999		; WRAP?

                          05     1B  0063 16200 	BLEQU	35$			; IF LEQU NO

            60       0064 8F     B0  0065 16300 	MOVW	#100,(R0)		; RESET

                                     006A 16400 35$:

            50            60     3C  006A 16500 	MOVZWL	(R0),R0			; GET THE INDEX

                                     006D 16600 

                                     006D 16700 ;

                                     006D 16800 ; CREATE A PROCESS NAME

                                     006D 16900 ;

            53            7E     7E  006D 17000 	MOVAQ	-(SP),R3		; MAKE A BUFFER FOR THE JOB NUMBER

                 54454E5F 8F     DD  0070 17100 	PUSHL	#^A/_NET/		; SET JOB NAME PREFIX

                          FF87'  30  0076 17200 	BSBW	NET$BIN2ASC		; CONVERT TO ASCII STRING

                          6E     DF  0079 17300 	PUSHAL	(SP)			; ADDRESS OF NAME STRING

            53            6E     C3  007B 17400 	SUBL3	(SP),R3,-(SP)		; FIND LENGTH OF NAME

                          7E         007E       

            53            6E     7E  007F 17500 	MOVAQ	(SP),R3			; SET ADDRESS OF NAME DESCRIPTOR

                                     0082 17600 ;

                                     0082 17700 ; NOW CREATE A PROCESS AND START UP LOGIN

                                     0082 17800 ;

                                     0082 17900 	$CREPRC_S	-		; CREATE A PROCESS

                                     0082 18000 		INPUT=	W^NET$GQ_TERM,-	; DEVICE INPUT IS TERMINAL

                                     0082 18100 		OUTPUT=	W^NET$GQ_ACCESS,- ; PASS ACCESS CONTROL AND FILE ID

                                     0082 18200 		ERROR=	W^NET$GQ_UTLDESC,- ; NCB DESCRIPTOR

                                     0082 18300 		PIDADR= W^NET$GL_RES_PTR,- ; PLACE TO STORE PROCESS ID

NETPROCRE       - PROCESS CREATION                               22-AUG-1978 00:58:55   VAX-11 MACRO X0.3-11               Page   6

X01             STARTUP A USER IMAGE                                                                                             (1)



                                     0082 18400 		IMAGE=	W^NET_Q_IMAGE,-	; IMAGE TO RUN

                                     0082 18500 		PRCNAM=	(R3),-		; ESTABLISH PROCESS NAME

                                     0082 18600 		BASPRI=	#4,-		; PRIORITY

                                     0082 18700 		UIC=	#<^O10@16+^O40>,- ; UIC IS [10,40]

                                     0082 18800 		MBXUNT=	W^NET$MBX_UNIT,- ; MBX FOR TERMINATION NOTIFICATION

                                     0082 18900 		STSFLG=	#<1@STS_NETLOG>	; THIS IS A NETWORK PROCESS

            5E            14     C0  00B6 19000 	ADDL	#<8+4+8>,SP		; CLEAR THE STACK

                                     00B9 19100 ;

                                     00B9 19200 ; CHECK FOR FAILURE

                                     00B9 19300 ;

            08            50     E8  00B9 19400 	BLBS	R0,50$			; IF LBS PROCESS WAS CREATED

                                     00BC 19500 40$:

            58            01     B0  00BC 19600 	MOVW	#NET$C_DR_RSU,R8	; ASSUME BECAUSE COULDN'T GET RESOURCE

                          55     D4  00BF 19700 	CLRL	R5			; NO ASSOCIATED UCB

                          FF3C'  31  00C1 19800 	BRW	NET$XMT_DC		; SEND THE DC AND RETURN

                                     00C4 19900 50$:

                                     00C4 20000 ;

                                     00C4 20100 ; NOW FILL UP THE CIR PENDING BLOCK

                                     00C4 20200 ;

            59       0002'CF     9A  00C4 20300 	MOVZBL	W^NET_CIR_IDX,R9	; RESTORE INDEX

       0000'CF49     0000'CF     D0  00C9 20400 	MOVL	W^NET$GL_RES_PTR,W^NET$AL_CIRPID[R9] ; STORE THE PID

       0000'CF49     0000'CF     B0  00D1 20500 	MOVW	W^NET$GW_SRCADDR,W^NET$AW_CIRDST[R9] ; PUT PARTNER LINK ADDRESS IN

       0000'CF49     0000'CF     B0  00D9 20600 	MOVW	W^NET$GW_CHANNEL,W^NET$AW_CIRCHN[R9] ; HOLD ON TO THE CHANNEL NO.

       0000'CF49     0000'CF     B0  00E1 20700 	MOVW	W^NET$GW_TMP_SEG,W^NET$AW_CIRSEG[R9] ; HOLD ON TO HIS SEGSIZE

       0000'CF49     0000'CF     90  00E9 20800 	MOVB	W^NET$GB_TMP_SRV,W^NET$AB_CIRSRV[R9] ; HOLD ON TO HIS SERVICES

            50   00000000'8F     C4  00F1 20900 	MULL2	#NET$C_CIRNAMLTH,R0	; GET OFFSET TO BUFFER START

                     0000'CF40   9F  00F8 21000 	PUSHAB	W^NET$AT_CIRNAM[R0]	; SAVE THE ADDRESS

                     0000'CF     DD  00FD 21100 	PUSHL	W^NET$GQ_UTLDESC	; GET THE LENGTH

       0004'DF            6E     28  0101 21200 	MOVC3	(SP),@W^NET$GQ_UTLDESC+4,@4(SP) ; MOVE THE STRING

                       04 BE         0106       

       0000'CF49          8E     7D  0108 21300 	MOVQ	(SP)+,W^NET$AQ_CIRNAMDS[R9] ; STORE THE DESCRIPTOR

            51       0000'CF     9E  010E 21400 	MOVAB	W^NET$GT_DSTNODE,R1	; ADDRESS OF STORED STRING

            53       0001'CF49   7E  0113 21500 	MOVAQ	W^NET$AT_CIRNOD+1[R9],R3 ; POINT TO NODE NAME

                          FEE4'  31  0119 21600 	BRW	NET$MOVE_STRING		; MOVE NODENAME AND RETURN

                                     011C 21700 

                                     011C 21800 	.END

NETPROCRE       - PROCESS CREATION                               22-AUG-1978 00:58:55   VAX-11 MACRO X0.3-11               Page   7

SYMBOL TABLE                                                                                                                     (1)



$$T1           = 00000000            NET$C_DR_FMT   = 00000005            UCB$B_SPR        00000075            

BIT...         = 00000000            NET$C_DR_IMLONG= 0000002B            UCB$B_STATE      00000052            

GBL...         = 00000000            NET$C_DR_LOSS  = 00000028            UCB$B_TRACKS     0000003D            

MSG$_ABOOPR    = 00000011            NET$C_DR_NOBJ  = 00000004            UCB$B_TYPE       0000000A            

MSG$_ABORT     = 00000030            NET$C_DR_NOCON = 00000020            UCB$B_VERTSZ     0000003F            

MSG$_ACCRSP    = 00000021            NET$C_DR_NOLINK= 00000029            UCB$C_LENGTH     00000074            

MSG$_CONFIRM   = 00000031            NET$C_DR_NONZ  = 00000015            UCB$C_LOGLNK   = 00000001            

MSG$_CONNECT   = 00000032            NET$C_DR_NOPATH= 00000027            UCB$K_LENGTH     00000074            

MSG$_CRUNSOLIC = 00000002            NET$C_DR_NORMAL= 00000000            UCB$L_AMB        00000054            

MSG$_DELPROC   = 00000003            NET$C_DR_PROTCL= 00000007            UCB$L_ASTQBL     00000010            

MSG$_DELSMB    = 00000014            NET$C_DR_RSU   = 00000001            UCB$L_ASTQFL     0000000C            

MSG$_DEVOFFLIN = 00000005            NET$C_DR_SEGSIZ= 00000025            UCB$L_CPID       0000005C            

MSG$_DEVONLIN  = 00000007            NET$C_DR_SHUT  = 00000003            UCB$L_CRB        00000020            

MSG$_DISCON    = 00000033            NET$C_DR_THIRD = 00000008            UCB$L_DDB        00000024            

MSG$_EXIT      = 00000034            NET$C_DR_ZERO  = 00000017            UCB$L_DEVCHAR    00000034            

MSG$_INIOPR    = 00000010            NET$C_MAXCIR     ********   X   05   UCB$L_DEVDEPEND  0000003C            

MSG$_INTMSG    = 00000035            NET$FIND_NAMBLK  ********   X   05   UCB$L_DPC        00000080            

MSG$_OPREPLY   = 00000009            NET$GB_DSTOBJ    ********   X   05   UCB$L_DUETIM     0000005C            

MSG$_OPRQST    = 00000008            NET$GB_TMP_SRV   ********   X   05   UCB$L_DX_BFPNT   0000009C            

MSG$_PATHLOST  = 00000036            NET$GL_NAME_PTR  ********   X   05   UCB$L_DX_BUF     00000098            

MSG$_PROTOCOL  = 00000037            NET$GL_RES_PTR   ********   X   05   UCB$L_DX_RXDB    000000A0            

MSG$_REJECT    = 00000038            NET$GQ_ACCESS    ********   X   05   UCB$L_EMB        00000078            

MSG$_RESOPR    = 00000013            NET$GQ_TERM      00000000 RG    03   UCB$L_FIRST      00000014            

MSG$_SCANBAD   = 00000028            NET$GQ_UTLDESC   ********   X   05   UCB$L_FPC        0000000C            

MSG$_SCANRSP   = 00000029            NET$GT_DSTNODE   ********   X   05   UCB$L_FQBL       00000004            

MSG$_SMBDON    = 00000009            NET$GW_CHANNEL   ********   X   05   UCB$L_FQFL       00000000            

MSG$_SMBINI    = 00000008            NET$GW_SRCADDR   ********   X   05   UCB$L_FR3        00000010            

MSG$_SMBRSP    = 00000020            NET$GW_TMP_SEG   ********   X   05   UCB$L_FR4        00000014            

MSG$_SNDACC    = 0000000A            NET$MAILBOX_CI   00000000 RG    05   UCB$L_IOQBL      00000044            

MSG$_SNDSMB    = 00000004            NET$MBX_UNIT     ********   X   05   UCB$L_IOQFL      00000040            

MSG$_SUSOPR    = 00000012            NET$MOVE_STRING  ********   X   05   UCB$L_IRP        0000004C            

MSG$_THIRDPARTY= 00000039            NET$START_USER   00000009 RG    05   UCB$L_LINK       0000002C            

MSG$_TIMEOUT   = 0000003A            NET$XMT_DC       ********   X   05   UCB$L_LOGADR     00000064            

MSG$_TRMHANGUP = 00000006            NET_CIR_IDX      00000002 R     04   UCB$L_MAXBLOCK   00000084            

MSG$_TRMUNSOLIC= 00000001            NET_PROC_IDX     00000000 R     04   UCB$L_MEDIA      0000008C            

MSG$_XM_ATTN   = 0000000D            NET_Q_IMAGE      0000000E R     03   UCB$L_NT_DATSSB  00000074            

MSG$_XM_DATAVL = 0000000B            STS_NETLOG     = 00000007            UCB$L_NT_INTSSB  00000078            

MSG$_XM_SHUTDN = 0000000C            SYS$CREPRC       ********   X   05   UCB$L_OPCNT      00000060            

NET$AB_CIRSRV    ********   X   05   UCB$B_AMOD       00000053            UCB$L_OWNUIC     0000001C            

NET$AL_CIRPID    ********   X   05   UCB$B_CEX        00000077            UCB$L_PID        00000028            

NET$AQ_CIRNAMDS  ********   X   05   UCB$B_CM1        0000004A            UCB$L_RQBL       00000004            

NET$ATTENTION    ********   X   05   UCB$B_CM2        0000004B            UCB$L_RQFL       00000000            

NET$AT_CIRNAM    ********   X   05   UCB$B_DEVCLASS   00000038            UCB$L_SVAPTE     00000068            

NET$AT_CIRNOD    ********   X   05   UCB$B_DEVTYPE    00000039            UCB$L_SVPN       00000064            

NET$AW_CIRCHN    ********   X   05   UCB$B_DIPL       00000052            UCB$L_TTCHAR     0000003C            

NET$AW_CIRDST    ********   X   05   UCB$B_DX_SCTCNT  000000A6            UCB$L_VCB        00000030            

NET$AW_CIRSEG    ********   X   05   UCB$B_ERTCNT     00000070            UCB$M_BACKP    = 00000020            

NET$BIN2ASC      ********   X   05   UCB$B_ERTMAX     00000071            UCB$M_BSY      = 00000100            

NET$C_CIRNAMLTH  ********   X   05   UCB$B_ESCAPE     0000004B            UCB$M_CANCEL   = 00000008            

NET$C_DR_ABORT = 00000009            UCB$B_FEX        00000076            UCB$M_DEADMO   = 00000400            

NET$C_DR_ACCESS= 00000022            UCB$B_FIPL       0000000B            UCB$M_DELMBX   = 00000002            

NET$C_DR_ACCNT = 00000024            UCB$B_LOCSRV     0000003C            UCB$M_DIAGBUF  = 00000002            

NET$C_DR_BADFC = 00000018            UCB$B_OFFNDX     00000094            UCB$M_DX_WRITE = 00000008            

NET$C_DR_BADLNK= 00000016            UCB$B_OFFRTC     00000095            UCB$M_ECC      = 00000001            

NET$C_DR_BADSRV= 00000023            UCB$B_REMSRV     0000003D            UCB$M_ERLOGIP  = 00000004            

NET$C_DR_CONF  = 0000002A            UCB$B_SECTORS    0000003C            UCB$M_INT      = 00000002            

NET$C_DR_EXIT  = 00000026            UCB$B_SLAVE      00000074            UCB$M_INTTYPE  = 00000080            

NETPROCRE       - PROCESS CREATION                               22-AUG-1978 00:58:55   VAX-11 MACRO X0.3-11               Page   8

SYMBOL TABLE                                                                                                                     (1)



UCB$M_JOB      = 00000001            UCB$W_DC         0000008E            

UCB$M_MOUNTING = 00000200            UCB$W_DEVBUFSIZ  0000003A            

UCB$M_NOCNVRT  = 00000004            UCB$W_DEVSTS     0000005A            

UCB$M_NT_BFROVF= 00000004            UCB$W_DIRSEQ     00000088            

UCB$M_NT_BREAK = 00000020            UCB$W_DSTADDR    00000018            

UCB$M_NT_NAME  = 00000010            UCB$W_DX_BCR     000000A4            

UCB$M_ONLINE   = 00000010            UCB$W_EC1        00000090            

UCB$M_POWER    = 00000020            UCB$W_EC2        00000092            

UCB$M_PRMMBX   = 00000001            UCB$W_ERRCNT     00000072            

UCB$M_TIM      = 00000001            UCB$W_FUNC       0000007E            

UCB$M_TIMOUT   = 00000040            UCB$W_MB_SEED    FFFFFFFC            

UCB$M_TT_NOTIF = 00000004            UCB$W_MSGCNT     00000016            

UCB$M_TT_TIMO  = 00000002            UCB$W_MSGMAX     00000014            

UCB$M_UNLOAD   = 00001000            UCB$W_NT_CHAN    0000007C            

UCB$M_VALID    = 00000800            UCB$W_OFFSET     0000008A            

UCB$S_LNKPRI   = 00000002            UCB$W_REFC       00000050            

UCB$S_LTYPE    = 00000002            UCB$W_SIZE       00000008            

UCB$T_PARTNER    0000000C            UCB$W_SRCADDR    0000001A            

UCB$V_BACKP    = 00000005            UCB$W_STS        00000058            

UCB$V_BSY      = 00000008            UCB$W_UNIT       00000048            

UCB$V_CANCEL   = 00000003            UCB$W_VPROT      0000001A            

UCB$V_DEADMO   = 0000000A            

UCB$V_DELMBX   = 00000001            

UCB$V_DIAGBUF  = 00000001            

UCB$V_DX_WRITE = 00000003            

UCB$V_ECC      = 00000000            

UCB$V_ERLOGIP  = 00000002            

UCB$V_INT      = 00000001            

UCB$V_INTTYPE  = 00000007            

UCB$V_JOB      = 00000000            

UCB$V_LNKPRI   = 00000006            

UCB$V_LTYPE    = 00000000            

UCB$V_MOUNTING = 00000009            

UCB$V_MSGACK   = 00000004            

UCB$V_MSGFLO   = 00000003            

UCB$V_NOCNVRT  = 00000002            

UCB$V_NT_BFROVF= 00000002            

UCB$V_NT_BREAK = 00000005            

UCB$V_NT_NAME  = 00000004            

UCB$V_ONLINE   = 00000004            

UCB$V_POWER    = 00000005            

UCB$V_PRMMBX   = 00000000            

UCB$V_SEGFLO   = 00000002            

UCB$V_TIM      = 00000000            

UCB$V_TIMOUT   = 00000006            

UCB$V_TT_NOTIF = 00000002            

UCB$V_TT_TIMO  = 00000001            

UCB$V_UNLOAD   = 0000000C            

UCB$V_VALID    = 0000000B            

UCB$W_BCNT       0000006E            

UCB$W_BCR        00000096            

UCB$W_BOFF       0000006C            

UCB$W_BUFQUO     00000018            

UCB$W_BYTESTOGO  0000003E            

UCB$W_CHARGE     0000004A            

UCB$W_CYLINDERS  0000003E            

UCB$W_DA         0000008C            

NETPROCRE       - PROCESS CREATION                               22-AUG-1978 00:58:55   VAX-11 MACRO X0.3-11               Page   9

PROGRAM SECTION SYNOPSIS                                                                                                         (1)







PROGRAM SECTION SYNOPSIS



.  ABS  .        00000000      00     NOPIC   USR   CON   ABS   LCL NOSHR NOEXE NORD  NOWRT BYTE  

. BLANK .        00000000      01     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD    WRT BYTE  

$ABS$            FFFFFFFE      02     NOPIC   USR   CON   ABS   LCL NOSHR   EXE   RD    WRT BYTE  

NET_PURE         00000029      03     NOPIC   USR   CON   REL   LCL NOSHR NOEXE   RD  NOWRT BYTE  

NET_IMPURE       00000003      04     NOPIC   USR   CON   REL   LCL NOSHR NOEXE   RD    WRT BYTE  

NET_CONNECT      0000011C      05     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD  NOWRT BYTE  





THERE WERE NO ERRORS OR WARNINGS.

17178. BYTES LEFT IN FREE MEMORY POOL.

2774. BYTES OF RECLAIMED MEMORY.

OBJ$:NETPROCRE,LIS$:NETPROCRE/-SP=EXECML$/ML,M1/ML,M2/ML,SRC$:NETPROCRE

48 MLB DIR RDS - 446 GETS TO DEFINE 16 MACROS. 26 INTER. FILE WRITES. 

