PDP-10 Archive: new-subsys/dluser.exe from bb-h137f-bm

Trailing-Edge - PDP-10 Archives - bb-h137f-bm - new-subsys/dluser.exe

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

?p00 ?h0?x
COPYRIGHT (c) DIGITAL EQUIPMENT CORPORATION 1976, 1988.
ALL RIGHTS RESERVED.
+D(8X8`	88h	L8p
-8x	>9DLUSER> I3\"F BW "4aF+N "0+ P*!$, Q/@@j $t "~ B Q B\"s B\" B B " B@@\"6 B " B "{ B "t $R2 S "t $S2`b+WZ++s "t $Z2 [@@{*"\"[ B}\"\ B~\"] B~!" B{ "t $^2`b+_ZD9 "t $`2`b+d 9 f+f+ W\$g@!"\$F54k`bp+m F`\"W ,

S 9\$o@ 9\$W & (\$@ ` Bj $

 D: $:\&` r@@l*8k s@@m*8l s@@n*8m 8l X? 8m X@ 8n XA 8 Xl Xm XnX8eQ8A` XAP4t 9 $\$W@\$u\$`!.{\$u@ 8; vJ,

S*n4\$u@@ <l,v\$u@@ <m,v\$u@ @ vJ,

S\$u@ <n,v 9\$v@\$e@\$u@ C wJ,

S\$u@ D4DN!&H+P wJ,

S\$u@ D4DT!&H+U wJ,

S\$u@[E wJ,

S\$w@ZE wJ,

S\$u@[E vJ,

S\$w@ZE vJ,

S\$u@!"\$F `54{`b`+{`b+" F`\"W ,

S+ \"} " " @+ +  $1DP+\"

\"W\"v+

 8p 9 & : `+{ $ ` 9J,

S4D}9y\"

<+~
Data Format:

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
 PASSWORD ENCRYPTION VERSION NUMBER
 PASSWORD ENCRYPTION DATE/TIME
 PASSWORD EXPIRATION DATE/TIME
 PASSWORD USE DATA (CURRENT USE COUNT,,MAXIMUM USE COUNT)
 TOPS10 PROJECT-PROGRAMMER NUMBER
 "t $

2 "t $`2`b+dO@	,

K<+j\"F BW "t $

2 $

2`b+

 Di $`2`b+d i'"

0B+

 i W(+

 $D BW+ "t $`2`b+d\"	P+		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. DON'T CHANGE DIRECTORIES
	  THAT ALREADY EXIST UNLESS THEY ARE SYSTEM DIRECTORIES
	LOAD (FROM FILE) FILE-SPECIFICATION /FORCE
	  LOAD DIRECTORIES FROM FILE. MODIFY DIRECTORIES IF THEY
	  ALREADY EXIST ON THE STRUCTURE.
	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.
@@s "t $

2 "t $

2`b+

ZD9 "t $

2`ba+
6,

K+}&

1F+
;O@s "t $`2`b+d 9

+
=,+
~,+

 J:,+
!.{,+
 &J+

 D8;*n
B <l, \? <m, \@,+
 &J+

 D@ <n, \A

 JA,+
,+
 &J+

 DC,+
\$N &( (4
u

!/$4D
Z\"N@@H+
u 9 DD,+
\$N &( (4
u

!/$4D
b\"N@@H+
u 9 DD,+
 &J+

!QDE &J+

#XDE,+
 &J+

$QDE &J+

&XDE!" =0d6@s7l"X"

 B:\"F

'P4
u Bj+
= "Z1B;+

( " U$@+

/+

3\"

\"F\"v+
=
`d+"\"

4 "  9 &

\"v+s4

1D+1D@D5D+

0D++

1D+0D+ 
Wh*ij+

0D++ 
Wh*ijQ*A` $D,,~ $d $D+

, 9 8p &J+ D`4D08p+ 9/ Xp,~\"

7<+!@@j 9	+ \"

<+jkkC9CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC7@j/,>,>,>\"

= "  j+  " ",^,^,^/,>\"

?,^/DUMPEXITHELPLOADSTRUCTUREFORCE1?WHEEL or OPERATOR capability required
\"J<+j4`' o
? NOT A DLUSER COMMAND
\"T+}TO FILE@HYo8|USERSTXT770000@,

K+}
? INVALID COMMAND CONFIRMATION
\"a+},

K+}<*>
?Unable to get first directory\"h,

K+s\"h<+sDump of all directories on: 
 @
@,,
?Unable to get next directory\"x<+s
?JSYS ERROR:\"v,~ - 
? GROUP BLOCK IS TOO SMALL, ABORTING ...
TO MONITOR@H

TO USE@H

STRUCTURE NAMEDSK@8H


? INVALID STRUCTURE NAME GIVEN
\"

+}$$,

K+sFROM FILE@H

K+}``r6$,

K+}H`0F+
u+
D0F+
u+
KHe0F+
u+
QHN0F+
u+
e0F+
u+
h0F+
u+
k0F+
u+
mp:~p:\"F

(P4
w Bj+
=ERSTR: UNDEFINED ERROR NUMBER - \"

++
{ERSTR: INTERNAL CONFUSION - \"

0+
{?Error while reading - Q*A`+
? GROUP BLOCK TOO SMALL, ABORTING ...

DONE.
 Working on directory  Unexpected interupt - ignored...

COPYRIGHT (c) DIGITAL EQUIPMENT CORPORATION 1988.
ALL RIGHTS RESERVED.
"""\"+ \"

K<\"

S.p5>

[,>p,p+

Z,^/:x,~,^/,~/pPp,>

\+

V?p,>p,p+

c,^"`>p:x+

e,^"`>p,~,> .p5>

j,p+:x,~ ,>Zp>w h+

g,> ?p,p+

r Z,^:x+

sZ,^,~,>,>hh,p++:,^,~,>,>,p7:,^,^,~>
~,p7:~
~>~,~>
|}~,p7:|~}
|>|,~,>.p5>?x+p ,>Zp>w h+
? JSYS ERROR: 
PROGRAM CANNOT CONTINUE
Z,^,~hhZ,^,~+6

mE?

oC0r

_C0r

`o[

ei;

h>#s

U>#_

Wkd

kb

y?;

|IYO`GOLs|OLLzHIDlxOYnOYvOXtOXlrOXXpHIDYnORsXORq`OR^^ORK\OR8ZHIDXXOLSbOLRlOL@jOL<hOL*fOLdHIDXbOF3JOF3VOF!TOFROF

POF	NOEwLHIDWJPzd"OTI@WHoWHmUWHmQWHl3~O< xO%?OLZWWB!XPk"Pimmz

OD9

OD9OD9OD9
OD9
OD9	OD9	OD9

OD9

OD9OD9OD9OD9OD9OD9OD7,OD7OD3QOD17OD,'>OD,?>9[

s>3;

vPHhfPHhePHhePHgmP.WuPJ

sWuPJ

rWuP7

eWuP7

cHJdHfbHelHRjH>hH+fHJoLHFJHFVH3TH RHPH
NOqFxOqF|OqzOq&nOq&vOqtOp}rOphpHrXZOkXOjt`Oj`^OjL\HJ

pH+nH+vH*tH*lrHJxZH$sXH$q`H$^^H$K\HJcdHSbHRlH@jH<hH*fHJOLH3JH3VH!THRH

PH	NOF

sxOF

s|OF

LzLA$5C AP N:pN9XhxN9WF|N9&N9r_q$

jmzt9

gVS$

[VS

\VSM

VVSX

Z8Q

1;,~M'(@M&~(M&rI@M&NtM&NM&<]M&<\ M&4
M&/DM&-)

Nz!r

Sz!r

T,

Sz)0

St,

KS1&D	D i

Sznt4

KJ"hX RD89w+z#,897e@

CI\	>OOrc OOqh vj
-nE%	LOKiO>|O/gOXO{O/L`iMK	8O-|gA9OO=ONyiONm&ON_}ONK]ON@^ON@ION@FON?)ON36ON-@ON-ON|ONONkONMON

]ON

VODpOD9_O=@AO=3EO=#O="TO="O= |	O= s
O= g
O=wO=O=IO=xO<V!O<U"O<RPHhePJYP2iP2i P	P	C@WuP7
6c(ljS	lZZYYUYiMW$`O9V`\s
bV`\g
ZM(iej

K9s8**8(L(y.MLF7MLF6>w	47::k7:9k7:9j1;,~*[3(&%LJ5M4  M4M4SM4/M4.2)

=wsU

$:U

lhU

:U

/s$c1yvQt`u?Nu?M~u?M}Ks		LYf7D@/jSJJPm&XQM&WQutF

(L2
=(L&
B(Ky"rT(Kt.(K\4
;(K*](K** (K*)(K*)(K
u(K
{(KG
~"am"&

T,

St,

K'on

L9^uF
YwgjiGHE$X,	Pl <
l
1T6B{1I	P
k6JPK1+G\ S0D\.S+@.K+l>@
NszZv,=s(yK?r2?r%?r%?K_	L	KHY4}*20`j+RvmD

ut:	t'JiwW	xL"
d2d& d%4d%ed{3UdzT\dxsPdxjTdB]vdB*}dB){dB)yd4
Nl!Saj"w`ajgWaijl`N	mdRS(cU:/\|KtNJSznNwz]n
NXh

;/JP)MG2KRY"oRKRT.RKR-MKQjBtJL=AJL  JLzU JLmf`JLaU$/H#ll	T*0H_M"'JFDTJFD@JFDxJFDsJFDQ@JFD RD89w+z#,R8H.48v:YN+sVOCR.4%t6IA/Gb,yktecZ]Zc`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