266 function write_date(type, fmt, val, ss0) {  argument
267     var o="", ss=0, tt=0, y = val.y, out, outl = 0;
270             y = val.y + 543;
279             case 1: case 2: out = val.m; outl = fmt.length; break;
280             case 3: return months[val.m-1][1];
281             case 5: return months[val.m-1][0];
282             default: return months[val.m-1][2];
286             case 1: case 2: out = val.d; outl = fmt.length; break;
287             case 3: return days[val.q][0];
288             default: return days[val.q][1];
292             case 1: case 2: out = 1+(val.H+11)%12; outl = fmt.length; break;
297             case 1: case 2: out = val.H; outl = fmt.length; break;
302             case 1: case 2: out = val.M; outl = fmt.length; break;
306         if(val.u === 0) switch(fmt) {
307             case 's': case 'ss': return pad0(val.S, fmt.length);
314                 ss = Math.round((tt)*(val.S + val.u));
324             case '[h]': case '[hh]': out = val.D*24+val.H; break;
325             case '[m]': case '[mm]': out = (val.D*24+val.H)*60+val.M; break;
326 …      case '[s]': case '[ss]': out = ((val.D*24+val.H)*60+val.M)*60+Math.round(val.S+val.u); break;
343 function write_num_pct(type, fmt, val){  argument
345     return write_num(type, sfmt, val * Math.pow(10,2*mul)) + fill("%",mul);
347 function write_num_cm(type, fmt, val){  argument
350     return write_num(type, fmt.substr(0,idx), val / Math.pow(10,3*(fmt.length-idx)));
352 function write_num_exp(fmt, val){  argument
357         var ee = Math.floor(Math.log(Math.abs(val))*Math.LOG10E)%period;
359         o = (val/Math.pow(10,ee)).toPrecision(idx+1+(period+ee)%period);
361             var fakee = Math.floor(Math.log(Math.abs(val))*Math.LOG10E);
371     } else o = val.toExponential(idx);
398 function rnd(val, d) { var dd = Math.pow(10,d); return ""+(Math.round(val * dd)/dd); }
399 function dec(val, d) { return Math.round((val-Math.floor(val))*Math.pow(10,d)); }
400 function flr(val) { if(val < 2147483647 && val > -2147483648) return ""+(val >= 0 ? (val|0) : (val-…
401 function write_num_flt(type, fmt, val) {
404         if(val >= 0) return write_num_flt('n', ffmt, val);
405         return '(' + write_num_flt('n', ffmt, -val) + ')';
407     if(fmt.charCodeAt(fmt.length - 1) === 44) return write_num_cm(type, fmt, val);
408     if(fmt.indexOf('%') !== -1) return write_num_pct(type, fmt, val);
409     if(fmt.indexOf('E') !== -1) return write_num_exp(fmt, val);
410     if(fmt.charCodeAt(0) === 36) return "$"+write_num_flt(type,fmt.substr(fmt[1]==' '?2:1),val);
412     var r, ri, ff, aval = Math.abs(val), sign = val < 0 ? "-" : "";
415         o = pad0r(val,0); if(o === "0") o = "";
421 …o = rnd(val, r[1].length).replace(/^([^\.]+)$/,"$1."+r[1]).replace(/\.$/,"."+r[1]).replace(/\.(\d*…
430 …return val < 0 ? "-" + write_num_flt(type, fmt, -val) : commaify(""+(Math.floor(val))) + "." + pad…
432 …  if((r = fmt.match(/^#,#*,#0/)) !== null) return write_num_flt(type,fmt.replace(/^#,#*,/,""),val);
434         o = _strrev(write_num_flt(type, fmt.replace(/[\\-]/g,""), val));
439         o = write_num_flt(type, "##########", val);
461         o = pad0r(val, 0);
466         o = "" + val.toFixed(Math.min(r[2].length,10)).replace(/([^0])0+$/,"$1");
472         ri = dec(val, r[1].length);
473 …return val < 0 ? "-" + write_num_flt(type, fmt, -val) : commaify(flr(val)).replace(/^\d,\d{3}$/,"0…
481 function write_num_cm2(type, fmt, val){
484     return write_num(type, fmt.substr(0,idx), val / Math.pow(10,3*(fmt.length-idx)));
486 function write_num_pct2(type, fmt, val){
488     return write_num(type, sfmt, val * Math.pow(10,2*mul)) + fill("%",mul);
490 function write_num_exp2(fmt, val){
495         var ee = Math.floor(Math.log(Math.abs(val))*Math.LOG10E)%period;
497         o = (val/Math.pow(10,ee)).toPrecision(idx+1+(period+ee)%period);
499             var fakee = Math.floor(Math.log(Math.abs(val))*Math.LOG10E);
505     } else o = val.toExponential(idx);
510 function write_num_int(type, fmt, val) {
513         if(val >= 0) return write_num_int('n', ffmt, val);
514         return '(' + write_num_int('n', ffmt, -val) + ')';
516     if(fmt.charCodeAt(fmt.length - 1) === 44) return write_num_cm2(type, fmt, val);
517     if(fmt.indexOf('%') !== -1) return write_num_pct2(type, fmt, val);
518     if(fmt.indexOf('E') !== -1) return write_num_exp2(fmt, val);
519     if(fmt.charCodeAt(0) === 36) return "$"+write_num_int(type,fmt.substr(fmt[1]==' '?2:1),val);
521     var r, ri, ff, aval = Math.abs(val), sign = val < 0 ? "-" : "";
524         o = (""+val); if(val === 0) o = "";
530 …o = (""+val).replace(/^([^\.]+)$/,"$1."+r[1]).replace(/\.$/,"."+r[1]).replace(/\.(\d*)$/,function(…
539 …return val < 0 ? "-" + write_num_int(type, fmt, -val) : commaify((""+val)) + "." + fill('0',r[1].l…
541 …  if((r = fmt.match(/^#,#*,#0/)) !== null) return write_num_int(type,fmt.replace(/^#,#*,/,""),val);
543         o = _strrev(write_num_int(type, fmt.replace(/[\\-]/g,""), val));
548         o = write_num_int(type, "##########", val);
570         o = "" + val;
575         o = "" + val.toFixed(Math.min(r[2].length,10)).replace(/([^0])0+$/,"$1");
581 …return val < 0 ? "-" + write_num_int(type, fmt, -val) : commaify(""+val).replace(/^\d,\d{3}$/,"0$&…
589 return function write_num(type, fmt, val) {
590     return (val|0) === val ? write_num_int(type, fmt, val) : write_num_flt(type, fmt, val);
1641 function WriteShift(t, val, f) {  argument
1644         for(i = 0; i != val.length; ++i) this.writeUInt16LE(val.charCodeAt(i), this.l + 2 * i);
1645         size = 2 * val.length;
1647         case  1: size = 1; this[this.l] = val&255; break;
1648 …case  3: size = 3; this[this.l+2] = val & 255; val >>>= 8; this[this.l+1] = val&255; val >>>= 8; t…
1649         case  4: size = 4; this.writeUInt32LE(val, this.l); break;
1650         case  8: size = 8; if(f === 'f') { this.writeDoubleLE(val, this.l); break; }
1653         case -4: size = 4; this.writeInt32LE(val, this.l); break;
2761 function xlml_set_prop(Props, tag, val) {  argument
2766     Props[tag] = val;
2985                 var val;  variable
2988                     case 0x41 /*VT_BLOB*/: blob.l += 4; val = parse_BLOB(blob); break;
2989 …            case 0x1E /*VT_LPSTR*/: blob.l += 4; val = parse_VtString(blob, blob[blob.l-4]); break;
2990 …           case 0x1F /*VT_LPWSTR*/: blob.l += 4; val = parse_VtString(blob, blob[blob.l-4]); break;
2991                     case 0x03 /*VT_I4*/: blob.l += 4; val = blob.read_shift(4, 'i'); break;
2992                     case 0x13 /*VT_UI4*/: blob.l += 4; val = blob.read_shift(4); break;
2993                     case 0x05 /*VT_R8*/: blob.l += 4; val = blob.read_shift(8, 'f'); break;
2994                     case 0x0B /*VT_BOOL*/: blob.l += 4; val = parsebool(blob, 4); break;
2995 …               case 0x40 /*VT_FILETIME*/: blob.l += 4; val = new Date(parse_FILETIME(blob)); break;  variable
2998                 PropH[name] = val;
7337         var val = parsexmltag(data[i], true);
7338         if(!val.ref) return;
7339         var rel = rels ? rels['!id'][val.id] : null;
7341             val.Target = rel.Target;
7342             if(val.location) val.Target += "#"+val.location;
7343             val.Rel = rel;
7345             val.Target = val.location;
7346             rel = {Target: val.location, TargetMode: 'Internal'};
7347             val.Rel = rel;
7349         var rng = safe_decode_range(val.ref);
7353             s[addr].l = val;
7595 function write_BrtCellBlank(cell, val, o) {  argument
7597     return write_XLSBCell(val, o);
7722     recordhopper(data, function ws_parse(val, R) {  argument
7725             case 'BrtWsDim': ref = val; break;
7727                 row = val;
7742                 p = {t:val[2]};
7743                 switch(val[2]) {
7744                     case 'n': p.v = val[1]; break;
7745                     case 's': sstr = strs[val[1]]; p.v = sstr.t; p.r = sstr.r; break;
7746                     case 'b': p.v = val[1] ? true : false; break;
7747                     case 'e': p.v = val[1]; p.w = BErr[p.v]; break;
7748                     case 'str': p.t = 's'; p.v = utf8read(val[1]); break;
7750                 if(opts.cellFormula && val.length > 3) p.f = val[3];
7751                 if((cf = styles.CellXf[val[0].iStyleRef])) safe_format(p,cf.ifmt,null,opts);
7752                 s[encode_col(C=val[0].c) + rr] = p;
7761                 s[encode_col(C=val[0].c) + rr] = p;
7771             case 'BrtMergeCell': mergecells.push(val); break;
7774                 var rel = rels['!id'][val.relId];
7776                     val.Target = rel.Target;
7777                     if(val.loc) val.Target += "#"+val.loc;
7778                     val.Rel = rel;
7780                 for(R=val.rfx.s.r;R<=val.rfx.e.r;++R) for(C=val.rfx.s.c;C<=val.rfx.e.c;++C) {
7783                     s[addr].l = val;
8291     recordhopper(data, function hopper_wb(val, R) {  argument
8293             case 'BrtBundleSh': wb.Sheets.push(val); break;
8523 function xlml_set_custprop(Custprops, Rn, cp, val) {  argument
8525         case "boolean": val = parsexmlbool(val); break;
8526         case "i2": case "int": val = parseInt(val, 10); break;
8527         case "r4": case "float": val = parseFloat(val); break;
8528         case "date": case "dateTime.tz": val = new Date(val); break;
8532     Custprops[unescapexml(Rn[3])] = val;
9249 function make_cell(val, ixfe, t) {  argument
9250     return {v:val, ixfe:ixfe, t:t};
9348             var val;
9349             if(R.n === 'EOF') val = R.f(blob, length, opts);
9350             else val = slurp(R, blob, length, opts);
9359                 case 'Date1904': wb.opts.Date1904 = val; break;
9363                     opts.enc = val;
9364                     if(opts.WTF) console.error(val);
9366                     if(val.Type !== 0) throw new Error("Encryption scheme unsupported");
9367                     if(!val.valid) throw new Error("Password is incorrect");
9369                 case 'WriteAccess': opts.lastuser = val; break;
9373                     if(val === 0x5212) val = 1200;
9374                     else if(val === 0x8001) val = 1252;
9375                     opts.codepage = val;
9376                     set_cp(val);
9378                 case 'RRTabId': opts.rrtabid = val; break;
9379                 case 'WinProtect': opts.winlocked = val; break;
9381                 case 'RefreshAll': wb.opts.RefreshAll = val; break;
9385                     if(val[0] && val[1]) throw "Unsupported threads: " + val;
9387                 case 'CalcCount': wb.opts.CalcCount = val; break;
9388                 case 'CalcDelta': wb.opts.CalcDelta = val; break;
9389                 case 'CalcIter': wb.opts.CalcIter = val; break;
9390                 case 'CalcMode': wb.opts.CalcMode = val; break;
9391                 case 'CalcPrecision': wb.opts.CalcPrecision = val; break;
9392                 case 'CalcSaveRecalc': wb.opts.CalcSaveRecalc = val; break;
9393                 case 'CalcRefMode': opts.CalcRefMode = val; break; // TODO: implement R1C1
9395                 case 'ForceFullCalculation': wb.opts.FullCalc = val; break;
9397                 case 'XF': XFs.push(val); break;
9403                 case 'SupBook': supbooks[++sbc] = [val]; sbci = 0; break;
9404                 case 'ExternName': supbooks[sbc][++sbci] = val; break;
9406                 case 'Lbl': supbooks[0][++sbcli] = val; break;
9407 …          case 'ExternSheet': supbooks[sbc] = supbooks[sbc].concat(val); sbci += val.length; break;
9409                 case 'Protect': out["!protect"] = val; break; /* for sheet or book */
9410 …      case 'Password': if(val !== 0 && opts.WTF) console.error("Password verifier: " + val); break;
9414                     Directory[val.pos] = val;
9415                     opts.snames.push(val.name);
9434                     else if(val.BIFFVer === 0x0500) opts.biff = 5;
9435                     else if(val.BIFFVer === 0x0002) opts.biff = 2;
9436                     else if(val.BIFFVer === 0x0007) opts.biff = 2;
9449                     temp_val = {ixfe: val.ixfe, XF: XFs[val.ixfe], v:val.val, t:'n'};
9451                     addcell({c:val.c, r:val.r}, temp_val, options);
9454                     temp_val = {ixfe: val.ixfe, XF: XFs[val.ixfe], v:val.val, t:val.t};
9456                     addcell({c:val.c, r:val.r}, temp_val, options);
9459                     temp_val = {ixfe: val.ixfe, XF: XFs[val.ixfe], v:val.rknum, t:'n'};
9461                     addcell({c:val.c, r:val.r}, temp_val, options);
9464                     for(var j = val.c; j <= val.C; ++j) {
9465                         var ixfe = val.rkrec[j-val.c][0];
9466                         temp_val= {ixfe:ixfe, XF:XFs[ixfe], v:val.rkrec[j-val.c][1], t:'n'};
9468                         addcell({c:j, r:val.r}, temp_val, options);
9472                     switch(val.val) {
9473                         case 'String': last_formula = val; break;
9476                             temp_val = {v:val.val, ixfe:val.cell.ixfe, t:val.tt};
9478 …if(options.cellFormula) temp_val.f = "="+stringify_formula(val.formula,range,val.cell,supbooks, op…
9480                             addcell(val.cell, temp_val, options);
9481                             last_formula = val;
9486                         last_formula.val = val;
9487                         temp_val = {v:last_formula.val, ixfe:last_formula.cell.ixfe, t:'s'};
9496                     array_formulae.push(val);
9502                     shared_formulae[encode_cell(last_formula.cell)]= val[0];
9506                     temp_val=make_cell(sst[val.isst].t, val.ixfe, 's');
9509                     addcell({c:val.c, r:val.r}, temp_val, options);
9513                     temp_val=make_cell(val.val, val.ixfe, 's');
9516                     addcell({c:val.c, r:val.r}, temp_val, options);
9519                     if(file_depth === 1) range = val; /* TODO: stack */
9522                     sst = val;
9525                     SSF.load(val[1], val[0]);
9528                 case 'MergeCells': mergecells = mergecells.concat(val); break;
9530                 case 'Obj': objects[val.cmo[0]] = opts.lastobj = val; break;
9531                 case 'TxO': opts.lastobj.TxO = val; break;
9534                     for(rngR = val[0].s.r; rngR <= val[0].e.r; ++rngR)
9535                         for(rngC = val[0].s.c; rngC <= val[0].e.c; ++rngC)
9537                                 out[encode_cell({c:rngC,r:rngR})].l = val[1];
9540                     for(rngR = val[0].s.r; rngR <= val[0].e.r; ++rngR)
9541                         for(rngC = val[0].s.c; rngC <= val[0].e.c; ++rngC)
9543                                 out[encode_cell({c:rngC,r:rngR})].l.tooltip = val[1];
9549                     cc = out[encode_cell(val[0])];
9550                     var noteobj = objects[val[2]];
9553                     cmnt = {a:val[1],t:noteobj.TxO.t};
9559                 case 'XFExt': update_xfext(XFs[val.ixfe], val.ext); break;
9590                 case 'Country': country = val; break;
9598                 case 'Palette': palette = val; break; // TODO
11507     var val, row, range, header = 0, offset = 1, r, hdr = [], isempty, R, C, v;
11527         val = sheet[cols[C] + rr];
11533                 if(val === undefined) continue;
11534                 hdr[C] = format_cell(val);
11548             val = sheet[cols[C] + rr];
11549             if(val === undefined || val.t === undefined) continue;
11550             v = val.v;
11551             switch(val.t){
11555                 default: throw 'unrecognized type ' + val.t;
11558                 row[hdr[C]] = raw ? v : format_cell(val,v);
11578     var i = 0, cc = 0, val;
11585             val = sheet[cols[C] + rr];
11586             txt = val !== undefined ? ''+format_cell(val) : "";
11598     var cmds, y = "", x, val="";
11609             val = "";
11611             if(x.f != null) val = x.f;
11612             else if(x.w !== undefined) val = "'" + x.w;
11614             else val = ""+x.v;
11615             cmds[i++] = y + "=" + val;