《汇编语言 基于x86处理器》第十三章高级语言接口部分的代码 part 2

▶ 书中第十三章的程序，主要讲了汇编语言和 C/++ 相互调用的方法

● 代码，汇编中调用 C++ 函数

 ; subr.asm
 INCLUDE Irvine32.inc

 askForInteger PROTO C
 showInt PROTO C, value:SDWORD, outWidth:DWORD

 OUTPUT_WIDTH =
 MAX_POWER = 

 .data
 intVal DWORD ?

 .code
 SetTextOutColor PROC C, color:DWORD
     mov     eax, color
     call    SetTextColor
     call    Clrscr
     ret
 SetTextOutColor ENDP

 DisplayTable PROC C
     INVOKE askForInteger        ; 调用 C++ 函数输入整数
     mov    intVal, eax          ; 保存返回值
     mov    ecx, MAX_POWER

 L1:
     push    ecx
     shl     intVal,                        ; 每次乘以 2
     INVOKE  showInt, intVal, OUTPUT_WIDTH   ; 调用 C++ 函数显示结果
     call    Crlf
     pop     ecx
     loop    L1

     ret
 DisplayTable ENDP

 END

 // main.cpp
 #include <iostream>
 #include <iomanip>
 using namespace std;

 extern "C"  // 声明外部 asm 过程和 C++ 函数
 {
     void SetTextOutColor(unsigned color);   // 设置终端字体和背景颜色
     void DisplayTable();                    // 显示表格

     int askForInteger();                    // 输入整数
     void showInt(int value, int width);     // 按宽度 width 显示数字 value
 }

 int main()
 {
     SetTextOutColor(0x1E);                  // 蓝底黄字
     DisplayTable();

     getchar();
     getchar();
     return ;
 }

 int askForInteger()
 {
     int n;
     cout << "Target integer [1, 90000]: ";
     cin >> n;
     return n;
 }

 void showInt(int value, int width)
 {
     cout << setw(width) << value;
 }

■ 输出结果

● 代码，汇编调用 C/C++ 库函数和自定义函数。有个奇怪的 bug，scanf 至少要在主函数中用一次，否则汇编的目标文件找不到，暂时不明。

 ; asmMain.asm
 INCLUDE Irvine32.inc

 printSingle PROTO C, aSingle:REAL4, precision:DWORD ; 声明外部函数（库函数不用声明）

 TAB = 

 .code
 asmMain PROC C                              ; 程序入口

 .data                                       ; 测试 printf
 format BYTE "%.2f",TAB,"%.3f",0dh,0ah,
 val1 REAL8 .
 val2 REAL8 .
 .code
 INVOKE printf, ADDR format, val1, val2      ; 调用 printf
                                             ; 书本注释曰，不能用 INVOKE ptrintf 来显示 REAL4 型变量？

 .data                                       ; 测试 scanf
 strSingle BYTE "%f",
 strDouble BYTE "%lf",
 float1 REAL4 .
 double1 REAL8  .

 .code
 INVOKE scanf, ADDR strSingle, ADDR float1   ; 调用 scanf，覆盖掉原本的值
 INVOKE scanf, ADDR strDouble, ADDR double1

 .data                                       ; 测试栈传参 printf 和自定义函数
 valStr BYTE "float1 in ASM = %.3f", 0dh, 0ah, 

 .code
     fld    float1                           ; 将 float1 转存到 FPU 栈中
     sub    esp,                            ; 指到栈的高位
     fstp    qword ptr [esp]                 ; 当成 double 取出
     push    OFFSET valStr                   ; 栈传参来调用 printf
     call    printf
     add    esp,
     INVOKE printSingle, float1,            ; 自定义外部函数来显示 float1

     call    Crlf
     ret
 asmMain ENDP

 END

 // main.cpp
 #define _CRT_SECURE_NO_WARNINGS // 关闭 MVC++ 关于 scanf 被 scanf_s 取代的警告

 #include <stdio.h>
 #include <string>
 #include <strstream>

 using namespace std;

 extern "C"
 {
     void asmMain();
     void printSingle(float d, int precision);
 }

 void printSingle(float d, int precision)
 {
     strstream temp;
     temp << "float1 in C++ = %." << precision << "f" << '\0';
     printf(temp.str(), d);
 }

 int main()
 {
     asmMain();
     scanf("");  // 如果没有这一句就会报错：LNK2019，无法解析的外部符号 _scanf，该符号在函数 _asmMain 中被引用
     getchar();
     getchar();
     return ;
 }

■ 程序输出

456.79  864.231
123.456
123456789.123456789
float1 in ASM = 123.456
float1 in C++ = 123.456

● 代码，汇编调用 C 库函数，system 和 file 相关。还是有那个要在主函数里用一次 printf 和 scanf 的问题。

 ; asmMain.asm
 .
 .MODEL flat, C

 system PROTO, pCommand:PTR BYTE                                 ; 声明一堆库函数
 printf PROTO, pString:PTR BYTE, args:VARARG
 scanf  PROTO, pFormat:PTR BYTE,pBuffer:PTR BYTE, args:VARARG
 fopen  PROTO, mode:PTR BYTE, filename:PTR BYTE
 fclose PROTO, pFile:DWORD

 BUFFER_SIZE =
 .data
 str1 BYTE "cls",
 str2 BYTE "dir/w",
 str3 BYTE "Enter the name of a file: ",
 str4 BYTE "%s",
 str5 BYTE "Failed to open the file", 0dh, 0ah,
 str6 BYTE "Succeeded to open the file", 0dh, 0ah,
 modeStr BYTE "r",

 fileName BYTE  DUP()
 pBuf  DWORD ?
 pFile DWORD ?

 .code
 asm_main PROC
     INVOKE  system,ADDR str1                    ; cls
     INVOKE  system,ADDR str2                    ; dir

     INVOKE  printf,ADDR str3                    ; 提示信息
     INVOKE  scanf, ADDR str4, ADDR fileName     ; 输入文件名

     INVOKE  fopen, ADDR fileName, ADDR modeStr  ; 尝试打开文件
     mov     pFile, eax

     .IF eax ==
         INVOKE printf,ADDR str5
         jmp quit
     .ELSE
         INVOKE printf,ADDR str6
     .ENDIF
     INVOKE fclose, pFile

 quit:
     ret
 asm_main ENDP
 END 

 // main.cpp
 #define _CRT_SECURE_NO_WARNINGS
 #include <stdio.h>

 extern "C" void asm_main();

 void main()
 {
     asm_main();
     scanf("");
     printf("");
     getchar();
     getchar();
 }