chmod.2

操作系统设计与实现源码

%!PS-Adobe-1.0
%%Creator: devps (Pipeline Associates, Inc.)
%%CreationDate: Fri Sep 13 13:05:35 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(CHMOD)S
1103(\()S
1145(2)S
1203(\))S
2696(Eighth)S
(Edition)296 2989 A
4744(CHMOD)S
5127(\()S
5169(2)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(chmod)S
10 R-1
1378(-)S
10 R
1460(change)S
1770(mode)S
2018(of)S
2127(\256le)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(<sys/stat.h>)S
1728 V
1080(int)S
1236(chmod\(const)S
1823(char)S
2057(*)S
10 I
2107(path)S
10 B
2285(,)S
2348(mode_t)S
10 I
2705(mode)S
10 B
2923(\))S
1896 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
2016 V
10 R
1080(The)S
1264(\256le)S
1420(whose)S
1704(name)S
1949(is)S
2043(given)S
2293(by)S
10 I
2420(path)S
10 R
2625(has)S
2786(its)S
2908(mode)S
3158(changed)S
3520(to)S
10 I
3625(mode)S
10 R
3851(.)S
3929(Modes)S
4230(are)S
4382(constructed)S
4874(by)S
10 I
5002(or)S
10 R
5099('ing)S
2136 V
1080(together)S
1435(some)S
1672(combination)S
2199(of)S
2308(the)S
2456(following,)S
2897(de\256ned)S
3218(in)S
10 I
3321(<sys/stat.h>)S
10 R
3836(:)S
2304 V
1440(S_ISUID)S
[phone] A
2191(set)S
2328(user)S
2521(ID)S
2653(on)S
2778(execution)S
2424 V
1440(S_ISGID)S
[phone] A
2191(set)S
(group)234 2328 A
2587(ID)S
2719(on)S
2844(execution)S
2544 V
1440(S_ISVTX)S
[phone] A
2191(`sticky)S
2490(bit')S
2655(\(see)S
2843(below\))S
2664 V
1440(S_IRWXU)S
(00700read,)449 2191 A
2665(write,)S
2923(execute)S
3256(by)S
3381(owner)S
2784 V
1440(S_IRUSR)S
[phone] A
2191(read)S
2390(by)S
2515(owner)S
2904 V
1440(S_IWUSR)S
(00200write)458 2191 A
2674(by)S
2799(owner)S
3024 V
1440(S_IXUSR)S
[phone] A
2191(execute)S
2524(\(search)S
2841(on)S
2966(directory\))S
3389(by)S
3514(owner)S
3144 V
1440(S_IRWXG)S
(00070read,)449 2191 A
2665(write,)S
2923(execute)S
3256(by)S
(group)234 3381 A
3264 V
1440(S_IRGRP)S
[phone] A
2191(read)S
2390(by)S
(group)234 2515 A
3384 V
1440(S_IWGRP)S
(00020write)458 2191 A
2674(by)S
(group)234 2799 A
3504 V
1440(S_IXGRP)S
[phone] A
2191(execute)S
2524(\(search)S
2841(on)S
2966(directory\))S
3389(by)S
(group)234 3514 A
3624 V
1440(S_IRWXO)S
(00007read,)449 2191 A
2665(write,)S
2923(execute)S
3256(by)S
3381(others)S
3744 V
1440(S_IROTH)S
[phone] A
2191(read)S
2390(by)S
2515(others)S
3864 V
1440(S_IWOTH)S
(00002write)458 2191 A
2674(by)S
2799(others)S
3984 V
1440(S_IXOTH)S
[phone] A
2191(execute)S
2524(\(search)S
2841(on)S
2966(directory\))S
3389(by)S
3514(others)S
4152 V
1080(If)S
1180(mode)S
1435(ISVTX)S
1765(\(the)S
1954(`sticky)S
2260(bit'\))S
2466(is)S
2565(set)S
2709(on)S
2841(a)S
2918(directory,)S
3339(an)S
(unprivileged)508 3466 A
4006(user)S
4206(may)S
4412(not)S
4573(delete)S
4847(or)S
4964(rename)S
4272 V
1080(\256les)S
1273(of)S
1382(other)S
1614(users)S
1846(in)S
1949(that)S
2125(directory.)S
2564(\(Minix-vmd\))S
4440 V
1080(Only)S
1306(the)S
1454(owner)S
1731(of)S
1840(a)S
1910(\256le)S
2064(\(or)S
2207(the)S
2355(super-user\))S
2834(may)S
3032(change)S
3342(the)S
3490(mode.)S
4608 V
(Writing)313 1080 A
1422(or)S
1535(changing)S
1932(the)S
2084(owner)S
2365(of)S
2478(a)S
2552(\256le)S
2710(turns)S
2940(off)S
3087(the)S
3239(set-user-id)S
3694(and)S
(set-group-id)492 3868 A
4389(bits)S
4563(unless)S
4843(the)S
4996(user)S
5194(is)S
4728 V
1080(the)S
1235(super-user.)S
1737(This)S
1948(makes)S
2237(the)S
2392(system)S
2703(somewhat)S
3143(more)S
3382(secure)S
3672(by)S
3804(protecting)S
4244(set-user-id)S
(\(set-group-id\))560 4701 A
4848 V
1080(\256les)S
1277(from)S
1502(remaining)S
1939(set-user-id)S
(\(set-group-id\))560 2394 A
2983(if)S
3074(they)S
3276(are)S
3430(modi\256ed,)S
3842(at)S
3945(the)S
4098(expense)S
4452(of)S
4566(a)S
4641(degree)S
4940(of)S
5054(com-)S
4968 V
(patibility.)388 1080 A
5136 V
9 R
720(R)S
722(RE)S
784(ET)S
842(TU)S
900(UR)S
968(RN)S
1030(N)S
1121(V)S
1123(VA)S
1191(AL)S
1259(LU)S
1317(UE)S
1385(E)S
5256 V
10 R
(Upon)223 1080 A
(successful)414 1328 A
1768(completion,)S
2271(a)S
2342(value)S
2586(of)S
2696(0)S
2772(is)S
2865(returned.)S
3277(Otherwise,)S
3743(a)S
3814(value)S
4058(of)S
10 R-1
4168(-)S
10 R
4225(1)S
4301(is)S
4394(returned)S
4756(and)S
10 B
(errno)241 4927 A
10 R
5194(is)S
5376 V
1080(set)S
1217(to)S
1320(indicate)S
1664(the)S
1812(error.)S
5544 V
9 R
720(E)S
722(ER)S
780(RR)S
842(RO)S
904(OR)S
972(RS)S
1034(S)S
5664 V
10 B
1080(Chmod)S
10 R
(will)157 1424 A
1606(fail)S
1766(and)S
1936(the)S
2084(\256le)S
2238(mode)S
(will)157 2486 A
2668(be)S
2788(unchanged)S
3248(if:)S
5832 V
1080([ENOTDIR])S
1830(A)S
(component)446 1928 A
2399(of)S
2508(the)S
2656(path)S
2854(pre\256x)S
3114(is)S
3206(not)S
3359(a)S
3429(directory.)S
6000 V
([ENAMETOOLONG])916 1080 A
6120 V
1830(The)S
2012(path)S
2210(name)S
(exceeds)319 2453 A
2797(PATH_MAX)S
3371(characters.)S
6288 V
1080([ENOENT])S
1830(The)S
2012(named)S
2305(\256le)S
2459(does)S
2668(not)S
2821(exist.)S
6456 V
1080([EACCES])S
1830(Search)S
2130(permission)S
2596(is)S
2688(denied)S
2981(for)S
3124(a)S
(component)446 3194 A
3665(of)S
3774(the)S
3922(path)S
4120(pre\256x.)S
6624 V
1080([ELOOP])S
1830(Too)S
2033(many)S
2297(symbolic)S
2706(links)S
2942(were)S
(encountered)492 3180 A
3713(in)S
3833(translating)S
4300(the)S
4465(pathname.)S
4948(\(Minix-)S
6744 V
1830(vmd\))S
6912 V
1080([EPERM])S
1830(The)S
2016(effective)S
2400(user)S
2598(ID)S
2735(does)S
2949(not)S
3107(match)S
3383(the)S
3536(owner)S
3818(of)S
3932(the)S
4085(\256le)S
4244(and)S
4419(the)S
4572(effective)S
4956(user)S
5154(ID)S
7032 V
1830(is)S
1922(not)S
2075(the)S
2223(super-user.)S
7200 V
1080([EROFS])S
1830(The)S
2012(named)S
2305(\256le)S
2459(resides)S
2764(on)S
2889(a)S
2959(read-only)S
3370(\256le)S
3524(system.)S
7368 V
1080([EFAULT])S
10 I
1830(Path)S
10 R
2045(points)S
2315(outside)S
2630(the)S
2778(process's)S
3178(allocated)S
3567(address)S
(space.)249 3894 A
7903 V
720(Page)S
941(1)S
2669(\()S
2711(May)S
2920(13,)S
(1986)200 3070 A
3278(\))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(CHMOD)S
1103(\()S
1145(2)S
1203(\))S
2696(Eighth)S
(Edition)296 2989 A
4744(CHMOD)S
5127(\()S
5169(2)S
5227(\))S
960 V
1080([EIO])S
1830(An)S
1978(I/O)S
2138(error)S
2360(occurred)S
2738(while)S
2987(reading)S
3314(from)S
3535(or)S
(writing)291 3644 A
3960(to)S
4063(the)S
4211(\256le)S
4365(system.)S
1128 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
1248 V
10 B
1080(chmod)S
10 R
1371(\(1\),)S
10 B
1539(open)S
10 R
1746(\(2\),)S
10 B
1914(chown)S
10 R
2194(\(2\),)S
10 B
2362(stat)S
10 R
2519(\(2\).)S
1416 V
9 R
720(N)S
722(NO)S
790(OT)S
858(TE)S
916(ES)S
974(S)S
1536 V
10 R
1080(The)S
1262(sticky)S
1527(bit)S
1658(was)S
1840(historically)S
2318(used)S
2527(to)S
2630(lock)S
2828(important)S
3244(executables)S
3739(into)S
3920(memory.)S
7903 V
720(September)S
1176(13,)S
(1996)200 1326 A
2669(\()S
2711(May)S
2920(13,)S
(1986)200 3070 A
3278(\))S
4990(Page)S
5211(2)S
8143 V
EP
%%Trailer
%%DocumentFonts: Times-Roman Times-Bold Times-Italic
%%Pages: 2