s4:build: try to fix the build with the ibm checker in the build-farm
[ira/wip.git] / source4 / build / smb_build / main.pl
1 # Samba Build System                                    
2 # - the main program                                    
3 #                                                       
4 #  Copyright (C) Stefan (metze) Metzmacher 2004 
5 #  Copyright (C) Jelmer Vernooij 2005
6 #  Released under the GNU GPL                           
7
8 use smb_build::makefile;
9 use smb_build::input;
10 use smb_build::config_mk;
11 use smb_build::output;
12 use smb_build::summary;
13 use smb_build::config;
14 use Getopt::Long;
15 use strict;
16
17 my $output_file = "data.mk";
18
19 my $result = GetOptions (
20         'output=s' => \$output_file);
21
22 if (not $result) {
23         exit(1);
24 }
25
26 my $input_file = shift @ARGV;
27
28 my $INPUT = {};
29 my $mkfile = smb_build::config_mk::run_config_mk($INPUT, $config::config{srcdir}, $config::config{builddir}, $input_file);
30
31 my $subsys_output_type = ["MERGED_OBJ"];
32
33 my $library_output_type;
34 my $useshared = (defined($ENV{USESHARED})?$ENV{USESHARED}:$config::config{USESHARED});
35
36 if ($useshared eq "true") {
37         $library_output_type = ["SHARED_LIBRARY", "MERGED_OBJ"];
38 } else {
39         $library_output_type = ["MERGED_OBJ"];
40         push (@$library_output_type, "SHARED_LIBRARY") if 
41                                                 ($config::config{BLDSHARED} eq "true")
42 }
43
44 my $module_output_type;
45 if ($useshared eq "true") {
46         $module_output_type = ["SHARED_LIBRARY"];
47 } else {
48         $module_output_type = ["MERGED_OBJ"];
49 }
50
51 my $DEPEND = smb_build::input::check($INPUT, \%config::enabled,
52                                      $subsys_output_type,
53                                      $library_output_type,
54                                      $module_output_type);
55 my $OUTPUT = output::create_output($DEPEND, \%config::config);
56 my $mkenv = new smb_build::makefile(\%config::config, $mkfile);
57
58 my $shared_libs_used = 0;
59 foreach my $key (values %$OUTPUT) {
60         next if ($key->{ENABLE} ne "YES");
61         push(@{$mkenv->{all_objs}}, "\$($key->{NAME}_OBJ_FILES)");
62 }
63
64 foreach my $key (values %$OUTPUT) {
65         next unless defined $key->{OUTPUT_TYPE};
66
67         $mkenv->StaticLibraryPrimitives($key) if grep(/STATIC_LIBRARY/, @{$key->{OUTPUT_TYPE}});
68         $mkenv->MergedObj($key) if grep(/MERGED_OBJ/, @{$key->{OUTPUT_TYPE}});
69         $mkenv->SharedLibraryPrimitives($key) if ($key->{TYPE} eq "LIBRARY") and
70                                         grep(/SHARED_LIBRARY/, @{$key->{OUTPUT_TYPE}});
71         if ($key->{TYPE} eq "LIBRARY" and 
72             ${$key->{OUTPUT_TYPE}}[0] eq "SHARED_LIBRARY") {
73                 $shared_libs_used = 1;
74         }
75         if ($key->{TYPE} eq "MODULE" and @{$key->{OUTPUT_TYPE}}[0] eq "MERGED_OBJ" and defined($key->{INIT_FUNCTION})) {
76                 $mkenv->output("$key->{SUBSYSTEM}_INIT_FUNCTIONS +=$key->{INIT_FUNCTION},\n");
77         }
78         $mkenv->CFlags($key);
79 }
80
81 foreach my $key (values %$OUTPUT) {
82         next unless defined $key->{OUTPUT_TYPE};
83
84         $mkenv->Integrated($key) if grep(/INTEGRATED/, @{$key->{OUTPUT_TYPE}});
85 }
86
87 foreach my $key (values %$OUTPUT) {
88         next unless defined $key->{OUTPUT_TYPE};
89         $mkenv->StaticLibrary($key) if grep(/STATIC_LIBRARY/, @{$key->{OUTPUT_TYPE}});
90
91         $mkenv->SharedLibrary($key) if ($key->{TYPE} eq "LIBRARY") and
92                                         grep(/SHARED_LIBRARY/, @{$key->{OUTPUT_TYPE}});
93         $mkenv->SharedModule($key) if ($key->{TYPE} eq "MODULE" and
94                                         grep(/SHARED_LIBRARY/, @{$key->{OUTPUT_TYPE}}));
95         $mkenv->PythonModule($key) if ($key->{TYPE} eq "PYTHON");
96         $mkenv->Binary($key) if grep(/BINARY/, @{$key->{OUTPUT_TYPE}});
97         $mkenv->InitFunctions($key) if defined($key->{INIT_FUNCTIONS});
98 }
99
100 $mkenv->write($output_file);
101
102 summary::show($OUTPUT, \%config::config);
103
104 1;