confignt.pl

#!/usr/bin/perl
# Copyright (C) 1996-2002 by Salvador E. Tropea (SET),
# see copyrigh file for details
#

require "miscperl.pl";
require "conflib.pl";

SeeCommandLine();

# 1) Get the list of files used by djgpp version
$col=14;
$a=ExtractItemsImk('makes/librhtv.imk',$col);
$a.=' '.ExtractItemsImk('compat/compat.imk',$col);
# 2) Remove djgpp specific things
$a=~s/vga.o//;
$a=~s/vgaregs.o//;
$a=~s/vgastate.o//;
$a=~s/vesa.o//;
# 3) Add BC++ specific
#$a.=' gkeyw32.cc';
$b=$a;
$a=~s/(\w+)\.(\w+)/\+$1\.obj/g;
$a=~s/\t//g;
# 3b) MSVC specific
$b=~s/(\w+)\.(\w+)/\$\(OBJDIR\)\/$1\.o/g;
# 4) Generate makefile from the template
$ReplaceTags{'TV_OBJS_BCC'}=$a;
$ReplaceTags{'TV_OBJS_MSVC'}=$b;

$ReplaceTags{'DYNRTL'} = $conf{'dynrtl'} ? "DYNRTL = 1" : "";

ReplaceText('winnt/bccmake.in','winnt/Makefile');
ReplaceText('winnt/msvcmake.in','winnt/Makefile.nmk');

sub SeeCommandLine
{
 my $i;

 foreach $i (@ARGV)
   {
    if ($i eq '--help')
      {
       ShowHelp();
       die "\n";
      }
    elsif ($i eq '--with-dynrtl')
      {
       $conf{'dynrtl'} = 1;
      }
    else
      {
       ShowHelp();
       die "Unknown option: $i\n";
      }
   }
}

sub ShowHelp
{
 print "Available options:\n\n";
 print "--help         : displays this text.\n";
 print "--bindir=path  : defines the directory where *.exe files will be installed.\n";
 print "--setdir=path  : defines the directory where documentation andsupport files\n" .
       "                 will be installed.\n";
 print "--with-dynrtl  : compile with DLL runtime.\n";
}