操作系统开发

开发平台：
C/C++

DIRECTOR.3：源码内容
							%!PS-Adobe-1.0
%%Creator: devps (Pipeline Associates, Inc.)
%%CreationDate: Fri Sep 13 13:06:38 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(DIRECTORY)S
1306(()S
1348(3)S
1406())S
2696(Eighth)S
(Edition)296 2989 A
4541(DIRECTORY)S
5127(()S
5169(3)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(directory,)S
1494(opendir,)S
1851(readdir,)S
(rewinddir,)417 2187 A
2629(closedir,)S
2998(telldir,)S
3289(seekdir)S
10 R-1
3605(-)S
10 R
3687(directory)S
4076(routines)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(#include)S
1482(<sys/types.h>)S
1488 V
1080(#include)S
1482(<dirent.h>)S
1728 V
1080(DIR)S
1303(*opendir(const)S
1985(char)S
2219(*)S
10 I
2269(dirname)S
10 B
2604())S
1848 V
1080(struct)S
1371(dirent)S
1673(*readdir(DIR)S
2305(*)S
10 I
2355(dirp)S
10 B
2522())S
1968 V
1080(void)S
(rewinddir(DIR)651 1302 A
1991(*)S
10 I
2041(dirp)S
10 B
2208())S
2088 V
1080(int)S
1236(closedir(DIR)S
1829(*)S
10 I
1879(dirp)S
10 B
2046())S
2328 V
1080(#de256ne)S
1426(_MINIX)S
1871(1)S
2448 V
1080(#include)S
1482(<sys/types.h>)S
2568 V
1080(#include)S
1482(<dirent.h>)S
2808 V
1080(long)S
1302(telldir(DIR)S
1823(*)S
10 I
1873(dirp)S
10 B
2040())S
2928 V
1080(int)S
1236(seekdir(DIR)S
1807(*)S
10 I
1857(dirp)S
10 B
2024(,)S
2087(long)S
10 I
2309(pos)S
10 B
2448())S
3096 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
3216 V
10 R
1080(These)S
1346(routines)S
1695(form)S
1916(a)S
1986(system)S
2290(independent)S
(interface)354 2806 A
3185(to)S
(access)258 3288 A
3571(directories.)S
3384 V
10 B
1080(Opendir())S
10 R
1537(opens)S
1796(the)S
1944(directory)S
10 I
2333(dirname)S
10 R
2693(and)S
2863(returns)S
3168(a)S
3238(pointer)S
3548(to)S
3651(this)S
3821(open)S
4041(directory)S
4430(stream.)S
3552 V
10 B
1080(Readdir())S
10 R
1529(reads)S
1770(one)S
1943(entry)S
2178(from)S
2402(the)S
2553(directory)S
2945(as)S
3057(a)S
3131(pointer)S
3445(to)S
3552(a)S
3626(structure)S
4008(containing)S
4461(the)S
4613(256eld)S
10 B
4821(d_name)S
10 R
5162(,)S
5216(a)S
3672 V
1080(character)S
1476(array)S
1709(containing)S
2158(the)S
2306(null-terminated)S
2952(name)S
3195(of)S
3304(the)S
3452(entry.)S
3840 V
10 B
(Rewinddir())528 1080 A
10 R
1633(allows)S
1921(the)S
2069(directory)S
2458(to)S
2561(be)S
2681(read)S
2880(again)S
3123(from)S
3344(the)S
3492(beginning.)S
4008 V
10 B
1080(Closedir())S
10 R
1537(closes)S
1808(the)S
1956(directory)S
2345(and)S
2515(releases)S
2860(administrative)S
3461(data.)S
4176 V
1080(The)S
1268(Minix)S
1544(speci256c)S
1883(functions)S
10 B
2288(telldir())S
10 R
2651(and)S
10 B
2827(seekdir())S
10 R
3240(allow)S
3495(one)S
3671(to)S
3780(get)S
3934(the)S
4088(current)S
(position)323 4405 A
4760(in)S
4870(the)S
5025(direc-)S
4296 V
1080(tory)S
1271(256le)S
1429(and)S
1603(to)S
1710(return)S
1980(there)S
2210(later.)S
10 B
2468(Seekdir())S
10 R
2895(may)S
3096(only)S
3302(be)S
3425(called)S
3694(with)S
3901(a)S
(position)323 3974 A
4325(returned)S
4689(by)S
10 B
4817(telldir())S
10 R
5177(or)S
4416 V
1080(0)S
1155((rewind).)S
1578(These)S
1844(functions)S
(should)267 2243 A
2535(not)S
2688(be)S
2808(used)S
3017(in)S
3120(portable)S
3475(programs.)S
4584 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
4704 V
10 B
1080(dir)S
10 R
1209((5).)S
4872 V
9 R
720(D)S
722(DI)S
790(IA)S
823(AG)S
891(GN)S
959(NO)S
1027(OS)S
1095(ST)S
1147(TI)S
1205(IC)S
1238(CS)S
1300(S)S
4992 V
10 B
1080(Opendir())S
10 R
1541(returns)S
1850(a)S
1925(null)S
2111(pointer)S
2426(if)S
10 I
2518(dirname)S
10 R
2883(can't)S
3115(be)S
3240(opened,)S
3585(or)S
3699(if)S
3791(it)S
3877(can't)S
4109(allocate)S
(enough)295 4453 A
4778(memory)S
5143(for)S
5112 V
1080(the)S
10 B
1228(DIR)S
10 R
1438(structure.)S
5280 V
10 B
1080(Readdir())S
10 R
1526(returns)S
1831(null)S
2012(if)S
2099(there)S
2326(are)S
2475(no)S
2600(more)S
2832(directory)S
3221(entries)S
3515(or)S
3624(on)S
3749(error.)S
5448 V
10 B
1080(Closedir())S
10 R
1537(and)S
10 B
1707(seekdir())S
10 R
2114(returns)S
2419(0)S
2494(on)S
(success,)327 2619 A
2971(-1)S
3080(on)S
3205(error.)S
5616 V
10 B
1080(Telldir())S
10 R
1470(returns)S
1775(-1)S
1884(on)S
2009(error.)S
5784 V
1080(All)S
1238(of)S
1351(them)S
1581(set)S
10 B
(errno)241 1722 A
10 R
1992(appropriately.)S
10 B
2608(Readdir())S
10 R
(will)157 3058 A
3244(only)S
3451(set)S
10 B
(errno)241 3592 A
10 R
3862(on)S
3991(error,)S
4242(not)S
4399(on)S
4528(end-of-dir,)S
4992(so)S
(you)150 5111 A
5904 V
(should)267 1080 A
1372(set)S
10 B
(errno)241 1509 A
10 R
1775(to)S
1878(zero)S
2077(beforehand,)S
2580(and)S
2750(check)S
3010(its)S
3130(value)S
3373(if)S
10 B
3460(readdir())S
10 R
3878(returns)S
4183(null.)S
6072 V
9 R
720(N)S
722(NO)S
790(OT)S
858(TE)S
916(ES)S
974(S)S
6192 V
10 R
1080(The)S
1263(return)S
1530(value)S
1774(of)S
10 B
1884(readdir())S
10 R
2303(needs)S
2558(to)S
2662(be)S
2783(copied)S
3078(before)S
3363(the)S
3513(next)S
3713(operation)S
4120(on)S
4247(the)S
4397(same)S
4631(directory)S
5022(if)S
5111(it)S
5194(is)S
6312 V
1080(to)S
1183(be)S
1303(saved.)S
6480 V
9 R
720(A)S
722(AU)S
790(UT)S
858(TH)S
916(HO)S
984(OR)S
1052(R)S
6600 V
10 R
1080(Kees)S
1307(J.)S
1396(Bot)S
1566((kjb@cs.vu.nl))S
7903 V
720(Page)S
941(1)S
4455(September)S
4911(13,)S
(1996)200 5061 A
8143 V
EP
%%Trailer
%%DocumentFonts: Times-Roman Times-Bold Times-Italic
%%Pages: 1

						