
1: #!/usr/local/bin/perl 2: # 3: # Mingw32.pl -- Mingw 4: # 5: 6: $o='/'; 7: $cp='cp'; 8: $rm='rm -f'; 9: $mkdir='gmkdir'; 10: 11: $o='\\'; 12: $cp='copy'; 13: $rm='del'; 14: $mkdir='mkdir'; 15: 16: # C compiler stuff 17: 18: $cc='gcc'; 19: if ($debug) 20: { $cflags="-DL_ENDIAN -DDSO_WIN32 -g2 -ggdb"; } 21: else 22: { $cflags="-DL_ENDIAN -DDSO_WIN32 -fomit-frame-pointer -O3 -march=i486 -Wall"; } 23: 24: if ($gaswin and !$no_asm) 25: { 26: $bn_asm_obj='$(OBJ_D)\bn-win32.o'; 27: $bn_asm_src='crypto/bn/asm/bn-win32.s'; 28: $bnco_asm_obj='$(OBJ_D)\co-win32.o'; 29: $bnco_asm_src='crypto/bn/asm/co-win32.s'; 30: $des_enc_obj='$(OBJ_D)\d-win32.o $(OBJ_D)\y-win32.o'; 31: $des_enc_src='crypto/des/asm/d-win32.s crypto/des/asm/y-win32.s'; 32: $bf_enc_obj='$(OBJ_D)\b-win32.o'; 33: $bf_enc_src='crypto/bf/asm/b-win32.s'; 34: # $cast_enc_obj='$(OBJ_D)\c-win32.o'; 35: # $cast_enc_src='crypto/cast/asm/c-win32.s'; 36: $rc4_enc_obj='$(OBJ_D)\r4-win32.o'; 37: $rc4_enc_src='crypto/rc4/asm/r4-win32.s'; 38: $rc5_enc_obj='$(OBJ_D)\r5-win32.o'; 39: $rc5_enc_src='crypto/rc5/asm/r5-win32.s'; 40: $md5_asm_obj='$(OBJ_D)\m5-win32.o'; 41: $md5_asm_src='crypto/md5/asm/m5-win32.s'; 42: $rmd160_asm_obj='$(OBJ_D)\rm-win32.o'; 43: $rmd160_asm_src='crypto/ripemd/asm/rm-win32.s'; 44: $sha1_asm_obj='$(OBJ_D)\s1-win32.o'; 45: $sha1_asm_src='crypto/sha/asm/s1-win32.s'; 46: $cpuid_asm_obj='$(OBJ_D)\cpu-win32.o'; 47: $cpuid_asm_src='crypto/cpu-win32.s'; 48: $cflags.=" -DBN_ASM -DMD5_ASM -DSHA1_ASM -DOPENSSL_BN_ASM_PART_WORDS"; 49: } 50: 51: 52: $obj='.o'; 53: $ofile='-o '; 54: 55: # EXE linking stuff 56: $link='${CC}'; 57: $lflags='${CFLAGS}'; 58: $efile='-o '; 59: $exep=''; 60: $ex_libs="-lwsock32 -lgdi32"; 61: 62: # static library stuff 63: $mklib='ar r'; 64: $mlflags=''; 65: $ranlib='ranlib'; 66: $plib='lib'; 67: $libp=".a"; 68: $shlibp=".a"; 69: $lfile=''; 70: 71: $asm='as'; 72: $afile='-o '; 73: #$bn_asm_obj=""; 74: #$bn_asm_src=""; 75: #$des_enc_obj=""; 76: #$des_enc_src=""; 77: #$bf_enc_obj=""; 78: #$bf_enc_src=""; 79: 80: sub do_lib_rule 81: { 82: local($obj,$target,$name,$shlib)=@_; 83: local($ret,$_,$Name); 84: 85: $target =~ s/\//$o/g if $o ne '/'; 86: $target="$target"; 87: ($Name=$name) =~ tr/a-z/A-Z/; 88: 89: $ret.="$target: \$(${Name}OBJ)\n"; 90: $ret.="\tif exist $target \$(RM) $target\n"; 91: $ret.="\t\$(MKLIB) $target \$(${Name}OBJ)\n"; 92: $ret.="\t\$(RANLIB) $target\n\n"; 93: } 94: 95: sub do_link_rule 96: { 97: local($target,$files,$dep_libs,$libs)=@_; 98: local($ret,$_); 99: 100: $file =~ s/\//$o/g if $o ne '/'; 101: $n=&bname($target); 102: $ret.="$target: $files $dep_libs\n"; 103: $ret.="\t\$(LINK) ${efile}$target \$(LFLAGS) $files $libs\n\n"; 104: return($ret); 105: } 106: 1;