MakeBase.gmk revision 1379:6af7f86fc626
1#
2# Copyright (c) 2011, 2015, Oracle and/or its affiliates. All rights reserved.
3# DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4#
5# This code is free software; you can redistribute it and/or modify it
6# under the terms of the GNU General Public License version 2 only, as
7# published by the Free Software Foundation.  Oracle designates this
8# particular file as subject to the "Classpath" exception as provided
9# by Oracle in the LICENSE file that accompanied this code.
10#
11# This code is distributed in the hope that it will be useful, but WITHOUT
12# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
14# version 2 for more details (a copy is included in the LICENSE file that
15# accompanied this code).
16#
17# You should have received a copy of the GNU General Public License version
18# 2 along with this work; if not, write to the Free Software Foundation,
19# Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
20#
21# Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
22# or visit www.oracle.com if you need additional information or have any
23# questions.
24#
25
26################################################################
27#
28# Setup common utility functions.
29#
30################################################################
31
32ifndef _MAKEBASE_GMK
33_MAKEBASE_GMK := 1
34
35################################################################################
36# This macro translates $ into \$ to protect the $ from expansion in the shell.
37# To make this macro resilient against already escaped strings, first remove
38# any present escapes before escaping so that no double escapes are added.
39EscapeDollar = $(subst $$,\$$,$(subst \$$,$$,$(strip $1)))
40
41################################################################################
42# This macro translates $ into $$ to protect the string from make itself.
43DoubleDollar = $(subst $$,$$$$,$(strip $1))
44
45################################################################################
46
47# If the variable that you want to send to stdout for piping into a file or otherwise,
48# is potentially long, for example the a list of file paths, eg a list of all package directories.
49# Then you need to use ListPathsSafely, which optimistically splits the output into several shell
50# calls as well as use compression on recurrent file paths segments, to get around the potential
51# command line length problem that exists in cygwin and other shells.
52compress_pre:=$(strip $(shell $(CAT) $(SRC_ROOT)/make/common/support/ListPathsSafely-pre-compress.incl))
53compress_post:=$(strip $(shell $(CAT) $(SRC_ROOT)/make/common/support/ListPathsSafely-post-compress.incl))
54compress_paths=$(compress_pre)\
55$(subst $(SRC_ROOT),X97,\
56$(subst $(OUTPUT_ROOT),X98,\
57$(subst X,X00,\
58$(subst $(SPACE),\n,$(strip $1)))))\
59$(compress_post)
60
61decompress_paths=$(SED) -f $(SRC_ROOT)/make/common/support/ListPathsSafely-uncompress.sed -e 's|X99|\\n|g' \
62    -e 's|X98|$(OUTPUT_ROOT)|g' -e 's|X97|$(SRC_ROOT)|g' \
63    -e 's|X00|X|g' | tr '\n' '$2'
64
65define ListPathsSafely_If
66	$(if $(word $3,$($1)),$(eval $1_LPS$3:=$(call compress_paths,$(wordlist $3,$4,$($1)))))
67endef
68
69define ListPathsSafely_Printf
70	$(if $(strip $($1_LPS$4)),$(if $(findstring $(LOG_LEVEL),trace),,@)printf \
71	    -- "$(strip $(call EscapeDollar, $($1_LPS$4)))\n" | $(decompress_paths) $3)
72endef
73
74# Receipt example:
75#   rm -f thepaths
76#   $(call ListPathsSafely,THEPATHS,\n, >> thepaths)
77# The \n argument means translate spaces into \n
78# if instead , , (a space) is supplied, then spaces remain spaces.
79define ListPathsSafely
80	$(if $(word 16001,$($1)),$(error Cannot list safely more than 16000 paths. $1 has $(words $($1)) paths!))
81	$(ECHO) $(LOG_DEBUG) Writing $(words $($1)) paths to '$3'
82	$(call ListPathsSafely_If,$1,$2,1,250)
83	$(call ListPathsSafely_If,$1,$2,251,500)
84	$(call ListPathsSafely_If,$1,$2,501,750)
85	$(call ListPathsSafely_If,$1,$2,751,1000)
86
87	$(call ListPathsSafely_If,$1,$2,1001,1250)
88	$(call ListPathsSafely_If,$1,$2,1251,1500)
89	$(call ListPathsSafely_If,$1,$2,1501,1750)
90	$(call ListPathsSafely_If,$1,$2,1751,2000)
91
92	$(call ListPathsSafely_If,$1,$2,2001,2250)
93	$(call ListPathsSafely_If,$1,$2,2251,2500)
94	$(call ListPathsSafely_If,$1,$2,2501,2750)
95	$(call ListPathsSafely_If,$1,$2,2751,3000)
96
97	$(call ListPathsSafely_If,$1,$2,3001,3250)
98	$(call ListPathsSafely_If,$1,$2,3251,3500)
99	$(call ListPathsSafely_If,$1,$2,3501,3750)
100	$(call ListPathsSafely_If,$1,$2,3751,4000)
101
102	$(call ListPathsSafely_If,$1,$2,4001,4250)
103	$(call ListPathsSafely_If,$1,$2,4251,4500)
104	$(call ListPathsSafely_If,$1,$2,4501,4750)
105	$(call ListPathsSafely_If,$1,$2,4751,5000)
106
107	$(call ListPathsSafely_If,$1,$2,5001,5250)
108	$(call ListPathsSafely_If,$1,$2,5251,5500)
109	$(call ListPathsSafely_If,$1,$2,5501,5750)
110	$(call ListPathsSafely_If,$1,$2,5751,6000)
111
112	$(call ListPathsSafely_If,$1,$2,6001,6250)
113	$(call ListPathsSafely_If,$1,$2,6251,6500)
114	$(call ListPathsSafely_If,$1,$2,6501,6750)
115	$(call ListPathsSafely_If,$1,$2,6751,7000)
116
117	$(call ListPathsSafely_If,$1,$2,7001,7250)
118	$(call ListPathsSafely_If,$1,$2,7251,7500)
119	$(call ListPathsSafely_If,$1,$2,7501,7750)
120	$(call ListPathsSafely_If,$1,$2,7751,8000)
121
122	$(call ListPathsSafely_If,$1,$2,8001,8250)
123	$(call ListPathsSafely_If,$1,$2,8251,8500)
124	$(call ListPathsSafely_If,$1,$2,8501,8750)
125	$(call ListPathsSafely_If,$1,$2,8751,9000)
126
127	$(call ListPathsSafely_If,$1,$2,9001,9250)
128	$(call ListPathsSafely_If,$1,$2,9251,9500)
129	$(call ListPathsSafely_If,$1,$2,9501,9750)
130	$(call ListPathsSafely_If,$1,$2,9751,10000)
131
132	$(call ListPathsSafely_If,$1,$2,10001,10250)
133	$(call ListPathsSafely_If,$1,$2,10251,10500)
134	$(call ListPathsSafely_If,$1,$2,10501,10750)
135	$(call ListPathsSafely_If,$1,$2,10751,11000)
136
137	$(call ListPathsSafely_If,$1,$2,11001,11250)
138	$(call ListPathsSafely_If,$1,$2,11251,11500)
139	$(call ListPathsSafely_If,$1,$2,11501,11750)
140	$(call ListPathsSafely_If,$1,$2,11751,12000)
141
142	$(call ListPathsSafely_If,$1,$2,12001,12250)
143	$(call ListPathsSafely_If,$1,$2,12251,12500)
144	$(call ListPathsSafely_If,$1,$2,12501,12750)
145	$(call ListPathsSafely_If,$1,$2,12751,13000)
146
147	$(call ListPathsSafely_If,$1,$2,13001,13250)
148	$(call ListPathsSafely_If,$1,$2,13251,13500)
149	$(call ListPathsSafely_If,$1,$2,13501,13750)
150	$(call ListPathsSafely_If,$1,$2,13751,14000)
151
152	$(call ListPathsSafely_If,$1,$2,14001,14250)
153	$(call ListPathsSafely_If,$1,$2,14251,14500)
154	$(call ListPathsSafely_If,$1,$2,14501,14750)
155	$(call ListPathsSafely_If,$1,$2,14751,15000)
156
157	$(call ListPathsSafely_If,$1,$2,15001,15250)
158	$(call ListPathsSafely_If,$1,$2,15251,15500)
159	$(call ListPathsSafely_If,$1,$2,15501,15750)
160	$(call ListPathsSafely_If,$1,$2,15751,16000)
161
162	$(call ListPathsSafely_Printf,$1,$2,$3,1)
163	$(call ListPathsSafely_Printf,$1,$2,$3,251)
164	$(call ListPathsSafely_Printf,$1,$2,$3,501)
165	$(call ListPathsSafely_Printf,$1,$2,$3,751)
166
167	$(call ListPathsSafely_Printf,$1,$2,$3,1001)
168	$(call ListPathsSafely_Printf,$1,$2,$3,1251)
169	$(call ListPathsSafely_Printf,$1,$2,$3,1501)
170	$(call ListPathsSafely_Printf,$1,$2,$3,1751)
171
172	$(call ListPathsSafely_Printf,$1,$2,$3,2001)
173	$(call ListPathsSafely_Printf,$1,$2,$3,2251)
174	$(call ListPathsSafely_Printf,$1,$2,$3,2501)
175	$(call ListPathsSafely_Printf,$1,$2,$3,2751)
176
177	$(call ListPathsSafely_Printf,$1,$2,$3,3001)
178	$(call ListPathsSafely_Printf,$1,$2,$3,3251)
179	$(call ListPathsSafely_Printf,$1,$2,$3,3501)
180	$(call ListPathsSafely_Printf,$1,$2,$3,3751)
181
182	$(call ListPathsSafely_Printf,$1,$2,$3,4001)
183	$(call ListPathsSafely_Printf,$1,$2,$3,4251)
184	$(call ListPathsSafely_Printf,$1,$2,$3,4501)
185	$(call ListPathsSafely_Printf,$1,$2,$3,4751)
186
187	$(call ListPathsSafely_Printf,$1,$2,$3,5001)
188	$(call ListPathsSafely_Printf,$1,$2,$3,5251)
189	$(call ListPathsSafely_Printf,$1,$2,$3,5501)
190	$(call ListPathsSafely_Printf,$1,$2,$3,5751)
191
192	$(call ListPathsSafely_Printf,$1,$2,$3,6001)
193	$(call ListPathsSafely_Printf,$1,$2,$3,6251)
194	$(call ListPathsSafely_Printf,$1,$2,$3,6501)
195	$(call ListPathsSafely_Printf,$1,$2,$3,6751)
196
197	$(call ListPathsSafely_Printf,$1,$2,$3,7001)
198	$(call ListPathsSafely_Printf,$1,$2,$3,7251)
199	$(call ListPathsSafely_Printf,$1,$2,$3,7501)
200	$(call ListPathsSafely_Printf,$1,$2,$3,7751)
201
202	$(call ListPathsSafely_Printf,$1,$2,$3,8001)
203	$(call ListPathsSafely_Printf,$1,$2,$3,8251)
204	$(call ListPathsSafely_Printf,$1,$2,$3,8501)
205	$(call ListPathsSafely_Printf,$1,$2,$3,8751)
206
207	$(call ListPathsSafely_Printf,$1,$2,$3,9001)
208	$(call ListPathsSafely_Printf,$1,$2,$3,9251)
209	$(call ListPathsSafely_Printf,$1,$2,$3,9501)
210	$(call ListPathsSafely_Printf,$1,$2,$3,9751)
211
212	$(call ListPathsSafely_Printf,$1,$2,$3,10001)
213	$(call ListPathsSafely_Printf,$1,$2,$3,10251)
214	$(call ListPathsSafely_Printf,$1,$2,$3,10501)
215	$(call ListPathsSafely_Printf,$1,$2,$3,10751)
216
217	$(call ListPathsSafely_Printf,$1,$2,$3,11001)
218	$(call ListPathsSafely_Printf,$1,$2,$3,11251)
219	$(call ListPathsSafely_Printf,$1,$2,$3,11501)
220	$(call ListPathsSafely_Printf,$1,$2,$3,11751)
221
222	$(call ListPathsSafely_Printf,$1,$2,$3,12001)
223	$(call ListPathsSafely_Printf,$1,$2,$3,12251)
224	$(call ListPathsSafely_Printf,$1,$2,$3,12501)
225	$(call ListPathsSafely_Printf,$1,$2,$3,12751)
226
227	$(call ListPathsSafely_Printf,$1,$2,$3,13001)
228	$(call ListPathsSafely_Printf,$1,$2,$3,13251)
229	$(call ListPathsSafely_Printf,$1,$2,$3,13501)
230	$(call ListPathsSafely_Printf,$1,$2,$3,13751)
231
232	$(call ListPathsSafely_Printf,$1,$2,$3,14001)
233	$(call ListPathsSafely_Printf,$1,$2,$3,14251)
234	$(call ListPathsSafely_Printf,$1,$2,$3,14501)
235	$(call ListPathsSafely_Printf,$1,$2,$3,14751)
236
237	$(call ListPathsSafely_Printf,$1,$2,$3,15001)
238	$(call ListPathsSafely_Printf,$1,$2,$3,15251)
239	$(call ListPathsSafely_Printf,$1,$2,$3,15501)
240	$(call ListPathsSafely_Printf,$1,$2,$3,15751)
241endef
242
243define ListPathsSafelyNow_IfPrintf
244  ifneq (,$$(word $4,$$($1)))
245    $$(eval $1_LPS$4:=$$(call compress_paths,$$(wordlist $4,$5,$$($1))))
246    $$(shell printf -- "$$(strip $$($1_LPS$4))\n" | $(decompress_paths) $3)
247  endif
248endef
249
250# And an non-receipt version:
251define ListPathsSafelyNow
252  ifneq (,$$(word 10001,$$($1)))
253    $$(error Cannot list safely more than 10000 paths. $1 has $$(words $$($1)) paths!)
254  endif
255  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,1,250)
256  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,251,500)
257  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,501,750)
258  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,751,1000)
259
260  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,1001,1250)
261  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,1251,1500)
262  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,1501,1750)
263  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,1751,2000)
264
265  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,2001,2250)
266  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,2251,2500)
267  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,2501,2750)
268  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,2751,3000)
269
270  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,3001,3250)
271  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,3251,3500)
272  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,3501,3750)
273  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,3751,4000)
274
275  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,4001,4250)
276  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,4251,4500)
277  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,4501,4750)
278  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,4751,5000)
279
280  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,5001,5250)
281  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,5251,5500)
282  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,5501,5750)
283  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,5751,6000)
284
285  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,6001,6250)
286  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,6251,6500)
287  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,6501,6750)
288  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,6751,7000)
289
290  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,7001,7250)
291  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,7251,7500)
292  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,7501,7750)
293  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,7751,8000)
294
295  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,8001,8250)
296  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,8251,8500)
297  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,8501,8750)
298  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,8751,9000)
299
300  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,9001,9250)
301  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,9251,9500)
302  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,9501,9750)
303  $(call ListPathsSafelyNow_IfPrintf,$1,$2,$3,9751,10000)
304
305endef
306
307# The source tips can come from the Mercurial repository, or in the files
308# $(HGTIP_FILENAME) which contains the tip but is also positioned in the same
309# directory as the original $(HGDIR) directory.
310# These should not be := assignments, only used from the root Makefile.
311HG_VERSION = $(shell $(HG) version 2> /dev/null)
312HG_DIRECTORY=.hg
313HGTIP_FILENAME=.hgtip
314HG_SEARCH = ./REPO ./*/REPO ./*/*/REPO ./*/*/*/REPO
315REPO_LIST = $(patsubst ./%,%,$(patsubst %/,%,$(sort $(dir \
316    $(shell $(CD) $(SRC_ROOT) ; ( $(LS) -d $(HG_SEARCH:%/REPO=%/$(HG_DIRECTORY)) ; \
317        $(LS) $(HG_SEARCH:%/REPO=%/$(HGTIP_FILENAME)) ) \
318        2> /dev/null)))))
319
320# Emit the repo:tip pairs to $@
321define GetSourceTips
322	$(CD) $(SRC_ROOT) ; \
323	for i in $(REPO_LIST) IGNORE ; do \
324	  if [ "$${i}" = "IGNORE" ] ; then \
325	    continue; \
326	  elif [ -d $${i}/$(HG_DIRECTORY) -a "$(HG_VERSION)" != "" ] ; then \
327	    $(PRINTF) " %s:%s" \
328	        "$${i}" `$(HG) tip --repository $${i} --template '{node|short}\n'` ; \
329	  elif [ -f $${i}/$(HGTIP_FILENAME) ] ; then \
330	    $(PRINTF) " %s:%s" \
331	        "$${i}" `$(CAT) $${i}/$(HGTIP_FILENAME)` ; \
332	  fi; \
333	done >> $@
334	$(PRINTF) "\n" >> $@
335endef
336
337# Create the HGTIP_FILENAME file. Called from jdk/make/closed/bundles.gmk
338define CreateHgTip
339	$(HG) tip --repository $1 --template '{node|short}\n' > $1/$(HGTIP_FILENAME); \
340	$(ECHO) $1/$(HGTIP_FILENAME)
341endef
342
343define SetupLogging
344  ifeq ($$(LOG_LEVEL),trace)
345    # Shell redefinition trick inspired by http://www.cmcrossroads.com/ask-mr-make/6535-tracing-rule-execution-in-gnu-make
346    # For each target executed, will print
347    # Building <TARGET> (from <FIRST PREREQUISITE>) (<ALL NEWER PREREQUISITES> newer)
348    # but with a limit of 20 on <ALL NEWER PREREQUISITES>, to avoid cluttering logs too much
349    # (and causing a crash on Cygwin).
350    # Default shell seems to always be /bin/sh. Must override with bash to get this to work on Solaris.
351    # Only use time if it's GNU time which supports format and output file.
352    WRAPPER_SHELL:=$$(BASH) $$(SRC_ROOT)/common/bin/shell-tracer.sh $$(if $$(findstring yes,$$(IS_GNU_TIME)),$$(TIME),-) $$(OUTPUT_ROOT)/build-trace-time.log $$(SHELL)
353    SHELL=$$(warning $$(if $$@,Building $$@,Running shell command) $$(if $$<, (from $$<))$$(if $$?, ($$(wordlist 1, 20, $$?) $$(if $$(wordlist 21, 22, $$?), ... [in total $$(words $$?) files]) newer)))$$(WRAPPER_SHELL)
354  endif
355  # Never remove warning messages; this is just for completeness
356  LOG_WARN=
357  ifneq ($$(findstring $$(LOG_LEVEL),info debug trace),)
358    LOG_INFO=
359  else
360    LOG_INFO=> /dev/null
361  endif
362  ifneq ($$(findstring $$(LOG_LEVEL),debug trace),)
363    LOG_DEBUG=
364  else
365    LOG_DEBUG=> /dev/null
366  endif
367  ifneq ($$(findstring $$(LOG_LEVEL),trace),)
368    LOG_TRACE=
369  else
370    LOG_TRACE=> /dev/null
371  endif
372endef
373
374# Make sure logging is setup for everyone that includes MakeBase.gmk.
375$(eval $(call SetupLogging))
376
377################################################################################
378# Creates a sequence of increasing numbers (inclusive).
379# Param 1 - starting number
380# Param 2 - ending number
381sequence = \
382    $(wordlist $1, $2, $(strip \
383        $(eval SEQUENCE_COUNT :=) \
384        $(call _sequence-do,$(strip $2))))
385
386_sequence-do = \
387    $(if $(word $1, $(SEQUENCE_COUNT)),, \
388      $(eval SEQUENCE_COUNT += .) \
389      $(words $(SEQUENCE_COUNT)) \
390      $(call _sequence-do,$1))
391
392################################################################################
393
394MAX_PARAMS := 30
395PARAM_SEQUENCE := $(call sequence, 2, $(MAX_PARAMS))
396
397# Template for creating a macro taking named parameters. To use it, assign the
398# template to a variable with the name you want for your macro, using '='
399# assignment. Then define a macro body with the suffix "Body". The Body macro
400# should take 1 parameter which should be a unique string for that invocation
401# of the macro.
402# Ex:
403# SetupFoo = $(NamedParamsMacroTemplate)
404# define SetupFooBody
405#   # do something
406#   # access parameters as $$($1_BAR)
407# endef
408# Call it like this
409# $(eval $(call SetupFoo, BUILD_SOMETHING, \
410#     BAR := some parameter value, \
411# ))
412define NamedParamsMacroTemplate
413  $(if $($(MAX_PARAMS)),$(error Internal makefile error: \
414      Too many named arguments to macro, please update MAX_PARAMS in MakeBase.gmk))
415  # Iterate over 2 3 4... and evaluate the named parameters with $1_ as prefix
416  $(foreach i,$(PARAM_SEQUENCE), $(if $(strip $($i)),\
417    $(strip $1)_$(strip $($i)))$(NEWLINE))
418  # Debug print all named parameter names and values
419  $(if $(findstring $(LOG_LEVEL),debug trace), \
420    $(info $0 $(strip $1) $(foreach i,$(PARAM_SEQUENCE), \
421      $(if $(strip $($i)),$(NEWLINE) $(strip [$i] $(if $(filter $(LOG_LEVEL), trace), \
422        $($i), $(wordlist 1, 20, $($(i))) $(if $(word 21, $($(i))), ...)))))))
423
424  $(if $(DEBUG_$(strip $1)),
425    $(info -------- <<< Begin expansion of $(strip $1)) \
426    $(info $(call $(0)Body,$(strip $1))) \
427    $(info -------- >>> End expansion of $(strip $1)) \
428  )
429
430  $(call $(0)Body,$(strip $1))
431endef
432
433################################################################################
434# Make directory without forking mkdir if not needed
435MakeDir = \
436    $(strip $(if $(subst $(wildcard $1 $2 $3 $4 $5 $6 $7 $8 $9),,$(strip $1 $2 $3 $4 $5 $6 $7 $8 $9)),\
437      $(shell $(MKDIR) -p $1 $2 $3 $4 $5 $6 $7 $8 $9)))
438
439################################################################################
440
441ifeq ($(OPENJDK_TARGET_OS),solaris)
442  # On Solaris, if the target is a symlink and exists, cp won't overwrite.
443  # Cp has to operate in recursive mode to allow for -P flag, to preserve soft links. If the
444  # name of the target file differs from the source file, rename after copy.
445  # If the source and target parent directories are the same, recursive copy doesn't work
446  # so we fall back on regular copy, which isn't preserving symlinks.
447  define install-file
448	$(MKDIR) -p '$(@D)'
449	$(RM) '$@'
450	if [ "$(@D)" != "$(<D)" ]; then \
451	  $(CP) -f -r -P '$<' '$(@D)'; \
452	  if [ "$(@F)" != "$(<F)" ]; then \
453	    $(MV) '$(@D)/$(<F)' '$@'; \
454	  fi; \
455	else \
456	  if [ -L '$<' ]; then \
457	    $(ECHO) "Source file is a symlink and target is in the same directory: $< $@" ; \
458	    exit 1; \
459	  fi; \
460	  $(CP) -f '$<' '$@'; \
461	fi
462  endef
463else ifeq ($(OPENJDK_TARGET_OS),macosx)
464  # On mac, extended attributes sometimes creep into the source files, which may later
465  # cause the creation of ._* files which confuses testing. Clear these with xattr if
466  # set. Some files get their write permissions removed after being copied to the
467  # output dir. When these are copied again to images, xattr would fail. By only clearing
468  # attributes when they are present, failing on this is avoided.
469  define install-file
470	$(MKDIR) -p '$(@D)'
471	$(CP) -fRP '$<' '$@'
472	if [ -n "`$(XATTR) -l '$@'`" ]; then $(XATTR) -c '$@'; fi
473  endef
474else
475  # Running mkdir and cp in the same shell speeds up copy intensive tasks in Cygwin
476  # significantly.
477  define install-file
478	$(MKDIR) -p '$(@D)' && $(CP) -fP '$<' '$@'
479  endef
480endif
481
482################################################################################
483# Convenience functions for working around make's limitations with $(filter ).
484containing = \
485    $(strip $(foreach v,$(strip $2),$(if $(findstring $(strip $1),$v),$v)))
486not-containing = \
487    $(strip $(foreach v,$(strip $2),$(if $(findstring $(strip $1),$v),,$v)))
488
489# Filter out duplicate sub strings while preserving order. Keeps the first occurance.
490uniq = \
491    $(if $1,$(firstword $1) $(call uniq,$(filter-out $(firstword $1),$1)))
492
493# Return a list of all string elements that are duplicated in $1.
494dups = \
495    $(strip $(foreach v, $(sort $1), $(if $(filter-out 1, \
496        $(words $(filter $v, $1))), $v)))
497
498# String equals
499equals = \
500    $(and $(findstring $(strip $1),$(strip $2)),\
501        $(findstring $(strip $2),$(strip $1)))
502
503################################################################################
504
505ifneq ($(DISABLE_CACHE_FIND), true)
506  # In Cygwin, finds are very costly, both because of expensive forks and because
507  # of bad file system caching. Find is used extensively in $(shell) commands to
508  # find source files. This makes rerunning make with no or few changes rather
509  # expensive. To speed this up, these two macros are used to cache the results
510  # of simple find commands for reuse.
511  #
512  # Runs a find and stores both the directories where it was run and the results.
513  # This macro can be called multiple times to add to the cache. Only finds files
514  # with no filters.
515  #
516  # Needs to be called with $(eval )
517  #
518  # Even if the performance benifit is negligible on other platforms, keep the
519  # functionality active unless explicitly disabled to exercise it more.
520  #
521  # Initialize FIND_CACHE_DIRS with := to make it a non recursively-expanded variable
522  FIND_CACHE_DIRS :=
523  # Param 1 - Dirs to find in
524  # Param 2 - (optional) specialization. Normally "-a \( ... \)" expression.
525  define FillCacheFind
526    # Filter out already cached dirs. The - is needed when FIND_CACHE_DIRS is empty
527    # since filter out will then return empty.
528    FIND_CACHE_NEW_DIRS := $$(filter-out $$(addsuffix /%,\
529        - $(FIND_CACHE_DIRS)) $(FIND_CACHE_DIRS), $1)
530    ifneq ($$(FIND_CACHE_NEW_DIRS), )
531      # Remove any trailing slash from dirs in the cache dir list
532      FIND_CACHE_DIRS += $$(patsubst %/,%, $$(FIND_CACHE_NEW_DIRS))
533      FIND_CACHE := $$(sort $$(FIND_CACHE) $$(shell $(FIND) $$(FIND_CACHE_NEW_DIRS) \( -type f -o -type l \) $2))
534    endif
535  endef
536
537  # Mimics find by looking in the cache if all of the directories have been cached.
538  # Otherwise reverts to shell find. This is safe to call on all platforms, even if
539  # cache is deactivated.
540  #
541  # $1 can be either a directory or a file. If it's a directory, make
542  # sure we have exactly one trailing slash before the wildcard.
543  # The extra - is needed when FIND_CACHE_DIRS is empty but should be harmless.
544  #
545  # Param 1 - Dirs to find in
546  # Param 2 - (optional) specialization. Normally "-a \( ... \)" expression.
547  define CacheFind
548    $(if $(filter-out $(addsuffix /%,- $(FIND_CACHE_DIRS)) $(FIND_CACHE_DIRS),$1), \
549    $(shell $(FIND) $1 \( -type f -o -type l \) $2), \
550    $(filter $(addsuffix /%,$(patsubst %/,%,$1)) $1,$(FIND_CACHE)))
551  endef
552
553else
554  # If CacheFind is disabled, just run the find command.
555  # Param 1 - Dirs to find in
556  # Param 2 - (optional) specialization. Normally "-a \( ... \)" expression.
557  define CacheFind
558    $(shell $(FIND) $1 \( -type f -o -type l \) $2)
559  endef
560endif
561
562################################################################################
563
564define AddFileToCopy
565  # Helper macro for SetupCopyFiles
566  # 1 : Source file
567  # 2 : Dest file
568  # 3 : Variable to add targets to
569  # 4 : Macro to call for copy operation
570  $2: $1
571	$(ECHO) $(LOG_INFO) Copying $$(patsubst $(OUTPUT_ROOT)/%,%,$$@)
572	$$($$(strip $4))
573
574  $3 += $2
575endef
576
577# Setup make rules for copying files, with an option to do more complex
578# processing instead of copying.
579#
580# Parameter 1 is the name of the rule. This name is used as variable prefix,
581# and the targets generated are listed in a variable by that name.
582#
583# Remaining parameters are named arguments. These include:
584#   SRC     : Source root dir (defaults to dir of first file)
585#   DEST    : Dest root dir
586#   FILES   : List of files to copy with absolute paths, or path relative to SRC.
587#             Must be in SRC.
588#   FLATTEN : Set to flatten the directory structure in the DEST dir.
589#   MACRO   : Optionally override the default macro used for making the copy.
590#             Default is 'install-file'
591SetupCopyFiles = $(NamedParamsMacroTemplate)
592define SetupCopyFilesBody
593
594  ifeq ($$($1_MACRO), )
595    $1_MACRO := install-file
596  endif
597
598  # Default SRC to the dir of the first file.
599  ifeq ($$($1_SRC), )
600    $1_SRC := $$(dir $$(firstword $$($1_FILES)))
601  endif
602
603  # Remove any trailing slash from SRC
604  $1_SRC := $$(patsubst %/,%,$$($1_SRC))
605
606  $$(foreach f, $$(patsubst $$($1_SRC)/%,%,$$($1_FILES)), \
607      $$(eval $$(call AddFileToCopy, $$($1_SRC)/$$f, \
608      $$($1_DEST)/$$(if $$($1_FLATTEN),$$(notdir $$f),$$f), $1, $$($1_MACRO))))
609
610endef
611
612################################################################################
613# ShellQuote
614#
615# Quotes a string with single quotes and replaces single quotes with '\'' so
616# that the contents survives being given to the shell.
617
618ShellQuote = \
619    $(SQUOTE)$(subst $(SQUOTE),$(SQUOTE)\$(SQUOTE)$(SQUOTE),$(strip $1))$(SQUOTE)
620
621################################################################################
622# Write to and read from file
623
624# Param 1 - File to read
625ReadFile = \
626    $(shell $(CAT) $1)
627
628# Param 1 - Text to write
629# Param 2 - File to write to
630# Use printf to get consistent behavior on all platforms.
631WriteFile = \
632    $(shell $(PRINTF) "%s" $(call ShellQuote, $1) > $2)
633
634################################################################################
635# DependOnVariable
636#
637# This macro takes a variable name and puts the value in a file only if the
638# value has changed since last. The name of the file is returned. This can be
639# used to create rule dependencies on make variable values. The following
640# example would get rebuilt if the value of SOME_VAR was changed:
641#
642# path/to/some-file: $(call DependOnVariable, SOME_VAR)
643#         echo $(SOME_VAR) > $@
644#
645# Note that leading and trailing white space in the value is ignored.
646#
647
648# Defines the sub directory structure to store variable value file in
649DependOnVariableDirName = \
650    $(strip $(subst $(SRC_ROOT)/,,\
651        $(if $(filter /%, $(firstword $(MAKEFILE_LIST))), \
652          $(firstword $(MAKEFILE_LIST)), \
653          $(CURDIR)/$(firstword $(MAKEFILE_LIST)))))
654
655# Defines the name of the file to store variable value in. Generates a name
656# unless parameter 2 is given.
657# Param 1 - Name of variable
658# Param 2 - (optional) name of file to store value in
659DependOnVariableFileName = \
660    $(strip $(if $(strip $2), $2, \
661      $(MAKESUPPORT_OUTPUTDIR)/vardeps/$(DependOnVariableDirName)/$(strip $1).vardeps))
662
663# Does the actual work with parameters stripped.
664# If the file exists AND the contents is the same as the variable, do nothing
665# else print a new file.
666# Always returns the name of the file where the value was printed.
667# Param 1 - Name of variable
668# Param 2 - (optional) name of file to store value in
669DependOnVariableHelper = \
670    $(strip $(if $(and $(wildcard $(call DependOnVariableFileName, $1, $2)),\
671        $(call equals, $(strip $($1)), \
672            $(call ReadFile, $(call DependOnVariableFileName, $1, $2)))),,\
673      $(call MakeDir, $(dir $(call DependOnVariableFileName, $1, $2))) \
674      $(if $(findstring $(LOG_LEVEL), trace), \
675          $(info Variable $1: >$(strip $($1))<) \
676          $(info File: >$(call ReadFile, $(call DependOnVariableFileName, $1, $2))<)) \
677      $(call WriteFile, $($1), $(call DependOnVariableFileName, $1, $2))) \
678    $(call DependOnVariableFileName, $1, $2))
679
680# Main macro
681# Param 1 - Name of variable
682# Param 2 - (optional) name of file to store value in
683DependOnVariable = \
684    $(call DependOnVariableHelper,$(strip $1),$(strip $2))
685
686################################################################################
687
688# Hook to include the corresponding custom file, if present.
689$(eval $(call IncludeCustomExtension, , common/MakeBase.gmk))
690
691endif # _MAKEBASE_GMK
692