用汇编语言实现递归

沉宝

本文成篇的起因于社长的一条记录 链接

  y, w4 D' h! g* T9 ~递归是计算机科学中一种解决问题的重要方法。所谓递归，通俗地说就是自己调用自己，它在很多语言和环境下都可以实现。以社长的工作场景为例，根据爱坛上的信息，大概是两个关键词：Unix和汇编。本人条件有限，只能用Linux模拟，汇编也只限于x86汇编。下面就是用汇编语言编写的，用递归方法计算阶乘的示范程序。

1. LEN_OF_OUTPUT equ 10
   2 g( o+ E0 O6 V  H1 d
2. 
   4 C  o! \5 L! F3 A# }1 a. t% p0 D
3. section .data                           ;
   
4.    userMsg db 'Please enter a single-digit number: ' ;
   ) ~, y3 \/ r1 P4 F
5.    lenUserMsg equ $-userMsg             ;
   
6.    disp1Msg db 'The factorial of '
   
7.    lenDisp1Msg equ $-disp1Msg                 
   
8.    disp2Msg db ' is '
     \# Q9 X! V, z
9.    lenDisp2Msg equ $-disp2Msg                 
   + U7 w" m, a7 R
10.    errMsg db 'Wrong input. Only one-digit number can be accepted.',0x0a
    " Q/ s7 Y$ v: a+ X- B( ]
11.    lenErrMsg equ $-errMsg                 
    
12. 
    
13. section .bss           ;
    
14.    num resb 1
    0 |! x0 d3 ]  J$ T+ W
15.    result resd 1
    + Z6 W4 s% F9 {3 {2 f
16.    buffer resb LEN_OF_OUTPUT+1
    & d% t: W- r" h& w
17.         
    * S6 w5 i! K" c9 Q
18. section .text          ;
    
19.    global _start
    : H: F1 O. F9 M% a( J
20.         
    ' F) X/ u% g# Q# m
21. _start:                ;
    # J! N9 h1 i6 y  z( f
22.    mov eax, 4
    
23.    mov ebx, 1
    
24.    mov ecx, userMsg
    
25.    mov edx, lenUserMsg
    
26.    int 80h
    - c1 E- J3 a/ k6 v7 `
27. 
    ( t2 R: `# l: E+ f5 B& A7 a
28.    ; read user's input
    ' q. H/ T4 \+ Q. }- R* o
29.    mov eax, 3
    : s4 @; D" X2 a  d! V
30.    mov ebx, 0
    9 u* d+ ?* Z( O- z" s1 S4 {
31.    mov ecx, num  
    
32.    mov edx, 1          ; length of input buffer
    
33.    int 80h
    - |+ \* a5 F1 B+ Z9 U- j5 F
34.         
    
35.    mov eax, [num]
    
36.    and eax, 0xFF
    4 F+ m. O) [% m  v- B- {% l
37.    sub eax, 0x30
    
38.    jl ERROR
    9 c: n0 y# z7 {; N! c# C( B5 X; q
39.    cmp eax, 10
    8 A! E9 _- M2 |% s
40.    jl DO_CALC
    
41. ERROR:
    
42.    mov eax, 4
    
43.    mov ebx, 1
    2 M1 K9 \3 o8 Y, g
44.    mov ecx, errMsg
      j) E, Z8 g! C$ F
45.    mov edx, lenErrMsg
    
46.    int 80h  
    0 y$ t3 w2 Y* q$ K% \
47.    jmp EXIT
    
48. 
    
49. 
    + @  g" \7 m0 h- s
50. DO_CALC:
    2 b  e- q% q' Z( T$ b1 c8 s) e
51.    call factorial
    
52.     ; The parameter is in eax. After calling, the result will be stored in eax.
    3 ]4 f% y, p% n! S, l9 f
53.    mov [result], eax           ; Save the result
    % ]! l. N$ _1 M) Q/ F
54. 
    + B( T( S0 _4 @" t
55.    ; print result
    2 k2 k; E1 z. X0 J0 v" l# J
56.    mov eax, 4
    ( R% |( n  X5 ~' |
57.    mov ebx, 1
    / L" ?- d! _8 Y9 z4 ~
58.    mov ecx, disp1Msg
    
59.    mov edx, lenDisp1Msg
    9 D) H+ Q; G; z* r1 K
60.    int 80h  
      M- p' W; C2 O* L3 Q
61.    mov eax, 4
    ( m9 l$ `8 L' J* G( l: @
62.    mov ebx, 1
    
63.    mov ecx, num
    
64.    mov edx, 1
    
65.    int 80h
    
66.    mov eax, 4
    
67.    mov ebx, 1
    5 P: T- z9 Y8 Z, Y* Y7 i5 l
68.    mov ecx, disp2Msg
    
69.    mov edx, lenDisp2Msg
    8 D( ~# s/ L" n* u
70.    int 80h  
    
71. 
    
72.    ; output number
    
73.    mov eax, [result]           ; VALUE THAT I WANT TO CONVERT AND DISPLAY
    
74.    mov byte [buffer+LEN_OF_OUTPUT],0x0a
    
75.    lea esi,[buffer+LEN_OF_OUTPUT]
    
76.    mov ebx,10         
    
77. ASC_LOOP:
    
78.    mov edx,0            ; clear dx prior to dividing edx:eax by bx
    , D& ~5 j( D6 R+ M, G! I( C% v( d
79.    div ebx              ;DIV EAX/10
    , w6 \0 N& n9 ]5 a
80.    add edx,0x30           ;ADD 48 TO REMAINDER TO GET ASCII CHARACTER OF NUMBER
    9 X' I5 R% Q5 N/ U# \2 G9 R
81.    dec esi              ; store characters in reverse order
    
82.    mov [esi],dl
    
83.    cmp eax,0            
    
84.    jz END_ASC             ;IF AX=0, END THE PROCEDURE OF NUMBER TO ASCII
    " C. M# X' w& m1 \) u8 c3 t
85.    jmp ASC_LOOP            ;ELSE REPEAT
    2 _6 C4 ?- Z  n( W" c
86. END_ASC:
    
87.    mov eax, 4
    
88.    mov ebx, 1
    * Q+ D) w- a2 q0 `* ]
89.    mov ecx, esi
    8 s% z2 f6 V( E. Y
90.    lea edx,[buffer+LEN_OF_OUTPUT+1]
    7 m: C# z0 F/ A( Y* n
91.    sub edx, ecx
    " w9 E# d$ U; |2 S/ \2 k
92.    int 80h  
    
93.    
    7 D+ I8 g: v4 D# o* o; R! H& m& i
94.    ; Exit code
    
95. EXIT:
    
96.    mov eax, 1
    
97.    mov ebx, 0
    6 K; B& [/ x  g# }/ ^
98.    int 80h
    
99. 
    $ f! {2 ]( M) @1 U$ L5 K
100. 
     
101. 
     ) N- l' O1 B2 ^, n7 H
102. ; Factorial function using recursion
     7 \& p' c3 t6 p+ p" B9 c4 [& H. V
103. factorial:
     , r" c+ }% @( U$ i* d
104.     ; Check if eax is 0 (base condition)
     
105.     cmp eax, 0
     
106.     jz end_recursion
     - ]: d2 q$ I1 W* }" Z: ?8 X$ H
107. 
     * G1 u1 K& o" g9 P) \1 e; g# r
108.     ; Save the current value of eax
     6 a$ v8 k" ?1 U
109.     push eax
     
110. 
     1 L* f- i/ ?2 A& e( M6 u
111.     ; Decrement eax and call factorial function recursively
     
112.     dec eax
     
113.     call factorial
     ; s( x1 L7 ~0 ~9 _( L, X8 t" x$ _
114. 
     ! J" Z) [! H, R0 j
115.     ; Multiply the result returned in eax with the saved value of eax
     
116.     pop ebx
       X5 @7 \" {' w3 F% ^
117.     imul eax, ebx
     ) I! z; J! ?' v& c4 o/ e
118. 
     ' T4 G4 j* h% [( G! `8 G: ?4 |
119.     ret
     
120. 
     
121. end_recursion:
     + U/ b$ w: n% Q' t$ k: I* X
122.     ; Return 1 when eax is 0 (base condition)
     - T3 e/ a; C1 ~3 l/ ]6 g
123.     mov eax, 1
     2 n7 ^3 ]! k; g9 F$ X  @
124.     ret

复制代码

& e0 Y# R3 g* ~8 G* J+ k程序在nasm编译器下通过并成功运行。相应的命令行如下，有兴趣的童鞋可以自行验证。
- Q4 Q: M7 ~# }% K! t( U9 x

1. nasm -f elf factorial.asm
   " S5 W6 i, {4 a9 e
2. ld -m elf_i386 -s -o factorial factorial.o
   3 T* k! r8 d+ a$ p( l$ h* b2 W
3. ./factorial
   

复制代码

9 ]/ M/ t& N8 D7 W. j5 B由于汇编不擅长处理I/O，所以程序限制输入仅限于一位数字（0-9），以免过于喧宾夺主。其实程序中真正紧扣主题的就最后一小段：
$ _. W+ _2 l1 w* o! u7 ]& y

1. ; Factorial function using recursion
   
2. factorial:
   
3.     ; Check if eax is 0 (base condition)
   
4.     cmp eax, 0
   9 W' @1 j+ [7 O
5.     jz end_recursion
   2 E3 D1 E1 R* C/ c6 L# l
6. 
   . P4 a1 A5 v* ]7 q
7.     ; Save the current value of eax
   $ Y- b% T( i! c$ a  l  x6 i
8.     push eax
   
9. 
   
10.     ; Decrement eax and call factorial function recursively
    ' l  }0 S0 r1 T) Y- O- k% {( p* d' M
11.     dec eax
    
12.     call factorial
    
13. 
    
14.     ; Multiply the result returned in eax with the saved value of eax
    
15.     pop ebx
    
16.     imul eax, ebx
    4 K, x+ Q0 X+ C/ m4 J- w
17. 
    
18.     ret
    5 i% y) j# Z2 V& b2 h% I7 d
19. 
    
20. end_recursion:
    + H. m! Z/ C. ~  a
21.     ; Return 1 when eax is 0 (base condition)
    " s$ l6 K6 f( |/ j9 k# ]
22.     mov eax, 1
    - v/ k6 ~; v- g
23.     ret

复制代码

可以清晰看出函数在其函数体中调用了它本身。

$ `2 e1 y4 t" d7 F/ c2 p! o7 R以上证明了汇编语言不是实现递归的障碍。推而广之，所有中低级语言都可以轻松实现递归。某些高级语言反而不能做递归是人为强制规定的，换而言之是原作者权衡利弊的结果。

世界上没有免费的午餐，递归在编写程序的时候简洁优雅，但运行过程中要付出极大的代价，甚至有可能是灾难。由于是函数反复调用自己，那么所有的中间结果都要暂时保留在栈（stack）上，直到最后一层函数调用完毕才能逐步清除。这既低效，又不安全。栈式计算是一个古老的概念，它与现代的多寄存器和流水线等都格格不入，难以优化提速。递归对栈空间的占用更可怕，占用量与调用函数次数线性相关（套用复杂度的概念就是O(n)），递归次数多了之后，很容易超出栈容量，从而导致栈溢出。具体到社长的工作中可能还有很多实时任务，一大堆高优先级的中断响应程序可不会等着递归函数运行完了再启动，这会让栈空间雪上加霜。想一想某个核电控制程序突然栈溢出了，那场面，哈哈哈。
$ N$ P. j/ X+ g7 Y/ t7 [* Q. p
8 t' f% a0 V- u2 O8 c: E这可以解释，为什么条件上有可能，但社长很长时间里都没有接触到递归编程。无论用C还是用汇编，都强调的是速度与可靠性。社长实战出发，不需要知道回字的4种写法。至于Python，整个编程思想都变了，Python假定计算机的计算速度远远超过了需求，编程者无需为性能而操心。 Python语言的设计初衷，也不是为关键任务而生，而是想让更多的门外汉用起计算机来。所以在Python程序中容易见到递归。
; y3 g6 X6 b6 E7 V& `
有很多时候，递归用作概念性算法表达。真到了用代码实现的时候，再换用其它方法。比如说将递归转化成迭代（iteration）。
7 \% i, n8 e/ w7 I
另外，汇编语言作为一种低级编程语言，在不考虑时间成本的前提下，没有什么是它做不了的。本期课后作业：如何用汇编语言实现继承（Inheritance）和多态（Polymorphism）？请写出示范程序。我们知道继承和多态是面向对象编程（Object-oriented programming）的两个基本点，有了它们就可以实现汇编语言的面向对象编程。
: l& T5 K, F2 `+ |+ Y1 t
7 C- i, a) p6 ?/ M% }

马鹿

原来是堆栈或者内存不够用的物理限制呀。

昨天看了一眼我们用最新的软件（最近10多年都没接触新版的软件， 客户不用）， 最底层还是汇编， 只不过上面加了很多界面， 让使用变得复杂很多。。。

四处张望

fortran我不知道，事实上c以后的高级语言基本没有不能递归调用，当然实际上的确是有堆栈溢出的危险，但是一般来说堆栈溢出其实是一个很好控制的异常，尤其是现代高级语言普遍使用异常之后。只不过生产环境中的代码，的确是很少采用递归，如果有用一般在验证完成后会转换成迭代循环以减少内存使用和提高速度。

pcb

记得有门课叫 compiler
: ?1 ]# g+ T4 l) J0 q! p$ O# M% L6 a编译原理？

无言

看标题就感觉是对社长有感而发，果然

晨枫

0 X) X. z" b9 m* D$ ?8 p
! y! d; V' c; h6 X) l$ V  Y. y没有注意到上下文，也可能理解有误，递归的核心或许可以简单化地理解成后向Goto？
# d* p7 V2 r- n! P, H
6 S6 \! p" I- S% O; N但我觉得这里面可能有一个基本的分别：一次性执行的离线程序vs反复执行的在线程序。
. O, h' @- W3 R3 r5 n# b
1 U6 M% q& E) ^- d( Z) P科学计算基本上都是一次性执行的离线程序，从begin到end一气呵成，所有递归实际上都在这一次执行中完成，所以不正确的递归可以造成死循环，正确的递归也需要完整执行完后才释放所有的中间结果，内存占用太大。不许用递归是有道理的，所以都鼓励用for loop。

工控计算大多是反复执行的在线程序，比如每秒一次，每一次执行也是从begin到end一气呵成，每次递归只执行“上一次”和“本次”之间的关系，完事了就释放内存。这是有限计算，不是无限计算，不可能死循环，内存占用有限，只需要本次计算有关的加上上次的结果。这样的计算也是很多工控计算的必须。

4 K8 X8 J/ |; N5 u" I1 I8 A2 \举一个例子：
. t7 A6 J0 |7 p7 X
" g( ]# f5 Z. u在科学计算里，计算数值解需要递归计算，最后比较两次计算之间的误差，足够小了就完事，否则接着算，永远不收敛就死循环了。

5 J6 ~4 ^# D4 g6 Q  f: e3 [在工控计算里，比如说控制量计算，u(k+1)=f(u(k), additional inputs)，这在每秒一次的程序执行里就是once through，不管前后两次的误差如何，所以没问题，也必须递归，否则没法算。但只要过程还在运行，控制要求还在，还真是无限循环计算的，每秒循环一次。

沉宝

晨枫 发表于 2025-1-18 04:21
6 w0 z0 M  l* T8 i没有注意到上下文，也可能理解有误，递归的核心或许可以简单化地理解成后向Goto？

但我觉得这里面可能有一 ...

, V/ f3 e* {5 i6 F: U- X递归的核心就是严格意义上的自己调用自己。
7 W4 }  v; U* m7 c4 x1 R
在计算机程序里面，调用一个函数（或者子程序）与goto来goto去的最大区别是调用函数由系统来负责保持当前环境（例如各个寄存器里面的数值），以便调用返回后无障碍继续运行；而goto则是由程序员决定哪些有用的数据需要保持（比如说存储在全局变量里）。系统保持当前环境的方法是在栈上开辟一块临时空间 ，把系统认为有用的信息都存在那里，函数返回后这块临时空间可以被释放。至于for loop，你可以看成是结构化的goto（goto的一个子集），使用它可以减少人为失误。

回到递归，如果数学模型定义中有函数调用自身的场景，例如阶乘定义为f(n)=n×f(n-1)，那么递归的方法就是在程序中1:1地按定义编写函数f(x)，这样函数的实现代码中无可避免地需要调用f(x)自身。好处嘛编写程序的时候很省心，代价是麻烦都留给了系统。以晨大的水平，肯定可以写出用for loop计算阶乘的程序，但这只是计算结果上等价，而不能称之为用递归编程，或者说晨大找到了递归的有效替代物。
+ B# V# p8 v! I; G1 |" k
至于在工控计算里，比如说控制量计算，u(k+1)=f(u(k), additional inputs)，你可以看成这是一个广义上的递归。但在具体执行层面，晨大自己也说了，每秒一次的程序执行里就是once through，必须保证在下一秒来临之前完事并释放内存，可能容不得任何递归代码。

小结，很多时候讨论递归专指是在编程算法层面上的，而非广义或哲学意义上的。哦对了，广义递归还可以举出什么例子？从前有座山，山里有座庙，庙里有个老和尚，正在给小和尚讲故事：“从前有座山，山里有座庙，庙里有个老和尚，……’”

晨枫

沉宝 发表于 2025-1-18 13:26
递归的核心就是严格意义上的自己调用自己。
$ q8 r8 Q8 S2 g4 g+ l9 L
! I4 O4 {& l% L, x! i& u( [6 F' `在计算机程序里面，调用一个函数（或者子程序）与goto来goto ...

明白了。

+ Y: E/ \' J! f- x6 @6 I% U, H+ C3 k递归要是有一个counter，counter计数到了就自动中止，应该也没有内存溢出问题了吧？

pcb

晨枫 发表于 2025-1-19 04:32
7 @2 d  Y* D; N1 s; v明白了。
- O* I! J- s) d' Z7 o# E: b/ g
; L# @+ l. x% j( Q# ?& v递归要是有一个counter，counter计数到了就自动中止，应该也没有内存溢出问题了吧？ ...

. Q# h) v! x( |" s) X全局变量

晨枫

pcb 发表于 2025-1-18 15:07
全局变量

嘻嘻，全局变量好啊

沉宝

# t- z7 u. X. k: _

晨枫 发表于 2025-1-19 04:32
明白了。

9 L  e% g2 ]/ s8 Y( {' R5 y递归要是有一个counter，counter计数到了就自动中止，应该也没有内存溢出问题了吧？ ...

- O* k* B  N. O+ u0 D& d$ ?& A/ S8 v
恰恰相反，按照定义递归常常用别的方法中止，而非counter（启用counter往往说明你正在做非递归化转化过程中）。例如前述阶乘的中止条件就是f(0)=1，程序不知道要运行多久直到遇上该中止条件。这种不确定性会造成运算规模不可控，资源消耗不可控，对于大的输入值内存溢出的风险很高。

晨枫

沉宝 发表于 2025-1-18 17:07
. S, E! t- ]9 p* L& ]* @+ d恰恰相反，按照定义递归常常用别的方法中止，而非counter（启用counter往往说明你正在做非递归化转化过程 ...

6 L: @  s' |- G  ?$ |% N/ k嗯，明白了，还是需要明确的中止条件，只是有时候这个终止条件可以在不确定的未来。

xiejin77

在编程语言的体系中，汇编语言代表着最接近机器的编程方式，它的本质是对机器指令的直接映射。当我们选择使用汇编语言时，实际上是选择了一种与机器进行最直接对话的方式。在这种情况下，引入面向对象编程的概念，如封装、继承和多态，或是应用Java中常见的设计模式，某种程度上违背了选择汇编语言的初衷。打个比方，这就好比让罗士信学习罗成的罗家枪法一样。
" r! J, p7 Q0 i0 Y5 M
2 c+ K+ J. ]: o6 s; @# E7 L汇编语言的核心价值在于它能让程序员以机器的视角来思考和解决问题。编写汇编代码时，程序员需要直接关注CPU的寄存器操作、内存访问、运算单元的调度以及中断处理等底层细节。这种思维方式与面向对象编程所强调的抽象化、模块化的思维方式存在根本性的差异。当我们在汇编语言中引入面向对象的概念时，不仅会增加不必要的复杂性，还会在一定程度上模糊了对底层硬件的直接控制。
5 O, e! u1 E6 C" w2 t( F) i
更重要的是，人们选择使用汇编语言通常是出于对性能的极致追求或者需要直接操作硬件的场景。在这些情况下，面向对象编程固有的运行时开销是不可接受的。封装和继承等特性虽然能提升代码的可维护性和复用性，但这些优势在汇编语言的应用场景中往往显得不那么重要，反而会影响程序的执行效率和实时性能。

) C4 Z- Z& U% o' q' q% X8 O2 ?保持汇编编程的纯粹性，意味着我们要专注于机器级别的思维方式，将注意力集中在硬件资源的精确控制和优化上。这种专注能够帮助我们写出更高效、更精确的底层代码。当我们需要处理底层驱动、实时系统或性能关键的代码段时，应该充分发挥汇编语言的特长，直接而高效地操控硬件资源，而不是被高级语言的编程范式所束缚。

4 {% Z( O( j' v  I因此，我个人认为在使用汇编语言时，应当尊重并遵循其最本质的特征：直接性和底层控制能力。只有让我们的思维方式回归到最基础的机器级别，这样才能真正发挥汇编语言的优势，实现最优的性能表现和最精确的硬件控制。