PDP-10 Archive: tools/monrd/monrd.exe from tops20_version7_0_tools_tape_clock

Trailing-Edge - PDP-10 Archives - tops20_version7_0_tools_tape_clock_tape - tools/monrd/monrd.exe

There are 13 other files named monrd.exe in the archive. Click here to see a list.

?p00`
?hG?x+1KP->

G0a

13 *u *v B@`*j@@*i@@*jOl@@
@@@@*k *v@@
}@@O@*q,n,k *w*"*p " *w*4!$,4+4 "@g4*1DXh++0D'++,D,9 *u,p6B*j	4E@@*j *v@@
} "# $+

,x ^
 
"#$+,,+C1`Y1pl2^2&2 V2(b202872@e2H[2P]2`}2pq2xq3^33(r,}6@*i +,<+ $+",x,}@@,~,}4+',~m@d@ $+(,x $++,xZ,}a@@gG,~5P55p $+2,x $+4,xZD*j,},n *j +64 B*i@@*j,~ $+8,x,}7B*i,~	4@@*id,~ $+;,x\$+< D*!$ D( $+<,xZD*j,}6@*j++A *j +B4 B*j@@*j,~6B*j	4|@@*j,~D  $,x D
 0H
,}, +
(H+C (H+E@ 
 +F@#4+@@
O@
:
 +F@#46B
3B
,+1BV+0B+,~m@, 
, ",(7 
 +G6"
, ",(7B
 
,% "

,(7"
+!"G"4A"1B7+G +H  ",(7@
 +H7D
+\"
d4 
d+ $+K,x $+O,x +Q Dd ,J,V7@7@++T D*k $+X,x $+],x, D
,} *kS*34D3"2B"K*d24$50$t++b B"K:*3 
 B&?,~ $+f,x $+g,x D*5,} *5\$ &#4 N0"++n@ " +p *5,++u B*5 " +w,++| B*N.&3&N+> "2 B*h@r*g,ZH*5,W *g$".",(ZH*5,,"+~3"N?`*h+V4BP :*g+G"+~3"N?`*h+V4BS +G? *g+2+32N+P +,~ ",+Z [A$0d $ ^,`h ,,~,,,,	,	,,

, $,,x $,,x7 +, D*4,} " *4,+,$ D*

*4 ,) , \$ &#47D ,,4Hq ,.\"
d@@
d ,/ 
d ,/,~ $,1,x $+],x, D
 $,4,x $,6,x D*4 $,9,x,}m@ ,:,[+},l,  B*3,p`@+ " B*i6B*4;@@*i,[+} 3B*3+~+} $,@,x $+],x, ,} ,A ab+

[, ,CZ,#1"+ ,C , ,D,~,} ,~
This program is able to type words from the running monitor, whether
or not that data is in the resident monitor, swappable monitor, or
is in some fork's PSB or a job's JSB.  Commands are:


CLEAR		Zero the internal symbol table.  This should only be
		done if you have reason to think that the program's
		symbol table is incorrect.  Symbols are added to this
		table whenever they are found.

CLOSE		Close log file if one was in progress.

COLUMNS c1 ...	Specify what kind of output is typed when showing a
		location.  The default is to show the address, the
		value in octal, and the value in halfword symbols.

DEFINE s e1	Define the symbol s to have the value of the expression
		e1.  This is used only for ease in typing in of other
		expressions.  Typeout will never print the symbol.

FORK n		Set which system-wide fork handle we are interested in.
		This must be specified if locations in a PSB or JSB
		are to be typed.  A list of the forks for a job is
		obtained by using the LIST command.

LIST n		List all the system-wide fork handles of a job.  The
		output is ordered so that you can tell the fork
		structure of the job.

LOG file	Make a log file showing all valid commands and output.

MDDT		Enter MDDT.  MRETN$G will return.

SUPPRESS arg	Specify that certain output is to be suppressed.  Arg
		can be one of the following:

		COMMAND-ECHOING  Don't show the command line in the
				 log file or to the terminal.
		TTY-OUTPUT	 Don't type anything to the terminal.
				 An error will clear this.
		ZERO-WORDS	 Don't type locations which are zero.

SYSTAT arg	Do a systat of the indicated jobs.  Arg can be any of
		a job number, a user name, or just CRLF for all jobs.

TAKE file	Take commands from the specified file.

TYPE e1 e2	Type out words from location e1 to location e2, where
		e1 and e2 are expressions containing symbol names and
		integers using the normal arithmetic operators.  Typing
		a ^E will abort the typeout.

UNSUPPRESS arg	Undoes effects of the SUPPRESS command.

WATCH e1 n	Continuously watch the contents of location e1,
		typing it whenever it changes, sleeping n milliseconds
		between checks.  Typing a ^E will abort the watching.

VALUE e1	Find the value of the expression e1.

EXIT		Leave the program.

HELP		Type this message.

---------
Examples:	1.  To type the JSYS stack for fork 0:

			FORK  0
			TYPE  UPDL  UPDL+NUPDL-1

		2.  To type the schedular tests for all forks:

			TYPE  FKSTAT  FKSTAT+NFKS-1

		3.  To type the JFN block of JFN 3 for the current fork:

			TYPE  JFN0+3*MLJFN  JFN0+4*MLJFN-1

		4.  To watch the process PC of the current fork:

			WATCH  PPC


Notes:		There are some quantities which can be used in
		expressions which are useful.  These are the following:

		'J	The currently selected job number.
		'F	The currently selected fork number.
		'E	The value of the latest expression typed in.
		'V	The value of the location last typed out.
		'R	The right half of the location last typed out.
		'L	The left half of the location last typed out.
		'A	The address of the last location typed out.


		Numbers in expressions are in octal, unless they contain
		the digits 8 or 9 or are followed by a period, in which
		case they are decimal.

 $,H,xO@*q $,J,x,j $,L,x $,N,xj&5F`,k *w*"*p,~8Ix,PJ,RIJ(,TJH,UJ`,WJx,XZ4Dn7@:*q1& D*q,~ $f,j $h,j $i+j $,[,x $+],x, D
~ ,\*$
T\$
@ D $,^,x $,x, D
,} 
~ B
,[+},l,+~,[+,b`@6@,p 
3B
+3b
;
>
`@++}a0H+Y+[ +Q Dd  ,d,,V6@+,g D*k,~,2+
,V1N+1N+G  ,.DH,V1N+1N+G  ,R,~,"+,2,i,$DH,V1N+1N+G  ,R,~,*H&DH+,34(,J5D2,V1N+$0N+
,,V0N+
,~,V!$|[(2N*d%6 +,mZ(+,(,0-P.`0/017
 *k,~7 5$+,r7!e$ ,~,]+,v,~  7, ( DaF d@ l @,V0.0. +=lh$$ .$?h+90N1N+50N+AaH{+5,V0. 0n-1N+G0.0n1N+G1N+GG  ,~ DaF d@ l @d,~@,V0. 0n-+N$$.$?e+K0.0n+Q$$.$?h+K1N\.1N\.1N\.5.F$$.$8+Ke@ `.1N+V0.00n=,~/.,~ 
2"M2bM+b " ,w 
/M7(+,{,,~ B+2"L2bL+i " ,| 
/L7(+,{,,~ B+`b+lQ" $d4+`bp,~ 
 BF "DK4+O@*p@@*q:*p7H *l+ *q,([.".B*q , +q B*l",} R,% .,",}4B|, ., . !"bB*l,Z*l,",~4B .,, .,,~ B
}[4B, .,,Z
}0"1B+ B
~ 
~,J+0&+ F
~ ,.7@
~,~ ., 
~+ 
, .,,~ ,~ &0.1N? .,=f,~ [,* ,CZ+*7 ",Q"A`4N,+7+g &5"! .,"&"4B#QDx,![x .,,~4B@)" .,+%3b,~ .,+( , & .8,=f+,~d"@&"4B1QDx,.[x@0$0d7 .0$0d7 .1D .1D .1D .,,~\"4!(D !" G"42B G  B *h<a@,~@@\"-:0D,~!(}4H "  I,+H B L*hE,~ -! O+S4HP"2$ {2d c*hK5(P / {  :x,~ D@,> "'4Xd$@S"2D *hT5(Y 2b c B c:,^,~0(h+W / B { D  F c:+WS*34Ha"2D "K*h_5(a  &?+S4He"2D *hc5(e  {+ D@,> "'4X0(h+W  B  D { D c:+W@@*idl@,~ -/4,~a@,~ "04d,~,>6B*i B*h@@*il,^/4S*j6@m - F#24`b+,~ $-

,x`@,~7@*jl -
d,~g44" :x,~ld -d "A$1DH+ "   -\"
dU$ &}+ +  
d6@*j - ,/,{+C,{ -+C ,/3<+4NN0N;@@0N6@
}7,~,>,>,>@F\"
Ua@\$
U6B*i`@74,^,^,^ *v@@
},~I x-
x
dx
,d( *ht+0+0<UO4@UO4]aO4@aO4]ggj`]V5<`------t_A_A_A_A _A(_A0_A8_A
_A
_A
 _A
0_A
@_A
P_A
`_A
p2AARA A0NA@NAP>A`;Ap*AAAA A0A@APA`ApGe@S:N@A" A"0A"@A"PA"`GeJ B-`iRA* A*0A*@et2S8W g&=gRK`gRM9gRN@S:Y@W$-3S;]W&
 O

@O UON0CV<OnO&`I

@I InI&`I$@IO, I7-@IN`I6~i I6~k@M'@Kc$[RI6~i6I6~kVM'F M3& kIpMNCT,S2$ YS IBM M%@M%PM$ M& M&* M&+ M&(@MNMN@MNPMN MN MN* MN+ MN(@M7M7@M7PM7 M7 M7* M7+ M7(@M0M5@M5PM4 M6 M6* M6+ M6(@[?4P[?4Z [?4[ [?4\`[?60[?6: [?6; [?6<`[?5`[?5j [?5k [?5l`[?5P[?5Z [?5[ [?5\`S7-@S7-J S7-K S7-H@[V`[Ve[VeP[Vd SN`SNj SNk SNh@I'0I'5I'5PI'4 CN@e? YN@U5pCND0e?$0YND0_AE`KbE3 C>,C>+@UK@U@q [aW
@aWa?a? UOUOUNUJC C%C%PC$ gVgVgVPgV GHGM@GLPGMI GLGLy GM`GLpGhGm@GlPGmI GlGly Gm`GlpUVnUVnUVn	 UVnUVn UVn	rUVn@UVn	`g.Ng.Ng.N	 g.Ng.N g.N	rg.N@g.N	`C>PC>U@C>TPC>UI C>TC>Ty C>U`C>TpC?C?@C?PC?I C?C?y C?`C?pg>Pg>U@g>TPg>UI g>Tg>Ty g>U`g>Tpg?g?@g?Pg?I g?g?y g?`g?pg' g'* g'+ g'(@C: C:%C:%PC:$ C:$8 C:$84C:$86C:$81g%Pq6~i4g%[ g%X@C:$; C:$;4C:$;6C:$;1g$g$ g$ g$@q?q?q?Pq? S?S?S?PS? C:$8@C:$8TC:$8VC:$8QKG0KG5KG5PKG4 g$8 g$84g$86g$81_J_J _J _J@g$; g$;4g$;6g$;1_JP_JZ _J[ _JX@_J _J* _J+ _J(@g%pg%z g%{ g%x@Q2`q"eJ Q2ePQ2f0QJ`QJeQJePQJf0Q2g Q2g* Q2g+ Q2g,`QJg QJg* QJg+ QJg,`Q2epQ2ez Q2e{ Q2e|`QJepQJez QJe{ QJe|`Q2dPQ2dZ Q2d[ Q2d\`QJdPQJdZ QJd[ QJd\`QKQKQKPQK0Q3Q3Q3PQ30QK QK* QK+ QK,`Q3 Q3* Q3+ Q3,`QKpQKz QK{ QK|`Q3pQ3z Q3{ Q3|`QKPQKZ QK[ QK\`Q3PQ3Z Q3[ Q3\`iJpi2piJtPi2tPiJti2tiJu`i2u`ipiNpitPiNtPitiNtiu`iNu`iKPi3PiKTPi3TPiKTi3TiKU`i3U`iPiOPiTPiOTPiTiOTiU`iOU`iJi2iJPi2PiJi2iJ`i2`iiNiPiNPiiNi`iN`iJxi2xiJ|Pi2|PiJ|i2|iJ}`i2}`ixiNxi|PiN|Pi|iN|i}`iN}`CCCCCC _A:`k6~i k6~i6_A:@_A:`i&|Pi&}`eMpoJMpENMpEMp_A:@_A:`i&|X@i&}h@eMx@oJMx@ENMx@EMx@_A:@_A:%`_A:4_A:4 _A:4@_A:4`_A:5_A:5 _A:5@_A:5`_A:D_A:D _A:D@_A:D`_A:E_A:E _A:E@_A:E`_A:T_A:T _A:T@_A:T`_A:U_A:U _A:U@_A:U`_A:d_A:d _A:d@_A:d`_A:e_A:e _A:e@_A:e`_A:t_A:t _A:t@_A:t`_A:u_A:u _A:u@_A:u`y`	Q,H
U.*lv2
? MONRD JSYS not installed, run SYSDPY to install itd *x++*}
? WHEEL or OPERATOR capabilities requiredd *+
? MONRD JSYS gave wrong answer for test functiond ++MCLEARCLOSECOLUMNSDEFINEEXITFORKHELPLISTLOGMDDTSUPPRESSSYSTATTAKETYPEUNSUPPRESSVALUEWATCH
% Log file is not yet closed.
CURRENT IN-CORE SYMBOL TABLE@x+
? Unable to enter MDDTd +#+++%OUTPUT OF@x+'TTY-OUTPUTcH+)COMMAND-ECHOINGZERO-WORDSOUTPUT TO FILE@x+0MONRD.LOG. H+3LOG FILE@x+7COMMANDS FROM FILE@x+9CMD@
? Command files cannot be nestedd +=+CRLF for all jobsjob numberP
DetRUNTINot logged inSYMBOL@x+Jsymbolxy~ x@x@xa H+L+MH
,
? Bad symbol typedd +R+TO HAVE THE VALUE@x+Vsymbolic expressionxyx@x@xa H+Y+[
? Symbol table is fulld +_+FORK STRUCTURE OF JOB@x+c 
? Fork tables are too small, reassemble with larger MAXFRKd +h+ggj`
? MONRD JSYS failed to get word of SYSFK tabled +p+M/LY
? MONRD JSYS failed to get word of FKPTRS tabled +w+0H*N0H*N00H*N
% Structure of tree is bad, try command again

 (^C)unknownrunningIO waithalterror haltfork waitsleepJSYS trapaddr breakTO READ PSB AND JSB OF IS@x, 
? Negative fork numbers are illegald ,+

Kxl
? Failed to get value of JOBNOd ,+
? Fork is not in used ,+

*4+," ,,]+, D
*

*4,[+,# *

*4+h
Fork belongs to job , not logged in, user ???

LOCATION@x,0WITH SLEEP INTERVAL OF@x,21000 H,5MILLISECONDS@x,8
[Type ^E to return to command level]
OF EXPRESSION@x,?
Value  =  ,,  =  .

TO SELECT FOR OUTPUT ARE@x,EDEFAULTfH,IAND@x,Lf,MADDRESSXASCII(INSTRUCTION(wOCTALpSIXBIT0%SYMBOLIC@WORDS FROM LOCATION@x,Y%@
@TO LOCATION@x,\
? Failed to read specified wordd ,_+~

? Illegal expression typedd ,d+
? Illegal quote quantity typedd ,i+
? No fork number is selected yetd ,n+
? Unknown symbol typedd ,s+aO4@
? No fork was specifiedd ,x+UO4@6$.*l$*lH
$


% Symbols do not match current monitor, clearing symbol table


? MONRD JSYS failed to find value of ( MONRD>
? Aborting log file because of error:
?  - command file aborted
Command file completed

JSVARJSVARZPSVARPSVARZSYSFKNUFKS6-6`-W=(vW=CO
q>'W
q,XhOvA+OH8'O2gO2d#WQ,WQ&gWQ&WQ
WPmJWPXOOrc OOqh WBI
WB5`WB#JO9RHOjLOjr#eOXO{O/L`OO

2ONdiON`wONq}ONK]ON@^ON@ION-?ON-ONtONkPJYP:=PJ!P2iP2iP	P	Py}Py|P3nN"pBDN'K6}

'dQW'];X'&NY'@Ig|@q&&{Z'/r!A}UqQwxdqQ;t
o#Oto"oG
}o"]t
UnFRlnvinoJbmXH7GmX$N*ijnSL*jjn#t
df]f[7fZ;.c;1L*jZZYYYiH2Yi?+Yi5xYi"Yiz
5jNYhPBYhP%YhP%YhK
YhJ%YhJ#
YhJ Y]xW
}Y]og]Y]c"Y]`+LY]`	OY]~IY]
~Y]D3Y]@;aY]eEY][DY\{Y\tBY\sKHW+"cUW*_xVbo"^UVbCMV`~XV`YV`Y: UVS.e0bn
9sSg	`!'QlG*4P%8**MP6OlpX9
J|2I*h7;L	M5{P?xM5z~B@5tQ+1;,~*[35F5'CG  4v	>~4v}/$3Q/#{./#{./#TKK/#A1/#4#N&?#g1{$&?"(&?V%&?w/U&>tw&>f0&>Zz.&>B:-&>=,&>!,6"k,4)O

zY"M);jM)3DdUT.2$c	RuBgJKu&+=u"w3u!W9tar5tTc
U1"RPUwTUHpUg*3HB)HB(j`=]!]M#-2N# PY1{SSMdg*kSMN*ISL`AJ:A1+g=?ig{ x+8b-gcT8aL:+#)A>+"*k,k(Q)L*i
%@V*5%
FB"am"1+E3
T
1ib@xT
1iN@xT
1i:~`xT
1i&x{T(z<Y"L

T[jLz

@B
r5>B(

<gG&/JHS^}!S^} ^{sw^{ky|^{++*l^{g|G&E%wE!*E!+>TQ\l <1Td
V1Td
K+lu_(UW[
NtY#
Nsz(TsC(T,V
Ns"rJZ*4"*5|Wi&*NS%4\S%,:S%!S%~S%S%)S%[@S%/S%P S$\`S$\OS$H:J
AS
~KukH9B9/7J/7~V	L]	KHY4}*2G`j+\!0e/Rje!U3xwk}l&z;l!Sd-!*gYg&?M""KRH.tA95
N3_e*3__t
@

"i

!h

!f_CcU:/d@MR/Q+T2)MG2L~K*qL~I"*lRL~CYL~2B*qRL~&wL~#gfL~	*pKRsKVKRl-rKRegKRaN^KR]	qKRY&qKRY"MKRVj}KRV]KR*7KR)<eRKR'xKRKR:bKQut&KQug[KQq^KQpflKQpfYKQjB#JL=AJL  JLzU JLmf`JLaUJLU:K!?<nK2Op#ll	HgVH_M"2H_4E*hHYl:9HY\gAhX z#,R8H.R61f*O+twV%t
,IA/;#;#Gb,DY(etn(aj6t7P`0\B:/\>X\>5'\7N+\2g'r'I(\)8*\)7\	\	)\+,\6.\.,[rO.O[mNO[mO[m	O[l|[l{&O[l+O[kO[kO[j]O[jRO[i%r%H([Z[X%[Qgr%0[Ms/[M"-[M	+[L,[FG[@v*r#eOD^w'lw]!+{0