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

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

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

; subr.asm
INCLUDE Irvine32.inc

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

OUTPUT_WIDTH = 8
MAX_POWER = 10

.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, 1                       ; 每次乘以 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 0;
}

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 = 9

.code
asmMain PROC C                              ; 程序入口

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

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

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

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

.code
    fld    float1                           ; 将 float1 转存到 FPU 栈中
    sub    esp,8                            ; 指到栈的高位
    fstp    qword ptr [esp]                 ; 当成 double 取出
    push    OFFSET valStr                   ; 栈传参来调用 printf
    call    printf
    add    esp,12    
    INVOKE printSingle, float1, 3           ; 自定义外部函数来显示 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" << '';
    printf(temp.str(), d);
}

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

■ 程序输出

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
.586
.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 = 5000
.data
str1 BYTE "cls", 0
str2 BYTE "dir/w", 0
str3 BYTE "Enter the name of a file: ", 0
str4 BYTE "%s", 0
str5 BYTE "Failed to open the file", 0dh, 0ah, 0
str6 BYTE "Succeeded to open the file", 0dh, 0ah, 0
modeStr BYTE "r",0

fileName BYTE 60 DUP(0)
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 == 0
        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();
}