QBga32.DLL: Hex Artifact Content

Artifact 5dc183bdbcf5799107f235cf8e88df639207a472:

File src/win32/lzexpand.d
- 2015-05-05 06:49:05 - part of checkin [9b639cf2d6] on branch trunk - Working version for update to 2.067.
  The problem was __gshared. Replacing it with TLS fixed the issue. Remaining problem is that "hack.d"'s CloseHandle hack is not working anymore.
  (user: kinaba) [annotate]
0000: 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  /***************
0010: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0020: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0030: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0040: 2a 2a 2a 2a 2a 2a 2a 2a 5c 0d 0a 2a 20 20 20 20  ********\..*    
0050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0060: 20 20 20 20 20 20 20 20 20 20 20 6c 7a 65 78 70             lzexp
0070: 61 6e 64 2e 64 20 20 20 20 20 20 20 20 20 20 20  and.d           
0080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0090: 20 20 20 2a 0d 0a 2a 20 20 20 20 20 20 20 20 20     *..*         
00a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
00b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
00c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
00d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0d                *.
00e0: 0a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .*              
00f0: 20 20 20 20 20 20 20 20 20 57 69 6e 64 6f 77 73           Windows
0100: 20 41 50 49 20 68 65 61 64 65 72 20 6d 6f 64 75   API header modu
0110: 6c 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20  le              
0120: 20 20 20 20 20 20 20 20 20 2a 0d 0a 2a 20 20 20           *..*   
0130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0170: 20 20 20 20 2a 0d 0a 2a 20 20 20 20 20 20 20 20      *..*        
0180: 20 20 20 20 20 20 20 20 20 54 72 61 6e 73 6c 61           Transla
0190: 74 65 64 20 66 72 6f 6d 20 4d 69 6e 47 57 20 57  ted from MinGW W
01a0: 69 6e 64 6f 77 73 20 68 65 61 64 65 72 73 20 20  indows headers  
01b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a                 *
01c0: 0d 0a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20  ..*             
01d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
01e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
01f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0200: 20 20 20 20 20 20 20 20 20 20 2a 0d 0a 2a 20 20            *..*  
0210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0220: 20 20 20 20 20 50 6c 61 63 65 64 20 69 6e 74 6f       Placed into
0230: 20 70 75 62 6c 69 63 20 64 6f 6d 61 69 6e 20 20   public domain  
0240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0250: 20 20 20 20 20 2a 0d 0a 5c 2a 2a 2a 2a 2a 2a 2a       *..\*******
0260: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0270: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0280: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0290: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
02a0: 2f 0d 0a 6d 6f 64 75 6c 65 20 77 69 6e 33 32 2e  /..module win32.
02b0: 6c 7a 65 78 70 61 6e 64 3b 0d 0a 70 72 61 67 6d  lzexpand;..pragm
02c0: 61 28 6c 69 62 2c 20 22 6c 7a 33 32 22 29 3b 0d  a(lib, "lz32");.
02d0: 0a 0d 0a 70 72 69 76 61 74 65 20 69 6d 70 6f 72  ...private impor
02e0: 74 20 77 69 6e 33 32 2e 77 69 6e 62 61 73 65 2c  t win32.winbase,
02f0: 20 77 69 6e 33 32 2e 77 69 6e 64 65 66 3b 0d 0a   win32.windef;..
0300: 0d 0a 65 6e 75 6d 20 3a 20 4c 4f 4e 47 20 7b 0d  ..enum : LONG {.
0310: 0a 09 4c 5a 45 52 52 4f 52 5f 42 41 44 49 4e 48  ..LZERROR_BADINH
0320: 41 4e 44 4c 45 20 20 3d 20 2d 31 2c 0d 0a 09 4c  ANDLE  = -1,...L
0330: 5a 45 52 52 4f 52 5f 42 41 44 4f 55 54 48 41 4e  ZERROR_BADOUTHAN
0340: 44 4c 45 20 3d 20 2d 32 2c 0d 0a 09 4c 5a 45 52  DLE = -2,...LZER
0350: 52 4f 52 5f 52 45 41 44 20 20 20 20 20 20 20 20  ROR_READ        
0360: 20 3d 20 2d 33 2c 0d 0a 09 4c 5a 45 52 52 4f 52   = -3,...LZERROR
0370: 5f 57 52 49 54 45 20 20 20 20 20 20 20 20 3d 20  _WRITE        = 
0380: 2d 34 2c 0d 0a 09 4c 5a 45 52 52 4f 52 5f 47 4c  -4,...LZERROR_GL
0390: 4f 42 41 4c 4c 4f 43 20 20 20 20 3d 20 2d 35 2c  OBALLOC    = -5,
03a0: 0d 0a 09 4c 5a 45 52 52 4f 52 5f 47 4c 4f 42 4c  ...LZERROR_GLOBL
03b0: 4f 43 4b 20 20 20 20 20 3d 20 2d 36 2c 0d 0a 09  OCK     = -6,...
03c0: 4c 5a 45 52 52 4f 52 5f 42 41 44 56 41 4c 55 45  LZERROR_BADVALUE
03d0: 20 20 20 20 20 3d 20 2d 37 2c 0d 0a 09 4c 5a 45       = -7,...LZE
03e0: 52 52 4f 52 5f 55 4e 4b 4e 4f 57 4e 41 4c 47 20  RROR_UNKNOWNALG 
03f0: 20 20 3d 20 2d 38 0d 0a 7d 0d 0a 0d 0a 65 78 74    = -8..}....ext
0400: 65 72 6e 20 28 57 69 6e 64 6f 77 73 29 3a 0d 0a  ern (Windows):..
0410: 64 65 70 72 65 63 61 74 65 64 20 7b 0d 0a 09 4c  deprecated {...L
0420: 4f 4e 47 20 43 6f 70 79 4c 5a 46 69 6c 65 28 49  ONG CopyLZFile(I
0430: 4e 54 2c 20 49 4e 54 29 3b 0d 0a 09 76 6f 69 64  NT, INT);...void
0440: 20 4c 5a 44 6f 6e 65 28 29 3b 0d 0a 09 49 4e 54   LZDone();...INT
0450: 20 4c 5a 53 74 61 72 74 28 29 3b 0d 0a 7d 0d 0a   LZStart();..}..
0460: 49 4e 54 20 47 65 74 45 78 70 61 6e 64 65 64 4e  INT GetExpandedN
0470: 61 6d 65 41 28 4c 50 53 54 52 2c 20 4c 50 53 54  ameA(LPSTR, LPST
0480: 52 29 3b 0d 0a 49 4e 54 20 47 65 74 45 78 70 61  R);..INT GetExpa
0490: 6e 64 65 64 4e 61 6d 65 57 28 4c 50 57 53 54 52  ndedNameW(LPWSTR
04a0: 2c 20 4c 50 57 53 54 52 29 3b 0d 0a 76 6f 69 64  , LPWSTR);..void
04b0: 20 4c 5a 43 6c 6f 73 65 28 49 4e 54 29 3b 0d 0a   LZClose(INT);..
04c0: 4c 4f 4e 47 20 4c 5a 43 6f 70 79 28 49 4e 54 2c  LONG LZCopy(INT,
04d0: 20 49 4e 54 29 3b 0d 0a 49 4e 54 20 4c 5a 49 6e   INT);..INT LZIn
04e0: 69 74 28 49 4e 54 29 3b 0d 0a 49 4e 54 20 4c 5a  it(INT);..INT LZ
04f0: 4f 70 65 6e 46 69 6c 65 41 28 4c 50 53 54 52 2c  OpenFileA(LPSTR,
0500: 20 4c 50 4f 46 53 54 52 55 43 54 2c 20 57 4f 52   LPOFSTRUCT, WOR
0510: 44 29 3b 0d 0a 49 4e 54 20 4c 5a 4f 70 65 6e 46  D);..INT LZOpenF
0520: 69 6c 65 57 28 4c 50 57 53 54 52 2c 20 4c 50 4f  ileW(LPWSTR, LPO
0530: 46 53 54 52 55 43 54 2c 20 57 4f 52 44 29 3b 0d  FSTRUCT, WORD);.
0540: 0a 49 4e 54 20 4c 5a 52 65 61 64 28 49 4e 54 2c  .INT LZRead(INT,
0550: 20 4c 50 53 54 52 2c 20 49 4e 54 29 3b 0d 0a 4c   LPSTR, INT);..L
0560: 4f 4e 47 20 4c 5a 53 65 65 6b 28 49 4e 54 2c 20  ONG LZSeek(INT, 
0570: 4c 4f 4e 47 2c 20 49 4e 54 29 3b 0d 0a 0d 0a 76  LONG, INT);....v
0580: 65 72 73 69 6f 6e 20 28 55 6e 69 63 6f 64 65 29  ersion (Unicode)
0590: 20 7b 0d 0a 09 61 6c 69 61 73 20 47 65 74 45 78   {...alias GetEx
05a0: 70 61 6e 64 65 64 4e 61 6d 65 57 20 47 65 74 45  pandedNameW GetE
05b0: 78 70 61 6e 64 65 64 4e 61 6d 65 3b 0d 0a 09 61  xpandedName;...a
05c0: 6c 69 61 73 20 4c 5a 4f 70 65 6e 46 69 6c 65 57  lias LZOpenFileW
05d0: 20 4c 5a 4f 70 65 6e 46 69 6c 65 3b 0d 0a 7d 20   LZOpenFile;..} 
05e0: 65 6c 73 65 20 7b 0d 0a 09 61 6c 69 61 73 20 47  else {...alias G
05f0: 65 74 45 78 70 61 6e 64 65 64 4e 61 6d 65 41 20  etExpandedNameA 
0600: 47 65 74 45 78 70 61 6e 64 65 64 4e 61 6d 65 3b  GetExpandedName;
0610: 0d 0a 09 61 6c 69 61 73 20 4c 5a 4f 70 65 6e 46  ...alias LZOpenF
0620: 69 6c 65 41 20 4c 5a 4f 70 65 6e 46 69 6c 65 3b  ileA LZOpenFile;
0630: 0d 0a 7d 0d 0a                                   ..}..