1#!/usr/local/bin/perl 2# 3# OS2-EMX.pl - for EMX GCC on OS/2 4# 5 6$o='/'; 7$cp='cp'; 8$rm='rm -f'; 9 10$preamble = "SHELL=sh\n"; 11 12# C compiler stuff 13 14$cc='gcc'; 15$cflags="-DL_ENDIAN -O3 -fomit-frame-pointer -m486 -Zmtd -Wall "; 16$cflags.="-Zomf " if $shlib; 17$shl_cflag="-Zdll"; 18 19if ($debug) { 20 $cflags.="-g "; 21} 22 23$obj=$shlib ? '.obj' : '.o'; 24$ofile='-o '; 25 26# EXE linking stuff 27$link='${CC}'; 28$lflags='${CFLAGS} -Zbsd-signals -s'; 29$efile='-o '; 30$exep='.exe'; 31$ex_libs="-lsocket"; 32 33# static library stuff 34$mklib='ar r'; 35$mlflags=''; 36$ranlib="ar s"; 37$plib=''; 38$libp=$shlib ? ".lib" : ".a"; 39$shlibp=$shlib ? ".dll" : ".a"; 40$lfile=''; 41 42$asm=$shlib ? 'as -Zomf' : 'as'; 43$afile='-o '; 44$bn_asm_obj=""; 45$bn_asm_src=""; 46$des_enc_obj=""; 47$des_enc_src=""; 48$bf_enc_obj=""; 49$bf_enc_src=""; 50 51if (!$no_asm) 52 { 53 $bn_asm_obj="crypto/bn/asm/bn-os2$obj crypto/bn/asm/co-os2$obj"; 54 $bn_asm_src="crypto/bn/asm/bn-os2.asm crypto/bn/asm/co-os2.asm"; 55 $des_enc_obj="crypto/des/asm/d-os2$obj crypto/des/asm/y-os2$obj"; 56 $des_enc_src="crypto/des/asm/d-os2.asm crypto/des/asm/y-os2.asm"; 57 $bf_enc_obj="crypto/bf/asm/b-os2$obj"; 58 $bf_enc_src="crypto/bf/asm/b-os2.asm"; 59 $cast_enc_obj="crypto/cast/asm/c-os2$obj"; 60 $cast_enc_src="crypto/cast/asm/c-os2.asm"; 61 $rc4_enc_obj="crypto/rc4/asm/r4-os2$obj"; 62 $rc4_enc_src="crypto/rc4/asm/r4-os2.asm"; 63 $rc5_enc_obj="crypto/rc5/asm/r5-os2$obj"; 64 $rc5_enc_src="crypto/rc5/asm/r5-os2.asm"; 65 $md5_asm_obj="crypto/md5/asm/m5-os2$obj"; 66 $md5_asm_src="crypto/md5/asm/m5-os2.asm"; 67 $sha1_asm_obj="crypto/sha/asm/s1-os2$obj"; 68 $sha1_asm_src="crypto/sha/asm/s1-os2.asm"; 69 $rmd160_asm_obj="crypto/ripemd/asm/rm-os2$obj"; 70 $rmd160_asm_src="crypto/ripemd/asm/rm-os2.asm"; 71 $cflags.=" -DBN_ASM -DMD5_ASM -DSHA1_ASM -DOPENSSL_BN_ASM_PART_WORDS"; 72 } 73 74if ($shlib) 75 { 76 $mlflags.=" $lflags -Zdll"; 77 $lib_cflag=" -D_DLL"; 78 $out_def="out_dll"; 79 $tmp_def="tmp_dll"; 80 } 81 82sub do_lib_rule 83 { 84 local($obj,$target,$name,$shlib)=@_; 85 local($ret,$_,$Name); 86 87 $target =~ s/\//$o/g if $o ne '/'; 88 $target="$target"; 89 ($Name=$name) =~ tr/a-z/A-Z/; 90 91 $ret.="$target: \$(${Name}OBJ)\n"; 92 if (!$shlib) 93 { 94 $ret.="\t\$(RM) $target\n"; 95 $ret.="\t\$(MKLIB) $target \$(${Name}OBJ)\n"; 96 $ret.="\t\$(RANLIB) $target\n\n"; 97 } 98 else 99 { 100 local($ex)=($target =~ /O_SSL/)?' $(L_CRYPTO)':''; 101 $ex.=' -lsocket'; 102 $ret.="\t\$(LINK_CMD) \$(SHLIB_CFLAGS) \$(MLFLAGS) $efile$target \$(SHLIB_EX_OBJ) \$(${Name}OBJ) $ex os2/${Name}.def\n"; 103 $ret.="\temximp -o $out_def/$name.a os2/${Name}.def\n"; 104 $ret.="\temximp -o $out_def/$name.lib os2/${Name}.def\n\n"; 105 } 106 } 107 108sub do_link_rule 109 { 110 local($target,$files,$dep_libs,$libs)=@_; 111 local($ret,$_); 112 113 $file =~ s/\//$o/g if $o ne '/'; 114 $n=&bname($target); 115 $ret.="$target: $files $dep_libs\n"; 116 $ret.="\t\$(LINK_CMD) ${efile}$target \$(CFLAG) \$(LFLAGS) $files $libs\n\n"; 117 return($ret); 118 } 119 1201; 121