qsort.asm

unix环境下实现的cmm语言编译器

section .text
global qsort
qsort:
push ebx
push edx
push ecx
push esi
push edi
push ebp
mov ebp,esp
mov ebx, dword [ebp+32]
mov edx, dword [ebp+36]
cmp ebx,edx
jl near L2
jmp L1
L2:
mov ebx, dword [ebp+32]
mov edx, dword [ebp+36]
mov eax, ebx
add eax, edx
mov ecx,2
cdq
idiv ecx
push eax
push ebx
mov edx, dword [ebp+28]
push edx
call swap
add esp, 12
mov ebx, dword [ebp+32]
mov esi, ebx
mov ebx, dword [ebp+32]
add ebx, 1
mov edi, ebx
jmp L5
L4:
mov ebx, dword [ebp+32]
mov edx, 4
imul edx, ebx
mov ebx, dword [ebp+28]
add edx, ebx
mov edx, dword [edx]
push edx
mov ecx, 4
imul ecx, edi
add ecx, ebx
mov ebx, dword [ecx]
push ebx
mov ebx, dword [ebp+40]
call ebx
add esp, 8
cmp eax,0
jge near L7
mov ebx, esi
add ebx, 1
mov esi, ebx
push edi
push esi
mov ebx, dword [ebp+28]
push ebx
call swap
add esp, 12
L7:
mov ebx, edi
add ebx, 1
mov edi, ebx
L5:
mov ebx, dword [ebp+36]
cmp edi,ebx
jle near L4
push esi
mov ebx, dword [ebp+32]
push ebx
mov edx, dword [ebp+28]
push edx
call swap
add esp, 12
mov ebx, dword [ebp+40]
push ebx
mov edx, esi
sub edx, 1
push edx
mov ecx, dword [ebp+32]
push ecx
mov eax, dword [ebp+28]
push eax
call qsort
add esp, 16
mov ebx, dword [ebp+40]
push ebx
mov edx, dword [ebp+36]
push edx
mov ecx, esi
add ecx, 1
push ecx
mov eax, dword [ebp+28]
push eax
call qsort
add esp, 16
L1:
mov esp,ebp
pop ebp
pop edi
pop esi
pop ecx
pop edx
pop ebx
ret
global swap
swap:
push ebx
push edx
push ecx
push esi
push edi
push ebp
mov ebp,esp
mov esi, dword [ebp+32]
mov ebx, 4
imul ebx, esi
mov esi, dword [ebp+28]
add ebx, esi
mov esi, dword [ebx]
mov edi, esi
mov esi, dword [ebp+32]
mov ebx, 4
imul ebx, esi
mov esi, dword [ebp+28]
add ebx, esi
mov edx, dword [ebp+36]
mov ecx, 4
imul ecx, edx
mov edx, ecx
add edx, esi
mov esi, dword [edx]
mov dword  [ebx], esi
mov esi, dword [ebp+36]
mov ebx, 4
imul ebx, esi
mov esi, dword [ebp+28]
add ebx, esi
mov dword  [ebx], edi
L9:
mov esp,ebp
pop ebp
pop edi
pop esi
pop ecx
pop edx
pop ebx
ret