forked from sheetjs/sheetjs
603 lines
22 KiB
TypeScript
603 lines
22 KiB
TypeScript
/*! sheetjs (C) 2013-present SheetJS -- http://sheetjs.com */
|
|
/// <reference path="src/types.ts"/>
|
|
|
|
/* these are type imports and do not show up in the generated JS */
|
|
import { CFB$Container } from 'cfb';
|
|
import { WorkBook, WorkSheet, Range, CellObject } from '../';
|
|
import type { utils } from "../";
|
|
|
|
declare var encode_cell: typeof utils.encode_cell;
|
|
declare var encode_range: typeof utils.encode_range;
|
|
declare var book_new: typeof utils.book_new;
|
|
declare var book_append_sheet: typeof utils.book_append_sheet;
|
|
//<<import { utils } from "../../";
|
|
//<<const { encode_cell, encode_range, book_new, book_append_sheet } = utils;
|
|
|
|
function u8_to_dataview(array: Uint8Array): DataView { return new DataView(array.buffer, array.byteOffset, array.byteLength); }
|
|
|
|
function u8str(u8: Uint8Array): string { return /* Buffer.isBuffer(u8) ? u8.toString() :*/ typeof TextDecoder != "undefined" ? new TextDecoder().decode(u8) : utf8read(a2s(u8)); }
|
|
|
|
/** Concatenate Uint8Arrays */
|
|
function u8concat(u8a: Uint8Array[]): Uint8Array {
|
|
var len = u8a.reduce((acc: number, x: Uint8Array) => acc + x.length, 0);
|
|
var out = new Uint8Array(len);
|
|
var off = 0;
|
|
u8a.forEach(u8 => { out.set(u8, off); off += u8.length; });
|
|
return out;
|
|
}
|
|
//<<export { u8concat };
|
|
|
|
/** Count the number of bits set (assuming int32_t interpretation) */
|
|
function popcnt(x: number): number {
|
|
x -= ((x >> 1) & 0x55555555);
|
|
x = (x & 0x33333333) + ((x >> 2) & 0x33333333);
|
|
return (((x + (x >> 4)) & 0x0F0F0F0F) * 0x01010101) >>> 24;
|
|
}
|
|
|
|
/** Read a 128-bit decimal from the modern cell storage */
|
|
function readDecimal128LE(buf: Uint8Array, offset: number): number {
|
|
var exp = ((buf[offset + 15] & 0x7F) << 7) | (buf[offset + 14] >> 1);
|
|
var mantissa = buf[offset + 14] & 1;
|
|
for(var j = offset + 13; j >= offset; --j) mantissa = mantissa * 256 + buf[j];
|
|
return ((buf[offset+15] & 0x80) ? -mantissa : mantissa) * Math.pow(10, exp - 0x1820);
|
|
}
|
|
|
|
type Ptr = [number];
|
|
|
|
/** Parse an integer from the varint that can be exactly stored in a double */
|
|
function parse_varint49(buf: Uint8Array, ptr?: Ptr): number {
|
|
var l = ptr ? ptr[0] : 0;
|
|
var usz = buf[l] & 0x7F;
|
|
varint: if(buf[l++] >= 0x80) {
|
|
usz |= (buf[l] & 0x7F) << 7; if(buf[l++] < 0x80) break varint;
|
|
usz |= (buf[l] & 0x7F) << 14; if(buf[l++] < 0x80) break varint;
|
|
usz |= (buf[l] & 0x7F) << 21; if(buf[l++] < 0x80) break varint;
|
|
usz += (buf[l] & 0x7F) * Math.pow(2, 28); ++l; if(buf[l++] < 0x80) break varint;
|
|
usz += (buf[l] & 0x7F) * Math.pow(2, 35); ++l; if(buf[l++] < 0x80) break varint;
|
|
usz += (buf[l] & 0x7F) * Math.pow(2, 42); ++l; if(buf[l++] < 0x80) break varint;
|
|
}
|
|
if(ptr) ptr[0] = l;
|
|
return usz;
|
|
}
|
|
function write_varint49(v: number): Uint8Array {
|
|
var usz = new Uint8Array(7);
|
|
usz[0] = (v & 0x7F);
|
|
var L = 1;
|
|
sz: if(v > 0x7F) {
|
|
usz[L-1] |= 0x80; usz[L] = (v >> 7) & 0x7F; ++L;
|
|
if(v <= 0x3FFF) break sz;
|
|
usz[L-1] |= 0x80; usz[L] = (v >> 14) & 0x7F; ++L;
|
|
if(v <= 0x1FFFFF) break sz;
|
|
usz[L-1] |= 0x80; usz[L] = (v >> 21) & 0x7F; ++L;
|
|
if(v <= 0xFFFFFFF) break sz;
|
|
usz[L-1] |= 0x80; usz[L] = ((v/0x100) >>> 21) & 0x7F; ++L;
|
|
if(v <= 0x7FFFFFFFF) break sz;
|
|
usz[L-1] |= 0x80; usz[L] = ((v/0x10000) >>> 21) & 0x7F; ++L;
|
|
if(v <= 0x3FFFFFFFFFF) break sz;
|
|
usz[L-1] |= 0x80; usz[L] = ((v/0x1000000) >>> 21) & 0x7F; ++L;
|
|
}
|
|
return usz.slice(0, L);
|
|
}
|
|
|
|
/** Parse a 32-bit signed integer from the raw varint */
|
|
function varint_to_i32(buf: Uint8Array): number {
|
|
var l = 0, i32 = buf[l] & 0x7F;
|
|
varint: if(buf[l++] >= 0x80) {
|
|
i32 |= (buf[l] & 0x7F) << 7; if(buf[l++] < 0x80) break varint;
|
|
i32 |= (buf[l] & 0x7F) << 14; if(buf[l++] < 0x80) break varint;
|
|
i32 |= (buf[l] & 0x7F) << 21; if(buf[l++] < 0x80) break varint;
|
|
i32 |= (buf[l] & 0x7F) << 28;
|
|
}
|
|
return i32;
|
|
}
|
|
//<<export { varint_to_i32 };
|
|
|
|
interface ProtoItem {
|
|
offset?: number;
|
|
data: Uint8Array;
|
|
type: number;
|
|
}
|
|
type ProtoField = Array<ProtoItem>
|
|
type ProtoMessage = Array<ProtoField>;
|
|
/** Shallow parse of a Protobuf message */
|
|
function parse_shallow(buf: Uint8Array): ProtoMessage {
|
|
var out: ProtoMessage = [], ptr: Ptr = [0];
|
|
while(ptr[0] < buf.length) {
|
|
var off = ptr[0];
|
|
var num = parse_varint49(buf, ptr);
|
|
var type = num & 0x07; num = Math.floor(num / 8);
|
|
var len = 0;
|
|
var res: Uint8Array;
|
|
if(num == 0) break;
|
|
switch(type) {
|
|
case 0: {
|
|
var l = ptr[0];
|
|
while(buf[ptr[0]++] >= 0x80);
|
|
res = buf.slice(l, ptr[0]);
|
|
} break;
|
|
case 5: len = 4; res = buf.slice(ptr[0], ptr[0] + len); ptr[0] += len; break;
|
|
case 1: len = 8; res = buf.slice(ptr[0], ptr[0] + len); ptr[0] += len; break;
|
|
case 2: len = parse_varint49(buf, ptr); res = buf.slice(ptr[0], ptr[0] + len); ptr[0] += len; break;
|
|
case 3: // Start group
|
|
case 4: // End group
|
|
default: throw new Error(`PB Type ${type} for Field ${num} at offset ${off}`);
|
|
}
|
|
var v: ProtoItem = { offset: off, data: res, type };
|
|
if(out[num] == null) out[num] = [v];
|
|
else out[num].push(v);
|
|
}
|
|
return out;
|
|
}
|
|
/** Serialize a shallow parse */
|
|
function write_shallow(proto: ProtoMessage): Uint8Array {
|
|
var out: Uint8Array[] = [];
|
|
proto.forEach((field, idx) => {
|
|
field.forEach(item => {
|
|
out.push(write_varint49(idx * 8 + item.type));
|
|
if(item.type == 2) out.push(write_varint49(item.data.length));
|
|
out.push(item.data);
|
|
});
|
|
});
|
|
return u8concat(out);
|
|
}
|
|
//<<export { parse_shallow, write_shallow };
|
|
|
|
/** Map over each entry in a repeated (or single-value) field */
|
|
function mappa<U>(data: ProtoField, cb:(Uint8Array) => U): U[] {
|
|
if(!data) return [];
|
|
return data.map((d) => { try {
|
|
return cb(d.data);
|
|
} catch(e) {
|
|
var m = e.message?.match(/at offset (\d+)/);
|
|
if(m) e.message = e.message.replace(/at offset (\d+)/, "at offset " + (+m[1] + d.offset));
|
|
throw e;
|
|
}});
|
|
}
|
|
|
|
|
|
interface IWAMessage {
|
|
/** Metadata in .TSP.MessageInfo */
|
|
meta: ProtoMessage;
|
|
data: Uint8Array;
|
|
}
|
|
interface IWAArchiveInfo {
|
|
id?: number;
|
|
messages?: IWAMessage[];
|
|
}
|
|
/** Extract all messages from a IWA file */
|
|
function parse_iwa_file(buf: Uint8Array): IWAArchiveInfo[] {
|
|
var out: IWAArchiveInfo[] = [], ptr: Ptr = [0];
|
|
while(ptr[0] < buf.length) {
|
|
/* .TSP.ArchiveInfo */
|
|
var len = parse_varint49(buf, ptr);
|
|
var ai = parse_shallow(buf.slice(ptr[0], ptr[0] + len));
|
|
ptr[0] += len;
|
|
|
|
var res: IWAArchiveInfo = {
|
|
/* TODO: technically ID is optional */
|
|
id: varint_to_i32(ai[1][0].data),
|
|
messages: []
|
|
};
|
|
ai[2].forEach(b => {
|
|
var mi = parse_shallow(b.data);
|
|
var fl = varint_to_i32(mi[3][0].data);
|
|
res.messages.push({
|
|
meta: mi,
|
|
data: buf.slice(ptr[0], ptr[0] + fl)
|
|
});
|
|
ptr[0] += fl;
|
|
});
|
|
out.push(res);
|
|
}
|
|
return out;
|
|
}
|
|
//<<export { parse_iwa_file };
|
|
|
|
/** Decompress a snappy chunk */
|
|
function parse_snappy_chunk(type: number, buf: Uint8Array): Uint8Array {
|
|
if(type != 0) throw new Error(`Unexpected Snappy chunk type ${type}`);
|
|
var ptr: Ptr = [0];
|
|
|
|
var usz = parse_varint49(buf, ptr);
|
|
var chunks = [];
|
|
while(ptr[0] < buf.length) {
|
|
var tag = buf[ptr[0]] & 0x3;
|
|
if(tag == 0) {
|
|
var len = buf[ptr[0]++] >> 2;
|
|
if(len < 60) ++len;
|
|
else {
|
|
var c = len - 59;
|
|
len = buf[ptr[0]];
|
|
if(c > 1) len |= (buf[ptr[0]+1]<<8);
|
|
if(c > 2) len |= (buf[ptr[0]+2]<<16);
|
|
if(c > 3) len |= (buf[ptr[0]+3]<<24);
|
|
len >>>=0; len++;
|
|
ptr[0] += c;
|
|
}
|
|
chunks.push(buf.slice(ptr[0], ptr[0] + len)); ptr[0] += len; continue;
|
|
} else {
|
|
var offset = 0, length = 0;
|
|
if(tag == 1) {
|
|
length = ((buf[ptr[0]] >> 2) & 0x7) + 4;
|
|
offset = (buf[ptr[0]++] & 0xE0) << 3;
|
|
offset |= buf[ptr[0]++];
|
|
} else {
|
|
length = (buf[ptr[0]++] >> 2) + 1;
|
|
if(tag == 2) { offset = buf[ptr[0]] | (buf[ptr[0]+1]<<8); ptr[0] += 2; }
|
|
else { offset = (buf[ptr[0]] | (buf[ptr[0]+1]<<8) | (buf[ptr[0]+2]<<16) | (buf[ptr[0]+3]<<24))>>>0; ptr[0] += 4; }
|
|
}
|
|
chunks = [u8concat(chunks)];
|
|
if(offset == 0) throw new Error("Invalid offset 0");
|
|
if(offset > chunks[0].length) throw new Error("Invalid offset beyond length");
|
|
if(length >= offset) {
|
|
chunks.push(chunks[0].slice(-offset)); length -= offset;
|
|
while(length >= chunks[chunks.length-1].length) {
|
|
chunks.push(chunks[chunks.length - 1]);
|
|
length -= chunks[chunks.length - 1].length;
|
|
}
|
|
}
|
|
chunks.push(chunks[0].slice(-offset, -offset + length));
|
|
}
|
|
}
|
|
var o = u8concat(chunks);
|
|
if(o.length != usz) throw new Error(`Unexpected length: ${o.length} != ${usz}`);
|
|
return o;
|
|
}
|
|
|
|
/** Decompress IWA file */
|
|
function decompress_iwa_file(buf: Uint8Array): Uint8Array {
|
|
var out = [];
|
|
var l = 0;
|
|
while(l < buf.length) {
|
|
var t = buf[l++];
|
|
var len = buf[l] | (buf[l+1]<<8) | (buf[l+2] << 16); l += 3;
|
|
out.push(parse_snappy_chunk(t, buf.slice(l, l + len)));
|
|
l += len;
|
|
}
|
|
if(l !== buf.length) throw new Error("data is not a valid framed stream!");
|
|
return u8concat(out);
|
|
}
|
|
|
|
/** Compress IWA file */
|
|
function compress_iwa_file(buf: Uint8Array): Uint8Array {
|
|
var out: Uint8Array[] = [];
|
|
var l = 0;
|
|
while(l < buf.length) {
|
|
var c = Math.min(buf.length - l, 0xFFFFFFF);
|
|
var frame = new Uint8Array(4);
|
|
out.push(frame);
|
|
var usz = write_varint49(c);
|
|
var L = usz.length;
|
|
out.push(usz);
|
|
|
|
if(c <= 60) { L++; out.push(new Uint8Array([(c - 1)<<2])); }
|
|
else if(c <= 0x100) { L += 2; out.push(new Uint8Array([0xF0, (c-1) & 0xFF])); }
|
|
else if(c <= 0x10000) { L += 3; out.push(new Uint8Array([0xF4, (c-1) & 0xFF, ((c-1) >> 8) & 0xFF])); }
|
|
else if(c <= 0x1000000) { L += 4; out.push(new Uint8Array([0xF8, (c-1) & 0xFF, ((c-1) >> 8) & 0xFF, ((c-1) >> 16) & 0xFF])); }
|
|
else if(c <= 0x100000000) { L += 5; out.push(new Uint8Array([0xFC, (c-1) & 0xFF, ((c-1) >> 8) & 0xFF, ((c-1) >> 16) & 0xFF, ((c-1) >>> 24) & 0xFF])); }
|
|
|
|
out.push(buf.slice(l, l + c)); L += c;
|
|
|
|
frame[0] = 0;
|
|
frame[1] = L & 0xFF; frame[2] = (L >> 8) & 0xFF; frame[3] = (L >> 16) & 0xFF;
|
|
l += c;
|
|
}
|
|
return u8concat(out);
|
|
}
|
|
//<<export { decompress_iwa_file, compress_iwa_file };
|
|
|
|
/** Parse "old storage" (version 0..3) */
|
|
function parse_old_storage(buf: Uint8Array, sst: string[], rsst: string[], v: 0|1|2|3): CellObject {
|
|
var dv = u8_to_dataview(buf);
|
|
var flags = dv.getUint32(4, true);
|
|
|
|
/* TODO: find the correct field position of number formats, formulae, etc */
|
|
var data_offset = (v > 1 ? 12 : 8) + popcnt(flags & (v > 1 ? 0x0D8E : 0x018E)) * 4;
|
|
|
|
var ridx = -1, sidx = -1, ieee = NaN, dt = new Date(2001, 0, 1);
|
|
if(flags & 0x0200) { ridx = dv.getUint32(data_offset, true); data_offset += 4; }
|
|
data_offset += popcnt(flags & (v > 1 ? 0x3000 : 0x1000)) * 4;
|
|
if(flags & 0x0010) { sidx = dv.getUint32(data_offset, true); data_offset += 4; }
|
|
if(flags & 0x0020) { ieee = dv.getFloat64(data_offset, true); data_offset += 8; }
|
|
if(flags & 0x0040) { dt.setTime(dt.getTime() + dv.getFloat64(data_offset, true) * 1000); data_offset += 8; }
|
|
|
|
var ret: CellObject;
|
|
switch(buf[2]) {
|
|
case 0: break; // return { t: "z" }; // blank?
|
|
case 2: ret = { t: "n", v: ieee }; break; // number
|
|
case 3: ret = { t: "s", v: sst[sidx] }; break; // string
|
|
case 5: ret = { t: "d", v: dt }; break; // date-time
|
|
case 6: ret = { t: "b", v: ieee > 0 }; break; // boolean
|
|
case 7: ret = { t: "n", v: ieee }; break; // duration in seconds TODO: emit [hh]:[mm] style format with adjusted value
|
|
case 8: ret = { t: "e", v: 0}; break; // "formula error" TODO: enumerate and map errors to csf equivalents
|
|
case 9: { // "automatic"?
|
|
if(ridx > -1) ret = { t: "s", v: rsst[ridx] };
|
|
else if(sidx > -1) ret = { t: "s", v: sst[sidx] };
|
|
else if(!isNaN(ieee)) ret = { t: "n", v: ieee };
|
|
else throw new Error(`Unsupported cell type ${buf.slice(0,4)}`);
|
|
} break;
|
|
default: throw new Error(`Unsupported cell type ${buf.slice(0,4)}`);
|
|
}
|
|
/* TODO: Some fields appear after the cell data */
|
|
|
|
return ret;
|
|
}
|
|
|
|
function parse_storage(buf: Uint8Array, sst: string[], rsst: string[]): CellObject {
|
|
var dv = u8_to_dataview(buf);
|
|
var flags = dv.getUint32(8, true);
|
|
|
|
/* TODO: find the correct field position of number formats, formulae, etc */
|
|
var data_offset = 12;
|
|
|
|
var ridx = -1, sidx = -1, d128 = NaN, ieee = NaN, dt = new Date(2001, 0, 1);
|
|
|
|
if(flags & 0x0001) { d128 = readDecimal128LE(buf, data_offset); data_offset += 16; }
|
|
if(flags & 0x0002) { ieee = dv.getFloat64(data_offset, true); data_offset += 8; }
|
|
if(flags & 0x0004) { dt.setTime(dt.getTime() + dv.getFloat64(data_offset, true) * 1000); data_offset += 8; }
|
|
if(flags & 0x0008) { sidx = dv.getUint32(data_offset, true); data_offset += 4; }
|
|
if(flags & 0x0010) { ridx = dv.getUint32(data_offset, true); data_offset += 4; }
|
|
|
|
var ret: CellObject;
|
|
switch(buf[1]) {
|
|
case 0: break; // return { t: "z" }; // blank?
|
|
case 2: ret = { t: "n", v: d128 }; break; // number
|
|
case 3: ret = { t: "s", v: sst[sidx] }; break; // string
|
|
case 5: ret = { t: "d", v: dt }; break; // date-time
|
|
case 6: ret = { t: "b", v: ieee > 0 }; break; // boolean
|
|
case 7: ret = { t: "n", v: ieee }; break; // duration in seconds TODO: emit [hh]:[mm] style format with adjusted value
|
|
case 8: ret = { t: "e", v: 0}; break; // "formula error" TODO: enumerate and map errors to csf equivalents
|
|
case 9: { // "automatic"?
|
|
if(ridx > -1) ret = { t: "s", v: rsst[ridx] };
|
|
else throw new Error(`Unsupported cell type ${buf[1]} : ${flags & 0x1F} : ${buf.slice(0,4)}`);
|
|
} break;
|
|
case 10: ret = { t: "n", v: d128 }; break; // currency
|
|
default: throw new Error(`Unsupported cell type ${buf[1]} : ${flags & 0x1F} : ${buf.slice(0,4)}`);
|
|
}
|
|
/* TODO: All styling fields appear after the cell data */
|
|
|
|
return ret;
|
|
}
|
|
|
|
function parse_cell_storage(buf: Uint8Array, sst: string[], rsst: string[]): CellObject {
|
|
switch(buf[0]) {
|
|
case 0: case 1:
|
|
case 2: case 3: return parse_old_storage(buf, sst, rsst, buf[0]);
|
|
case 5: return parse_storage(buf, sst, rsst);
|
|
default: throw new Error(`Unsupported payload version ${buf[0]}`);
|
|
}
|
|
}
|
|
|
|
/** .TSS.StylesheetArchive */
|
|
//function parse_TSS_StylesheetArchive(M: IWAMessage[][], root: IWAMessage): void {
|
|
// var pb = parse_shallow(root.data);
|
|
//}
|
|
|
|
/** .TSP.Reference */
|
|
function parse_TSP_Reference(buf: Uint8Array): number {
|
|
var pb = parse_shallow(buf);
|
|
return parse_varint49(pb[1][0].data);
|
|
}
|
|
|
|
type MessageSpace = {[id: number]: IWAMessage[]};
|
|
|
|
/** .TST.TableDataList */
|
|
function parse_TST_TableDataList(M: MessageSpace, root: IWAMessage): string[] {
|
|
var pb = parse_shallow(root.data);
|
|
// .TST.TableDataList.ListType
|
|
var type = varint_to_i32(pb[1][0].data);
|
|
|
|
var entries = pb[3];
|
|
var data = [];
|
|
(entries||[]).forEach(entry => {
|
|
// .TST.TableDataList.ListEntry
|
|
var le = parse_shallow(entry.data);
|
|
var key = varint_to_i32(le[1][0].data)>>>0;
|
|
switch(type) {
|
|
case 1: data[key] = u8str(le[3][0].data); break;
|
|
case 8: {
|
|
// .TSP.RichTextPayloadArchive
|
|
var rt = M[parse_TSP_Reference(le[9][0].data)][0];
|
|
var rtp = parse_shallow(rt.data);
|
|
|
|
// .TSWP.StorageArchive
|
|
var rtpref = M[parse_TSP_Reference(rtp[1][0].data)][0];
|
|
var mtype = varint_to_i32(rtpref.meta[1][0].data);
|
|
if(mtype != 2001) throw new Error(`2000 unexpected reference to ${mtype}`);
|
|
var tswpsa = parse_shallow(rtpref.data);
|
|
|
|
data[key] = tswpsa[3].map(x => u8str(x.data)).join("");
|
|
} break;
|
|
}
|
|
});
|
|
return data;
|
|
}
|
|
|
|
type TileStorageType = -1 | 0 | 1;
|
|
interface TileRowInfo {
|
|
/** Row Index */
|
|
R: number;
|
|
/** Cell Storage */
|
|
cells?: Uint8Array[];
|
|
}
|
|
/** .TSP.TileRowInfo */
|
|
function parse_TST_TileRowInfo(u8: Uint8Array, type: TileStorageType): TileRowInfo {
|
|
var pb = parse_shallow(u8);
|
|
var R = varint_to_i32(pb[1][0].data) >>> 0;
|
|
var cnt = varint_to_i32(pb[2][0].data) >>> 0;
|
|
// var version = pb?.[5]?.[0] && (varint_to_i32(pb[5][0].data) >>> 0);
|
|
var wide_offsets = pb[8]?.[0]?.data && varint_to_i32(pb[8][0].data) > 0 || false;
|
|
|
|
/* select storage by type (1 = modern / 0 = old / -1 = try modern, old) */
|
|
var used_storage_u8: Uint8Array, used_storage: Uint8Array;
|
|
if(pb[7]?.[0]?.data && type != 0) { used_storage_u8 = pb[7]?.[0]?.data; used_storage = pb[6]?.[0]?.data; }
|
|
else if(pb[4]?.[0]?.data && type != 1) { used_storage_u8 = pb[4]?.[0]?.data; used_storage = pb[3]?.[0]?.data; }
|
|
else throw `NUMBERS Tile missing ${type} cell storage`;
|
|
|
|
/* find all offsets -- 0xFFFF means cells are not present */
|
|
var width = wide_offsets ? 4 : 1;
|
|
var used_storage_offsets = u8_to_dataview(used_storage_u8);
|
|
var offsets: Array<[number, number]> = [];
|
|
for(var C = 0; C < used_storage_u8.length / 2; ++C) {
|
|
var off = used_storage_offsets.getUint16(C*2, true);
|
|
if(off < 65535) offsets.push([C, off]);
|
|
}
|
|
if(offsets.length != cnt) throw `Expected ${cnt} cells, found ${offsets.length}`;
|
|
|
|
var cells: Uint8Array[] = [];
|
|
for(C = 0; C < offsets.length - 1; ++C) cells[offsets[C][0]] = used_storage.subarray(offsets[C][1] * width, offsets[C+1][1] * width);
|
|
cells[offsets[offsets.length - 1][0]] = used_storage.subarray(offsets[offsets.length - 1][1] * width);
|
|
return { R, cells };
|
|
}
|
|
|
|
interface TileInfo {
|
|
data: Uint8Array[][];
|
|
nrows: number;
|
|
}
|
|
/** .TST.Tile */
|
|
function parse_TST_Tile(M: MessageSpace, root: IWAMessage): TileInfo {
|
|
var pb = parse_shallow(root.data);
|
|
var storage: TileStorageType = (pb?.[7]?.[0]) ? ((varint_to_i32(pb[7][0].data)>>>0) > 0 ? 1 : 0 ) : -1;
|
|
var ri = mappa(pb[5], (u8: Uint8Array) => parse_TST_TileRowInfo(u8, storage));
|
|
return {
|
|
nrows: varint_to_i32(pb[4][0].data)>>>0,
|
|
data: ri.reduce((acc, x) => {
|
|
if(!acc[x.R]) acc[x.R] = [];
|
|
x.cells.forEach((cell, C) => {
|
|
if(acc[x.R][C]) throw new Error(`Duplicate cell r=${x.R} c=${C}`);
|
|
acc[x.R][C] = cell;
|
|
});
|
|
return acc;
|
|
}, [] as Uint8Array[][])
|
|
};
|
|
}
|
|
|
|
/** .TST.TableModelArchive */
|
|
function parse_TST_TableModelArchive(M: MessageSpace, root: IWAMessage, ws: WorkSheet) {
|
|
var pb = parse_shallow(root.data);
|
|
var range: Range = { s: {r:0, c:0}, e: {r:0, c:0} };
|
|
range.e.r = (varint_to_i32(pb[6][0].data) >>> 0) - 1;
|
|
if(range.e.r < 0) throw new Error(`Invalid row varint ${pb[6][0].data}`);
|
|
range.e.c = (varint_to_i32(pb[7][0].data) >>> 0) - 1;
|
|
if(range.e.c < 0) throw new Error(`Invalid col varint ${pb[7][0].data}`);
|
|
ws["!ref"] = encode_range(range);
|
|
|
|
// .TST.DataStore
|
|
var store = parse_shallow(pb[4][0].data);
|
|
var sst = parse_TST_TableDataList(M, M[parse_TSP_Reference(store[4][0].data)][0]);
|
|
var rsst: string[] = store[17]?.[0] ? parse_TST_TableDataList(M, M[parse_TSP_Reference(store[17][0].data)][0]) : [];
|
|
|
|
// .TST.TileStorage
|
|
var tile = parse_shallow(store[3][0].data);
|
|
var _R = 0;
|
|
/* TODO: should this list be sorted by id ? */
|
|
tile[1].forEach(t => {
|
|
var tl = (parse_shallow(t.data));
|
|
// var id = varint_to_i32(tl[1][0].data);
|
|
var ref = M[parse_TSP_Reference(tl[2][0].data)][0];
|
|
var mtype = varint_to_i32(ref.meta[1][0].data);
|
|
if(mtype != 6002) throw new Error(`6001 unexpected reference to ${mtype}`);
|
|
var _tile = parse_TST_Tile(M, ref);
|
|
_tile.data.forEach((row, R) => {
|
|
row.forEach((buf, C) => {
|
|
var addr = encode_cell({r:_R + R,c:C});
|
|
var res = parse_cell_storage(buf, sst, rsst);
|
|
if(res) ws[addr] = res;
|
|
});
|
|
});
|
|
_R += _tile.nrows;
|
|
});
|
|
}
|
|
|
|
/** .TST.TableInfoArchive */
|
|
function parse_TST_TableInfoArchive(M: MessageSpace, root: IWAMessage): WorkSheet {
|
|
var pb = parse_shallow(root.data);
|
|
var out: WorkSheet = { "!ref": "A1" };
|
|
var tableref = M[parse_TSP_Reference(pb[2][0].data)];
|
|
var mtype = varint_to_i32(tableref[0].meta[1][0].data);
|
|
if(mtype != 6001) throw new Error(`6000 unexpected reference to ${mtype}`);
|
|
parse_TST_TableModelArchive(M, tableref[0], out);
|
|
return out;
|
|
}
|
|
|
|
interface NSheet {
|
|
name: string;
|
|
sheets: WorkSheet[];
|
|
}
|
|
/** .TN.SheetArchive */
|
|
function parse_TN_SheetArchive(M: MessageSpace, root: IWAMessage): NSheet {
|
|
var pb = parse_shallow(root.data);
|
|
var out: NSheet = {
|
|
name: (pb[1]?.[0] ? u8str(pb[1][0].data) : ""),
|
|
sheets: []
|
|
};
|
|
var shapeoffs = mappa(pb[2], parse_TSP_Reference);
|
|
shapeoffs.forEach((off) => {
|
|
M[off].forEach((m: IWAMessage) => {
|
|
var mtype = varint_to_i32(m.meta[1][0].data);
|
|
if(mtype == 6000) out.sheets.push(parse_TST_TableInfoArchive(M, m));
|
|
});
|
|
});
|
|
return out;
|
|
}
|
|
|
|
/** .TN.DocumentArchive */
|
|
function parse_TN_DocumentArchive(M: MessageSpace, root: IWAMessage): WorkBook {
|
|
var out = book_new();
|
|
var pb = parse_shallow(root.data);
|
|
|
|
// var stylesheet = mappa(pb[4], parse_TSP_Reference)[0];
|
|
// if(varint_to_i32(M[stylesheet][0].meta[1][0].data) == 401) parse_TSS_StylesheetArchive(M, M[stylesheet][0]);
|
|
// var sidebar = mappa(pb[5], parse_TSP_Reference);
|
|
// var theme = mappa(pb[6], parse_TSP_Reference);
|
|
// var docinfo = parse_shallow(pb[8][0].data);
|
|
// var tskinfo = parse_shallow(docinfo[1][0].data);
|
|
// var author_storage = mappa(tskinfo[7], parse_TSP_Reference);
|
|
|
|
var sheetoffs = mappa(pb[1], parse_TSP_Reference);
|
|
sheetoffs.forEach((off) => {
|
|
M[off].forEach((m: IWAMessage) => {
|
|
var mtype = varint_to_i32(m.meta[1][0].data);
|
|
if(mtype == 2) {
|
|
var root = parse_TN_SheetArchive(M, m);
|
|
root.sheets.forEach((sheet, idx) => { book_append_sheet(out, sheet, idx == 0 ? root.name : root.name + "_" + idx, true); });
|
|
}
|
|
});
|
|
});
|
|
if(out.SheetNames.length == 0) throw new Error("Empty NUMBERS file");
|
|
return out;
|
|
}
|
|
|
|
/** Parse NUMBERS file */
|
|
function parse_numbers_iwa(cfb: CFB$Container): WorkBook {
|
|
var out: MessageSpace = {}, indices: number[] = [];
|
|
cfb.FullPaths.forEach(p => { if(p.match(/\.iwpv2/)) throw new Error(`Unsupported password protection`); });
|
|
|
|
/* collect entire message space */
|
|
cfb.FileIndex.forEach(s => {
|
|
if(!s.name.match(/\.iwa$/)) return;
|
|
var o: Uint8Array;
|
|
try { o = decompress_iwa_file(s.content as Uint8Array); } catch(e) { return console.log("?? " + s.content.length + " " + (e.message || e)); }
|
|
var packets: IWAArchiveInfo[];
|
|
try { packets = parse_iwa_file(o); } catch(e) { return console.log("## " + (e.message || e)); }
|
|
packets.forEach(packet => { out[packet.id] = packet.messages; indices.push(packet.id); });
|
|
});
|
|
if(!indices.length) throw new Error("File has no messages");
|
|
|
|
/* find document root */
|
|
var docroot: IWAMessage = out?.[1]?.[0]?.meta?.[1]?.[0].data && varint_to_i32(out[1][0].meta[1][0].data) == 1 && out[1][0];
|
|
if(!docroot) indices.forEach((idx) => {
|
|
out[idx].forEach((iwam) => {
|
|
var mtype = varint_to_i32(iwam.meta[1][0].data) >>> 0;
|
|
if(mtype == 1) {
|
|
if(!docroot) docroot = iwam;
|
|
else throw new Error("Document has multiple roots");
|
|
}
|
|
});
|
|
});
|
|
if(!docroot) throw new Error("Cannot find Document root");
|
|
return parse_TN_DocumentArchive(out, docroot);
|
|
}
|
|
|
|
//<<export { parse_numbers_iwa };
|