summaryrefslogtreecommitdiff
path: root/src/lib/libcrypto/perlasm/x86asm.pl
diff options
context:
space:
mode:
Diffstat (limited to 'src/lib/libcrypto/perlasm/x86asm.pl')
-rw-r--r--src/lib/libcrypto/perlasm/x86asm.pl33
1 files changed, 19 insertions, 14 deletions
diff --git a/src/lib/libcrypto/perlasm/x86asm.pl b/src/lib/libcrypto/perlasm/x86asm.pl
index 5979122158..c3de90c65d 100644
--- a/src/lib/libcrypto/perlasm/x86asm.pl
+++ b/src/lib/libcrypto/perlasm/x86asm.pl
@@ -18,34 +18,37 @@ sub main'asm_init
18 ($type,$fn,$i386)=@_; 18 ($type,$fn,$i386)=@_;
19 $filename=$fn; 19 $filename=$fn;
20 20
21 $elf=$cpp=$coff=$aout=$win32=$netware=$mwerks=0; 21 $elf=$cpp=$sol=$aout=$win32=$gaswin=$openbsd=0;
22 if ( ($type eq "elf")) 22 if ( ($type eq "elf"))
23 { $elf=1; require "x86unix.pl"; } 23 { $elf=1; require "x86unix.pl"; }
24 elsif ( ($type eq "openbsd-elf"))
25 { $openbsd=$elf=1; require "x86unix.pl"; }
26 elsif ( ($type eq "openbsd-a.out"))
27 { $openbsd=1; require "x86unix.pl"; }
24 elsif ( ($type eq "a.out")) 28 elsif ( ($type eq "a.out"))
25 { $aout=1; require "x86unix.pl"; } 29 { $aout=1; require "x86unix.pl"; }
26 elsif ( ($type eq "coff" or $type eq "gaswin")) 30 elsif ( ($type eq "gaswin"))
27 { $coff=1; require "x86unix.pl"; } 31 { $gaswin=1; $aout=1; require "x86unix.pl"; }
32 elsif ( ($type eq "sol"))
33 { $sol=1; require "x86unix.pl"; }
28 elsif ( ($type eq "cpp")) 34 elsif ( ($type eq "cpp"))
29 { $cpp=1; require "x86unix.pl"; } 35 { $cpp=1; require "x86unix.pl"; }
30 elsif ( ($type eq "win32")) 36 elsif ( ($type eq "win32"))
31 { $win32=1; require "x86ms.pl"; } 37 { $win32=1; require "x86ms.pl"; }
32 elsif ( ($type eq "win32n")) 38 elsif ( ($type eq "win32n"))
33 { $win32=1; require "x86nasm.pl"; } 39 { $win32=1; require "x86nasm.pl"; }
34 elsif ( ($type eq "nw-nasm"))
35 { $netware=1; require "x86nasm.pl"; }
36 elsif ( ($type eq "nw-mwasm"))
37 { $netware=1; $mwerks=1; require "x86nasm.pl"; }
38 else 40 else
39 { 41 {
40 print STDERR <<"EOF"; 42 print STDERR <<"EOF";
41Pick one target type from 43Pick one target type from
42 elf - Linux, FreeBSD, Solaris x86, etc. 44 elf - linux, FreeBSD etc
43 a.out - OpenBSD, DJGPP, etc. 45 a.out - old linux
44 coff - GAS/COFF such as Win32 targets 46 sol - x86 solaris
47 cpp - format so x86unix.cpp can be used
45 win32 - Windows 95/Windows NT 48 win32 - Windows 95/Windows NT
46 win32n - Windows 95/Windows NT NASM format 49 win32n - Windows 95/Windows NT NASM format
47 nw-nasm - NetWare NASM format 50 openbsd-elf - OpenBSD elf
48 nw-mwasm- NetWare Metrowerks Assembler 51 openbsd-a.out - OpenBSD a.out
49EOF 52EOF
50 exit(1); 53 exit(1);
51 } 54 }
@@ -58,7 +61,7 @@ EOF
58&comment("Don't even think of reading this code"); 61&comment("Don't even think of reading this code");
59&comment("It was automatically generated by $filename"); 62&comment("It was automatically generated by $filename");
60&comment("Which is a perl program used to generate the x86 assember for"); 63&comment("Which is a perl program used to generate the x86 assember for");
61&comment("any of ELF, a.out, COFF, Win32, ..."); 64&comment("any of elf, a.out, BSDI, Win32, gaswin (for GNU as on Win32) or Solaris");
62&comment("eric <eay\@cryptsoft.com>"); 65&comment("eric <eay\@cryptsoft.com>");
63&comment(""); 66&comment("");
64 67
@@ -93,7 +96,7 @@ $tmp
93#ifdef OUT 96#ifdef OUT
94#define OK 1 97#define OK 1
95#define ALIGN 4 98#define ALIGN 4
96#if defined(__CYGWIN__) || defined(__DJGPP__) || (__MINGW32__) 99#if defined(__CYGWIN__) || defined(__DJGPP__) || defined(__MINGW32__)
97#undef SIZE 100#undef SIZE
98#undef TYPE 101#undef TYPE
99#define SIZE(a,b) 102#define SIZE(a,b)
@@ -127,4 +130,6 @@ BSDI - a.out with a very primative version of as.
127EOF 130EOF
128 } 131 }
129 132
133sub main'align() {} # swallow align statements in 0.9.7 context
134
1301; 1351;