操作系统开发

开发平台：
WINDOWS

FTPD.8：源码内容
							%!PS-Adobe-1.0
%%Creator: devps (Pipeline Associates, Inc.)
%%CreationDate: Fri Sep 13 14:23:47 1996
%%Pages: (atend)
%%DocumentFonts: (atend)
/devps 180 dict def devps begin
/res 10.000000 def
/y_offset 843 def
/X{exch}bind def
/mm {transform round X round X itransform} bind def
/r{rmoveto}bind def
/m{moveto}bind def
/l{lineto}bind def
/rl{rlineto}bind def
/st{stroke}bind def
/gs{gsave}bind def
/gr{grestore}bind def
/cp{currentpoint}bind def
/np{newpath}bind def
/ct{curveto}bind def
systemdict /setpacking known
 { /savepacking currentpacking def true setpacking } if
/m0{0 0 moveto}bind def
/xc{//res div}bind def
/yc{//res neg div //y_offset add}bind def
/lc{yc X xc X l st}bind def
/mc{yc X xc X m}bind def
/el{gs /a X def a div 1 X scale cp np a xc 2 div 0 360 arc st gr}bind def
/ar{cp 7 2 roll np xc 5 1 roll atan 3 1 roll atan X arc st}bind def
/sp{yc X xc X 6 2 roll yc X xc X 6 2 roll yc X xc X 6 2 roll ct}bind def
/V{//res neg div //y_offset add
currentpoint pop X
m}bind def
/H{//res div
0 transform X round X itransform pop
currentpoint X pop
moveto}bind def
/h{//res div 0 r}bind def
/v{//res neg div 0 X r}bind def
/S{X H show}bind def
/A{H //res div 1 index stringwidth pop sub 1 index length div 0 3 2 roll ashow}bind def
/psize 10 def
/height 0 def
/cheight { height 0 ne { height } { psize } ifelse } bind def
/slant 0 def
/FF{findfont X dup 30 div 0 mm pop setlinewidth /psize X def
    [psize 0 cheight slant sin slant cos div mul cheight 0 0]
    makefont setfont}bind def
/shade{gs
 /dy X def
 /dx X def
 np m
 0 /dy rl
 /dx 0 rl
 0 /dy neg rl
 /dx neg 0 rl
 closepath
 .9 setgray
 fill
gr}bind def
1 setlinecap
/resolution res 72 mul def
/startFig {
	/SavedState save def
	userdict maxlength dict begin
	currentpoint transform
	DocumentInitState setmiterlimit setgray setdash setlinejoin setlinecap
		setlinewidth setmatrix
	itransform moveto
	/ury exch def
	/urx exch def
	/lly exch def
	/llx exch def
	/y exch 72 mul resolution div def
	/x exch 72 mul resolution div def
	
	currentpoint /cy exch def /cx exch def
	/sx x urx llx sub div def
	/sy y ury lly sub div def
	sx sy scale
	cx sx div llx sub
	cy sy div ury sub translate
	
	/DefFigCTM matrix currentmatrix def
	/initmatrix {
		DefFigCTM setmatrix
	} def
	/defaultmatrix {
		DefFigCTM exch copy
	} def
	/initgraphics {
		DocumentInitState setmiterlimit setgray setdash 
			setlinejoin setlinecap setlinewidth setmatrix
		DefFigCTM setmatrix
	} def
	/showpage {
		initgraphics
	} def
}bind  def
/clipFig {
	currentpoint 6 2 roll
	newpath 4 copy
	4 2 roll moveto
	6 -1 roll exch lineto
	exch lineto
	exch lineto
	closepath clip
	newpath
	moveto
}bind  def
/doclip { llx lly urx ury clipFig } def
/endFig {
	end SavedState restore
}bind  def
/globalstart {
	fontnum psize slant height resolution currentpoint 
	pagesave restore gsave 
}bind  def
/globalend {
	grestore moveto
	/resolution exch def /height exch def
	/slant exch def /psize exch def /fontnum exch def
	F
	/pagesave save def
}bind  def
/fontnum 1 def 
systemdict /setpacking known { savepacking setpacking} if
end
/BP{
save mark devps begin m0
/DocumentInitState [ matrix currentmatrix currentlinewidth currentlinecap
currentlinejoin currentdash currentgray currentmiterlimit ] cvx def
}bind def
/EP{
end cleartomark restore showpage}def
/Encoding-1 256 array def
0 1 255 {Encoding-1 exch /.notdef put} for
Encoding-1 8#301 StandardEncoding 8#101 26 getinterval putinterval %A-B
Encoding-1 8#341 StandardEncoding 8#141 26 getinterval putinterval %a-b
Encoding-1 8#241 StandardEncoding 8#301 16 getinterval putinterval %accents
Encoding-1 8#373 StandardEncoding 8#365 1 getinterval putinterval %dotlessi
Encoding-1
dup 8#41 /copyright put
dup 8#42 /registered put
dup 8#43 /trademark put
dup 8#44 /logicalnot put
dup 8#45 /Eth put
dup 8#46 /eth put
dup 8#47 /Thorn put
dup 8#50 /thorn put
dup 8#51 /brokenbar put
dup 8#52 /degree put
dup 8#53 /divide put
dup 8#54 /multiply put
dup 8#55 /minus put
dup 8#56 /onehalf put
dup 8#57 /onequarter put
dup 8#60 /threequarters put
dup 8#101 /Aacute put
dup 8#102 /Acircumflex put
dup 8#103 /Adieresis put
dup 8#104 /Agrave put
dup 8#105 /Aring put
dup 8#106 /Atilde put
dup 8#107 /Ccedilla put
dup 8#110 /Eacute put
dup 8#111 /Ecircumflex put
dup 8#112 /Edieresis put
dup 8#113 /Egrave put
dup 8#114 /Iacute put
dup 8#115 /Icircumflex put
dup 8#116 /Idieresis put
dup 8#117 /Igrave put
dup 8#120 /Ntilde put
dup 8#121 /Oacute put
dup 8#122 /Ocircumflex put
dup 8#123 /Odieresis put
dup 8#124 /Ograve put
dup 8#125 /Otilde put
dup 8#126 /Scaron put
dup 8#127 /Uacute put
dup 8#130 /Ucircumflex put
dup 8#131 /Udieresis put
dup 8#132 /Ugrave put
dup 8#133 /Ydieresis put
dup 8#134 /Zcaron put
dup 8#135 /aacute put
dup 8#136 /acircumflex put
dup 8#137 /adieresis put
dup 8#140 /agrave put
dup 8#141 /aring put
dup 8#142 /atilde put
dup 8#143 /ccedilla put
dup 8#144 /eacute put
dup 8#145 /ecircumflex put
dup 8#146 /edieresis put
dup 8#147 /egrave put
dup 8#150 /iacute put
dup 8#151 /icircumflex put
dup 8#152 /idieresis put
dup 8#153 /igrave put
dup 8#154 /ntilde put
dup 8#155 /oacute put
dup 8#156 /ocircumflex put
dup 8#157 /odieresis put
dup 8#160 /ograve put
dup 8#161 /otilde put
dup 8#162 /scaron put
dup 8#163 /uacute put
dup 8#164 /ucircumflex put
dup 8#165 /udieresis put
dup 8#166 /ugrave put
dup 8#167 /ydieresis put
dup 8#170 /zcaron put
pop
/Enc-dict 30 dict def
Enc-dict /tmpstr1 50 string put
Enc-dict /tmpstr2 50 string put
Enc-dict /tmpstr3 50 string dup (Encoding-) exch cvs pop put
/AEnc-def { % arguments: the original font's name, encoding nr
Enc-dict begin
tmpstr2 cvs /Enc-no exch def % Remember the number in a string
dup /OrigName exch def % remember the name
findfont dup maxlength dict /newdict exch def % get dictionary for new font
{ exch dup /FID ne
   { exch newdict 3 1 roll put }
   { pop pop } % Ignore FID
   ifelse
} forall
newdict begin
/Encoding
  tmpstr3 9 Enc-no putinterval tmpstr3 0 9 Enc-no length add getinterval
  cvn load
  def % Replace encoding
currentdict /UniqueID known
{ /UniqueID UniqueID Enc-no cvi 49999 mul add def } if % Derive New UniqueID
end % newdict
/FNlength OrigName tmpstr1 cvs length def % convert name, remember length
FNlength 1 add Enc-no length add string
dup 0 OrigName tmpstr1 cvs putinterval
dup FNlength (-) putinterval
dup FNlength 1 add Enc-no putinterval
dup 0 tmpstr1 0 FNlength getinterval putinterval % Add old name
cvn dup newdict /FontName 3 2 roll put newdict definefont
end % Enc-dict
} def
/Times-Roman 1 AEnc-def pop
/R-1{/Times-Roman-1 FF}def
/R{/Times-Roman FF}def
/B{/Times-Bold FF}def
/I{/Times-Italic FF}def
%%EndProlog
%%Page: 1 1
BP
/slant 0 def
/height 0 def
480 V
10 R
720(FTPD)S
975(()S
1017(8)S
1075())S
2696(Eighth)S
(Edition)296 2989 A
4872(FTPD)S
5127(()S
5169(8)S
5227())S
960 V
9 R
720(N)S
722(NA)S
790(AM)S
858(ME)S
940(E)S
1080 V
10 R
1080(ftpd,)S
1292(in.ftpd,)S
(setup.anonftp)544 1607 A
10 R-1
2176(-)S
10 R
2258(DARPA)S
2625(Internet)S
2964(File)S
3146(Transfer)S
3514(Protocol)S
3880(server)S
1248 V
9 R
720(S)S
722(SY)S
774(YN)S
842(NO)S
910(OP)S
978(PS)S
1030(SI)S
1082(IS)S
1115(S)S
1368 V
10 B
1080(ftp)S
1242(stream)S
1577(tcp)S
1750(nowait)S
2079(root)S
2296(/usr/sbin/in.ftpd)S
3026(in.ftpd)S
1488 V
1080(tcpd)S
1309(ftp)S
1471(/usr/sbin/in.ftpd)S
1656 V
9 R
720(D)S
722(DE)S
790(ES)S
848(SC)S
900(CR)S
962(RI)S
1024(IP)S
1057(PT)S
1109(TI)S
1167(IO)S
1200(ON)S
1268(N)S
1776 V
10 B
1080(Ftpd)S
10 R
1313(is)S
1406(the)S
1555(DARPA)S
1923(Internet)S
2263(File)S
2446(Transfer)S
2815(Prototocol)S
3260(server)S
3533(process.)S
3911(The)S
4094(server)S
4367(uses)S
4566(the)S
4715(TCP)S
4926(protocol)S
1896 V
1080(and)S
1250(listens)S
1532(at)S
1630(the)S
1778(port)S
1965(speci256ed)S
2348(in)S
2451(the)S
(``ftp'')248 2599 A
2872(service)S
3183(speci256cation;)S
3745(see)S
10 B
3899(services)S
10 R
4235((5).)S
2064 V
1080(The)S
1262(ftp)S
1399(server)S
1671(currently)S
(supports)340 2060 A
2425(the)S
2573(following)S
2989(ftp)S
3126(requests;)S
3534(case)S
3733(is)S
3825(not)S
(distinguished.)560 3978 A
2232 V
10 B
1080(Request)S
1604(Description)S
2352 V
10 R
1080(ABOR)S
1604(abort)S
1836(previous)S
2207(command)S
2472 V
1080(ACCT)S
1604(specify)S
(account)313 1920 A
((ignored))375 2258 A
2592 V
1080(ALLO)S
1604(allocate)S
1943(storage)S
((vacuously))475 2259 A
2712 V
1080(APPE)S
1604(append)S
1919(to)S
2022(a)S
2092(256le)S
2832 V
1080(CDUP)S
1604(change)S
1914(to)S
2017(parent)S
2294(of)S
2403(current)S
2714(working)S
3074(directory)S
2952 V
1080(CWD)S
1604(change)S
1914(working)S
2274(directory)S
3072 V
(DELE)259 1080 A
1604(delete)S
1870(a)S
1940(256le)S
3192 V
1080(HELP)S
1604(give)S
1802(help)S
2000(information)S
3312 V
1080(LIST)S
1604(give)S
1802(list)S
1950(256les)S
2143(in)S
2246(a)S
2316(directory)S
((``ls)169 2705 A
(-lA''))237 2899 A
3432 V
1080(MKD)S
1604(make)S
1847(a)S
1917(directory)S
3552 V
1080(MODE)S
1604(specify)S
1920(data)S
2113(transfer)S
10 I
2447(mode)S
3672 V
10 R
1080(NLST)S
1604(give)S
1802(name)S
2045(list)S
2193(of)S
2302(256les)S
2495(in)S
2598(directory)S
((``ls''))271 2987 A
3792 V
(NOOP)275 1080 A
1604(do)S
1729(nothing)S
3912 V
1080(PASS)S
1604(specify)S
1920(password)S
4032 V
1080(PASV)S
1604(prepare)S
1932(for)S
2075(server-to-server)S
2740(transfer)S
4152 V
1080(PORT)S
1604(specify)S
1920(data)S
(connection)441 2113 A
2579(port)S
4272 V
1080(PWD)S
1604(print)S
1819(the)S
1967(current)S
2278(working)S
2638(directory)S
4392 V
1080(QUIT)S
1604(terminate)S
2010(session)S
4512 V
1080(RETR)S
1604(retrieve)S
1938(a)S
2008(256le)S
4632 V
1080(RMD)S
1604(remove)S
1931(a)S
2001(directory)S
4752 V
1080(RNFR)S
1604(specify)S
(rename-from)527 1920 A
2472(256le)S
2626(name)S
4872 V
1080(RNTO)S
1604(specify)S
1920(rename-to)S
2354(256le)S
2508(name)S
4992 V
1080(STOR)S
1604(store)S
1825(a)S
1895(256le)S
5112 V
1080(STOU)S
1604(store)S
1825(a)S
1895(256le)S
2049(with)S
2253(a)S
2323(unique)S
2621(name)S
5232 V
1080(STRU)S
1604(specify)S
1920(data)S
2113(transfer)S
10 I
2447(structure)S
5352 V
10 R
1080(TYPE)S
1604(specify)S
1920(data)S
2113(transfer)S
10 I
2447(type)S
5472 V
10 R
1080(USER)S
1604(specify)S
1920(user)S
2113(name)S
5592 V
1080(XCUP)S
1604(change)S
1914(to)S
2017(parent)S
2294(of)S
2403(current)S
2714(working)S
3074(directory)S
5712 V
1080(XCWD)S
1604(change)S
1914(working)S
2274(directory)S
5832 V
1080(XMKD)S
1604(make)S
1847(a)S
1917(directory)S
5952 V
1080(XPWD)S
1604(print)S
1819(the)S
1967(current)S
2278(working)S
2638(directory)S
6072 V
1080(XRMD)S
1604(remove)S
1931(a)S
2001(directory)S
6240 V
1080(The)S
1262(remaining)S
1695(ftp)S
1832(requests)S
2187(speci256ed)S
2570(in)S
2673(Internet)S
3012(RFC)S
(959)150 3227 A
3402(are)S
(recognized,)467 3551 A
4043(but)S
4196(not)S
4349(implemented.)S
6408 V
1080(The)S
1264(ftp)S
1403(server)S
(will)157 1677 A
1861(abort)S
2095(an)S
2217(active)S
2486(256le)S
2643(transfer)S
2980(only)S
3186(when)S
3432(the)S
3583(ABOR)S
3891(command)S
4315(is)S
(preceded)364 4410 A
4802(by)S
4930(a)S
5003(Telnet)S
6528 V
1080("Interrupt)S
1501(Process")S
1877((IP))S
2062(signal)S
2329(and)S
2501(a)S
2573(Telnet)S
2858("Synch")S
3218(signal)S
3485(in)S
3590(the)S
3739(command)S
4161(Telnet)S
4445(stream,)S
4765(as)S
4875(described)S
6648 V
1080(in)S
1183(Internet)S
1522(RFC)S
(959.)175 1737 A
6816 V
10 B
1080(Ftpd)S
10 R
1315(interprets)S
1723(256le)S
1880(names)S
(according)397 2165 A
2590(to)S
2696(the)S
(``globbing'')492 2847 A
(conventions)485 3367 A
3880(used)S
4092(by)S
10 B
4220(csh)S
10 R
4360((1).)S
4556(This)S
4763(allows)S
5054(users)S
6936 V
1080(to)S
(utilize)252 1183 A
1460(the)S
1608(metacharacters)S
(``*?[]{}304''.)454 2239 A
7104 V
10 B
1080(Ftpd)S
10 R
1313(authenticates)S
1864(users)S
(according)397 2096 A
2518(to)S
2621(three)S
2848(rules.)S
7272 V
1080(1))S
1440(The)S
1625(user)S
1821(name)S
2067(must)S
2290(be)S
2413(in)S
2519(the)S
2670(password)S
3078(data)S
3274(base,)S
10 B
3506(/etc/passwd)S
10 R
3999(,)S
4052(and)S
4225(not)S
4381(have)S
4599(a)S
4672(null)S
4856(password.)S
7392 V
1440(In)S
1555(this)S
1731(case)S
1936(a)S
2012(password)S
2423(must)S
2649(be)S
2775(provided)S
3162(by)S
3292(the)S
3445(client)S
3699(before)S
3987(any)S
4162(256le)S
4321(operations)S
4770(may)S
4973(be)S
5098(per-)S
7512 V
1440(formed.)S
7903 V
720(Page)S
941(1)S
4455(September)S
4911(13,)S
(1996)200 5061 A
8143 V
EP
%%Page: 2 2
BP
/slant 0 def
/height 0 def
480 V
10 R
720(FTPD)S
975(()S
1017(8)S
1075())S
2696(Eighth)S
(Edition)296 2989 A
4872(FTPD)S
5127(()S
5169(8)S
5227())S
960 V
1080(2))S
1440(The)S
1622(user)S
1815(name)S
2058(must)S
2278(not)S
2431(appear)S
2725(in)S
2828(the)S
2976(256le)S
10 B
3130(/etc/ftpusers)S
10 R
3658(.)S
1128 V
1080(3))S
1440(If)S
1536(the)S
1687(user)S
1883(name)S
2129(is)S
(``anonymous'')598 2224 A
2850(or)S
(``ftp'',)273 2963 A
3265(an)S
(anonymous)462 3389 A
3880(ftp)S
(account)313 4021 A
4363(must)S
4587(be)S
4711(present)S
5031(in)S
5138(the)S
1248 V
1440(password)S
1852(256le)S
2013((user)S
(``ftp'').)307 2247 A
2611(In)S
2727(this)S
2904(case)S
3110(the)S
3265(user)S
3465(is)S
3564(allowed)S
3915(to)S
4025(log)S
4185(in)S
4295(by)S
4427(specifying)S
4878(any)S
5054(pass-)S
1368 V
1440(word)S
1672((by)S
(convention)446 1831 A
2302(this)S
2472(is)S
2564(given)S
2812(as)S
2921(the)S
3069(client)S
3318(host's)S
3583(name).)S
1536 V
1080(In)S
1197(the)S
1353(last)S
1527(case,)S
10 B
1760(ftpd)S
10 R
1974(takes)S
2215(special)S
2529(measures)S
2938(to)S
3050(restrict)S
3365(the)S
3522(client's)S
(access)258 3853 A
4145(privileges.)S
4626(The)S
4817(server)S
5098(per-)S
1656 V
1080(forms)S
1347(a)S
10 B
1424(chroot)S
10 R
1704((2))S
1854(command)S
2282(to)S
2392(the)S
2547(home)S
2801(directory)S
3196(of)S
3311(the)S
(``ftp'')248 3465 A
3744(user.)S
3993(In)S
4108(order)S
4352(that)S
4534(system)S
4844(security)S
5194(is)S
1776 V
1080(not)S
(breached,)389 1240 A
1661(it)S
1749(is)S
1848(recommended)S
2450(that)S
2633(the)S
(``ftp'')248 2788 A
3069(subtree)S
3393(be)S
3521(constructed)S
4018(with)S
4230(care;)S
4485(the)S
4641(following)S
5065(rules)S
1896 V
1080(are)S
1229(recommended.)S
2064 V
1080(304ftp))S
1440(Make)S
1694(the)S
1842(home)S
2090(directory)S
2479(owned)S
2772(by)S
(``ftp'')248 2897 A
3170(and)S
3340(unwritable)S
3796(by)S
(anyone.)315 3921 A
2232 V
1080(304ftp/bin))S
2352 V
1440(Make)S
1705(this)S
1886(directory)S
2286(owned)S
2590(by)S
2726(the)S
2885(super-user)S
3341(and)S
3522(unwritable)S
3990(by)S
(anyone.)315 4127 A
4504(The)S
4698(program)S
10 B
5076(ls)S
10 R
5143((1))S
2472 V
1440(must)S
1660(be)S
1780(present)S
2096(to)S
(support)301 2199 A
2525(the)S
2673(list)S
2821(commands.)S
3331(This)S
3535(program)S
(should)267 3901 A
4193(have)S
4408(mode)S
(111.)175 4656 A
2640 V
1080(304ftp/etc))S
1440(Make)S
1699(this)S
1874(directory)S
2268(owned)S
2567(by)S
2698(the)S
2852(super-user)S
3303(and)S
3479(unwritable)S
3941(by)S
(anyone.)315 4072 A
4443(The)S
4631(256les)S
10 B
4830(passwd)S
10 R
5143((5))S
2760 V
1440(and)S
10 B
1623(group)S
10 R
1880((5))S
2036(must)S
2269(be)S
2402(present)S
2731(for)S
2887(the)S
10 B
3048(ls)S
10 R
3153(command)S
3587(to)S
3703(work)S
3948(properly.)S
4377(These)S
4656(256les)S
(should)267 4862 A
5166(be)S
2880 V
1440(mode)S
(444.)175 1688 A
3048 V
(304ftp/pub))358 1080 A
3168 V
1440(Make)S
1696(this)S
1868(directory)S
2259(mode)S
(755)150 2509 A
2686(and)S
2858(owned)S
3153(by)S
3280(the)S
3431(super-user.)S
3929(Create)S
4221(directories)S
4675(in)S
4781(it)S
4865(owned)S
5161(by)S
3288 V
1440(users)S
1672(if)S
1759(those)S
1996(users)S
2228(want)S
2449(to)S
2552(manage)S
2890(an)S
(anonymous)462 3010 A
3497(ftp)S
3634(directory.)S
3456 V
(304ftp/pub/incoming))765 1080 A
3576 V
1440(Optionally)S
1896(create)S
2164(this)S
2335(directory)S
2725(for)S
(anonymous)462 2869 A
3357(uploads.)S
3745(Make)S
4000(it)S
4082(mode)S
(777.)175 4331 A
4558(The)S
4742(FTP)S
4943(daemon)S
3696 V
(will)157 1440 A
1631(create)S
1907(256les)S
2109(with)S
2322(mode)S
(266,)175 2579 A
2788(so)S
2911(remote)S
3225(users)S
3466(can)S
3640(write)S
3882(a)S
3960(256le,)S
4147(but)S
4308(only)S
4519(local)S
4748(users)S
4988(can)S
5161(do)S
3816 V
1440(something)S
1883(with)S
2087(it.)S
3984 V
1080(The)S
1262(script)S
10 B
1511(setup.anonftp)S
10 R
2127(can)S
2292(be)S
2412(used)S
2621(to)S
2724(create)S
2991(or)S
3100(check)S
3360(an)S
(anonymous)462 3480 A
3967(FTP)S
4166(tree.)S
4152 V
9 R
720(S)S
722(SE)S
774(EE)S
832(E)S
913(A)S
915(AL)S
983(LS)S
1041(SO)S
1093(O)S
4272 V
10 B
1080(ftp)S
10 R
1204((1).)S
4440 V
9 R
720(B)S
722(BU)S
784(UG)S
852(GS)S
920(S)S
4560 V
10 R
1080(The)S
(anonymous)462 1262 A
(account)313 1749 A
2087(is)S
2179(inherently)S
2612(dangerous)S
3050(and)S
(should)267 3220 A
3512(avoided)S
3855(when)S
4098(possible.)S
7903 V
720(September)S
1176(13,)S
(1996)200 1326 A
4990(Page)S
5211(2)S
8143 V
EP
%%Trailer
%%DocumentFonts: Times-Roman Times-Bold Times-Italic
%%Pages: 2

						