From 716bef470e98b657be47a97b793d2e8d705a40e4 Mon Sep 17 00:00:00 2001 From: Albert Mulia Shintra Date: Fri, 26 Jun 2020 03:32:50 +0800 Subject: [PATCH] fix: missing PRN in xlsx.mini (#1908) - build: update mini script --- mini.lst | 1 + xlsx.mini.flow.js | 934 ++++++++++++++++++++++++++++++++++++++++++++++ xlsx.mini.js | 933 +++++++++++++++++++++++++++++++++++++++++++++ 3 files changed, 1868 insertions(+) diff --git a/mini.lst b/mini.lst index 9382a17..f9213d4 100644 --- a/mini.lst +++ b/mini.lst @@ -22,6 +22,7 @@ bits/31_rels.js bits/33_coreprops.js bits/34_extprops.js bits/35_custprops.js +bits/40_harb.js bits/42_sstxml.js bits/46_stycommon.js bits/47_styxml.js diff --git a/xlsx.mini.flow.js b/xlsx.mini.flow.js index 5210ae9..bfb6bcd 100644 --- a/xlsx.mini.flow.js +++ b/xlsx.mini.flow.js @@ -4651,6 +4651,940 @@ function write_cust_props(cp/*::, opts*/)/*:string*/ { if(o.length>2){ o[o.length] = ''; o[1]=o[1].replace("/>",">"); } return o.join(""); } +/* from js-harb (C) 2014-present SheetJS */ +var DBF = (function() { +var dbf_codepage_map = { + /* Code Pages Supported by Visual FoxPro */ + /*::[*/0x01/*::]*/: 437, /*::[*/0x02/*::]*/: 850, + /*::[*/0x03/*::]*/: 1252, /*::[*/0x04/*::]*/: 10000, + /*::[*/0x64/*::]*/: 852, /*::[*/0x65/*::]*/: 866, + /*::[*/0x66/*::]*/: 865, /*::[*/0x67/*::]*/: 861, + /*::[*/0x68/*::]*/: 895, /*::[*/0x69/*::]*/: 620, + /*::[*/0x6A/*::]*/: 737, /*::[*/0x6B/*::]*/: 857, + /*::[*/0x78/*::]*/: 950, /*::[*/0x79/*::]*/: 949, + /*::[*/0x7A/*::]*/: 936, /*::[*/0x7B/*::]*/: 932, + /*::[*/0x7C/*::]*/: 874, /*::[*/0x7D/*::]*/: 1255, + /*::[*/0x7E/*::]*/: 1256, /*::[*/0x96/*::]*/: 10007, + /*::[*/0x97/*::]*/: 10029, /*::[*/0x98/*::]*/: 10006, + /*::[*/0xC8/*::]*/: 1250, /*::[*/0xC9/*::]*/: 1251, + /*::[*/0xCA/*::]*/: 1254, /*::[*/0xCB/*::]*/: 1253, + + /* shapefile DBF extension */ + /*::[*/0x00/*::]*/: 20127, /*::[*/0x08/*::]*/: 865, + /*::[*/0x09/*::]*/: 437, /*::[*/0x0A/*::]*/: 850, + /*::[*/0x0B/*::]*/: 437, /*::[*/0x0D/*::]*/: 437, + /*::[*/0x0E/*::]*/: 850, /*::[*/0x0F/*::]*/: 437, + /*::[*/0x10/*::]*/: 850, /*::[*/0x11/*::]*/: 437, + /*::[*/0x12/*::]*/: 850, /*::[*/0x13/*::]*/: 932, + /*::[*/0x14/*::]*/: 850, /*::[*/0x15/*::]*/: 437, + /*::[*/0x16/*::]*/: 850, /*::[*/0x17/*::]*/: 865, + /*::[*/0x18/*::]*/: 437, /*::[*/0x19/*::]*/: 437, + /*::[*/0x1A/*::]*/: 850, /*::[*/0x1B/*::]*/: 437, + /*::[*/0x1C/*::]*/: 863, /*::[*/0x1D/*::]*/: 850, + /*::[*/0x1F/*::]*/: 852, /*::[*/0x22/*::]*/: 852, + /*::[*/0x23/*::]*/: 852, /*::[*/0x24/*::]*/: 860, + /*::[*/0x25/*::]*/: 850, /*::[*/0x26/*::]*/: 866, + /*::[*/0x37/*::]*/: 850, /*::[*/0x40/*::]*/: 852, + /*::[*/0x4D/*::]*/: 936, /*::[*/0x4E/*::]*/: 949, + /*::[*/0x4F/*::]*/: 950, /*::[*/0x50/*::]*/: 874, + /*::[*/0x57/*::]*/: 1252, /*::[*/0x58/*::]*/: 1252, + /*::[*/0x59/*::]*/: 1252, + + /*::[*/0xFF/*::]*/: 16969 +}; +var dbf_reverse_map = evert({ + /*::[*/0x01/*::]*/: 437, /*::[*/0x02/*::]*/: 850, + /*::[*/0x03/*::]*/: 1252, /*::[*/0x04/*::]*/: 10000, + /*::[*/0x64/*::]*/: 852, /*::[*/0x65/*::]*/: 866, + /*::[*/0x66/*::]*/: 865, /*::[*/0x67/*::]*/: 861, + /*::[*/0x68/*::]*/: 895, /*::[*/0x69/*::]*/: 620, + /*::[*/0x6A/*::]*/: 737, /*::[*/0x6B/*::]*/: 857, + /*::[*/0x78/*::]*/: 950, /*::[*/0x79/*::]*/: 949, + /*::[*/0x7A/*::]*/: 936, /*::[*/0x7B/*::]*/: 932, + /*::[*/0x7C/*::]*/: 874, /*::[*/0x7D/*::]*/: 1255, + /*::[*/0x7E/*::]*/: 1256, /*::[*/0x96/*::]*/: 10007, + /*::[*/0x97/*::]*/: 10029, /*::[*/0x98/*::]*/: 10006, + /*::[*/0xC8/*::]*/: 1250, /*::[*/0xC9/*::]*/: 1251, + /*::[*/0xCA/*::]*/: 1254, /*::[*/0xCB/*::]*/: 1253, + /*::[*/0x00/*::]*/: 20127 +}); +/* TODO: find an actual specification */ +function dbf_to_aoa(buf, opts)/*:AOA*/ { + var out/*:AOA*/ = []; + /* TODO: browser based */ + var d/*:Block*/ = (new_raw_buf(1)/*:any*/); + switch(opts.type) { + case 'base64': d = s2a(Base64.decode(buf)); break; + case 'binary': d = s2a(buf); break; + case 'buffer': + case 'array': d = buf; break; + } + prep_blob(d, 0); + /* header */ + var ft = d.read_shift(1); + var memo = false; + var vfp = false, l7 = false; + switch(ft) { + case 0x02: case 0x03: break; + case 0x30: vfp = true; memo = true; break; + case 0x31: vfp = true; break; + case 0x83: memo = true; break; + case 0x8B: memo = true; break; + case 0x8C: memo = true; l7 = true; break; + case 0xF5: memo = true; break; + default: throw new Error("DBF Unsupported Version: " + ft.toString(16)); + } + var /*filedate = new Date(),*/ nrow = 0, fpos = 0; + if(ft == 0x02) nrow = d.read_shift(2); + /*filedate = new Date(d.read_shift(1) + 1900, d.read_shift(1) - 1, d.read_shift(1));*/d.l += 3; + if(ft != 0x02) nrow = d.read_shift(4); + if(ft != 0x02) fpos = d.read_shift(2); + var rlen = d.read_shift(2); + + var /*flags = 0,*/ current_cp = 1252; + if(ft != 0x02) { + d.l+=16; + /*flags = */d.read_shift(1); + //if(memo && ((flags & 0x02) === 0)) throw new Error("DBF Flags " + flags.toString(16) + " ft " + ft.toString(16)); + + /* codepage present in FoxPro */ + if(d[d.l] !== 0) current_cp = dbf_codepage_map[d[d.l]]; + d.l+=1; + + d.l+=2; + } + if(l7) d.l += 36; +/*:: type DBFField = { name:string; len:number; type:string; } */ + var fields/*:Array*/ = [], field/*:DBFField*/ = ({}/*:any*/); + var hend = fpos - 10 - (vfp ? 264 : 0), ww = l7 ? 32 : 11; + while(ft == 0x02 ? d.l < d.length && d[d.l] != 0x0d: d.l < hend) { + field = ({}/*:any*/); + field.name = cptable.utils.decode(current_cp, d.slice(d.l, d.l+ww)).replace(/[\u0000\r\n].*$/g,""); + d.l += ww; + field.type = String.fromCharCode(d.read_shift(1)); + if(ft != 0x02 && !l7) field.offset = d.read_shift(4); + field.len = d.read_shift(1); + if(ft == 0x02) field.offset = d.read_shift(2); + field.dec = d.read_shift(1); + if(field.name.length) fields.push(field); + if(ft != 0x02) d.l += l7 ? 13 : 14; + switch(field.type) { + case 'B': // VFP Double + if((!vfp || field.len != 8) && opts.WTF) console.log('Skipping ' + field.name + ':' + field.type); + break; + case 'G': // General + case 'P': // Picture + if(opts.WTF) console.log('Skipping ' + field.name + ':' + field.type); + break; + case 'C': // character + case 'D': // date + case 'F': // floating point + case 'I': // long + case 'L': // boolean + case 'M': // memo + case 'N': // number + case 'O': // double + case 'T': // datetime + case 'Y': // currency + case '0': // VFP _NullFlags + case '@': // timestamp + case '+': // autoincrement + break; + default: throw new Error('Unknown Field Type: ' + field.type); + } + } + if(d[d.l] !== 0x0D) d.l = fpos-1; + else if(ft == 0x02) d.l = 0x209; + if(ft != 0x02) { + if(d.read_shift(1) !== 0x0D) throw new Error("DBF Terminator not found " + d.l + " " + d[d.l]); + d.l = fpos; + } + /* data */ + var R = 0, C = 0; + out[0] = []; + for(C = 0; C != fields.length; ++C) out[0][C] = fields[C].name; + while(nrow-- > 0) { + if(d[d.l] === 0x2A) { d.l+=rlen; continue; } + ++d.l; + out[++R] = []; C = 0; + for(C = 0; C != fields.length; ++C) { + var dd = d.slice(d.l, d.l+fields[C].len); d.l+=fields[C].len; + prep_blob(dd, 0); + var s = cptable.utils.decode(current_cp, dd); + switch(fields[C].type) { + case 'C': + out[R][C] = cptable.utils.decode(current_cp, dd); + out[R][C] = out[R][C].trim(); + break; + case 'D': + if(s.length === 8) out[R][C] = new Date(+s.slice(0,4), +s.slice(4,6)-1, +s.slice(6,8)); + else out[R][C] = s; + break; + case 'F': out[R][C] = parseFloat(s.trim()); break; + case '+': case 'I': out[R][C] = l7 ? dd.read_shift(-4, 'i') ^ 0x80000000 : dd.read_shift(4, 'i'); break; + case 'L': switch(s.toUpperCase()) { + case 'Y': case 'T': out[R][C] = true; break; + case 'N': case 'F': out[R][C] = false; break; + case ' ': case '?': out[R][C] = false; break; /* NOTE: technically uninitialized */ + default: throw new Error("DBF Unrecognized L:|" + s + "|"); + } break; + case 'M': /* TODO: handle memo files */ + if(!memo) throw new Error("DBF Unexpected MEMO for type " + ft.toString(16)); + out[R][C] = "##MEMO##" + (l7 ? parseInt(s.trim(), 10): dd.read_shift(4)); + break; + case 'N': out[R][C] = +s.replace(/\u0000/g,"").trim(); break; + case '@': out[R][C] = new Date(dd.read_shift(-8, 'f') - 0x388317533400); break; + case 'T': out[R][C] = new Date((dd.read_shift(4) - 0x253D8C) * 0x5265C00 + dd.read_shift(4)); break; + case 'Y': out[R][C] = dd.read_shift(4,'i')/1e4; break; + case 'O': out[R][C] = -dd.read_shift(-8, 'f'); break; + case 'B': if(vfp && fields[C].len == 8) { out[R][C] = dd.read_shift(8,'f'); break; } + /* falls through */ + case 'G': case 'P': dd.l += fields[C].len; break; + case '0': + if(fields[C].name === '_NullFlags') break; + /* falls through */ + default: throw new Error("DBF Unsupported data type " + fields[C].type); + } + } + } + if(ft != 0x02) if(d.l < d.length && d[d.l++] != 0x1A) throw new Error("DBF EOF Marker missing " + (d.l-1) + " of " + d.length + " " + d[d.l-1].toString(16)); + if(opts && opts.sheetRows) out = out.slice(0, opts.sheetRows); + return out; +} + +function dbf_to_sheet(buf, opts)/*:Worksheet*/ { + var o = opts || {}; + if(!o.dateNF) o.dateNF = "yyyymmdd"; + return aoa_to_sheet(dbf_to_aoa(buf, o), o); +} + +function dbf_to_workbook(buf, opts)/*:Workbook*/ { + try { return sheet_to_workbook(dbf_to_sheet(buf, opts), opts); } + catch(e) { if(opts && opts.WTF) throw e; } + return ({SheetNames:[],Sheets:{}}); +} + +var _RLEN = { 'B': 8, 'C': 250, 'L': 1, 'D': 8, '?': 0, '': 0 }; +function sheet_to_dbf(ws/*:Worksheet*/, opts/*:WriteOpts*/) { + var o = opts || {}; + if(+o.codepage >= 0) set_cp(+o.codepage); + if(o.type == "string") throw new Error("Cannot write DBF to JS string"); + var ba = buf_array(); + var aoa/*:AOA*/ = sheet_to_json(ws, {header:1, raw:true, cellDates:true}); + var headers = aoa[0], data = aoa.slice(1); + var i = 0, j = 0, hcnt = 0, rlen = 1; + for(i = 0; i < headers.length; ++i) { + if(i == null) continue; + ++hcnt; + if(typeof headers[i] === 'number') headers[i] = headers[i].toString(10); + if(typeof headers[i] !== 'string') throw new Error("DBF Invalid column name " + headers[i] + " |" + (typeof headers[i]) + "|"); + if(headers.indexOf(headers[i]) !== i) for(j=0; j<1024;++j) + if(headers.indexOf(headers[i] + "_" + j) == -1) { headers[i] += "_" + j; break; } + } + var range = safe_decode_range(ws['!ref']); + var coltypes/*:Array*/ = []; + for(i = 0; i <= range.e.c - range.s.c; ++i) { + var col/*:Array*/ = []; + for(j=0; j < data.length; ++j) { + if(data[j][i] != null) col.push(data[j][i]); + } + if(col.length == 0 || headers[i] == null) { coltypes[i] = '?'; continue; } + var guess = '', _guess = ''; + for(j = 0; j < col.length; ++j) { + switch(typeof col[j]) { + /* TODO: check if L2 compat is desired */ + case 'number': _guess = 'B'; break; + case 'string': _guess = 'C'; break; + case 'boolean': _guess = 'L'; break; + case 'object': _guess = col[j] instanceof Date ? 'D' : 'C'; break; + default: _guess = 'C'; + } + guess = guess && guess != _guess ? 'C' : _guess; + if(guess == 'C') break; + } + rlen += _RLEN[guess] || 0; + coltypes[i] = guess; + } + + var h = ba.next(32); + h.write_shift(4, 0x13021130); + h.write_shift(4, data.length); + h.write_shift(2, 296 + 32 * hcnt); + h.write_shift(2, rlen); + for(i=0; i < 4; ++i) h.write_shift(4, 0); + h.write_shift(4, 0x00000000 | ((+dbf_reverse_map[/*::String(*/current_ansi/*::)*/] || 0x03)<<8)); + + for(i = 0, j = 0; i < headers.length; ++i) { + if(headers[i] == null) continue; + var hf = ba.next(32); + var _f = (headers[i].slice(-10) + "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00").slice(0, 11); + hf.write_shift(1, _f, "sbcs"); + hf.write_shift(1, coltypes[i] == '?' ? 'C' : coltypes[i], "sbcs"); + hf.write_shift(4, j); + hf.write_shift(1, _RLEN[coltypes[i]] || 0); + hf.write_shift(1, 0); + hf.write_shift(1, 0x02); + hf.write_shift(4, 0); + hf.write_shift(1, 0); + hf.write_shift(4, 0); + hf.write_shift(4, 0); + j += _RLEN[coltypes[i]] || 0; + } + + var hb = ba.next(264); + hb.write_shift(4, 0x0000000D); + for(i=0; i < 65;++i) hb.write_shift(4, 0x00000000); + for(i=0; i < data.length; ++i) { + var rout = ba.next(rlen); + rout.write_shift(1, 0); + for(j=0; j":190, "?":191, "{":223 + }/*:any*/); + var sylk_char_regex = new RegExp("\u001BN(" + keys(sylk_escapes).join("|").replace(/\|\|\|/, "|\\||").replace(/([?()+])/g,"\\$1") + "|\\|)", "gm"); + var sylk_char_fn = function(_, $1){ var o = sylk_escapes[$1]; return typeof o == "number" ? _getansi(o) : o; }; + var decode_sylk_char = function($$, $1, $2) { var newcc = (($1.charCodeAt(0) - 0x20)<<4) | ($2.charCodeAt(0) - 0x30); return newcc == 59 ? $$ : _getansi(newcc); }; + sylk_escapes["|"] = 254; + /* TODO: find an actual specification */ + function sylk_to_aoa(d/*:RawData*/, opts)/*:[AOA, Worksheet]*/ { + switch(opts.type) { + case 'base64': return sylk_to_aoa_str(Base64.decode(d), opts); + case 'binary': return sylk_to_aoa_str(d, opts); + case 'buffer': return sylk_to_aoa_str(d.toString('binary'), opts); + case 'array': return sylk_to_aoa_str(cc2str(d), opts); + } + throw new Error("Unrecognized type " + opts.type); + } + function sylk_to_aoa_str(str/*:string*/, opts)/*:[AOA, Worksheet]*/ { + var records = str.split(/[\n\r]+/), R = -1, C = -1, ri = 0, rj = 0, arr/*:AOA*/ = []; + var formats/*:Array*/ = []; + var next_cell_format/*:string|null*/ = null; + var sht = {}, rowinfo/*:Array*/ = [], colinfo/*:Array*/ = [], cw/*:Array*/ = []; + var Mval = 0, j; + if(+opts.codepage >= 0) set_cp(+opts.codepage); + for (; ri !== records.length; ++ri) { + Mval = 0; + var rstr=records[ri].trim().replace(/\x1B([\x20-\x2F])([\x30-\x3F])/g, decode_sylk_char).replace(sylk_char_regex, sylk_char_fn); + var record=rstr.replace(/;;/g, "\u0000").split(";").map(function(x) { return x.replace(/\u0000/g, ";"); }); + var RT=record[0], val; + if(rstr.length > 0) switch(RT) { + case 'ID': break; /* header */ + case 'E': break; /* EOF */ + case 'B': break; /* dimensions */ + case 'O': break; /* options? */ + case 'P': + if(record[1].charAt(0) == 'P') + formats.push(rstr.slice(3).replace(/;;/g, ";")); + break; + case 'C': + var C_seen_K = false, C_seen_X = false; + for(rj=1; rj 0) { rowinfo[R].hpt = Mval; rowinfo[R].hpx = pt2px(Mval); } + else if(Mval === 0) rowinfo[R].hidden = true; + break; + default: if(opts && opts.WTF) throw new Error("SYLK bad record " + rstr); + } + if(F_seen < 1) next_cell_format = null; break; + default: if(opts && opts.WTF) throw new Error("SYLK bad record " + rstr); + } + } + if(rowinfo.length > 0) sht['!rows'] = rowinfo; + if(colinfo.length > 0) sht['!cols'] = colinfo; + if(opts && opts.sheetRows) arr = arr.slice(0, opts.sheetRows); + return [arr, sht]; + } + + function sylk_to_sheet(d/*:RawData*/, opts)/*:Worksheet*/ { + var aoasht = sylk_to_aoa(d, opts); + var aoa = aoasht[0], ws = aoasht[1]; + var o = aoa_to_sheet(aoa, opts); + keys(ws).forEach(function(k) { o[k] = ws[k]; }); + return o; + } + + function sylk_to_workbook(d/*:RawData*/, opts)/*:Workbook*/ { return sheet_to_workbook(sylk_to_sheet(d, opts), opts); } + + function write_ws_cell_sylk(cell/*:Cell*/, ws/*:Worksheet*/, R/*:number*/, C/*:number*//*::, opts*/)/*:string*/ { + var o = "C;Y" + (R+1) + ";X" + (C+1) + ";K"; + switch(cell.t) { + case 'n': + o += (cell.v||0); + if(cell.f && !cell.F) o += ";E" + a1_to_rc(cell.f, {r:R, c:C}); break; + case 'b': o += cell.v ? "TRUE" : "FALSE"; break; + case 'e': o += cell.w || cell.v; break; + case 'd': o += '"' + (cell.w || cell.v) + '"'; break; + case 's': o += '"' + cell.v.replace(/"/g,"") + '"'; break; + } + return o; + } + + function write_ws_cols_sylk(out, cols) { + cols.forEach(function(col, i) { + var rec = "F;W" + (i+1) + " " + (i+1) + " "; + if(col.hidden) rec += "0"; + else { + if(typeof col.width == 'number') col.wpx = width2px(col.width); + if(typeof col.wpx == 'number') col.wch = px2char(col.wpx); + if(typeof col.wch == 'number') rec += Math.round(col.wch); + } + if(rec.charAt(rec.length - 1) != " ") out.push(rec); + }); + } + + function write_ws_rows_sylk(out/*:Array*/, rows/*:Array*/) { + rows.forEach(function(row, i) { + var rec = "F;"; + if(row.hidden) rec += "M0;"; + else if(row.hpt) rec += "M" + 20 * row.hpt + ";"; + else if(row.hpx) rec += "M" + 20 * px2pt(row.hpx) + ";"; + if(rec.length > 2) out.push(rec + "R" + (i+1)); + }); + } + + function sheet_to_sylk(ws/*:Worksheet*/, opts/*:?any*/)/*:string*/ { + var preamble/*:Array*/ = ["ID;PWXL;N;E"], o/*:Array*/ = []; + var r = safe_decode_range(ws['!ref']), cell/*:Cell*/; + var dense = Array.isArray(ws); + var RS = "\r\n"; + + preamble.push("P;PGeneral"); + preamble.push("F;P0;DG0G8;M255"); + if(ws['!cols']) write_ws_cols_sylk(preamble, ws['!cols']); + if(ws['!rows']) write_ws_rows_sylk(preamble, ws['!rows']); + + preamble.push("B;Y" + (r.e.r - r.s.r + 1) + ";X" + (r.e.c - r.s.c + 1) + ";D" + [r.s.c,r.s.r,r.e.c,r.e.r].join(" ")); + for(var R = r.s.r; R <= r.e.r; ++R) { + for(var C = r.s.c; C <= r.e.c; ++C) { + var coord = encode_cell({r:R,c:C}); + cell = dense ? (ws[R]||[])[C]: ws[coord]; + if(!cell || (cell.v == null && (!cell.f || cell.F))) continue; + o.push(write_ws_cell_sylk(cell, ws, R, C, opts)); + } + } + return preamble.join(RS) + RS + o.join(RS) + RS + "E" + RS; + } + + return { + to_workbook: sylk_to_workbook, + to_sheet: sylk_to_sheet, + from_sheet: sheet_to_sylk + }; +})(); + +var DIF = (function() { + function dif_to_aoa(d/*:RawData*/, opts)/*:AOA*/ { + switch(opts.type) { + case 'base64': return dif_to_aoa_str(Base64.decode(d), opts); + case 'binary': return dif_to_aoa_str(d, opts); + case 'buffer': return dif_to_aoa_str(d.toString('binary'), opts); + case 'array': return dif_to_aoa_str(cc2str(d), opts); + } + throw new Error("Unrecognized type " + opts.type); + } + function dif_to_aoa_str(str/*:string*/, opts)/*:AOA*/ { + var records = str.split('\n'), R = -1, C = -1, ri = 0, arr/*:AOA*/ = []; + for (; ri !== records.length; ++ri) { + if (records[ri].trim() === 'BOT') { arr[++R] = []; C = 0; continue; } + if (R < 0) continue; + var metadata = records[ri].trim().split(","); + var type = metadata[0], value = metadata[1]; + ++ri; + var data = records[ri].trim(); + switch (+type) { + case -1: + if (data === 'BOT') { arr[++R] = []; C = 0; continue; } + else if (data !== 'EOD') throw new Error("Unrecognized DIF special command " + data); + break; + case 0: + if(data === 'TRUE') arr[R][C] = true; + else if(data === 'FALSE') arr[R][C] = false; + else if(!isNaN(fuzzynum(value))) arr[R][C] = fuzzynum(value); + else if(!isNaN(fuzzydate(value).getDate())) arr[R][C] = parseDate(value); + else arr[R][C] = value; + ++C; break; + case 1: + data = data.slice(1,data.length-1); + arr[R][C++] = data !== '' ? data : null; + break; + } + if (data === 'EOD') break; + } + if(opts && opts.sheetRows) arr = arr.slice(0, opts.sheetRows); + return arr; + } + + function dif_to_sheet(str/*:string*/, opts)/*:Worksheet*/ { return aoa_to_sheet(dif_to_aoa(str, opts), opts); } + function dif_to_workbook(str/*:string*/, opts)/*:Workbook*/ { return sheet_to_workbook(dif_to_sheet(str, opts), opts); } + + var sheet_to_dif = (function() { + var push_field = function pf(o/*:Array*/, topic/*:string*/, v/*:number*/, n/*:number*/, s/*:string*/) { + o.push(topic); + o.push(v + "," + n); + o.push('"' + s.replace(/"/g,'""') + '"'); + }; + var push_value = function po(o/*:Array*/, type/*:number*/, v/*:any*/, s/*:string*/) { + o.push(type + "," + v); + o.push(type == 1 ? '"' + s.replace(/"/g,'""') + '"' : s); + }; + return function sheet_to_dif(ws/*:Worksheet*//*::, opts:?any*/)/*:string*/ { + var o/*:Array*/ = []; + var r = safe_decode_range(ws['!ref']), cell/*:Cell*/; + var dense = Array.isArray(ws); + push_field(o, "TABLE", 0, 1, "sheetjs"); + push_field(o, "VECTORS", 0, r.e.r - r.s.r + 1,""); + push_field(o, "TUPLES", 0, r.e.c - r.s.c + 1,""); + push_field(o, "DATA", 0, 0,""); + for(var R = r.s.r; R <= r.e.r; ++R) { + push_value(o, -1, 0, "BOT"); + for(var C = r.s.c; C <= r.e.c; ++C) { + var coord = encode_cell({r:R,c:C}); + cell = dense ? (ws[R]||[])[C] : ws[coord]; + if(!cell) { push_value(o, 1, 0, ""); continue;} + switch(cell.t) { + case 'n': + var val = DIF_XL ? cell.w : cell.v; + if(!val && cell.v != null) val = cell.v; + if(val == null) { + if(DIF_XL && cell.f && !cell.F) push_value(o, 1, 0, "=" + cell.f); + else push_value(o, 1, 0, ""); + } + else push_value(o, 0, val, "V"); + break; + case 'b': + push_value(o, 0, cell.v ? 1 : 0, cell.v ? "TRUE" : "FALSE"); + break; + case 's': + push_value(o, 1, 0, (!DIF_XL || isNaN(cell.v)) ? cell.v : '="' + cell.v + '"'); + break; + case 'd': + if(!cell.w) cell.w = SSF.format(cell.z || SSF._table[14], datenum(parseDate(cell.v))); + if(DIF_XL) push_value(o, 0, cell.w, "V"); + else push_value(o, 1, 0, cell.w); + break; + default: push_value(o, 1, 0, ""); + } + } + } + push_value(o, -1, 0, "EOD"); + var RS = "\r\n"; + var oo = o.join(RS); + //while((oo.length & 0x7F) != 0) oo += "\0"; + return oo; + }; + })(); + return { + to_workbook: dif_to_workbook, + to_sheet: dif_to_sheet, + from_sheet: sheet_to_dif + }; +})(); + +var ETH = (function() { + function decode(s/*:string*/)/*:string*/ { return s.replace(/\\b/g,"\\").replace(/\\c/g,":").replace(/\\n/g,"\n"); } + function encode(s/*:string*/)/*:string*/ { return s.replace(/\\/g, "\\b").replace(/:/g, "\\c").replace(/\n/g,"\\n"); } + + function eth_to_aoa(str/*:string*/, opts)/*:AOA*/ { + var records = str.split('\n'), R = -1, C = -1, ri = 0, arr/*:AOA*/ = []; + for (; ri !== records.length; ++ri) { + var record = records[ri].trim().split(":"); + if(record[0] !== 'cell') continue; + var addr = decode_cell(record[1]); + if(arr.length <= addr.r) for(R = arr.length; R <= addr.r; ++R) if(!arr[R]) arr[R] = []; + R = addr.r; C = addr.c; + switch(record[2]) { + case 't': arr[R][C] = decode(record[3]); break; + case 'v': arr[R][C] = +record[3]; break; + case 'vtf': var _f = record[record.length - 1]; + /* falls through */ + case 'vtc': + switch(record[3]) { + case 'nl': arr[R][C] = +record[4] ? true : false; break; + default: arr[R][C] = +record[4]; break; + } + if(record[2] == 'vtf') arr[R][C] = [arr[R][C], _f]; + } + } + if(opts && opts.sheetRows) arr = arr.slice(0, opts.sheetRows); + return arr; + } + + function eth_to_sheet(d/*:string*/, opts)/*:Worksheet*/ { return aoa_to_sheet(eth_to_aoa(d, opts), opts); } + function eth_to_workbook(d/*:string*/, opts)/*:Workbook*/ { return sheet_to_workbook(eth_to_sheet(d, opts), opts); } + + var header = [ + "socialcalc:version:1.5", + "MIME-Version: 1.0", + "Content-Type: multipart/mixed; boundary=SocialCalcSpreadsheetControlSave" + ].join("\n"); + + var sep = [ + "--SocialCalcSpreadsheetControlSave", + "Content-type: text/plain; charset=UTF-8" + ].join("\n") + "\n"; + + /* TODO: the other parts */ + var meta = [ + "# SocialCalc Spreadsheet Control Save", + "part:sheet" + ].join("\n"); + + var end = "--SocialCalcSpreadsheetControlSave--"; + + function sheet_to_eth_data(ws/*:Worksheet*/)/*:string*/ { + if(!ws || !ws['!ref']) return ""; + var o/*:Array*/ = [], oo/*:Array*/ = [], cell, coord = ""; + var r = decode_range(ws['!ref']); + var dense = Array.isArray(ws); + for(var R = r.s.r; R <= r.e.r; ++R) { + for(var C = r.s.c; C <= r.e.c; ++C) { + coord = encode_cell({r:R,c:C}); + cell = dense ? (ws[R]||[])[C] : ws[coord]; + if(!cell || cell.v == null || cell.t === 'z') continue; + oo = ["cell", coord, 't']; + switch(cell.t) { + case 's': case 'str': oo.push(encode(cell.v)); break; + case 'n': + if(!cell.f) { oo[2]='v'; oo[3]=cell.v; } + else { oo[2]='vtf'; oo[3]='n'; oo[4]=cell.v; oo[5]=encode(cell.f); } + break; + case 'b': + oo[2] = 'vt'+(cell.f?'f':'c'); oo[3]='nl'; oo[4]=cell.v?"1":"0"; + oo[5] = encode(cell.f||(cell.v?'TRUE':'FALSE')); + break; + case 'd': + var t = datenum(parseDate(cell.v)); + oo[2] = 'vtc'; oo[3] = 'nd'; oo[4] = ""+t; + oo[5] = cell.w || SSF.format(cell.z || SSF._table[14], t); + break; + case 'e': continue; + } + o.push(oo.join(":")); + } + } + o.push("sheet:c:" + (r.e.c-r.s.c+1) + ":r:" + (r.e.r-r.s.r+1) + ":tvf:1"); + o.push("valueformat:1:text-wiki"); + //o.push("copiedfrom:" + ws['!ref']); // clipboard only + return o.join("\n"); + } + + function sheet_to_eth(ws/*:Worksheet*//*::, opts:?any*/)/*:string*/ { + return [header, sep, meta, sep, sheet_to_eth_data(ws), end].join("\n"); + // return ["version:1.5", sheet_to_eth_data(ws)].join("\n"); // clipboard form + } + + return { + to_workbook: eth_to_workbook, + to_sheet: eth_to_sheet, + from_sheet: sheet_to_eth + }; +})(); + +var PRN = (function() { + function set_text_arr(data/*:string*/, arr/*:AOA*/, R/*:number*/, C/*:number*/, o/*:any*/) { + if(o.raw) arr[R][C] = data; + else if(data === 'TRUE') arr[R][C] = true; + else if(data === 'FALSE') arr[R][C] = false; + else if(data === ""){/* empty */} + else if(!isNaN(fuzzynum(data))) arr[R][C] = fuzzynum(data); + else if(!isNaN(fuzzydate(data).getDate())) arr[R][C] = parseDate(data); + else arr[R][C] = data; + } + + function prn_to_aoa_str(f/*:string*/, opts)/*:AOA*/ { + var o = opts || {}; + var arr/*:AOA*/ = ([]/*:any*/); + if(!f || f.length === 0) return arr; + var lines = f.split(/[\r\n]/); + var L = lines.length - 1; + while(L >= 0 && lines[L].length === 0) --L; + var start = 10, idx = 0; + var R = 0; + for(; R <= L; ++R) { + idx = lines[R].indexOf(" "); + if(idx == -1) idx = lines[R].length; else idx++; + start = Math.max(start, idx); + } + for(R = 0; R <= L; ++R) { + arr[R] = []; + /* TODO: confirm that widths are always 10 */ + var C = 0; + set_text_arr(lines[R].slice(0, start).trim(), arr, R, C, o); + for(C = 1; C <= (lines[R].length - start)/10 + 1; ++C) + set_text_arr(lines[R].slice(start+(C-1)*10,start+C*10).trim(),arr,R,C,o); + } + if(o.sheetRows) arr = arr.slice(0, o.sheetRows); + return arr; + } + + // List of accepted CSV separators + var guess_seps = { + /*::[*/0x2C/*::]*/: ',', + /*::[*/0x09/*::]*/: "\t", + /*::[*/0x3B/*::]*/: ';' + }; + + // CSV separator weights to be used in case of equal numbers + var guess_sep_weights = { + /*::[*/0x2C/*::]*/: 3, + /*::[*/0x09/*::]*/: 2, + /*::[*/0x3B/*::]*/: 1 + }; + + function guess_sep(str) { + var cnt = {}, instr = false, end = 0, cc = 0; + for(;end < str.length;++end) { + if((cc=str.charCodeAt(end)) == 0x22) instr = !instr; + else if(!instr && cc in guess_seps) cnt[cc] = (cnt[cc]||0)+1; + } + + cc = []; + for(end in cnt) if ( Object.prototype.hasOwnProperty.call(cnt, end) ) { + cc.push([ cnt[end], end ]); + } + + if ( !cc.length ) { + cnt = guess_sep_weights; + for(end in cnt) if ( Object.prototype.hasOwnProperty.call(cnt, end) ) { + cc.push([ cnt[end], end ]); + } + } + + cc.sort(function(a, b) { return a[0] - b[0] || guess_sep_weights[a[1]] - guess_sep_weights[b[1]]; }); + + return guess_seps[cc.pop()[1]]; + } + + function dsv_to_sheet_str(str/*:string*/, opts)/*:Worksheet*/ { + var o = opts || {}; + var sep = ""; + if(DENSE != null && o.dense == null) o.dense = DENSE; + var ws/*:Worksheet*/ = o.dense ? ([]/*:any*/) : ({}/*:any*/); + var range/*:Range*/ = ({s: {c:0, r:0}, e: {c:0, r:0}}/*:any*/); + + if(str.slice(0,4) == "sep=" && str.charCodeAt(5) == 10) { sep = str.charAt(4); str = str.slice(6); } + else sep = guess_sep(str.slice(0,1024)); + var R = 0, C = 0, v = 0; + var start = 0, end = 0, sepcc = sep.charCodeAt(0), instr = false, cc=0; + str = str.replace(/\r\n/mg, "\n"); + var _re/*:?RegExp*/ = o.dateNF != null ? dateNF_regex(o.dateNF) : null; + function finish_cell() { + var s = str.slice(start, end); + var cell = ({}/*:any*/); + if(s.charAt(0) == '"' && s.charAt(s.length - 1) == '"') s = s.slice(1,-1).replace(/""/g,'"'); + if(s.length === 0) cell.t = 'z'; + else if(o.raw) { cell.t = 's'; cell.v = s; } + else if(s.trim().length === 0) { cell.t = 's'; cell.v = s; } + else if(s.charCodeAt(0) == 0x3D) { + if(s.charCodeAt(1) == 0x22 && s.charCodeAt(s.length - 1) == 0x22) { cell.t = 's'; cell.v = s.slice(2,-1).replace(/""/g,'"'); } + else if(fuzzyfmla(s)) { cell.t = 'n'; cell.f = s.slice(1); } + else { cell.t = 's'; cell.v = s; } } + else if(s == "TRUE") { cell.t = 'b'; cell.v = true; } + else if(s == "FALSE") { cell.t = 'b'; cell.v = false; } + else if(!isNaN(v = fuzzynum(s))) { cell.t = 'n'; if(o.cellText !== false) cell.w = s; cell.v = v; } + else if(!isNaN(fuzzydate(s).getDate()) || _re && s.match(_re)) { + cell.z = o.dateNF || SSF._table[14]; + var k = 0; + if(_re && s.match(_re)){ s=dateNF_fix(s, o.dateNF, (s.match(_re)||[])); k=1; } + if(o.cellDates) { cell.t = 'd'; cell.v = parseDate(s, k); } + else { cell.t = 'n'; cell.v = datenum(parseDate(s, k)); } + if(o.cellText !== false) cell.w = SSF.format(cell.z, cell.v instanceof Date ? datenum(cell.v):cell.v); + if(!o.cellNF) delete cell.z; + } else { + cell.t = 's'; + cell.v = s; + } + if(cell.t == 'z'){} + else if(o.dense) { if(!ws[R]) ws[R] = []; ws[R][C] = cell; } + else ws[encode_cell({c:C,r:R})] = cell; + start = end+1; + if(range.e.c < C) range.e.c = C; + if(range.e.r < R) range.e.r = R; + if(cc == sepcc) ++C; else { C = 0; ++R; if(o.sheetRows && o.sheetRows <= R) return true; } + } + outer: for(;end < str.length;++end) switch((cc=str.charCodeAt(end))) { + case 0x22: instr = !instr; break; + case sepcc: case 0x0a: case 0x0d: if(!instr && finish_cell()) break outer; break; + default: break; + } + if(end - start > 0) finish_cell(); + + ws['!ref'] = encode_range(range); + return ws; + } + + function prn_to_sheet_str(str/*:string*/, opts)/*:Worksheet*/ { + if(str.slice(0,4) == "sep=") return dsv_to_sheet_str(str, opts); + if(str.indexOf("\t") >= 0 || str.indexOf(",") >= 0 || str.indexOf(";") >= 0) return dsv_to_sheet_str(str, opts); + return aoa_to_sheet(prn_to_aoa_str(str, opts), opts); + } + + function prn_to_sheet(d/*:RawData*/, opts)/*:Worksheet*/ { + var str = "", bytes = opts.type == 'string' ? [0,0,0,0] : firstbyte(d, opts); + switch(opts.type) { + case 'base64': str = Base64.decode(d); break; + case 'binary': str = d; break; + case 'buffer': + if(opts.codepage == 65001) str = d.toString('utf8'); + else if(opts.codepage && typeof cptable !== 'undefined') str = cptable.utils.decode(opts.codepage, d); + else str = d.toString('binary'); + break; + case 'array': str = cc2str(d); break; + case 'string': str = d; break; + default: throw new Error("Unrecognized type " + opts.type); + } + if(bytes[0] == 0xEF && bytes[1] == 0xBB && bytes[2] == 0xBF) str = utf8read(str.slice(3)); + else if((opts.type == 'binary') && typeof cptable !== 'undefined' && opts.codepage) str = cptable.utils.decode(opts.codepage, cptable.utils.encode(1252,str)); + if(str.slice(0,19) == "socialcalc:version:") return ETH.to_sheet(opts.type == 'string' ? str : utf8read(str), opts); + return prn_to_sheet_str(str, opts); + } + + function prn_to_workbook(d/*:RawData*/, opts)/*:Workbook*/ { return sheet_to_workbook(prn_to_sheet(d, opts), opts); } + + function sheet_to_prn(ws/*:Worksheet*//*::, opts:?any*/)/*:string*/ { + var o/*:Array*/ = []; + var r = safe_decode_range(ws['!ref']), cell/*:Cell*/; + var dense = Array.isArray(ws); + for(var R = r.s.r; R <= r.e.r; ++R) { + var oo/*:Array*/ = []; + for(var C = r.s.c; C <= r.e.c; ++C) { + var coord = encode_cell({r:R,c:C}); + cell = dense ? (ws[R]||[])[C] : ws[coord]; + if(!cell || cell.v == null) { oo.push(" "); continue; } + var w = (cell.w || (format_cell(cell), cell.w) || "").slice(0,10); + while(w.length < 10) w += " "; + oo.push(w + (C === 0 ? " " : "")); + } + o.push(oo.join("")); + } + return o.join("\n"); + } + + return { + to_workbook: prn_to_workbook, + to_sheet: prn_to_sheet, + from_sheet: sheet_to_prn + }; +})(); + +/* Excel defaults to SYLK but warns if data is not valid */ +function read_wb_ID(d, opts) { + var o = opts || {}, OLD_WTF = !!o.WTF; o.WTF = true; + try { + var out = SYLK.to_workbook(d, o); + o.WTF = OLD_WTF; + return out; + } catch(e) { + o.WTF = OLD_WTF; + if(!e.message.match(/SYLK bad record ID/) && OLD_WTF) throw e; + return PRN.to_workbook(d, opts); + } +} + /* 18.4.7 rPr CT_RPrElt */ function parse_rpr(rpr) { var font = {}, m = rpr.match(tagregex), i = 0; diff --git a/xlsx.mini.js b/xlsx.mini.js index 680be2f..bf88a52 100644 --- a/xlsx.mini.js +++ b/xlsx.mini.js @@ -4561,6 +4561,939 @@ function write_cust_props(cp) { if(o.length>2){ o[o.length] = ''; o[1]=o[1].replace("/>",">"); } return o.join(""); } +/* from js-harb (C) 2014-present SheetJS */ +var DBF = (function() { +var dbf_codepage_map = { + /* Code Pages Supported by Visual FoxPro */ +0x01: 437, 0x02: 850, +0x03: 1252, 0x04: 10000, +0x64: 852, 0x65: 866, +0x66: 865, 0x67: 861, +0x68: 895, 0x69: 620, +0x6A: 737, 0x6B: 857, +0x78: 950, 0x79: 949, +0x7A: 936, 0x7B: 932, +0x7C: 874, 0x7D: 1255, +0x7E: 1256, 0x96: 10007, +0x97: 10029, 0x98: 10006, +0xC8: 1250, 0xC9: 1251, +0xCA: 1254, 0xCB: 1253, + + /* shapefile DBF extension */ +0x00: 20127, 0x08: 865, +0x09: 437, 0x0A: 850, +0x0B: 437, 0x0D: 437, +0x0E: 850, 0x0F: 437, +0x10: 850, 0x11: 437, +0x12: 850, 0x13: 932, +0x14: 850, 0x15: 437, +0x16: 850, 0x17: 865, +0x18: 437, 0x19: 437, +0x1A: 850, 0x1B: 437, +0x1C: 863, 0x1D: 850, +0x1F: 852, 0x22: 852, +0x23: 852, 0x24: 860, +0x25: 850, 0x26: 866, +0x37: 850, 0x40: 852, +0x4D: 936, 0x4E: 949, +0x4F: 950, 0x50: 874, +0x57: 1252, 0x58: 1252, +0x59: 1252, + +0xFF: 16969 +}; +var dbf_reverse_map = evert({ +0x01: 437, 0x02: 850, +0x03: 1252, 0x04: 10000, +0x64: 852, 0x65: 866, +0x66: 865, 0x67: 861, +0x68: 895, 0x69: 620, +0x6A: 737, 0x6B: 857, +0x78: 950, 0x79: 949, +0x7A: 936, 0x7B: 932, +0x7C: 874, 0x7D: 1255, +0x7E: 1256, 0x96: 10007, +0x97: 10029, 0x98: 10006, +0xC8: 1250, 0xC9: 1251, +0xCA: 1254, 0xCB: 1253, +0x00: 20127 +}); +/* TODO: find an actual specification */ +function dbf_to_aoa(buf, opts) { + var out = []; + /* TODO: browser based */ + var d = (new_raw_buf(1)); + switch(opts.type) { + case 'base64': d = s2a(Base64.decode(buf)); break; + case 'binary': d = s2a(buf); break; + case 'buffer': + case 'array': d = buf; break; + } + prep_blob(d, 0); + /* header */ + var ft = d.read_shift(1); + var memo = false; + var vfp = false, l7 = false; + switch(ft) { + case 0x02: case 0x03: break; + case 0x30: vfp = true; memo = true; break; + case 0x31: vfp = true; break; + case 0x83: memo = true; break; + case 0x8B: memo = true; break; + case 0x8C: memo = true; l7 = true; break; + case 0xF5: memo = true; break; + default: throw new Error("DBF Unsupported Version: " + ft.toString(16)); + } + var /*filedate = new Date(),*/ nrow = 0, fpos = 0; + if(ft == 0x02) nrow = d.read_shift(2); + /*filedate = new Date(d.read_shift(1) + 1900, d.read_shift(1) - 1, d.read_shift(1));*/d.l += 3; + if(ft != 0x02) nrow = d.read_shift(4); + if(ft != 0x02) fpos = d.read_shift(2); + var rlen = d.read_shift(2); + + var /*flags = 0,*/ current_cp = 1252; + if(ft != 0x02) { + d.l+=16; + /*flags = */d.read_shift(1); + //if(memo && ((flags & 0x02) === 0)) throw new Error("DBF Flags " + flags.toString(16) + " ft " + ft.toString(16)); + + /* codepage present in FoxPro */ + if(d[d.l] !== 0) current_cp = dbf_codepage_map[d[d.l]]; + d.l+=1; + + d.l+=2; + } + if(l7) d.l += 36; +var fields = [], field = ({}); + var hend = fpos - 10 - (vfp ? 264 : 0), ww = l7 ? 32 : 11; + while(ft == 0x02 ? d.l < d.length && d[d.l] != 0x0d: d.l < hend) { + field = ({}); + field.name = cptable.utils.decode(current_cp, d.slice(d.l, d.l+ww)).replace(/[\u0000\r\n].*$/g,""); + d.l += ww; + field.type = String.fromCharCode(d.read_shift(1)); + if(ft != 0x02 && !l7) field.offset = d.read_shift(4); + field.len = d.read_shift(1); + if(ft == 0x02) field.offset = d.read_shift(2); + field.dec = d.read_shift(1); + if(field.name.length) fields.push(field); + if(ft != 0x02) d.l += l7 ? 13 : 14; + switch(field.type) { + case 'B': // VFP Double + if((!vfp || field.len != 8) && opts.WTF) console.log('Skipping ' + field.name + ':' + field.type); + break; + case 'G': // General + case 'P': // Picture + if(opts.WTF) console.log('Skipping ' + field.name + ':' + field.type); + break; + case 'C': // character + case 'D': // date + case 'F': // floating point + case 'I': // long + case 'L': // boolean + case 'M': // memo + case 'N': // number + case 'O': // double + case 'T': // datetime + case 'Y': // currency + case '0': // VFP _NullFlags + case '@': // timestamp + case '+': // autoincrement + break; + default: throw new Error('Unknown Field Type: ' + field.type); + } + } + if(d[d.l] !== 0x0D) d.l = fpos-1; + else if(ft == 0x02) d.l = 0x209; + if(ft != 0x02) { + if(d.read_shift(1) !== 0x0D) throw new Error("DBF Terminator not found " + d.l + " " + d[d.l]); + d.l = fpos; + } + /* data */ + var R = 0, C = 0; + out[0] = []; + for(C = 0; C != fields.length; ++C) out[0][C] = fields[C].name; + while(nrow-- > 0) { + if(d[d.l] === 0x2A) { d.l+=rlen; continue; } + ++d.l; + out[++R] = []; C = 0; + for(C = 0; C != fields.length; ++C) { + var dd = d.slice(d.l, d.l+fields[C].len); d.l+=fields[C].len; + prep_blob(dd, 0); + var s = cptable.utils.decode(current_cp, dd); + switch(fields[C].type) { + case 'C': + out[R][C] = cptable.utils.decode(current_cp, dd); + out[R][C] = out[R][C].trim(); + break; + case 'D': + if(s.length === 8) out[R][C] = new Date(+s.slice(0,4), +s.slice(4,6)-1, +s.slice(6,8)); + else out[R][C] = s; + break; + case 'F': out[R][C] = parseFloat(s.trim()); break; + case '+': case 'I': out[R][C] = l7 ? dd.read_shift(-4, 'i') ^ 0x80000000 : dd.read_shift(4, 'i'); break; + case 'L': switch(s.toUpperCase()) { + case 'Y': case 'T': out[R][C] = true; break; + case 'N': case 'F': out[R][C] = false; break; + case ' ': case '?': out[R][C] = false; break; /* NOTE: technically uninitialized */ + default: throw new Error("DBF Unrecognized L:|" + s + "|"); + } break; + case 'M': /* TODO: handle memo files */ + if(!memo) throw new Error("DBF Unexpected MEMO for type " + ft.toString(16)); + out[R][C] = "##MEMO##" + (l7 ? parseInt(s.trim(), 10): dd.read_shift(4)); + break; + case 'N': out[R][C] = +s.replace(/\u0000/g,"").trim(); break; + case '@': out[R][C] = new Date(dd.read_shift(-8, 'f') - 0x388317533400); break; + case 'T': out[R][C] = new Date((dd.read_shift(4) - 0x253D8C) * 0x5265C00 + dd.read_shift(4)); break; + case 'Y': out[R][C] = dd.read_shift(4,'i')/1e4; break; + case 'O': out[R][C] = -dd.read_shift(-8, 'f'); break; + case 'B': if(vfp && fields[C].len == 8) { out[R][C] = dd.read_shift(8,'f'); break; } + /* falls through */ + case 'G': case 'P': dd.l += fields[C].len; break; + case '0': + if(fields[C].name === '_NullFlags') break; + /* falls through */ + default: throw new Error("DBF Unsupported data type " + fields[C].type); + } + } + } + if(ft != 0x02) if(d.l < d.length && d[d.l++] != 0x1A) throw new Error("DBF EOF Marker missing " + (d.l-1) + " of " + d.length + " " + d[d.l-1].toString(16)); + if(opts && opts.sheetRows) out = out.slice(0, opts.sheetRows); + return out; +} + +function dbf_to_sheet(buf, opts) { + var o = opts || {}; + if(!o.dateNF) o.dateNF = "yyyymmdd"; + return aoa_to_sheet(dbf_to_aoa(buf, o), o); +} + +function dbf_to_workbook(buf, opts) { + try { return sheet_to_workbook(dbf_to_sheet(buf, opts), opts); } + catch(e) { if(opts && opts.WTF) throw e; } + return ({SheetNames:[],Sheets:{}}); +} + +var _RLEN = { 'B': 8, 'C': 250, 'L': 1, 'D': 8, '?': 0, '': 0 }; +function sheet_to_dbf(ws, opts) { + var o = opts || {}; + if(+o.codepage >= 0) set_cp(+o.codepage); + if(o.type == "string") throw new Error("Cannot write DBF to JS string"); + var ba = buf_array(); + var aoa = sheet_to_json(ws, {header:1, raw:true, cellDates:true}); + var headers = aoa[0], data = aoa.slice(1); + var i = 0, j = 0, hcnt = 0, rlen = 1; + for(i = 0; i < headers.length; ++i) { + if(i == null) continue; + ++hcnt; + if(typeof headers[i] === 'number') headers[i] = headers[i].toString(10); + if(typeof headers[i] !== 'string') throw new Error("DBF Invalid column name " + headers[i] + " |" + (typeof headers[i]) + "|"); + if(headers.indexOf(headers[i]) !== i) for(j=0; j<1024;++j) + if(headers.indexOf(headers[i] + "_" + j) == -1) { headers[i] += "_" + j; break; } + } + var range = safe_decode_range(ws['!ref']); + var coltypes = []; + for(i = 0; i <= range.e.c - range.s.c; ++i) { + var col = []; + for(j=0; j < data.length; ++j) { + if(data[j][i] != null) col.push(data[j][i]); + } + if(col.length == 0 || headers[i] == null) { coltypes[i] = '?'; continue; } + var guess = '', _guess = ''; + for(j = 0; j < col.length; ++j) { + switch(typeof col[j]) { + /* TODO: check if L2 compat is desired */ + case 'number': _guess = 'B'; break; + case 'string': _guess = 'C'; break; + case 'boolean': _guess = 'L'; break; + case 'object': _guess = col[j] instanceof Date ? 'D' : 'C'; break; + default: _guess = 'C'; + } + guess = guess && guess != _guess ? 'C' : _guess; + if(guess == 'C') break; + } + rlen += _RLEN[guess] || 0; + coltypes[i] = guess; + } + + var h = ba.next(32); + h.write_shift(4, 0x13021130); + h.write_shift(4, data.length); + h.write_shift(2, 296 + 32 * hcnt); + h.write_shift(2, rlen); + for(i=0; i < 4; ++i) h.write_shift(4, 0); + h.write_shift(4, 0x00000000 | ((+dbf_reverse_map[current_ansi] || 0x03)<<8)); + + for(i = 0, j = 0; i < headers.length; ++i) { + if(headers[i] == null) continue; + var hf = ba.next(32); + var _f = (headers[i].slice(-10) + "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00").slice(0, 11); + hf.write_shift(1, _f, "sbcs"); + hf.write_shift(1, coltypes[i] == '?' ? 'C' : coltypes[i], "sbcs"); + hf.write_shift(4, j); + hf.write_shift(1, _RLEN[coltypes[i]] || 0); + hf.write_shift(1, 0); + hf.write_shift(1, 0x02); + hf.write_shift(4, 0); + hf.write_shift(1, 0); + hf.write_shift(4, 0); + hf.write_shift(4, 0); + j += _RLEN[coltypes[i]] || 0; + } + + var hb = ba.next(264); + hb.write_shift(4, 0x0000000D); + for(i=0; i < 65;++i) hb.write_shift(4, 0x00000000); + for(i=0; i < data.length; ++i) { + var rout = ba.next(rlen); + rout.write_shift(1, 0); + for(j=0; j":190, "?":191, "{":223 + }); + var sylk_char_regex = new RegExp("\u001BN(" + keys(sylk_escapes).join("|").replace(/\|\|\|/, "|\\||").replace(/([?()+])/g,"\\$1") + "|\\|)", "gm"); + var sylk_char_fn = function(_, $1){ var o = sylk_escapes[$1]; return typeof o == "number" ? _getansi(o) : o; }; + var decode_sylk_char = function($$, $1, $2) { var newcc = (($1.charCodeAt(0) - 0x20)<<4) | ($2.charCodeAt(0) - 0x30); return newcc == 59 ? $$ : _getansi(newcc); }; + sylk_escapes["|"] = 254; + /* TODO: find an actual specification */ + function sylk_to_aoa(d, opts) { + switch(opts.type) { + case 'base64': return sylk_to_aoa_str(Base64.decode(d), opts); + case 'binary': return sylk_to_aoa_str(d, opts); + case 'buffer': return sylk_to_aoa_str(d.toString('binary'), opts); + case 'array': return sylk_to_aoa_str(cc2str(d), opts); + } + throw new Error("Unrecognized type " + opts.type); + } + function sylk_to_aoa_str(str, opts) { + var records = str.split(/[\n\r]+/), R = -1, C = -1, ri = 0, rj = 0, arr = []; + var formats = []; + var next_cell_format = null; + var sht = {}, rowinfo = [], colinfo = [], cw = []; + var Mval = 0, j; + if(+opts.codepage >= 0) set_cp(+opts.codepage); + for (; ri !== records.length; ++ri) { + Mval = 0; + var rstr=records[ri].trim().replace(/\x1B([\x20-\x2F])([\x30-\x3F])/g, decode_sylk_char).replace(sylk_char_regex, sylk_char_fn); + var record=rstr.replace(/;;/g, "\u0000").split(";").map(function(x) { return x.replace(/\u0000/g, ";"); }); + var RT=record[0], val; + if(rstr.length > 0) switch(RT) { + case 'ID': break; /* header */ + case 'E': break; /* EOF */ + case 'B': break; /* dimensions */ + case 'O': break; /* options? */ + case 'P': + if(record[1].charAt(0) == 'P') + formats.push(rstr.slice(3).replace(/;;/g, ";")); + break; + case 'C': + var C_seen_K = false, C_seen_X = false; + for(rj=1; rj 0) { rowinfo[R].hpt = Mval; rowinfo[R].hpx = pt2px(Mval); } + else if(Mval === 0) rowinfo[R].hidden = true; + break; + default: if(opts && opts.WTF) throw new Error("SYLK bad record " + rstr); + } + if(F_seen < 1) next_cell_format = null; break; + default: if(opts && opts.WTF) throw new Error("SYLK bad record " + rstr); + } + } + if(rowinfo.length > 0) sht['!rows'] = rowinfo; + if(colinfo.length > 0) sht['!cols'] = colinfo; + if(opts && opts.sheetRows) arr = arr.slice(0, opts.sheetRows); + return [arr, sht]; + } + + function sylk_to_sheet(d, opts) { + var aoasht = sylk_to_aoa(d, opts); + var aoa = aoasht[0], ws = aoasht[1]; + var o = aoa_to_sheet(aoa, opts); + keys(ws).forEach(function(k) { o[k] = ws[k]; }); + return o; + } + + function sylk_to_workbook(d, opts) { return sheet_to_workbook(sylk_to_sheet(d, opts), opts); } + + function write_ws_cell_sylk(cell, ws, R, C) { + var o = "C;Y" + (R+1) + ";X" + (C+1) + ";K"; + switch(cell.t) { + case 'n': + o += (cell.v||0); + if(cell.f && !cell.F) o += ";E" + a1_to_rc(cell.f, {r:R, c:C}); break; + case 'b': o += cell.v ? "TRUE" : "FALSE"; break; + case 'e': o += cell.w || cell.v; break; + case 'd': o += '"' + (cell.w || cell.v) + '"'; break; + case 's': o += '"' + cell.v.replace(/"/g,"") + '"'; break; + } + return o; + } + + function write_ws_cols_sylk(out, cols) { + cols.forEach(function(col, i) { + var rec = "F;W" + (i+1) + " " + (i+1) + " "; + if(col.hidden) rec += "0"; + else { + if(typeof col.width == 'number') col.wpx = width2px(col.width); + if(typeof col.wpx == 'number') col.wch = px2char(col.wpx); + if(typeof col.wch == 'number') rec += Math.round(col.wch); + } + if(rec.charAt(rec.length - 1) != " ") out.push(rec); + }); + } + + function write_ws_rows_sylk(out, rows) { + rows.forEach(function(row, i) { + var rec = "F;"; + if(row.hidden) rec += "M0;"; + else if(row.hpt) rec += "M" + 20 * row.hpt + ";"; + else if(row.hpx) rec += "M" + 20 * px2pt(row.hpx) + ";"; + if(rec.length > 2) out.push(rec + "R" + (i+1)); + }); + } + + function sheet_to_sylk(ws, opts) { + var preamble = ["ID;PWXL;N;E"], o = []; + var r = safe_decode_range(ws['!ref']), cell; + var dense = Array.isArray(ws); + var RS = "\r\n"; + + preamble.push("P;PGeneral"); + preamble.push("F;P0;DG0G8;M255"); + if(ws['!cols']) write_ws_cols_sylk(preamble, ws['!cols']); + if(ws['!rows']) write_ws_rows_sylk(preamble, ws['!rows']); + + preamble.push("B;Y" + (r.e.r - r.s.r + 1) + ";X" + (r.e.c - r.s.c + 1) + ";D" + [r.s.c,r.s.r,r.e.c,r.e.r].join(" ")); + for(var R = r.s.r; R <= r.e.r; ++R) { + for(var C = r.s.c; C <= r.e.c; ++C) { + var coord = encode_cell({r:R,c:C}); + cell = dense ? (ws[R]||[])[C]: ws[coord]; + if(!cell || (cell.v == null && (!cell.f || cell.F))) continue; + o.push(write_ws_cell_sylk(cell, ws, R, C, opts)); + } + } + return preamble.join(RS) + RS + o.join(RS) + RS + "E" + RS; + } + + return { + to_workbook: sylk_to_workbook, + to_sheet: sylk_to_sheet, + from_sheet: sheet_to_sylk + }; +})(); + +var DIF = (function() { + function dif_to_aoa(d, opts) { + switch(opts.type) { + case 'base64': return dif_to_aoa_str(Base64.decode(d), opts); + case 'binary': return dif_to_aoa_str(d, opts); + case 'buffer': return dif_to_aoa_str(d.toString('binary'), opts); + case 'array': return dif_to_aoa_str(cc2str(d), opts); + } + throw new Error("Unrecognized type " + opts.type); + } + function dif_to_aoa_str(str, opts) { + var records = str.split('\n'), R = -1, C = -1, ri = 0, arr = []; + for (; ri !== records.length; ++ri) { + if (records[ri].trim() === 'BOT') { arr[++R] = []; C = 0; continue; } + if (R < 0) continue; + var metadata = records[ri].trim().split(","); + var type = metadata[0], value = metadata[1]; + ++ri; + var data = records[ri].trim(); + switch (+type) { + case -1: + if (data === 'BOT') { arr[++R] = []; C = 0; continue; } + else if (data !== 'EOD') throw new Error("Unrecognized DIF special command " + data); + break; + case 0: + if(data === 'TRUE') arr[R][C] = true; + else if(data === 'FALSE') arr[R][C] = false; + else if(!isNaN(fuzzynum(value))) arr[R][C] = fuzzynum(value); + else if(!isNaN(fuzzydate(value).getDate())) arr[R][C] = parseDate(value); + else arr[R][C] = value; + ++C; break; + case 1: + data = data.slice(1,data.length-1); + arr[R][C++] = data !== '' ? data : null; + break; + } + if (data === 'EOD') break; + } + if(opts && opts.sheetRows) arr = arr.slice(0, opts.sheetRows); + return arr; + } + + function dif_to_sheet(str, opts) { return aoa_to_sheet(dif_to_aoa(str, opts), opts); } + function dif_to_workbook(str, opts) { return sheet_to_workbook(dif_to_sheet(str, opts), opts); } + + var sheet_to_dif = (function() { + var push_field = function pf(o, topic, v, n, s) { + o.push(topic); + o.push(v + "," + n); + o.push('"' + s.replace(/"/g,'""') + '"'); + }; + var push_value = function po(o, type, v, s) { + o.push(type + "," + v); + o.push(type == 1 ? '"' + s.replace(/"/g,'""') + '"' : s); + }; + return function sheet_to_dif(ws) { + var o = []; + var r = safe_decode_range(ws['!ref']), cell; + var dense = Array.isArray(ws); + push_field(o, "TABLE", 0, 1, "sheetjs"); + push_field(o, "VECTORS", 0, r.e.r - r.s.r + 1,""); + push_field(o, "TUPLES", 0, r.e.c - r.s.c + 1,""); + push_field(o, "DATA", 0, 0,""); + for(var R = r.s.r; R <= r.e.r; ++R) { + push_value(o, -1, 0, "BOT"); + for(var C = r.s.c; C <= r.e.c; ++C) { + var coord = encode_cell({r:R,c:C}); + cell = dense ? (ws[R]||[])[C] : ws[coord]; + if(!cell) { push_value(o, 1, 0, ""); continue;} + switch(cell.t) { + case 'n': + var val = DIF_XL ? cell.w : cell.v; + if(!val && cell.v != null) val = cell.v; + if(val == null) { + if(DIF_XL && cell.f && !cell.F) push_value(o, 1, 0, "=" + cell.f); + else push_value(o, 1, 0, ""); + } + else push_value(o, 0, val, "V"); + break; + case 'b': + push_value(o, 0, cell.v ? 1 : 0, cell.v ? "TRUE" : "FALSE"); + break; + case 's': + push_value(o, 1, 0, (!DIF_XL || isNaN(cell.v)) ? cell.v : '="' + cell.v + '"'); + break; + case 'd': + if(!cell.w) cell.w = SSF.format(cell.z || SSF._table[14], datenum(parseDate(cell.v))); + if(DIF_XL) push_value(o, 0, cell.w, "V"); + else push_value(o, 1, 0, cell.w); + break; + default: push_value(o, 1, 0, ""); + } + } + } + push_value(o, -1, 0, "EOD"); + var RS = "\r\n"; + var oo = o.join(RS); + //while((oo.length & 0x7F) != 0) oo += "\0"; + return oo; + }; + })(); + return { + to_workbook: dif_to_workbook, + to_sheet: dif_to_sheet, + from_sheet: sheet_to_dif + }; +})(); + +var ETH = (function() { + function decode(s) { return s.replace(/\\b/g,"\\").replace(/\\c/g,":").replace(/\\n/g,"\n"); } + function encode(s) { return s.replace(/\\/g, "\\b").replace(/:/g, "\\c").replace(/\n/g,"\\n"); } + + function eth_to_aoa(str, opts) { + var records = str.split('\n'), R = -1, C = -1, ri = 0, arr = []; + for (; ri !== records.length; ++ri) { + var record = records[ri].trim().split(":"); + if(record[0] !== 'cell') continue; + var addr = decode_cell(record[1]); + if(arr.length <= addr.r) for(R = arr.length; R <= addr.r; ++R) if(!arr[R]) arr[R] = []; + R = addr.r; C = addr.c; + switch(record[2]) { + case 't': arr[R][C] = decode(record[3]); break; + case 'v': arr[R][C] = +record[3]; break; + case 'vtf': var _f = record[record.length - 1]; + /* falls through */ + case 'vtc': + switch(record[3]) { + case 'nl': arr[R][C] = +record[4] ? true : false; break; + default: arr[R][C] = +record[4]; break; + } + if(record[2] == 'vtf') arr[R][C] = [arr[R][C], _f]; + } + } + if(opts && opts.sheetRows) arr = arr.slice(0, opts.sheetRows); + return arr; + } + + function eth_to_sheet(d, opts) { return aoa_to_sheet(eth_to_aoa(d, opts), opts); } + function eth_to_workbook(d, opts) { return sheet_to_workbook(eth_to_sheet(d, opts), opts); } + + var header = [ + "socialcalc:version:1.5", + "MIME-Version: 1.0", + "Content-Type: multipart/mixed; boundary=SocialCalcSpreadsheetControlSave" + ].join("\n"); + + var sep = [ + "--SocialCalcSpreadsheetControlSave", + "Content-type: text/plain; charset=UTF-8" + ].join("\n") + "\n"; + + /* TODO: the other parts */ + var meta = [ + "# SocialCalc Spreadsheet Control Save", + "part:sheet" + ].join("\n"); + + var end = "--SocialCalcSpreadsheetControlSave--"; + + function sheet_to_eth_data(ws) { + if(!ws || !ws['!ref']) return ""; + var o = [], oo = [], cell, coord = ""; + var r = decode_range(ws['!ref']); + var dense = Array.isArray(ws); + for(var R = r.s.r; R <= r.e.r; ++R) { + for(var C = r.s.c; C <= r.e.c; ++C) { + coord = encode_cell({r:R,c:C}); + cell = dense ? (ws[R]||[])[C] : ws[coord]; + if(!cell || cell.v == null || cell.t === 'z') continue; + oo = ["cell", coord, 't']; + switch(cell.t) { + case 's': case 'str': oo.push(encode(cell.v)); break; + case 'n': + if(!cell.f) { oo[2]='v'; oo[3]=cell.v; } + else { oo[2]='vtf'; oo[3]='n'; oo[4]=cell.v; oo[5]=encode(cell.f); } + break; + case 'b': + oo[2] = 'vt'+(cell.f?'f':'c'); oo[3]='nl'; oo[4]=cell.v?"1":"0"; + oo[5] = encode(cell.f||(cell.v?'TRUE':'FALSE')); + break; + case 'd': + var t = datenum(parseDate(cell.v)); + oo[2] = 'vtc'; oo[3] = 'nd'; oo[4] = ""+t; + oo[5] = cell.w || SSF.format(cell.z || SSF._table[14], t); + break; + case 'e': continue; + } + o.push(oo.join(":")); + } + } + o.push("sheet:c:" + (r.e.c-r.s.c+1) + ":r:" + (r.e.r-r.s.r+1) + ":tvf:1"); + o.push("valueformat:1:text-wiki"); + //o.push("copiedfrom:" + ws['!ref']); // clipboard only + return o.join("\n"); + } + + function sheet_to_eth(ws) { + return [header, sep, meta, sep, sheet_to_eth_data(ws), end].join("\n"); + // return ["version:1.5", sheet_to_eth_data(ws)].join("\n"); // clipboard form + } + + return { + to_workbook: eth_to_workbook, + to_sheet: eth_to_sheet, + from_sheet: sheet_to_eth + }; +})(); + +var PRN = (function() { + function set_text_arr(data, arr, R, C, o) { + if(o.raw) arr[R][C] = data; + else if(data === 'TRUE') arr[R][C] = true; + else if(data === 'FALSE') arr[R][C] = false; + else if(data === ""){/* empty */} + else if(!isNaN(fuzzynum(data))) arr[R][C] = fuzzynum(data); + else if(!isNaN(fuzzydate(data).getDate())) arr[R][C] = parseDate(data); + else arr[R][C] = data; + } + + function prn_to_aoa_str(f, opts) { + var o = opts || {}; + var arr = ([]); + if(!f || f.length === 0) return arr; + var lines = f.split(/[\r\n]/); + var L = lines.length - 1; + while(L >= 0 && lines[L].length === 0) --L; + var start = 10, idx = 0; + var R = 0; + for(; R <= L; ++R) { + idx = lines[R].indexOf(" "); + if(idx == -1) idx = lines[R].length; else idx++; + start = Math.max(start, idx); + } + for(R = 0; R <= L; ++R) { + arr[R] = []; + /* TODO: confirm that widths are always 10 */ + var C = 0; + set_text_arr(lines[R].slice(0, start).trim(), arr, R, C, o); + for(C = 1; C <= (lines[R].length - start)/10 + 1; ++C) + set_text_arr(lines[R].slice(start+(C-1)*10,start+C*10).trim(),arr,R,C,o); + } + if(o.sheetRows) arr = arr.slice(0, o.sheetRows); + return arr; + } + + // List of accepted CSV separators + var guess_seps = { +0x2C: ',', +0x09: "\t", +0x3B: ';' + }; + + // CSV separator weights to be used in case of equal numbers + var guess_sep_weights = { +0x2C: 3, +0x09: 2, +0x3B: 1 + }; + + function guess_sep(str) { + var cnt = {}, instr = false, end = 0, cc = 0; + for(;end < str.length;++end) { + if((cc=str.charCodeAt(end)) == 0x22) instr = !instr; + else if(!instr && cc in guess_seps) cnt[cc] = (cnt[cc]||0)+1; + } + + cc = []; + for(end in cnt) if ( Object.prototype.hasOwnProperty.call(cnt, end) ) { + cc.push([ cnt[end], end ]); + } + + if ( !cc.length ) { + cnt = guess_sep_weights; + for(end in cnt) if ( Object.prototype.hasOwnProperty.call(cnt, end) ) { + cc.push([ cnt[end], end ]); + } + } + + cc.sort(function(a, b) { return a[0] - b[0] || guess_sep_weights[a[1]] - guess_sep_weights[b[1]]; }); + + return guess_seps[cc.pop()[1]]; + } + + function dsv_to_sheet_str(str, opts) { + var o = opts || {}; + var sep = ""; + if(DENSE != null && o.dense == null) o.dense = DENSE; + var ws = o.dense ? ([]) : ({}); + var range = ({s: {c:0, r:0}, e: {c:0, r:0}}); + + if(str.slice(0,4) == "sep=" && str.charCodeAt(5) == 10) { sep = str.charAt(4); str = str.slice(6); } + else sep = guess_sep(str.slice(0,1024)); + var R = 0, C = 0, v = 0; + var start = 0, end = 0, sepcc = sep.charCodeAt(0), instr = false, cc=0; + str = str.replace(/\r\n/mg, "\n"); + var _re = o.dateNF != null ? dateNF_regex(o.dateNF) : null; + function finish_cell() { + var s = str.slice(start, end); + var cell = ({}); + if(s.charAt(0) == '"' && s.charAt(s.length - 1) == '"') s = s.slice(1,-1).replace(/""/g,'"'); + if(s.length === 0) cell.t = 'z'; + else if(o.raw) { cell.t = 's'; cell.v = s; } + else if(s.trim().length === 0) { cell.t = 's'; cell.v = s; } + else if(s.charCodeAt(0) == 0x3D) { + if(s.charCodeAt(1) == 0x22 && s.charCodeAt(s.length - 1) == 0x22) { cell.t = 's'; cell.v = s.slice(2,-1).replace(/""/g,'"'); } + else if(fuzzyfmla(s)) { cell.t = 'n'; cell.f = s.slice(1); } + else { cell.t = 's'; cell.v = s; } } + else if(s == "TRUE") { cell.t = 'b'; cell.v = true; } + else if(s == "FALSE") { cell.t = 'b'; cell.v = false; } + else if(!isNaN(v = fuzzynum(s))) { cell.t = 'n'; if(o.cellText !== false) cell.w = s; cell.v = v; } + else if(!isNaN(fuzzydate(s).getDate()) || _re && s.match(_re)) { + cell.z = o.dateNF || SSF._table[14]; + var k = 0; + if(_re && s.match(_re)){ s=dateNF_fix(s, o.dateNF, (s.match(_re)||[])); k=1; } + if(o.cellDates) { cell.t = 'd'; cell.v = parseDate(s, k); } + else { cell.t = 'n'; cell.v = datenum(parseDate(s, k)); } + if(o.cellText !== false) cell.w = SSF.format(cell.z, cell.v instanceof Date ? datenum(cell.v):cell.v); + if(!o.cellNF) delete cell.z; + } else { + cell.t = 's'; + cell.v = s; + } + if(cell.t == 'z'){} + else if(o.dense) { if(!ws[R]) ws[R] = []; ws[R][C] = cell; } + else ws[encode_cell({c:C,r:R})] = cell; + start = end+1; + if(range.e.c < C) range.e.c = C; + if(range.e.r < R) range.e.r = R; + if(cc == sepcc) ++C; else { C = 0; ++R; if(o.sheetRows && o.sheetRows <= R) return true; } + } + outer: for(;end < str.length;++end) switch((cc=str.charCodeAt(end))) { + case 0x22: instr = !instr; break; + case sepcc: case 0x0a: case 0x0d: if(!instr && finish_cell()) break outer; break; + default: break; + } + if(end - start > 0) finish_cell(); + + ws['!ref'] = encode_range(range); + return ws; + } + + function prn_to_sheet_str(str, opts) { + if(str.slice(0,4) == "sep=") return dsv_to_sheet_str(str, opts); + if(str.indexOf("\t") >= 0 || str.indexOf(",") >= 0 || str.indexOf(";") >= 0) return dsv_to_sheet_str(str, opts); + return aoa_to_sheet(prn_to_aoa_str(str, opts), opts); + } + + function prn_to_sheet(d, opts) { + var str = "", bytes = opts.type == 'string' ? [0,0,0,0] : firstbyte(d, opts); + switch(opts.type) { + case 'base64': str = Base64.decode(d); break; + case 'binary': str = d; break; + case 'buffer': + if(opts.codepage == 65001) str = d.toString('utf8'); + else if(opts.codepage && typeof cptable !== 'undefined') str = cptable.utils.decode(opts.codepage, d); + else str = d.toString('binary'); + break; + case 'array': str = cc2str(d); break; + case 'string': str = d; break; + default: throw new Error("Unrecognized type " + opts.type); + } + if(bytes[0] == 0xEF && bytes[1] == 0xBB && bytes[2] == 0xBF) str = utf8read(str.slice(3)); + else if((opts.type == 'binary') && typeof cptable !== 'undefined' && opts.codepage) str = cptable.utils.decode(opts.codepage, cptable.utils.encode(1252,str)); + if(str.slice(0,19) == "socialcalc:version:") return ETH.to_sheet(opts.type == 'string' ? str : utf8read(str), opts); + return prn_to_sheet_str(str, opts); + } + + function prn_to_workbook(d, opts) { return sheet_to_workbook(prn_to_sheet(d, opts), opts); } + + function sheet_to_prn(ws) { + var o = []; + var r = safe_decode_range(ws['!ref']), cell; + var dense = Array.isArray(ws); + for(var R = r.s.r; R <= r.e.r; ++R) { + var oo = []; + for(var C = r.s.c; C <= r.e.c; ++C) { + var coord = encode_cell({r:R,c:C}); + cell = dense ? (ws[R]||[])[C] : ws[coord]; + if(!cell || cell.v == null) { oo.push(" "); continue; } + var w = (cell.w || (format_cell(cell), cell.w) || "").slice(0,10); + while(w.length < 10) w += " "; + oo.push(w + (C === 0 ? " " : "")); + } + o.push(oo.join("")); + } + return o.join("\n"); + } + + return { + to_workbook: prn_to_workbook, + to_sheet: prn_to_sheet, + from_sheet: sheet_to_prn + }; +})(); + +/* Excel defaults to SYLK but warns if data is not valid */ +function read_wb_ID(d, opts) { + var o = opts || {}, OLD_WTF = !!o.WTF; o.WTF = true; + try { + var out = SYLK.to_workbook(d, o); + o.WTF = OLD_WTF; + return out; + } catch(e) { + o.WTF = OLD_WTF; + if(!e.message.match(/SYLK bad record ID/) && OLD_WTF) throw e; + return PRN.to_workbook(d, opts); + } +} + /* 18.4.7 rPr CT_RPrElt */ function parse_rpr(rpr) { var font = {}, m = rpr.match(tagregex), i = 0;