/ Developer CD Series 1999 …ember: Reference Library / Apple Developer Reference Library (December 1999) (Disk 1).iso / pc / technical documentation / develop / develop issue 23 / develop issue 23 code / projectdrag 1.1b8.sea / ProjectDrag 1.1b8 / Sources / ProjectDrag Sources / ModifyReadOnly.c

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 10 4d 6f 64 69 66 79 | 52 65 61 64 4f 6e 6c 79 |..Modify|ReadOnly|
|00000010| 2e 63 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.c......|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 01 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 0c b5 00 | 00 02 34 ac 74 f8 91 ac |........|..4.t...|
|00000060| 74 f8 91 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |t.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 ca 3c 00 00 |........|.....<..|
|00000080| 2f 2a 20 4d 6f 64 69 66 | 79 52 65 61 64 4f 6e 6c |/* Modif|yReadOnl|
|00000090| 79 2e 63 3a 20 4d 6f 64 | 69 66 79 52 65 61 64 4f |y.c: Mod|ifyReadO|
|000000a0| 6e 6c 79 20 61 70 70 6c | 65 74 20 66 6f 72 20 50 |nly appl|et for P|
|000000b0| 72 6f 6a 65 63 74 44 72 | 61 67 0d 20 2a 0d 20 2a |rojectDr|ag. *. *|
|000000c0| 20 41 20 73 65 74 20 6f | 66 20 61 70 70 6c 65 74 | A set o|f applet|
|000000d0| 73 20 66 6f 72 20 64 72 | 61 67 20 61 6e 64 20 64 |s for dr|ag and d|
|000000e0| 72 6f 70 20 73 6f 75 72 | 63 65 20 63 6f 6e 74 72 |rop sour|ce contr|
|000000f0| 6f 6c 20 62 79 20 54 69 | 6d 20 4d 61 72 6f 6e 65 |ol by Ti|m Marone|
|00000100| 79 2e 0d 20 2a 20 53 65 | 65 20 64 65 76 65 6c 6f |y.. * Se|e develo|
|00000110| 70 2c 20 69 73 73 75 65 | 20 32 33 20 66 6f 72 20 |p, issue| 23 for |
|00000120| 64 65 74 61 69 6c 73 2e | 0d 20 2a 0d 20 2a 20 42 |details.|. *. * B|
|00000130| 75 69 6c 74 20 6f 6e 20 | 44 72 6f 70 53 68 65 6c |uilt on |DropShel|
|00000140| 6c 20 62 79 20 4c 65 6f | 6e 61 72 64 20 52 6f 73 |l by Leo|nard Ros|
|00000150| 65 6e 74 68 6f 6c 2c 20 | 53 74 65 70 68 61 6e 20 |enthol, |Stephan |
|00000160| 53 6f 6d 6f 67 79 69 2c | 20 61 6e 64 20 4d 61 72 |Somogyi,| and Mar|
|00000170| 73 68 61 6c 6c 20 43 6c | 6f 77 2c 0d 20 2a 20 61 |shall Cl|ow,. * a|
|00000180| 6e 64 20 75 73 69 6e 67 | 20 74 68 65 20 4d 6f 72 |nd using| the Mor|
|00000190| 65 46 69 6c 65 73 20 75 | 74 69 6c 69 74 69 65 73 |eFiles u|tilities|
|000001a0| 20 62 79 20 4a 69 6d 20 | 4c 75 74 68 65 72 2e 0d | by Jim |Luther..|
|000001b0| 20 2a 0d 20 2a 20 54 68 | 69 73 20 73 6f 66 74 77 | *. * Th|is softw|
|000001c0| 61 72 65 20 69 73 20 66 | 72 65 65 2c 20 62 75 74 |are is f|ree, but|
|000001d0| 20 64 6f 6e 27 74 20 6d | 6f 64 69 66 79 20 61 6e | don't m|odify an|
|000001e0| 64 20 72 65 64 69 73 74 | 72 69 62 75 74 65 20 69 |d redist|ribute i|
|000001f0| 74 20 77 69 74 68 6f 75 | 74 0d 20 2a 20 63 68 61 |t withou|t. * cha|
|00000200| 6e 67 69 6e 67 20 74 68 | 65 20 73 74 61 74 75 73 |nging th|e status|
|00000210| 20 77 69 6e 64 6f 77 20 | 74 6f 20 69 6e 64 69 63 | window |to indic|
|00000220| 61 74 65 20 79 6f 75 72 | 20 6e 61 6d 65 20 61 6e |ate your| name an|
|00000230| 64 20 79 6f 75 72 20 63 | 68 61 6e 67 65 73 21 0d |d your c|hanges!.|
|00000240| 20 2a 2f 0d 0d 0d 23 69 | 6e 63 6c 75 64 65 20 3c | */...#i|nclude <|
|00000250| 45 72 72 6f 72 73 2e 68 | 3e 0d 0d 23 69 6e 63 6c |Errors.h|>..#incl|
|00000260| 75 64 65 20 22 44 53 55 | 73 65 72 50 72 6f 63 73 |ude "DSU|serProcs|
|00000270| 2e 68 22 0d 23 69 6e 63 | 6c 75 64 65 20 22 53 6f |.h".#inc|lude "So|
|00000280| 75 72 63 65 53 65 72 76 | 65 72 2e 68 22 0d 23 69 |urceServ|er.h".#i|
|00000290| 6e 63 6c 75 64 65 20 22 | 50 44 44 69 61 6c 6f 67 |nclude "|PDDialog|
|000002a0| 73 2e 68 22 0d 23 69 6e | 63 6c 75 64 65 20 22 43 |s.h".#in|clude "C|
|000002b0| 6f 6d 6d 65 6e 74 73 2e | 68 22 0d 23 69 6e 63 6c |omments.|h".#incl|
|000002c0| 75 64 65 20 22 54 61 73 | 6b 73 41 6e 64 45 72 72 |ude "Tas|ksAndErr|
|000002d0| 6f 72 73 2e 68 22 0d 23 | 69 6e 63 6c 75 64 65 20 |ors.h".#|include |
|000002e0| 22 46 69 6c 65 43 61 6e | 63 65 6c 2e 68 22 0d 0d |"FileCan|cel.h"..|
|000002f0| 0d 76 6f 69 64 20 4d 6f | 64 69 66 79 52 65 61 64 |.void Mo|difyRead|
|00000300| 4f 6e 6c 79 46 69 6c 65 | 28 46 53 53 70 65 63 20 |OnlyFile|(FSSpec |
|00000310| 2a 66 69 6c 65 29 3b 0d | 0d 0d 2f 2a 20 54 68 69 |*file);.|../* Thi|
|00000320| 73 20 72 6f 75 74 69 6e | 65 20 69 73 20 63 61 6c |s routin|e is cal|
|00000330| 6c 65 64 20 66 6f 72 20 | 65 61 63 68 20 66 69 6c |led for |each fil|
|00000340| 65 20 70 61 73 73 65 64 | 20 69 6e 20 74 68 65 20 |e passed| in the |
|00000350| 4f 44 4f 43 20 65 76 65 | 6e 74 2e 20 2a 2f 0d 0d |ODOC eve|nt. */..|
|00000360| 70 61 73 63 61 6c 20 76 | 6f 69 64 20 4f 70 65 6e |pascal v|oid Open|
|00000370| 44 6f 63 20 28 20 46 53 | 53 70 65 63 50 74 72 20 |Doc ( FS|SpecPtr |
|00000380| 6d 79 46 53 53 50 74 72 | 2c 20 42 6f 6f 6c 65 61 |myFSSPtr|, Boolea|
|00000390| 6e 20 6f 70 65 6e 69 6e | 67 2c 20 48 61 6e 64 6c |n openin|g, Handl|
|000003a0| 65 20 75 73 65 72 44 61 | 74 61 48 61 6e 64 6c 65 |e userDa|taHandle|
|000003b0| 20 29 0d 7b 0d 23 70 72 | 61 67 6d 61 20 75 6e 75 | ).{.#pr|agma unu|
|000003c0| 73 65 64 20 28 20 6f 70 | 65 6e 69 6e 67 20 29 0d |sed ( op|ening ).|
|000003d0| 23 70 72 61 67 6d 61 20 | 75 6e 75 73 65 64 20 28 |#pragma |unused (|
|000003e0| 20 75 73 65 72 44 61 74 | 61 48 61 6e 64 6c 65 20 | userDat|aHandle |
|000003f0| 29 0d 0d 09 4d 6f 64 69 | 66 79 52 65 61 64 4f 6e |)...Modi|fyReadOn|
|00000400| 6c 79 46 69 6c 65 28 6d | 79 46 53 53 50 74 72 29 |lyFile(m|yFSSPtr)|
|00000410| 3b 0d 7d 0d 0d 0d 76 6f | 69 64 20 4d 6f 64 69 66 |;.}...vo|id Modif|
|00000420| 79 52 65 61 64 4f 6e 6c | 79 46 69 6c 65 28 46 53 |yReadOnl|yFile(FS|
|00000430| 53 70 65 63 20 2a 66 69 | 6c 65 29 0d 7b 0d 09 4f |Spec *fi|le).{..O|
|00000440| 53 45 72 72 20 65 72 72 | 3b 0d 09 41 45 44 65 73 |SErr err|;..AEDes|
|00000450| 63 20 63 6f 6d 6d 61 6e | 64 3b 0d 09 43 4b 49 44 |c comman|d;..CKID|
|00000460| 48 61 6e 64 6c 65 20 74 | 68 65 43 4b 49 44 3b 0d |Handle t|heCKID;.|
|00000470| 09 53 74 72 36 33 20 75 | 73 65 72 4e 61 6d 65 3b |.Str63 u|serName;|
|00000480| 0d 09 53 74 72 31 35 20 | 6e 69 63 6b 6e 61 6d 65 |..Str15 |nickname|
|00000490| 3b 0d 09 53 74 72 32 35 | 35 20 63 6f 6d 6d 65 6e |;..Str25|5 commen|
|000004a0| 74 3b 0d 0d 09 54 61 73 | 6b 53 74 61 72 74 28 32 |t;...Tas|kStart(2|
|000004b0| 30 30 31 2c 20 31 2c 20 | 66 69 6c 65 2d 3e 6e 61 |001, 1, |file->na|
|000004c0| 6d 65 2c 20 4e 55 4c 4c | 2c 20 4e 55 4c 4c 2c 20 |me, NULL|, NULL, |
|000004d0| 4e 55 4c 4c 29 3b 0d 09 | 0d 09 2f 2a 20 66 69 6e |NULL);..|../* fin|
|000004e0| 64 20 74 68 65 20 75 73 | 65 72 20 6e 61 6d 65 20 |d the us|er name |
|000004f0| 61 6e 64 20 69 6e 69 74 | 69 61 6c 73 20 2a 2f 0d |and init|ials */.|
|00000500| 09 65 72 72 20 3d 20 47 | 65 74 55 73 65 72 53 65 |.err = G|etUserSe|
|00000510| 74 74 69 6e 67 73 28 75 | 73 65 72 4e 61 6d 65 2c |ttings(u|serName,|
|00000520| 20 6e 69 63 6b 6e 61 6d | 65 2c 20 66 61 6c 73 65 | nicknam|e, false|
|00000530| 29 3b 0d 09 69 66 20 28 | 65 72 72 20 21 3d 20 6e |);..if (|err != n|
|00000540| 6f 45 72 72 29 0d 09 7b | 0d 09 09 69 66 20 28 65 |oErr)..{|...if (e|
|00000550| 72 72 20 21 3d 20 75 73 | 65 72 43 61 6e 63 65 6c |rr != us|erCancel|
|00000560| 65 64 45 72 72 29 0d 09 | 09 09 45 72 72 6f 72 41 |edErr)..|..ErrorA|
|00000570| 6c 65 72 74 28 6b 50 72 | 6f 6a 65 63 74 44 72 61 |lert(kPr|ojectDra|
|00000580| 67 53 74 72 69 6e 67 73 | 2c 20 6b 4e 6f 55 73 65 |gStrings|, kNoUse|
|00000590| 72 53 65 74 74 69 6e 67 | 73 2c 20 65 72 72 29 3b |rSetting|s, err);|
|000005a0| 0d 09 09 67 44 6f 6e 65 | 20 3d 20 74 72 75 65 3b |...gDone| = true;|
|000005b0| 0d 09 09 72 65 74 75 72 | 6e 3b 0d 09 7d 0d 09 0d |...retur|n;..}...|
|000005c0| 09 2f 2a 20 67 65 74 20 | 74 68 65 20 43 4b 49 44 |./* get |the CKID|
|000005d0| 20 2a 2f 0d 09 65 72 72 | 20 3d 20 45 78 74 72 61 | */..err| = Extra|
|000005e0| 63 74 43 4b 49 44 28 66 | 69 6c 65 2c 20 26 74 68 |ctCKID(f|ile, &th|
|000005f0| 65 43 4b 49 44 29 3b 0d | 09 69 66 20 28 65 72 72 |eCKID);.|.if (err|
|00000600| 20 21 3d 20 6e 6f 45 72 | 72 29 0d 09 7b 0d 09 09 | != noEr|r)..{...|
|00000610| 52 61 69 73 65 45 72 72 | 6f 72 53 74 72 69 6e 67 |RaiseErr|orString|
|00000620| 28 6b 50 72 6f 6a 65 63 | 74 44 72 61 67 53 74 72 |(kProjec|tDragStr|
|00000630| 69 6e 67 73 2c 20 6b 43 | 61 6e 74 47 65 74 43 4b |ings, kC|antGetCK|
|00000640| 49 44 2c 20 66 69 6c 65 | 2d 3e 6e 61 6d 65 2c 0d |ID, file|->name,.|
|00000650| 09 09 09 09 09 09 20 4e | 55 4c 4c 2c 20 4e 55 4c |...... N|ULL, NUL|
|00000660| 4c 2c 20 4e 55 4c 4c 29 | 3b 0d 09 09 72 65 74 75 |L, NULL)|;...retu|
|00000670| 72 6e 3b 0d 09 7d 0d 09 | 0d 09 2f 2a 20 6d 61 6b |rn;..}..|../* mak|
|00000680| 65 20 73 75 72 65 20 74 | 68 65 20 66 69 6c 65 20 |e sure t|he file |
|00000690| 69 73 20 63 68 65 63 6b | 65 64 20 69 6e 20 2a 2f |is check|ed in */|
|000006a0| 0d 09 69 66 20 28 28 2a | 74 68 65 43 4b 49 44 29 |..if ((*|theCKID)|
|000006b0| 2d 3e 77 72 69 74 65 61 | 62 6c 65 20 7c 7c 20 28 |->writea|ble || (|
|000006c0| 2a 74 68 65 43 4b 49 44 | 29 2d 3e 6d 6f 64 69 66 |*theCKID|)->modif|
|000006d0| 79 52 65 61 64 4f 6e 6c | 79 29 0d 09 7b 0d 09 09 |yReadOnl|y)..{...|
|000006e0| 44 69 73 70 6f 73 65 48 | 61 6e 64 6c 65 28 28 48 |DisposeH|andle((H|
|000006f0| 61 6e 64 6c 65 29 74 68 | 65 43 4b 49 44 29 3b 0d |andle)th|eCKID);.|
|00000700| 09 09 52 61 69 73 65 45 | 72 72 6f 72 53 74 72 69 |..RaiseE|rrorStri|
|00000710| 6e 67 28 6b 50 72 6f 6a | 65 63 74 44 72 61 67 53 |ng(kProj|ectDragS|
|00000720| 74 72 69 6e 67 73 2c 20 | 6b 4e 6f 4d 52 4f 50 65 |trings, |kNoMROPe|
|00000730| 72 6d 69 73 73 69 6f 6e | 2c 20 66 69 6c 65 2d 3e |rmission|, file->|
|00000740| 6e 61 6d 65 2c 0d 09 09 | 09 09 09 09 20 4e 55 4c |name,...|.... NUL|
|00000750| 4c 2c 20 4e 55 4c 4c 2c | 20 4e 55 4c 4c 29 3b 0d |L, NULL,| NULL);.|
|00000760| 09 09 72 65 74 75 72 6e | 3b 0d 09 7d 0d 09 0d 09 |..return|;..}....|
|00000770| 2f 2a 20 63 72 65 61 74 | 65 20 61 20 4d 6f 64 69 |/* creat|e a Modi|
|00000780| 66 79 52 65 61 64 4f 6e | 6c 79 20 63 6f 6d 6d 61 |fyReadOn|ly comma|
|00000790| 6e 64 20 66 6f 72 20 53 | 6f 75 72 63 65 53 65 72 |nd for S|ourceSer|
|000007a0| 76 65 72 0d 09 20 2a 20 | 4d 6f 64 69 66 79 52 65 |ver.. * |ModifyRe|
|000007b0| 61 64 4f 6e 6c 79 20 3c | 66 69 6c 65 3e 0d 09 20 |adOnly <|file>.. |
|000007c0| 2a 2f 0d 09 65 72 72 20 | 3d 20 43 72 65 61 74 65 |*/..err |= Create|
|000007d0| 43 6f 6d 6d 61 6e 64 28 | 26 63 6f 6d 6d 61 6e 64 |Command(|&command|
|000007e0| 2c 20 22 4d 6f 64 69 66 | 79 52 65 61 64 4f 6e 6c |, "Modif|yReadOnl|
|000007f0| 79 22 29 3b 0d 09 69 66 | 20 28 65 72 72 20 3d 3d |y");..if| (err ==|
|00000800| 20 6e 6f 45 72 72 29 0d | 09 09 65 72 72 20 3d 20 | noErr).|..err = |
|00000810| 41 64 64 46 69 6c 65 4e | 61 6d 65 41 72 67 28 26 |AddFileN|ameArg(&|
|00000820| 63 6f 6d 6d 61 6e 64 2c | 66 69 6c 65 29 3b 0d 09 |command,|file);..|
|00000830| 69 66 20 28 65 72 72 20 | 21 3d 20 6e 6f 45 72 72 |if (err |!= noErr|
|00000840| 29 0d 09 7b 0d 09 09 44 | 69 73 70 6f 73 65 48 61 |)..{...D|isposeHa|
|00000850| 6e 64 6c 65 28 28 48 61 | 6e 64 6c 65 29 74 68 65 |ndle((Ha|ndle)the|
|00000860| 43 4b 49 44 29 3b 0d 09 | 09 41 45 44 69 73 70 6f |CKID);..|.AEDispo|
|00000870| 73 65 44 65 73 63 28 26 | 63 6f 6d 6d 61 6e 64 29 |seDesc(&|command)|
|00000880| 3b 0d 09 09 52 61 69 73 | 65 45 72 72 6f 72 4e 75 |;...Rais|eErrorNu|
|00000890| 6d 62 65 72 28 65 72 72 | 29 3b 0d 09 09 72 65 74 |mber(err|);...ret|
|000008a0| 75 72 6e 3b 0d 09 7d 0d | 09 0d 09 2f 2a 20 73 65 |urn;..}.|.../* se|
|000008b0| 6e 64 20 74 68 65 20 63 | 6f 6d 6d 61 6e 64 20 74 |nd the c|ommand t|
|000008c0| 6f 20 53 6f 75 72 63 65 | 53 65 72 76 65 72 20 2a |o Source|Server *|
|000008d0| 2f 0d 09 65 72 72 20 3d | 20 53 65 6e 64 43 6f 6d |/..err =| SendCom|
|000008e0| 6d 61 6e 64 28 26 63 6f | 6d 6d 61 6e 64 29 3b 0d |mand(&co|mmand);.|
|000008f0| 09 69 66 20 28 65 72 72 | 20 21 3d 20 6e 6f 45 72 |.if (err| != noEr|
|00000900| 72 29 0d 09 7b 0d 09 09 | 44 69 73 70 6f 73 65 48 |r)..{...|DisposeH|
|00000910| 61 6e 64 6c 65 28 28 48 | 61 6e 64 6c 65 29 74 68 |andle((H|andle)th|
|00000920| 65 43 4b 49 44 29 3b 0d | 09 09 72 65 74 75 72 6e |eCKID);.|..return|
|00000930| 3b 0d 09 7d 0d 0d 09 2f | 2a 20 67 65 74 20 74 68 |;..}.../|* get th|
|00000940| 65 20 63 68 65 63 6b 6f | 75 74 20 63 6f 6d 6d 65 |e checko|ut comme|
|00000950| 6e 74 20 66 72 6f 6d 20 | 74 68 65 20 75 73 65 72 |nt from |the user|
|00000960| 20 2a 2f 0d 09 63 6f 6d | 6d 65 6e 74 5b 30 5d 20 | */..com|ment[0] |
|00000970| 3d 20 30 3b 0d 09 69 66 | 20 28 21 47 65 74 43 68 |= 0;..if| (!GetCh|
|00000980| 61 6e 67 65 43 6f 6d 6d | 65 6e 74 28 66 61 6c 73 |angeComm|ent(fals|
|00000990| 65 2c 20 66 69 6c 65 2d | 3e 6e 61 6d 65 2c 20 63 |e, file-|>name, c|
|000009a0| 6f 6d 6d 65 6e 74 29 29 | 0d 09 7b 0d 09 09 44 69 |omment))|..{...Di|
|000009b0| 73 70 6f 73 65 48 61 6e | 64 6c 65 28 28 48 61 6e |sposeHan|dle((Han|
|000009c0| 64 6c 65 29 74 68 65 43 | 4b 49 44 29 3b 0d 09 09 |dle)theC|KID);...|
|000009d0| 72 65 74 75 72 6e 3b 0d | 09 7d 0d 0d 09 2f 2a 20 |return;.|.}.../* |
|000009e0| 61 64 64 20 74 68 65 20 | 63 68 65 63 6b 6f 75 74 |add the |checkout|
|000009f0| 20 63 6f 6d 6d 65 6e 74 | 20 74 6f 20 74 68 65 20 | comment| to the |
|00000a00| 66 69 6c 65 20 2a 2f 0d | 09 65 72 72 20 3d 20 41 |file */.|.err = A|
|00000a10| 64 64 43 68 65 63 6b 6f | 75 74 43 6f 6d 6d 65 6e |ddChecko|utCommen|
|00000a20| 74 28 66 69 6c 65 2c 20 | 75 73 65 72 4e 61 6d 65 |t(file, |userName|
|00000a30| 2c 20 6e 69 63 6b 6e 61 | 6d 65 2c 20 63 6f 6d 6d |, nickna|me, comm|
|00000a40| 65 6e 74 29 3b 0d 09 69 | 66 20 28 65 72 72 20 21 |ent);..i|f (err !|
|00000a50| 3d 20 6e 6f 45 72 72 29 | 0d 09 7b 0d 09 09 2f 2a |= noErr)|..{.../*|
|00000a60| 20 70 6f 70 20 74 68 65 | 20 63 75 72 72 65 6e 74 | pop the| current|
|00000a70| 20 74 61 73 6b 20 61 6e | 64 20 73 74 61 72 74 20 | task an|d start |
|00000a80| 61 20 6e 65 77 20 6f 6e | 65 20 69 66 20 75 73 65 |a new on|e if use|
|00000a90| 72 20 63 6f 6e 66 69 72 | 6d 73 20 63 61 6e 63 65 |r confir|ms cance|
|00000aa0| 6c 20 2a 2f 0d 09 09 69 | 66 20 28 21 52 65 73 54 |l */...i|f (!ResT|
|00000ab0| 65 78 74 59 65 73 4e 6f | 28 6b 50 72 6f 6a 65 63 |extYesNo|(kProjec|
|00000ac0| 74 44 72 61 67 53 74 72 | 69 6e 67 73 2c 20 6b 4d |tDragStr|ings, kM|
|00000ad0| 52 4f 43 6f 6d 6d 65 6e | 74 46 61 69 6c 65 64 43 |ROCommen|tFailedC|
|00000ae0| 61 6e 63 65 6c 2c 0d 09 | 09 09 09 09 09 20 66 69 |ancel,..|..... fi|
|00000af0| 6c 65 2d 3e 6e 61 6d 65 | 2c 20 4e 55 4c 4c 2c 20 |le->name|, NULL, |
|00000b00| 4e 55 4c 4c 2c 20 4e 55 | 4c 4c 29 29 0d 09 09 7b |NULL, NU|LL))...{|
|00000b10| 0d 09 09 09 52 61 69 73 | 65 45 72 72 6f 72 4e 75 |....Rais|eErrorNu|
|00000b20| 6d 62 65 72 28 75 73 65 | 72 43 61 6e 63 65 6c 65 |mber(use|rCancele|
|00000b30| 64 45 72 72 29 3b 0d 09 | 09 09 72 65 74 75 72 6e |dErr);..|..return|
|00000b40| 3b 0d 09 09 7d 0d 09 09 | 0d 09 09 54 61 73 6b 44 |;...}...|...TaskD|
|00000b50| 6f 6e 65 28 29 3b 20 2f | 2a 20 6e 6f 74 20 72 65 |one(); /|* not re|
|00000b60| 61 6c 6c 79 21 20 2a 2f | 0d 09 09 0d 09 09 54 61 |ally! */|......Ta|
|00000b70| 73 6b 53 74 61 72 74 28 | 32 30 30 31 2c 20 32 2c |skStart(|2001, 2,|
|00000b80| 20 66 69 6c 65 2d 3e 6e | 61 6d 65 2c 20 4e 55 4c | file->n|ame, NUL|
|00000b90| 4c 2c 20 4e 55 4c 4c 2c | 20 4e 55 4c 4c 29 3b 20 |L, NULL,| NULL); |
|00000ba0| 2f 2a 20 63 61 6e 63 65 | 6c 69 6e 67 20 2a 2f 0d |/* cance|ling */.|
|00000bb0| 09 09 65 72 72 20 3d 20 | 46 69 6c 65 43 61 6e 63 |..err = |FileCanc|
|00000bc0| 65 6c 28 66 69 6c 65 2c | 20 74 68 65 43 4b 49 44 |el(file,| theCKID|
|00000bd0| 29 3b 0d 09 09 44 69 73 | 70 6f 73 65 48 61 6e 64 |);...Dis|poseHand|
|00000be0| 6c 65 28 28 48 61 6e 64 | 6c 65 29 74 68 65 43 4b |le((Hand|le)theCK|
|00000bf0| 49 44 29 3b 0d 09 09 69 | 66 20 28 65 72 72 20 21 |ID);...i|f (err !|
|00000c00| 3d 20 6e 6f 45 72 72 29 | 20 72 65 74 75 72 6e 3b |= noErr)| return;|
|00000c10| 0d 09 7d 0d 09 65 6c 73 | 65 0d 09 7b 0d 09 09 44 |..}..els|e..{...D|
|00000c20| 69 73 70 6f 73 65 48 61 | 6e 64 6c 65 28 28 48 61 |isposeHa|ndle((Ha|
|00000c30| 6e 64 6c 65 29 74 68 65 | 43 4b 49 44 29 3b 0d 09 |ndle)the|CKID);..|
|00000c40| 7d 0d 09 0d 09 2f 2a 20 | 6d 6f 64 69 66 79 20 74 |}..../* |modify t|
|00000c50| 68 65 20 6c 61 62 65 6c | 20 74 6f 20 62 6c 75 65 |he label| to blue|
|00000c60| 20 28 34 29 20 2a 2f 0d | 09 53 65 74 46 69 6c 65 | (4) */.|.SetFile|
|00000c70| 4c 61 62 65 6c 28 66 69 | 6c 65 2c 20 34 2c 20 4e |Label(fi|le, 4, N|
|00000c80| 55 4c 4c 29 3b 0d 0d 09 | 54 61 73 6b 44 6f 6e 65 |ULL);...|TaskDone|
|00000c90| 28 29 3b 0d 7d 0d 0d 0d | 76 6f 69 64 20 44 6f 46 |();.}...|void DoF|
|00000ca0| 69 6c 65 4d 65 6e 75 28 | 73 68 6f 72 74 20 69 74 |ileMenu(|short it|
|00000cb0| 65 6d 49 44 29 0d 7b 0d | 09 69 66 20 28 20 69 74 |emID).{.|.if ( it|
|00000cc0| 65 6d 49 44 20 3d 3d 20 | 31 20 29 0d 09 09 53 65 |emID == |1 )...Se|
|00000cd0| 6c 65 63 74 46 69 6c 65 | 28 29 3b 09 09 2f 2f 20 |lectFile|();..// |
|00000ce0| 63 61 6c 6c 20 66 69 6c | 65 20 73 65 6c 65 63 74 |call fil|e select|
|00000cf0| 69 6f 6e 20 75 73 65 72 | 50 72 6f 63 0d 09 65 6c |ion user|Proc..el|
|00000d00| 73 65 0d 09 09 53 65 6e | 64 51 75 69 74 54 6f 53 |se...Sen|dQuitToS|
|00000d10| 65 6c 66 28 29 3b 09 2f | 2f 20 73 65 6e 64 20 73 |elf();./|/ send s|
|00000d20| 65 6c 66 20 61 20 27 71 | 75 69 74 27 20 65 76 65 |elf a 'q|uit' eve|
|00000d30| 6e 74 0d 7d 0d 00 00 00 | 00 00 00 00 00 00 00 00 |nt.}....|........|
|00000d40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d80| 00 00 01 00 00 00 01 ea | 00 00 00 ea 00 00 00 4a |........|.......J|
|00000d90| 01 00 00 0a 1e 2e 03 00 | 00 00 00 01 2d 78 e8 63 |........|....-x.c|
|00000da0| 72 5c 01 03 18 12 1c 2e | 00 13 01 2e 2e 4f 55 cc |r\......|.....OU.|
|00000db0| 10 4d 6f 64 69 66 79 52 | 65 61 64 4f 6e 6c 79 2e |.ModifyR|eadOnly.|
|00000dc0| 63 4f 02 00 00 00 54 45 | 58 54 4d 50 53 20 01 00 |cO....TE|XTMPS ..|
|00000dd0| 00 00 54 45 58 54 4d 50 | 53 20 01 00 01 20 00 28 |..TEXTMP|S ... .(|
|00000de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000df0| 00 00 a5 13 ef da 00 00 | 0c b5 00 00 02 34 10 06 |........|.....4..|
|00000e00| 56 90 60 4c 01 ff 82 cc | 96 12 4f ef 00 0c 11 66 |V.`L....|..O....f|
|00000e10| 10 57 72 50 01 04 e2 8a | 8d 67 01 66 a0 96 73 01 |.WrP....|.g.f..s.|
|00000e20| 18 c0 ca 13 4e 5e 4e 75 | 4e 56 11 fd f0 5c 01 07 |....N^Nu|NV...\..|
|00000e30| 18 8c 4d 01 26 6d 11 fe | 0c 51 7e 12 00 92 4e ad |..M.&m..|.Q~...N.|
|00000e40| 01 2f ea 56 25 12 01 64 | 4e 91 67 de b4 03 b2 80 |./.V%..d|N.g.....|
|00000e50| 57 c0 02 40 66 78 01 1c | 00 76 9a 14 42 10 48 78 |W..@fx..|.v..B.Hx|
|00000e60| 0b ea 48 6e 9a 25 12 00 | 54 4e 91 76 11 fe 00 11 |..Hn.%..|TN.v....|
|00000e70| 42 10 12 20 54 0c a8 02 | 43 4c 49 50 11 00 54 12 |B.. T...|CLIP..T.|
|00000e80| 00 00 00 78 00 03 00 00 | 00 48 00 48 00 00 00 00 |...x....|.H.H....|
|00000e90| 02 da 02 28 ff e1 ff e1 | 02 f9 02 45 03 47 05 28 |...(....|...E.G.(|
|00000ea0| 03 fc 00 02 00 00 00 48 | 00 48 00 00 00 00 02 da |.......H|.H......|
|00000eb0| 02 28 00 01 00 00 00 64 | 00 00 00 01 00 03 03 03 |.(.....d|........|
|00000ec0| 00 00 00 01 27 0f 00 01 | 00 01 00 00 00 00 00 00 |....'...|........|
|00000ed0| 00 00 00 00 00 00 68 08 | 00 19 01 90 00 00 00 00 |......h.|........|
|00000ee0| 20 00 00 00 00 00 00 00 | 00 00 00 01 00 00 00 00 | .......|........|
|00000ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 48 |........|.......H|
|00000f00| 00 09 4d 6f 6e 61 63 6f | 00 00 00 00 00 ff 14 d0 |..Monaco|........|
|00000f10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f20| 00 00 00 06 00 04 00 28 | 03 54 02 5f 05 50 01 0f |.......(|.T._.P..|
|00000f30| 00 05 01 db 02 7b ac 74 | c0 51 00 00 0c 06 00 00 |.....{.t|.Q......|
|00000f40| 0c 06 00 00 08 b6 01 00 | 00 00 00 1e 00 28 03 54 |........|.....(.T|
|00000f50| 02 5f 05 50 01 0f 00 05 | 01 db 02 7b 00 00 08 b6 |._.P....|...{....|
|00000f60| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 00 00 00 |........|........|
|00000f70| 01 ea 00 00 00 ea 00 00 | 00 4a 00 e6 06 48 22 86 |........|.J...H".|
|00000f80| 00 00 00 1c 00 4a 00 00 | 4d 50 53 52 00 02 00 0a |.....J..|MPSR....|
|00000f90| 03 ee ff ff 00 00 00 00 | 00 00 00 00 03 ed ff ff |........|........|
|00000fa0| 00 00 00 7c 00 00 00 00 | 03 f0 ff ff 00 00 00 c8 |...|....|........|
|00000fb0| 00 f0 b7 b0 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+