Google
 
Trailing-Edge - PDP-10 Archives - walsh_goodStuff_1600 - more-uns/monrd.exe
There are 13 other files named monrd.exe in the archive. Click here to see a list.
?p00`000 	 
?hj?x " 

 

<+ :,@-2	`R0*5T(j-"2T 3Ol (@`(

@@(

@@(z4(@B ",(*4,!$,4,+4,,(@@@@#@@("@g4(0D'+(,j,W(,6B(n 6(Z@Pu,#6@(

(.,A<+A $(4,,#@@5,~,#4(:,~m@d@ $(;, $(>,Z,#a@@gG,~H  $(E, $(G,ZD(

@@( $(K,,#7B(

,~	4+	4m@@(

d,~4$(N,\$(O DP!$ DM $(O,ZD(

@@(C D(

C4,,~ "6D(

	4}6B(

	4@@(

,~D  $, D* ,#, +A

`H(QH(Q	@@*O@):)6(Q@#46B*3B',+

,N7"'+!!"G"4,A"1B7(R (S  ",N7@' (S7D'+A\"4, +A $(V, $(Z, (\ D#d ,,7@7@+(_ D( $(c, $(h,,K D",# (S'U4D5"2Bm*d44$70$t+(m Bm:'U " B#a,~ $(q, $(r, D'W,# 'W\$ &#4, q0"+(z@ " ({ 'W,(+) B'X " ),(+)	 B'q.&3&q+@ "2 B(
@r(
,AZH'X,Y (
$".",NZH'X,D,A")
3"q?`(
+X4BR :(
+I")3"q?`(
+X4BU +I? (
+A2)32q+R )

,~ ",(+\ [A$0d $ `,A`h ),~))))))))) $), $) ,7 +)% D'W,# )',+)+ D"*

'W,+)1 
" )2 ,D \$ &#4,7D )54Ht )7\"@@ )8  (,~ $)9, $(h,,K D" $)=, $)>, D'V $)B,,#m@ )C,+B,,A " B'V,*`@+A " B(6B'V;@@(,+B "3B'V++ $)I, $(h,,K ,# )J ,D#1"+ )K ,D )L,~,# ,~
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.

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 "*".

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.


		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.

 $)O, $(h,,K D! )P*$w\$c DJ $)R, $I,,K D!,# ! B",+B,,A+C,+)W`@6@",* "3B!+A3b!;">"`@+A+Ba0H(dxc(f (\ D#d  )Y,P,6@+)] D(,~,2( ,1N+T1N+YG  ,Z.DH,1N+T1N+YG  ,R,~,Z"+T,2)^,b$DH,1N+[1N+`G  ,R,~,b*H&DH+\,q4(*,5Dp,1N+i0N+O,P,0N+O,~, (1N",~1N#+n0N%+)c7$+)i,~7$+)i,~,+)n,~ # $7)  ($ D#aF d@ l @,0.0. +{lh$$ .$?h+w0N1N+s0N+aH{+s,0. 0n-1N+0.0n1N+1N+G  ,~$ D#aF d@ l @d,~@,0. 0n-+

$$.$?e+	0.0n+$$.$?h+	1N\.1N\.1N\.5.$$.$8+	e@ `#.#1N+0.00n=,~/.,~ "2"o2bp+  " )o "/o7(+)s,(,~ B"+*2"n2bo+' " )t "/n7(+)s,(,~ B"+*`b,~Q" $"d4,+* ",3 .,: ",N )u[",P )vZ",P7@"+A )u ",3+A B [4B7,7 .,:,:Z 0"1B+D B   ,p+?0&+? F  ,T7@ ,~ .,:  +D7 ")Q"A`4N*,:+B7(s &5"G .,:"&"4BIQDx,G[x .,:,~4B*@)" .,:+K3b#,~ .,:+N )v & .8,:=fQ,~d"@&"4BWQDx,T[x@0$0d7 .0$0d7 .1D .1D .1D .,:,~\"4,!(D !" G"4,2B %G  B %*hba@,~@@5\")w:40D,~!(}4H* "  k,(+n B n*hk,~ )~! q (+8S54Hv"2$ 2d *hr5(v /   5:x,~ D%@,> "'4~d$@S5"2D 5*h{5( %2b  B :,^,~0(h+~ %/ B  D 5 F :5+~S'U4H"2D m*h5(  #a+*S54H

"2D 5*h	5(

7+*D%@,>`"'4~0(h+~`%,B57DD:5+~@@(dl@,~ */4,,~a@,~"04,d,~,>6B( B(@@(l,^/4,6@(
 (,z+?,z *

+?3<+94N*N0N;#@@#0N6@7,~,>,>,>@F\"wa@\$w6B(

`@74+,^,^,^ (@@,~E*9::aNdMH l,O^9(+0+0"UO4@UO4]aO4@aO4]ggj`]V5<`*)*

******2H2T2C,)* 8* 8*2_2_2_2_]yy`tEXIT
ESS
JOBS-1
TAT
BELL.SWSKIT>MONRD.INI.1 
EXITUTPUTS-1ONRD.INI.1JOBDIR+NJOBS-1ONRD.INI.1
RD>EXIT
ESS
000,,000000
  BLKF6+143,,0



OPERATORile type]y']y]y]yOO@]y2102 Development System, TOPS-20 Monitor 4(3004)M

Kxl

zY"=

j=jco

>#oC[BI"z!c["]Z!T:

TO"ka5BN
W

5UJL!/,<* =dY"MPtMPOi* K7m
8}h,AC;5ktpZ
Naal.8.
o"jYhpRs8-sJ6eHYg-*o

KxLyg
WNx=`&	nW>

VP]Y{R

VJ


VL

VN

UZB

^

TI\gj

r^O

+"~$JSrS	"D?uFD@(.d%nnv\.d%Dd$	yAny>DxC}*2V`2H4z	?Xx%Iai[ai]m}II}Vl%v}o0Q
D}L.Rp&O}2K}2M}E:

SlM-{d1oTY]J$+#s#[FGJ%q+\B:t:h3^n

b!3]+6qz

bKoP4OD%D:	DR}'WS	00-

a,	bK~

J'}

)BeHmra

a/

Skc

a/

SkbT+@4|

Sj

Sknk>n

Sj+HXi

d +QW*(

a2(=~(j`B.5*=

a2S3\BRo2\

a[M	oPz(@LR^!0)VdL0YDqu

a8AT

bj"a`%f(lw
Nu6t6rK-NQO",NvSt*+#s"%HB+*G.SJ\S_nmX")mX%mX%ic&Q8RfeC 2&(8(L
qh+h fHM/

tLik{SEES

WS&N%$"]c2eCBmuK&_]C

du.jo}Q>R^}&|]`m<

b!u

/a '_K K
0

?"ImYr#ew]Ew]DVuMt/3w]55BM'o`w]YIr6
v!P

SkU[Zgi.L;

b!
qi~BIMP6az!3UK\5fNM-TcSMcz]Lteq_!%Nv#h$X}j.

al+/>(H.B1h?HYhp%S=+,RRl^X(lpeNZHH@%H@%Hv:HD8H+HdH9+HJlH|HfH~H7NHH7xGrsHR,6w^KzKSz6xz7Uc^

SeFosfL=@}=@0Bov63zz[Fz?Dz7az7a@Q.VE!7MGDiHXhfky(T`2]%f>E97zp7

2M"UAcog}Nw^}#lc;k8acLr5{N|?g.Of>&Am)

TK[,
Mes/MO.8fO.*uO.*sYBYBYBof/Yofgo}N?p]OMU O`M:COzro&Lo
Wdj.yeJls~U#5.^~)

Pt#SB)5jz-8G;8,r_+/W22dTl'
>#d_z9Smov2dO]LttdT\	7bL42dS(9;mov1EP.

Kyakn[gabTl/Y/K,\tCJM-h

'"l"s '7:79y$0l9y!8a9"kykz{&w]n+w]"J86Y'o;Q c\B:

<ADEv@o]g80y

a8|fumLx2dS8m	dTKmu])k[dvjlM:g

bY]7Ir'IdzY19	

e	)9%yVc\tP<CJ"

'"l"s '7:79y$0l8a9"kykz

Ky{&w]n+w]"J&()&) 	QVchi61+s5 (

{

`

4

f

 ' ''
/'
x'C|''''''''&z+9Y&t&lM>N8L`W}&k&k&j&j&i&i&h&h)1&g&g&f&f=s&e&e&d&d&c&c&J61'0{000t>WBLr27

$1@$&I&I&H&H&@6&8&7&7&6&5-&5&4&4&3&3&2&2&1@&1&+&*&*&)&)Y&(u@+O*,q_

@

@e~[< B`C)+mp&H
y
qi	rM1u	uc;+X"\J+Q+P+P+O+N+N+M+M+L+L+K+K+J+J+I+I+H+H+G+G+F+F+E+E+D+D+$/82:u%#0|,t3IH+*~O*~*}*}*|*|*{d*{*z*v$|}R4*q*p2*p*o*k*k*g*f*f*e*e*d*d*c*c%l*b*b*a*a*`*`***^*^*:*R*F Zop@*(**	aXxa~8PX8aQ*6Lk8c^rh7,C8!;tlU:5``bPi
HHSH(8(:]RM=oZ/d(gs^g[z(UX"R_1PF.d")
(PtfeUv8.QHf|Fhl
sOsY^X`Hg
FH&6\r(:[R&()&')~Ql6J5)/@(
p@	)|)6B\$`?h)'*9']('V
'E&6'A'?'/#'

`

4

f

 1'
'	-''& +9Y&y&s&b G$&G&?&4&0uI+O*-NA`e"@	[D`D+#
	
+jl+C7LSG+**y$}}RA*u*p*n*j*E*]*Q'%*-*'*bOx~8_8_aQ*6Xk_ aWcGj
IGH]G(?(:']yM=PF.nu0[GdOa?h
GGH&=](:([y]yy`t,@jhXHw
? MONRD JSYS not installed, run SYSDPY to install it

d (+8+(
? MONRD JSYS gave wrong answer for test function

d (+8ICLEARCLOSEDEFINEEXITFORKHELPLISTLOGMDDTSUPPRESSSYSTATTAKETYPEUNSUPPRESSVALUEWATCH
% Log file is not yet closed.
CURRENT IN-CORE SYMBOL TABLE@x(1
? Unable to enter MDDT

d (5+?+(8OUTPUT OF@x(:TTY-OUTPUT_H(<COMMAND-ECHOINGZERO-WORDSOUTPUT TO FILE@x(CMONRD.LOG. H(FLOG FILE@x(JCOMMANDS FROM FILE@x(LCMD@*P&DetRUNTINot logged inSYMBOL@x(Usymbolxy~ x@x@xa H(W(XHN
? Bad symbol typed

d (]+?TO HAVE THE VALUE@x(asymbolic expressionxyx@x@xa H(d(f
? Symbol table is full

d (j+?FORK STRUCTURE OF JOB@x(o 
? Fork tables are too small, reassemble with larger MAXFRK

d (s+?ggj`
? MONRD JSYS failed to get word of SYSFK table

d (|+?M/LY
? MONRD JSYS failed to get word of FKPTRS table

d )+?0H'q0H'q00H'q
% 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 illegal

d )!+?

Kxl
? Failed to get value of JOBNO

d )'+?
? Fork is not in use

d )-+? 

'W+)0
Fork belongs to job , not logged in, user ???LOCATION@x)8WITH SLEEP INTERVAL OF@x):1000 H)>MILLISECONDS@x)@
[Type ^E to return to command level]
OF EXPRESSION@x)G
Value  =    =  .

WORDS FROM LOCATION@x)MyhcTO LOCATION@x)Q
? Failed to read specified word

d )S+?~*
? Illegal expression typed

d )Y+?
? Illegal quote quantity typed

d )_+?
? No fork number has been specified yet

d )d+?
? Unknown symbol typed

d )k+?aO4@
? No fork was specified

d )p+?UO4@     ,,$


% 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*O
q+'OvA+OH8'O2gO2d#WQ,WQ&gWQ&WQ
WPmJOOrcOOqhO9RHOjLOjXO{O/L`OO

2OO>	ONdiON`wONN}ONK]ON@^ON@ION-?ON-ONtONkPJYPy}Py|6}Go"]twnv'noJ mXH7ImX$N(jnSL(

ZZYYYiH2pYhPBYhP%YhP%YhK*YhJ%

YhJ Y]xW Y]ogY]c"5Y]`+nY]`	qY]~kY]

UY]UY]^.hY]Ww7Y]G3Y]DhY]D3?Y]@;Y]ekY][jY\{5Y\tBIY\sKnW+"UW*xVbo"`UVbCMV`~X@V`YAV`YB: UVS.e0bn*
7;L	M5{P?xM5z~B@*[355'CG  4v	>C4vB/$3/#{T/#{T/#TK	/#AW/#4#

{i6"k8,:4)O>

zY"p);jo)3DdUT.2$ctuBgKKu&+{u"wqu!WwtarstTcOb-gT8aL:+#)A@+"(,k,(Q)L(

"%@V'W%
FB#"am"V+E3!T
1ib@xT
1iN@xT
1i:~`xT
1i&x{TNz<Y"o

T[jnz

@B&r5>BM

<g&/JHS^}!S^} ^{g$|G&#E%wE!PE!Q>TQ\7l <1Td
V1Td

csLCK+lu_(UW
NtY#
Nsz(Ts?(T,
Ns"J\'W"'X|Yi&'qS%4\S%,:S%!S%~S%S%)S%[@S%/S%P S$\`S$\OS$H:J
AS!H9B+/89T/7JY/7T~VP	L	KHY4}*2j`j+\!0e/Rj(e!U3wk#l&z;l!Sd-!(
_Yg#a_M"mR_H.t_A97_
N5_e'U__tc_CDcU:/d@AMR/Q*+T2*)MG2KRsKRKRl-uKRegKRaNZKR]	6KRY&nKRY"IKRVjKRVYKR*9KR)<aRKR'xKRKR:dKQut(KQugWKQpfhKQpfUKQjBHJL  JLzU JLmf`JLaUJLU:K!?<jK2O#ll	Hg:H_M"XH_4E(HYl:_HY\ghX z#,R8H.R61f*O+twX%tNIA/Gb,6t7W00\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[Qgr%0[Ms/[M"-[M	+[L,[FG[@v*r#eOD^w'`w]!+{ 0