PDP-10 Archive: new-subsys/dluser.exe from BB-J713A-BM

Trailing-Edge - PDP-10 Archives - BB-J713A-BM - new-subsys/dluser.exe

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

?p0 0?h0?x "

<++2	`V

mp0o2mh+\+e0)u)y) 	
L3\"B BJ "4aF+
Q "0+ 
S*!$, 
S/@@] $f "p B 
T B\"e B\"t B B " B@@\"( B " B "m B "f $
T2 
U "f $
V2`b+
ZZ++e "f $
\2 
]@@m*"t\"
^ Bo\"
_ Bp\"
_ Bp!" Bm "f $
`2`b+
aZD9 "f $
b2`b+
g 9 
h+
i+ J\$
j@!"\$B54
n`bp+
p FS\"K ,C 9\$
r@ 9\$K & (\$U@ S B] $ D: $:\&T 
u@@_*8_ 
u@@`*8` 
v@@a*8a 8_ X? 8` X@ 8a XA 8 X_ X` XaX8XQ8A` XAP4
v 9 $\$K@\$
x\$T!.{\$
x@ 8; 
xJ,C*n&\$
x@@ <_,K\$
x@@ <`,K\$
x@ @ 
xJ,C\$
x@ <a,K 9\$
y@\$X@\$
y@!"\$B S54
}`b`+
}`b+
& FS\"K ,C+\"
 " " @+ +  $1DP+\"\"K\"
y+r 8p 9 & : `+P $ ` 9J,C4Dr<zS9N\"<+T

STR:<DIRECTORY-NAME>
 PASSWORD
 LOGGED IN QUOTA
 CAPABILITIES
 FILES ONLY, ALPHA ACCTS, REPEAT LMSG
 LOGGED OUT QUOTA
 DIRECTORY NUMBER
 DEFAULT FILE PROTECTION
 DIRECTORY PROTECTION
 DEFAULT RETENTION SPECIFICATION
 LAST LOGIN
 USER GROUPS
 DIRECTORY GROUPS
 MAXIMUM SUBDIRECTORIES
 CREATABLE USER GROUPS
 DEFAULT DIRECTORY ACCOUNT

 "f $2 "f $
b2`b+
gO@	,;<+\\"B BJ "f $
2`$+ D] $
b2`b+
g ]'"0B+ ] J(+ $D BJ+u "f $
b2`b+
g\"	+u		TOPS-20 DLUSER
FUNCTIONS:
	1) DUMP ONTO A FILE IDENTIFYING INFORMATION ABOUT EACH DIRECTORY
IN THE SYSTEM
	2) CREATE DIRECTORIES ON A SYSTEM BY LOADING IDENTIFYING 
INFORMATION FROM A FILE

COMMANDS:
	DUMP (TO FILE) FILE-SPECIFICATION
	  DUMP DIRECTORIES TO FILE
	EXIT (TO MONITOR)
	  LEAVE THIS PROGRAM
	HELP
	  PRINT THIS MESSAGE
	LOAD (FROM FILE) FILE-SPECIFICATION
	  LOAD DIRECTORIES FROM FILE
	STRUCTURE (TO USE) STR-NAME:
	   SPECIFY STRUCTURE TO DUMP FROM/LOAD ONTO
	   (DEFAULT IS CONNECTED STRUCTURE)

THIS PROGRAM IS USEFUL FOR MOVING ALL DIRECTORIES FROM ONE FILE SYSTEM
TO ANOTHER.  IT WILL NOT MOVE A SUBSET.  IT MUST BE RUN WITH WHEEL OR
OPERATOR CAPABILITIES ENABLED.
 "f $2 "f $2`b+ZD9 "f $
b2`b+
g 9 ++	a,
+
,

+
 
 J:,
+
!.{,

+
 &J+ D8;*n	f <_,
 \? <`,
 \@,

+
 &J+ D@ <a,
 \A 
 JA,
+
!" =0dl" B:\"B P4	x B]+	a "Z1B;+  " U$@+'++\"\"B\"
y+	a
`d+
&\",   9 &

\"
y+e41D+
1D@D5D
+r40D+

+r 941D+
0D+
 
Jh*ij+.40D+
+
 
Jh*ijQ*A` $D,
,~ $d $D+r,

 9 8p &J+
" D`4D
"08p+
$9
/ Xp,~\"/<+
%@@] 9	+ \"4+u^^_
F
=
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F
F7@]/,>,>,>\"5 "  ]+  " ",^,^,^/,>\"7,^/DUMPEXITHELPLOADSTRUCTURE1 ?WHEEL or OPERATOR capability required
\"
L<+\%
+ b
? NOT A DLUSER COMMAND
\"
W+oTO FILE@H
[mXnUSERSTXT770000@,;+o
? INVALID COMMAND CONFIRMATION
\"
c+o,;+o<*>
?Unable to get first directory\"
j,;+e\"
j<+eDump of all directories on: x`,aLb,B+e+:
 @

?Unable to get next directory\"
y<+e
?JSYS ERROR:\"
y,~ - 
? GROUP BLOCK IS TOO SMALL, ABORTING ...
TO MONITOR@HTO USE@H	STRUCTURE NAMEDSK@8HH
? INVALID STRUCTURE NAME GIVEN
\"+o$$,;+eFROM FILE@H,;+o,;+oHT0F+	x+	h0F+	x+	oHX`:~`:\"B  P4	{ B]+	aERSTR: UNDEFINED ERROR NUMBER - \"#+	~ERSTR: INTERNAL CONFUSION - \"(+	~?Error while reading - Q*A`+

? GROUP BLOCK TOO SMALL, ABORTING ...

DONE.
 Working on directory  Unexpected interupt - ignored...
 "   " "\"s " U$@+ + \"u,~,;<\"u+C.p5>K,>p,p+J,^/:x,~,^/,~/pPp,>x/x`|+L+F,> .p5>T,p+y Z,^:x,~/pPp,>x/x`|+U+Q,> .z5>{hh,p+y Z,^:x,~,>,p7:,^,~,>,>,p7:,^,^,~,>,>,>,>,p7:~,^,^,^,^,~.~5>~
|}~,p7:|~}
|/~,~:x,~
? JSYS ERROR: 
PROGRAM CANNOT CONTINUE
OZ,^,~/z,>,>,>,>+Z@+k66`o[Oi;Q>#sE>#Gkdjkbdkbdka`ka]IYO`G~OX Pzd"OTI@O< xO%?OLZWPk"PimOE0^OE!"OD~wODJGODF*

OD9

OD9OD9OD9
OD9
OD9	OD9	OD9

OD9

OD9OD9OD9OD9OD9OD9OD7,OD7OD3QOD17OD,'>OD,?>9[W>3;[PHhfPHhePHhePHgLA$5C AP N:pN9XhxN9WF|N9&m{3!U_q$Tmzt9QVS$KVSLVSMFVSXJ8Qr1;,~rM',2M'*hM'(@M&~(M&rI@M&NtM&NM&<]M&<\ M&4
M&/DM&-)C

T,Cz)0;

St,;J"hXRD89w+z#,Z9Z897s;I\OOrcOOqhvj	XnE%	ON?)ON36ON-@ON-ON|ONONkONMON

]ON

VODpOD9_O=@AO=3EO=#O=wO=O=IO=xO<V!O<U"O<RPHhePJYc(l]S	_ZZYYUYiMW$`O
=M(]e\9s8**L(y.

MLF7MLF6>w	47::_7:9^7:9^1;,~*[3(&
%LJ5M4  M4M4SM4/M4.2)

=weU

$:U

lhU

:U

/s$c1yvQtTu?Nuu?Mpu?MoKe		QM&JQutB

(L2	a(L&	f(K*]
(K**
$(K*)
"(K*)
(K	x(K	~(KG
"am"
)

T,C

St,;'on

L9^uF
YwgjE$X,	l <
l
1T6Bm1I	P
k6JPK1+G\ S0D\.S+@.K+l>@
NszZ(yKU?r2
?r%
?r%
?K_
	L	KHY4}*20`j+RvmDut:	t'JiwW	xL
&
d2d&d%&d%:dB]KdB*SdB)PdB)Nl!Saj"wSajgKaijB`N	`dRS(cU:/JSznNwz]a
NXh

;/JP)MG2KRY"bRKRT.RKR-MKQjBfJL=AJL  JLzU JLmf`JLaU$/H#ll	T*0H_M"
+JFDQ@JFD RD89w+z#,R8H.48v:tYN+sVO
FR.4%t(IA/Gb,yktXcZ]Zh0\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'dw]!+{0