diff options
Diffstat (limited to 'src/lib/libcrypto/perlasm/x86asm.pl')
| -rw-r--r-- | src/lib/libcrypto/perlasm/x86asm.pl | 33 |
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"; |
| 41 | Pick one target type from | 43 | Pick 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 |
| 49 | EOF | 52 | EOF |
| 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. | |||
| 127 | EOF | 130 | EOF |
| 128 | } | 131 | } |
| 129 | 132 | ||
| 133 | sub main'align() {} # swallow align statements in 0.9.7 context | ||
| 134 | |||
| 130 | 1; | 135 | 1; |
