From: Neil Conway <neilc@samurai.com>
Date: Wed, 10 Jan 2007 04:02:05 +0000 (+0000)
Subject: Attached patch fixes two problems:
X-Git-Tag: REL8_3_BETA1~1549
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=5f6d735356c9090d87e184c9322bfe37a165a014;p=postgresql

Attached patch fixes two problems:

1) gendef works from inside visual studio - use a tempfile instead of
redirection, because for some reason you can't redirect dumpbin from
inside (patch from Joachim Wieland)
2) gendef must process only *.obj, or you get weird errors in some build
scenarios when it tries to process a logfile

Magnus Hagander
---

diff --git a/src/tools/msvc/gendef.pl b/src/tools/msvc/gendef.pl
index d5d9bc78c7..675d8423b4 100644
--- a/src/tools/msvc/gendef.pl
+++ b/src/tools/msvc/gendef.pl
@@ -10,9 +10,10 @@ if (-f "$ARGV[0]/$defname.def") {
 
 print "Generating $defname.DEF from directory $ARGV[0]\n";
 
-while (<$ARGV[0]/*>) {
+while (<$ARGV[0]/*.obj>) {
     print ".";
-	open(F,"dumpbin /symbols $_|") || die "Could not open $_\n";
+	system("dumpbin /symbols /out:symbols.out $_ >NUL") && die "Could not call dumpbin";
+	open(F, "<symbols.out") || die "Could not open symbols.out for $_\n";
 	while (<F>) {
 		s/\(\)//g;
 		next unless /^\d/;
@@ -31,6 +32,7 @@ while (<$ARGV[0]/*>) {
 		push @def, $pieces[6];
 	}
 	close(F);
+	unlink("symbols.out");
 }
 print "\n";