ChangeLogTag:Tue Apr 18 19:08:37 2000 Darrell Brunsch <brunsch@uci.edu>

2 files changed, 50 insertions, 51 deletions

diff --git a/bin/GenExportH.BAT b/bin/GenExportH.BAT
deleted file mode 100755
index 31b36858328..00000000000
--- a/bin/GenExportH.BAT
+++ /dev/null
@@ -1,51 +0,0 @@
-@Echo off
-REM
-REM $Id$
-REM
-REM Usage:
-REM	GenExportH.BAT <EXPORT_TAG>   >   <export_file.h>
-REM
-REM Author: Nanbor Wang <nanbor@cs.wustl.edu>
-REM
-
-if "%1" == "" goto emptyexport
-Echo // -*- C++ -*-
-Echo // $Id$
-Echo // Definition for Win32 Export directives.
-Echo // This file is generated automatically by
-Echo // ${ACE_ROOT}/GenExportH.BAT
-Echo // ------------------------------
-Echo #if !defined (%1_EXPORT_H)
-Echo #define %1_EXPORT_H
-Echo.
-Echo #include "ace/OS.h"
-Echo.
-Echo #if !defined (%1_HAS_DLL)
-Echo #define %1_HAS_DLL 1
-Echo #endif /* ! %1_HAS_DLL */
-Echo.
-Echo #if defined (%1_HAS_DLL)
-Echo #  if (%1_HAS_DLL == 1)
-Echo #    if defined (%1_BUILD_DLL)
-Echo #      define %1_Export ACE_Proper_Export_Flag
-Echo #      define %1_SINGLETON_DECLARATION(T) ACE_EXPORT_SINGLETON_DECLARATION (T)
-Echo #    else
-Echo #      define %1_Export ACE_Proper_Import_Flag
-Echo #      define %1_SINGLETON_DECLARATION(T) ACE_IMPORT_SINGLETON_DECLARATION (T)
-Echo #    endif /* %1_BUILD_DLL */
-Echo #  else
-Echo #    define %1_Export
-Echo #    define %1_SINGLETON_DECLARATION(T)
-Echo #  endif   /* ! %1_HAS_DLL == 1 */
-Echo #else
-Echo #  define %1_Export
-Echo #  define %1_SINGLETON_DECLARATION(T)
-Echo #endif     /* %1_HAS_DLL */
-Echo.
-Echo #endif     /* %1_EXPORT_H */
-Echo.
-Echo // End of auto generated file.
-goto endrun
-:emptyexport
-Echo #error usage: GenExportH.BAT EXPORT_TAG (Remember to redirect the output to a file.)
-:endrun
\ No newline at end of file
diff --git a/bin/generate_export_file.pl b/bin/generate_export_file.pl
new file mode 100755
index 00000000000..22bd826a4ed
--- /dev/null
+++ b/bin/generate_export_file.pl
@@ -0,0 +1,50 @@
+eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
+    & eval 'exec perl -S $0 $argv:q'
+    if 0;
+
+# $Id$
+# Replacement for the old trusty GenExportH.bat
+# Creates the nice little *_export file which is used for
+# importing and exporting of symbols in DLLs.
+
+die "Error: Missing command line argument" if ($#ARGV < 0);
+
+$name = $ARGV[0];
+$ucname = uc $name;
+
+print "// -*- C++ -*-\n";
+print "// \$"."Id\$\n";
+print "// Definition for Win32 Export directives.\n";
+print "// This file is generated automatically by\n";
+print "// generate_export_file.pl\n";
+print "// ------------------------------\n";
+print "#if !defined ($ucname"."_EXPORT_H)\n";
+print "#define $ucname"."_EXPORT_H\n";
+print "\n";
+print "#include \"ace/config-all.h\"\n";
+print "\n";
+print "#if !defined ($ucname"."_HAS_DLL)\n";
+print "#define $ucname"."_HAS_DLL 1\n";
+print "#endif /* ! $ucname"."_HAS_DLL */\n";
+print "\n";
+print "#if defined ($ucname"."_HAS_DLL)\n";
+print "#  if ($ucname"."_HAS_DLL == 1)\n";
+print "#    if defined ($ucname"."_BUILD_DLL)\n";
+print "#      define $name"."_Export ACE_Proper_Export_Flag\n";
+print "#      define $ucname"."_SINGLETON_DECLARATION(T) ACE_EXPORT_SINGLETON_DECLARATION (T)\n";
+print "#    else\n";
+print "#      define $name"."_Export ACE_Proper_Import_Flag\n";
+print "#      define $ucname"."_SINGLETON_DECLARATION(T) ACE_IMPORT_SINGLETON_DECLARATION (T)\n";
+print "#    endif /* $ucname"."_BUILD_DLL */\n";
+print "#  else\n";
+print "#    define $name"."_Export\n";
+print "#    define $ucname"."_SINGLETON_DECLARATION(T)\n";
+print "#  endif   /* ! $ucname"."_HAS_DLL == 1 */\n";
+print "#else\n";
+print "#  define $name"."_Export\n";
+print "#  define $ucname"."_SINGLETON_DECLARATION(T)\n";
+print "#endif     /* $ucname"."_HAS_DLL */\n";
+print "\n";
+print "#endif     /* $ucname"."_EXPORT_H */\n";
+print "\n";
+print "// End of auto generated file.\n";