/ Carousel
/ CAROUSEL.cdr / mactosh / hc / xfcn_set.sit / SetCache.c ![]() | < prev |
MacBinary | 1987-10-07 | 2.6 KB | [TEXT/KAHL] |
Confidence | Program | Detection | Match Type | Support |
---|---|---|---|---|
66% | dexvert | Compact Compressed (Unix) (archive/compact) | ext | Supported |
10% | dexvert | MacBinary (archive/macBinary) | fallback | Supported |
1% | dexvert | Text File (text/txt) | fallback | Supported |
100% | file | MacBinary II, inited, Wed Oct 7 02:38:19 1987, modified Wed Oct 7 02:38:19 1987, creator Think C, type ASCII, 2070 bytes "SetCache.c" magic text fragment for file(1) cmd, 1st line "#include <MacTypes.h>", 2nd line "#include <MemoryMgr.h>", 3rd line "#include <OSUtil.h>", 4th line "#include <QuickDraw.h>", 5th line "#include <HyperXCmd.h>", at 0x896 348 bytes resource magic text fragment for file(1) cmd, 1st line "#include <MacTypes.h>", 2nd line "#include <MemoryMgr.h>", 3rd line "#include <OSUtil.h>", 4th line "#include <QuickDraw.h>", 5th line "#include <HyperXCmd.h>" | default (weak) | |
99% | file | data | default | |
74% | TrID | Macintosh plain text (MacBinary) | default | |
25% | TrID | MacBinary 2 | default (weak) | |
100% | siegfried | fmt/1762 MacBinary (II) | default | |
100% | lsar | MacBinary | default |
id metadata | |
---|---|
key | value |
macFileType | [TEXT] |
macFileCreator | [KAHL] |
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0a 53 65 74 43 61 63 | 68 65 2e 63 00 00 00 00 |..SetCac|he.c....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|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 4b 41 48 | 4c 01 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 08 16 00 | 00 01 5c 9d 8f 91 db 9d |........|..\.....|
|00000060| 8f 91 db 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 06 1d 00 00 |........|........|
|00000080| 23 69 6e 63 6c 75 64 65 | 20 3c 4d 61 63 54 79 70 |#include| <MacTyp|
|00000090| 65 73 2e 68 3e 0d 23 69 | 6e 63 6c 75 64 65 20 3c |es.h>.#i|nclude <|
|000000a0| 4d 65 6d 6f 72 79 4d 67 | 72 2e 68 3e 0d 23 69 6e |MemoryMg|r.h>.#in|
|000000b0| 63 6c 75 64 65 20 3c 4f | 53 55 74 69 6c 2e 68 3e |clude <O|SUtil.h>|
|000000c0| 0d 23 69 6e 63 6c 75 64 | 65 20 3c 51 75 69 63 6b |.#includ|e <Quick|
|000000d0| 44 72 61 77 2e 68 3e 0d | 23 69 6e 63 6c 75 64 65 |Draw.h>.|#include|
|000000e0| 20 3c 48 79 70 65 72 58 | 43 6d 64 2e 68 3e 0d 0d | <HyperX|Cmd.h>..|
|000000f0| 65 78 74 65 72 6e 20 42 | 79 74 65 09 43 50 55 66 |extern B|yte.CPUf|
|00000100| 6c 61 67 20 3a 20 30 78 | 31 32 46 3b 0d 0d 2f 2a |lag : 0x|12F;../*|
|00000110| 0d 20 2a 20 53 65 74 43 | 61 63 68 65 20 65 6e 74 |. * SetC|ache ent|
|00000120| 72 79 20 70 6f 69 6e 74 | 2e 20 20 54 68 69 73 20 |ry point|. This |
|00000130| 69 73 20 61 20 58 46 43 | 4e 20 74 68 61 74 20 61 |is a XFC|N that a|
|00000140| 6c 6c 6f 77 73 20 79 6f | 75 20 74 6f 20 73 77 69 |llows yo|u to swi|
|00000150| 74 63 68 20 74 68 65 20 | 63 61 63 68 65 20 6f 6e |tch the |cache on|
|00000160| 20 61 6e 64 20 6f 66 66 | 2e 20 54 68 65 20 63 75 | and off|. The cu|
|00000170| 72 72 65 6e 74 2f 6e 65 | 77 0d 20 2a 09 09 09 09 |rrent/ne|w. *....|
|00000180| 09 63 61 63 68 65 20 73 | 65 74 74 69 6e 67 20 69 |.cache s|etting i|
|00000190| 73 20 72 65 74 75 72 6e | 65 64 2e 20 0d 20 2a 20 |s return|ed. . * |
|000001a0| 57 61 72 6e 69 6e 67 3a | 09 09 09 54 68 65 20 6f |Warning:|...The o|
|000001b0| 6e 20 61 6e 64 20 6f 66 | 66 20 73 74 72 69 6e 67 |n and of|f string|
|000001c0| 73 20 61 72 65 20 68 61 | 72 64 77 69 72 65 64 2e |s are ha|rdwired.|
|000001d0| 20 4c 61 63 6b 69 6e 67 | 20 61 6e 20 6f 77 6e 65 | Lacking| an owne|
|000001e0| 64 20 72 65 73 6f 75 72 | 63 65 73 20 6d 65 74 68 |d resour|ces meth|
|000001f0| 6f 64 20 6f 66 0d 20 2a | 09 09 09 09 09 63 61 72 |od of. *|.....car|
|00000200| 72 79 69 6e 67 20 53 54 | 52 20 72 65 73 6f 75 72 |rying ST|R resour|
|00000210| 63 65 73 20 61 72 6f 75 | 6e 64 20 77 69 74 68 20 |ces arou|nd with |
|00000220| 74 68 69 73 20 58 46 43 | 4e 2c 20 74 68 69 73 20 |this XFC|N, this |
|00000230| 69 73 20 69 6e 65 76 69 | 74 61 62 6c 65 20 28 75 |is inevi|table (u|
|00000240| 6e 6c 65 73 73 20 49 0d | 20 2a 09 09 09 09 09 67 |nless I.| *.....g|
|00000250| 6f 20 74 6f 20 74 68 65 | 20 68 61 73 73 6c 65 20 |o to the| hassle |
|00000260| 6f 66 20 70 61 73 73 69 | 6e 67 20 73 74 72 69 6e |of passi|ng strin|
|00000270| 67 73 20 6f 72 20 72 65 | 73 6f 75 72 63 65 20 49 |gs or re|source I|
|00000280| 44 73 20 74 68 72 6f 75 | 67 68 20 61 73 20 61 72 |Ds throu|gh as ar|
|00000290| 67 75 6d 65 6e 74 73 29 | 2e 0d 20 2a 2f 0d 0d 70 |guments)|.. */..p|
|000002a0| 61 73 63 61 6c 20 76 6f | 69 64 0d 6d 61 69 6e 28 |ascal vo|id.main(|
|000002b0| 70 61 72 61 6d 50 74 72 | 29 0d 72 65 67 69 73 74 |paramPtr|).regist|
|000002c0| 65 72 20 58 43 6d 64 42 | 6c 6f 63 6b 50 74 72 09 |er XCmdB|lockPtr.|
|000002d0| 70 61 72 61 6d 50 74 72 | 3b 0d 7b 0d 09 53 74 72 |paramPtr|;.{..Str|
|000002e0| 32 35 35 09 09 73 74 72 | 3b 0d 09 73 68 6f 72 74 |255..str|;..short|
|000002f0| 09 09 74 6f 67 67 6c 65 | 3b 0d 09 42 79 74 65 09 |..toggle|;..Byte.|
|00000300| 09 09 63 61 63 68 65 4f | 6e 3b 0d 0d 09 2f 2a 20 |..cacheO|n;.../* |
|00000310| 53 79 73 45 6e 76 69 72 | 6f 6e 73 20 69 73 20 6f |SysEnvir|ons is o|
|00000320| 76 65 72 6b 69 6c 6c 20 | 66 6f 72 20 74 68 69 73 |verkill |for this|
|00000330| 21 20 2a 2f 0d 09 69 66 | 20 28 43 50 55 66 6c 61 |! */..if| (CPUfla|
|00000340| 67 20 21 3d 20 32 29 20 | 7b 0d 09 09 2f 2a 20 43 |g != 2) |{.../* C|
|00000350| 61 6c 6c 69 6e 67 20 53 | 65 74 43 61 63 68 65 20 |alling S|etCache |
|00000360| 66 6f 72 20 61 20 36 38 | 30 30 30 3f 21 20 2e 20 |for a 68|000?! . |
|00000370| 4d 69 67 68 74 20 62 65 | 20 61 20 36 38 30 33 30 |Might be| a 68030|
|00000380| 20 49 20 73 75 70 70 6f | 73 65 2c 20 62 75 74 20 | I suppo|se, but |
|00000390| 77 68 6f 20 6b 6e 6f 77 | 73 20 77 68 61 74 20 74 |who know|s what t|
|000003a0| 68 65 20 43 41 43 52 0d | 09 09 20 20 2a 20 69 73 |he CACR.|.. * is|
|000003b0| 20 6c 69 6b 65 20 6f 6e | 20 74 68 61 74 20 70 72 | like on| that pr|
|000003c0| 6f 63 65 73 73 6f 72 2e | 20 54 61 6b 65 20 6e 6f |ocessor.| Take no|
|000003d0| 20 63 68 61 6e 63 65 73 | 2c 20 61 6e 64 20 72 65 | chances|, and re|
|000003e0| 74 75 72 6e 20 4f 46 46 | 2e 20 0d 09 09 20 20 2a |turn OFF|. ... *|
|000003f0| 2f 0d 09 09 63 61 63 68 | 65 4f 6e 20 3d 20 30 3b |/...cach|eOn = 0;|
|00000400| 0d 09 7d 20 65 6c 73 65 | 20 7b 0d 09 09 2f 2a 20 |..} else| {.../* |
|00000410| 46 69 6e 64 20 6f 75 74 | 20 77 68 61 74 20 74 68 |Find out| what th|
|00000420| 65 20 63 75 72 72 65 6e | 74 20 63 61 63 68 65 20 |e curren|t cache |
|00000430| 73 74 61 74 65 20 69 73 | 2e 2e 2e 20 2a 2f 0d 09 |state is|... */..|
|00000440| 09 61 73 6d 20 7b 0d 09 | 09 09 63 6c 72 2e 6c 09 |.asm {..|..clr.l.|
|00000450| 09 64 30 0d 09 09 09 64 | 63 2e 77 09 09 30 78 34 |.d0....d|c.w..0x4|
|00000460| 45 37 41 09 09 09 2f 2a | 20 6d 6f 76 65 63 09 43 |E7A.../*| movec.C|
|00000470| 41 43 52 2c 20 64 30 20 | 2a 2f 0d 09 09 09 64 63 |ACR, d0 |*/....dc|
|00000480| 2e 77 09 09 30 78 32 0d | 09 09 09 6d 6f 76 65 2e |.w..0x2.|...move.|
|00000490| 62 09 64 30 2c 63 61 63 | 68 65 4f 6e 09 09 0d 09 |b.d0,cac|heOn....|
|000004a0| 09 7d 0d 09 0d 09 09 2f | 2a 20 41 72 65 20 74 68 |.}...../|* Are th|
|000004b0| 65 72 65 20 61 6e 79 20 | 70 61 72 61 6d 65 74 65 |ere any |paramete|
|000004c0| 72 73 3f 20 54 68 69 73 | 20 69 73 20 61 20 62 69 |rs? This| is a bi|
|000004d0| 74 20 6f 66 20 61 20 6b | 6c 75 67 65 2c 20 62 75 |t of a k|luge, bu|
|000004e0| 74 20 69 66 20 53 65 74 | 43 61 63 68 65 20 69 73 |t if Set|Cache is|
|000004f0| 20 63 61 6c 6c 65 64 20 | 77 69 74 68 6f 75 74 20 | called |without |
|00000500| 61 6e 79 20 70 61 72 61 | 6d 65 74 65 72 73 2c 20 |any para|meters, |
|00000510| 69 74 20 72 65 74 75 72 | 6e 73 20 74 68 65 0d 09 |it retur|ns the..|
|00000520| 09 20 20 2a 20 63 75 72 | 72 65 6e 74 20 63 61 63 |. * cur|rent cac|
|00000530| 68 65 20 62 69 74 20 73 | 74 61 74 75 73 20 69 6e |he bit s|tatus in|
|00000540| 20 22 72 65 73 75 6c 74 | 22 2e 20 53 61 76 65 73 | "result|". Saves|
|00000550| 20 68 61 76 69 6e 67 20 | 73 65 70 61 72 61 74 65 | having |separate|
|00000560| 20 58 46 43 4e 20 61 6e | 64 20 58 43 4d 44 20 72 | XFCN an|d XCMD r|
|00000570| 65 73 6f 75 72 63 65 73 | 2e 0d 09 09 20 20 2a 2f |esources|.... */|
|00000580| 0d 09 09 69 66 20 28 70 | 61 72 61 6d 50 74 72 2d |...if (p|aramPtr-|
|00000590| 3e 70 61 72 61 6d 43 6f | 75 6e 74 20 21 3d 20 30 |>paramCo|unt != 0|
|000005a0| 29 20 7b 0d 09 09 09 2f | 2a 20 46 69 72 73 74 20 |) {..../|* First |
|000005b0| 28 61 6e 64 20 6f 6e 6c | 79 29 20 70 61 72 61 6d |(and onl|y) param|
|000005c0| 20 69 73 20 6f 6e 2f 6f | 66 66 2e 20 20 43 6f 6e | is on/o|ff. Con|
|000005d0| 76 65 72 74 20 69 74 20 | 74 6f 20 61 20 70 61 73 |vert it |to a pas|
|000005e0| 63 61 6c 20 73 74 72 69 | 6e 67 20 2a 2f 0d 09 09 |cal stri|ng */...|
|000005f0| 09 5a 65 72 6f 54 6f 50 | 61 73 28 70 61 72 61 6d |.ZeroToP|as(param|
|00000600| 50 74 72 2c 2a 28 70 61 | 72 61 6d 50 74 72 2d 3e |Ptr,*(pa|ramPtr->|
|00000610| 70 61 72 61 6d 73 5b 30 | 5d 29 2c 20 73 74 72 29 |params[0|]), str)|
|00000620| 3b 0d 09 09 0d 09 09 09 | 74 6f 67 67 6c 65 20 3d |;.......|toggle =|
|00000630| 20 20 28 53 74 72 69 6e | 67 45 71 75 61 6c 28 70 | (Strin|gEqual(p|
|00000640| 61 72 61 6d 50 74 72 2c | 20 28 53 74 72 33 31 20 |aramPtr,| (Str31 |
|00000650| 2a 29 73 74 72 2c 20 28 | 53 74 72 33 31 20 2a 29 |*)str, (|Str31 *)|
|00000660| 22 5c 70 4f 66 66 22 29 | 20 3d 3d 20 54 52 55 45 |"\pOff")| == TRUE|
|00000670| 29 20 3f 20 30 20 3a 20 | 31 3b 0d 09 09 0d 09 09 |) ? 0 : |1;......|
|00000680| 09 2f 2a 20 41 6e 64 20 | 63 6c 61 6d 70 20 69 74 |./* And |clamp it|
|00000690| 2e 20 2a 2f 0d 09 09 09 | 69 66 20 28 74 6f 67 67 |. */....|if (togg|
|000006a0| 6c 65 20 21 3d 20 30 29 | 20 74 6f 67 67 6c 65 20 |le != 0)| toggle |
|000006b0| 3d 20 31 3b 0d 09 09 0d | 09 09 09 69 66 20 28 63 |= 1;....|...if (c|
|000006c0| 61 63 68 65 4f 6e 20 21 | 3d 20 74 6f 67 67 6c 65 |acheOn !|= toggle|
|000006d0| 29 20 7b 09 2f 2a 20 4e | 65 65 64 20 74 6f 20 74 |) {./* N|eed to t|
|000006e0| 6f 67 67 6c 65 20 74 68 | 65 20 76 61 6c 75 65 73 |oggle th|e values|
|000006f0| 2e 20 2a 2f 0d 09 09 09 | 09 63 61 63 68 65 4f 6e |. */....|.cacheOn|
|00000700| 20 5e 3d 20 31 3b 0d 09 | 09 09 0d 09 09 09 09 2f | ^= 1;..|......./|
|00000710| 2a 20 54 6f 67 67 6c 65 | 20 74 68 65 20 63 61 63 |* Toggle| the cac|
|00000720| 68 65 20 63 6f 6e 74 72 | 6f 6c 20 62 69 74 2e 20 |he contr|ol bit. |
|00000730| 2a 2f 0d 09 09 09 09 61 | 73 6d 20 7b 0d 09 09 09 |*/.....a|sm {....|
|00000740| 09 09 63 6c 72 2e 6c 09 | 09 64 30 0d 09 09 09 09 |..clr.l.|.d0.....|
|00000750| 09 64 63 2e 77 09 09 30 | 78 34 45 37 41 0d 09 09 |.dc.w..0|x4E7A...|
|00000760| 09 09 09 64 63 2e 77 09 | 09 30 78 32 09 09 09 09 |...dc.w.|.0x2....|
|00000770| 2f 2a 20 41 20 6d 6f 76 | 65 63 20 43 41 43 52 2c |/* A mov|ec CACR,|
|00000780| 20 64 30 20 2a 2f 0d 09 | 09 09 09 09 65 6f 72 69 | d0 */..|....eori|
|00000790| 09 09 23 31 2c 64 30 0d | 09 09 09 09 09 64 63 2e |..#1,d0.|.....dc.|
|000007a0| 77 09 09 30 78 34 45 37 | 42 09 09 09 2f 2a 20 6d |w..0x4E7|B.../* m|
|000007b0| 6f 76 65 63 09 64 30 2c | 43 41 43 52 20 2a 2f 0d |ovec.d0,|CACR */.|
|000007c0| 09 09 09 09 09 64 63 2e | 77 09 09 30 78 32 0d 09 |.....dc.|w..0x2..|
|000007d0| 09 09 09 7d 0d 09 09 09 | 7d 0d 09 09 7d 0d 09 7d |...}....|}...}..}|
|000007e0| 0d 0d 09 2f 2a 20 41 6e | 64 20 72 65 74 75 72 6e |.../* An|d return|
|000007f0| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 63 61 63 | the cur|rent cac|
|00000800| 68 65 20 76 61 6c 75 65 | 2e 20 2a 2f 0d 09 70 61 |he value|. */..pa|
|00000810| 72 61 6d 50 74 72 2d 3e | 72 65 74 75 72 6e 56 61 |ramPtr->|returnVa|
|00000820| 6c 75 65 20 3d 20 28 63 | 61 63 68 65 4f 6e 20 3d |lue = (c|acheOn =|
|00000830| 3d 20 30 29 20 3f 20 50 | 61 73 54 6f 5a 65 72 6f |= 0) ? P|asToZero|
|00000840| 28 70 61 72 61 6d 50 74 | 72 2c 20 28 53 74 72 69 |(paramPt|r, (Stri|
|00000850| 6e 67 50 74 72 29 22 5c | 70 4f 66 66 22 29 20 3a |ngPtr)"\|pOff") :|
|00000860| 0d 09 09 09 09 09 09 09 | 09 09 20 20 50 61 73 54 |........|.. PasT|
|00000870| 6f 5a 65 72 6f 28 70 61 | 72 61 6d 50 74 72 2c 20 |oZero(pa|ramPtr, |
|00000880| 28 53 74 72 69 6e 67 50 | 74 72 29 22 5c 70 4f 6e |(StringP|tr)"\pOn|
|00000890| 22 29 3b 0d 7d 0d 00 00 | 00 00 00 00 00 00 00 00 |");.}...|........|
|000008a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000900| 00 00 01 00 00 00 01 16 | 00 00 00 16 00 00 00 46 |........|.......F|
|00000910| 00 1e 00 0d 97 76 00 0d | 97 76 00 00 f5 a4 00 00 |.....v..|.v......|
|00000920| 0e 3e 00 0b 97 c6 00 0d | 00 01 b9 ac 40 81 2d 64 |.>......|....@.-d|
|00000930| 0a 53 65 74 43 61 63 68 | 65 2e 63 61 02 00 00 00 |.SetCach|e.ca....|
|00000940| 54 45 58 54 4b 41 48 4c | 01 00 00 00 00 80 00 00 |TEXTKAHL|........|
|00000950| 00 00 54 45 58 54 4b 41 | 48 4c 01 00 00 00 00 80 |..TEXTKA|HL......|
|00000960| 00 00 21 66 00 00 00 00 | 00 00 00 00 00 00 00 00 |..!f....|........|
|00000970| 00 00 9d 70 da 92 00 00 | 08 16 00 00 01 5c 00 07 |...p....|.....\..|
|00000980| 40 80 00 02 5d 34 00 00 | 00 09 00 0b 91 b2 00 02 |@...]4..|........|
|00000990| 5d 34 00 0b 97 c6 00 0c | 05 8a f5 a4 00 00 00 ff |]4......|........|
|000009a0| 00 07 00 0b 92 b2 00 02 | 89 96 00 0b 91 b2 00 42 |........|.......B|
|000009b0| fa 73 d3 82 00 00 00 00 | 00 00 13 44 00 00 00 00 |.s......|...D....|
|000009c0| 00 00 00 00 00 00 00 00 | 00 00 22 00 00 00 22 00 |........|.."...".|
|000009d0| 88 00 22 00 88 00 22 00 | cc 00 33 00 cc 00 33 00 |.."...".|..3...3.|
|000009e0| cc 88 33 22 cc 88 33 22 | ee 88 bb 22 ee 88 bb 22 |..3"..3"|..."..."|
|000009f0| ee cc bb 33 ee cc bb 33 | ff cc ff 33 ff cc ff 33 |...3...3|...3...3|
|00000a00| 00 00 00 04 00 06 00 04 | 00 00 00 0a 00 09 06 47 |........|.......G|
|00000a10| 65 6e 65 76 61 00 00 00 | 01 00 00 00 01 16 00 00 |eneva...|........|
|00000a20| 00 16 00 00 00 46 00 03 | b6 88 03 ae 00 00 00 1c |.....F..|........|
|00000a30| 00 46 00 01 45 54 41 42 | 00 00 00 12 45 46 4e 54 |.F..ETAB|....EFNT|
|00000a40| 00 00 00 1e 03 ec ff ff | 00 00 00 00 00 03 b5 90 |........|........|
|00000a50| 03 eb ff ff 00 00 00 08 | 00 03 b5 88 00 00 00 00 |........|........|
|00000a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+