Любителям ассемблера посвещается...

[Twister]

Как писал в одном из своих постов tyomitch, возникло непреодолимое желание понтануться. Некоторое время назад, когда на работе ну совсем нечего было делать, я изучал исходники masm32lib и наткнулся на код функции ATODW (кто не знает - перевод строки в число). Ее размер в скомпилированном виде составлет 54 байта. Рядом валялся пример Iczelion-а (этот чел вместе с hutch считается первопроходцем в программировании на ассемблере для Win32), но он "весит" аж 71 байт, кроме того в нем использовался вызов lstrlen для определения длинны строки. Вот тут-то и возникло желание написать свою функцию без использования API, чтоб ее размер был как можно меньше. У меня получилось 46 байт:

Код: Выделить всё

; Функция Str2Int - преобразует строку в число (от 0 до FFFFFFFFh)
; На входе в EDI указатель на строку
; На выходе в EBX преобразованное число
Str2Int PROC
     mov      esi,edi
   xor      eax,eax
_loop:
   scasb
   jne      _loop
   sub      edi,esi
   mov      ecx,edi   
   dec      ecx
   mov      edx,ecx
   xor       ebx,ebx
_loop1:
   xor      eax,eax
   lodsb   
   sub      eax,48
   mov      ecx,edx
   dec      ecx
   dec      edx
   xor      edi,edi
   inc      edi
_loop2:
   jecxz      _break
   imul      edi,10
   loop      _loop2
   imul      eax,edi
_break:
   add      ebx,eax
   test      edx,edx
   jnz      _loop1
   ret
Str2Int ENDP

Я знаю, что у нас на форуме есть люди знающие ассемблер и не упускающие возможность оптимизироваь свой код. Вопрос к ним: может у кого получалось меньше? Или может быть получится еще "сжать" мой код?

[tyomitch]

Некоторое недоумение вызывает использование imul в функции, работающей с беззнаковыми числами, ну да работает -- и ладно...
По справедливости, надо бы все используемые регистры восстанавливать, и включать это в длину кода
Сейчас доделаю свой вариант...

[keks-n]

ИМХО, по ходу дела это должно быть ещё и stdcall...

[tyomitch]

Ну, сравни длину

Код: Выделить всё

; Функция Str2Int - преобразует строку в число (от 0 до FFFFFFFFh)
; На входе в ESI указатель на строку
; На выходе в EBX преобразованное число
Str2Int PROC
   xor      ebx,ebx
_loop:
   lodsb
   sub      al,48
   jb       done
   imul     ebx,10
   add      ebx,eax
   jmp     _loop
done:
   ret
Str2Int ENDP


[Twister]

Что-то маловато кода... Я его потестирую, потом отпишусь. Просто сейчас с выходом в ИНЕТ напряг.

[Twister]

tyomitch

Ну что я могу сказать? 15 байт против 46 это что-то. Огромный респект! И почему я сам не допер до этого алгоритма? Ты его где нарыл? Вообщем, классно я понтонулся...