Click here to Skip to main content
15,881,715 members
Articles / Programming Languages / Visual Basic

Real Self-Replicating Program

Rate me:
Please Sign up or sign in to vote.
4.58/5 (16 votes)
19 Nov 2007CPOL3 min read 69.7K   1.3K   57   17
A self-reproducing, mutable, compiling, and executing computer program.

Screenshot - SelfReplication.png

Introduction

From Wiki:

Self-replication is any process by which a thing might make a copy of itself.

Background

At one point, I wanted a small program to compile some Notepad edited scripts and run them on the fly. There is this nice project called "C# Script: The Missing Puzzle Piece". But, that is for professionals. And then, one night I went to do some coding. And came up with a code compiler. But, this was not enough. I wanted to store the source-code for this program into the program itself, and a final spec was to generate this same source code out of the program.

In short:

  1. There is only one executable.
  2. When starting the executable, it generates its own source code.
  3. When starting the executable again, it compiles this source code and executes it, showing the same user interface!

    A nice test is to delete the executable and compile the generated source code by using Visual Studio or the command line C# compiler:

    > del SelfReplication.exe
    > csc SelfReplication.cs
    > move SelfReplication.cs SelfReplication-old.cs
    > SelfReplication.exe
  4. The last statement generates a SelfReplication.cs file.
  5. The old and the new generated files are exactly the same!!

A feature of the program is you can change (mutate) the source code, adding new functionality and generating a totally new executable. The new program will be able to replicate itself, including your mutation, in the same way as the original one.

Using the code

The code has four sections:

The compiler

The compiler is a straightforward C# compiler which uses a file path to a C# file and produces an assembly of the source file. A nice feature is to get the names for the ReferencedAssemblies by calling GetReferencedAssemblies on the assembly itself.

C#
private Assembly CompileCSharp(string strFilePath)
{
    if (strFilePath == null)
        return null;
    StreamReader sr = new StreamReader(strFilePath);
    string strSource = sr.ReadToEnd();
    sr.Close();
    CodeDomProvider cc = new CSharpCodeProvider();
    CompilerParameters cp = new CompilerParameters();
    foreach (AssemblyName assemblyName in 
    Assembly.GetEntryAssembly().GetReferencedAssemblies())
        cp.ReferencedAssemblies.Add(assemblyName.Name + ".dll");
    cp.GenerateInMemory = true;
    CompilerResults cr = cc.CompileAssemblyFromSource(cp, strSource);

    StringBuilder sb = new StringBuilder();

    if (cr.Errors.HasErrors || cr.Errors.HasWarnings)
    {
        foreach (CompilerError err in cr.Errors)
            sb.AppendLine(err.ToString());
        MessageBox.Show(sb.ToString(), "Error", 
        MessageBoxButtons.OK,
        MessageBoxIcon.Error);
        return null;
    }
    return cr.CompiledAssembly;
}

Compiling and executing an assembly

This function is also straightforward. It searches for any Main method on the compiled assembly, and invokes (executes) this Main method using the FilePath as an argument.

C#
private void Execute(object FilePath)
{
    Assembly assembly = CompileCSharp(FilePath as string);
    if (assembly == null)
        return;

    foreach (Type t in assembly.GetTypes())
    {
        MethodInfo info = t.GetMethod("Main",
            BindingFlags.Public |
            BindingFlags.NonPublic |
            BindingFlags.Static);

        if (info == null)
            continue;

        object[] parameters = new object[]
        { new string[] { FilePath as string } };
        info.Invoke(null, parameters);
    }
}

The main program

This is a tricky one. It checks for the existence of SeflReplication.cs. If it does not exist, it writes the contents of MYSELF to disk to clean up the code (not shown in this source listing for brevity). After writing it to disk, it is read back again and the MYSELF string is replaced by itself. It took me about 2 or 3 hours to get this right.

C#
static class Program
{
    [STAThread]
    static void Main(string[] args)
    {
        string strFilePath;
        if (args.Length == 0)
        {
            string strDirectory =
                Path.GetDirectoryName(Assembly.GetExecutingAssembly().Location);
            strFilePath = Path.Combine(strDirectory, "SelfReplication.cs");
            if (!File.Exists(strFilePath))
            {
                StreamWriter sw = new StreamWriter(strFilePath);
                sw.Write(Program.MYSELF);
                sw.Close();

                StreamReader sr = new StreamReader(strFilePath);
                string strCode = sr.ReadToEnd();
                sr.Close();

                int intI = strCode.IndexOf(" " + "MYSELF");
                if (intI > 0)
                    strCode = strCode.Substring(0, intI + 7) + 
                              ";\r\n\t}\r\n}\r\n";

                string strInsertCode = "MYSELF=@\"" + 
                       strCode.Replace("\"", "\"\"") + "\";";

                strCode = strCode.Replace("MYSELF" + ";", strInsertCode);

                sw = new StreamWriter(strFilePath);
                sw.Write(strCode);
                sw.Close();

                return;
            }
        }
        else
        {
            strFilePath = args[0];
        }
        Application.Run(new SelfReplication(strFilePath));
    }
    public static string MYSELF=@".......";
}

Now, the basics are in place. But in this era, there is not much place for Console programs, so I added a simple user interface to the program. You have to press a button for starting the replication (once). This prevents us from making some kind of runaway virus.

Adding a GUI

The GUI has a button on a small window. An event handler starts a new thread, having the FilePath as an argument. When the parent of all parents dies, it kills all the children.

C#
private string strFilePath;
public SelfReplication(string strFilePath)
{
    this.strFilePath = strFilePath;
    this.button1 = new Button();
    this.button1.Location = new Point(75, 25);
    this.button1.Size = new Size(100, 25);
    this.button1.Text = "Replicate";
    this.button1.Click += new System.EventHandler(this.button1_Click);
    this.ClientSize = new Size(250, 75);
    this.Controls.Add(this.button1);
    this.Text = "SelfReplication";
}

private void button1_Click(object sender, EventArgs e)
{
    Thread thread = new Thread(new ParameterizedThreadStart(Execute));
    thread.Name = "Execute";
    thread.IsBackground = true;
    thread.Start(strFilePath);
}

By writing this article, new ideas popped up. I am thinking of a contest to mutate the source-code, doing all kinds of weird stuff. There are only a few rules for this contest, which are mentioned in the head of this article.

Another idea is to compile to disk rather than compiling in-memory, leaving all other 'external' programs untouched.

Have fun with the program, and leave some comments when doing awful awesome things inspired by my article.

Points of interest

If you are interested in self-replication, you should definitely read the Wiki article about it.

And for this project, the Quin article will get you moving.

Acknowledgments

Thanks to Stewart Roberts for the Visual Basic .NET version of the program.

History

As of writing, the presented source code is version 1.0.

License

This article, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)


Written By
Retired Van der Heijden Holding BV
Netherlands Netherlands
I'm Alphons van der Heijden, living in Lelystad, Netherlands, Europa, Earth. And currently I'm retiring from hard working ( ;- ), owning my own company. Because I'm full of energy, and a little to young to relax ...., I don't sit down, but create and recreate software solutions, that I like. Reinventing the wheel is my second nature. My interest is in the area of Internet technologies, .NET etc. I was there in 1992 when Mosaic came out, and from that point, my life changed dramatically, and so did the world, in fact. (Y)

Comments and Discussions

 
GeneralMy vote of 5 Pin
Kanasz Robert6-Nov-12 2:32
professionalKanasz Robert6-Nov-12 2:32 
Generalanother possible usage Pin
Roey C21-Nov-07 1:52
Roey C21-Nov-07 1:52 
GeneralRe: another possible usage Pin
dawmail33323-Dec-07 15:05
dawmail33323-Dec-07 15:05 
GeneralRe: another possible usage Pin
Roey C24-Dec-07 5:33
Roey C24-Dec-07 5:33 
GeneralMalware source on CP Pin
jonty219-Nov-07 13:51
jonty219-Nov-07 13:51 
GeneralRe: Malware source on CP Pin
Alphons van der Heijden20-Nov-07 11:03
professionalAlphons van der Heijden20-Nov-07 11:03 
GeneralVB Version Pin
Stewart Roberts18-Nov-07 13:35
Stewart Roberts18-Nov-07 13:35 
GeneralRe: VB Version Pin
Alphons van der Heijden18-Nov-07 14:36
professionalAlphons van der Heijden18-Nov-07 14:36 
Thanks for your Visual Basic version of the program.

I copied and pasted your example in notepad, saved it, compiled it using vbc and threw away the original notepad version and generated a new one.
Compiled it again. It works like a charm. I have added your version of the program to the header of this article.

Thanks again Rose | [Rose] .

-Alphons.


QuestionRe: VB Version Pin
Stewart Roberts19-Nov-07 5:12
Stewart Roberts19-Nov-07 5:12 
AnswerRe: VB Version [modified] Pin
Alphons van der Heijden20-Nov-07 11:00
professionalAlphons van der Heijden20-Nov-07 11:00 
GeneralRe: VB Version Pin
Stewart Roberts20-Nov-07 12:46
Stewart Roberts20-Nov-07 12:46 
GeneralRe: VB Version Pin
dawmail33323-Dec-07 15:20
dawmail33323-Dec-07 15:20 
GeneralRe: VB Version Pin
Stewart Roberts27-Dec-07 7:52
Stewart Roberts27-Dec-07 7:52 
GeneralMutation Pin
Daniel Vaughan15-Nov-07 0:09
Daniel Vaughan15-Nov-07 0:09 
GeneralRe: Mutation Pin
Alphons van der Heijden18-Nov-07 14:32
professionalAlphons van der Heijden18-Nov-07 14:32 
QuestionWhy in memory? Pin
Giorgi Dalakishvili14-Nov-07 9:25
mentorGiorgi Dalakishvili14-Nov-07 9:25 
AnswerRe: Why in memory? Pin
Alphons van der Heijden14-Nov-07 11:08
professionalAlphons van der Heijden14-Nov-07 11:08 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.