• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1#! /bin/sh
2# Wrapper for compilers which do not understand '-c -o'.
3
4scriptversion=2018-03-27.18; # UTC
5
6# Copyright (C) 1999-2018 Free Software Foundation, Inc.
7# Written by Tom Tromey <tromey@cygnus.com>.
8#
9# This program is free software; you can redistribute it and/or modify
10# it under the terms of the GNU General Public License as published by
11# the Free Software Foundation; either version 2, or (at your option)
12# any later version.
13#
14# This program is distributed in the hope that it will be useful,
15# but WITHOUT ANY WARRANTY; without even the implied warranty of
16# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17# GNU General Public License for more details.
18#
19# You should have received a copy of the GNU General Public License
20# along with this program.  If not, see <https://www.gnu.org/licenses/>.
21
22# As a special exception to the GNU General Public License, if you
23# distribute this file as part of a program that contains a
24# configuration script generated by Autoconf, you may include it under
25# the same distribution terms that you use for the rest of that program.
26
27# This file is maintained in Automake, please report
28# bugs to <bug-automake@gnu.org> or send patches to
29# <automake-patches@gnu.org>.
30
31nl='
32'
33
34# We need space, tab and new line, in precisely that order.  Quoting is
35# there to prevent tools from complaining about whitespace usage.
36IFS=" ""	$nl"
37
38file_conv=
39
40# func_file_conv build_file lazy
41# Convert a $build file to $host form and store it in $file
42# Currently only supports Windows hosts. If the determined conversion
43# type is listed in (the comma separated) LAZY, no conversion will
44# take place.
45func_file_conv ()
46{
47  file=$1
48  case $file in
49    / | /[!/]*) # absolute file, and not a UNC file
50      if test -z "$file_conv"; then
51	# lazily determine how to convert abs files
52	case `uname -s` in
53	  MINGW*)
54	    file_conv=mingw
55	    ;;
56	  CYGWIN*)
57	    file_conv=cygwin
58	    ;;
59	  *)
60	    file_conv=wine
61	    ;;
62	esac
63      fi
64      case $file_conv/,$2, in
65	*,$file_conv,*)
66	  ;;
67	mingw/*)
68	  file=`cmd //C echo "$file " | sed -e 's/"\(.*\) " *$/\1/'`
69	  ;;
70	cygwin/*)
71	  file=`cygpath -m "$file" || echo "$file"`
72	  ;;
73	wine/*)
74	  file=`winepath -w "$file" || echo "$file"`
75	  ;;
76      esac
77      ;;
78  esac
79}
80
81# func_cl_dashL linkdir
82# Make cl look for libraries in LINKDIR
83func_cl_dashL ()
84{
85  func_file_conv "$1"
86  if test -z "$lib_path"; then
87    lib_path=$file
88  else
89    lib_path="$lib_path;$file"
90  fi
91  linker_opts="$linker_opts -LIBPATH:$file"
92}
93
94# func_cl_dashl library
95# Do a library search-path lookup for cl
96func_cl_dashl ()
97{
98  lib=$1
99  found=no
100  save_IFS=$IFS
101  IFS=';'
102  for dir in $lib_path $LIB
103  do
104    IFS=$save_IFS
105    if $shared && test -f "$dir/$lib.dll.lib"; then
106      found=yes
107      lib=$dir/$lib.dll.lib
108      break
109    fi
110    if test -f "$dir/$lib.lib"; then
111      found=yes
112      lib=$dir/$lib.lib
113      break
114    fi
115    if test -f "$dir/lib$lib.a"; then
116      found=yes
117      lib=$dir/lib$lib.a
118      break
119    fi
120  done
121  IFS=$save_IFS
122
123  if test "$found" != yes; then
124    lib=$lib.lib
125  fi
126}
127
128# func_cl_wrapper cl arg...
129# Adjust compile command to suit cl
130func_cl_wrapper ()
131{
132  # Assume a capable shell
133  lib_path=
134  shared=:
135  linker_opts=
136  for arg
137  do
138    if test -n "$eat"; then
139      eat=
140    else
141      case $1 in
142	-o)
143	  # configure might choose to run compile as 'compile cc -o foo foo.c'.
144	  eat=1
145	  case $2 in
146	    *.o | *.[oO][bB][jJ])
147	      func_file_conv "$2"
148	      set x "$@" -Fo"$file"
149	      shift
150	      ;;
151	    *)
152	      func_file_conv "$2"
153	      set x "$@" -Fe"$file"
154	      shift
155	      ;;
156	  esac
157	  ;;
158	-I)
159	  eat=1
160	  func_file_conv "$2" mingw
161	  set x "$@" -I"$file"
162	  shift
163	  ;;
164	-I*)
165	  func_file_conv "${1#-I}" mingw
166	  set x "$@" -I"$file"
167	  shift
168	  ;;
169	-l)
170	  eat=1
171	  func_cl_dashl "$2"
172	  set x "$@" "$lib"
173	  shift
174	  ;;
175	-l*)
176	  func_cl_dashl "${1#-l}"
177	  set x "$@" "$lib"
178	  shift
179	  ;;
180	-L)
181	  eat=1
182	  func_cl_dashL "$2"
183	  ;;
184	-L*)
185	  func_cl_dashL "${1#-L}"
186	  ;;
187	-static)
188	  shared=false
189	  ;;
190	-warn)
191	  eat=1
192	  ;;
193	-Wl,*)
194	  arg=${1#-Wl,}
195	  save_ifs="$IFS"; IFS=','
196	  for flag in $arg; do
197	    IFS="$save_ifs"
198	    linker_opts="$linker_opts $flag"
199	  done
200	  IFS="$save_ifs"
201	  ;;
202	-Xlinker)
203	  eat=1
204	  linker_opts="$linker_opts $2"
205	  ;;
206	-*)
207	  set x "$@" "$1"
208	  shift
209	  ;;
210	*.cc | *.CC | *.cxx | *.CXX | *.[cC]++)
211	  func_file_conv "$1"
212	  set x "$@" -Tp"$file"
213	  shift
214	  ;;
215	*.c | *.cpp | *.CPP | *.lib | *.LIB | *.Lib | *.OBJ | *.obj | *.[oO])
216	  func_file_conv "$1" mingw
217	  set x "$@" "$file"
218	  shift
219	  ;;
220	*)
221	  set x "$@" "$1"
222	  shift
223	  ;;
224      esac
225    fi
226    shift
227  done
228  if test -n "$linker_opts"; then
229    linker_opts="-link$linker_opts"
230  fi
231  exec "$@" $linker_opts
232  exit 1
233}
234
235eat=
236
237case $1 in
238  '')
239     echo "$0: No command.  Try '$0 --help' for more information." 1>&2
240     exit 1;
241     ;;
242  -h | --h*)
243    cat <<\EOF
244Usage: compile [--help] [--version] PROGRAM [ARGS]
245
246Wrapper for compilers which do not understand '-c -o'.
247Remove '-o dest.o' from ARGS, run PROGRAM with the remaining
248arguments, and rename the output as expected.
249
250If you are trying to build a whole package this is not the
251right script to run: please start by reading the file 'INSTALL'.
252
253Report bugs to <bug-automake@gnu.org>.
254EOF
255    exit $?
256    ;;
257  -v | --v*)
258    echo "compile $scriptversion"
259    exit $?
260    ;;
261  cl | *[/\\]cl | cl.exe | *[/\\]cl.exe | \
262  icl | *[/\\]icl | icl.exe | *[/\\]icl.exe )
263    func_cl_wrapper "$@"      # Doesn't return...
264    ;;
265esac
266
267ofile=
268cfile=
269
270for arg
271do
272  if test -n "$eat"; then
273    eat=
274  else
275    case $1 in
276      -o)
277	# configure might choose to run compile as 'compile cc -o foo foo.c'.
278	# So we strip '-o arg' only if arg is an object.
279	eat=1
280	case $2 in
281	  *.o | *.obj)
282	    ofile=$2
283	    ;;
284	  *)
285	    set x "$@" -o "$2"
286	    shift
287	    ;;
288	esac
289	;;
290      *.c)
291	cfile=$1
292	set x "$@" "$1"
293	shift
294	;;
295      *)
296	set x "$@" "$1"
297	shift
298	;;
299    esac
300  fi
301  shift
302done
303
304if test -z "$ofile" || test -z "$cfile"; then
305  # If no '-o' option was seen then we might have been invoked from a
306  # pattern rule where we don't need one.  That is ok -- this is a
307  # normal compilation that the losing compiler can handle.  If no
308  # '.c' file was seen then we are probably linking.  That is also
309  # ok.
310  exec "$@"
311fi
312
313# Name of file we expect compiler to create.
314cofile=`echo "$cfile" | sed 's|^.*[\\/]||; s|^[a-zA-Z]:||; s/\.c$/.o/'`
315
316# Create the lock directory.
317# Note: use '[/\\:.-]' here to ensure that we don't use the same name
318# that we are using for the .o file.  Also, base the name on the expected
319# object file name, since that is what matters with a parallel build.
320lockdir=`echo "$cofile" | sed -e 's|[/\\:.-]|_|g'`.d
321while true; do
322  if mkdir "$lockdir" >/dev/null 2>&1; then
323    break
324  fi
325  sleep 1
326done
327# FIXME: race condition here if user kills between mkdir and trap.
328trap "rmdir '$lockdir'; exit 1" 1 2 15
329
330# Run the compile.
331"$@"
332ret=$?
333
334if test -f "$cofile"; then
335  test "$cofile" = "$ofile" || mv "$cofile" "$ofile"
336elif test -f "${cofile}bj"; then
337  test "${cofile}bj" = "$ofile" || mv "${cofile}bj" "$ofile"
338fi
339
340rmdir "$lockdir"
341exit $ret
342
343# Local Variables:
344# mode: shell-script
345# sh-indentation: 2
346# eval: (add-hook 'before-save-hook 'time-stamp)
347# time-stamp-start: "scriptversion="
348# time-stamp-format: "%:y-%02m-%02d.%02H"
349# time-stamp-time-zone: "UTC0"
350# time-stamp-end: "; # UTC"
351# End:
352