神奇的自产生程序

简介: 最近读到冯·诺依曼的《Theory of Self-Reproducing Automata》的中译本,被自复制自动机理论深深吸引了!

最近读到冯·诺依曼的《Theory of Self-Reproducing Automata》的中译本,被自复制自动机理论深深吸引了!

问题(自产生程序):编写一个程序,不读取任何输入,只把自己的源代码输出。

image.png

这个问题是个非常本质的问题,跟使用什么编程语言无关(不要想到使用反射之类的东西)。

试想,如果要输出自己的源代码,那么,显然,程序中应该有“print ...”语句。但 print 什么出来呢?如果硬要写的话就会变成:

print"print \\"print......\\""

最后是一个无限循环。

一般地,我们知道,如果程序 A 能产生程序 B ,那么 A 必须包含 B 的全部信息,而且应该比 B 的信息还多,因为还要包含额外的打印语句。也就是说,一般情况下,信息是减少的。而这个自产生程序,自己要包含自己的全部信息,从某种程度上已经具有生命的意味了。

下面列出一些自产生程序及其思路。

首先需要注意的是,使用编程语言本身的反射功能或者读取文件等做法都被视为 cheating ,比如这样的 bash 脚本:

#!/bin/sh

cat $0

或者像这样的 javascript :

functiona() { console.log(a.toString(), "a()"); } a()

因为这些程序没有体现出自产生程序的递归和自指特性,或者结果严重依赖于编程语言的具体实现。

不cheating的思路主要有以下几种:


输出源代码在该语言中的转义

Python :

s = "'s = ' + repr(s) + '\\nprint(' + s + ')'"

print('s = ' + repr(s) + '\nprint(' + s + ')')

Lua 5.1 :

s = "string.format('s = %q\\nprint(%s)', s, s)"

print(string.format('s = %q\nprint(%s)', s, s))

另一个 Lua 版:

s = "s = %q\

print(string.format(s, s))"

print(string.format(s, s))

Scala :

defe(s: String) = ("\""+s.replace("\\", "\\\\").replace("\"", "\\\"") +"\"")

vals="\"\"\"def e(s: String) = (\"\\\"\" + s.replace(\"\\\\\", \"\\\\\\\\\").replace(\"\\\"\", \"\\\\\\\"\") + \"\\\"\")\"\"\" + \"\\nval s = \" + e(s) + \"\\nprintln(\" + s + \")\""

println("""def e(s: String) = ("\""+s.replace("\\", "\\\\").replace("\"", "\\\"") +"\"")""" + "\nvals=" + e(s) + "\nprintln(" + s + ")")

用某种方法 encode 源代码,使之不包含引号,然后还原出源代码

Bash :

#!/bin/sh

s='\x22#!/bin/sh\ns=\x27$s\x27\necho $(echo -e $s)\x22'

echo"#!/bin/sh

s='$s'

echo $(echo -e $s)"

Lua 5.2 使用 load():

s = "a,q,b=string.char(39),string.char(34),string.char(92) return a..'s = '..q..a..'..s..'..a..q..b..'nprint('..a..'..load(s)()..'..a..')'..a"

print('s = "'..s..'"\nprint('..load(s)()..')')

Scala :

~~~~ {.hl}

val s = "%22val+s+%3D+%5C%22%22+%2B+s+%2B+%22%5C%22%5Cnprintln%28%22+%2B+java.net.URLDecoder.decode%28s%2C+%22UTF-8%22%29+%2B+%22%29%22"

println("val s = \"" + s + "\"\nprintln(" + java.net.URLDecoder.decode(s, "UTF-8") + ")")

~~~~

使用 eval :在 eval 的字符串中引用自己

-------------------------------------

Lua load() 的另一种用法:

```lua

s = "print(string.format('s = %q load(s)()', s))" load(s)()

js 的 eval()

s="q = String.fromCharCode(34); console.log('s = ' + q + s + q + '; eval(s)')"; eval(s)


使用语言中的更强的转义机制

类似上面的第二种,但不用引号。

Lua 的 long string :

x = [["x = [".."["..x.."]".."]\nprint("..x..")"]]

print("x = [".."["..x.."]".."]\nprint("..x..")")

Scala 的三引号:

val s = """"val s = \"\"\"" + s + "\"\"\"\nprintln(" + s + ")""""

println("val s = \"\"\"" + s + "\"\"\"\nprintln(" + s + ")")

使用 C 的宏

先执行传入的参数,再把参数变成字符串。

gcc :

#definep(a) int main(){a;puts("p("#a")");return 0;}

p(puts("#definep(a) int main(){a;puts(\"p(\"#a\")\");return 0;}"))

至于它们是怎么实现的,就留给读者自己琢磨了。自产生程序也称为 Quine ,可以参考 Quine Page

相关文章
程序人生 - 狗狗会“嫉妒”吗?
程序人生 - 狗狗会“嫉妒”吗?
69 0
程序人生 - 一直打嗝怎么办?
程序人生 - 一直打嗝怎么办?
90 0
如何跳小程序
       经常会有人遇到这样的疑惑——        我有自己的APP、生活号或在支付宝端内有自己的H5页面,这种情况下如何和小程序关联,跳转到小程序里去,做到无缝对接?        其实,小程序是支持这类跳转能力的;        那么,要如何实现呢?        一、非小程序前端——跳转小程序 window.
625 0
|
C++ 小程序
C++ 实用的小程序
1. 打开test_ids.txt 将里面的东西添加"1_",然后另存为test_ids_repaired.txt   1 #include 2 #include 3 #include 4 #include 5 #include 6 using name...
958 0
文本查询程序
我们实现一个简单的文本查询程序。我们的程序允许用户在一个给定文件中查询单词,查询结果是单词在文件中出现的次数及所在行的列表。如果一个单词在一行中出现多次,此行只列出一次。 #include #include #include #include #include #include #...
951 0
|
存储 小程序 .NET
一个小程序引发的思考
既然是一个小程序引发的思考,那么我们就先看看这个小程序,看看他有何神奇之处: namespace ConsoleApplication1 { class Program { static void Main(string[] args) ...
845 0
程序27、程序28和程序29
【程序27】题目:求100之内的素数 /* * isPrimeNum函数如果是素数返回素数值,否则返回0 * 参数$m指正整数 */ function isPrimeNum($m) { for ($i = 2; $i sqrt($m)) { retu...
519 0
|
JavaScript PHP 前端开发
程序16和程序17
前一段时间用javascript实现了程序前几个例子,现在转变用php写,其实用什么语言写并不重要,最要的是思想。【程序16】题目:输出9*9口诀。1.程序分析:分行与列考虑,共9行9列,i控制行,j控制列。 for ($i = 1; $i
831 0
程序7
【程序7】题目:输入一行字符,分别统计出其中英文字母、空格、数字和其它字符的个数。 1 function Statistics1(str) { 2 var strcount = 0; 3 var spacecount =...
702 0

热门文章

最新文章