Генератор случайных файлов (снова!)

Question

Мне очень нужен генератор случайных файлов, который генерирует действительно случайных, не сжимаемых файлов-манекенов.

Я закончил с этим кодом delphi. Это работает, но это болезненно sloooow

var 
    Buf  : Integer; 
    TheFile : TFileStream; 
begin 
     TheFile := TFileStream.Create(FileName, fmCreate OR fmOpenReadWrite); 
     with TheFile do 
     begin 
      for i := 0 to FileSize do // Iterate 
      begin 
       Buf := Random(999999) * i; 
       WriteBuffer(Buf, SizeOf(Buf)); 
      end; // for 
     end; // with 
end, 

Мой вопрос: Есть ли быстро генератор случайных файлов, которые я могу использовать? Оба Delphi код и/или командная строка инструментов приемлемы до тех пор, как:

1. Я могу запустить его на Windows, без ручного вмешательства (мне это нужно для моих тестов, никакого вмешательства не допускается)
2. Это быстро
3. файлы генерируемый несжимаемая (то есть. сжатие сгенерированных файла результатов не экономии пространства)

---

EDIT Для тех, кто заинтересован, я применил совет, который я получил здесь и made this function, это достаточно быстро & 7zip имеет трудное время сжатия сгенерированные данные.

Answer 1

Используйте 4096-байтный размер страницы или несколько буферов размера страницы. Написание одного целого за раз будет медленным.

Answer 2

Вы можете использовать мой сценарий generate_random_file.py (Python 3), который я использовал для генерации тестовых данных в моем проекте.

• Он работает как на Linux, так и на Windows.
• Это очень быстро, потому что он использует os.urandom() для генерации случайных данных в кусках 256 KiB вместо генерации и записи каждого байта отдельно.