Ваша задача сегодня будет взять существующий файл и добавлять к нему нули, пока он не достигнет определенного размера.

Вы должны написать программу или функцию, которая берет имя файла в текущем каталоге fи количество байтов b. Сохраняя исходное содержимое f, вы должны записать нули (нулевые байты, а не ascii 0s) до конца, чтобы его новый размер был в bбайтах.

Вы можете предположить, что fв его имени есть только буквенно-цифровой ascii, что у вас есть полные права на него, что он изначально не больше b, но может быть таким же большим b, и что существует бесконечное свободное дисковое пространство.

Вы можете не предполагать f, что он не пустой или что он еще не содержит нулевых байтов.

Другие существующие файлы не должны быть изменены, а новые файлы не должны существовать после завершения выполнения.

Тестовые случаи

Содержание е | б | Результирующее содержание f
12345 | 10 | 1234500000
0 | 3 | 000
[пусто] | 2 | 00
[пусто] | 0 | [Пусто]
123 | 3 | 123

Баш + coreutils, 13

truncate -s$@

Ввод из командной строки - первый параметр - это размер файла, а второй - имя файла.

От man truncate:

Если ФАЙЛ короче, он расширяется, и расширенная часть (отверстие) читается как нулевые байты.

Попробуйте онлайн .

Groovy, 54 47 43 41 байт

{a,b->(c=new File(a))<<'\0'*(b-c.size())}

-6 благодаря идее manatwork по удалению петли; это была моя оригинальная идея, не знаю, почему я думал, что это не сработает, и выбрал цикл ... Он определенно работает, просто проверил его.

Ungolfed:

{
    a,b->                    // Two inputs: a is the File name, b is the desired size.
    File c = new File(a)     // Make and store the file.
    c << '\0'*(b-c.size())   // Append the difference between b and c.size() in nullbytes.
}
                             // Usually a close would be required, but, in Groovy,
                             // because private data isn't so protected, if a File
                             // Object goes out of scope, the attached Stream is 
                             // automatically flushed to disk.

APL (Dyalog) , 33 17 байт

⎕⎕NRESIZE⍞⎕NTIE¯1

Попробуйте онлайн!

Python 2 , 59 57 54 байта

^{-5 байт благодаря чепнеру}

def g(n,b):f=open(n,'a');f.write('\0'*b);f.truncate(b)

PHP, 66 байт

for($p=fopen($f=$argv[1],a);filesize($f)<$argv[2];)fputs($p,"\0");

Принимает данные из аргументов командной строки; беги с -nr.

Эти 55 байтов могут, но, скорее всего, не будут работать:

fseek($p=fopen($argv[1],"w+"),$argv[2]);fputs($p,"\0");

Java (Oracle JRE), 55 байт

f->b->new java.io.RandomAccessFile(f,"rw").setLength(b)

В спецификации setLength(int)говорится, что добавленные байты не определены, но практически Oracle JRE добавляет только 0байт (поэтому я и указал его).

Ресурс автоматически закрывается JVM, поэтому нам не нужно делать это самостоятельно.

Тестовое задание

public class Pcg125661 {
  interface F {
    B f(String f);
  }
  interface B {
    void b(int b) throws java.io.IOException;
  }
  public static void main(String[] args) throws java.io.IOException {
    F a = f->b->new java.io.RandomAccessFile(f,"rw").setLength(b);
    a.f("a").b(100);
  }
}

AHK, 48 байтов

FileGetSize,s,%1%
2-=s
Loop,%2%
FileAppend,0,%1%

1и 2являются первыми двумя параметрами в скрипте AHK.
FileGetSizeработает в байтах по умолчанию.
Это не интересно, но просто: возьмите размер, вычтите его из желаемого размера и добавьте столько нулей.

Perl 6 , 40 байт

{$_=$^a.IO;.open(:a).put("\0"x($^b-.s))}

$^aи $^bявляются параметрами функции - имя файла и длина соответственно.

Python 2 , 68 байт

def g(f,b):
 with open(f,'r+')as c:c.write('\x00'*(b-len(c.read())))

Попробуйте онлайн! (При печати содержимого файла код заменяет нулевые байты на ASCII 0 для наглядности.)

PowerShell, 69 байт

param($f,$s)@(gc $f -en by)+,[byte]0*($s-(gi $f).length)|sc $f -en by
#     ^ filename
#        ^desired size
#                 ^ get content as byte stream
#           ^force it to an array even if there's 0 or 1 byte
#                          ^append a byte array of nulls..
#                                       ^..desired size - file size
#                            write to file with -encoding byte ^

$fдля файла, $sдля конечного размера, сохраните как .ps1 и запустите

.\Add-NullBytesToFile.ps1 .\test.txt 10

Это оболочка, так что должен быть действительно маленький цикл, добавляющий 1 байт с >>перенаправлением вывода и добавлением, верно? Ну, нет, потому что >>выводит только многобайтовую кодировку UCS2-LE, так что нет никакого способа добавить один байт в файл с ним ... если вы не используете PSv5.1, и вы можете изменить это, но это делает его слишком длинным, чтобы быть конкурентоспособным :

$PSDefaultParameterValues['Out-File:Encoding']='utf8';while((gi $f).length-lt$c){[byte]0>>$f}

Может быть, есть подход .Net Framework? Должно быть, но я не могу заставить его писать какие-либо байты или ошибки. Но это все равно больше

param($f,$s)[io.file]::WriteAllBytes($f,[byte[]](,0)*($c-(gi $f).length), $True)

Mathematica 50 байтов

Импорт Экспорт

Export[#,Import[#,c="Byte"]~Join~Table[0,{#2}],c]&

использование

%["test1", 5]

q, 29 байт

Функция, которая принимает имя файла в формате :/foo/bar.bazи длине как целое число.

{hopen[x](0|y-hcount x)#0x00}

Пример:

{hopen[x](0|y-hcount x)#0x00}[`:test.txt;100]

C, 56 байтов

fseek(f,0,2);int i;for(;ftell(f)<b;)putc(0,f);fclose(f);

Программа находит размер файла и количество байтов для добавления. Затем файл добавляет fs - bдополнительные байты в конец.

C #, 90 байт

using System.IO;s=>n=>File.AppendAllText(s,new string('\0',(int)new FileInfo(s).Length-n))