dlls/make_dlls

   1 #!/usr/bin/perl -w
   2 #
   3 # Update the dll dependencies in the dlls main Makefile.in.
   4 # Must be run in the dlls/ directory of the Wine tree.
   5 #
   6 # Copyright 2001 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 my %importlibs = ();
  29 my %static_implibs = ();
  30 my %staticlib_dirs = ();
  31 my %altnames = ();
  32
  33 # list of special dlls that can be switched on or off by configure
  34 my %special_dlls =
  35 (
  36   "ddraw"    => "XFILES",
  37   "glu32"    => "GLU32FILES",
  38   "glut32"   => "GLUT32FILES",
  39   "opengl32" => "OPENGLFILES",
  40   "d3d8"     => "OPENGLFILES",
  41   "d3d9"     => "OPENGLFILES",
  42   "d3dx8"    => "OPENGLFILES",
  43   "wined3d"  => "OPENGLFILES",
  44   "x11drv"   => "XFILES"
  45 );
  46
  47 foreach my $i (split(/\s/,$makefiles))
  48 {
  49     my $module;
  50
  51     next if $i =~ /\/tests\/Makefile.in/;
  52
  53     open MAKE,$i;
  54
  55     $module = undef;
  56     while (<MAKE>)
  57     {
  58         chop;
  59         # EPP hack to disable this DLL... the MKDLL_SKIP comment must appear
  60         # at the very top of the Makefile.in
  61         last if (/^\#\s*MKDLL_SKIP/);
  62
  63         if (/^MODULE\s*=\s*([a-zA-Z0-9_.]+)/)
  64         {
  65             $module = $1;
  66             if ($module =~ /^lib.*\.a$/)
  67             {
  68                 ($staticlib_dirs{$module} = $i) =~ s/^\.\/(.*)\/[^\/]+$/$1/;
  69                 die "invalid module $module in dir $staticlib_dirs{$module}\n" if "lib$staticlib_dirs{$module}.a" ne $module;
  70             }
  71             else
  72             {
  73                 ($directories{$module} = $i) =~ s/^\.\/(.*)\/[^\/]+$/$1/;
  74             }
  75             next;
  76         }
  77         if (/^IMPORTLIB\s*=\s*([a-zA-Z0-9_.]+)\.\$\(IMPLIBEXT\)/)
  78         {
  79             $importlibs{$module} = $1;
  80             next;
  81         }
  82         if (/^IMPLIB_SRCS\s*=/)
  83         {
  84             $static_implibs{$module} = 1;
  85             next;
  86         }
  87         if (/^SPEC_SRCS16\s*=\s*(.*)/)
  88         {
  89             my $specs = $1;
  90             while ($specs =~ /\s*(.*)\\$/) { $specs = $1 . <MAKE>; }
  91             my @list = split(/\s+/,$specs);
  92             @list = map { $_ =~ s/\.spec$//; $_ .= ".dll" unless $_ =~ /\./; $_; } @list;
  93             $altnames{$module} = \@list;
  94             next;
  95         }
  96     }
  97     close MAKE;
  98 }
  99
 100 open NEWMAKE,">Makefile.in.new" or die "cannot create Makefile.in.new";
 101
 102 ################################################################
 103 # makefile header
 104
 105 print NEWMAKE <<EOF;
 106 # Automatically generated by make_dlls; DO NOT EDIT!!
 107
 108 TOPSRCDIR = \@top_srcdir\@
 109 TOPOBJDIR = ..
 110 SRCDIR    = \@srcdir\@
 111 VPATH     = \@srcdir\@
 112
 113 EOF
 114
 115 ################################################################
 116 # output special dlls configure definitions
 117
 118 printf NEWMAKE "# special configure-dependent targets\n\n";
 119 my %specials = ();
 120 foreach my $mod (sort keys %special_dlls)
 121 {
 122     $specials{$special_dlls{$mod}} .= " " . $mod;
 123 }
 124 foreach my $i (sort keys %specials)
 125 {
 126     printf NEWMAKE "%s =%s\n", $i, $specials{$i};
 127 }
 128 printf NEWMAKE "EXTRADIRS =";
 129 foreach my $i (sort keys %specials) { printf NEWMAKE " \@%s\@", $i; }
 130 printf NEWMAKE "\n\n";
 131
 132
 133 ################################################################
 134 # output the subdirs list
 135
 136 print NEWMAKE "# Subdir list\n\nBASEDIRS =";
 137 foreach my $dir (sort values %directories)
 138 {
 139     next if defined($special_dlls{$dir});  # skip special dlls
 140     printf NEWMAKE " \\\n\t%s", $dir;
 141 }
 142
 143 printf NEWMAKE "\n\nIMPLIBSUBDIRS =";
 144 foreach my $dir (sort values %staticlib_dirs)
 145 {
 146     printf NEWMAKE " \\\n\t%s", $dir;
 147 }
 148
 149 printf NEWMAKE "\n\nSUBDIRS = \\\n\t\$(BASEDIRS) \\\n\t\$(IMPLIBSUBDIRS)";
 150 foreach my $dir (sort keys %special_dlls)
 151 {
 152     printf NEWMAKE " \\\n\t%s", $dir;
 153 }
 154 printf NEWMAKE <<EOF;
 155
 156
 157 BUILDSUBDIRS = \$(BASEDIRS) \$(EXTRADIRS)
 158
 159 INSTALLSUBDIRS = \$(BUILDSUBDIRS) \$(IMPLIBSUBDIRS)
 160 EOF
 161
 162 ################################################################
 163 # output the all: target
 164
 165 my %targets = ();  # use a hash to get rid of duplicate target names
 166 my %targets16 = ();
 167 foreach my $mod (sort keys %directories)
 168 {
 169     next if defined($special_dlls{$directories{$mod}});  # skip special dlls
 170     $targets{$mod . ".so"} = 1;
 171     next unless defined $altnames{$mod};
 172     foreach my $i (sort @{$altnames{$mod}})
 173     {
 174         $targets16{$i . "16"} = $mod;
 175     }
 176 }
 177
 178 print NEWMAKE <<EOF;
 179
 180 \@MAKE_RULES\@
 181
 182 # Symbolic links
 183
 184 WIN16_FILES = \\
 185 EOF
 186 printf NEWMAKE "\t%s\n", join( " \\\n\t", sort keys %targets16 );
 187
 188 print NEWMAKE <<EOF;
 189
 190 SYMLINKS_SO = \\
 191         \$(EXTRADIRS:%=%.dll.so) \\
 192         \@WIN16_FILES\@ \\
 193 EOF
 194 printf NEWMAKE "\t%s\n", join( " \\\n\t", sort keys %targets );
 195
 196 print NEWMAKE <<EOF;
 197
 198 # Main target
 199
 200 all: symlinks\$(DLLEXT)
 201
 202 .PHONY: symlinks symlinks.so implib
 203
 204 symlinks.so: \$(SYMLINKS_SO)
 205
 206 symlinks: \$(BUILDSUBDIRS)
 207
 208 x11drv.dll.so: winex11.drv.so
 209         \$(RM) \$@ && \$(LN_S) winex11.drv.so \$@
 210
 211 EOF
 212
 213 ################################################################
 214 # output the lib name -> directory rules
 215
 216 print NEWMAKE <<EOF;
 217
 218 # Map symlink name to the corresponding library
 219
 220 EOF
 221
 222 foreach my $mod (sort keys %directories)
 223 {
 224     printf NEWMAKE "%s.so: %s/%s.so\n", $mod, $directories{$mod}, $mod;
 225     printf NEWMAKE "\t\$(RM) \$@ && \$(LN_S) %s/%s.so \$@\n\n", $directories{$mod}, $mod;
 226
 227     if (defined $altnames{$mod})
 228     {
 229         my $count = 0;
 230         foreach my $i (sort @{$altnames{$mod}})
 231         {
 232             if ($count++ == 3) { printf NEWMAKE "\\\n  "; $count = 1; }
 233             printf NEWMAKE "%s16 ", $i;
 234         }
 235         printf NEWMAKE ": %s.so\n", $mod;
 236         printf NEWMAKE "\techo \"%s\" >\$\@\n\n", $mod;
 237     }
 238 }
 239
 240 ################################################################
 241 # output the import libraries rules
 242
 243 print NEWMAKE "\n# Import libraries\n\n";
 244 print NEWMAKE "STATIC_IMPLIBEXT = \$(IMPLIBEXT:def=def.a)\n\n";
 245
 246 my @lib_symlinks = ();
 247 foreach my $mod (sort keys %importlibs)
 248 {
 249     my $dir = $directories{$mod};
 250     my $lib = $importlibs{$mod};
 251     if ($lib ne "lib" . $dir) { push @lib_symlinks, $mod; }
 252 }
 253 print NEWMAKE "IMPORT_SYMLINKS =";
 254 foreach my $mod (sort @lib_symlinks)
 255 {
 256     printf NEWMAKE " \\\n\t%s.\$(IMPLIBEXT)", $importlibs{$mod};
 257 }
 258
 259 print NEWMAKE "\n\nIMPORT_LIBS = \\\n\t\$(IMPORT_SYMLINKS)";
 260 foreach my $mod (sort keys %staticlib_dirs)
 261 {
 262     printf NEWMAKE " \\\n\t%s/%s", $staticlib_dirs{$mod}, $mod;
 263 }
 264 foreach my $mod (sort keys %importlibs)
 265 {
 266     my $dir = $directories{$mod};
 267     my $def = $mod;
 268     $def =~ s/\.(dll|drv)$//;
 269     printf NEWMAKE " \\\n\t%s/lib%s.\$(IMPLIBEXT)", $dir, $def;
 270     printf NEWMAKE " \\\n\t%s/lib%s.\$(STATIC_IMPLIBEXT)", $dir, $def if $static_implibs{$mod};
 271 }
 272 print NEWMAKE "\n\n";
 273 print NEWMAKE "implib: \$(IMPORT_LIBS)\n\n";
 274
 275 foreach my $mod (sort keys %importlibs)
 276 {
 277     my $dir = $directories{$mod};
 278     my $lib = $importlibs{$mod};
 279     my $spec = $mod;
 280     $spec =~ s/\.dll$//;
 281     printf NEWMAKE "%s/%s.\$(IMPLIBEXT): %s/%s.spec \$(WINEBUILD)\n", $dir, $lib, $dir, $spec;
 282     printf NEWMAKE "\t\@cd %s && \$(MAKE) %s.\$(IMPLIBEXT)\n\n", $dir, $lib;
 283     next unless $static_implibs{$mod};
 284     printf NEWMAKE "%s/%s.\$(STATIC_IMPLIBEXT): dummy\n", $dir, $lib, $dir, $spec;
 285     printf NEWMAKE "\t\@cd %s && \$(MAKE) %s.\$(STATIC_IMPLIBEXT)\n\n", $dir, $lib;
 286 }
 287 foreach my $mod (sort @lib_symlinks)
 288 {
 289     my $dir = $directories{$mod};
 290     my $lib = $importlibs{$mod} . ".\$(IMPLIBEXT)";
 291     printf NEWMAKE "%s: %s/%s\n", $lib, $dir, $lib;
 292     printf NEWMAKE "\t\$(RM) \$@ && \$(LN_S) %s/%s \$@\n\n", $dir, $lib;
 293 }
 294
 295 print NEWMAKE <<EOF;
 296 \$(BUILDSUBDIRS): \$(IMPORT_LIBS)
 297 \$(INSTALLSUBDIRS:%=%/__install__) \$(INSTALLSUBDIRS:%=%/__install-lib__): \$(IMPORT_LIBS)
 298
 299 EOF
 300
 301 ################################################################
 302 # output the inter-dll dependencies and rules
 303
 304 print NEWMAKE "# Map library name to the corresponding directory\n\n";
 305
 306 foreach my $mod (sort keys %directories)
 307 {
 308     printf NEWMAKE "%s/%s.so: %s\n", $directories{$mod}, $mod, $directories{$mod};
 309 }
 310 foreach my $mod (sort keys %staticlib_dirs)
 311 {
 312     printf NEWMAKE "%s/%s: %s\n", $staticlib_dirs{$mod}, $mod, $staticlib_dirs{$mod};
 313 }
 314
 315 ################################################################
 316 # makefile trailer
 317
 318 print NEWMAKE <<EOF;
 319
 320 # Rules for auto documentation
 321
 322 \$(SUBDIRS:%=%/__man__): dummy
 323         cd `dirname \$@` && \$(MAKE) man
 324
 325 man: \$(SUBDIRS:%=%/__man__)
 326
 327 \$(SUBDIRS:%=%/__doc_html__): dummy
 328         cd `dirname \$@` && \$(MAKE) doc-html
 329
 330 doc-html: \$(SUBDIRS:%=%/__doc_html__)
 331
 332 \$(SUBDIRS:%=%/__doc_sgml__): dummy
 333         cd `dirname \$@` && \$(MAKE) doc-sgml
 334
 335 doc-sgml: \$(SUBDIRS:%=%/__doc_sgml__)
 336
 337 .PHONY: man doc-html doc-sgml \$(SUBDIRS:%=%/__man__) \$(SUBDIRS:%=%/__doc_html__) \$(SUBDIRS:%=%/__doc_sgml__)
 338
 339 # Misc rules
 340
 341 install-lib:: \$(INSTALLSUBDIRS:%=%/__install-lib__)
 342
 343 install-dev:: \$(INSTALLSUBDIRS:%=%/__install-dev__)
 344
 345 uninstall::
 346         -rmdir \$(DESTDIR)\$(dlldir)
 347
 348 clean::
 349         \$(RM) \$(IMPORT_SYMLINKS) \$(WIN16_FILES)
 350
 351 check test:: \$(BUILDSUBDIRS:%=%/__test__)
 352
 353 crosstest:: \$(BUILDSUBDIRS:%=%/__crosstest__)
 354
 355 checklink:: \$(BUILDSUBDIRS:%=%/__checklink__)
 356
 357 ### Dependencies:
 358 EOF
 359
 360 close NEWMAKE;
 361 rename "Makefile.in.new", "Makefile.in";
 362 printf "Successfully updated Makefile.in\n";