index 42816ab40d1b099922b82f2c8f4e2b01003ae256..3933330bff7ef979eaa81170718e324ca2716b06 100644 (file)
// - File must start with LFH or EOCD signature
// - EOCD must be located strictly at the end of file
// - Multi-disk ZIP files are not supported
-// - Expect UTF-8 or CP1251 encoded names
-// - ZIP64 not supported
-// - Encryption not supported
-// - Zero-length file names not supported
+// - Expects UTF-8 or CP1251 encoded names
+// - ZIP64 is not supported
+// - Encryption is not supported
+// - Zero-length file names are not supported
// - CDR holds most actual data about file, LFH mostly ignored
// - Attributes and extra data are ignored and not preserved
-// - Store and Deflate compression supported
+// - Supports STORE and DEFLATE compression methods
interface
case comp of
ZIP_COMP_STORE:
if csize <> usize then
- raise Exception.Create('Compressed size ' + IntToStr(csize) + ' != Descompressed size ' + IntToStr(usize) + 'for STORE method (corrupted file?)');
+ raise Exception.Create('Compressed size ' + IntToStr(csize) + ' != Decompressed size ' + IntToStr(usize) + 'for STORE method (corrupted file?)');
ZIP_COMP_SHRUNK,
ZIP_COMP_REDUCE1,
ZIP_COMP_REDUCE2,
ZIP_COMP_PPMD:
; // ok
ZIP_COMP_AE:
- raise Exception.Create('Encrypted archives not supported');
+ raise Exception.Create('Encrypted archives are not supported');
otherwise
raise Exception.Create('Unknown compression method ' + IntToStr(comp));
end;
end;
if gWADEditorLogLevel >= DFWAD_LOG_DEBUG then
begin
- e_WriteLog('CDR#' + IntToStr(cdrid) + ' @' + IntToHex(mypos, 8) + ': UTF-8 Comatible : ' + BoolToStr(utf8, True), MSG_NOTIFY);
+ e_WriteLog('CDR#' + IntToStr(cdrid) + ' @' + IntToHex(mypos, 8) + ': UTF-8 Compatible : ' + BoolToStr(utf8, True), MSG_NOTIFY);
e_WriteLog('CDR#' + IntToStr(cdrid) + ' @' + IntToHex(mypos, 8) + ': Name : "' + name + '"', MSG_NOTIFY);
e_WriteLog('CDR#' + IntToStr(cdrid) + ' @' + IntToHex(mypos, 8) + ': Comment : "' + comment + '"', MSG_NOTIFY);
end;
s.Seek(next, TSeekOrigin.soBeginning);
end
else
- raise Exception.Create('Empty files names not supported');
+ raise Exception.Create('Empty files names are not supported');
end
else
- raise Exception.Create('Splitted archives not supported');
+ raise Exception.Create('Split archives are not supported');
end
else
begin
FLastError := DFWAD_ERROR_WRONGVERSION;
- raise Exception.Create('ZIP64 archives not supported');
+ raise Exception.Create('ZIP64 archives are not supported');
end;
end
else
begin
FLastError := DFWAD_ERROR_READWAD;
- raise Exception.Create('Patch archives not supported');
+ raise Exception.Create('Patch archives are not supported');
end;
end
else
begin
FLastError := DFWAD_ERROR_READWAD;
- raise Exception.Create('Encrypted archives not supported');
+ raise Exception.Create('Encrypted archives are not supported');
end;
end
else
end;
if gWADEditorLogLevel >= DFWAD_LOG_DEBUG then
begin
- e_WriteLog('EOCD @' + IntToHex(mypos, 8) + ': UTF8 Comaptible : ' + BoolToStr(utf8, True), MSG_NOTIFY);
+ e_WriteLog('EOCD @' + IntToHex(mypos, 8) + ': UTF-8 Compatible : ' + BoolToStr(utf8, True), MSG_NOTIFY);
e_WriteLog('EOCD @' + IntToHex(mypos, 8) + ': Comment : "' + FComment + '"', MSG_NOTIFY);
end;
i := 0;
end
else
begin
- raise Exception.Create('No data source available (somethig very wrong)');
+ raise Exception.Create('No data source available (something very wrong)');
end;
end;
end