Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   С/С++, C#, Delphi, .NET, Asm (https://forum.antichat.xyz/forumdisplay.php?f=24)
-   -   Random file generator 0.1 by AlexTheC0d3r (https://forum.antichat.xyz/showthread.php?t=173122)

AlexTheC0d3r 23.01.2010 22:28
Random file generator 0.2 by AlexTheC0d3r - ОБНОВЛЕНИЕ
 
Random file generator v 0.2 by AlexTheC0d3r ОБНОВЛЕНИЕ!
Язык программирования - Delphi

Скриншот:

http://s59.radikal.ru/i166/1001/1d/7ee16855cb5b.jpg

Функционал:

Создает файл с любым именем и расширением в папку с программой (Предупреждение: Если такой файл уже существует, то программа перезапишет файл)

Скорость работы стала во много раз быстрее!!!
Если первый билд создавал гигабайтный файл минут 60, то этот справится меньше минуты!!!

Использовал WinAPI функции)

Необходимо доработать:

Возможность создание файла с произвольной иконкой, кто хочет помочь -http://forum.antichat.ru/showthread....15#post1849415

Начинаю разбираться в чем проблемы...но пока еще все глубоко...


Скачивание:

http://slil.ru/28547178

http://www.rapidshare.ru/1350034

Gar|k 23.01.2010 23:14
и зачем?

Kaimi 23.01.2010 23:26
Цитата:
и зачем?
Для тех кому лень в консоли набрать
fsutil file createnew файл размер

scrat 23.01.2010 23:35
не хватает web 2.0-дизайна и синхронизации с twitter и facebook

AlexTheC0d3r 23.01.2010 23:37
Цитата:
Сообщение от scrat
не хватает web 2.0-дизайна и синхронизации с twitter и facebook
эмм... не уловил идеи..

RDL_Rider 23.01.2010 23:46
да, и ещё добавь сплэш с последним багтраком, погодой и новостями в мире кино.....
тем не менее, лучше что-то, чем ничего. Все когда-то этим страдали.

Fliplab 24.01.2010 03:46
Что-то как-то не воткнул смысл проги. Да и вопрос, а если ты задащь размер ехе в 1 байт?)) Каким образом это выйдет? Да и вообще расскажи алгоритм генерации ехе, толи ты его нупами забиваешь, толи мусором из апи. Если бть честным, то мне это не актуально, а вот молодёже было бы интересненько почитать

Fliplab 24.01.2010 03:59
А для работы с ресурсами используй madRes.pas или PJResFile.pas

AlexTheC0d3r 24.01.2010 07:42
Забиваю файл я WORDами, размер которых соответственно 2 байта...

Цитата:
begin
v:=62552;
s:=edt3.text+'.'+edt4.text;
AssignFile(writef,s);
Rewrite(writef);
for i:=1 to ((StrToInt(edt2.text) div 2) + (StrToInt(edt2.text) mod 2)) do // так вычисляем сколько раз по 2 байта записать файл
write(writef,v);
Closefile(writef);
end;

slesh 24.01.2010 12:18
Ипануться. Науя? Это реально жесть.
Прогу можно сделать в стрко 10 отсилы.
При том что конструкция:
for i:=1 to ((StrToInt(edt2.text) div 2) + (StrToInt(edt2.text) mod 2)) do
Это полный здец. Да и использовать функции встроенные для работы с файлами - это не гуд.
А вот допустим если мне нужно создать файл на 16 гигов, то сколько времени она будет создавать его? Сутки или больше? И вообще врядли создаст потому как как 100% все значения dword

Вообще такие вешь делаются черзе апишки
CreateFile + WriteFile
Причем запись желательно делать по размеру кластера. Хотя 4096 байт самый раз.
Типа выделил блок памяти в 4096 байт. Посчитал сколько блоков нужно таких.
Гонешь цикл, забиваешь буфер мусором, а потом записываешь, и так далее.
Затем остаток байт просто дописываешь но уже с укороченным размером буфера.

Gar|k 24.01.2010 12:49
2 slesh ты что не видишь "best regards to Antichat" вот именно такие "хакеры" в разделе кодинга (да и в остальных) на этом форуме.

"Это печально" (c) Угонщик из ролика

cheater_man 24.01.2010 13:37
Цитата:
Сообщение от slesh
Ипануться. Науя? Это реально жесть.
Прогу можно сделать в стрко 10 отсилы.
При том что конструкция:
for i:=1 to ((StrToInt(edt2.text) div 2) + (StrToInt(edt2.text) mod 2)) do
Это полный здец. Да и использовать функции встроенные для работы с файлами - это не гуд.
А вот допустим если мне нужно создать файл на 16 гигов, то сколько времени она будет создавать его? Сутки или больше? И вообще врядли создаст потому как как 100% все значения dword

Вообще такие вешь делаются черзе апишки
CreateFile + WriteFile
Причем запись желательно делать по размеру кластера. Хотя 4096 байт самый раз.
Типа выделил блок памяти в 4096 байт. Посчитал сколько блоков нужно таких.
Гонешь цикл, забиваешь буфер мусором, а потом записываешь, и так далее.
Затем остаток байт просто дописываешь но уже с укороченным размером буфера.
Согласен :)

RDL_Rider 24.01.2010 16:24
Да ладно вам, не гнобите человека - он название, зато, звучное для проги придумал... ;)

AlexTheC0d3r 24.01.2010 20:01
Цитата:
Сообщение от slesh
Ипануться. Науя? Это реально жесть.
Прогу можно сделать в стрко 10 отсилы.
При том что конструкция:
for i:=1 to ((StrToInt(edt2.text) div 2) + (StrToInt(edt2.text) mod 2)) do
Это полный здец. Да и использовать функции встроенные для работы с файлами - это не гуд.
А вот допустим если мне нужно создать файл на 16 гигов, то сколько времени она будет создавать его? Сутки или больше? И вообще врядли создаст потому как как 100% все значения dword

Вообще такие вешь делаются черзе апишки
CreateFile + WriteFile
Причем запись желательно делать по размеру кластера. Хотя 4096 байт самый раз.
Типа выделил блок памяти в 4096 байт. Посчитал сколько блоков нужно таких.
Гонешь цикл, забиваешь буфер мусором, а потом записываешь, и так далее.
Затем остаток байт просто дописываешь но уже с укороченным размером буфера.
у меня возможно нет столько опыта в winapi процедурах сколько у тебя...

в будущем возможно сделаю все намного лучше и быстрее...

=Zeus= 25.01.2010 00:32
Когда увидел строку
for i:=1 to ((StrToInt(edt2.text) div 2) + (StrToInt(edt2.text) mod 2)) do
хотел поругать, но слеш уже все написал как нельзя лучше )))
Давайте обьясним почему это плохо. Потому что за каждый проход цикла делается команда StrToInt(edt2.text) div 2. Вместо этого можно было создать переменную и сделать так:
Код:
n := StrToInt(edt2.text) div 2;
m := StrToInt(edt2.text) mod 2;
for i:=1 to n+m do
Ну а вообще слеш уже все обьяснил.

0ldbi4 25.01.2010 01:58
Цитата:
у меня возможно нет столько опыта в winapi процедурах сколько у тебя...

в будущем возможно сделаю все намного лучше и быстрее...
Лучше похорони идею

][yZ 25.01.2010 02:07
слу, займись лучше чем-нибудь полезным... напиши очередной инвайтер в группы/проги и т.п.
и ниипи мозг больше таким полезным софтом, я до сих пор пытаюсь придумать, где его заюзать можно

nMonkn 25.01.2010 02:26
Цитата:
Сообщение от ][yZ
слу, займись лучше чем-нибудь полезным... напиши очередной инвайтер в группы/проги и т.п.
и ниипи мозг больше таким полезным софтом, я до сих пор пытаюсь придумать, где его заюзать можно
Палю тему.
Есть партнерки, с софтом, который создает запароленые архивы.
Чтобы открыть архив, нужно отправить смс.
Дальше сам додумаешь?

ЗЫ
Это одно из применений.
Так же, порой бывает необходимо проверить софт(i.e лоадер) на стабильность работы...

RedFern.89 25.01.2010 03:52
хм. лично для меня пользы никакой, хотя парень что то кодит)) глядишь в будущем напишет чонить для контакта)) блин мне бы свой мессенджер докодить)

AlexTheC0d3r 25.01.2010 08:31
Нет, для себя я все-таки хочу добить эту идею, до качественной программы...

плюсы: для меня опыт, где пригодиться может - в болталке тоже писал...

sn0w 25.01.2010 13:06
я тебе предлагаю это переделать в вайпер. суть таже - по очереди открываются файлы в папке, переписываются случайными значениями, закрываются, снова открываются и снова переписываются, а потом дружно сносятся. easyrecovery уже никогда не поможет восстановить инфу стертую таким образом)

AlexTheC0d3r 25.01.2010 23:56
Обновил программу, шапку тоже, ссылки поменял!..

Скорость работы стала во много раз быстрее!!!
Если первый билд создавал гигабайтный файл минут 60, то этот справится меньше минуты!!!

Использовал WinAPI функции)

AlexTheC0d3r 28.01.2010 08:29
Кто нибудь пробовал?

0ldbi4 28.01.2010 12:16
Я за идею snow, качать лень извини, добей ее до УДАЛЯЙТЕРА)) чтобы чистить папки перед приходом гостей из К

AlexTheC0d3r 29.01.2010 00:00
Цитата:
Сообщение от sn0w
я тебе предлагаю это переделать в вайпер. суть таже - по очереди открываются файлы в папке, переписываются случайными значениями, закрываются, снова открываются и снова переписываются, а потом дружно сносятся. easyrecovery уже никогда не поможет восстановить инфу стертую таким образом)
Воплотил идею в реальность:)

http://forum.antichat.ru/showthread.php?p=1860060#post1860060

ATC file wiper by AlexTheC0d3r


Время: 12:02