generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

AMD64 OPENSSL_Uplink update.

Browse Source
This commit is contained in:
Andy Polyakov 2005-05-31 11:00:15 +00:00
parent 198bcece58
commit 0a47d82b9b
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
ms/uplink.pl
View File

@ -168,23 +168,23 @@ _DATA SEGMENT
PUBLIC OPENSSL_UplinkTable PUBLIC OPENSSL_UplinkTable
OPENSSL_UplinkTable DQ $N OPENSSL_UplinkTable DQ $N
___ ___
for ($i=1;$i<=$N;$i++) { print " DQ FLAT:\$lazy$i\n"; } for ($i=1;$i<=$N;$i++) { print " DQ \$lazy$i\n"; }
print <<___; print <<___;
_DATA ENDS _DATA ENDS
TEXT SEGMENT _TEXT SEGMENT
EXTERN OPENSSL_Uplink:NEAR EXTERN OPENSSL_Uplink:PROC
___ ___
for ($i=1;$i<=$N;$i++) { for ($i=1;$i<=$N;$i++) {
print <<___; print <<___;
ALIGN 4 ALIGN 4
\$lazy$i PROC NEAR \$lazy$i PROC
push r9 push r9
push r8 push r8
push rdx push rdx
push rcx push rcx
sub rsp,40 sub rsp,40
mov rcx,OFFSET FLAT:OPENSSL_UplinkTable lea rcx,OFFSET OPENSSL_UplinkTable
mov rdx,$i mov rdx,$i
call OPENSSL_Uplink call OPENSSL_Uplink
add rsp,40 add rsp,40
@ -197,7 +197,7 @@ ALIGN 4
___ ___
} }
print <<___; print <<___;
TEXT ENDS _TEXT ENDS
END END
___ ___
} }