r5190: Grr - typo.
[bbaumbach/samba-autobuild/.git] / source4 / build / smb_build / main.pm
1 ###########################################################
2 ### SMB Build System                                    ###
3 ### - the main program                                  ###
4 ###                                                     ###
5 ###  Copyright (C) Stefan (metze) Metzmacher 2004       ###
6 ###  Released under the GNU GPL                         ###
7 ###########################################################
8
9 use makefile;
10 use smb_build_h;
11 use input;
12 use config_mk;
13 use output;
14 use dot;
15 use strict;
16
17 sub smb_build_main($)
18 {
19         my $INPUT = shift;
20         my %SMB_BUILD_CTX = (
21                 INPUT => $INPUT
22         );
23
24         my @mkfiles = (
25                 "dsdb/config.mk",
26                 "gtk/config.mk",
27                 "smbd/config.mk",
28                 "smbd/process_model.mk",
29                 "libnet/config.mk",
30                 "auth/config.mk",
31                 "nsswitch/config.mk",
32                 "lib/basic.mk",
33                 "lib/dcom/config.mk",
34                 "lib/socket/config.mk",
35                 "lib/ldb/config.mk",
36                 "lib/talloc/config.mk",
37                 "lib/tdb/config.mk",
38                 "lib/registry/config.mk",
39                 "lib/messaging/config.mk",
40                 "smb_server/config.mk",
41                 "rpc_server/config.mk",
42                 "ldap_server/config.mk",
43                 "winbind/config.mk",
44                 "nbt_server/config.mk",
45                 "libcli/auth/gensec.mk",
46                 "libcli/auth/config.mk",
47                 "libcli/ldap/config.mk",
48                 "libcli/config.mk",
49                 "utils/net/config.mk",
50                 "utils/config.mk",
51                 "ntvfs/posix/config.mk",
52                 "ntvfs/config.mk",
53                 "ntvfs/unixuid/config.mk",
54                 "torture/config.mk",
55                 "librpc/config.mk",
56                 "client/config.mk",
57                 "libcli/libsmb.mk",
58                 "libcli/config.mk",
59                 "libcli/security/config.mk",
60                 "scripting/swig/config.mk",
61         );
62
63         $| = 1;
64
65         for my $mkfile (@mkfiles) {
66                 config_mk::import_file($SMB_BUILD_CTX{INPUT}, $mkfile);
67         }
68
69         %{$SMB_BUILD_CTX{DEPEND}} = input::check(\%SMB_BUILD_CTX);
70         
71         %{$SMB_BUILD_CTX{OUTPUT}} = output::create_output($SMB_BUILD_CTX{DEPEND});
72
73         makefile::create_makefile_in($SMB_BUILD_CTX{OUTPUT});
74
75         smb_build_h::create_smb_build_h($SMB_BUILD_CTX{OUTPUT});
76
77         open DOTTY, ">samba4-deps.dot";
78         print DOTTY dot::generate($SMB_BUILD_CTX{DEPEND});
79         close DOTTY;
80 }
81 1;