1189 lines
34 KiB
JavaScript
1189 lines
34 KiB
JavaScript
/* [MS-XLS] 2.5.19 */
|
|
function parse_XLSCell(blob, length, opts)/*:Cell*/ {
|
|
var rw = blob.read_shift(2); // 0-indexed
|
|
var col = blob.read_shift(2);
|
|
var ret = ({r:rw, c:col, ixfe:0}/*:any*/);
|
|
if(opts && opts.biff == 2 || length == 7) {
|
|
/* TODO: pass back flags */
|
|
var flags = blob.read_shift(1);
|
|
ret.ixfe = flags & 0x3F;
|
|
blob.l += 2;
|
|
/*
|
|
var ifntifmt = blob.read_shift(1);
|
|
var ifmt = ifntifmt & 0x3f, ifnt = ifntifmt >> 6;
|
|
var flags3 = blob.read_shift(1);
|
|
*/
|
|
} else ret.ixfe = blob.read_shift(2);
|
|
return ret;
|
|
}
|
|
function write_XLSCell(R/*:number*/, C/*:number*/, ixfe/*:?number*/, o) {
|
|
if(!o) o = new_buf(6);
|
|
o.write_shift(2, R);
|
|
o.write_shift(2, C);
|
|
o.write_shift(2, ixfe||0);
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.5.134 */
|
|
function parse_frtHeader(blob) {
|
|
var rt = blob.read_shift(2);
|
|
var flags = blob.read_shift(2); // TODO: parse these flags
|
|
blob.l += 8;
|
|
return {type: rt, flags: flags};
|
|
}
|
|
|
|
|
|
|
|
function parse_OptXLUnicodeString(blob, length, opts) { return length === 0 ? "" : parse_XLUnicodeString2(blob, length, opts); }
|
|
|
|
/* [MS-XLS] 2.5.344 */
|
|
function parse_XTI(blob, length, opts) {
|
|
var w = opts.biff > 8 ? 4 : 2;
|
|
var iSupBook = blob.read_shift(w), itabFirst = blob.read_shift(w,'i'), itabLast = blob.read_shift(w,'i');
|
|
return [iSupBook, itabFirst, itabLast];
|
|
}
|
|
|
|
/* [MS-XLS] 2.5.218 */
|
|
function parse_RkRec(blob) {
|
|
var ixfe = blob.read_shift(2);
|
|
var RK = parse_RkNumber(blob);
|
|
return [ixfe, RK];
|
|
}
|
|
|
|
/* [MS-XLS] 2.5.1 */
|
|
function parse_AddinUdf(blob, length, opts) {
|
|
blob.l += 4; length -= 4;
|
|
var l = blob.l + length;
|
|
var udfName = parse_ShortXLUnicodeString(blob, length, opts);
|
|
var cb = blob.read_shift(2);
|
|
l -= blob.l;
|
|
if(cb !== l) throw new Error("Malformed AddinUdf: padding = " + l + " != " + cb);
|
|
blob.l += cb;
|
|
return udfName;
|
|
}
|
|
|
|
/* [MS-XLS] 2.5.209 TODO: Check sizes */
|
|
function parse_Ref8U(blob/*::, length*/) {
|
|
var rwFirst = blob.read_shift(2);
|
|
var rwLast = blob.read_shift(2);
|
|
var colFirst = blob.read_shift(2);
|
|
var colLast = blob.read_shift(2);
|
|
return {s:{c:colFirst, r:rwFirst}, e:{c:colLast,r:rwLast}};
|
|
}
|
|
function write_Ref8U(r/*:Range*/, o) {
|
|
if(!o) o = new_buf(8);
|
|
o.write_shift(2, r.s.r);
|
|
o.write_shift(2, r.e.r);
|
|
o.write_shift(2, r.s.c);
|
|
o.write_shift(2, r.e.c);
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.5.211 */
|
|
function parse_RefU(blob/*::, length*/) {
|
|
var rwFirst = blob.read_shift(2);
|
|
var rwLast = blob.read_shift(2);
|
|
var colFirst = blob.read_shift(1);
|
|
var colLast = blob.read_shift(1);
|
|
return {s:{c:colFirst, r:rwFirst}, e:{c:colLast,r:rwLast}};
|
|
}
|
|
|
|
/* [MS-XLS] 2.5.207 */
|
|
var parse_Ref = parse_RefU;
|
|
|
|
/* [MS-XLS] 2.5.143 */
|
|
function parse_FtCmo(blob/*::, length*/) {
|
|
blob.l += 4;
|
|
var ot = blob.read_shift(2);
|
|
var id = blob.read_shift(2);
|
|
var flags = blob.read_shift(2);
|
|
blob.l+=12;
|
|
return [id, ot, flags];
|
|
}
|
|
|
|
/* [MS-XLS] 2.5.149 */
|
|
function parse_FtNts(blob) {
|
|
var out = {};
|
|
blob.l += 4;
|
|
blob.l += 16; // GUID TODO
|
|
out.fSharedNote = blob.read_shift(2);
|
|
blob.l += 4;
|
|
return out;
|
|
}
|
|
|
|
/* [MS-XLS] 2.5.142 */
|
|
function parse_FtCf(blob) {
|
|
var out = {};
|
|
blob.l += 4;
|
|
blob.cf = blob.read_shift(2);
|
|
return out;
|
|
}
|
|
|
|
/* [MS-XLS] 2.5.140 - 2.5.154 and friends */
|
|
function parse_FtSkip(blob) { blob.l += 2; blob.l += blob.read_shift(2); }
|
|
var FtTab = {
|
|
0x00: parse_FtSkip, /* FtEnd */
|
|
0x04: parse_FtSkip, /* FtMacro */
|
|
0x05: parse_FtSkip, /* FtButton */
|
|
0x06: parse_FtSkip, /* FtGmo */
|
|
0x07: parse_FtCf, /* FtCf */
|
|
0x08: parse_FtSkip, /* FtPioGrbit */
|
|
0x09: parse_FtSkip, /* FtPictFmla */
|
|
0x0A: parse_FtSkip, /* FtCbls */
|
|
0x0B: parse_FtSkip, /* FtRbo */
|
|
0x0C: parse_FtSkip, /* FtSbs */
|
|
0x0D: parse_FtNts, /* FtNts */
|
|
0x0E: parse_FtSkip, /* FtSbsFmla */
|
|
0x0F: parse_FtSkip, /* FtGboData */
|
|
0x10: parse_FtSkip, /* FtEdoData */
|
|
0x11: parse_FtSkip, /* FtRboData */
|
|
0x12: parse_FtSkip, /* FtCblsData */
|
|
0x13: parse_FtSkip, /* FtLbsData */
|
|
0x14: parse_FtSkip, /* FtCblsFmla */
|
|
0x15: parse_FtCmo
|
|
};
|
|
function parse_FtArray(blob, length/*::, ot*/) {
|
|
var tgt = blob.l + length;
|
|
var fts = [];
|
|
while(blob.l < tgt) {
|
|
var ft = blob.read_shift(2);
|
|
blob.l-=2;
|
|
try {
|
|
fts[ft] = FtTab[ft](blob, tgt - blob.l);
|
|
} catch(e) { blob.l = tgt; return fts; }
|
|
}
|
|
if(blob.l != tgt) blob.l = tgt; //throw new Error("bad Object Ft-sequence");
|
|
return fts;
|
|
}
|
|
|
|
/* --- 2.4 Records --- */
|
|
|
|
/* [MS-XLS] 2.4.21 */
|
|
function parse_BOF(blob, length) {
|
|
var o = {BIFFVer:0, dt:0};
|
|
o.BIFFVer = blob.read_shift(2); length -= 2;
|
|
if(length >= 2) { o.dt = blob.read_shift(2); blob.l -= 2; }
|
|
switch(o.BIFFVer) {
|
|
case 0x0600: /* BIFF8 */
|
|
case 0x0500: /* BIFF5 */
|
|
case 0x0400: /* BIFF4 */
|
|
case 0x0300: /* BIFF3 */
|
|
case 0x0200: /* BIFF2 */
|
|
case 0x0002: case 0x0007: /* BIFF2 */
|
|
break;
|
|
default: if(length > 6) throw new Error("Unexpected BIFF Ver " + o.BIFFVer);
|
|
}
|
|
|
|
blob.read_shift(length);
|
|
return o;
|
|
}
|
|
function write_BOF(wb/*:Workbook*/, t/*:number*/, o) {
|
|
var h = 0x0600, w = 16;
|
|
switch(o.bookType) {
|
|
case 'biff8': break;
|
|
case 'biff5': h = 0x0500; w = 8; break;
|
|
case 'biff4': h = 0x0004; w = 6; break;
|
|
case 'biff3': h = 0x0003; w = 6; break;
|
|
case 'biff2': h = 0x0002; w = 4; break;
|
|
case 'xla': break;
|
|
default: throw new Error("unsupported BIFF version");
|
|
}
|
|
var out = new_buf(w);
|
|
out.write_shift(2, h);
|
|
out.write_shift(2, t);
|
|
if(w > 4) out.write_shift(2, 0x7262);
|
|
if(w > 6) out.write_shift(2, 0x07CD);
|
|
if(w > 8) {
|
|
out.write_shift(2, 0xC009);
|
|
out.write_shift(2, 0x0001);
|
|
out.write_shift(2, 0x0706);
|
|
out.write_shift(2, 0x0000);
|
|
}
|
|
return out;
|
|
}
|
|
|
|
|
|
/* [MS-XLS] 2.4.146 */
|
|
function parse_InterfaceHdr(blob, length) {
|
|
if(length === 0) return 0x04b0;
|
|
if((blob.read_shift(2))!==0x04b0){/* empty */}
|
|
return 0x04b0;
|
|
}
|
|
|
|
|
|
/* [MS-XLS] 2.4.349 */
|
|
function parse_WriteAccess(blob, length, opts) {
|
|
if(opts.enc) { blob.l += length; return ""; }
|
|
var l = blob.l;
|
|
// TODO: make sure XLUnicodeString doesnt overrun
|
|
var UserName = parse_XLUnicodeString2(blob, 0, opts);
|
|
blob.read_shift(length + l - blob.l);
|
|
return UserName;
|
|
}
|
|
function write_WriteAccess(s/*:string*/, opts) {
|
|
var b8 = !opts || opts.biff == 8;
|
|
var o = new_buf(b8 ? 112 : 54);
|
|
o.write_shift(opts.biff == 8 ? 2 : 1, 7);
|
|
if(b8) o.write_shift(1, 0);
|
|
o.write_shift(4, 0x33336853);
|
|
o.write_shift(4, (0x00534A74 | (b8 ? 0 : 0x20000000)));
|
|
while(o.l < o.length) o.write_shift(1, (b8 ? 0 : 32));
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.351 */
|
|
function parse_WsBool(blob, length, opts) {
|
|
var flags = opts && opts.biff == 8 || length == 2 ? blob.read_shift(2) : (blob.l += length, 0);
|
|
return { fDialog: flags & 0x10, fBelow: flags & 0x40, fRight: flags & 0x80 };
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.28 */
|
|
function parse_BoundSheet8(blob, length, opts) {
|
|
var name = "";
|
|
if(opts.biff == 4) {
|
|
name = parse_ShortXLUnicodeString(blob, 0, opts);
|
|
if(name.length === 0) name = "Sheet1";
|
|
return { name:name };
|
|
}
|
|
var pos = blob.read_shift(4);
|
|
var hidden = blob.read_shift(1) & 0x03;
|
|
var dt = blob.read_shift(1);
|
|
switch(dt) {
|
|
case 0: dt = 'Worksheet'; break;
|
|
case 1: dt = 'Macrosheet'; break;
|
|
case 2: dt = 'Chartsheet'; break;
|
|
case 6: dt = 'VBAModule'; break;
|
|
}
|
|
name = parse_ShortXLUnicodeString(blob, 0, opts);
|
|
if(name.length === 0) name = "Sheet1";
|
|
return { pos:pos, hs:hidden, dt:dt, name:name };
|
|
}
|
|
function write_BoundSheet8(data, opts) {
|
|
var w = (!opts || opts.biff >= 8 ? 2 : 1);
|
|
var o = new_buf(8 + w * data.name.length);
|
|
o.write_shift(4, data.pos);
|
|
o.write_shift(1, data.hs || 0);
|
|
o.write_shift(1, data.dt);
|
|
o.write_shift(1, data.name.length);
|
|
if(opts.biff >= 8) o.write_shift(1, 1);
|
|
o.write_shift(w * data.name.length, data.name, opts.biff < 8 ? 'sbcs' : 'utf16le');
|
|
var out = o.slice(0, o.l);
|
|
out.l = o.l; return out;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.265 TODO */
|
|
function parse_SST(blob, length)/*:SST*/ {
|
|
var end = blob.l + length;
|
|
var cnt = blob.read_shift(4);
|
|
var ucnt = blob.read_shift(4);
|
|
var strs/*:SST*/ = ([]/*:any*/);
|
|
for(var i = 0; i != ucnt && blob.l < end; ++i) {
|
|
strs.push(parse_XLUnicodeRichExtendedString(blob));
|
|
}
|
|
strs.Count = cnt; strs.Unique = ucnt;
|
|
return strs;
|
|
}
|
|
function write_SST(sst, opts) {
|
|
var header = new_buf(8);
|
|
header.write_shift(4, sst.Count);
|
|
header.write_shift(4, sst.Unique);
|
|
var strs = [];
|
|
for(var j = 0; j < sst.length; ++j) strs[j] = write_XLUnicodeRichExtendedString(sst[j], opts);
|
|
var o = bconcat([header].concat(strs));
|
|
/*::(*/o/*:: :any)*/.parts = [header.length].concat(strs.map(function(str) { return str.length; }));
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.107 */
|
|
function parse_ExtSST(blob, length) {
|
|
var extsst = {};
|
|
extsst.dsst = blob.read_shift(2);
|
|
blob.l += length-2;
|
|
return extsst;
|
|
}
|
|
|
|
|
|
/* [MS-XLS] 2.4.221 TODO: check BIFF2-4 */
|
|
function parse_Row(blob) {
|
|
var z = ({}/*:any*/);
|
|
z.r = blob.read_shift(2);
|
|
z.c = blob.read_shift(2);
|
|
z.cnt = blob.read_shift(2) - z.c;
|
|
var miyRw = blob.read_shift(2);
|
|
blob.l += 4; // reserved(2), unused(2)
|
|
var flags = blob.read_shift(1); // various flags
|
|
blob.l += 3; // reserved(8), ixfe(12), flags(4)
|
|
if(flags & 0x07) z.level = flags & 0x07;
|
|
// collapsed: flags & 0x10
|
|
if(flags & 0x20) z.hidden = true;
|
|
if(flags & 0x40) z.hpt = miyRw / 20;
|
|
return z;
|
|
}
|
|
|
|
|
|
/* [MS-XLS] 2.4.125 */
|
|
function parse_ForceFullCalculation(blob) {
|
|
var header = parse_frtHeader(blob);
|
|
if(header.type != 0x08A3) throw new Error("Invalid Future Record " + header.type);
|
|
var fullcalc = blob.read_shift(4);
|
|
return fullcalc !== 0x0;
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/* [MS-XLS] 2.4.215 rt */
|
|
function parse_RecalcId(blob) {
|
|
blob.read_shift(2);
|
|
return blob.read_shift(4);
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.87 */
|
|
function parse_DefaultRowHeight(blob, length, opts) {
|
|
var f = 0;
|
|
if(!(opts && opts.biff == 2)) {
|
|
f = blob.read_shift(2);
|
|
}
|
|
var miyRw = blob.read_shift(2);
|
|
if((opts && opts.biff == 2)) {
|
|
f = 1 - (miyRw >> 15); miyRw &= 0x7fff;
|
|
}
|
|
var fl = {Unsynced:f&1,DyZero:(f&2)>>1,ExAsc:(f&4)>>2,ExDsc:(f&8)>>3};
|
|
return [fl, miyRw];
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.345 TODO */
|
|
function parse_Window1(blob) {
|
|
var xWn = blob.read_shift(2), yWn = blob.read_shift(2), dxWn = blob.read_shift(2), dyWn = blob.read_shift(2);
|
|
var flags = blob.read_shift(2), iTabCur = blob.read_shift(2), iTabFirst = blob.read_shift(2);
|
|
var ctabSel = blob.read_shift(2), wTabRatio = blob.read_shift(2);
|
|
return { Pos: [xWn, yWn], Dim: [dxWn, dyWn], Flags: flags, CurTab: iTabCur,
|
|
FirstTab: iTabFirst, Selected: ctabSel, TabRatio: wTabRatio };
|
|
}
|
|
function write_Window1(/*::opts*/) {
|
|
var o = new_buf(18);
|
|
o.write_shift(2, 0);
|
|
o.write_shift(2, 0);
|
|
o.write_shift(2, 0x7260);
|
|
o.write_shift(2, 0x44c0);
|
|
o.write_shift(2, 0x38);
|
|
o.write_shift(2, 0);
|
|
o.write_shift(2, 0);
|
|
o.write_shift(2, 1);
|
|
o.write_shift(2, 0x01f4);
|
|
return o;
|
|
}
|
|
/* [MS-XLS] 2.4.346 TODO */
|
|
function parse_Window2(blob, length, opts) {
|
|
if(opts && opts.biff >= 2 && opts.biff < 5) return {};
|
|
var f = blob.read_shift(2);
|
|
return { RTL: f & 0x40 };
|
|
}
|
|
function write_Window2(view) {
|
|
var o = new_buf(18), f = 0x6b6;
|
|
if(view && view.RTL) f |= 0x40;
|
|
o.write_shift(2, f);
|
|
o.write_shift(4, 0);
|
|
o.write_shift(4, 64);
|
|
o.write_shift(4, 0);
|
|
o.write_shift(4, 0);
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.189 TODO */
|
|
function parse_Pane(/*blob, length, opts*/) {
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.122 TODO */
|
|
function parse_Font(blob, length, opts) {
|
|
var o/*:any*/ = {
|
|
dyHeight: blob.read_shift(2),
|
|
fl: blob.read_shift(2)
|
|
};
|
|
switch((opts && opts.biff) || 8) {
|
|
case 2: break;
|
|
case 3: case 4: blob.l += 2; break;
|
|
default: blob.l += 10; break;
|
|
}
|
|
o.name = parse_ShortXLUnicodeString(blob, 0, opts);
|
|
return o;
|
|
}
|
|
function write_Font(data, opts) {
|
|
var name = data.name || "Arial";
|
|
var b5 = (opts && (opts.biff == 5)), w = (b5 ? (15 + name.length) : (16 + 2 * name.length));
|
|
var o = new_buf(w);
|
|
o.write_shift(2, (data.sz || 12) * 20);
|
|
o.write_shift(4, 0);
|
|
o.write_shift(2, 400);
|
|
o.write_shift(4, 0);
|
|
o.write_shift(2, 0);
|
|
o.write_shift(1, name.length);
|
|
if(!b5) o.write_shift(1, 1);
|
|
o.write_shift((b5 ? 1 : 2) * name.length, name, (b5 ? "sbcs" : "utf16le"));
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.149 */
|
|
function parse_LabelSst(blob, length, opts) {
|
|
var cell = parse_XLSCell(blob, length, opts);
|
|
cell.isst = blob.read_shift(4);
|
|
return cell;
|
|
}
|
|
function write_LabelSst(R/*:number*/, C/*:number*/, v/*:number*/, os/*:number*/ /*::, opts*/) {
|
|
var o = new_buf(10);
|
|
write_XLSCell(R, C, os, o);
|
|
o.write_shift(4, v);
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.148 */
|
|
function parse_Label(blob, length, opts) {
|
|
if(opts.biffguess && opts.biff == 2) opts.biff = 5;
|
|
var target = blob.l + length;
|
|
var cell = parse_XLSCell(blob, length, opts);
|
|
var str = parse_XLUnicodeString(blob, target - blob.l, opts);
|
|
cell.val = str;
|
|
return cell;
|
|
}
|
|
function write_Label(R/*:number*/, C/*:number*/, v/*:string*/, os/*:number*/, opts) {
|
|
var b8 = !opts || opts.biff == 8;
|
|
var o = new_buf(6 + 2 + (+b8) + (1 + b8) * v.length);
|
|
write_XLSCell(R, C, os, o);
|
|
o.write_shift(2, v.length);
|
|
if(b8) o.write_shift(1, 1);
|
|
o.write_shift((1 + b8) * v.length, v, b8 ? 'utf16le' : 'sbcs');
|
|
return o;
|
|
}
|
|
|
|
|
|
/* [MS-XLS] 2.4.126 Number Formats */
|
|
function parse_Format(blob, length, opts) {
|
|
var numFmtId = blob.read_shift(2);
|
|
var fmtstr = parse_XLUnicodeString2(blob, 0, opts);
|
|
return [numFmtId, fmtstr];
|
|
}
|
|
function write_Format(i/*:number*/, f/*:string*/, opts, o) {
|
|
var b5 = (opts && (opts.biff == 5));
|
|
if(!o) o = new_buf(b5 ? (3 + f.length) : (5 + 2 * f.length));
|
|
o.write_shift(2, i);
|
|
o.write_shift((b5 ? 1 : 2), f.length);
|
|
if(!b5) o.write_shift(1, 1);
|
|
o.write_shift((b5 ? 1 : 2) * f.length, f, (b5 ? 'sbcs' : 'utf16le'));
|
|
var out = (o.length > o.l) ? o.slice(0, o.l) : o;
|
|
if(out.l == null) out.l = out.length;
|
|
return out;
|
|
}
|
|
var parse_BIFF2Format = parse_XLUnicodeString2;
|
|
function write_BIFF2Format(f/*:string*/) {
|
|
var o = new_buf(1 + f.length);
|
|
o.write_shift(1, f.length);
|
|
o.write_shift(f.length, f, "sbcs");
|
|
return o;
|
|
}
|
|
function write_BIFF4Format(f/*:string*/) {
|
|
var o = new_buf(3 + f.length);
|
|
o.l += 2;
|
|
o.write_shift(1, f.length);
|
|
o.write_shift(f.length, f, "sbcs");
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.90 */
|
|
function parse_Dimensions(blob, length, opts) {
|
|
var end = blob.l + length;
|
|
var w = opts.biff == 8 || !opts.biff ? 4 : 2;
|
|
var r = blob.read_shift(w), R = blob.read_shift(w);
|
|
var c = blob.read_shift(2), C = blob.read_shift(2);
|
|
blob.l = end;
|
|
return {s: {r:r, c:c}, e: {r:R, c:C}};
|
|
}
|
|
function write_Dimensions(range, opts) {
|
|
var w = opts.biff == 8 || !opts.biff ? 4 : 2;
|
|
var o = new_buf(2*w + 6);
|
|
o.write_shift(w, range.s.r);
|
|
o.write_shift(w, range.e.r + 1);
|
|
o.write_shift(2, range.s.c);
|
|
o.write_shift(2, range.e.c + 1);
|
|
o.write_shift(2, 0);
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.220 */
|
|
function parse_RK(blob) {
|
|
var rw = blob.read_shift(2), col = blob.read_shift(2);
|
|
var rkrec = parse_RkRec(blob);
|
|
return {r:rw, c:col, ixfe:rkrec[0], rknum:rkrec[1]};
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.175 */
|
|
function parse_MulRk(blob, length) {
|
|
var target = blob.l + length - 2;
|
|
var rw = blob.read_shift(2), col = blob.read_shift(2);
|
|
var rkrecs = [];
|
|
while(blob.l < target) rkrecs.push(parse_RkRec(blob));
|
|
if(blob.l !== target) throw new Error("MulRK read error");
|
|
var lastcol = blob.read_shift(2);
|
|
if(rkrecs.length != lastcol - col + 1) throw new Error("MulRK length mismatch");
|
|
return {r:rw, c:col, C:lastcol, rkrec:rkrecs};
|
|
}
|
|
/* [MS-XLS] 2.4.174 */
|
|
function parse_MulBlank(blob, length) {
|
|
var target = blob.l + length - 2;
|
|
var rw = blob.read_shift(2), col = blob.read_shift(2);
|
|
var ixfes = [];
|
|
while(blob.l < target) ixfes.push(blob.read_shift(2));
|
|
if(blob.l !== target) throw new Error("MulBlank read error");
|
|
var lastcol = blob.read_shift(2);
|
|
if(ixfes.length != lastcol - col + 1) throw new Error("MulBlank length mismatch");
|
|
return {r:rw, c:col, C:lastcol, ixfe:ixfes};
|
|
}
|
|
|
|
/* [MS-XLS] 2.5.20 2.5.249 TODO: interpret values here */
|
|
function parse_CellStyleXF(blob, length, style, opts) {
|
|
var o = {};
|
|
var a = blob.read_shift(4), b = blob.read_shift(4);
|
|
var c = blob.read_shift(4), d = blob.read_shift(2);
|
|
o.patternType = XLSFillPattern[c >> 26];
|
|
|
|
if(!opts.cellStyles) return o;
|
|
o.alc = a & 0x07;
|
|
o.fWrap = (a >> 3) & 0x01;
|
|
o.alcV = (a >> 4) & 0x07;
|
|
o.fJustLast = (a >> 7) & 0x01;
|
|
o.trot = (a >> 8) & 0xFF;
|
|
o.cIndent = (a >> 16) & 0x0F;
|
|
o.fShrinkToFit = (a >> 20) & 0x01;
|
|
o.iReadOrder = (a >> 22) & 0x02;
|
|
o.fAtrNum = (a >> 26) & 0x01;
|
|
o.fAtrFnt = (a >> 27) & 0x01;
|
|
o.fAtrAlc = (a >> 28) & 0x01;
|
|
o.fAtrBdr = (a >> 29) & 0x01;
|
|
o.fAtrPat = (a >> 30) & 0x01;
|
|
o.fAtrProt = (a >> 31) & 0x01;
|
|
|
|
o.dgLeft = b & 0x0F;
|
|
o.dgRight = (b >> 4) & 0x0F;
|
|
o.dgTop = (b >> 8) & 0x0F;
|
|
o.dgBottom = (b >> 12) & 0x0F;
|
|
o.icvLeft = (b >> 16) & 0x7F;
|
|
o.icvRight = (b >> 23) & 0x7F;
|
|
o.grbitDiag = (b >> 30) & 0x03;
|
|
|
|
o.icvTop = c & 0x7F;
|
|
o.icvBottom = (c >> 7) & 0x7F;
|
|
o.icvDiag = (c >> 14) & 0x7F;
|
|
o.dgDiag = (c >> 21) & 0x0F;
|
|
|
|
o.icvFore = d & 0x7F;
|
|
o.icvBack = (d >> 7) & 0x7F;
|
|
o.fsxButton = (d >> 14) & 0x01;
|
|
return o;
|
|
}
|
|
//function parse_CellXF(blob, length, opts) {return parse_CellStyleXF(blob,length,0, opts);}
|
|
//function parse_StyleXF(blob, length, opts) {return parse_CellStyleXF(blob,length,1, opts);}
|
|
|
|
/* [MS-XLS] 2.4.353 TODO: actually do this right */
|
|
function parse_XF(blob, length, opts) {
|
|
var o = {};
|
|
o.ifnt = blob.read_shift(2); o.numFmtId = blob.read_shift(2); o.flags = blob.read_shift(2);
|
|
o.fStyle = (o.flags >> 2) & 0x01;
|
|
length -= 6;
|
|
o.data = parse_CellStyleXF(blob, length, o.fStyle, opts);
|
|
return o;
|
|
}
|
|
function write_XF(data, ixfeP, opts, o) {
|
|
var b5 = (opts && (opts.biff == 5));
|
|
if(!o) o = new_buf(b5 ? 16 : 20);
|
|
o.write_shift(2, 0);
|
|
if(data.style) {
|
|
o.write_shift(2, (data.numFmtId||0));
|
|
o.write_shift(2, 0xFFF4);
|
|
} else {
|
|
o.write_shift(2, (data.numFmtId||0));
|
|
o.write_shift(2, (ixfeP<<4));
|
|
}
|
|
var f = 0;
|
|
if(data.numFmtId > 0 && b5) f |= 0x0400;
|
|
o.write_shift(4, f);
|
|
o.write_shift(4, 0);
|
|
if(!b5) o.write_shift(4, 0);
|
|
o.write_shift(2, 0);
|
|
return o;
|
|
}
|
|
function parse_BIFF2XF(blob/*::, length, opts*/) {
|
|
var o = {};
|
|
o.ifnt = blob.read_shift(1); blob.l++; o.flags = blob.read_shift(1);
|
|
o.numFmtId = o.flags & 0x3F; o.flags>>=6;
|
|
o.fStyle = 0;
|
|
o.data = {}; // TODO
|
|
return o;
|
|
}
|
|
function write_BIFF2XF(xf) {
|
|
var o = new_buf(4);
|
|
o.l+=2;
|
|
o.write_shift(1, xf.numFmtId);
|
|
o.l++;
|
|
return o;
|
|
}
|
|
function write_BIFF3XF(xf) {
|
|
var o = new_buf(12);
|
|
o.l++;
|
|
o.write_shift(1, xf.numFmtId);
|
|
o.l += 10;
|
|
return o;
|
|
}
|
|
/* TODO: check other fields */
|
|
var write_BIFF4XF = write_BIFF3XF;
|
|
function parse_BIFF3XF(blob/*::, length, opts*/) {
|
|
var o = {};
|
|
o.ifnt = blob.read_shift(1); o.numFmtId = blob.read_shift(1); o.flags = blob.read_shift(2);
|
|
o.fStyle = (o.flags >> 2) & 0x01;
|
|
o.data = {}; // TODO
|
|
return o;
|
|
}
|
|
function parse_BIFF4XF(blob/*::, length, opts*/) {
|
|
var o = {};
|
|
o.ifnt = blob.read_shift(1); o.numFmtId = blob.read_shift(1); o.flags = blob.read_shift(2);
|
|
o.fStyle = (o.flags >> 2) & 0x01;
|
|
o.data = {}; // TODO
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.134 */
|
|
function parse_Guts(blob) {
|
|
blob.l += 4;
|
|
var out = [blob.read_shift(2), blob.read_shift(2)];
|
|
if(out[0] !== 0) out[0]--;
|
|
if(out[1] !== 0) out[1]--;
|
|
if(out[0] > 7 || out[1] > 7) throw new Error("Bad Gutters: " + out.join("|"));
|
|
return out;
|
|
}
|
|
function write_Guts(guts/*:Array<number>*/) {
|
|
var o = new_buf(8);
|
|
o.write_shift(4, 0);
|
|
o.write_shift(2, guts[0] ? guts[0] + 1 : 0);
|
|
o.write_shift(2, guts[1] ? guts[1] + 1 : 0);
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.24 */
|
|
function parse_BoolErr(blob, length, opts) {
|
|
var cell = parse_XLSCell(blob, 6, opts);
|
|
var val = parse_Bes(blob, 2);
|
|
cell.val = val;
|
|
cell.t = (val === true || val === false) ? 'b' : 'e';
|
|
return cell;
|
|
}
|
|
function write_BoolErr(R/*:number*/, C/*:number*/, v, os/*:number*/, opts, t/*:string*/) {
|
|
var o = new_buf(8);
|
|
write_XLSCell(R, C, os, o);
|
|
write_Bes(v, t, o);
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.180 Number */
|
|
function parse_Number(blob, length, opts) {
|
|
if(opts.biffguess && opts.biff == 2) opts.biff = 5;
|
|
var cell = parse_XLSCell(blob, 6, opts);
|
|
var xnum = parse_Xnum(blob, 8);
|
|
cell.val = xnum;
|
|
return cell;
|
|
}
|
|
function write_Number(R/*:number*/, C/*:number*/, v, os/*:: :number, opts*/) {
|
|
var o = new_buf(14);
|
|
write_XLSCell(R, C, os, o);
|
|
write_Xnum(v, o);
|
|
return o;
|
|
}
|
|
|
|
var parse_XLHeaderFooter = parse_OptXLUnicodeString; // TODO: parse 2.4.136
|
|
|
|
/* [MS-XLS] 2.4.271 */
|
|
function parse_SupBook(blob, length, opts) {
|
|
var end = blob.l + length;
|
|
var ctab = blob.read_shift(2);
|
|
var cch = blob.read_shift(2);
|
|
opts.sbcch = cch;
|
|
if(cch == 0x0401 || cch == 0x3A01) return [cch, ctab];
|
|
if(cch < 0x01 || cch >0xff) throw new Error("Unexpected SupBook type: "+cch);
|
|
var virtPath = parse_XLUnicodeStringNoCch(blob, cch);
|
|
/* TODO: 2.5.277 Virtual Path */
|
|
var rgst = [];
|
|
while(end > blob.l) rgst.push(parse_XLUnicodeString(blob));
|
|
return [cch, ctab, virtPath, rgst];
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.105 TODO */
|
|
function parse_ExternName(blob, length, opts) {
|
|
var flags = blob.read_shift(2);
|
|
var body;
|
|
var o = ({
|
|
fBuiltIn: flags & 0x01,
|
|
fWantAdvise: (flags >>> 1) & 0x01,
|
|
fWantPict: (flags >>> 2) & 0x01,
|
|
fOle: (flags >>> 3) & 0x01,
|
|
fOleLink: (flags >>> 4) & 0x01,
|
|
cf: (flags >>> 5) & 0x3FF,
|
|
fIcon: flags >>> 15 & 0x01
|
|
}/*:any*/);
|
|
if(opts.sbcch === 0x3A01) body = parse_AddinUdf(blob, length-2, opts);
|
|
//else throw new Error("unsupported SupBook cch: " + opts.sbcch);
|
|
o.body = body || blob.read_shift(length-2);
|
|
if(typeof body === "string") o.Name = body;
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.150 TODO */
|
|
function parse_Lbl(blob, length, opts) {
|
|
var target = blob.l + length;
|
|
var flags = blob.read_shift(2);
|
|
var chKey = blob.read_shift(1);
|
|
var cch = blob.read_shift(1);
|
|
var cce = blob.read_shift(opts && opts.biff == 2 ? 1 : 2);
|
|
var itab = 0;
|
|
if(!opts || opts.biff >= 5) {
|
|
if(opts.biff != 5) blob.l += 2;
|
|
itab = blob.read_shift(2);
|
|
if(opts.biff == 5) blob.l += 2;
|
|
blob.l += 4;
|
|
}
|
|
var name = parse_XLUnicodeStringNoCch(blob, cch, opts);
|
|
if(flags & 0x20) name = XLSLblBuiltIn[name.charCodeAt(0)];
|
|
var npflen = target - blob.l; if(opts && opts.biff == 2) --npflen;
|
|
/*jshint -W018 */
|
|
var rgce = (target == blob.l || cce === 0 || !(npflen > 0)) ? [] : parse_NameParsedFormula(blob, npflen, opts, cce);
|
|
/*jshint +W018 */
|
|
return {
|
|
chKey: chKey,
|
|
Name: name,
|
|
itab: itab,
|
|
rgce: rgce
|
|
};
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.106 TODO: legacy record filename encoding */
|
|
function parse_ExternSheet(blob, length, opts) {
|
|
if(opts.biff < 8) return parse_BIFF5ExternSheet(blob, length, opts);
|
|
/* see issue 2907 */
|
|
if(!(opts.biff > 8) && (length == blob[blob.l] + (blob[blob.l+1] == 0x03 ? 1 : 0) + 1)) return parse_BIFF5ExternSheet(blob, length, opts);
|
|
var o = [], target = blob.l + length, len = blob.read_shift(opts.biff > 8 ? 4 : 2);
|
|
while(len-- !== 0) o.push(parse_XTI(blob, opts.biff > 8 ? 12 : 6, opts));
|
|
// [iSupBook, itabFirst, itabLast];
|
|
if(blob.l != target) throw new Error("Bad ExternSheet: " + blob.l + " != " + target);
|
|
return o;
|
|
}
|
|
function parse_BIFF5ExternSheet(blob, length, opts) {
|
|
if(blob[blob.l + 1] == 0x03) blob[blob.l]++;
|
|
var o = parse_ShortXLUnicodeString(blob, length, opts);
|
|
return o.charCodeAt(0) == 0x03 ? o.slice(1) : o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.176 TODO: check older biff */
|
|
function parse_NameCmt(blob, length, opts) {
|
|
if(opts.biff < 8) { blob.l += length; return; }
|
|
var cchName = blob.read_shift(2);
|
|
var cchComment = blob.read_shift(2);
|
|
var name = parse_XLUnicodeStringNoCch(blob, cchName, opts);
|
|
var comment = parse_XLUnicodeStringNoCch(blob, cchComment, opts);
|
|
return [name, comment];
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.260 */
|
|
function parse_ShrFmla(blob, length, opts) {
|
|
var ref = parse_RefU(blob, 6);
|
|
blob.l++;
|
|
var cUse = blob.read_shift(1);
|
|
length -= 8;
|
|
return [parse_SharedParsedFormula(blob, length, opts), cUse, ref];
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.4 TODO */
|
|
function parse_Array(blob, length, opts) {
|
|
var ref = parse_Ref(blob, 6);
|
|
/* TODO: fAlwaysCalc */
|
|
switch(opts.biff) {
|
|
case 2: blob.l ++; length -= 7; break;
|
|
case 3: case 4: blob.l += 2; length -= 8; break;
|
|
default: blob.l += 6; length -= 12;
|
|
}
|
|
return [ref, parse_ArrayParsedFormula(blob, length, opts, ref)];
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.173 */
|
|
function parse_MTRSettings(blob) {
|
|
var fMTREnabled = blob.read_shift(4) !== 0x00;
|
|
var fUserSetThreadCount = blob.read_shift(4) !== 0x00;
|
|
var cUserThreadCount = blob.read_shift(4);
|
|
return [fMTREnabled, fUserSetThreadCount, cUserThreadCount];
|
|
}
|
|
|
|
/* [MS-XLS] 2.5.186 */
|
|
function parse_NoteSh(blob, length, opts) {
|
|
var row = blob.read_shift(2), col = blob.read_shift(2);
|
|
var flags = blob.read_shift(2), idObj = blob.read_shift(2);
|
|
var stAuthor = parse_XLUnicodeString2(blob, 0, opts);
|
|
return [{r:row,c:col}, stAuthor, idObj, flags];
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.179 */
|
|
function parse_Note(blob, length, opts) {
|
|
if(opts && (opts.biff < 8)) {
|
|
var row = blob.read_shift(2), col = blob.read_shift(2);
|
|
if(row == 0xFFFF || row == -1) return; // TODO: test continuation
|
|
var cch = blob.read_shift(2);
|
|
var cmnt = blob.read_shift(Math.min(cch,2048), 'cpstr');
|
|
return [{r:row, c:col}, cmnt];
|
|
}
|
|
/* TODO: Support revisions */
|
|
return parse_NoteSh(blob, length, opts);
|
|
}
|
|
function write_NOTE_BIFF2(text/*:string*/, R/*:number*/, C/*:number*/, len/*?:number*/) {
|
|
var o = new_buf(6 + (len || text.length));
|
|
o.write_shift(2, R);
|
|
o.write_shift(2, C);
|
|
o.write_shift(2, len || text.length);
|
|
o.write_shift(text.length, text, "sbcs");
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.168 */
|
|
function parse_MergeCells(blob, length)/*:Array<Range>*/ {
|
|
var merges/*:Array<Range>*/ = [];
|
|
var cmcs = blob.read_shift(2);
|
|
while (cmcs--) merges.push(parse_Ref8U(blob,length));
|
|
return merges;
|
|
}
|
|
function write_MergeCells(merges/*:Array<Range>*/) {
|
|
var o = new_buf(2 + merges.length * 8);
|
|
o.write_shift(2, merges.length);
|
|
for(var i = 0; i < merges.length; ++i) write_Ref8U(merges[i], o);
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.181 TODO: parse all the things! */
|
|
function parse_Obj(blob, length, opts) {
|
|
if(opts && opts.biff < 8) return parse_BIFF5Obj(blob, length, opts);
|
|
var cmo = parse_FtCmo(blob, 22); // id, ot, flags
|
|
var fts = parse_FtArray(blob, length-22, cmo[1]);
|
|
return { cmo: cmo, ft:fts };
|
|
}
|
|
/* from older spec */
|
|
var parse_BIFF5OT = {
|
|
0x08: function(blob, length) {
|
|
var tgt = blob.l + length;
|
|
blob.l += 10; // todo
|
|
var cf = blob.read_shift(2);
|
|
blob.l += 4;
|
|
blob.l += 2; //var cbPictFmla = blob.read_shift(2);
|
|
blob.l += 2;
|
|
blob.l += 2; //var grbit = blob.read_shift(2);
|
|
blob.l += 4;
|
|
var cchName = blob.read_shift(1);
|
|
blob.l += cchName; // TODO: stName
|
|
blob.l = tgt; // TODO: fmla
|
|
return { fmt:cf };
|
|
}
|
|
};
|
|
|
|
function parse_BIFF5Obj(blob, length, opts) {
|
|
blob.l += 4; //var cnt = blob.read_shift(4);
|
|
var ot = blob.read_shift(2);
|
|
var id = blob.read_shift(2);
|
|
var grbit = blob.read_shift(2);
|
|
blob.l += 2; //var colL = blob.read_shift(2);
|
|
blob.l += 2; //var dxL = blob.read_shift(2);
|
|
blob.l += 2; //var rwT = blob.read_shift(2);
|
|
blob.l += 2; //var dyT = blob.read_shift(2);
|
|
blob.l += 2; //var colR = blob.read_shift(2);
|
|
blob.l += 2; //var dxR = blob.read_shift(2);
|
|
blob.l += 2; //var rwB = blob.read_shift(2);
|
|
blob.l += 2; //var dyB = blob.read_shift(2);
|
|
blob.l += 2; //var cbMacro = blob.read_shift(2);
|
|
blob.l += 6;
|
|
length -= 36;
|
|
var fts = [];
|
|
fts.push((parse_BIFF5OT[ot]||parsenoop)(blob, length, opts));
|
|
return { cmo: [id, ot, grbit], ft:fts };
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.329 TODO: parse properly */
|
|
function parse_TxO(blob, length, opts) {
|
|
var s = blob.l;
|
|
var texts = "";
|
|
try {
|
|
blob.l += 4;
|
|
var ot = (opts.lastobj||{cmo:[0,0]}).cmo[1];
|
|
var controlInfo; // eslint-disable-line no-unused-vars
|
|
if([0,5,7,11,12,14].indexOf(ot) == -1) blob.l += 6;
|
|
else controlInfo = parse_ControlInfo(blob, 6, opts); // eslint-disable-line no-unused-vars
|
|
var cchText = blob.read_shift(2);
|
|
/*var cbRuns = */blob.read_shift(2);
|
|
/*var ifntEmpty = */parseuint16(blob, 2);
|
|
var len = blob.read_shift(2);
|
|
blob.l += len;
|
|
//var fmla = parse_ObjFmla(blob, s + length - blob.l);
|
|
|
|
for(var i = 1; i < blob.lens.length-1; ++i) {
|
|
if(blob.l-s != blob.lens[i]) throw new Error("TxO: bad continue record");
|
|
var hdr = blob[blob.l];
|
|
var t = parse_XLUnicodeStringNoCch(blob, blob.lens[i+1]-blob.lens[i]-1);
|
|
texts += t;
|
|
if(texts.length >= (hdr ? cchText : 2*cchText)) break;
|
|
}
|
|
if(texts.length !== cchText && texts.length !== cchText*2) {
|
|
throw new Error("cchText: " + cchText + " != " + texts.length);
|
|
}
|
|
|
|
blob.l = s + length;
|
|
/* [MS-XLS] 2.5.272 TxORuns */
|
|
// var rgTxoRuns = [];
|
|
// for(var j = 0; j != cbRuns/8-1; ++j) blob.l += 8;
|
|
// var cchText2 = blob.read_shift(2);
|
|
// if(cchText2 !== cchText) throw new Error("TxOLastRun mismatch: " + cchText2 + " " + cchText);
|
|
// blob.l += 6;
|
|
// if(s + length != blob.l) throw new Error("TxO " + (s + length) + ", at " + blob.l);
|
|
return { t: texts };
|
|
} catch(e) { blob.l = s + length; return { t: texts }; }
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.140 */
|
|
function parse_HLink(blob, length) {
|
|
var ref = parse_Ref8U(blob, 8);
|
|
blob.l += 16; /* CLSID */
|
|
var hlink = parse_Hyperlink(blob, length-24);
|
|
return [ref, hlink];
|
|
}
|
|
function write_HLink(hl) {
|
|
var O = new_buf(24);
|
|
var ref = decode_cell(hl[0]);
|
|
O.write_shift(2, ref.r); O.write_shift(2, ref.r);
|
|
O.write_shift(2, ref.c); O.write_shift(2, ref.c);
|
|
var clsid = "d0 c9 ea 79 f9 ba ce 11 8c 82 00 aa 00 4b a9 0b".split(" ");
|
|
for(var i = 0; i < 16; ++i) O.write_shift(1, parseInt(clsid[i], 16));
|
|
return bconcat([O, write_Hyperlink(hl[1])]);
|
|
}
|
|
|
|
|
|
/* [MS-XLS] 2.4.141 */
|
|
function parse_HLinkTooltip(blob, length) {
|
|
blob.read_shift(2);
|
|
var ref = parse_Ref8U(blob, 8);
|
|
var wzTooltip = blob.read_shift((length-10)/2, 'dbcs-cont');
|
|
wzTooltip = wzTooltip.replace(chr0,"");
|
|
return [ref, wzTooltip];
|
|
}
|
|
function write_HLinkTooltip(hl) {
|
|
var TT = hl[1].Tooltip;
|
|
var O = new_buf(10 + 2 * (TT.length + 1));
|
|
O.write_shift(2, 0x0800);
|
|
var ref = decode_cell(hl[0]);
|
|
O.write_shift(2, ref.r); O.write_shift(2, ref.r);
|
|
O.write_shift(2, ref.c); O.write_shift(2, ref.c);
|
|
for(var i = 0; i < TT.length; ++i) O.write_shift(2, TT.charCodeAt(i));
|
|
O.write_shift(2, 0);
|
|
return O;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.63 */
|
|
function parse_Country(blob)/*:[string|number, string|number]*/ {
|
|
var o = [0,0], d;
|
|
d = blob.read_shift(2); o[0] = CountryEnum[d] || d;
|
|
d = blob.read_shift(2); o[1] = CountryEnum[d] || d;
|
|
return o;
|
|
}
|
|
function write_Country(o) {
|
|
if(!o) o = new_buf(4);
|
|
o.write_shift(2, 0x01);
|
|
o.write_shift(2, 0x01);
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.50 ClrtClient */
|
|
function parse_ClrtClient(blob) {
|
|
var ccv = blob.read_shift(2);
|
|
var o = [];
|
|
while(ccv-->0) o.push(parse_LongRGB(blob, 8));
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.188 */
|
|
function parse_Palette(blob) {
|
|
var ccv = blob.read_shift(2);
|
|
var o = [];
|
|
while(ccv-->0) o.push(parse_LongRGB(blob, 8));
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.354 */
|
|
function parse_XFCRC(blob) {
|
|
blob.l += 2;
|
|
var o = {cxfs:0, crc:0};
|
|
o.cxfs = blob.read_shift(2);
|
|
o.crc = blob.read_shift(4);
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.53 TODO: parse flags */
|
|
/* [MS-XLSB] 2.4.323 TODO: parse flags */
|
|
function parse_ColInfo(blob, length, opts) {
|
|
if(!opts.cellStyles) return parsenoop(blob, length);
|
|
var w = opts && opts.biff >= 12 ? 4 : 2;
|
|
var colFirst = blob.read_shift(w);
|
|
var colLast = blob.read_shift(w);
|
|
var coldx = blob.read_shift(w);
|
|
var ixfe = blob.read_shift(w);
|
|
var flags = blob.read_shift(2);
|
|
if(w == 2) blob.l += 2;
|
|
var o = ({s:colFirst, e:colLast, w:coldx, ixfe:ixfe, flags:flags}/*:any*/);
|
|
if(opts.biff >= 5 || !opts.biff) o.level = (flags >> 8) & 0x7;
|
|
return o;
|
|
}
|
|
function write_ColInfo(col, idx) {
|
|
var o = new_buf(12);
|
|
o.write_shift(2, idx);
|
|
o.write_shift(2, idx);
|
|
o.write_shift(2, col.width * 256);
|
|
o.write_shift(2, 0);
|
|
var f = 0;
|
|
if(col.hidden) f |= 1;
|
|
o.write_shift(1, f);
|
|
f = col.level || 0;
|
|
o.write_shift(1, f);
|
|
o.write_shift(2, 0);
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.257 */
|
|
function parse_Setup(blob, length) {
|
|
var o = {};
|
|
if(length < 32) return o;
|
|
blob.l += 16;
|
|
o.header = parse_Xnum(blob, 8);
|
|
o.footer = parse_Xnum(blob, 8);
|
|
blob.l += 2;
|
|
return o;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.261 */
|
|
function parse_ShtProps(blob, length, opts) {
|
|
var def = {area:false};
|
|
if(opts.biff != 5) { blob.l += length; return def; }
|
|
var d = blob.read_shift(1); blob.l += 3;
|
|
if((d & 0x10)) def.area = true;
|
|
return def;
|
|
}
|
|
|
|
/* [MS-XLS] 2.4.241 */
|
|
function write_RRTabId(n/*:number*/) {
|
|
var out = new_buf(2 * n);
|
|
for(var i = 0; i < n; ++i) out.write_shift(2, i+1);
|
|
return out;
|
|
}
|
|
|
|
var parse_Blank = parse_XLSCell; /* [MS-XLS] 2.4.20 Just the cell */
|
|
var parse_Scl = parseuint16a; /* [MS-XLS] 2.4.247 num, den */
|
|
var parse_String = parse_XLUnicodeString; /* [MS-XLS] 2.4.268 */
|
|
|
|
/* --- Specific to versions before BIFF8 --- */
|
|
function parse_ImData(blob) {
|
|
var cf = blob.read_shift(2);
|
|
var env = blob.read_shift(2);
|
|
var lcb = blob.read_shift(4);
|
|
var o = {fmt:cf, env:env, len:lcb, data:blob.slice(blob.l,blob.l+lcb)};
|
|
blob.l += lcb;
|
|
return o;
|
|
}
|
|
|
|
function write_BIFF2Cell(out, r/*:number*/, c/*:number*/, ixfe/*:number*/, ifmt/*:number*/) {
|
|
if(!out) out = new_buf(7);
|
|
out.write_shift(2, r);
|
|
out.write_shift(2, c);
|
|
out.write_shift(1, ixfe||0/* & 0x3F */);
|
|
out.write_shift(1, ifmt||0/* & 0x3F */);
|
|
out.write_shift(1, 0);
|
|
return out;
|
|
}
|
|
|
|
/* BIFF2_??? where ??? is the name from [XLS] */
|
|
function parse_BIFF2STR(blob, length, opts) {
|
|
if(opts.biffguess && opts.biff == 5) opts.biff = 2;
|
|
var cell = parse_XLSCell(blob, 7, opts);
|
|
var str = parse_XLUnicodeString2(blob, length-7, opts);
|
|
cell.t = 'str';
|
|
cell.val = str;
|
|
return cell;
|
|
}
|
|
|
|
function parse_BIFF2NUM(blob, length, opts) {
|
|
var cell = parse_XLSCell(blob, 7, opts);
|
|
var num = parse_Xnum(blob, 8);
|
|
cell.t = 'n';
|
|
cell.val = num;
|
|
return cell;
|
|
}
|
|
function write_BIFF2NUM(r/*:number*/, c/*:number*/, val/*:number*/, ixfe, ifmt) {
|
|
var out = new_buf(15);
|
|
write_BIFF2Cell(out, r, c, ixfe||0, ifmt||0);
|
|
out.write_shift(8, val, 'f');
|
|
return out;
|
|
}
|
|
|
|
function parse_BIFF2INT(blob, length, opts) {
|
|
var cell = parse_XLSCell(blob, 7, opts);
|
|
var num = blob.read_shift(2);
|
|
cell.t = 'n';
|
|
cell.val = num;
|
|
return cell;
|
|
}
|
|
function write_BIFF2INT(r/*:number*/, c/*:number*/, val/*:number*/, ixfe/*:number*/, ifmt/*:number*/) {
|
|
var out = new_buf(9);
|
|
write_BIFF2Cell(out, r, c, ixfe||0, ifmt||0);
|
|
out.write_shift(2, val);
|
|
return out;
|
|
}
|
|
|
|
function parse_BIFF2STRING(blob) {
|
|
var cch = blob.read_shift(1);
|
|
if(cch === 0) { blob.l++; return ""; }
|
|
return blob.read_shift(cch, 'sbcs-cont');
|
|
}
|
|
|
|
function parse_BIFF2BOOLERR(blob, length, opts) {
|
|
var bestart = blob.l + 7;
|
|
var cell = parse_XLSCell(blob, 6, opts);
|
|
blob.l = bestart;
|
|
var val = parse_Bes(blob, 2);
|
|
cell.val = val;
|
|
cell.t = (val === true || val === false) ? 'b' : 'e';
|
|
return cell;
|
|
}
|
|
|
|
/* TODO: convert to BIFF8 font struct */
|
|
function parse_BIFF2FONTXTRA(blob, length) {
|
|
blob.l += 6; // unknown
|
|
blob.l += 2; // font weight "bls"
|
|
blob.l += 1; // charset
|
|
blob.l += 3; // unknown
|
|
blob.l += 1; // font family
|
|
blob.l += length - 13;
|
|
}
|
|
|
|
/* TODO: parse rich text runs */
|
|
function parse_RString(blob, length, opts) {
|
|
var end = blob.l + length;
|
|
var cell = parse_XLSCell(blob, 6, opts);
|
|
var cch = blob.read_shift(2);
|
|
var str = parse_XLUnicodeStringNoCch(blob, cch, opts);
|
|
blob.l = end;
|
|
cell.t = 'str';
|
|
cell.val = str;
|
|
return cell;
|
|
}
|
|
|
|
function parse_BIFF4SheetInfo(blob/*::, length, opts*/) {
|
|
var flags = blob.read_shift(4);
|
|
var cch = blob.read_shift(1), name = blob.read_shift(cch, "sbcs");
|
|
if(name.length === 0) name = "Sheet1";
|
|
return { flags: flags, name:name };
|
|
} |