Asembler x86/Łączenie z językami wysokiego poziomu/Moduły w języku C
// zawartość pliku str.c
#include <stdio.h>
extern unsigned int mystrlen (const char*);
int main()
{
char c[32];
puts("Wprowadź dowolny ciąg znaków..");
scanf("%31s", c);
printf("Wprowadzony ciąg zawiera %d znaków.\n",mystrlen(c));
return 0;
}
Poniższy kod w języku Asembler kompilujemy do pliku obiektowego libfunmystrlen.o korzystając z polecenia:
as libfunmystrlen.s -o libfunmystrlen.o
/* zawartość pliku libfunmystrlen.s
zadeklarowaliśmy funkcję w C linkowaną statycznie
extern unsigned int mystrlen(const char*); , zatem:
8(%EBP) zawiera wskaźnik pierwszego znaku
4(%EBP) adres powrotu z funkcji
%EBP pierwotną wartość rejestru EBP
*/
.text
.global mystrlen
mystrlen:
pushl %ebp # tworzymy ramkę stosu
movl %esp,%ebp # EBP = ESP (base pointer = stack pointer)
movb 8(%ebp), %esi # ESI wskazuje teraz na pierwszy znak danego ciągu
xorl %ecx,%ecx # zerowanie rejestru ECX zliczającego znaki w ciąg
cld # ustalenie kierunku odczytu znaków dla polecenia LODSB
petla:
xorl %eax,%eax # zerujemy EAX zanim pobierzemy kolejny znak
lodsb # do rejestru AL pobierany jest znak [esi]
# indeks ESI zwiększany jest o 1
incl %ecx # po każdym przebiegu ECX = ECX+1
orl %eax,%eax # jeżeli EAX różne od zera
jnz petla # skok do "petla"
decl %ecx # odjęcie końcowego znaku $ od wartości zliczonej w ECX
movl %ecx,%eax # wynik funkcji umieszczany jest w EAX
movl %ebp,%esp # niszczymy ramkę stosu, ESP=EBP
popl %ebp # przywracamy pierwotną wartość EBP
ret # koniec funkcji
Następnie pozostaje jedynie zlinkować statycznie powstałe pliki obiektowe w jeden plik wykonywalny str korzystając z polecenia:
gcc libfunmystrlen.o str.c -o str