汇编程序:定义一个字符串，计算字符串的长度？

Posted 2023-04-06

有大佬会吗！

这是用 C 语言编写的程序，可以计算字符串的长度：

在这段代码中，我们定义了一个函数 string_length，用于计算字符串的长度。函数接受一个参数 string，表示要计算长度的字符串。在函数内部，我们使用 C 语言的内置函数 strlen 来计算字符串的长度，并返回结果。
在 main 函数中，我们定义了一个字符串数组 string，并调用了函数 string_length 来计算它的长度。最后，我们使用 printf 函数输出结果。运行这段代码后，会输出字符串 "Hello, world!" 的长度，即 13。

注意：在 C 语言中，字符串数组是一种特殊的数组，其末尾会自动添加一个 null 结束符 '\\0'。所以，上述代码中的字符串数组 string 实际上是一个 13 字节的数组，其中前 12 个字节存储字符串的内容，最后一个字节存储 null 结束符。

参考技术A 在汇编语言中，可以使用相应的指令来定义一个字符串，并计算字符串的长度。下面是一个示例程序，可以帮助您了解汇编语言中如何定义字符串并计算字符串的长度：
　　;定义一个字符串
　　stringdb'Hello,world!',0
　　;计算字符串的长度
　　moval,string
　　movah,0
　　xorcx,cx
　　next:
　　cmpal,0
　　jedone
　　inccx
　　incal
　　jmpnext
　　done:
　　;cx寄存器中存储的就是字符串的长度
　　在上面的程序中，我们使用了DB（DefineByte）指令来定义一个字符串。这个字符串以单引号括起来，其中的内容即为字符串的值。在字符串的末尾加上一个零值（0）可以表示字符串的结束。
　　然后，我们使用MOV指令将字符串的地址存储到AL寄存器中，并将AH寄存器清零。然后使用XOR指令将CX寄存器清零。
　　接下来，我们使用一个循环来计算字符串的长度。首先使用CMP指令比较AL寄存器中的值是否为零。如果是零，则跳转到“done”标签处结束循环。否则，将CX寄存器的值加1，将AL寄存器的值加1，然后跳转回循环的开头继续循环。
　　最后，当循环结束时，CX寄存器中存储的就是字符串的长度。您可以使用其他指令将这个值保存到内存中，或者使用输出指令将其输出到屏幕上。
　　希望这些信息能帮助您了解汇编语言中如何定义字符串并计算字符串的长度。 参考技术B Intel x86 汇编语言的示例
首先，需要为字符串定义一个段和一个名称。例如，可以在程序的开头定义如下所示的字符串：
.section .data
str: .ascii "This is a string.\n"
这将创建一个名为 "str" 的字符串，其中包含 "This is a string.\n"。
然后，可以使用循环来计算字符串的长度。例如，可以使用以下代码计算字符串的长度：
.section .text
.globl main
main:
movl $0, %ecx # Initialize the counter to 0
movl $str, %esi # Load the address of the string into %esi
loop:
movb (%esi), %al # Load the next character into %al
addl $1, %ecx # Increment the counter
incl %esi # Move to the next character
cmpb $0, %al # Check if the character is 0 (end of string)
jne loop # If not, continue the loop
done:
# %ecx now contains the length of the string

扩展emacs之一：计算buffer选中区域的字符串长度

这是一个简单的场景，目的是将其他语言编写的程序集成到emacs里面，而不是打开emacs shell，执行这个脚本。

假设有一个文件，里面存放的是文本，用emacs打开，

然后选择一段文本

现在运行一个自定义命令M-x get-length

get-length会运行预先准备好的newlisp脚本，来统计被选中的文本的长度，输出到一个新的 buffer，并显示该buffer.

现在准备一个文本文件: input.txt，里面有一堆字符串

maaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaadddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddmaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaadddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddmaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaadddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddmaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaadddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddmaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaadddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddmaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddd

编写一个elisp文件region.el

(defun region-length (startPos endPos)
  "Do some text processing on region. This command calls the external script “wc”."
  (interactive "r")
  (let (cmdStr)
    (setq cmdStr "/your/path/length.lsp") ; full path to your script
    (shell-command-on-region startPos endPos cmdStr nil nil nil t)
    (switch-to-buffer-other-window "*Shell Command Output*")
    )
  )

说明：

shell-command-on-region的第4个参数nil表示会打开*Shell Command Output* buffer.

newlisp脚本lenght.lsp输出的结果到stdout，会写入到这个buffer中. newlisp脚本需要设置绝对路径

现在看一下length.lsp

#!/usr/bin/newlisp

(while (read-line)  
  (setf str (current-line))
  (println (length str))
  )
(exit)

现在测试一下:

M-x load-file 加载region.el

然后打开input.txt buffer,选中几个字符

M-x region-length

结果会打开一个buffer，显示长度。