Oracle messages file(MSB.rfh):
Class: Resource, Status: Almost Complete, Last change: 15.11.2001 19:50:04
assert FileSize mod 0x200=0;
descr ('Oracle messages file.')
descr (NL,
'Info Src: Partially reconstructed by me (Alexei Hmelnov (mailto:alex@monster.icc.ru)).',NL)
/* Valid only for US encoding
type
TSign struc
ulong S0
ulong S1
ends:assert[@.S0=0x01221315, @.S1=0x09090313]
data
0 TSign Sign
assert Sign:assert;
*/
type
TMsg(Sz) array[@:Sz]of Char
PMsg(Base,Sz) ^TMsg(@:Sz) hideref near=word, REF=@+@:Base; : displ=(@^,'{',@,'}')
TMsgRec(Base) forward
TMsgTbl(Cnt,Base) array[@:Cnt] of TMsgRec(@:Base)
TMsgRec(Base) struc
long ID
PMsg(@:Base) S
ends:[@.S:Sz=((@:@ as TMsgTbl)[@:#+1].S-@.S)exc 0]
TNamesBlock struc
word Cnt
TMsgTbl(@.Cnt,&@) Tbl
ends:[@:Size=0x200]
type
uint num(2):displ=(INT(@))
dword num(4):displ=(INT(@))
TBlkCounts struc
dword MaxIDBCnt
dword NBCnt //Name block count
dword X
dword MaxID
ends
data
0x40 TBlkCounts Hdr
0x400 array[Hdr.NBCnt]of uint BlMaxID
0x200*(Hdr.MaxIDBCnt+2); array[Hdr.NBCnt/*(FileSize-0x600) div 0x200*/] of TNamesBlock Names
Other specifications.
FlexT home page,
Author`s home page.