12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856 |
- /*::
- declare var ReadShift:any;
- declare var CheckField:any;
- declare var prep_blob:any;
- declare var __readUInt32LE:any;
- declare var __readInt32LE:any;
- declare var __toBuffer:any;
- declare var __utf16le:any;
- declare var bconcat:any;
- declare var s2a:any;
- declare var chr0:any;
- declare var chr1:any;
- declare var has_buf:boolean;
- declare var new_buf:any;
- declare var new_raw_buf:any;
- declare var new_unsafe_buf:any;
- declare var Buffer_from:any;
- */
- /* cfb.js (C) 2013-present SheetJS -- http://sheetjs.com */
- /* vim: set ts=2: */
- /*jshint eqnull:true */
- /*exported CFB */
- /*global module, require:false, process:false, Buffer:false, Uint8Array:false, Uint16Array:false */
- /*::
- type SectorEntry = {
- name?:string;
- nodes?:Array<number>;
- data:RawBytes;
- };
- type SectorList = {
- [k:string|number]:SectorEntry;
- name:?string;
- fat_addrs:Array<number>;
- ssz:number;
- }
- type CFBFiles = {[n:string]:CFBEntry};
- */
- /*! crc32.js (C) 2014-present SheetJS -- http://sheetjs.com */
- /* vim: set ts=2: */
- /*exported CRC32 */
- var CRC32 = /*#__PURE__*/(function() {
- var CRC32 = {};
- CRC32.version = '1.2.1';
- /*::
- type ABuf = Array<number> | Buffer | Uint8Array;
- type CRC32TableType = Array<number> | Int32Array;
- */
- /*global Int32Array */
- function signed_crc_table()/*:CRC32TableType*/ {
- var c = 0, table/*:Array<number>*/ = new Array(256);
- for(var n =0; n != 256; ++n){
- c = n;
- c = ((c&1) ? (-306674912 ^ (c >>> 1)) : (c >>> 1));
- c = ((c&1) ? (-306674912 ^ (c >>> 1)) : (c >>> 1));
- c = ((c&1) ? (-306674912 ^ (c >>> 1)) : (c >>> 1));
- c = ((c&1) ? (-306674912 ^ (c >>> 1)) : (c >>> 1));
- c = ((c&1) ? (-306674912 ^ (c >>> 1)) : (c >>> 1));
- c = ((c&1) ? (-306674912 ^ (c >>> 1)) : (c >>> 1));
- c = ((c&1) ? (-306674912 ^ (c >>> 1)) : (c >>> 1));
- c = ((c&1) ? (-306674912 ^ (c >>> 1)) : (c >>> 1));
- table[n] = c;
- }
- return typeof Int32Array !== 'undefined' ? new Int32Array(table) : table;
- }
- var T0 = signed_crc_table();
- function slice_by_16_tables(T) {
- var c = 0, v = 0, n = 0, table/*:Array<number>*/ = typeof Int32Array !== 'undefined' ? new Int32Array(4096) : new Array(4096) ;
- for(n = 0; n != 256; ++n) table[n] = T[n];
- for(n = 0; n != 256; ++n) {
- v = T[n];
- for(c = 256 + n; c < 4096; c += 256) v = table[c] = (v >>> 8) ^ T[v & 0xFF];
- }
- var out = [];
- for(n = 1; n != 16; ++n) out[n - 1] = typeof Int32Array !== 'undefined' ? table.subarray(n * 256, n * 256 + 256) : table.slice(n * 256, n * 256 + 256);
- return out;
- }
- var TT = slice_by_16_tables(T0);
- var T1 = TT[0], T2 = TT[1], T3 = TT[2], T4 = TT[3], T5 = TT[4];
- var T6 = TT[5], T7 = TT[6], T8 = TT[7], T9 = TT[8], Ta = TT[9];
- var Tb = TT[10], Tc = TT[11], Td = TT[12], Te = TT[13], Tf = TT[14];
- function crc32_bstr(bstr/*:string*/, seed/*:?number*/)/*:number*/ {
- var C = seed/*:: ? 0 : 0 */ ^ -1;
- for(var i = 0, L = bstr.length; i < L;) C = (C>>>8) ^ T0[(C^bstr.charCodeAt(i++))&0xFF];
- return ~C;
- }
- function crc32_buf(B/*:ABuf*/, seed/*:?number*/)/*:number*/ {
- var C = seed/*:: ? 0 : 0 */ ^ -1, L = B.length - 15, i = 0;
- for(; i < L;) C =
- Tf[B[i++] ^ (C & 255)] ^
- Te[B[i++] ^ ((C >> 8) & 255)] ^
- Td[B[i++] ^ ((C >> 16) & 255)] ^
- Tc[B[i++] ^ (C >>> 24)] ^
- Tb[B[i++]] ^ Ta[B[i++]] ^ T9[B[i++]] ^ T8[B[i++]] ^
- T7[B[i++]] ^ T6[B[i++]] ^ T5[B[i++]] ^ T4[B[i++]] ^
- T3[B[i++]] ^ T2[B[i++]] ^ T1[B[i++]] ^ T0[B[i++]];
- L += 15;
- while(i < L) C = (C>>>8) ^ T0[(C^B[i++])&0xFF];
- return ~C;
- }
- function crc32_str(str/*:string*/, seed/*:?number*/)/*:number*/ {
- var C = seed/*:: ? 0 : 0 */ ^ -1;
- for(var i = 0, L = str.length, c = 0, d = 0; i < L;) {
- c = str.charCodeAt(i++);
- if(c < 0x80) {
- C = (C>>>8) ^ T0[(C^c)&0xFF];
- } else if(c < 0x800) {
- C = (C>>>8) ^ T0[(C ^ (192|((c>>6)&31)))&0xFF];
- C = (C>>>8) ^ T0[(C ^ (128|(c&63)))&0xFF];
- } else if(c >= 0xD800 && c < 0xE000) {
- c = (c&1023)+64; d = str.charCodeAt(i++)&1023;
- C = (C>>>8) ^ T0[(C ^ (240|((c>>8)&7)))&0xFF];
- C = (C>>>8) ^ T0[(C ^ (128|((c>>2)&63)))&0xFF];
- C = (C>>>8) ^ T0[(C ^ (128|((d>>6)&15)|((c&3)<<4)))&0xFF];
- C = (C>>>8) ^ T0[(C ^ (128|(d&63)))&0xFF];
- } else {
- C = (C>>>8) ^ T0[(C ^ (224|((c>>12)&15)))&0xFF];
- C = (C>>>8) ^ T0[(C ^ (128|((c>>6)&63)))&0xFF];
- C = (C>>>8) ^ T0[(C ^ (128|(c&63)))&0xFF];
- }
- }
- return ~C;
- }
- CRC32.table = T0;
- CRC32.bstr = crc32_bstr;
- CRC32.buf = crc32_buf;
- CRC32.str = crc32_str;
- return CRC32;
- })();
- /* [MS-CFB] v20171201 */
- var CFB = /*#__PURE__*/(function _CFB(){
- var exports/*:CFBModule*/ = /*::(*/{}/*:: :any)*/;
- exports.version = '1.2.2';
- /* [MS-CFB] 2.6.4 */
- function namecmp(l/*:string*/, r/*:string*/)/*:number*/ {
- var L = l.split("/"), R = r.split("/");
- for(var i = 0, c = 0, Z = Math.min(L.length, R.length); i < Z; ++i) {
- if((c = L[i].length - R[i].length)) return c;
- if(L[i] != R[i]) return L[i] < R[i] ? -1 : 1;
- }
- return L.length - R.length;
- }
- function dirname(p/*:string*/)/*:string*/ {
- if(p.charAt(p.length - 1) == "/") return (p.slice(0,-1).indexOf("/") === -1) ? p : dirname(p.slice(0, -1));
- var c = p.lastIndexOf("/");
- return (c === -1) ? p : p.slice(0, c+1);
- }
- function filename(p/*:string*/)/*:string*/ {
- if(p.charAt(p.length - 1) == "/") return filename(p.slice(0, -1));
- var c = p.lastIndexOf("/");
- return (c === -1) ? p : p.slice(c+1);
- }
- /* -------------------------------------------------------------------------- */
- /* DOS Date format:
- high|YYYYYYYm.mmmddddd.HHHHHMMM.MMMSSSSS|low
- add 1980 to stored year
- stored second should be doubled
- */
- /* write JS date to buf as a DOS date */
- function write_dos_date(buf/*:CFBlob*/, date/*:Date|string*/) {
- if(typeof date === "string") date = new Date(date);
- var hms/*:number*/ = date.getHours();
- hms = hms << 6 | date.getMinutes();
- hms = hms << 5 | (date.getSeconds()>>>1);
- buf.write_shift(2, hms);
- var ymd/*:number*/ = (date.getFullYear() - 1980);
- ymd = ymd << 4 | (date.getMonth()+1);
- ymd = ymd << 5 | date.getDate();
- buf.write_shift(2, ymd);
- }
- /* read four bytes from buf and interpret as a DOS date */
- function parse_dos_date(buf/*:CFBlob*/)/*:Date*/ {
- var hms = buf.read_shift(2) & 0xFFFF;
- var ymd = buf.read_shift(2) & 0xFFFF;
- var val = new Date();
- var d = ymd & 0x1F; ymd >>>= 5;
- var m = ymd & 0x0F; ymd >>>= 4;
- val.setMilliseconds(0);
- val.setFullYear(ymd + 1980);
- val.setMonth(m-1);
- val.setDate(d);
- var S = hms & 0x1F; hms >>>= 5;
- var M = hms & 0x3F; hms >>>= 6;
- val.setHours(hms);
- val.setMinutes(M);
- val.setSeconds(S<<1);
- return val;
- }
- function parse_extra_field(blob/*:CFBlob*/)/*:any*/ {
- prep_blob(blob, 0);
- var o = /*::(*/{}/*:: :any)*/;
- var flags = 0;
- while(blob.l <= blob.length - 4) {
- var type = blob.read_shift(2);
- var sz = blob.read_shift(2), tgt = blob.l + sz;
- var p = {};
- switch(type) {
- /* UNIX-style Timestamps */
- case 0x5455: {
- flags = blob.read_shift(1);
- if(flags & 1) p.mtime = blob.read_shift(4);
- /* for some reason, CD flag corresponds to LFH */
- if(sz > 5) {
- if(flags & 2) p.atime = blob.read_shift(4);
- if(flags & 4) p.ctime = blob.read_shift(4);
- }
- if(p.mtime) p.mt = new Date(p.mtime*1000);
- }
- break;
- }
- blob.l = tgt;
- o[type] = p;
- }
- return o;
- }
- var fs/*:: = require('fs'); */;
- function get_fs() { return fs || (fs = require('fs')); }
- function parse(file/*:RawBytes*/, options/*:CFBReadOpts*/)/*:CFBContainer*/ {
- if(file[0] == 0x50 && file[1] == 0x4b) return parse_zip(file, options);
- if((file[0] | 0x20) == 0x6d && (file[1]|0x20) == 0x69) return parse_mad(file, options);
- if(file.length < 512) throw new Error("CFB file size " + file.length + " < 512");
- var mver = 3;
- var ssz = 512;
- var nmfs = 0; // number of mini FAT sectors
- var difat_sec_cnt = 0;
- var dir_start = 0;
- var minifat_start = 0;
- var difat_start = 0;
- var fat_addrs/*:Array<number>*/ = []; // locations of FAT sectors
- /* [MS-CFB] 2.2 Compound File Header */
- var blob/*:CFBlob*/ = /*::(*/file.slice(0,512)/*:: :any)*/;
- prep_blob(blob, 0);
- /* major version */
- var mv = check_get_mver(blob);
- mver = mv[0];
- switch(mver) {
- case 3: ssz = 512; break; case 4: ssz = 4096; break;
- case 0: if(mv[1] == 0) return parse_zip(file, options);
- /* falls through */
- default: throw new Error("Major Version: Expected 3 or 4 saw " + mver);
- }
- /* reprocess header */
- if(ssz !== 512) { blob = /*::(*/file.slice(0,ssz)/*:: :any)*/; prep_blob(blob, 28 /* blob.l */); }
- /* Save header for final object */
- var header/*:RawBytes*/ = file.slice(0,ssz);
- check_shifts(blob, mver);
- // Number of Directory Sectors
- var dir_cnt/*:number*/ = blob.read_shift(4, 'i');
- if(mver === 3 && dir_cnt !== 0) throw new Error('# Directory Sectors: Expected 0 saw ' + dir_cnt);
- // Number of FAT Sectors
- blob.l += 4;
- // First Directory Sector Location
- dir_start = blob.read_shift(4, 'i');
- // Transaction Signature
- blob.l += 4;
- // Mini Stream Cutoff Size
- blob.chk('00100000', 'Mini Stream Cutoff Size: ');
- // First Mini FAT Sector Location
- minifat_start = blob.read_shift(4, 'i');
- // Number of Mini FAT Sectors
- nmfs = blob.read_shift(4, 'i');
- // First DIFAT sector location
- difat_start = blob.read_shift(4, 'i');
- // Number of DIFAT Sectors
- difat_sec_cnt = blob.read_shift(4, 'i');
- // Grab FAT Sector Locations
- for(var q = -1, j = 0; j < 109; ++j) { /* 109 = (512 - blob.l)>>>2; */
- q = blob.read_shift(4, 'i');
- if(q<0) break;
- fat_addrs[j] = q;
- }
- /** Break the file up into sectors */
- var sectors/*:Array<RawBytes>*/ = sectorify(file, ssz);
- sleuth_fat(difat_start, difat_sec_cnt, sectors, ssz, fat_addrs);
- /** Chains */
- var sector_list/*:SectorList*/ = make_sector_list(sectors, dir_start, fat_addrs, ssz);
- sector_list[dir_start].name = "!Directory";
- if(nmfs > 0 && minifat_start !== ENDOFCHAIN) sector_list[minifat_start].name = "!MiniFAT";
- sector_list[fat_addrs[0]].name = "!FAT";
- sector_list.fat_addrs = fat_addrs;
- sector_list.ssz = ssz;
- /* [MS-CFB] 2.6.1 Compound File Directory Entry */
- var files/*:CFBFiles*/ = {}, Paths/*:Array<string>*/ = [], FileIndex/*:CFBFileIndex*/ = [], FullPaths/*:Array<string>*/ = [];
- read_directory(dir_start, sector_list, sectors, Paths, nmfs, files, FileIndex, minifat_start);
- build_full_paths(FileIndex, FullPaths, Paths);
- Paths.shift();
- var o = {
- FileIndex: FileIndex,
- FullPaths: FullPaths
- };
- // $FlowIgnore
- if(options && options.raw) o.raw = {header: header, sectors: sectors};
- return o;
- } // parse
- /* [MS-CFB] 2.2 Compound File Header -- read up to major version */
- function check_get_mver(blob/*:CFBlob*/)/*:[number, number]*/ {
- if(blob[blob.l] == 0x50 && blob[blob.l + 1] == 0x4b) return [0, 0];
- // header signature 8
- blob.chk(HEADER_SIGNATURE, 'Header Signature: ');
- // clsid 16
- //blob.chk(HEADER_CLSID, 'CLSID: ');
- blob.l += 16;
- // minor version 2
- var mver/*:number*/ = blob.read_shift(2, 'u');
- return [blob.read_shift(2,'u'), mver];
- }
- function check_shifts(blob/*:CFBlob*/, mver/*:number*/)/*:void*/ {
- var shift = 0x09;
- // Byte Order
- //blob.chk('feff', 'Byte Order: '); // note: some writers put 0xffff
- blob.l += 2;
- // Sector Shift
- switch((shift = blob.read_shift(2))) {
- case 0x09: if(mver != 3) throw new Error('Sector Shift: Expected 9 saw ' + shift); break;
- case 0x0c: if(mver != 4) throw new Error('Sector Shift: Expected 12 saw ' + shift); break;
- default: throw new Error('Sector Shift: Expected 9 or 12 saw ' + shift);
- }
- // Mini Sector Shift
- blob.chk('0600', 'Mini Sector Shift: ');
- // Reserved
- blob.chk('000000000000', 'Reserved: ');
- }
- /** Break the file up into sectors */
- function sectorify(file/*:RawBytes*/, ssz/*:number*/)/*:Array<RawBytes>*/ {
- var nsectors = Math.ceil(file.length/ssz)-1;
- var sectors/*:Array<RawBytes>*/ = [];
- for(var i=1; i < nsectors; ++i) sectors[i-1] = file.slice(i*ssz,(i+1)*ssz);
- sectors[nsectors-1] = file.slice(nsectors*ssz);
- return sectors;
- }
- /* [MS-CFB] 2.6.4 Red-Black Tree */
- function build_full_paths(FI/*:CFBFileIndex*/, FP/*:Array<string>*/, Paths/*:Array<string>*/)/*:void*/ {
- var i = 0, L = 0, R = 0, C = 0, j = 0, pl = Paths.length;
- var dad/*:Array<number>*/ = [], q/*:Array<number>*/ = [];
- for(; i < pl; ++i) { dad[i]=q[i]=i; FP[i]=Paths[i]; }
- for(; j < q.length; ++j) {
- i = q[j];
- L = FI[i].L; R = FI[i].R; C = FI[i].C;
- if(dad[i] === i) {
- if(L !== -1 /*NOSTREAM*/ && dad[L] !== L) dad[i] = dad[L];
- if(R !== -1 && dad[R] !== R) dad[i] = dad[R];
- }
- if(C !== -1 /*NOSTREAM*/) dad[C] = i;
- if(L !== -1 && i != dad[i]) { dad[L] = dad[i]; if(q.lastIndexOf(L) < j) q.push(L); }
- if(R !== -1 && i != dad[i]) { dad[R] = dad[i]; if(q.lastIndexOf(R) < j) q.push(R); }
- }
- for(i=1; i < pl; ++i) if(dad[i] === i) {
- if(R !== -1 /*NOSTREAM*/ && dad[R] !== R) dad[i] = dad[R];
- else if(L !== -1 && dad[L] !== L) dad[i] = dad[L];
- }
- for(i=1; i < pl; ++i) {
- if(FI[i].type === 0 /* unknown */) continue;
- j = i;
- if(j != dad[j]) do {
- j = dad[j];
- FP[i] = FP[j] + "/" + FP[i];
- } while (j !== 0 && -1 !== dad[j] && j != dad[j]);
- dad[i] = -1;
- }
- FP[0] += "/";
- for(i=1; i < pl; ++i) {
- if(FI[i].type !== 2 /* stream */) FP[i] += "/";
- }
- }
- function get_mfat_entry(entry/*:CFBEntry*/, payload/*:RawBytes*/, mini/*:?RawBytes*/)/*:CFBlob*/ {
- var start = entry.start, size = entry.size;
- //return (payload.slice(start*MSSZ, start*MSSZ + size)/*:any*/);
- var o = [];
- var idx = start;
- while(mini && size > 0 && idx >= 0) {
- o.push(payload.slice(idx * MSSZ, idx * MSSZ + MSSZ));
- size -= MSSZ;
- idx = __readInt32LE(mini, idx * 4);
- }
- if(o.length === 0) return (new_buf(0)/*:any*/);
- return (bconcat(o).slice(0, entry.size)/*:any*/);
- }
- /** Chase down the rest of the DIFAT chain to build a comprehensive list
- DIFAT chains by storing the next sector number as the last 32 bits */
- function sleuth_fat(idx/*:number*/, cnt/*:number*/, sectors/*:Array<RawBytes>*/, ssz/*:number*/, fat_addrs)/*:void*/ {
- var q/*:number*/ = ENDOFCHAIN;
- if(idx === ENDOFCHAIN) {
- if(cnt !== 0) throw new Error("DIFAT chain shorter than expected");
- } else if(idx !== -1 /*FREESECT*/) {
- var sector = sectors[idx], m = (ssz>>>2)-1;
- if(!sector) return;
- for(var i = 0; i < m; ++i) {
- if((q = __readInt32LE(sector,i*4)) === ENDOFCHAIN) break;
- fat_addrs.push(q);
- }
- if(cnt >= 1) sleuth_fat(__readInt32LE(sector,ssz-4),cnt - 1, sectors, ssz, fat_addrs);
- }
- }
- /** Follow the linked list of sectors for a given starting point */
- function get_sector_list(sectors/*:Array<RawBytes>*/, start/*:number*/, fat_addrs/*:Array<number>*/, ssz/*:number*/, chkd/*:?Array<boolean>*/)/*:SectorEntry*/ {
- var buf/*:Array<number>*/ = [], buf_chain/*:Array<any>*/ = [];
- if(!chkd) chkd = [];
- var modulus = ssz - 1, j = 0, jj = 0;
- for(j=start; j>=0;) {
- chkd[j] = true;
- buf[buf.length] = j;
- buf_chain.push(sectors[j]);
- var addr = fat_addrs[Math.floor(j*4/ssz)];
- jj = ((j*4) & modulus);
- if(ssz < 4 + jj) throw new Error("FAT boundary crossed: " + j + " 4 "+ssz);
- if(!sectors[addr]) break;
- j = __readInt32LE(sectors[addr], jj);
- }
- return {nodes: buf, data:__toBuffer([buf_chain])};
- }
- /** Chase down the sector linked lists */
- function make_sector_list(sectors/*:Array<RawBytes>*/, dir_start/*:number*/, fat_addrs/*:Array<number>*/, ssz/*:number*/)/*:SectorList*/ {
- var sl = sectors.length, sector_list/*:SectorList*/ = ([]/*:any*/);
- var chkd/*:Array<boolean>*/ = [], buf/*:Array<number>*/ = [], buf_chain/*:Array<RawBytes>*/ = [];
- var modulus = ssz - 1, i=0, j=0, k=0, jj=0;
- for(i=0; i < sl; ++i) {
- buf = ([]/*:Array<number>*/);
- k = (i + dir_start); if(k >= sl) k-=sl;
- if(chkd[k]) continue;
- buf_chain = [];
- var seen = [];
- for(j=k; j>=0;) {
- seen[j] = true;
- chkd[j] = true;
- buf[buf.length] = j;
- buf_chain.push(sectors[j]);
- var addr/*:number*/ = fat_addrs[Math.floor(j*4/ssz)];
- jj = ((j*4) & modulus);
- if(ssz < 4 + jj) throw new Error("FAT boundary crossed: " + j + " 4 "+ssz);
- if(!sectors[addr]) break;
- j = __readInt32LE(sectors[addr], jj);
- if(seen[j]) break;
- }
- sector_list[k] = ({nodes: buf, data:__toBuffer([buf_chain])}/*:SectorEntry*/);
- }
- return sector_list;
- }
- /* [MS-CFB] 2.6.1 Compound File Directory Entry */
- function read_directory(dir_start/*:number*/, sector_list/*:SectorList*/, sectors/*:Array<RawBytes>*/, Paths/*:Array<string>*/, nmfs, files, FileIndex, mini) {
- var minifat_store = 0, pl = (Paths.length?2:0);
- var sector = sector_list[dir_start].data;
- var i = 0, namelen = 0, name;
- for(; i < sector.length; i+= 128) {
- var blob/*:CFBlob*/ = /*::(*/sector.slice(i, i+128)/*:: :any)*/;
- prep_blob(blob, 64);
- namelen = blob.read_shift(2);
- name = __utf16le(blob,0,namelen-pl);
- Paths.push(name);
- var o/*:CFBEntry*/ = ({
- name: name,
- type: blob.read_shift(1),
- color: blob.read_shift(1),
- L: blob.read_shift(4, 'i'),
- R: blob.read_shift(4, 'i'),
- C: blob.read_shift(4, 'i'),
- clsid: blob.read_shift(16),
- state: blob.read_shift(4, 'i'),
- start: 0,
- size: 0
- });
- var ctime/*:number*/ = blob.read_shift(2) + blob.read_shift(2) + blob.read_shift(2) + blob.read_shift(2);
- if(ctime !== 0) o.ct = read_date(blob, blob.l-8);
- var mtime/*:number*/ = blob.read_shift(2) + blob.read_shift(2) + blob.read_shift(2) + blob.read_shift(2);
- if(mtime !== 0) o.mt = read_date(blob, blob.l-8);
- o.start = blob.read_shift(4, 'i');
- o.size = blob.read_shift(4, 'i');
- if(o.size < 0 && o.start < 0) { o.size = o.type = 0; o.start = ENDOFCHAIN; o.name = ""; }
- if(o.type === 5) { /* root */
- minifat_store = o.start;
- if(nmfs > 0 && minifat_store !== ENDOFCHAIN) sector_list[minifat_store].name = "!StreamData";
- /*minifat_size = o.size;*/
- } else if(o.size >= 4096 /* MSCSZ */) {
- o.storage = 'fat';
- if(sector_list[o.start] === undefined) sector_list[o.start] = get_sector_list(sectors, o.start, sector_list.fat_addrs, sector_list.ssz);
- sector_list[o.start].name = o.name;
- o.content = (sector_list[o.start].data.slice(0,o.size)/*:any*/);
- } else {
- o.storage = 'minifat';
- if(o.size < 0) o.size = 0;
- else if(minifat_store !== ENDOFCHAIN && o.start !== ENDOFCHAIN && sector_list[minifat_store]) {
- o.content = get_mfat_entry(o, sector_list[minifat_store].data, (sector_list[mini]||{}).data);
- }
- }
- if(o.content) prep_blob(o.content, 0);
- files[name] = o;
- FileIndex.push(o);
- }
- }
- function read_date(blob/*:RawBytes|CFBlob*/, offset/*:number*/)/*:Date*/ {
- return new Date(( ( (__readUInt32LE(blob,offset+4)/1e7)*Math.pow(2,32)+__readUInt32LE(blob,offset)/1e7 ) - 11644473600)*1000);
- }
- function read_file(filename/*:string*/, options/*:CFBReadOpts*/) {
- get_fs();
- return parse(fs.readFileSync(filename), options);
- }
- function read(blob/*:RawBytes|string*/, options/*:CFBReadOpts*/) {
- var type = options && options.type;
- if(!type) {
- if(has_buf && Buffer.isBuffer(blob)) type = "buffer";
- }
- switch(type || "base64") {
- case "file": /*:: if(typeof blob !== 'string') throw "Must pass a filename when type='file'"; */return read_file(blob, options);
- case "base64": /*:: if(typeof blob !== 'string') throw "Must pass a base64-encoded binary string when type='file'"; */return parse(s2a(Base64_decode(blob)), options);
- case "binary": /*:: if(typeof blob !== 'string') throw "Must pass a binary string when type='file'"; */return parse(s2a(blob), options);
- }
- return parse(/*::typeof blob == 'string' ? new Buffer(blob, 'utf-8') : */blob, options);
- }
- function init_cfb(cfb/*:CFBContainer*/, opts/*:?any*/)/*:void*/ {
- var o = opts || {}, root = o.root || "Root Entry";
- if(!cfb.FullPaths) cfb.FullPaths = [];
- if(!cfb.FileIndex) cfb.FileIndex = [];
- if(cfb.FullPaths.length !== cfb.FileIndex.length) throw new Error("inconsistent CFB structure");
- if(cfb.FullPaths.length === 0) {
- cfb.FullPaths[0] = root + "/";
- cfb.FileIndex[0] = ({ name: root, type: 5 }/*:any*/);
- }
- if(o.CLSID) cfb.FileIndex[0].clsid = o.CLSID;
- seed_cfb(cfb);
- }
- function seed_cfb(cfb/*:CFBContainer*/)/*:void*/ {
- var nm = "\u0001Sh33tJ5";
- if(CFB.find(cfb, "/" + nm)) return;
- var p = new_buf(4); p[0] = 55; p[1] = p[3] = 50; p[2] = 54;
- cfb.FileIndex.push(({ name: nm, type: 2, content:p, size:4, L:69, R:69, C:69 }/*:any*/));
- cfb.FullPaths.push(cfb.FullPaths[0] + nm);
- rebuild_cfb(cfb);
- }
- function rebuild_cfb(cfb/*:CFBContainer*/, f/*:?boolean*/)/*:void*/ {
- init_cfb(cfb);
- var gc = false, s = false;
- for(var i = cfb.FullPaths.length - 1; i >= 0; --i) {
- var _file = cfb.FileIndex[i];
- switch(_file.type) {
- case 0:
- if(s) gc = true;
- else { cfb.FileIndex.pop(); cfb.FullPaths.pop(); }
- break;
- case 1: case 2: case 5:
- s = true;
- if(isNaN(_file.R * _file.L * _file.C)) gc = true;
- if(_file.R > -1 && _file.L > -1 && _file.R == _file.L) gc = true;
- break;
- default: gc = true; break;
- }
- }
- if(!gc && !f) return;
- var now = new Date(1987, 1, 19), j = 0;
- // Track which names exist
- var fullPaths = Object.create ? Object.create(null) : {};
- var data/*:Array<[string, CFBEntry]>*/ = [];
- for(i = 0; i < cfb.FullPaths.length; ++i) {
- fullPaths[cfb.FullPaths[i]] = true;
- if(cfb.FileIndex[i].type === 0) continue;
- data.push([cfb.FullPaths[i], cfb.FileIndex[i]]);
- }
- for(i = 0; i < data.length; ++i) {
- var dad = dirname(data[i][0]);
- s = fullPaths[dad];
- while(!s) {
- while(dirname(dad) && !fullPaths[dirname(dad)]) dad = dirname(dad);
- data.push([dad, ({
- name: filename(dad).replace("/",""),
- type: 1,
- clsid: HEADER_CLSID,
- ct: now, mt: now,
- content: null
- }/*:any*/)]);
- // Add name to set
- fullPaths[dad] = true;
- dad = dirname(data[i][0]);
- s = fullPaths[dad];
- }
- }
- data.sort(function(x,y) { return namecmp(x[0], y[0]); });
- cfb.FullPaths = []; cfb.FileIndex = [];
- for(i = 0; i < data.length; ++i) { cfb.FullPaths[i] = data[i][0]; cfb.FileIndex[i] = data[i][1]; }
- for(i = 0; i < data.length; ++i) {
- var elt = cfb.FileIndex[i];
- var nm = cfb.FullPaths[i];
- elt.name = filename(nm).replace("/","");
- elt.L = elt.R = elt.C = -(elt.color = 1);
- elt.size = elt.content ? elt.content.length : 0;
- elt.start = 0;
- elt.clsid = (elt.clsid || HEADER_CLSID);
- if(i === 0) {
- elt.C = data.length > 1 ? 1 : -1;
- elt.size = 0;
- elt.type = 5;
- } else if(nm.slice(-1) == "/") {
- for(j=i+1;j < data.length; ++j) if(dirname(cfb.FullPaths[j])==nm) break;
- elt.C = j >= data.length ? -1 : j;
- for(j=i+1;j < data.length; ++j) if(dirname(cfb.FullPaths[j])==dirname(nm)) break;
- elt.R = j >= data.length ? -1 : j;
- elt.type = 1;
- } else {
- if(dirname(cfb.FullPaths[i+1]||"") == dirname(nm)) elt.R = i + 1;
- elt.type = 2;
- }
- }
- }
- function _write(cfb/*:CFBContainer*/, options/*:CFBWriteOpts*/)/*:RawBytes|string*/ {
- var _opts = options || {};
- /* MAD is order-sensitive, skip rebuild and sort */
- if(_opts.fileType == 'mad') return write_mad(cfb, _opts);
- rebuild_cfb(cfb);
- switch(_opts.fileType) {
- case 'zip': return write_zip(cfb, _opts);
- //case 'mad': return write_mad(cfb, _opts);
- }
- var L = (function(cfb/*:CFBContainer*/)/*:Array<number>*/{
- var mini_size = 0, fat_size = 0;
- for(var i = 0; i < cfb.FileIndex.length; ++i) {
- var file = cfb.FileIndex[i];
- if(!file.content) continue;
- var flen = file.content.length;
- if(flen > 0){
- if(flen < 0x1000) mini_size += (flen + 0x3F) >> 6;
- else fat_size += (flen + 0x01FF) >> 9;
- }
- }
- var dir_cnt = (cfb.FullPaths.length +3) >> 2;
- var mini_cnt = (mini_size + 7) >> 3;
- var mfat_cnt = (mini_size + 0x7F) >> 7;
- var fat_base = mini_cnt + fat_size + dir_cnt + mfat_cnt;
- var fat_cnt = (fat_base + 0x7F) >> 7;
- var difat_cnt = fat_cnt <= 109 ? 0 : Math.ceil((fat_cnt-109)/0x7F);
- while(((fat_base + fat_cnt + difat_cnt + 0x7F) >> 7) > fat_cnt) difat_cnt = ++fat_cnt <= 109 ? 0 : Math.ceil((fat_cnt-109)/0x7F);
- var L = [1, difat_cnt, fat_cnt, mfat_cnt, dir_cnt, fat_size, mini_size, 0];
- cfb.FileIndex[0].size = mini_size << 6;
- L[7] = (cfb.FileIndex[0].start=L[0]+L[1]+L[2]+L[3]+L[4]+L[5])+((L[6]+7) >> 3);
- return L;
- })(cfb);
- var o = new_buf(L[7] << 9);
- var i = 0, T = 0;
- {
- for(i = 0; i < 8; ++i) o.write_shift(1, HEADER_SIG[i]);
- for(i = 0; i < 8; ++i) o.write_shift(2, 0);
- o.write_shift(2, 0x003E);
- o.write_shift(2, 0x0003);
- o.write_shift(2, 0xFFFE);
- o.write_shift(2, 0x0009);
- o.write_shift(2, 0x0006);
- for(i = 0; i < 3; ++i) o.write_shift(2, 0);
- o.write_shift(4, 0);
- o.write_shift(4, L[2]);
- o.write_shift(4, L[0] + L[1] + L[2] + L[3] - 1);
- o.write_shift(4, 0);
- o.write_shift(4, 1<<12);
- o.write_shift(4, L[3] ? L[0] + L[1] + L[2] - 1: ENDOFCHAIN);
- o.write_shift(4, L[3]);
- o.write_shift(-4, L[1] ? L[0] - 1: ENDOFCHAIN);
- o.write_shift(4, L[1]);
- for(i = 0; i < 109; ++i) o.write_shift(-4, i < L[2] ? L[1] + i : -1);
- }
- if(L[1]) {
- for(T = 0; T < L[1]; ++T) {
- for(; i < 236 + T * 127; ++i) o.write_shift(-4, i < L[2] ? L[1] + i : -1);
- o.write_shift(-4, T === L[1] - 1 ? ENDOFCHAIN : T + 1);
- }
- }
- var chainit = function(w/*:number*/)/*:void*/ {
- for(T += w; i<T-1; ++i) o.write_shift(-4, i+1);
- if(w) { ++i; o.write_shift(-4, ENDOFCHAIN); }
- };
- T = i = 0;
- for(T+=L[1]; i<T; ++i) o.write_shift(-4, consts.DIFSECT);
- for(T+=L[2]; i<T; ++i) o.write_shift(-4, consts.FATSECT);
- chainit(L[3]);
- chainit(L[4]);
- var j/*:number*/ = 0, flen/*:number*/ = 0;
- var file/*:CFBEntry*/ = cfb.FileIndex[0];
- for(; j < cfb.FileIndex.length; ++j) {
- file = cfb.FileIndex[j];
- if(!file.content) continue;
- /*:: if(file.content == null) throw new Error("unreachable"); */
- flen = file.content.length;
- if(flen < 0x1000) continue;
- file.start = T;
- chainit((flen + 0x01FF) >> 9);
- }
- chainit((L[6] + 7) >> 3);
- while(o.l & 0x1FF) o.write_shift(-4, consts.ENDOFCHAIN);
- T = i = 0;
- for(j = 0; j < cfb.FileIndex.length; ++j) {
- file = cfb.FileIndex[j];
- if(!file.content) continue;
- /*:: if(file.content == null) throw new Error("unreachable"); */
- flen = file.content.length;
- if(!flen || flen >= 0x1000) continue;
- file.start = T;
- chainit((flen + 0x3F) >> 6);
- }
- while(o.l & 0x1FF) o.write_shift(-4, consts.ENDOFCHAIN);
- for(i = 0; i < L[4]<<2; ++i) {
- var nm = cfb.FullPaths[i];
- if(!nm || nm.length === 0) {
- for(j = 0; j < 17; ++j) o.write_shift(4, 0);
- for(j = 0; j < 3; ++j) o.write_shift(4, -1);
- for(j = 0; j < 12; ++j) o.write_shift(4, 0);
- continue;
- }
- file = cfb.FileIndex[i];
- if(i === 0) file.start = file.size ? file.start - 1 : ENDOFCHAIN;
- var _nm/*:string*/ = (i === 0 && _opts.root) || file.name;
- if(_nm.length > 32) {
- console.error("Name " + _nm + " will be truncated to " + _nm.slice(0,32));
- _nm = _nm.slice(0, 32);
- }
- flen = 2*(_nm.length+1);
- o.write_shift(64, _nm, "utf16le");
- o.write_shift(2, flen);
- o.write_shift(1, file.type);
- o.write_shift(1, file.color);
- o.write_shift(-4, file.L);
- o.write_shift(-4, file.R);
- o.write_shift(-4, file.C);
- if(!file.clsid) for(j = 0; j < 4; ++j) o.write_shift(4, 0);
- else o.write_shift(16, file.clsid, "hex");
- o.write_shift(4, file.state || 0);
- o.write_shift(4, 0); o.write_shift(4, 0);
- o.write_shift(4, 0); o.write_shift(4, 0);
- o.write_shift(4, file.start);
- o.write_shift(4, file.size); o.write_shift(4, 0);
- }
- for(i = 1; i < cfb.FileIndex.length; ++i) {
- file = cfb.FileIndex[i];
- /*:: if(!file.content) throw new Error("unreachable"); */
- if(file.size >= 0x1000) {
- o.l = (file.start+1) << 9;
- if (has_buf && Buffer.isBuffer(file.content)) {
- file.content.copy(o, o.l, 0, file.size);
- // o is a 0-filled Buffer so just set next offset
- o.l += (file.size + 511) & -512;
- } else {
- for(j = 0; j < file.size; ++j) o.write_shift(1, file.content[j]);
- for(; j & 0x1FF; ++j) o.write_shift(1, 0);
- }
- }
- }
- for(i = 1; i < cfb.FileIndex.length; ++i) {
- file = cfb.FileIndex[i];
- /*:: if(!file.content) throw new Error("unreachable"); */
- if(file.size > 0 && file.size < 0x1000) {
- if (has_buf && Buffer.isBuffer(file.content)) {
- file.content.copy(o, o.l, 0, file.size);
- // o is a 0-filled Buffer so just set next offset
- o.l += (file.size + 63) & -64;
- } else {
- for(j = 0; j < file.size; ++j) o.write_shift(1, file.content[j]);
- for(; j & 0x3F; ++j) o.write_shift(1, 0);
- }
- }
- }
- if (has_buf) {
- o.l = o.length;
- } else {
- // When using Buffer, already 0-filled
- while(o.l < o.length) o.write_shift(1, 0);
- }
- return o;
- }
- /* [MS-CFB] 2.6.4 (Unicode 3.0.1 case conversion) */
- function find(cfb/*:CFBContainer*/, path/*:string*/)/*:?CFBEntry*/ {
- var UCFullPaths/*:Array<string>*/ = cfb.FullPaths.map(function(x) { return x.toUpperCase(); });
- var UCPaths/*:Array<string>*/ = UCFullPaths.map(function(x) { var y = x.split("/"); return y[y.length - (x.slice(-1) == "/" ? 2 : 1)]; });
- var k/*:boolean*/ = false;
- if(path.charCodeAt(0) === 47 /* "/" */) { k = true; path = UCFullPaths[0].slice(0, -1) + path; }
- else k = path.indexOf("/") !== -1;
- var UCPath/*:string*/ = path.toUpperCase();
- var w/*:number*/ = k === true ? UCFullPaths.indexOf(UCPath) : UCPaths.indexOf(UCPath);
- if(w !== -1) return cfb.FileIndex[w];
- var m = !UCPath.match(chr1);
- UCPath = UCPath.replace(chr0,'');
- if(m) UCPath = UCPath.replace(chr1,'!');
- for(w = 0; w < UCFullPaths.length; ++w) {
- if((m ? UCFullPaths[w].replace(chr1,'!') : UCFullPaths[w]).replace(chr0,'') == UCPath) return cfb.FileIndex[w];
- if((m ? UCPaths[w].replace(chr1,'!') : UCPaths[w]).replace(chr0,'') == UCPath) return cfb.FileIndex[w];
- }
- return null;
- }
- /** CFB Constants */
- var MSSZ = 64; /* Mini Sector Size = 1<<6 */
- //var MSCSZ = 4096; /* Mini Stream Cutoff Size */
- /* 2.1 Compound File Sector Numbers and Types */
- var ENDOFCHAIN = -2;
- /* 2.2 Compound File Header */
- var HEADER_SIGNATURE = 'd0cf11e0a1b11ae1';
- var HEADER_SIG = [0xD0, 0xCF, 0x11, 0xE0, 0xA1, 0xB1, 0x1A, 0xE1];
- var HEADER_CLSID = '00000000000000000000000000000000';
- var consts = {
- /* 2.1 Compund File Sector Numbers and Types */
- MAXREGSECT: -6,
- DIFSECT: -4,
- FATSECT: -3,
- ENDOFCHAIN: ENDOFCHAIN,
- FREESECT: -1,
- /* 2.2 Compound File Header */
- HEADER_SIGNATURE: HEADER_SIGNATURE,
- HEADER_MINOR_VERSION: '3e00',
- MAXREGSID: -6,
- NOSTREAM: -1,
- HEADER_CLSID: HEADER_CLSID,
- /* 2.6.1 Compound File Directory Entry */
- EntryTypes: ['unknown','storage','stream','lockbytes','property','root']
- };
- function write_file(cfb/*:CFBContainer*/, filename/*:string*/, options/*:CFBWriteOpts*/)/*:void*/ {
- get_fs();
- var o = _write(cfb, options);
- /*:: if(typeof Buffer == 'undefined' || !Buffer.isBuffer(o) || !(o instanceof Buffer)) throw new Error("unreachable"); */
- fs.writeFileSync(filename, o);
- }
- function a2s(o/*:RawBytes*/)/*:string*/ {
- var out = new Array(o.length);
- for(var i = 0; i < o.length; ++i) out[i] = String.fromCharCode(o[i]);
- return out.join("");
- }
- function write(cfb/*:CFBContainer*/, options/*:CFBWriteOpts*/)/*:RawBytes|string*/ {
- var o = _write(cfb, options);
- switch(options && options.type || "buffer") {
- case "file": get_fs(); fs.writeFileSync(options.filename, (o/*:any*/)); return o;
- case "binary": return typeof o == "string" ? o : a2s(o);
- case "base64": return Base64_encode(typeof o == "string" ? o : a2s(o));
- case "buffer": if(has_buf) return Buffer.isBuffer(o) ? o : Buffer_from(o);
- /* falls through */
- case "array": return typeof o == "string" ? s2a(o) : o;
- }
- return o;
- }
- /* node < 8.1 zlib does not expose bytesRead, so default to pure JS */
- var _zlib;
- function use_zlib(zlib) { try {
- var InflateRaw = zlib.InflateRaw;
- var InflRaw = new InflateRaw();
- InflRaw._processChunk(new Uint8Array([3, 0]), InflRaw._finishFlushFlag);
- if(InflRaw.bytesRead) _zlib = zlib;
- else throw new Error("zlib does not expose bytesRead");
- } catch(e) {console.error("cannot use native zlib: " + (e.message || e)); } }
- function _inflateRawSync(payload, usz) {
- if(!_zlib) return _inflate(payload, usz);
- var InflateRaw = _zlib.InflateRaw;
- var InflRaw = new InflateRaw();
- var out = InflRaw._processChunk(payload.slice(payload.l), InflRaw._finishFlushFlag);
- payload.l += InflRaw.bytesRead;
- return out;
- }
- function _deflateRawSync(payload) {
- return _zlib ? _zlib.deflateRawSync(payload) : _deflate(payload);
- }
- var CLEN_ORDER = [ 16, 17, 18, 0, 8, 7, 9, 6, 10, 5, 11, 4, 12, 3, 13, 2, 14, 1, 15 ];
- /* LEN_ID = [ 257, 258, 259, 260, 261, 262, 263, 264, 265, 266, 267, 268, 269, 270, 271, 272, 273, 274, 275, 276, 277, 278, 279, 280, 281, 282, 283, 284, 285 ]; */
- var LEN_LN = [ 3, 4, 5, 6, 7, 8, 9, 10, 11, 13 , 15, 17, 19, 23, 27, 31, 35, 43, 51, 59, 67, 83, 99, 115, 131, 163, 195, 227, 258 ];
- /* DST_ID = [ 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29 ]; */
- var DST_LN = [ 1, 2, 3, 4, 5, 7, 9, 13, 17, 25, 33, 49, 65, 97, 129, 193, 257, 385, 513, 769, 1025, 1537, 2049, 3073, 4097, 6145, 8193, 12289, 16385, 24577 ];
- function bit_swap_8(n) { var t = (((((n<<1)|(n<<11)) & 0x22110) | (((n<<5)|(n<<15)) & 0x88440))); return ((t>>16) | (t>>8) |t)&0xFF; }
- var use_typed_arrays = typeof Uint8Array !== 'undefined';
- var bitswap8 = use_typed_arrays ? new Uint8Array(1<<8) : [];
- for(var q = 0; q < (1<<8); ++q) bitswap8[q] = bit_swap_8(q);
- function bit_swap_n(n, b) {
- var rev = bitswap8[n & 0xFF];
- if(b <= 8) return rev >>> (8-b);
- rev = (rev << 8) | bitswap8[(n>>8)&0xFF];
- if(b <= 16) return rev >>> (16-b);
- rev = (rev << 8) | bitswap8[(n>>16)&0xFF];
- return rev >>> (24-b);
- }
- /* helpers for unaligned bit reads */
- function read_bits_2(buf, bl) { var w = (bl&7), h = (bl>>>3); return ((buf[h]|(w <= 6 ? 0 : buf[h+1]<<8))>>>w)& 0x03; }
- function read_bits_3(buf, bl) { var w = (bl&7), h = (bl>>>3); return ((buf[h]|(w <= 5 ? 0 : buf[h+1]<<8))>>>w)& 0x07; }
- function read_bits_4(buf, bl) { var w = (bl&7), h = (bl>>>3); return ((buf[h]|(w <= 4 ? 0 : buf[h+1]<<8))>>>w)& 0x0F; }
- function read_bits_5(buf, bl) { var w = (bl&7), h = (bl>>>3); return ((buf[h]|(w <= 3 ? 0 : buf[h+1]<<8))>>>w)& 0x1F; }
- function read_bits_7(buf, bl) { var w = (bl&7), h = (bl>>>3); return ((buf[h]|(w <= 1 ? 0 : buf[h+1]<<8))>>>w)& 0x7F; }
- /* works up to n = 3 * 8 + 1 = 25 */
- function read_bits_n(buf, bl, n) {
- var w = (bl&7), h = (bl>>>3), f = ((1<<n)-1);
- var v = buf[h] >>> w;
- if(n < 8 - w) return v & f;
- v |= buf[h+1]<<(8-w);
- if(n < 16 - w) return v & f;
- v |= buf[h+2]<<(16-w);
- if(n < 24 - w) return v & f;
- v |= buf[h+3]<<(24-w);
- return v & f;
- }
- /* helpers for unaligned bit writes */
- function write_bits_3(buf, bl, v) { var w = bl & 7, h = bl >>> 3;
- if(w <= 5) buf[h] |= (v & 7) << w;
- else {
- buf[h] |= (v << w) & 0xFF;
- buf[h+1] = (v&7) >> (8-w);
- }
- return bl + 3;
- }
- function write_bits_1(buf, bl, v) {
- var w = bl & 7, h = bl >>> 3;
- v = (v&1) << w;
- buf[h] |= v;
- return bl + 1;
- }
- function write_bits_8(buf, bl, v) {
- var w = bl & 7, h = bl >>> 3;
- v <<= w;
- buf[h] |= v & 0xFF; v >>>= 8;
- buf[h+1] = v;
- return bl + 8;
- }
- function write_bits_16(buf, bl, v) {
- var w = bl & 7, h = bl >>> 3;
- v <<= w;
- buf[h] |= v & 0xFF; v >>>= 8;
- buf[h+1] = v & 0xFF;
- buf[h+2] = v >>> 8;
- return bl + 16;
- }
- /* until ArrayBuffer#realloc is a thing, fake a realloc */
- function realloc(b, sz/*:number*/) {
- var L = b.length, M = 2*L > sz ? 2*L : sz + 5, i = 0;
- if(L >= sz) return b;
- if(has_buf) {
- var o = new_unsafe_buf(M);
- // $FlowIgnore
- if(b.copy) b.copy(o);
- else for(; i < b.length; ++i) o[i] = b[i];
- return o;
- } else if(use_typed_arrays) {
- var a = new Uint8Array(M);
- if(a.set) a.set(b);
- else for(; i < L; ++i) a[i] = b[i];
- return a;
- }
- b.length = M;
- return b;
- }
- /* zero-filled arrays for older browsers */
- function zero_fill_array(n) {
- var o = new Array(n);
- for(var i = 0; i < n; ++i) o[i] = 0;
- return o;
- }
- /* build tree (used for literals and lengths) */
- function build_tree(clens, cmap, MAX/*:number*/)/*:number*/ {
- var maxlen = 1, w = 0, i = 0, j = 0, ccode = 0, L = clens.length;
- var bl_count = use_typed_arrays ? new Uint16Array(32) : zero_fill_array(32);
- for(i = 0; i < 32; ++i) bl_count[i] = 0;
- for(i = L; i < MAX; ++i) clens[i] = 0;
- L = clens.length;
- var ctree = use_typed_arrays ? new Uint16Array(L) : zero_fill_array(L); // []
- /* build code tree */
- for(i = 0; i < L; ++i) {
- bl_count[(w = clens[i])]++;
- if(maxlen < w) maxlen = w;
- ctree[i] = 0;
- }
- bl_count[0] = 0;
- for(i = 1; i <= maxlen; ++i) bl_count[i+16] = (ccode = (ccode + bl_count[i-1])<<1);
- for(i = 0; i < L; ++i) {
- ccode = clens[i];
- if(ccode != 0) ctree[i] = bl_count[ccode+16]++;
- }
- /* cmap[maxlen + 4 bits] = (off&15) + (lit<<4) reverse mapping */
- var cleni = 0;
- for(i = 0; i < L; ++i) {
- cleni = clens[i];
- if(cleni != 0) {
- ccode = bit_swap_n(ctree[i], maxlen)>>(maxlen-cleni);
- for(j = (1<<(maxlen + 4 - cleni)) - 1; j>=0; --j)
- cmap[ccode|(j<<cleni)] = (cleni&15) | (i<<4);
- }
- }
- return maxlen;
- }
- /* Fixed Huffman */
- var fix_lmap = use_typed_arrays ? new Uint16Array(512) : zero_fill_array(512);
- var fix_dmap = use_typed_arrays ? new Uint16Array(32) : zero_fill_array(32);
- if(!use_typed_arrays) {
- for(var i = 0; i < 512; ++i) fix_lmap[i] = 0;
- for(i = 0; i < 32; ++i) fix_dmap[i] = 0;
- }
- (function() {
- var dlens/*:Array<number>*/ = [];
- var i = 0;
- for(;i<32; i++) dlens.push(5);
- build_tree(dlens, fix_dmap, 32);
- var clens/*:Array<number>*/ = [];
- i = 0;
- for(; i<=143; i++) clens.push(8);
- for(; i<=255; i++) clens.push(9);
- for(; i<=279; i++) clens.push(7);
- for(; i<=287; i++) clens.push(8);
- build_tree(clens, fix_lmap, 288);
- })();var _deflateRaw = /*#__PURE__*/(function _deflateRawIIFE() {
- var DST_LN_RE = use_typed_arrays ? new Uint8Array(0x8000) : [];
- var j = 0, k = 0;
- for(; j < DST_LN.length - 1; ++j) {
- for(; k < DST_LN[j+1]; ++k) DST_LN_RE[k] = j;
- }
- for(;k < 32768; ++k) DST_LN_RE[k] = 29;
- var LEN_LN_RE = use_typed_arrays ? new Uint8Array(0x103) : [];
- for(j = 0, k = 0; j < LEN_LN.length - 1; ++j) {
- for(; k < LEN_LN[j+1]; ++k) LEN_LN_RE[k] = j;
- }
- function write_stored(data, out) {
- var boff = 0;
- while(boff < data.length) {
- var L = Math.min(0xFFFF, data.length - boff);
- var h = boff + L == data.length;
- out.write_shift(1, +h);
- out.write_shift(2, L);
- out.write_shift(2, (~L) & 0xFFFF);
- while(L-- > 0) out[out.l++] = data[boff++];
- }
- return out.l;
- }
- /* Fixed Huffman */
- function write_huff_fixed(data, out) {
- var bl = 0;
- var boff = 0;
- var addrs = use_typed_arrays ? new Uint16Array(0x8000) : [];
- while(boff < data.length) {
- var L = /* data.length - boff; */ Math.min(0xFFFF, data.length - boff);
- /* write a stored block for short data */
- if(L < 10) {
- bl = write_bits_3(out, bl, +!!(boff + L == data.length)); // jshint ignore:line
- if(bl & 7) bl += 8 - (bl & 7);
- out.l = (bl / 8) | 0;
- out.write_shift(2, L);
- out.write_shift(2, (~L) & 0xFFFF);
- while(L-- > 0) out[out.l++] = data[boff++];
- bl = out.l * 8;
- continue;
- }
- bl = write_bits_3(out, bl, +!!(boff + L == data.length) + 2); // jshint ignore:line
- var hash = 0;
- while(L-- > 0) {
- var d = data[boff];
- hash = ((hash << 5) ^ d) & 0x7FFF;
- var match = -1, mlen = 0;
- if((match = addrs[hash])) {
- match |= boff & ~0x7FFF;
- if(match > boff) match -= 0x8000;
- if(match < boff) while(data[match + mlen] == data[boff + mlen] && mlen < 250) ++mlen;
- }
- if(mlen > 2) {
- /* Copy Token */
- d = LEN_LN_RE[mlen];
- if(d <= 22) bl = write_bits_8(out, bl, bitswap8[d+1]>>1) - 1;
- else {
- write_bits_8(out, bl, 3);
- bl += 5;
- write_bits_8(out, bl, bitswap8[d-23]>>5);
- bl += 3;
- }
- var len_eb = (d < 8) ? 0 : ((d - 4)>>2);
- if(len_eb > 0) {
- write_bits_16(out, bl, mlen - LEN_LN[d]);
- bl += len_eb;
- }
- d = DST_LN_RE[boff - match];
- bl = write_bits_8(out, bl, bitswap8[d]>>3);
- bl -= 3;
- var dst_eb = d < 4 ? 0 : (d-2)>>1;
- if(dst_eb > 0) {
- write_bits_16(out, bl, boff - match - DST_LN[d]);
- bl += dst_eb;
- }
- for(var q = 0; q < mlen; ++q) {
- addrs[hash] = boff & 0x7FFF;
- hash = ((hash << 5) ^ data[boff]) & 0x7FFF;
- ++boff;
- }
- L-= mlen - 1;
- } else {
- /* Literal Token */
- if(d <= 143) d = d + 48;
- else bl = write_bits_1(out, bl, 1);
- bl = write_bits_8(out, bl, bitswap8[d]);
- addrs[hash] = boff & 0x7FFF;
- ++boff;
- }
- }
- bl = write_bits_8(out, bl, 0) - 1;
- }
- out.l = ((bl + 7)/8)|0;
- return out.l;
- }
- return function _deflateRaw(data, out) {
- if(data.length < 8) return write_stored(data, out);
- return write_huff_fixed(data, out);
- };
- })();
- function _deflate(data) {
- var buf = new_buf(50+Math.floor(data.length*1.1));
- var off = _deflateRaw(data, buf);
- return buf.slice(0, off);
- }
- /* modified inflate function also moves original read head */
- var dyn_lmap = use_typed_arrays ? new Uint16Array(32768) : zero_fill_array(32768);
- var dyn_dmap = use_typed_arrays ? new Uint16Array(32768) : zero_fill_array(32768);
- var dyn_cmap = use_typed_arrays ? new Uint16Array(128) : zero_fill_array(128);
- var dyn_len_1 = 1, dyn_len_2 = 1;
- /* 5.5.3 Expanding Huffman Codes */
- function dyn(data, boff/*:number*/) {
- /* nomenclature from RFC1951 refers to bit values; these are offset by the implicit constant */
- var _HLIT = read_bits_5(data, boff) + 257; boff += 5;
- var _HDIST = read_bits_5(data, boff) + 1; boff += 5;
- var _HCLEN = read_bits_4(data, boff) + 4; boff += 4;
- var w = 0;
- /* grab and store code lengths */
- var clens = use_typed_arrays ? new Uint8Array(19) : zero_fill_array(19);
- var ctree = [ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 ];
- var maxlen = 1;
- var bl_count = use_typed_arrays ? new Uint8Array(8) : zero_fill_array(8);
- var next_code = use_typed_arrays ? new Uint8Array(8) : zero_fill_array(8);
- var L = clens.length; /* 19 */
- for(var i = 0; i < _HCLEN; ++i) {
- clens[CLEN_ORDER[i]] = w = read_bits_3(data, boff);
- if(maxlen < w) maxlen = w;
- bl_count[w]++;
- boff += 3;
- }
- /* build code tree */
- var ccode = 0;
- bl_count[0] = 0;
- for(i = 1; i <= maxlen; ++i) next_code[i] = ccode = (ccode + bl_count[i-1])<<1;
- for(i = 0; i < L; ++i) if((ccode = clens[i]) != 0) ctree[i] = next_code[ccode]++;
- /* cmap[7 bits from stream] = (off&7) + (lit<<3) */
- var cleni = 0;
- for(i = 0; i < L; ++i) {
- cleni = clens[i];
- if(cleni != 0) {
- ccode = bitswap8[ctree[i]]>>(8-cleni);
- for(var j = (1<<(7-cleni))-1; j>=0; --j) dyn_cmap[ccode|(j<<cleni)] = (cleni&7) | (i<<3);
- }
- }
- /* read literal and dist codes at once */
- var hcodes/*:Array<number>*/ = [];
- maxlen = 1;
- for(; hcodes.length < _HLIT + _HDIST;) {
- ccode = dyn_cmap[read_bits_7(data, boff)];
- boff += ccode & 7;
- switch((ccode >>>= 3)) {
- case 16:
- w = 3 + read_bits_2(data, boff); boff += 2;
- ccode = hcodes[hcodes.length - 1];
- while(w-- > 0) hcodes.push(ccode);
- break;
- case 17:
- w = 3 + read_bits_3(data, boff); boff += 3;
- while(w-- > 0) hcodes.push(0);
- break;
- case 18:
- w = 11 + read_bits_7(data, boff); boff += 7;
- while(w -- > 0) hcodes.push(0);
- break;
- default:
- hcodes.push(ccode);
- if(maxlen < ccode) maxlen = ccode;
- break;
- }
- }
- /* build literal / length trees */
- var h1 = hcodes.slice(0, _HLIT), h2 = hcodes.slice(_HLIT);
- for(i = _HLIT; i < 286; ++i) h1[i] = 0;
- for(i = _HDIST; i < 30; ++i) h2[i] = 0;
- dyn_len_1 = build_tree(h1, dyn_lmap, 286);
- dyn_len_2 = build_tree(h2, dyn_dmap, 30);
- return boff;
- }
- /* return [ data, bytesRead ] */
- function inflate(data, usz/*:number*/) {
- /* shortcircuit for empty buffer [0x03, 0x00] */
- if(data[0] == 3 && !(data[1] & 0x3)) { return [new_raw_buf(usz), 2]; }
- /* bit offset */
- var boff = 0;
- /* header includes final bit and type bits */
- var header = 0;
- var outbuf = new_unsafe_buf(usz ? usz : (1<<18));
- var woff = 0;
- var OL = outbuf.length>>>0;
- var max_len_1 = 0, max_len_2 = 0;
- while((header&1) == 0) {
- header = read_bits_3(data, boff); boff += 3;
- if((header >>> 1) == 0) {
- /* Stored block */
- if(boff & 7) boff += 8 - (boff&7);
- /* 2 bytes sz, 2 bytes bit inverse */
- var sz = data[boff>>>3] | data[(boff>>>3)+1]<<8;
- boff += 32;
- /* push sz bytes */
- if(sz > 0) {
- if(!usz && OL < woff + sz) { outbuf = realloc(outbuf, woff + sz); OL = outbuf.length; }
- while(sz-- > 0) { outbuf[woff++] = data[boff>>>3]; boff += 8; }
- }
- continue;
- } else if((header >> 1) == 1) {
- /* Fixed Huffman */
- max_len_1 = 9; max_len_2 = 5;
- } else {
- /* Dynamic Huffman */
- boff = dyn(data, boff);
- max_len_1 = dyn_len_1; max_len_2 = dyn_len_2;
- }
- for(;;) { // while(true) is apparently out of vogue in modern JS circles
- if(!usz && (OL < woff + 32767)) { outbuf = realloc(outbuf, woff + 32767); OL = outbuf.length; }
- /* ingest code and move read head */
- var bits = read_bits_n(data, boff, max_len_1);
- var code = (header>>>1) == 1 ? fix_lmap[bits] : dyn_lmap[bits];
- boff += code & 15; code >>>= 4;
- /* 0-255 are literals, 256 is end of block token, 257+ are copy tokens */
- if(((code>>>8)&0xFF) === 0) outbuf[woff++] = code;
- else if(code == 256) break;
- else {
- code -= 257;
- var len_eb = (code < 8) ? 0 : ((code-4)>>2); if(len_eb > 5) len_eb = 0;
- var tgt = woff + LEN_LN[code];
- /* length extra bits */
- if(len_eb > 0) {
- tgt += read_bits_n(data, boff, len_eb);
- boff += len_eb;
- }
- /* dist code */
- bits = read_bits_n(data, boff, max_len_2);
- code = (header>>>1) == 1 ? fix_dmap[bits] : dyn_dmap[bits];
- boff += code & 15; code >>>= 4;
- var dst_eb = (code < 4 ? 0 : (code-2)>>1);
- var dst = DST_LN[code];
- /* dist extra bits */
- if(dst_eb > 0) {
- dst += read_bits_n(data, boff, dst_eb);
- boff += dst_eb;
- }
- /* in the common case, manual byte copy is faster than TA set / Buffer copy */
- if(!usz && OL < tgt) { outbuf = realloc(outbuf, tgt + 100); OL = outbuf.length; }
- while(woff < tgt) { outbuf[woff] = outbuf[woff - dst]; ++woff; }
- }
- }
- }
- if(usz) return [outbuf, (boff+7)>>>3];
- return [outbuf.slice(0, woff), (boff+7)>>>3];
- }
- function _inflate(payload, usz) {
- var data = payload.slice(payload.l||0);
- var out = inflate(data, usz);
- payload.l += out[1];
- return out[0];
- }
- function warn_or_throw(wrn, msg) {
- if(wrn) { if(typeof console !== 'undefined') console.error(msg); }
- else throw new Error(msg);
- }
- function parse_zip(file/*:RawBytes*/, options/*:CFBReadOpts*/)/*:CFBContainer*/ {
- var blob/*:CFBlob*/ = /*::(*/file/*:: :any)*/;
- prep_blob(blob, 0);
- var FileIndex/*:CFBFileIndex*/ = [], FullPaths/*:Array<string>*/ = [];
- var o = {
- FileIndex: FileIndex,
- FullPaths: FullPaths
- };
- init_cfb(o, { root: options.root });
- /* find end of central directory, start just after signature */
- var i = blob.length - 4;
- while((blob[i] != 0x50 || blob[i+1] != 0x4b || blob[i+2] != 0x05 || blob[i+3] != 0x06) && i >= 0) --i;
- blob.l = i + 4;
- /* parse end of central directory */
- blob.l += 4;
- var fcnt = blob.read_shift(2);
- blob.l += 6;
- var start_cd = blob.read_shift(4);
- /* parse central directory */
- blob.l = start_cd;
- for(i = 0; i < fcnt; ++i) {
- /* trust local file header instead of CD entry */
- blob.l += 20;
- var csz = blob.read_shift(4);
- var usz = blob.read_shift(4);
- var namelen = blob.read_shift(2);
- var efsz = blob.read_shift(2);
- var fcsz = blob.read_shift(2);
- blob.l += 8;
- var offset = blob.read_shift(4);
- var EF = parse_extra_field(/*::(*/blob.slice(blob.l+namelen, blob.l+namelen+efsz)/*:: :any)*/);
- blob.l += namelen + efsz + fcsz;
- var L = blob.l;
- blob.l = offset + 4;
- parse_local_file(blob, csz, usz, o, EF);
- blob.l = L;
- }
- return o;
- }
- /* head starts just after local file header signature */
- function parse_local_file(blob/*:CFBlob*/, csz/*:number*/, usz/*:number*/, o/*:CFBContainer*/, EF) {
- /* [local file header] */
- blob.l += 2;
- var flags = blob.read_shift(2);
- var meth = blob.read_shift(2);
- var date = parse_dos_date(blob);
- if(flags & 0x2041) throw new Error("Unsupported ZIP encryption");
- var crc32 = blob.read_shift(4);
- var _csz = blob.read_shift(4);
- var _usz = blob.read_shift(4);
- var namelen = blob.read_shift(2);
- var efsz = blob.read_shift(2);
- // TODO: flags & (1<<11) // UTF8
- var name = ""; for(var i = 0; i < namelen; ++i) name += String.fromCharCode(blob[blob.l++]);
- if(efsz) {
- var ef = parse_extra_field(/*::(*/blob.slice(blob.l, blob.l + efsz)/*:: :any)*/);
- if((ef[0x5455]||{}).mt) date = ef[0x5455].mt;
- if(((EF||{})[0x5455]||{}).mt) date = EF[0x5455].mt;
- }
- blob.l += efsz;
- /* [encryption header] */
- /* [file data] */
- var data = blob.slice(blob.l, blob.l + _csz);
- switch(meth) {
- case 8: data = _inflateRawSync(blob, _usz); break;
- case 0: break; // TODO: scan for magic number
- default: throw new Error("Unsupported ZIP Compression method " + meth);
- }
- /* [data descriptor] */
- var wrn = false;
- if(flags & 8) {
- crc32 = blob.read_shift(4);
- if(crc32 == 0x08074b50) { crc32 = blob.read_shift(4); wrn = true; }
- _csz = blob.read_shift(4);
- _usz = blob.read_shift(4);
- }
- if(_csz != csz) warn_or_throw(wrn, "Bad compressed size: " + csz + " != " + _csz);
- if(_usz != usz) warn_or_throw(wrn, "Bad uncompressed size: " + usz + " != " + _usz);
- var _crc32 = CRC32.buf(data, 0);
- if((crc32>>0) != (_crc32>>0)) warn_or_throw(wrn, "Bad CRC32 checksum: " + crc32 + " != " + _crc32);
- cfb_add(o, name, data, {unsafe: true, mt: date});
- }
- function write_zip(cfb/*:CFBContainer*/, options/*:CFBWriteOpts*/)/*:RawBytes*/ {
- var _opts = options || {};
- var out = [], cdirs = [];
- var o/*:CFBlob*/ = new_buf(1);
- var method = (_opts.compression ? 8 : 0), flags = 0;
- var desc = false;
- if(desc) flags |= 8;
- var i = 0, j = 0;
- var start_cd = 0, fcnt = 0;
- var root = cfb.FullPaths[0], fp = root, fi = cfb.FileIndex[0];
- var crcs = [];
- var sz_cd = 0;
- for(i = 1; i < cfb.FullPaths.length; ++i) {
- fp = cfb.FullPaths[i].slice(root.length); fi = cfb.FileIndex[i];
- if(!fi.size || !fi.content || fp == "\u0001Sh33tJ5") continue;
- var start = start_cd;
- /* TODO: CP437 filename */
- var namebuf = new_buf(fp.length);
- for(j = 0; j < fp.length; ++j) namebuf.write_shift(1, fp.charCodeAt(j) & 0x7F);
- namebuf = namebuf.slice(0, namebuf.l);
- crcs[fcnt] = CRC32.buf(/*::((*/fi.content/*::||[]):any)*/, 0);
- var outbuf = fi.content/*::||[]*/;
- if(method == 8) outbuf = _deflateRawSync(outbuf);
- /* local file header */
- o = new_buf(30);
- o.write_shift(4, 0x04034b50);
- o.write_shift(2, 20);
- o.write_shift(2, flags);
- o.write_shift(2, method);
- /* TODO: last mod file time/date */
- if(fi.mt) write_dos_date(o, fi.mt);
- else o.write_shift(4, 0);
- o.write_shift(-4, (flags & 8) ? 0 : crcs[fcnt]);
- o.write_shift(4, (flags & 8) ? 0 : outbuf.length);
- o.write_shift(4, (flags & 8) ? 0 : /*::(*/fi.content/*::||[])*/.length);
- o.write_shift(2, namebuf.length);
- o.write_shift(2, 0);
- start_cd += o.length;
- out.push(o);
- start_cd += namebuf.length;
- out.push(namebuf);
- /* TODO: extra fields? */
- /* TODO: encryption header ? */
- start_cd += outbuf.length;
- out.push(outbuf);
- /* data descriptor */
- if(flags & 8) {
- o = new_buf(12);
- o.write_shift(-4, crcs[fcnt]);
- o.write_shift(4, outbuf.length);
- o.write_shift(4, /*::(*/fi.content/*::||[])*/.length);
- start_cd += o.l;
- out.push(o);
- }
- /* central directory */
- o = new_buf(46);
- o.write_shift(4, 0x02014b50);
- o.write_shift(2, 0);
- o.write_shift(2, 20);
- o.write_shift(2, flags);
- o.write_shift(2, method);
- o.write_shift(4, 0); /* TODO: last mod file time/date */
- o.write_shift(-4, crcs[fcnt]);
- o.write_shift(4, outbuf.length);
- o.write_shift(4, /*::(*/fi.content/*::||[])*/.length);
- o.write_shift(2, namebuf.length);
- o.write_shift(2, 0);
- o.write_shift(2, 0);
- o.write_shift(2, 0);
- o.write_shift(2, 0);
- o.write_shift(4, 0);
- o.write_shift(4, start);
- sz_cd += o.l;
- cdirs.push(o);
- sz_cd += namebuf.length;
- cdirs.push(namebuf);
- ++fcnt;
- }
- /* end of central directory */
- o = new_buf(22);
- o.write_shift(4, 0x06054b50);
- o.write_shift(2, 0);
- o.write_shift(2, 0);
- o.write_shift(2, fcnt);
- o.write_shift(2, fcnt);
- o.write_shift(4, sz_cd);
- o.write_shift(4, start_cd);
- o.write_shift(2, 0);
- return bconcat(([bconcat((out/*:any*/)), bconcat(cdirs), o]/*:any*/));
- }
- var ContentTypeMap = ({
- "htm": "text/html",
- "xml": "text/xml",
- "gif": "image/gif",
- "jpg": "image/jpeg",
- "png": "image/png",
- "mso": "application/x-mso",
- "thmx": "application/vnd.ms-officetheme",
- "sh33tj5": "application/octet-stream"
- }/*:any*/);
- function get_content_type(fi/*:CFBEntry*/, fp/*:string*/)/*:string*/ {
- if(fi.ctype) return fi.ctype;
- var ext = fi.name || "", m = ext.match(/\.([^\.]+)$/);
- if(m && ContentTypeMap[m[1]]) return ContentTypeMap[m[1]];
- if(fp) {
- m = (ext = fp).match(/[\.\\]([^\.\\])+$/);
- if(m && ContentTypeMap[m[1]]) return ContentTypeMap[m[1]];
- }
- return "application/octet-stream";
- }
- /* 76 character chunks TODO: intertwine encoding */
- function write_base64_76(bstr/*:string*/)/*:string*/ {
- var data = Base64_encode(bstr);
- var o = [];
- for(var i = 0; i < data.length; i+= 76) o.push(data.slice(i, i+76));
- return o.join("\r\n") + "\r\n";
- }
- /*
- Rules for QP:
- - escape =## applies for all non-display characters and literal "="
- - space or tab at end of line must be encoded
- - \r\n newlines can be preserved, but bare \r and \n must be escaped
- - lines must not exceed 76 characters, use soft breaks =\r\n
- TODO: Some files from word appear to write line extensions with bare equals:
- ```
- <table class=3DMsoTableGrid border=3D1 cellspacing=3D0 cellpadding=3D0 width=
- ="70%"
- ```
- */
- function write_quoted_printable(text/*:string*/)/*:string*/ {
- var encoded = text.replace(/[\x00-\x08\x0B\x0C\x0E-\x1F\x7E-\xFF=]/g, function(c) {
- var w = c.charCodeAt(0).toString(16).toUpperCase();
- return "=" + (w.length == 1 ? "0" + w : w);
- });
- encoded = encoded.replace(/ $/mg, "=20").replace(/\t$/mg, "=09");
- if(encoded.charAt(0) == "\n") encoded = "=0D" + encoded.slice(1);
- encoded = encoded.replace(/\r(?!\n)/mg, "=0D").replace(/\n\n/mg, "\n=0A").replace(/([^\r\n])\n/mg, "$1=0A");
- var o/*:Array<string>*/ = [], split = encoded.split("\r\n");
- for(var si = 0; si < split.length; ++si) {
- var str = split[si];
- if(str.length == 0) { o.push(""); continue; }
- for(var i = 0; i < str.length;) {
- var end = 76;
- var tmp = str.slice(i, i + end);
- if(tmp.charAt(end - 1) == "=") end --;
- else if(tmp.charAt(end - 2) == "=") end -= 2;
- else if(tmp.charAt(end - 3) == "=") end -= 3;
- tmp = str.slice(i, i + end);
- i += end;
- if(i < str.length) tmp += "=";
- o.push(tmp);
- }
- }
- return o.join("\r\n");
- }
- function parse_quoted_printable(data/*:Array<string>*/)/*:RawBytes*/ {
- var o = [];
- /* unify long lines */
- for(var di = 0; di < data.length; ++di) {
- var line = data[di];
- while(di <= data.length && line.charAt(line.length - 1) == "=") line = line.slice(0, line.length - 1) + data[++di];
- o.push(line);
- }
- /* decode */
- for(var oi = 0; oi < o.length; ++oi) o[oi] = o[oi].replace(/[=][0-9A-Fa-f]{2}/g, function($$) { return String.fromCharCode(parseInt($$.slice(1), 16)); });
- return s2a(o.join("\r\n"));
- }
- function parse_mime(cfb/*:CFBContainer*/, data/*:Array<string>*/, root/*:string*/)/*:void*/ {
- var fname = "", cte = "", ctype = "", fdata;
- var di = 0;
- for(;di < 10; ++di) {
- var line = data[di];
- if(!line || line.match(/^\s*$/)) break;
- var m = line.match(/^(.*?):\s*([^\s].*)$/);
- if(m) switch(m[1].toLowerCase()) {
- case "content-location": fname = m[2].trim(); break;
- case "content-type": ctype = m[2].trim(); break;
- case "content-transfer-encoding": cte = m[2].trim(); break;
- }
- }
- ++di;
- switch(cte.toLowerCase()) {
- case 'base64': fdata = s2a(Base64_decode(data.slice(di).join(""))); break;
- case 'quoted-printable': fdata = parse_quoted_printable(data.slice(di)); break;
- default: throw new Error("Unsupported Content-Transfer-Encoding " + cte);
- }
- var file = cfb_add(cfb, fname.slice(root.length), fdata, {unsafe: true});
- if(ctype) file.ctype = ctype;
- }
- function parse_mad(file/*:RawBytes*/, options/*:CFBReadOpts*/)/*:CFBContainer*/ {
- if(a2s(file.slice(0,13)).toLowerCase() != "mime-version:") throw new Error("Unsupported MAD header");
- var root = (options && options.root || "");
- // $FlowIgnore
- var data = (has_buf && Buffer.isBuffer(file) ? file.toString("binary") : a2s(file)).split("\r\n");
- var di = 0, row = "";
- /* if root is not specified, scan for the common prefix */
- for(di = 0; di < data.length; ++di) {
- row = data[di];
- if(!/^Content-Location:/i.test(row)) continue;
- row = row.slice(row.indexOf("file"));
- if(!root) root = row.slice(0, row.lastIndexOf("/") + 1);
- if(row.slice(0, root.length) == root) continue;
- while(root.length > 0) {
- root = root.slice(0, root.length - 1);
- root = root.slice(0, root.lastIndexOf("/") + 1);
- if(row.slice(0,root.length) == root) break;
- }
- }
- var mboundary = (data[1] || "").match(/boundary="(.*?)"/);
- if(!mboundary) throw new Error("MAD cannot find boundary");
- var boundary = "--" + (mboundary[1] || "");
- var FileIndex/*:CFBFileIndex*/ = [], FullPaths/*:Array<string>*/ = [];
- var o = {
- FileIndex: FileIndex,
- FullPaths: FullPaths
- };
- init_cfb(o);
- var start_di, fcnt = 0;
- for(di = 0; di < data.length; ++di) {
- var line = data[di];
- if(line !== boundary && line !== boundary + "--") continue;
- if(fcnt++) parse_mime(o, data.slice(start_di, di), root);
- start_di = di;
- }
- return o;
- }
- function write_mad(cfb/*:CFBContainer*/, options/*:CFBWriteOpts*/)/*:string*/ {
- var opts = options || {};
- var boundary = opts.boundary || "SheetJS";
- boundary = '------=' + boundary;
- var out = [
- 'MIME-Version: 1.0',
- 'Content-Type: multipart/related; boundary="' + boundary.slice(2) + '"',
- '',
- '',
- ''
- ];
- var root = cfb.FullPaths[0], fp = root, fi = cfb.FileIndex[0];
- for(var i = 1; i < cfb.FullPaths.length; ++i) {
- fp = cfb.FullPaths[i].slice(root.length);
- fi = cfb.FileIndex[i];
- if(!fi.size || !fi.content || fp == "\u0001Sh33tJ5") continue;
- /* Normalize filename */
- fp = fp.replace(/[\x00-\x08\x0B\x0C\x0E-\x1F\x7E-\xFF]/g, function(c) {
- return "_x" + c.charCodeAt(0).toString(16) + "_";
- }).replace(/[\u0080-\uFFFF]/g, function(u) {
- return "_u" + u.charCodeAt(0).toString(16) + "_";
- });
- /* Extract content as binary string */
- var ca = fi.content;
- // $FlowIgnore
- var cstr = has_buf && Buffer.isBuffer(ca) ? ca.toString("binary") : a2s(ca);
- /* 4/5 of first 1024 chars ascii -> quoted printable, else base64 */
- var dispcnt = 0, L = Math.min(1024, cstr.length), cc = 0;
- for(var csl = 0; csl <= L; ++csl) if((cc=cstr.charCodeAt(csl)) >= 0x20 && cc < 0x80) ++dispcnt;
- var qp = dispcnt >= L * 4 / 5;
- out.push(boundary);
- out.push('Content-Location: ' + (opts.root || 'file:///C:/SheetJS/') + fp);
- out.push('Content-Transfer-Encoding: ' + (qp ? 'quoted-printable' : 'base64'));
- out.push('Content-Type: ' + get_content_type(fi, fp));
- out.push('');
- out.push(qp ? write_quoted_printable(cstr) : write_base64_76(cstr));
- }
- out.push(boundary + '--\r\n');
- return out.join("\r\n");
- }
- function cfb_new(opts/*:?any*/)/*:CFBContainer*/ {
- var o/*:CFBContainer*/ = ({}/*:any*/);
- init_cfb(o, opts);
- return o;
- }
- function cfb_add(cfb/*:CFBContainer*/, name/*:string*/, content/*:?RawBytes*/, opts/*:?any*/)/*:CFBEntry*/ {
- var unsafe = opts && opts.unsafe;
- if(!unsafe) init_cfb(cfb);
- var file = !unsafe && CFB.find(cfb, name);
- if(!file) {
- var fpath/*:string*/ = cfb.FullPaths[0];
- if(name.slice(0, fpath.length) == fpath) fpath = name;
- else {
- if(fpath.slice(-1) != "/") fpath += "/";
- fpath = (fpath + name).replace("//","/");
- }
- file = ({name: filename(name), type: 2}/*:any*/);
- cfb.FileIndex.push(file);
- cfb.FullPaths.push(fpath);
- if(!unsafe) CFB.utils.cfb_gc(cfb);
- }
- /*:: if(!file) throw new Error("unreachable"); */
- file.content = (content/*:any*/);
- file.size = content ? content.length : 0;
- if(opts) {
- if(opts.CLSID) file.clsid = opts.CLSID;
- if(opts.mt) file.mt = opts.mt;
- if(opts.ct) file.ct = opts.ct;
- }
- return file;
- }
- function cfb_del(cfb/*:CFBContainer*/, name/*:string*/)/*:boolean*/ {
- init_cfb(cfb);
- var file = CFB.find(cfb, name);
- if(file) for(var j = 0; j < cfb.FileIndex.length; ++j) if(cfb.FileIndex[j] == file) {
- cfb.FileIndex.splice(j, 1);
- cfb.FullPaths.splice(j, 1);
- return true;
- }
- return false;
- }
- function cfb_mov(cfb/*:CFBContainer*/, old_name/*:string*/, new_name/*:string*/)/*:boolean*/ {
- init_cfb(cfb);
- var file = CFB.find(cfb, old_name);
- if(file) for(var j = 0; j < cfb.FileIndex.length; ++j) if(cfb.FileIndex[j] == file) {
- cfb.FileIndex[j].name = filename(new_name);
- cfb.FullPaths[j] = new_name;
- return true;
- }
- return false;
- }
- function cfb_gc(cfb/*:CFBContainer*/)/*:void*/ { rebuild_cfb(cfb, true); }
- exports.find = find;
- exports.read = read;
- exports.parse = parse;
- exports.write = write;
- exports.writeFile = write_file;
- exports.utils = {
- cfb_new: cfb_new,
- cfb_add: cfb_add,
- cfb_del: cfb_del,
- cfb_mov: cfb_mov,
- cfb_gc: cfb_gc,
- ReadShift: ReadShift,
- CheckField: CheckField,
- prep_blob: prep_blob,
- bconcat: bconcat,
- use_zlib: use_zlib,
- _deflateRaw: _deflate,
- _inflateRaw: _inflate,
- consts: consts
- };
- return exports;
- })();
|