|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics
Length: 1311744 (0x140400)
Types: Rc489kSubCat
Names: »kkmon3filer«
└─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ.
└─⟦4334b4c0b⟧
└─⟦this⟧ »kkmon3filer«
0x000000…000033 (0,) Rc489kSubCatEnt {f00=0x00245b, f01=0x0007e4, f02=0x0007ed, filename=»montabinit «, entry_tail=0-4-0-24-1982-04-28T08:27-disc3-0x0-0x0-0x0-0x0}
0x000033…000066 Rc489kSubCatEnt {f00=0x01a143, f01=0x0007e4, f02=0x0007ed, filename=»moncatinit «, entry_tail=0-4-0-124-1982-03-22T10:19-disc3-0x0-0x0-0x0-0x0}
0x000066…000099 Rc489kSubCatEnt {f00=0x096d73, f01=0x0007e4, f02=0x0007ed, filename=»kkopt3 «, entry_tail=0-4-0-23-1982-02-23T13:47-disc3-0x0-0x0-0x0-0x0}
0x000099…0000cc Rc489kSubCatEnt {f00=0x0ad84b, f01=0x0007e4, f02=0x0007ed, filename=»kkmonret3 «, entry_tail=0-4-0-39-1982-03-18T09:32-disc3-0x0-0x0-0x0-0x0}
0x0000cc…0000ff Rc489kSubCatEnt {f00=0x0d456b, f01=0x0007e4, f02=0x0007ed, filename=»kklistopt3 «, entry_tail=0-4-0-23-1982-02-23T13:48-disc3-0x0-0x0-0x0-0x0}
0x0000ff…000132 Rc489kSubCatEnt {f00=0x0eba2a, f01=0x0007e4, f02=0x0007ed, filename=»mondef «, entry_tail=0-4-0-31-1982-02-23T08:52-disc3-0x0-0x0-0x0-0x0}
0x000132…000165 Rc489kSubCatEnt {f00=0x10a40a, f01=0x0007e4, f02=0x0007ed, filename=»moncentral «, entry_tail=0-4-0-88-1982-02-23T08:52-disc3-0x0-0x0-0x0-0x0}
0x000165…000198 Rc489kSubCatEnt {f00=0x162602, f01=0x0007e4, f02=0x0007ed, filename=»monprocs «, entry_tail=0-4-0-253-1982-02-23T08:53-disc3-0x0-0x0-0x0-0x0}
0x000198…0001cb Rc489kSubCatEnt {f00=0x25f5a2, f01=0x0007e4, f02=0x0007ed, filename=»mondisc «, entry_tail=0-4-0-158-1982-02-10T09:04-disc1-0x0-0x0-0x0-0x0}
0x0001cb…0001fe Rc489kSubCatEnt {f00=0x2fddca, f01=0x0007e4, f02=0x0007ed, filename=»monfpaline «, entry_tail=0-4-0-130-1982-02-10T09:04-disc1-0x0-0x0-0x0-0x0}
0x0001fe…000231 Rc489kSubCatEnt {f00=0x37f232, f01=0x0007e4, f02=0x0007ed, filename=»monhost «, entry_tail=0-4-0-83-1982-02-23T08:53-disc3-0x0-0x0-0x0-0x0}
0x000231…000264 Rc489kSubCatEnt {f00=0x3d2bc2, f01=0x0007e4, f02=0x0007ed, filename=»monfpasub «, entry_tail=0-4-0-165-1982-02-23T08:54-disc3-0x0-0x0-0x0-0x0}
0x000264…000297 Rc489kSubCatEnt {f00=0x4772c2, f01=0x0007e4, f02=0x0007ed, filename=»monprocfnc1 «, entry_tail=0-4-0-84-1982-02-23T08:54-disc3-0x0-0x0-0x0-0x0}
0x000297…0002ca Rc489kSubCatEnt {f00=0x4cbac2, f01=0x0007e4, f02=0x0007ed, filename=»monprocfnc2 «, entry_tail=0-4-0-247-1982-02-23T08:54-disc3-0x0-0x0-0x0-0x0}
0x0002ca…0002fd Rc489kSubCatEnt {f00=0x5c2422, f01=0x0007e4, f02=0x0007ed, filename=»mons1 «, entry_tail=0-4-0-91-1982-02-23T08:55-disc3-0x0-0x0-0x0-0x0}
0x0002fd…000300 0x000012
0x000300…000333 Rc489kSubCatEnt {f00=0x61dc22, f01=0x0007e4, f02=0x0007ed, filename=»mons2 «, entry_tail=0-4-0-98-1982-02-23T08:55-disc3-0x0-0x0-0x0-0x0}
0x000333…000366 Rc489kSubCatEnt {f00=0x67f262, f01=0x0007e4, f02=0x0007ed, filename=»kkiccmtxt «, entry_tail=0-4-0-42-1981-08-12T11:42-disc1-0x0-0x0-0x0-0x0}
0x000366…000399 Rc489kSubCatEnt {f00=0x6a9a2b, f01=0x0007e4, f02=0x0007ed, filename=»inf3 «, entry_tail=0-4-0-1-1980-10-21T13:08-disc1-0x0-0x0-0x0-0x0}
0x000399…0003a0 0a d8 4b 00 07 e4 00 ┆ K ┆
0x0003a0…0003c0 07 ed 6b 6b 6d 6f 6e 72 65 74 33 00 00 00 00 00 27 64 69 73 63 33 00 00 00 00 00 00 00 82 84 28 ┆ kkmonret3 'disc3 (┆
0x0003c0…0003e0 00 00 00 00 00 00 00 00 00 00 00 00 0d 45 6b 00 07 e4 00 07 ed 6b 6b 6c 69 73 74 6f 70 74 33 00 ┆ Ek kklistopt3 ┆
0x0003e0…000400 00 00 00 17 64 69 73 63 33 00 00 00 00 00 00 00 81 f1 3e 00 00 00 00 00 00 00 00 00 00 00 00 0e ┆ disc3 > ┆
0x000400…000420 ba 2a 00 07 e4 00 07 ed 6d 6f 6e 64 65 66 00 00 00 00 00 00 00 00 1f 64 69 73 63 33 00 00 00 00 ┆ * mondef disc3 ┆
0x000420…000440 00 00 00 81 ef eb 00 00 00 00 00 00 00 00 00 00 00 00 10 a4 0a 00 07 e4 00 07 ed 6d 6f 6e 63 65 ┆ monce┆
0x000440…000460 6e 74 72 61 6c 00 00 00 00 58 64 69 73 63 33 00 00 00 00 00 00 00 81 ef eb 00 00 00 00 00 00 00 ┆ntral Xdisc3 ┆
0x000460…000480 00 00 00 00 00 16 26 02 00 07 e4 00 07 ed 6d 6f 6e 70 72 6f 63 73 00 00 00 00 00 00 fd 64 69 73 ┆ & monprocs dis┆
0x000480…0004a0 63 33 00 00 00 00 00 00 00 81 ef ec 00 00 00 00 00 00 00 00 00 00 00 00 25 f5 a2 00 07 e4 00 07 ┆c3 % ┆
0x0004a0…0004c0 ed 6d 6f 6e 64 69 73 63 00 00 00 00 00 00 00 9e 64 69 73 63 31 00 00 00 00 00 00 00 81 9c 49 00 ┆ mondisc disc1 I ┆
0x0004c0…0004e0 00 00 00 00 00 00 00 00 00 00 00 2f dd ca 00 07 e4 00 07 ed 6d 6f 6e 66 70 61 6c 69 6e 65 00 00 ┆ / monfpaline ┆
0x0004e0…000500 00 00 82 64 69 73 63 31 00 00 00 00 00 00 00 81 9c 49 00 00 00 00 00 00 00 00 00 00 00 00 37 f2 ┆ disc1 I 7 ┆
0x000500…000520 32 00 07 e4 00 07 ed 6d 6f 6e 68 6f 73 74 00 00 00 00 00 00 00 53 64 69 73 63 33 00 00 00 00 00 ┆2 monhost Sdisc3 ┆
0x000520…000540 00 00 81 ef ec 00 00 00 00 00 00 00 00 00 00 00 00 3d 2b c2 00 07 e4 00 07 ed 6d 6f 6e 66 70 61 ┆ =+ monfpa┆
0x000540…000560 73 75 62 00 00 00 00 00 a5 64 69 73 63 33 00 00 00 00 00 00 00 81 ef ed 00 00 00 00 00 00 00 00 ┆sub disc3 ┆
0x000560…000580 00 00 00 00 47 72 c2 00 07 e4 00 07 ed 6d 6f 6e 70 72 6f 63 66 6e 63 31 00 00 00 54 64 69 73 63 ┆ Gr monprocfnc1 Tdisc┆
0x000580…0005a0 33 00 00 00 00 00 00 00 81 ef ed 00 00 00 00 00 00 00 00 00 00 00 00 4c ba c2 00 07 e4 00 07 ed ┆3 L ┆
0x0005a0…0005c0 6d 6f 6e 70 72 6f 63 66 6e 63 32 00 00 00 f7 64 69 73 63 33 00 00 00 00 00 00 00 81 ef ed 00 00 ┆monprocfnc2 disc3 ┆
0x0005c0…0005e0 00 00 00 00 00 00 00 00 00 00 5c 24 22 00 07 e4 00 07 ed 6d 6f 6e 73 31 00 00 00 00 00 00 00 00 ┆ Ø$" mons1 ┆
0x0005e0…000600 00 5b 64 69 73 63 33 00 00 00 00 00 00 00 81 ef ee 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ Ædisc3 ┆
0x000600…004e00 Data for montabinit
0x004e00…01c200 Data for moncatinit
0x01c200…020700 (50,) Data for kkopt3
0x020700…027c00 Data for kkmonret3
0x027c00…02c100 Data for kklistopt3
0x02c100…031e00 Data for mondef
0x031e00…042600 Data for moncentral
0x042600…071d00 (118,) Data for monprocs
0x071d00…08f700 Data for mondisc
0x08f700…0a7d00 (255,) Data for monfpaline
0x0a7d00…0b7600 Data for monhost
0x0b7600…0d6500 (326,) Data for monfpasub
0x0d6500…0e6100 (381,) Data for monprocfnc1
0x0e6100…114600 (409,) Data for monprocfnc2
0x114600…125700 Data for mons1
0x125700…137d00 Data for mons2
0x137d00…13fb00 Data for kkiccmtxt
0x13fb00…13fe00 Data for inf3
0x13fe00…13fe20 20 20 20 20 20 20 20 20 20 20 20 65 6e 64 3b 20 0a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ end; ┆
0x13fe20…13fe40 65 6e 64 20 65 6c 73 65 20 6f 75 74 64 75 6d 70 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 65 6e ┆end else outdump; en┆
0x13fe40…13fe60 64 3b 0a 20 20 20 20 20 20 20 20 20 20 65 6e 64 3b 0a 0a 20 20 20 20 20 20 20 20 65 6e 64 3b 0a ┆d; end; end; ┆
0x13fe60…13fe80 6c 61 31 3a 0a 0a 20 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 77 68 69 6c 65 20 6d 6f 72 ┆la1: end; while mor┆
0x13fe80…13fea0 65 20 61 6e 64 20 69 3e 3d 20 6e 6f 6f 66 65 6e 74 72 69 65 73 20 64 6f 0a 20 20 20 20 20 20 20 ┆e and i>= noofentries do ┆
0x13fea0…13fec0 20 20 20 6f 75 74 64 75 6d 70 3b 0a 20 20 20 20 20 20 6e 6f 6f 66 65 6e 74 72 69 65 73 3a 3d 6e ┆ outdump; noofentries:=n┆
0x13fec0…13fee0 6f 6f 66 65 6e 74 72 69 65 73 2b 6e 6f 74 61 70 65 6e 3b 0a 20 20 20 20 20 20 69 66 20 74 31 74 ┆oofentries+notapen; if t1t┆
0x13fee0…13ff00 65 73 74 20 74 68 65 6e 20 77 72 69 74 65 28 6f 75 74 2c 3c 3a 3c 31 30 3e 20 6e 6f 20 6f 66 20 ┆est then write(out,<:<10> no of ┆
0x13ff00…13ff20 65 6e 74 72 69 65 73 20 3d 20 3a 3e 2c 6e 6f 6f 66 65 6e 74 72 69 65 73 29 3b 0a 20 20 20 20 20 ┆entries = :>,noofentries); ┆
0x13ff20…13ff40 20 66 6f 72 20 69 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 31 35 20 64 6f 0a 20 20 ┆ for i:= 1 step 1 until 15 do ┆
0x13ff40…13ff60 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 6f 75 74 72 65 63 36 28 63 61 74 2c 33 34 29 3b ┆ begin outrec6(cat,34);┆
0x13ff60…13ff80 0a 20 20 20 20 20 20 66 6f 72 20 69 68 3a 3d 32 20 73 74 65 70 20 32 20 75 6e 74 69 6c 20 33 34 ┆ for ih:=2 step 2 until 34┆
0x13ff80…13ffa0 20 64 6f 20 63 61 74 2e 69 68 3a 3d 2d 31 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 ┆ do cat.ih:=-1; end; ┆
0x13ffa0…13ffc0 20 74 61 64 6f 63 6e 61 6d 65 3a 3d 30 3b 0a 20 20 20 20 20 20 73 65 74 70 6f 73 69 74 69 6f 6e ┆ tadocname:=0; setposition┆
0x13ffc0…13ffe0 28 63 61 74 2c 30 2c 30 29 3b 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 63 61 74 2c 74 72 75 65 29 ┆(cat,0,0); close(cat,true)┆
0x13ffe0…140000 3b 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 64 75 6d 70 2c 74 72 75 65 29 3b 0a 20 20 20 20 20 20 ┆; close(dump,true); ┆
0x140000…140020 69 3a 3d 6d 6f 6e 69 74 6f 72 28 34 30 29 6c 6f 6f 6b 5f 75 70 5f 65 6e 74 72 79 3a 28 63 61 74 ┆i:=monitor(40)look_up_entry:(cat┆
0x140020…140040 2c 30 2c 74 61 69 6c 29 3b 0a 20 20 20 20 20 20 74 61 69 6c 28 31 29 3a 3d 28 6e 6f 6f 66 65 6e ┆,0,tail); tail(1):=(noofen┆
0x140040…140060 74 72 69 65 73 2b 31 29 2f 2f 31 35 20 2b 31 3b 0a 20 20 20 20 20 20 69 3a 3d 6d 6f 6e 69 74 6f ┆tries+1)//15 +1; i:=monito┆
0x140060…140080 72 28 34 34 29 63 68 61 6e 67 65 5f 65 6e 74 72 79 3a 28 63 61 74 2c 30 2c 74 61 69 6c 29 3b 0a ┆r(44)change_entry:(cat,0,tail); ┆
0x140080…1400a0 20 20 20 20 20 20 69 66 20 69 20 3c 3e 20 30 20 74 68 65 6e 20 65 72 72 6f 72 28 31 31 29 3b 0a ┆ if i <> 0 then error(11); ┆
0x1400a0…1400c0 6e 6f 70 63 61 74 3a 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 64 75 6d 70 63 61 74 2c 74 72 75 65 ┆nopcat: close(dumpcat,true┆
0x1400c0…1400e0 29 3b 63 6c 6f 73 65 28 64 75 6d 70 2c 74 72 75 65 29 3b 0a 20 20 20 20 65 6e 64 3b 0a 0c 0a 20 ┆);close(dump,true); end; ┆
0x1400e0…140100 20 20 20 70 72 6f 63 65 64 75 72 65 20 6d 6f 75 6e 74 5f 6d 65 64 5f 72 69 6e 67 28 72 69 6e 67 ┆ procedure mount_med_ring(ring┆
0x140100…140120 (569,) 29 3b 0a 20 20 20 20 62 6f 6f 6c 65 61 6e 20 72 69 6e 67 3b 0a 20 20 20 20 62 65 67 69 6e 0a 20 ┆); boolean ring; begin ┆
0x140120…140140 20 20 20 20 20 69 6e 74 65 67 65 72 20 61 72 72 61 79 20 69 61 28 31 3a 31 32 29 2c 6d 28 31 3a ┆ integer array ia(1:12),m(1:┆
0x140140…140160 38 29 3b 0a 20 20 20 20 20 20 7a 6f 6e 65 20 7a 28 31 32 38 2c 31 2c 73 74 64 65 72 72 6f 72 29 ┆8); zone z(128,1,stderror)┆
0x140160…140180 3b 0a 20 20 20 20 20 20 66 6f 72 20 69 3a 3d 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 38 20 ┆; for i:=1 step 1 until 8 ┆
0x140180…1401a0 64 6f 20 6d 28 69 29 3a 3d 30 3b 0a 20 20 20 20 20 20 6d 28 35 29 3a 3d 74 61 70 65 6e 61 6d 65 ┆do m(i):=0; m(5):=tapename┆
0x1401a0…1401c0 28 31 29 20 73 68 69 66 74 20 28 2d 32 34 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 ┆(1) shift (-24) extract 24; ┆
0x1401c0…1401e0 20 20 6d 28 36 29 3a 3d 74 61 70 65 6e 61 6d 65 28 31 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a ┆ m(6):=tapename(1) extract 24; ┆
0x1401e0…140200 20 20 20 20 20 20 6d 28 37 29 3a 3d 74 61 70 65 6e 61 6d 65 28 32 29 20 73 68 69 66 74 20 28 2d ┆ m(7):=tapename(2) shift (-┆
0x140200…140220 32 34 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 20 20 6d 28 38 29 3a 3d 74 61 70 65 ┆24) extract 24; m(8):=tape┆
0x140220…140240 6e 61 6d 65 28 32 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 20 20 6f 70 65 6e 28 7a ┆name(2) extract 24; open(z┆
0x140240…140260 2c 30 2c 20 74 61 70 65 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 20 20 20 69 66 20 6d 6f 6e 69 74 6f ┆,0, tapename,0); if monito┆
0x140260…140280 72 28 34 29 70 72 6f 63 65 73 73 20 64 65 73 63 3a 28 20 7a 2c 30 2c 69 61 29 20 3d 20 30 20 74 ┆r(4)process desc:( z,0,ia) = 0 t┆
0x140280…1402a0 68 65 6e 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 6d 28 31 29 3a 3d 31 36 ┆hen begin m(1):=16┆
0x1402a0…1402c0 20 3c 2a 6f 70 6d 65 73 73 2a 3e 20 73 68 69 66 74 20 31 32 3b 0a 20 20 20 20 20 20 20 20 6d 28 ┆ <*opmess*> shift 12; m(┆
0x1402c0…1402e0 32 29 3a 3d 20 6c 6f 6e 67 20 3c 3a 72 69 6e 3a 3e 20 73 68 69 66 74 20 28 2d 32 34 29 20 65 78 ┆2):= long <:rin:> shift (-24) ex┆
0x1402e0…140300 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 20 20 20 20 6d 28 33 29 3a 3d 20 6c 6f 6e 67 20 3c 3a ┆tract 24; m(3):= long <:┆
0x140300…140320 67 3a 3e 20 73 68 69 66 74 20 28 2d 32 34 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 ┆g:> shift (-24) extract 24; ┆
0x140320…140340 20 20 20 20 6d 28 34 29 3a 3d 20 33 32 20 73 68 69 66 74 20 31 36 3b 0a 20 20 20 20 20 20 20 20 ┆ m(4):= 32 shift 16; ┆
0x140340…140360 73 79 73 74 65 6d 28 31 30 29 70 61 72 72 61 6e 74 20 6d 65 73 73 61 67 65 3a 28 30 2c 6d 29 3b ┆system(10)parrant message:(0,m);┆
0x140360…140380 0a 20 20 20 20 20 20 65 6e 64 3b 0a 73 65 6e 73 65 3a 0a 20 20 20 20 20 20 6d 6f 6e 69 74 6f 72 ┆ end; sense: monitor┆
0x140380…1403a0 20 28 36 29 69 6e 69 74 69 61 6c 69 7a 65 20 70 72 6f 63 65 73 73 3a 28 20 7a 2c 30 2c 69 61 29 ┆ (6)initialize process:( z,0,ia)┆
0x1403a0…1403c0 3b 0a 20 20 20 20 20 20 67 65 74 73 68 61 72 65 36 28 7a 2c 69 61 2c 31 29 3b 0a 20 20 20 20 20 ┆; getshare6(z,ia,1); ┆
0x1403c0…1403e0 20 69 61 28 34 29 3a 3d 30 3b 20 0a 20 20 20 20 20 20 73 65 74 73 68 61 72 65 36 28 7a 2c 69 61 ┆ ia(4):=0; setshare6(z,ia┆
0x1403e0…140400 2c 31 29 3b 0a 20 20 20 20 20 20 6d 6f 6e 69 74 6f 72 20 28 31 36 29 73 65 6e 64 20 6d 65 73 73 ┆,1); monitor (16)send mess┆