|
|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1667 (0x683)
Types: EM, TextFile
Names: »ECC_LOG_ENTRY.EM«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »ECC_LOG_ENTRY.EM«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »ECC_LOG_ENTRY.EM«
[set ecc_log_info [xeq typ prep_read_reg; xeq typ read_a_reg %1% 0]];
[set ecc_time_uaddr [xeq val prep_read_reg; xeq val read_a_reg %1% 0]];
[write [var ecc_log_info]
,[extract [var ecc_time_uaddr] 6 b]
,[extract [var ecc_time_uaddr] 1 4]
[eq [QUAD_DENSITY] true] ! 8MB board
,[#case,[#extract [var ecc_log_info] 18 2]]
[when 0]0 (M)
[when 1]1 (L)
[when 2]2 (K)
[when 3]3 (J)
[endcase]
,,,[#extract [var ecc_log_info] 1b 1]
,,,,[#extract [var ecc_log_info] 18 4]
,,,[extract [or 1000 [#extract [var ecc_log_info] d b]] 2 3]
[else] ! 32MB board
,[#case,[#extract [var ecc_log_info] 18 2]]
[when 0]MEM0,,,,A
[when 1]MEM0,,,,B
[when 2]MEM2,,,,A
[when 3]MEM2,,,,B
[endcase]
,,,,[#extract [var ecc_log_info] 18 4]
,,,[extract [or 1000 [#extract [var ecc_log_info] C C]] 2 3]
[end]
,,[extract [or 100 [#extract [var ecc_log_info] 33 6]] 2 2]
,,[#case,[#extract [var ecc_log_info] 0 1]]
[when 0]
[#case,[#extract [var ecc_log_info] 39 1]]
[when 0]T[extract,
[convert [add 64 [#extract [var ecc_log_info] 3a 6]],10,a],
2 2]
[when 1]V[extract,
[convert [add 64 [#extract [var ecc_log_info] 3a 6]],10,a],
2 2]
[endcase],
[#case,[#extract [var ecc_log_info] 1 1]]
[when 0]1->0
[when 1]0->1
[endcase]
[when 1]C[extract,
[convert [add 64 [#extract [var ecc_log_info] 3c 4]],10,a],
2 2],
[#case,[#extract [var ecc_log_info] 1 1]]
[when 0]?->?
[when 1]?->?
[endcase]
[endcase],
[#case,[#extract [var ecc_log_info] 8 1]]
[when 0]PHY
[when 1]LOG
[endcase]
[#eq,[#extract [var ecc_log_info] 2 1],0],Transient[END]
];