Nhiệm vụ của bạn hôm nay sẽ là lấy một tập tin hiện có và nối các số không vào nó cho đến khi nó đạt đến một kích thước nhất định.

Bạn phải viết một chương trình hoặc hàm lấy tên của một tệp trong thư mục hiện tại fvà một số byte b. Trong khi duy trì nội dung ban đầu của f, bạn phải ghi các số 0 (null byte, không phải ascii 0s) đến cuối để kích thước mới của nó là bbyte.

Bạn có thể giả sử rằng fchỉ có ascii chữ và số trong tên của nó, rằng bạn có toàn quyền đối với nó, ban đầu nó không lớn hơn b, nhưng có thể lớn bằng b, và có không gian đĩa trống vô hạn.

Bạn có thể không cho flà không trống hoặc nó không chứa byte rỗng.

Các tệp hiện có khác không nên được sửa đổi và các tệp mới sẽ không tồn tại sau khi kết thúc thực hiện.

Các trường hợp thử nghiệm

Nội dung của f | b | Nội dung kết quả của f
12345 | 10 | 1234500000
0 | 3 | 000
[trống] | 2 | 00
[trống] | 0 | [trống]
123 | 3 | 123

Bash + coreutils, 13

truncate -s$@

Nhập từ dòng lệnh - tham số đầu tiên là kích thước tệp và thứ hai là tên tệp.

Từ man truncate:

Nếu một TẬP TIN ngắn hơn, nó được mở rộng và phần mở rộng (lỗ) đọc là byte không.

Hãy thử trực tuyến .

Groovy, 54 47 43 41 byte

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

-6 nhờ ý tưởng của manatwork về việc loại bỏ vòng lặp; đó là ý tưởng ban đầu của tôi, không biết tại sao tôi nghĩ nó không hoạt động và đã chọn một vòng lặp ... Nó chắc chắn hoạt động, chỉ cần thử nghiệm nó.

Ung dung:

{
    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 byte

⎕⎕NRESIZE⍞⎕NTIE¯1

Hãy thử trực tuyến!

Python 2 , 59 57 54 byte

^{-5 byte nhờ chepner}

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

PHP, 66 byte

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

Lấy đầu vào từ các đối số dòng lệnh; chạy với -nr.

55 byte này có thể, nhưng hầu hết có thể sẽ không hoạt động:

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

Java (Oracle JRE), 55 byte

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

Thông số kỹ thuật setLength(int)nói rằng các byte được nối thêm không được xác định, nhưng thực tế, Oracle JRE chỉ nối thêm 0byte (đó là lý do tại sao tôi chỉ định nó).

Tài nguyên được JVM tự động đóng lại, vì vậy chúng ta không cần phải tự làm điều đó.

Kiểm tra

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 byte

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

1và 2là hai tham số đầu tiên trong tập lệnh AHK.
FileGetSizehoạt động theo byte theo mặc định.
Nó không thú vị, nhưng nó đơn giản: Lấy kích thước, trừ nó khỏi kích thước mong muốn và thêm nhiều số không.

Perl 6 , 40 byte

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

$^avà $^blà các tham số cho hàm - tên tệp và độ dài, tương ứng.

Python 2 , 68 byte

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

Hãy thử trực tuyến! (Khi in nội dung của tệp, mã sẽ thay thế các byte rỗng bằng ASCII 0 để hiển thị.)

PowerShell, 69 byte

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đối với tệp, $sđối với kích thước đích, lưu dưới dạng .ps1 và chạy

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

Đó là một cái vỏ, vì vậy cần có một vòng lặp thực sự nhỏ thêm 1 byte với >>chuyển hướng đầu ra và nối thêm, phải không? Chà, không, bởi vì >>chỉ xuất ra mã hóa đa bào UCS2-LE nên không có cách nào để thêm một byte vào một tệp với nó .. trừ khi bạn đang sử dụng PSv5.1 và bạn có thể thay đổi điều đó nhưng điều đó quá dài để cạnh tranh :

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

Có lẽ có một cách tiếp cận .Net Framework? Cần phải có, nhưng tôi không thể làm cho nó thực sự ghi bất kỳ byte hoặc lỗi nào. Nhưng dù sao nó cũng dài hơn:

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

Toán học 50 byte

Nhập khẩu xuất khẩu

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

Sử dụng

%["test1", 5]

q, 29 byte

Hàm lấy tên tệp theo định dạng :/foo/bar.bazvà độ dài làm số nguyên.

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

Thí dụ:

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

C, 56 byte

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

Chương trình tìm kích thước của tệp và thêm bao nhiêu byte. Các tập tin sau đó thêm fs - bbyte vào cuối.

C #, 90 byte

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