aboutsummaryrefslogtreecommitdiffstats
path: root/src/libcrypto/libdes/asm/desboth.pl
diff options
context:
space:
mode:
authorAndreas Steffen <andreas.steffen@strongswan.org>2009-05-15 01:28:48 +0200
committerAndreas Steffen <andreas.steffen@strongswan.org>2009-05-15 01:28:48 +0200
commit1bfb8007c22e14025a7308e371851130df94e93e (patch)
tree4904faf9d2664abf643e4230db5a8d4047b7660b /src/libcrypto/libdes/asm/desboth.pl
parentc628e3455d486e0ebc1b98e749f9b625a9e65523 (diff)
downloadstrongswan-1bfb8007c22e14025a7308e371851130df94e93e.tar.bz2
strongswan-1bfb8007c22e14025a7308e371851130df94e93e.tar.xz
got rid of libcrypto
Diffstat (limited to 'src/libcrypto/libdes/asm/desboth.pl')
-rw-r--r--src/libcrypto/libdes/asm/desboth.pl79
1 files changed, 0 insertions, 79 deletions
diff --git a/src/libcrypto/libdes/asm/desboth.pl b/src/libcrypto/libdes/asm/desboth.pl
deleted file mode 100644
index 8f939953a..000000000
--- a/src/libcrypto/libdes/asm/desboth.pl
+++ /dev/null
@@ -1,79 +0,0 @@
-#!/usr/bin/perl
-
-$L="edi";
-$R="esi";
-
-sub des_encrypt3
- {
- local($name,$enc)=@_;
-
- &function_begin_B($name,"");
- &push("ebx");
- &mov("ebx",&wparam(0));
-
- &push("ebp");
- &push("esi");
-
- &push("edi");
-
- &comment("");
- &comment("Load the data words");
- &mov($L,&DWP(0,"ebx","",0));
- &mov($R,&DWP(4,"ebx","",0));
- &stack_push(3);
-
- &comment("");
- &comment("IP");
- &IP_new($L,$R,"edx",0);
-
- # put them back
-
- if ($enc)
- {
- &mov(&DWP(4,"ebx","",0),$R);
- &mov("eax",&wparam(1));
- &mov(&DWP(0,"ebx","",0),"edx");
- &mov("edi",&wparam(2));
- &mov("esi",&wparam(3));
- }
- else
- {
- &mov(&DWP(4,"ebx","",0),$R);
- &mov("esi",&wparam(1));
- &mov(&DWP(0,"ebx","",0),"edx");
- &mov("edi",&wparam(2));
- &mov("eax",&wparam(3));
- }
- &mov(&swtmp(2), (($enc)?"1":"0"));
- &mov(&swtmp(1), "eax");
- &mov(&swtmp(0), "ebx");
- &call("des_encrypt2");
- &mov(&swtmp(2), (($enc)?"0":"1"));
- &mov(&swtmp(1), "edi");
- &mov(&swtmp(0), "ebx");
- &call("des_encrypt2");
- &mov(&swtmp(2), (($enc)?"1":"0"));
- &mov(&swtmp(1), "esi");
- &mov(&swtmp(0), "ebx");
- &call("des_encrypt2");
-
- &stack_pop(3);
- &mov($L,&DWP(0,"ebx","",0));
- &mov($R,&DWP(4,"ebx","",0));
-
- &comment("");
- &comment("FP");
- &FP_new($L,$R,"eax",0);
-
- &mov(&DWP(0,"ebx","",0),"eax");
- &mov(&DWP(4,"ebx","",0),$R);
-
- &pop("edi");
- &pop("esi");
- &pop("ebp");
- &pop("ebx");
- &ret();
- &function_end_B($name);
- }
-
-