编写一个自我复制程序。

11

编写一个简单的程序，该程序在执行时会自我复制。

您的程序应为Windows，Linux等上的某种可执行文件，应生成新的可执行文件，该文件与原始可执行文件相同，带有随机名称，然后退出。

您的程序不应涉及任何类型的文件读取或复制。仅允许写入文件以生成新的可执行文件。

（附言。当我进入维基百科时，我很尴尬，Self-replicating program重定向到Computer virus文章...：/ ...）

最小的可执行文件大小为准。您的答案可能是带有正确的OS＆编译器的编程代码，汇编代码或可执行文件的HEX转储。

code-golf  quine 
— 吉民
source
6
这似乎与现有的[quine]挑战仅相差很小。还是我误会了？
— dmckee ---前主持人小猫，
1
@dmckee我看到汇编语言Quine和自复制Hello World程序接受复制，但是我找不到程序写自己，而不是代码。
— JiminP 2011年
1
...但是我想看看它是如何工作的。..我不知道如何用二进制代码扩展这个想法。PS。没有用于复制的编译器，也不允许任何脚本语言...：/
— JiminP 2011年
4
通过向其添加更多约束，可以使任何问题变得更加困难和难看。我发现这个问题是quine问题的简单扩展。
— Alexandru
1
如果最小的可执行文件大小获胜，我们是否也不应将解释器代码作为可执行文件大小的一部分考虑进来，以使其对编译语言的用户公平？
— Thomas Dignan 2011年

Answers:

4

巴什236

比严格必要的时间长，但我讨厌排队。尾随换行符是非可选的。

b=\\ q=\' r=\> d=\$
s='exec >$$; echo b=$b$b q=$b$q r=$b$r d=$b$d; echo s=$q$s$q'
t='echo t=$q$t$q; echo $s; echo $t; chmod 777 $$'
exec >$$; echo b=$b$b q=$b$q r=$b$r d=$b$d; echo s=$q$s$q
echo t=$q$t$q; echo $s; echo $t; chmod 777 $$
— JB
source
实际上，这不是我想要的，但是，因为我写了一个“错误的”问题，而您的回答却是个好
— 主意
@JiminP：怎么不是您想要的？我只是再次阅读了问题描述两次，却无法理解。
— JB
好吧...我想要的是一个可执行的二进制代码。正如我在上面承认的那样，由于我的问题不是很“正确”，对此表示抱歉。
— JiminP 2011年
3
@JiminP好吧，是的，“ binary”一词根本不在问题中出现。我只是在评论中找到了它，但是对于这样的限制，它并没有减少它。您可以使用评论中所有合并的输入来打开一个新问题。我建议您使用沙盒确保常规人员可以帮助您消除一些小细节。但是要注意，二进制答案往往是无聊的。
— JB
10

用于x86 Linux的程序集，106字节

BITS 32
                org     0x2E620000
                db      0x7F, "ELF", 1, 1, 1, 0 ; e_ident
                dd      0, 0
                dw      2                       ; e_type
                dw      3                       ; e_machine
                dd      1                       ; e_version
                dd      _start                  ; e_entry
                dd      phdr - $$               ; e_phoff
                dd      0                       ; e_shoff
                dd      0                       ; e_flags
                dw      0x34                    ; e_ehsize
                dw      0x20                    ; e_phentsize
phdr:           dd      1                       ; e_phnum       ; p_type
                                                ; e_shentsize
                dd      0                       ; e_shnum       ; p_offset
                                                ; e_shstrndx
                dd      $$                                      ; p_vaddr
fname           equ     $ - 2
                db      'out', 0                                ; p_paddr
                dd      filesize                                ; p_filesz
                dd      filesize                                ; p_memsz
                dd      5                                       ; p_flags
                dd      0x1000                                  ; p_align
_start:         mov     al, 5                   ; 5 = open syscall
                mov     ebx, fname
                mov     cl, 65                  ; 65 = O_WRONLY | O_CREAT
                mov     dx, 666q
                int     0x80
                lea     edx, [byte ecx + filesize - 65]
                xchg    eax, ebx
                xchg    eax, ecx
                mov     cl, 0
                mov     al, 4                   ; 4 = write syscall
                int     0x80
                mov     al, 1                   ; 1 = exit syscall
                int     0x80
filesize        equ     $ - $$

这是供nasm汇编程序使用的。使用命令行构建二进制文件：nasm -f bin -o a.out selfrep.asm && chmod +x a.out

这是与十六进制转储相同的文件： 7F 45 4C 46 01 01 01 00 00 00 00 00 00 00 00 00 02 00 03 00 01 00 00 00 4C 00 62 2E 2C 00 00 00 00 00 00 00 00 00 00 00 34 00 20 00 01 00 00 00 00 00 00 00 00 00 62 2E 6F 75 74 00 6A 00 00 00 6A 00 00 00 05 00 00 00 00 10 00 00 B0 05 BB 36 00 62 2E B1 41 66 BA B6 01 CD 80 8D 51 29 93 91 B1 00 B0 04 CD 80 B0 01 CD 80

根据要求，程序将自身复制到单独的文件中。（如果只允许将程序写入stdout并允许用户重定向到文件，则该程序可能会大大缩短。）

我避免使用任何边界技巧来减小大小。这应该是完全符合要求的32位ELF二进制文件。

编辑添加：在上述版本中，创建的文件只是一个普通文件，但是在我看来，对于几个字节（规则稍有改动），您可以创建一些更有趣的东西。此版本仅长两个字节，为108个字节：

BITS 32
                org     0x00010000
                db      0x7F, "ELF", 1, 1, 1, 0 ; e_ident
                dd      0, 0
                dw      2                       ; e_type
                dw      3                       ; e_machine
                dd      1                       ; e_version
                dd      _start                  ; e_entry
                dd      phdr - $$               ; e_phoff
                dd      0                       ; e_shoff
                dd      0                       ; e_flags
                dw      0x34                    ; e_ehsize
                dw      0x20                    ; e_phentsize
phdr:           dd      1                       ; e_phnum       ; p_type
                                                ; e_shentsize
                dd      0                       ; e_shnum       ; p_offset
                                                ; e_shstrndx
                dd      $$                                      ; p_vaddr
fname:          db      'asr', 0                                ; p_paddr
                dd      filesize                                ; p_filesz
                dd      filesize                                ; p_memsz
                dd      7                                       ; p_flags
                dd      0x1000                                  ; p_align
_start:         mov     al, 5                   ; 5 = open syscall
                mov     ebx, fname
                inc     byte [ebx]
                mov     cl, 65                  ; 65 = O_WRONLY | O_CREAT
                mov     dx, 777q
                int     0x80
                lea     edx, [byte ecx + filesize - 65]
                xchg    eax, ebx
                xchg    eax, ecx
                mov     cl, 0
                mov     al, 4                   ; 4 = write syscall
                int     0x80
                mov     al, 1                   ; 1 = exit syscall
                int     0x80
filesize        equ     $ - $$

将此版本命名asr为“自我复制者”：nasm -f bin -o asr asr.asm && chmod +x asr

nasm受损的十六进制转储版本： 7F 45 4C 46 01 01 01 00 00 00 00 00 00 00 00 00 02 00 03 00 01 00 00 00 4C 00 01 00 2C 00 00 00 00 00 00 00 00 00 00 00 34 00 20 00 01 00 00 00 00 00 00 00 00 00 01 00 61 73 72 00 6C 00 00 00 6C 00 00 00 07 00 00 00 00 10 00 00 B0 05 BB 38 00 01 00 FE 03 B1 41 66 BA FF 01 CD 80 8D 51 2B 93 91 B1 00 B0 04 CD 80 B0 01 CD 80

运行该文件时，它会创建一个几乎相同的文件，名为bsr，但文件本身是可执行文件。运行它会创建另一个名为的二进制文件csr。等等。

（请注意，烦人的事情之后开始发生zsr。我考虑过制作一个将名称更改为层叠的版本，atr依此类推，但是我认为大多数人在此之前会感到无聊，因此可能不值得所有额外的字节。 ）

— 面包箱
source
+1以获得组装答案！您看过组装成绳捆的挑战吗？
— MD XF
2

这是一个概念验证（无注释），它显示了.NET中的编译服务如何用于即时编译源代码以生成相同的输出。第一个副本与原始副本不同，但是后续运行中的后续副本与随机文件名完全相同：

using System;
using Microsoft.CSharp;
using System.CodeDom.Compiler;

namespace _2947
{
    class Program
    {
        static void Main(string[] args)
        {
            Console.WriteLine("Hello world!");

            var s = @"
using System;
using System.CodeDom.Compiler;
using Microsoft.CSharp;

namespace _2947
{{
    class Program
    {{
        static void Main(string[] args)
        {{
            Console.WriteLine({1}Hello world!{1});

            var s = @{1}{0}{1};
            s = string.Format(s, s, '{1}');

            string exeName = Environment.CurrentDirectory + @{1}\{1} + new Random().Next(1000, 9999) + {1}.exe{1};

            CompilerParameters cp = new CompilerParameters();
            cp.GenerateExecutable = true;
            cp.OutputAssembly = exeName;
            cp.GenerateInMemory = false;
            cp.TreatWarningsAsErrors = false;
            cp.ReferencedAssemblies.Add({1}System.dll{1});

            var c = CSharpCodeProvider.CreateProvider({1}cs{1});
            var cr = c.CompileAssemblyFromSource(cp, s);
        }}
    }}
}}
";
            s = string.Format(s, s, '"');

            string exeName = Environment.CurrentDirectory + @"\" + new Random().Next(1000, 9999) + ".exe";

            CompilerParameters cp = new CompilerParameters();
            cp.GenerateExecutable = true;
            cp.OutputAssembly = exeName;
            cp.GenerateInMemory = false;
            cp.TreatWarningsAsErrors = false;
            cp.ReferencedAssemblies.Add("System.dll");

            var c = CSharpCodeProvider.CreateProvider("cs");
            var cr = c.CompileAssemblyFromSource(cp, s);
        }
    }
}

在命令行上的演示输出：

C:\projects\codegolf\2947\2947\bin\Debug>2947
Hello world!

C:\projects\codegolf\2947\2947\bin\Debug>dir
 Volume in drive C has no label.
 Volume Serial Number is 361D-4479

 Directory of C:\projects\codegolf\2947\2947\bin\Debug

09/27/2011  02:17 PM    <DIR>          .
09/27/2011  02:17 PM    <DIR>          ..
09/27/2011  02:17 PM             7,680 2947.exe
09/27/2011  02:17 PM            13,824 2947.pdb
09/27/2011  01:33 PM            11,600 2947.vshost.exe
09/27/2011  02:17 PM             6,656 8425.exe
               4 File(s)         39,760 bytes
               2 Dir(s)   6,486,368,256 bytes free

C:\projects\codegolf\2947\2947\bin\Debug>8425
Hello world!

C:\projects\codegolf\2947\2947\bin\Debug>dir
 Volume in drive C has no label.
 Volume Serial Number is 361D-4479

 Directory of C:\projects\codegolf\2947\2947\bin\Debug

09/27/2011  02:17 PM    <DIR>          .
09/27/2011  02:17 PM    <DIR>          ..
09/27/2011  02:17 PM             7,680 2947.exe
09/27/2011  02:17 PM            13,824 2947.pdb
09/27/2011  01:33 PM            11,600 2947.vshost.exe
09/27/2011  02:17 PM             6,656 7538.exe
09/27/2011  02:17 PM             6,656 8425.exe
               5 File(s)         46,416 bytes
               2 Dir(s)   6,486,360,064 bytes free

C:\projects\codegolf\2947\2947\bin\Debug>7538
Hello world!

C:\projects\codegolf\2947\2947\bin\Debug>dir
 Volume in drive C has no label.
 Volume Serial Number is 361D-4479

 Directory of C:\projects\codegolf\2947\2947\bin\Debug

09/27/2011  02:17 PM    <DIR>          .
09/27/2011  02:17 PM    <DIR>          ..
09/27/2011  02:17 PM             7,680 2947.exe
09/27/2011  02:17 PM            13,824 2947.pdb
09/27/2011  01:33 PM            11,600 2947.vshost.exe
09/27/2011  02:17 PM             6,656 4127.exe
09/27/2011  02:17 PM             6,656 7538.exe
09/27/2011  02:17 PM             6,656 8425.exe
               6 File(s)         53,072 bytes
               2 Dir(s)   6,486,351,872 bytes free

C:\projects\codegolf\2947\2947\bin\Debug>
— ella
source
2

批量

版本1（30字节）

type%0>%random%.bat&type%0>con

我赢了！:)

— 脚步
source
％0引用导致从文件中读取，这违反了规则。此外，我的二进制版本更短。:-)
— 彼得·费里
1

DOS COM文件-50字节

创建一个文件X.COM，其中X将其替换为当前时间的一位数字。COM文件只是100h在数据段的偏移量处加载到内存中（CS和DS设置为相同），因此我们可以简单地将此内存写出到文件中。

0000000: b402 cd1a 80e6 0f80 ce30 8836 2c01 31c9  .........0.6,.1.
0000010: ba2c 01b4 3ccd 21c6 062c 0178 89c3 b440  .,..<.!..,.x...@
0000020: ba00 01b9 3200 cd21 b44c cd21 782e 636f  ....2..!.L.!x.co
0000030: 6d00                                     m.

nasm来源

org 100h ; this is a COM file
mov ah,02h ; fn=get time
int 1ah ; rtc interrupt
; convert to ascii - dh gets ones digit of seconds
and dh,0fh
or dh,30h
mov [fname],dh ; move time into filename
xor cx,cx ; clear attributes
mov dx,fname ; load filename
mov ah,3ch ; fn=create file
int 21h ; dos interrupt
mov byte [fname],'x' ; reset filename
mov bx,ax ; set filehandle
mov ah,40h ; fn=write to file
mov dx,100h ; offset is the loaded binary
mov cx,len ; length of write
int 21h ; dos iterrupt
mov ah,4ch ; fn=exit
int 21h ; dos interrupt
fname: db 'x.com',0
len equ $-$$
— 杰夫·里迪（Geoff Reedy）
source
1

DOS .COM文件，29字节

字母的前半部分+（+，A，C，E，G等）中的“ @”随机替换为奇数字母。输出文件为255或256字节。实际DOS中（与调试器相对）的初始寄存器是AX = 0000，CX = 00FF，SI = 0100。

40       INC  AX         ;"@"
2E       CS:             ;"."
43       INC  BX         ;"C"
4F       DEC  DI         ;"O"
4D       DEC  BP         ;"M"
00 20    ADD  [BX+SI],AH ;"\0" and dummy parm
E4 40    IN   AL,40
24 0F    AND  AL,0F
0C 41    OR   AL,41
88 04    MOV  [SI],AL
B4 3C    MOV  AH,3C
41       INC  CX
89 F2    MOV  DX,SI
CD 21    INT  21
93       XCHG BX,AX
B4 40    MOV  AH,40
49       DEC  CX
CD 21    INT  21
C3       RET
— 彼得·费里
source
0

DOS COM文件-36字节

56 BE 80 00 AD FE C8 A2 10 01 7E 17 89 F2 88 74
02 B4 3C 33 C9 CD 21 72 0A 8B D8 B4 40 5A B9 24
00 CD 21 C3

在命令行上指定输出文件名，将其截断为8.3格式，空格确定（DOS文件名中的空格是合法的）。使用WinXP命令提示符进行了测试。

— 斯基兹
source
By using our site, you acknowledge that you have read and understand our Cookie Policy and Privacy Policy.
Licensed under cc by-sa 3.0 with attribution required.