programs/make_progs

   1 #!/usr/bin/perl -w
   2 #
   3 # Update the dependencies in the programs main Makefile.in.
   4 # Must be run in the programs/ directory of the Wine tree.
   5 #
   6 # Copyright 2003 Alexandre Julliard
   7 #
   8 # This library is free software; you can redistribute it and/or
   9 # modify it under the terms of the GNU Lesser General Public
  10 # License as published by the Free Software Foundation; either
  11 # version 2.1 of the License, or (at your option) any later version.
  12 #
  13 # This library is distributed in the hope that it will be useful,
  14 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16 # Lesser General Public License for more details.
  17 #
  18 # You should have received a copy of the GNU Lesser General Public
  19 # License along with this library; if not, write to the Free Software
  20 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  21 #
  22
  23 use strict;
  24
  25 my $makefiles = `find . -name Makefile.in -print`;
  26
  27 my %directories = ();
  28
  29 # Programs that we want to install in the bin directory too
  30 my %bin_install =
  31 (
  32   "msiexec" => 1,
  33   "notepad" => 1,
  34   "progman" => 1,
  35   "regedit" => 1,
  36   "regsvr32" => 1,
  37   "uninstaller" => 1,
  38   "wcmd" => 1,
  39   "wineboot" => 1,
  40   "winebrowser" => 1,
  41   "winecfg" => 1,
  42   "wineconsole" => 1,
  43   "winedbg" => 1,
  44   "winefile" => 1,
  45   "winemine" => 1,
  46   "winepath" => 1,
  47   "winhelp" => 1,
  48 );
  49
  50 # Programs that we don't want to install at all
  51 my %dont_install =
  52 (
  53   "cmdlgtst" => 1,
  54   "view" => 1,
  55 );
  56
  57 foreach my $i (split(/\s/,$makefiles))
  58 {
  59     my $module;
  60
  61     next if $i =~ /\/tests\/Makefile.in/;
  62
  63     open MAKE,$i;
  64
  65     $module = undef;
  66     while (<MAKE>)
  67     {
  68         chop;
  69         # hack to disable this program... the MKPROG_SKIP comment must appear
  70         # at the very top of the Makefile.in
  71         last if (/^\#\s*MKPROG_SKIP/);
  72
  73         if (/^MODULE\s*=\s*([a-zA-Z0-9_.]+)/)
  74         {
  75             $module = $1;
  76             next if ($module eq "none");
  77             ($directories{$module} = $i) =~ s/^\.\/(.*)\/[^\/]+$/$1/;
  78             last;
  79         }
  80         if (/^PROGRAMS\s*=((\s*[a-zA-Z0-9_.]+)+)/)
  81         {
  82             my @programs = split / /, $1;
  83             foreach my $prog (@programs)
  84             {
  85                 next unless $prog =~ /\.exe$/;
  86                 ($directories{$prog} = $i) =~ s/^\.\/(.*)\/[^\/]+$/$1/;
  87             }
  88             last;
  89         }
  90     }
  91     close MAKE;
  92 }
  93
  94 open NEWMAKE,">Makefile.in.new" or die "cannot create Makefile.in.new";
  95
  96 ################################################################
  97 # makefile header
  98
  99 print NEWMAKE <<EOF;
 100 # Automatically generated by make_progs; DO NOT EDIT!!
 101
 102 TOPSRCDIR = \@top_srcdir\@
 103 TOPOBJDIR = ..
 104 SRCDIR    = \@srcdir\@
 105 VPATH     = \@srcdir\@
 106
 107 EOF
 108
 109 ################################################################
 110 # output the subdirs list
 111
 112 # get rid of duplicates
 113 my %alldirs = ();
 114 foreach my $dir (sort values %directories) { $alldirs{$dir} = 1; }
 115
 116 print NEWMAKE "SUBDIRS =";
 117 foreach my $dir (sort keys %alldirs)
 118 {
 119     printf NEWMAKE " \\\n\t%s", $dir;
 120 }
 121
 122 print NEWMAKE "\n\n# Sub-directories to run make install into\nINSTALLSUBDIRS =";
 123 foreach my $dir (sort keys %alldirs)
 124 {
 125     next if $dont_install{$dir};
 126     printf NEWMAKE " \\\n\t%s", $dir;
 127 }
 128
 129 print NEWMAKE "\n\n# Programs to install in bin directory\nINSTALLPROGS =";
 130 foreach my $dir (sort keys %alldirs)
 131 {
 132     printf NEWMAKE " \\\n\t%s", $dir if $bin_install{$dir};
 133 }
 134
 135 print NEWMAKE "\n\n# Symlinks to apps that we want to run from inside the source tree\nSYMLINKS =";
 136 foreach my $mod (sort keys %directories)
 137 {
 138     printf NEWMAKE " \\\n\t%s\$(DLLEXT)", $mod;
 139 }
 140
 141 ################################################################
 142 # output the build and install targets
 143
 144 print NEWMAKE <<EOF;
 145
 146
 147 \@MAKE_RULES\@
 148
 149 all: wineapploader winelauncher \$(SUBDIRS) \$(SYMLINKS)
 150
 151 wineapploader: wineapploader.in
 152         sed -e 's,\@bindir\\\@,\$(bindir),g' \$(SRCDIR)/wineapploader.in >\$\@ || (\$(RM) \$\@ && false)
 153
 154 winelauncher: winelauncher.in
 155         sed -e 's,\@bindir\\\@,\$(bindir),g' -e 's,\@libdir\\\@,\$(libdir),g' -e 's,\@dlldir\\\@,\$(dlldir),g' \$(SRCDIR)/winelauncher.in >\$\@ || (\$(RM) \$\@ && false)
 156
 157 # Rules for installation
 158
 159 .PHONY: install-apploader install-progs install-progs.so \$(INSTALLPROGS:%=%/__installprog__)
 160
 161 install-apploader: wineapploader dummy
 162         \$(MKINSTALLDIRS) \$(bindir)
 163         \$(INSTALL_SCRIPT) wineapploader \$(bindir)/wineapploader
 164
 165 \$(INSTALLPROGS:%=%/__installprog__): install-apploader
 166         \$(RM) \$(bindir)/`dirname \$\@` && \$(LN) \$(bindir)/wineapploader \$(bindir)/`dirname \$\@`
 167
 168 install-progs.so: \$(INSTALLPROGS:%=%/__installprog__)
 169         \$(RM) \$(bindir)/wineapploader
 170
 171 install-progs: # nothing to do here
 172
 173 install:: winelauncher install-progs\$(DLLEXT)
 174         \$(MKINSTALLDIRS) \$(bindir)
 175         \$(INSTALL_SCRIPT) winelauncher \$(bindir)/winelauncher
 176
 177 uninstall::
 178         -cd \$(bindir) && \$(RM) wineapploader winelauncher \$(INSTALLPROGS)
 179         -rmdir \$(dlldir)
 180
 181 clean::
 182         \$(RM) wineapploader winelauncher \$(SYMLINKS)
 183
 184 # Rules for testing
 185
 186 check test:: \$(SUBDIRS:%=%/__test__)
 187
 188 EOF
 189
 190 ################################################################
 191 # output the symlinks rules
 192
 193 print NEWMAKE "# Rules for symlinks\n\n";
 194
 195 foreach my $mod (sort keys %directories)
 196 {
 197     printf NEWMAKE "%s\$(DLLEXT)", $mod;
 198     printf NEWMAKE ": %s/%s\$(DLLEXT)\n", $directories{$mod}, $mod;
 199     printf NEWMAKE "\t\$(RM) \$@ && \$(LN_S) %s/%s\$(DLLEXT) \$@\n\n", $directories{$mod}, $mod;
 200 }
 201
 202 foreach my $mod (sort keys %directories)
 203 {
 204     printf NEWMAKE "%s/%s\$(DLLEXT): %s\n", $directories{$mod}, $mod, $directories{$mod};
 205 }
 206
 207 ################################################################
 208 # makefile trailer
 209
 210 print NEWMAKE "\n### Dependencies:\n";
 211
 212 close NEWMAKE;
 213 rename "Makefile.in.new", "Makefile.in";
 214 printf "Successfully updated Makefile.in\n";