rebase --root: fix amending root commit messages
[git.git] / compat / vcbuild / scripts / clink.pl
bloba87d0da512e095ad261bef868a866a7e6f5e3bef
1 #!/usr/bin/perl -w
2 ######################################################################
3 # Compiles or links files
5 # This is a wrapper to facilitate the compilation of Git with MSVC
6 # using GNU Make as the build system. So, instead of manipulating the
7 # Makefile into something nasty, just to support non-space arguments
8 # etc, we use this wrapper to fix the command line options
10 # Copyright (C) 2009 Marius Storm-Olsen <mstormo@gmail.com>
11 ######################################################################
12 use strict;
13 my @args = ();
14 my @cflags = ();
15 my $is_linking = 0;
16 while (@ARGV) {
17 my $arg = shift @ARGV;
18 if ("$arg" =~ /^-[DIMGO]/) {
19 push(@cflags, $arg);
20 } elsif ("$arg" eq "-o") {
21 my $file_out = shift @ARGV;
22 if ("$file_out" =~ /exe$/) {
23 $is_linking = 1;
24 push(@args, "-OUT:$file_out");
25 } else {
26 push(@args, "-Fo$file_out");
28 } elsif ("$arg" eq "-lz") {
29 push(@args, "zlib.lib");
30 } elsif ("$arg" eq "-liconv") {
31 push(@args, "iconv.lib");
32 } elsif ("$arg" eq "-lcrypto") {
33 push(@args, "libeay32.lib");
34 } elsif ("$arg" eq "-lssl") {
35 push(@args, "ssleay32.lib");
36 } elsif ("$arg" eq "-lcurl") {
37 push(@args, "libcurl.lib");
38 } elsif ("$arg" =~ /^-L/ && "$arg" ne "-LTCG") {
39 $arg =~ s/^-L/-LIBPATH:/;
40 push(@args, $arg);
41 } elsif ("$arg" =~ /^-R/) {
42 # eat
43 } else {
44 push(@args, $arg);
47 if ($is_linking) {
48 unshift(@args, "link.exe");
49 } else {
50 unshift(@args, "cl.exe");
51 push(@args, @cflags);
53 #printf("**** @args\n");
54 exit (system(@args) != 0);