Нужна небольшая помощь в тестировании

← →
Rouse_ © (2011-03-01 11:00) [0]

Нужно проверить работу набора классов на предмет работоспособности и ворнингов под Delphi7.
Просьбу у кого стоит данная версия дельфи скачать вот этот архив: http://rouse.drkb.ru/files/fwzip.zip
Это набор классов для работы с ZIP архивами поддерживающий стандарт версии 4.5 с шифрованием архива по методу PKWARE.
В архиве сами исходники техсопроводиловка и 4 демопримера которые и нужно скомпилировать и проверить на работоспособность.
Заранее спасибо.

← →
И. Павел © (2011-03-01 11:12) [1]

CreateZip1:
[Hint] CreateZIPDemo1.dpr(41): Variable "ZipPath" is declared but never used in "CreateZIPDemo1"
При запуске вылетает исключение: EFOpenError. Не может открыть файл \<Login>\ntuser.dat, т.к. он уже кем-то открыт.

CreateZip2:
Варнингов нет, но ошибка прежняя.

ExtractZip1:
Вылетает Exception: "Не найдена сигнатура EON_OF_CENTRAL_DIR_SIGNATURE".

ExtractZip2:
Тоже не может открыть ntuser.dat.

← →
И. Павел © (2011-03-01 11:14) [2]

Забыл сказать: у меня Windows XP SP 3, на машине я локальный администратор.

← →
clickmaker © (2011-03-01 11:20) [3]

win 2003 SP2, полет нормальный

← →
Гость (2011-03-01 11:23) [4]

D7, winXPSP3

[Hint] CreateZIPDemo1.dpr(41): Variable "ZipPath" is declared but never used in "CreateZIPDemo1"

из 4х демок более нет ворнингов и хинтов
все включено, кроме Unsafe *

CreateZIPDemo1.dpr - ERangeCheck error
строка 851
FCD[Index].Header.LastModFileTimeTime := FileDate;

Stack
TFWZipWriter.SaveItemToStream($5101C8BF,8783736)
ErrorAt(204,$7C812AFB)
TFWZipWriter.SaveItemToStream($86A494,0)
TFWZipWriter.BuildZip($86A494)
TFWZipWriter.BuildZip(???)
CreateZIPDemo1

CreateZIPDemo2.dpr - аналогично

Extract1
if EndOfCentralDirectoryOffset = 0 then
raise Exception.Create("Не найдена сигнатура END_OF_CENTRAL_DIR_SIGNATURE.");

Extract2
строка 63 Item.Password := PasswordList[Random(4) + 1];
ERangeCheck error

Созданы какие-то архивы, но т.к. я их не могу посмотреть почему-то, отправлять не буду :)

← →
Rouse_ © (2011-03-01 11:25) [5]

Спасибо.
И. Павел © - а как у тебя получилось аж до ntuser.dat добраться, там вроде по идее относительный путь стоит в демке в PAS файлам из корня архива...
По поводу ZipPath спасибо - у меня почему-то ворнинг не поднялся.
Хм, правда странно, почему?

← →
Rouse_ © (2011-03-01 11:26) [6]

> Гость
Спасибо поправлю

← →
Думкин © (2011-03-01 11:29) [7]

D7, winXPSP3

Все нормально, только хинт указанный выше и все.

← →
clickmaker © (2011-03-01 11:31) [8]

но при включенном Range checking - ошибка [4], архив нулевого размера

причина ошибки
в LastModFileTimeDate: Word записываем Cardinal

← →
И. Павел © (2011-03-01 11:58) [9]

> а как у тебя получилось аж до ntuser.dat добраться, там
> вроде по идее относительный путь стоит в демке в PAS файлам
> из корня архива...

А я prj к исходникам скидывал. Видимо, поэтому... Если запускать из папок с prj то нормально работает.

← →
Rouse_ © (2011-03-01 12:10) [10]

Все вроде поправил, ссылка та-же.
Если кто-то что-то еще найдет, отпишитесь плз.

← →
Dennis I. Komarov © (2011-03-01 12:14) [11]

Скачал, вечерком гляну ;)

← →
Гость (2011-03-01 12:25) [12]

откомпилилось нормально
но вот чего смущает, если сказать cmd, потом

C:\>C:\SIP\CreateZIPDemo1.exe
EFOpenError: Cannot open file "C:\pagefile.sys". ╧ЁюЎхёё эх ьюцхЄ яюыєўшЄ№ фюёЄє
я ъ Їрщыє, Єръ ъръ ¤ЄюЄ Їрщы чрэ Є фЁєушь яЁюЎхёёюь

C:\>C:\SIP\CreateZIPDemo2.exe
EFOpenError: Cannot open file "C:\pagefile.sys". ╧ЁюЎхёё эх ьюцхЄ яюыєўшЄ№ фюёЄє
я ъ Їрщыє, Єръ ъръ ¤ЄюЄ Їрщы чрэ Є фЁєушь яЁюЎхёёюь

C:\>C:\SIP\ExctractZIPDemo1.exe
Exception: ═х эрщфхэр ёшуэрЄєЁр END_OF_CENTRAL_DIR_SIGNATURE.

C:\>C:\SIP\ExctractZIPDemo2.exe
EFOpenError: Cannot open file "C:\pagefile.sys". ╧ЁюЎхёё эх ьюцхЄ яюыєўшЄ№ фюёЄє
я ъ Їрщыє, Єръ ъръ ¤ЄюЄ Їрщы чрэ Є фЁєушь яЁюЎхёёюь

← →
clickmaker © (2011-03-01 12:30) [13]

> 12] Гость (01.03.11 12:25)

pagefile.sys намертво блокируется системой, даже на чтение
Да и кому придет в голову его архивировать? )

← →
Гость (2011-03-01 12:34) [14]

дык я ничего не говорил
>> C:\>C:\SIP\CreateZIPDemo1.exe
где там про pagefile.sys? :-)

и так если, то тоже
>> C:\SIP>CreateZIPDemo1.exe
EFOpenError: Cannot open file "C:\pagefile.sys". ╧Ёю
я ъ Їрщыє, Єръ ъръ ¤ЄюЄ Їрщы чрэ Є фЁєушь яЁюЎхёёюь

← →
Rouse_ © (2011-03-01 12:40) [15]

Там путь относительный - говорю-же, архивирует файлы на 2 директории выше, т.к. сами демки лежfть относительно корня архива ".\Demos\имя демки\", то и путь для архивации "..\..\*.*" :)

← →
Rouse_ © (2011-03-01 12:46) [16]

А ну и кстати если из самой консоли запускать, то текущий путь возьмется от расположения CMD.exe, и тут да - попробуется заархивироваться корневая директория :)

← →
han_malign (2011-03-01 12:47) [17]

> - говорю-же

- видимо имеется ввиду CharToOem...

← →
Гость (2011-03-01 12:50) [18]

Rouse_ © , "ты конечно програмер авторитетный"(С)ДУ :-), но надо преусмотреть!
вдруг на базы MSSQL напорется?!, и все остатки винта попытался занять

кстати, а тестировщикам именные классы подарены будут?
:-)

← →
Гость (2011-03-01 12:50) [19]

← →
Гость (2011-03-01 12:51) [20]

ух ты..
ну, значит, мне парочку классов :-|)

← →
brother © (2011-03-01 12:51) [21]

> именные классы подарены будут

забрал не спрашивая ;)

← →
Rouse_ © (2011-03-01 12:57) [22]

А зачем именные? :) В понедельник сделаю обновление сайта, в сопроводиловку тестировщиков забью с благодарностями :)

← →
Sergey Masloff (2011-03-01 13:25) [23]

Ага я тоже из cmd пробовал ;-)
У меня ворнинг не фиксируется. Уже поправил?

Да, по ссылке правленное уже лежит.

D2006 (TDE) полет вроде нормальный ;)
А зачем все по модулям разнес? Думаешь так легче?
Надо бы еще на скорость и объем будет затестить...

По модулям потому что у IDE крышу с какого-то момента начало рвать в плане автокомплишена после тыщ пяти строчек. Так и не понял причины на что она так сильно обиделась. С нашими ребятами посовещался, предложили по модулям распихать, вроде полегче стало. Да и часто программе нужен только один из функционалов, либо создать архив либо только распаковать.
По поводу скорости и расхода память эт я тестировал. Т.к. используется ZLib то быстрее чем он сам пакет/распаковывает не ускорить никак.
18 гигабайт жмутся за 27 минут, памяти расходуется при сжатии в пике до полумегобайта. Распаковывается минут за 8, памяти на распаковку отьедается около 100 с копейками килобайт.

> 18 гигабайт жмутся за 27 минут, памяти расходуется при сжатии
> в пике до полумегобайта. Распаковывается минут за 8, памяти
> на распаковку отьедается около 100 с копейками килобайт.

ого! О_о не плохие параметры!

Ну просто я не использую накопительные буферы в памяти, все пакуется поблочно по 64к и сразу пишется в результирующий TFileStream, основной расход памяти это на нужны ZLib

оно потокобезопасно?

Если честно не тестировал, но по логике да. Распаковка элементов завешена на критсекцию, а сжатие происходит вообще одним единственным вызовом. Единственно добавление элементов через критсекцию перед сжатием не обернуто критсекцией, но добавлю. Если критично - протестирую.

ну не к спеху, я так, разговор поддержать... =)

Ну собсно после "пивново совещания" прислушаюсь к мнению большинства. Тридсейф в данных компонентах излишен, бо смысла нет :) Завтра выложу обновленку, переписал класс паковщика с рекордов на классы, так проще управлять созданием архива получилось.

Удалено модератором
Примечание: рано :)

Нужна небольшая помощь в тестировании Найти похожие ветки