|
| 1 | +package Generators::QMake; |
| 2 | +require Exporter; |
| 3 | + |
| 4 | +use strict; |
| 5 | +use vars qw($VERSION); |
| 6 | + |
| 7 | +our $VERSION = '1.00'; |
| 8 | +our(@ISA, @EXPORT, @EXPORT_OK, @AVAILABLE); |
| 9 | +@ISA = qw(Exporter); |
| 10 | + |
| 11 | +BEGIN { |
| 12 | + push @EXPORT_OK, qw(generate); |
| 13 | +} |
| 14 | + |
| 15 | +sub generate { |
| 16 | + my ($git_dir, $out_dir, $rel_dir, %build_structure) = @_; |
| 17 | + |
| 18 | + my @libs = @{$build_structure{"LIBS"}}; |
| 19 | + foreach (@libs) { |
| 20 | + createLibProject($_, $git_dir, $out_dir, $rel_dir, %build_structure); |
| 21 | + } |
| 22 | + |
| 23 | + my @apps = @{$build_structure{"APPS"}}; |
| 24 | + foreach (@apps) { |
| 25 | + createAppProject($_, $git_dir, $out_dir, $rel_dir, %build_structure); |
| 26 | + } |
| 27 | + |
| 28 | + createGlueProject($git_dir, $out_dir, $rel_dir, %build_structure); |
| 29 | + return 0; |
| 30 | +} |
| 31 | + |
| 32 | +sub createLibProject { |
| 33 | + my ($libname, $git_dir, $out_dir, $rel_dir, %build_structure) = @_; |
| 34 | + print "Generate $libname lib project\n"; |
| 35 | + $rel_dir = "../$rel_dir"; |
| 36 | + |
| 37 | + my $sources = join(" \\\n\t", sort(map("$rel_dir/$_", @{$build_structure{"LIBS_${libname}_SOURCES"}}))); |
| 38 | + my $defines = join(" \\\n\t", sort(@{$build_structure{"LIBS_${libname}_DEFINES"}})); |
| 39 | + my $includes= join(" \\\n\t", sort(map("$rel_dir/$_", @{$build_structure{"LIBS_${libname}_INCLUDES"}}))); |
| 40 | + my $cflags = join(" ", sort(@{$build_structure{"LIBS_${libname}_CFLAGS"}})); |
| 41 | + |
| 42 | + my $cflags_debug = $cflags; |
| 43 | + $cflags_debug =~ s/-MT/-MTd/; |
| 44 | + $cflags_debug =~ s/-O.//; |
| 45 | + |
| 46 | + my $cflags_release = $cflags; |
| 47 | + $cflags_release =~ s/-MTd/-MT/; |
| 48 | + |
| 49 | + my @tmp = @{$build_structure{"LIBS_${libname}_LFLAGS"}}; |
| 50 | + my @tmp2 = (); |
| 51 | + foreach (@tmp) { |
| 52 | + if (/^-LTCG/) { |
| 53 | + } elsif (/^-L/) { |
| 54 | + $_ =~ s/^-L/-LIBPATH:$rel_dir\//; |
| 55 | + } |
| 56 | + push(@tmp2, $_); |
| 57 | + } |
| 58 | + my $lflags = join(" ", sort(@tmp)); |
| 59 | + |
| 60 | + my $target = $libname; |
| 61 | + $target =~ s/\//_/g; |
| 62 | + $defines =~ s/-D//g; |
| 63 | + $defines =~ s/"/\\\\"/g; |
| 64 | + $includes =~ s/-I//g; |
| 65 | + mkdir "$target" || die "Could not create the directory $target for lib project!\n"; |
| 66 | + open F, ">$target/$target.pro" || die "Could not open $target/$target.pro for writing!\n"; |
| 67 | + print F << "EOM"; |
| 68 | +TEMPLATE = lib |
| 69 | +TARGET = $target |
| 70 | +DESTDIR = $rel_dir |
| 71 | +
|
| 72 | +CONFIG -= qt |
| 73 | +CONFIG += static |
| 74 | +
|
| 75 | +QMAKE_CFLAGS = |
| 76 | +QMAKE_CFLAGS_RELEASE = $cflags_release |
| 77 | +QMAKE_CFLAGS_DEBUG = $cflags_debug |
| 78 | +QMAKE_LIBFLAGS = $lflags |
| 79 | +
|
| 80 | +DEFINES += \\ |
| 81 | + $defines |
| 82 | +
|
| 83 | +INCLUDEPATH += \\ |
| 84 | + $includes |
| 85 | +
|
| 86 | +SOURCES += \\ |
| 87 | + $sources |
| 88 | +EOM |
| 89 | + close F; |
| 90 | +} |
| 91 | + |
| 92 | +sub createAppProject { |
| 93 | + my ($appname, $git_dir, $out_dir, $rel_dir, %build_structure) = @_; |
| 94 | + print "Generate $appname app project\n"; |
| 95 | + $rel_dir = "../$rel_dir"; |
| 96 | + |
| 97 | + my $sources = join(" \\\n\t", sort(map("$rel_dir/$_", @{$build_structure{"APPS_${appname}_SOURCES"}}))); |
| 98 | + my $defines = join(" \\\n\t", sort(@{$build_structure{"APPS_${appname}_DEFINES"}})); |
| 99 | + my $includes= join(" \\\n\t", sort(map("$rel_dir/$_", @{$build_structure{"APPS_${appname}_INCLUDES"}}))); |
| 100 | + my $cflags = join(" ", sort(@{$build_structure{"APPS_${appname}_CFLAGS"}})); |
| 101 | + |
| 102 | + my $cflags_debug = $cflags; |
| 103 | + $cflags_debug =~ s/-MT/-MTd/; |
| 104 | + $cflags_debug =~ s/-O.//; |
| 105 | + |
| 106 | + my $cflags_release = $cflags; |
| 107 | + $cflags_release =~ s/-MTd/-MT/; |
| 108 | + |
| 109 | + my $libs; |
| 110 | + foreach (sort(@{$build_structure{"APPS_${appname}_LIBS"}})) { |
| 111 | + $_ =~ s/\//_/g; |
| 112 | + $libs .= " $_"; |
| 113 | + } |
| 114 | + my @tmp = @{$build_structure{"APPS_${appname}_LFLAGS"}}; |
| 115 | + my @tmp2 = (); |
| 116 | + foreach (@tmp) { |
| 117 | + # next if ($_ eq "-NODEFAULTLIB:MSVCRT.lib"); |
| 118 | + if (/^-LTCG/) { |
| 119 | + } elsif (/^-L/) { |
| 120 | + $_ =~ s/^-L/-LIBPATH:$rel_dir\//; |
| 121 | + } |
| 122 | + push(@tmp2, $_); |
| 123 | + } |
| 124 | + my $lflags = join(" ", sort(@tmp)); |
| 125 | + |
| 126 | + my $target = $appname; |
| 127 | + $target =~ s/\.exe//; |
| 128 | + $target =~ s/\//_/g; |
| 129 | + $defines =~ s/-D//g; |
| 130 | + $defines =~ s/"/\\\\"/g; |
| 131 | + $includes =~ s/-I//g; |
| 132 | + mkdir "$target" || die "Could not create the directory $target for app project!\n"; |
| 133 | + open F, ">$target/$target.pro" || die "Could not open $target/$target.pro for writing!\n"; |
| 134 | + print F << "EOM"; |
| 135 | +TEMPLATE = app |
| 136 | +TARGET = $target |
| 137 | +DESTDIR = $rel_dir |
| 138 | +
|
| 139 | +CONFIG -= qt embed_manifest_exe |
| 140 | +CONFIG += console |
| 141 | +
|
| 142 | +QMAKE_CFLAGS = |
| 143 | +QMAKE_CFLAGS_RELEASE = $cflags_release |
| 144 | +QMAKE_CFLAGS_DEBUG = $cflags_debug |
| 145 | +QMAKE_LFLAGS = $lflags |
| 146 | +LIBS = $libs |
| 147 | +
|
| 148 | +DEFINES += \\ |
| 149 | + $defines |
| 150 | +
|
| 151 | +INCLUDEPATH += \\ |
| 152 | + $includes |
| 153 | +
|
| 154 | +win32:QMAKE_LFLAGS += -LIBPATH:$rel_dir |
| 155 | +else: QMAKE_LFLAGS += -L$rel_dir |
| 156 | +
|
| 157 | +SOURCES += \\ |
| 158 | + $sources |
| 159 | +EOM |
| 160 | + close F; |
| 161 | +} |
| 162 | + |
| 163 | +sub createGlueProject { |
| 164 | + my ($git_dir, $out_dir, $rel_dir, %build_structure) = @_; |
| 165 | + my $libs = join(" \\ \n", map("\t$_|$_.pro", @{$build_structure{"LIBS"}})); |
| 166 | + my $apps = join(" \\ \n", map("\t$_|$_.pro", @{$build_structure{"APPS"}})); |
| 167 | + $libs =~ s/\.a//g; |
| 168 | + $libs =~ s/\//_/g; |
| 169 | + $libs =~ s/\|/\//g; |
| 170 | + $apps =~ s/\.exe//g; |
| 171 | + $apps =~ s/\//_/g; |
| 172 | + $apps =~ s/\|/\//g; |
| 173 | + |
| 174 | + my $filename = $out_dir; |
| 175 | + $filename =~ s/.*\/([^\/]+)$/$1/; |
| 176 | + $filename =~ s/\/$//; |
| 177 | + print "Generate glue project $filename.pro\n"; |
| 178 | + open F, ">$filename.pro" || die "Could not open $filename.pro for writing!\n"; |
| 179 | + print F << "EOM"; |
| 180 | +TEMPLATE = subdirs |
| 181 | +CONFIG += ordered |
| 182 | +SUBDIRS += \\ |
| 183 | +$libs \\ |
| 184 | +$apps |
| 185 | +EOM |
| 186 | + close F; |
| 187 | +} |
| 188 | + |
| 189 | +1; |
0 commit comments