4
# &asm_init("cpp","des-586.pl");
12
&asm_finish_cpp() if $cpp;
13
print &asm_get_output();
21
$cpp=$sol=$aout=$win32=0;
22
if ( ($type eq "elf"))
23
{ require "x86unix.pl"; }
24
elsif ( ($type eq "a.out"))
25
{ $aout=1; require "x86unix.pl"; }
26
elsif ( ($type eq "sol"))
27
{ $sol=1; require "x86unix.pl"; }
28
elsif ( ($type eq "cpp"))
29
{ $cpp=1; require "x86unix.pl"; }
30
elsif ( ($type eq "win32"))
31
{ $win32=1; require "x86ms.pl"; }
35
Pick one target type from
36
elf - linux, FreeBSD etc
39
cpp - format so x86unix.cpp can be used
40
win32 - Windows 95/Windows NT
47
&comment("Don't even think of reading this code");
48
&comment("It was automatically generated by $filename");
49
&comment("Which is a perl program used to generate the x86 assember for");
50
&comment("any of elf, a.out, BSDI,Win32, or Solaris");
51
&comment("eric <eay\@cryptsoft.com>");
54
$filename =~ s/\.pl$//;
63
foreach $i (&get_labels())
65
$tmp.="#define $i _$i\n";
68
/* Run the C pre-processor over this file with one of the following defined
69
* ELF - elf object files,
70
* OUT - a.out object files,
71
* BSDI - BSDI style a.out object files
72
* SOL - Solaris style elf
75
#define TYPE(a,b) .type a,b
76
#define SIZE(a,b) .size a,b
78
#if defined(OUT) || defined(BSDI)
94
#if defined(ELF) || defined(SOL)
100
You need to define one of
101
ELF - elf systems - linux-elf, NetBSD and DG-UX
102
OUT - a.out systems - linux-a.out and FreeBSD
103
SOL - solaris systems, which are elf with strange comment lines
104
BSDI - a.out with a very primative version of as.
107
/* Let the Assembler begin :-) */