MakeBase.gmk revision 2653:1bed3f29d894
1#
2# Copyright (c) 2011, 2017, 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
35ifeq ($(wildcard $(SPEC)),)
36  $(error MakeBase.gmk needs SPEC set to a proper spec.gmk)
37endif
38
39# By defining this pseudo target, make will automatically remove targets
40# if their recipe fails so that a rebuild is automatically triggered on the
41# next make invocation.
42.DELETE_ON_ERROR:
43
44################################################################################
45# Definitions for special characters
46################################################################################
47
48# When calling macros, the spaces between arguments are
49# often semantically important! Sometimes we need to subst
50# spaces and commas, therefore we need the following macros.
51X:=
52SPACE:=$(X) $(X)
53COMMA:=,
54DOLLAR:=$$
55HASH:=\#
56LEFT_PAREN:=(
57RIGHT_PAREN:=)
58SQUOTE:='
59#'
60DQUOTE:="
61#"
62define NEWLINE
63
64
65endef
66
67# In GNU Make 4.0 and higher, there is a file function for writing to files.
68ifeq (4.0, $(firstword $(sort 4.0 $(MAKE_VERSION))))
69  HAS_FILE_FUNCTION := true
70endif
71
72##############################
73# Functions
74##############################
75
76### Debug functions
77
78# Prints the name and value of a variable
79PrintVar = \
80    $(info $(strip $1) >$($(strip $1))<)
81
82### Functions for timers
83
84# Store the build times in this directory.
85BUILDTIMESDIR=$(OUTPUT_ROOT)/make-support/build-times
86
87# Record starting time for build of a sub repository.
88define RecordStartTime
89	$(DATE) '+%Y %m %d %H %M %S' | $(NAWK) '{ print $$1,$$2,$$3,$$4,$$5,$$6,($$4*3600+$$5*60+$$6) }' > $(BUILDTIMESDIR)/build_time_start_$(strip $1) && \
90	$(DATE) '+%Y-%m-%d %H:%M:%S' > $(BUILDTIMESDIR)/build_time_start_$(strip $1)_human_readable
91endef
92
93# Record ending time and calculate the difference and store it in a
94# easy to read format. Handles builds that cross midnight. Expects
95# that a build will never take 24 hours or more.
96define RecordEndTime
97	$(DATE) '+%Y %m %d %H %M %S' | $(NAWK) '{ print $$1,$$2,$$3,$$4,$$5,$$6,($$4*3600+$$5*60+$$6) }' > $(BUILDTIMESDIR)/build_time_end_$(strip $1)
98	$(DATE) '+%Y-%m-%d %H:%M:%S' > $(BUILDTIMESDIR)/build_time_end_$(strip $1)_human_readable
99	$(ECHO) `$(CAT) $(BUILDTIMESDIR)/build_time_start_$(strip $1)` `$(CAT) $(BUILDTIMESDIR)/build_time_end_$(strip $1)` $1 | \
100	    $(NAWK) '{ F=$$7; T=$$14; if (F > T) { T+=3600*24 }; D=T-F; H=int(D/3600); \
101	    M=int((D-H*3600)/60); S=D-H*3600-M*60; printf("%02d:%02d:%02d %s\n",H,M,S,$$15); }' \
102	    > $(BUILDTIMESDIR)/build_time_diff_$(strip $1)
103endef
104
105# Hook to be called when starting to execute a top-level target
106define TargetEnter
107	$(PRINTF) "## Starting $(patsubst %-only,%,$@)\n"
108	$(call RecordStartTime,$(patsubst %-only,%,$@))
109endef
110
111# Hook to be called when finish executing a top-level target
112define TargetExit
113	$(call RecordEndTime,$(patsubst %-only,%,$@))
114	$(PRINTF) "## Finished $(patsubst %-only,%,$@) (build time %s)\n\n" \
115	    "`$(CAT) $(BUILDTIMESDIR)/build_time_diff_$(patsubst %-only,%,$@) | $(CUT) -f 1 -d ' '`"
116endef
117
118################################################################################
119# This macro translates $ into \$ to protect the $ from expansion in the shell.
120# To make this macro resilient against already escaped strings, first remove
121# any present escapes before escaping so that no double escapes are added.
122EscapeDollar = $(subst $$,\$$,$(subst \$$,$$,$(strip $1)))
123
124################################################################################
125# This macro works just like EscapeDollar above, but for #.
126EscapeHash = $(subst \#,\\\#,$(subst \\\#,\#,$(strip $1)))
127
128################################################################################
129# This macro translates $ into $$ to protect the string from make itself.
130DoubleDollar = $(subst $$,$$$$,$(strip $1))
131
132################################################################################
133# ListPathsSafely can be used to print command parameters to a file. This is
134# typically done if the command line lenght risk being too long for the
135# OS/shell. In later make versions, the file function can be used for this
136# purpose. For earlier versions, a more complex implementation is provided.
137#
138# The function ListPathsSafely can be called either directly or, more commonly
139# from a recipe line. If called from a recipe, it will be executed in the
140# evaluation phase of that recipe, which means that it will write to the file
141# before any other line in the recipe has been run.
142ifeq ($(HAS_FILE_FUNCTION), true)
143  # Param 1 - Name of variable containing paths/arguments to output
144  # Param 2 - File to print to
145  # Param 3 - Set to true to append to file instead of overwriting
146  define ListPathsSafely
147    $$(call MakeDir, $$(dir $$(strip $2)))
148    $$(file $$(if $$(filter true, $$(strip $3)),>>,>) \
149        $$(strip $2),$$(subst $$(SPACE),$$(NEWLINE),$$(strip $$($$(strip $1)))))
150  endef
151
152else # HAS_FILE_FUNCTION = false
153
154  $(eval compress_paths = \
155      $(strip $(shell $(CAT) $(SRC_ROOT)/make/common/support/ListPathsSafely-pre-compress.incl)))
156  compress_paths += \
157      $(subst $(SRC_ROOT),X97, \
158      $(subst $(OUTPUT_ROOT),X98, \
159      $(subst X,X00, \
160      $(subst $(SPACE),\n,$(strip $1)))))
161  $(eval compress_paths += \
162      $(strip $(shell $(CAT) $(SRC_ROOT)/make/common/support/ListPathsSafely-post-compress.incl)))
163
164  decompress_paths=$(SED) -f $(SRC_ROOT)/make/common/support/ListPathsSafely-uncompress.sed \
165      -e 's|X99|\\n|g' \
166      -e 's|X98|$(OUTPUT_ROOT)|g' -e 's|X97|$(SRC_ROOT)|g' \
167      -e 's|X00|X|g'
168
169  ListPathsSafely_IfPrintf = \
170      $(if $(word $3,$($(strip $1))), \
171          $(shell $(PRINTF) -- "$(strip $(call EscapeDollar, \
172              $(call compress_paths, $(wordlist $3,$4,$($(strip $1))))))\n" \
173              | $(decompress_paths) >> $2))
174
175  # Param 1 - Name of variable containing paths/arguments to output
176  # Param 2 - File to print to
177  # Param 3 - Set to true to append to file instead of overwriting
178  define ListPathsSafely
179    ifneq (,$$(word 30001,$$($$(strip $1))))
180      $$(error Cannot list safely more than 30000 paths. $1 has $$(words $$($$(strip $1))) paths!)
181    endif
182    $$(call MakeDir, $$(dir $2))
183    ifneq ($$(strip $3), true)
184      $$(shell $(RM) $$(strip $2))
185    endif
186
187    $$(call ListPathsSafely_IfPrintf,$1,$2,1,250)
188    $$(call ListPathsSafely_IfPrintf,$1,$2,251,500)
189    $$(call ListPathsSafely_IfPrintf,$1,$2,501,750)
190    $$(call ListPathsSafely_IfPrintf,$1,$2,751,1000)
191
192    $$(call ListPathsSafely_IfPrintf,$1,$2,1001,1250)
193    $$(call ListPathsSafely_IfPrintf,$1,$2,1251,1500)
194    $$(call ListPathsSafely_IfPrintf,$1,$2,1501,1750)
195    $$(call ListPathsSafely_IfPrintf,$1,$2,1751,2000)
196
197    $$(call ListPathsSafely_IfPrintf,$1,$2,2001,2250)
198    $$(call ListPathsSafely_IfPrintf,$1,$2,2251,2500)
199    $$(call ListPathsSafely_IfPrintf,$1,$2,2501,2750)
200    $$(call ListPathsSafely_IfPrintf,$1,$2,2751,3000)
201
202    $$(call ListPathsSafely_IfPrintf,$1,$2,3001,3250)
203    $$(call ListPathsSafely_IfPrintf,$1,$2,3251,3500)
204    $$(call ListPathsSafely_IfPrintf,$1,$2,3501,3750)
205    $$(call ListPathsSafely_IfPrintf,$1,$2,3751,4000)
206
207    $$(call ListPathsSafely_IfPrintf,$1,$2,4001,4250)
208    $$(call ListPathsSafely_IfPrintf,$1,$2,4251,4500)
209    $$(call ListPathsSafely_IfPrintf,$1,$2,4501,4750)
210    $$(call ListPathsSafely_IfPrintf,$1,$2,4751,5000)
211
212    $$(call ListPathsSafely_IfPrintf,$1,$2,5001,5250)
213    $$(call ListPathsSafely_IfPrintf,$1,$2,5251,5500)
214    $$(call ListPathsSafely_IfPrintf,$1,$2,5501,5750)
215    $$(call ListPathsSafely_IfPrintf,$1,$2,5751,6000)
216
217    $$(call ListPathsSafely_IfPrintf,$1,$2,6001,6250)
218    $$(call ListPathsSafely_IfPrintf,$1,$2,6251,6500)
219    $$(call ListPathsSafely_IfPrintf,$1,$2,6501,6750)
220    $$(call ListPathsSafely_IfPrintf,$1,$2,6751,7000)
221
222    $$(call ListPathsSafely_IfPrintf,$1,$2,7001,7250)
223    $$(call ListPathsSafely_IfPrintf,$1,$2,7251,7500)
224    $$(call ListPathsSafely_IfPrintf,$1,$2,7501,7750)
225    $$(call ListPathsSafely_IfPrintf,$1,$2,7751,8000)
226
227    $$(call ListPathsSafely_IfPrintf,$1,$2,8001,8250)
228    $$(call ListPathsSafely_IfPrintf,$1,$2,8251,8500)
229    $$(call ListPathsSafely_IfPrintf,$1,$2,8501,8750)
230    $$(call ListPathsSafely_IfPrintf,$1,$2,8751,9000)
231
232    $$(call ListPathsSafely_IfPrintf,$1,$2,9001,9250)
233    $$(call ListPathsSafely_IfPrintf,$1,$2,9251,9500)
234    $$(call ListPathsSafely_IfPrintf,$1,$2,9501,9750)
235    $$(call ListPathsSafely_IfPrintf,$1,$2,9751,10000)
236
237    $$(call ListPathsSafely_IfPrintf,$1,$2,10001,10250)
238    $$(call ListPathsSafely_IfPrintf,$1,$2,10251,10500)
239    $$(call ListPathsSafely_IfPrintf,$1,$2,10501,10750)
240    $$(call ListPathsSafely_IfPrintf,$1,$2,10751,11000)
241
242    $$(call ListPathsSafely_IfPrintf,$1,$2,11001,11250)
243    $$(call ListPathsSafely_IfPrintf,$1,$2,11251,11500)
244    $$(call ListPathsSafely_IfPrintf,$1,$2,11501,11750)
245    $$(call ListPathsSafely_IfPrintf,$1,$2,11751,12000)
246
247    $$(call ListPathsSafely_IfPrintf,$1,$2,12001,12250)
248    $$(call ListPathsSafely_IfPrintf,$1,$2,12251,12500)
249    $$(call ListPathsSafely_IfPrintf,$1,$2,12501,12750)
250    $$(call ListPathsSafely_IfPrintf,$1,$2,12751,13000)
251
252    $$(call ListPathsSafely_IfPrintf,$1,$2,13001,13250)
253    $$(call ListPathsSafely_IfPrintf,$1,$2,13251,13500)
254    $$(call ListPathsSafely_IfPrintf,$1,$2,13501,13750)
255    $$(call ListPathsSafely_IfPrintf,$1,$2,13751,14000)
256
257    $$(call ListPathsSafely_IfPrintf,$1,$2,14001,14250)
258    $$(call ListPathsSafely_IfPrintf,$1,$2,14251,14500)
259    $$(call ListPathsSafely_IfPrintf,$1,$2,14501,14750)
260    $$(call ListPathsSafely_IfPrintf,$1,$2,14751,15000)
261
262    $$(call ListPathsSafely_IfPrintf,$1,$2,15001,15250)
263    $$(call ListPathsSafely_IfPrintf,$1,$2,15251,15500)
264    $$(call ListPathsSafely_IfPrintf,$1,$2,15501,15750)
265    $$(call ListPathsSafely_IfPrintf,$1,$2,15751,16000)
266
267    $$(call ListPathsSafely_IfPrintf,$1,$2,16001,16250)
268    $$(call ListPathsSafely_IfPrintf,$1,$2,16251,16500)
269    $$(call ListPathsSafely_IfPrintf,$1,$2,16501,16750)
270    $$(call ListPathsSafely_IfPrintf,$1,$2,16751,17000)
271
272    $$(call ListPathsSafely_IfPrintf,$1,$2,17001,17250)
273    $$(call ListPathsSafely_IfPrintf,$1,$2,17251,17500)
274    $$(call ListPathsSafely_IfPrintf,$1,$2,17501,17750)
275    $$(call ListPathsSafely_IfPrintf,$1,$2,17751,18000)
276
277    $$(call ListPathsSafely_IfPrintf,$1,$2,18001,18250)
278    $$(call ListPathsSafely_IfPrintf,$1,$2,18251,18500)
279    $$(call ListPathsSafely_IfPrintf,$1,$2,18501,18750)
280    $$(call ListPathsSafely_IfPrintf,$1,$2,18751,19000)
281
282    $$(call ListPathsSafely_IfPrintf,$1,$2,19001,19250)
283    $$(call ListPathsSafely_IfPrintf,$1,$2,19251,19500)
284    $$(call ListPathsSafely_IfPrintf,$1,$2,19501,19750)
285    $$(call ListPathsSafely_IfPrintf,$1,$2,19751,20000)
286
287    $$(call ListPathsSafely_IfPrintf,$1,$2,20001,20250)
288    $$(call ListPathsSafely_IfPrintf,$1,$2,20251,20500)
289    $$(call ListPathsSafely_IfPrintf,$1,$2,20501,20750)
290    $$(call ListPathsSafely_IfPrintf,$1,$2,20751,21000)
291
292    $$(call ListPathsSafely_IfPrintf,$1,$2,21001,21250)
293    $$(call ListPathsSafely_IfPrintf,$1,$2,21251,21500)
294    $$(call ListPathsSafely_IfPrintf,$1,$2,21501,21750)
295    $$(call ListPathsSafely_IfPrintf,$1,$2,21751,22000)
296
297    $$(call ListPathsSafely_IfPrintf,$1,$2,22001,22250)
298    $$(call ListPathsSafely_IfPrintf,$1,$2,22251,22500)
299    $$(call ListPathsSafely_IfPrintf,$1,$2,22501,22750)
300    $$(call ListPathsSafely_IfPrintf,$1,$2,22751,23000)
301
302    $$(call ListPathsSafely_IfPrintf,$1,$2,23001,23250)
303    $$(call ListPathsSafely_IfPrintf,$1,$2,23251,23500)
304    $$(call ListPathsSafely_IfPrintf,$1,$2,23501,23750)
305    $$(call ListPathsSafely_IfPrintf,$1,$2,23751,24000)
306
307    $$(call ListPathsSafely_IfPrintf,$1,$2,24001,24250)
308    $$(call ListPathsSafely_IfPrintf,$1,$2,24251,24500)
309    $$(call ListPathsSafely_IfPrintf,$1,$2,24501,24750)
310    $$(call ListPathsSafely_IfPrintf,$1,$2,24751,25000)
311
312    $$(call ListPathsSafely_IfPrintf,$1,$2,25001,25250)
313    $$(call ListPathsSafely_IfPrintf,$1,$2,25251,25500)
314    $$(call ListPathsSafely_IfPrintf,$1,$2,25501,25750)
315    $$(call ListPathsSafely_IfPrintf,$1,$2,25751,26000)
316
317    $$(call ListPathsSafely_IfPrintf,$1,$2,26001,26250)
318    $$(call ListPathsSafely_IfPrintf,$1,$2,26251,26500)
319    $$(call ListPathsSafely_IfPrintf,$1,$2,26501,26750)
320    $$(call ListPathsSafely_IfPrintf,$1,$2,26751,27000)
321
322    $$(call ListPathsSafely_IfPrintf,$1,$2,27001,27250)
323    $$(call ListPathsSafely_IfPrintf,$1,$2,27251,27500)
324    $$(call ListPathsSafely_IfPrintf,$1,$2,27501,27750)
325    $$(call ListPathsSafely_IfPrintf,$1,$2,27751,28000)
326
327    $$(call ListPathsSafely_IfPrintf,$1,$2,28001,28250)
328    $$(call ListPathsSafely_IfPrintf,$1,$2,28251,28500)
329    $$(call ListPathsSafely_IfPrintf,$1,$2,28501,28750)
330    $$(call ListPathsSafely_IfPrintf,$1,$2,28751,29000)
331
332    $$(call ListPathsSafely_IfPrintf,$1,$2,29001,29250)
333    $$(call ListPathsSafely_IfPrintf,$1,$2,29251,29500)
334    $$(call ListPathsSafely_IfPrintf,$1,$2,29501,29750)
335    $$(call ListPathsSafely_IfPrintf,$1,$2,29751,30000)
336  endef
337endif # HAS_FILE_FUNCTION
338
339################################################################################
340
341# A file containing a way to uniquely identify the source code revision that
342# the build was created from
343SOURCE_REVISION_TRACKER := $(SUPPORT_OUTPUTDIR)/src-rev/source-revision-tracker
344
345# Locate all hg repositories included in the forest, as absolute paths
346FindAllReposAbs = \
347    $(strip $(sort $(dir $(filter-out $(SRC_ROOT)/build/%, $(wildcard \
348        $(addprefix $(SRC_ROOT)/, .hg */.hg */*/.hg */*/*/.hg) \
349    )))))
350
351# Locate all hg repositories included in the forest, as relative paths
352FindAllReposRel = \
353    $(strip $(subst $(SRC_ROOT)/,.,$(patsubst $(SRC_ROOT)/%/, %, $(FindAllReposAbs))))
354
355################################################################################
356
357define SetupLogging
358  ifeq ($$(LOG_PROFILE_TIMES_FILE), true)
359    ifeq ($$(IS_GNU_TIME), yes)
360      SHELL :=  $$(BASH) $$(SRC_ROOT)/common/bin/shell-profiler.sh \
361                gnutime $$(TIME) \
362                $$(OUTPUT_ROOT)/build-profile.log $$(SHELL)
363    else ifneq ($$(FLOCK), )
364      SHELL :=  $$(BASH) $$(SRC_ROOT)/common/bin/shell-profiler.sh \
365                flock $$(FLOCK) \
366                $$(OUTPUT_ROOT)/build-profile.log $$(SHELL)
367    endif
368  endif
369
370  ifeq ($$(LOG_LEVEL), trace)
371    SHELL_NO_RECURSE := $$(SHELL)
372    # Shell redefinition trick inspired by http://www.cmcrossroads.com/ask-mr-make/6535-tracing-rule-execution-in-gnu-make
373    # For each target executed, will print
374    # Building <TARGET> (from <FIRST PREREQUISITE>) (<ALL NEWER PREREQUISITES> newer)
375    # but with a limit of 20 on <ALL NEWER PREREQUISITES>, to avoid cluttering logs too much
376    # (and causing a crash on Cygwin).
377    SHELL = $$(warning $$(if $$@,Building $$@,Running shell command) $$(if $$<, (from $$<))$$(if $$?, ($$(wordlist 1, 20, $$?) $$(if $$(wordlist 21, 22, $$?), ... [in total $$(words $$?) files]) newer)))$$(SHELL_NO_RECURSE) -x
378  endif
379
380  # The warn level can never be turned off
381  LogWarn = $$(info $$(strip $$1))
382  LOG_WARN :=
383  ifneq ($$(findstring $$(LOG_LEVEL), info debug trace),)
384    LogInfo = $$(info $$(strip $$1))
385    LOG_INFO :=
386  else
387    LogInfo =
388    LOG_INFO := > /dev/null
389  endif
390  ifneq ($$(findstring $$(LOG_LEVEL), debug trace),)
391    LogDebug = $$(info $$(strip $$1))
392    LOG_DEBUG :=
393  else
394    LogDebug =
395    LOG_DEBUG := > /dev/null
396  endif
397  ifneq ($$(findstring $$(LOG_LEVEL), trace),)
398    LogTrace = $$(info $$(strip $$1))
399    LOG_TRACE :=
400  else
401    LogTrace =
402    LOG_TRACE := > /dev/null
403  endif
404endef
405
406# Make sure logging is setup for everyone that includes MakeBase.gmk.
407$(eval $(call SetupLogging))
408
409################################################################################
410# Creates a sequence of increasing numbers (inclusive).
411# Param 1 - starting number
412# Param 2 - ending number
413sequence = \
414    $(wordlist $1, $2, $(strip \
415        $(eval SEQUENCE_COUNT :=) \
416        $(call _sequence-do,$(strip $2))))
417
418_sequence-do = \
419    $(if $(word $1, $(SEQUENCE_COUNT)),, \
420      $(eval SEQUENCE_COUNT += .) \
421      $(words $(SEQUENCE_COUNT)) \
422      $(call _sequence-do,$1))
423
424################################################################################
425
426MAX_PARAMS := 35
427PARAM_SEQUENCE := $(call sequence, 2, $(MAX_PARAMS))
428
429# Template for creating a macro taking named parameters. To use it, assign the
430# template to a variable with the name you want for your macro, using '='
431# assignment. Then define a macro body with the suffix "Body". The Body macro
432# should take 1 parameter which should be a unique string for that invocation
433# of the macro.
434# Ex:
435# SetupFoo = $(NamedParamsMacroTemplate)
436# define SetupFooBody
437#   # do something
438#   # access parameters as $$($1_BAR)
439# endef
440# Call it like this
441# $(eval $(call SetupFoo, BUILD_SOMETHING, \
442#     BAR := some parameter value, \
443# ))
444define NamedParamsMacroTemplate
445  $(if $($(MAX_PARAMS)),$(error Internal makefile error: \
446      Too many named arguments to macro, please update MAX_PARAMS in MakeBase.gmk))
447  # Iterate over 2 3 4... and evaluate the named parameters with $1_ as prefix
448  $(foreach i,$(PARAM_SEQUENCE), $(if $(strip $($i)),\
449    $(strip $1)_$(strip $(call EscapeHash, $(call DoubleDollar, $($i))))$(NEWLINE)))
450  # Debug print all named parameter names and values
451  $(if $(findstring $(LOG_LEVEL),debug trace), \
452    $(info $0 $(strip $1) $(foreach i,$(PARAM_SEQUENCE), \
453      $(if $(strip $($i)),$(NEWLINE) $(strip [$i] $(if $(filter $(LOG_LEVEL), trace), \
454        $($i), $(wordlist 1, 20, $($(i))) $(if $(word 21, $($(i))), ...)))))))
455
456  $(if $(DEBUG_$(strip $1)),
457    $(info -------- <<< Begin expansion of $(strip $1)) \
458    $(info $(call $(0)Body,$(strip $1))) \
459    $(info -------- >>> End expansion of $(strip $1)) \
460  )
461
462  $(call $(0)Body,$(strip $1))
463endef
464
465################################################################################
466# Make directory without forking mkdir if not needed
467# 1: List of directories to create
468MakeDir = \
469    $(strip \
470        $(eval MakeDir_dirs_to_make := $(strip $(foreach d, $1, $(if $(wildcard $d), , $d)))) \
471        $(if $(MakeDir_dirs_to_make), $(shell $(MKDIR) -p $(MakeDir_dirs_to_make))) \
472    )
473
474################################################################################
475# Assign a variable only if it is empty
476# Param 1 - Variable to assign
477# Param 2 - Value to assign
478SetIfEmpty = \
479    $(if $($(strip $1)),,$(eval $(strip $1) := $2))
480
481################################################################################
482
483ifeq ($(OPENJDK_TARGET_OS),solaris)
484  # On Solaris, if the target is a symlink and exists, cp won't overwrite.
485  # Cp has to operate in recursive mode to allow for -P flag, to preserve soft links. If the
486  # name of the target file differs from the source file, rename after copy.
487  # If the source and target parent directories are the same, recursive copy doesn't work
488  # so we fall back on regular copy, which isn't preserving symlinks.
489  define install-file
490	$(MKDIR) -p '$(@D)'
491	$(RM) '$@'
492	if [ "$(@D)" != "$(<D)" ]; then \
493	  $(CP) -f -r -P '$<' '$(@D)'; \
494	  if [ "$(@F)" != "$(<F)" ]; then \
495	    $(MV) '$(@D)/$(<F)' '$@'; \
496	  fi; \
497	else \
498	  if [ -L '$<' ]; then \
499	    $(ECHO) "Source file is a symlink and target is in the same directory: $< $@" ; \
500	    exit 1; \
501	  fi; \
502	  $(CP) -f '$<' '$@'; \
503	fi
504  endef
505else ifeq ($(OPENJDK_TARGET_OS),macosx)
506  # On mac, extended attributes sometimes creep into the source files, which may later
507  # cause the creation of ._* files which confuses testing. Clear these with xattr if
508  # set. Some files get their write permissions removed after being copied to the
509  # output dir. When these are copied again to images, xattr would fail. By only clearing
510  # attributes when they are present, failing on this is avoided.
511  #
512  # If copying a soft link to a directory, need to delete the target first to avoid
513  # weird errors.
514  define install-file
515	$(MKDIR) -p '$(@D)'
516	$(RM) '$@'
517	$(CP) -fRP '$<' '$@'
518	if [ -n "`$(XATTR) -l '$@'`" ]; then $(XATTR) -c '$@'; fi
519  endef
520else
521  define install-file
522	$(call MakeDir, $(@D))
523	$(CP) -fP '$<' '$@'
524  endef
525endif
526
527# Variant of install file that does not preserve symlinks
528define install-file-nolink
529	$(call MakeDir, $(@D))
530	$(CP) -f '$<' '$@'
531endef
532
533################################################################################
534# Take two paths and return the path of the last common directory.
535# Ex: /foo/bar/baz, /foo/bar/banan -> /foo/bar
536#     foo/bar/baz, /foo/bar -> <empty>
537#
538# The x prefix is used to preserve the presence of the initial slash
539#
540# $1 - Path to compare
541# $2 - Other path to compare
542FindCommonPathPrefix = \
543    $(patsubst x%,%,$(subst $(SPACE),/,$(strip \
544        $(call FindCommonPathPrefixHelper, \
545            $(subst /,$(SPACE),x$(strip $1)), $(subst /,$(SPACE),x$(strip $2))) \
546    )))
547
548FindCommonPathPrefixHelper = \
549    $(if $(call equals, $(firstword $1), $(firstword $2)), \
550      $(firstword $1) \
551      $(call FindCommonPathPrefixHelper, \
552          $(wordlist 2, $(words $1), $1), $(wordlist 2, $(words $2), $2) \
553      ) \
554    )
555
556# Convert a partial path into as many directory levels of ../, removing
557# leading and following /.
558# Ex: foo/bar/baz/ -> ../../..
559#     foo/bar -> ../..
560#     /foo -> ..
561DirToDotDot = \
562    $(subst $(SPACE),/,$(foreach d, $(subst /,$(SPACE),$1),..))
563
564# Computes the relative path from a directory to a file
565# $1 - File to compute the relative path to
566# $2 - Directory to compute the relative path from
567RelativePath = \
568    $(eval $1_prefix := $(call FindCommonPathPrefix, $1, $2)) \
569    $(eval $1_dotdots := $(call DirToDotDot, $(patsubst $($(strip $1)_prefix)/%, %, $2))) \
570    $(eval $1_suffix := $(patsubst $($(strip $1)_prefix)/%, %, $1)) \
571    $($(strip $1)_dotdots)/$($(strip $1)_suffix)
572
573################################################################################
574# link-file-* works similarly to install-file but creates a symlink instead.
575# There are two versions, either creating a relative or an absolute link. Be
576# careful when using this on Windows since the symlink created is only valid in
577# the unix emulation environment.
578define link-file-relative
579	$(call MakeDir, $(@D))
580	$(RM) $@
581	$(LN) -s $(call RelativePath, $<, $(@D)) $@
582endef
583
584define link-file-absolute
585	$(call MakeDir, $(@D))
586	$(RM) $@
587	$(LN) -s $< $@
588endef
589
590################################################################################
591# Filter out duplicate sub strings while preserving order. Keeps the first occurance.
592uniq = \
593    $(if $1,$(firstword $1) $(call uniq,$(filter-out $(firstword $1),$1)))
594
595# Returns all whitespace-separated words in $2 where at least one of the
596# whitespace-separated words in $1 is a substring.
597containing = \
598    $(strip \
599        $(foreach v,$(strip $2),\
600          $(call uniq,$(foreach p,$(strip $1),$(if $(findstring $p,$v),$v)))))
601
602# Returns all whitespace-separated words in $2 where none of the
603# whitespace-separated words in $1 is a substring.
604not-containing = \
605    $(strip $(filter-out $(call containing,$1,$2),$2))
606
607# Return a list of all string elements that are duplicated in $1.
608dups = \
609    $(strip $(foreach v, $(sort $1), $(if $(filter-out 1, \
610        $(words $(filter $v, $1))), $v)))
611
612# String equals
613equals = \
614    $(and $(findstring $(strip $1),$(strip $2)),\
615        $(findstring $(strip $2),$(strip $1)))
616
617# Remove a whole list of prefixes
618# $1 - List of prefixes
619# $2 - List of elements to process
620remove-prefixes = \
621    $(strip $(if $1,$(patsubst $(firstword $1)%,%,\
622      $(call remove-prefixes,$(filter-out $(firstword $1),$1),$2)),$2))
623
624# Convert the string given to upper case, without any $(shell)
625# Inspired by http://lists.gnu.org/archive/html/help-make/2013-09/msg00009.html
626uppercase_table := a,A b,B c,C d,D e,E f,F g,G h,H i,I j,J k,K l,L m,M n,N o,O \
627    p,P q,Q r,R s,S t,T u,U v,V w,W x,X y,Y z,Z
628
629uppercase_internal = \
630  $(if $(strip $1), $$(subst $(firstword $1), $(call uppercase_internal, \
631      $(wordlist 2, $(words $1), $1), $2)), $2)
632
633# Convert a string to upper case. Works only on a-z.
634# $1 - The string to convert
635uppercase = \
636  $(strip \
637    $(eval uppercase_result := $(call uppercase_internal, $(uppercase_table), $1)) \
638    $(uppercase_result) \
639  )
640
641################################################################################
642
643ifneq ($(DISABLE_CACHE_FIND), true)
644  # In Cygwin, finds are very costly, both because of expensive forks and because
645  # of bad file system caching. Find is used extensively in $(shell) commands to
646  # find source files. This makes rerunning make with no or few changes rather
647  # expensive. To speed this up, these two macros are used to cache the results
648  # of simple find commands for reuse.
649  #
650  # Runs a find and stores both the directories where it was run and the results.
651  # This macro can be called multiple times to add to the cache. Only finds files
652  # with no filters.
653  #
654  # Needs to be called with $(eval )
655  #
656  # Even if the performance benifit is negligible on other platforms, keep the
657  # functionality active unless explicitly disabled to exercise it more.
658  #
659  # Initialize FIND_CACHE_DIRS with := to make it a non recursively-expanded variable
660  FIND_CACHE_DIRS :=
661  # Param 1 - Dirs to find in
662  # Param 2 - (optional) specialization. Normally "-a \( ... \)" expression.
663  define FillCacheFind
664    # Filter out already cached dirs. The - is needed when FIND_CACHE_DIRS is empty
665    # since filter out will then return empty.
666    FIND_CACHE_NEW_DIRS := $$(filter-out $$(addsuffix /%,\
667        - $(FIND_CACHE_DIRS)) $(FIND_CACHE_DIRS), $1)
668    ifneq ($$(FIND_CACHE_NEW_DIRS), )
669      # Remove any trailing slash from dirs in the cache dir list
670      FIND_CACHE_DIRS += $$(patsubst %/,%, $$(FIND_CACHE_NEW_DIRS))
671      FIND_CACHE := $$(sort $$(FIND_CACHE) $$(shell $(FIND) $$(FIND_CACHE_NEW_DIRS) \( -type f -o -type l \) $2))
672    endif
673  endef
674
675  # Mimics find by looking in the cache if all of the directories have been cached.
676  # Otherwise reverts to shell find. This is safe to call on all platforms, even if
677  # cache is deactivated.
678  #
679  # $1 can be either a directory or a file. If it's a directory, make
680  # sure we have exactly one trailing slash before the wildcard.
681  # The extra - is needed when FIND_CACHE_DIRS is empty but should be harmless.
682  #
683  # Param 1 - Dirs to find in
684  # Param 2 - (optional) specialization. Normally "-a \( ... \)" expression.
685  define CacheFind
686    $(if $(filter-out $(addsuffix /%,- $(FIND_CACHE_DIRS)) $(FIND_CACHE_DIRS),$1), \
687      $(if $(wildcard $1), $(shell $(FIND) $1 \( -type f -o -type l \) $2)), \
688      $(filter $(addsuffix /%,$(patsubst %/,%,$1)) $1,$(FIND_CACHE)))
689  endef
690
691else
692  # If CacheFind is disabled, just run the find command.
693  # Param 1 - Dirs to find in
694  # Param 2 - (optional) specialization. Normally "-a \( ... \)" expression.
695  define CacheFind
696    $(shell $(FIND) $1 \( -type f -o -type l \) $2)
697  endef
698endif
699
700################################################################################
701
702define AddFileToCopy
703  # Helper macro for SetupCopyFiles
704  # 1 : Source file
705  # 2 : Dest file
706  # 3 : Variable to add targets to
707  # 4 : Macro to call for copy operation
708  # 5 : Action text to log
709  $2: $1
710	$$(call LogInfo, $(strip $5) $$(patsubst $(OUTPUT_ROOT)/%,%,$$@))
711	$$($$(strip $4))
712
713  $3 += $2
714endef
715
716# Returns the value of the first argument
717identity = \
718    $(strip $1)
719
720# Setup make rules for copying files, with an option to do more complex
721# processing instead of copying.
722#
723# Parameter 1 is the name of the rule. This name is used as variable prefix,
724# and the targets generated are listed in a variable by that name.
725#
726# Remaining parameters are named arguments. These include:
727#   SRC     : Source root dir (defaults to dir of first file)
728#   DEST    : Dest root dir
729#   FILES   : List of files to copy with absolute paths, or path relative to SRC.
730#             Must be in SRC.
731#   FLATTEN : Set to flatten the directory structure in the DEST dir.
732#   MACRO   : Optionally override the default macro used for making the copy.
733#             Default is 'install-file'
734#   NAME_MACRO : Optionally supply a macro that rewrites the target file name
735#                based on the source file name
736#   LOG_ACTION : Optionally specify a different action text for log messages
737SetupCopyFiles = $(NamedParamsMacroTemplate)
738define SetupCopyFilesBody
739
740  ifeq ($$($1_MACRO), )
741    $1_MACRO := install-file
742  endif
743
744  # Default SRC to the dir of the first file.
745  ifeq ($$($1_SRC), )
746    $1_SRC := $$(dir $$(firstword $$($1_FILES)))
747  endif
748
749  ifeq ($$($1_NAME_MACRO), )
750    $1_NAME_MACRO := identity
751  endif
752
753  ifeq ($$($1_LOG_ACTION), )
754    $1_LOG_ACTION := Copying
755  endif
756
757  # Remove any trailing slash from SRC and DEST
758  $1_SRC := $$(patsubst %/,%,$$($1_SRC))
759  $1_DEST := $$(patsubst %/,%,$$($1_DEST))
760
761  $$(foreach f, $$(patsubst $$($1_SRC)/%,%,$$($1_FILES)), \
762      $$(eval $$(call AddFileToCopy, $$($1_SRC)/$$f, \
763      $$($1_DEST)/$$(call $$(strip $$($1_NAME_MACRO)),$$(if $$($1_FLATTEN),$$(notdir $$f),$$f)), \
764      $1, $$($1_MACRO), $$($1_LOG_ACTION))))
765
766endef
767
768################################################################################
769# Parse a multiple-keyword variable, like FOO="KEYWORD1=val1;KEYWORD2=val2;..."
770# These will be converted into a series of variables like FOO_KEYWORD1=val1,
771# FOO_KEYWORD2=val2, etc. Unknown keywords will cause an error.
772#
773# Parameter 1 is the name of the rule, and is also the name of the variable.
774#
775# Remaining parameters are named arguments. These include:
776#   KEYWORDS          A list of valid keywords
777#   STRING_KEYWORDS   A list of valid keywords, processed as string. This means
778#       that '%20' will be replaced by ' ' to allow for multi-word strings.
779#
780ParseKeywordVariable = $(NamedParamsMacroTemplate)
781define ParseKeywordVariableBody
782  ifneq ($$($1), )
783    # To preserve spaces, substitute them with a hopefully unique pattern
784    # before splitting and then re-substitute spaces back.
785    $1_MANGLED := $$(subst $$(SPACE),||||,$$($1))
786    $$(foreach mangled_part, $$(subst ;, , $$($1_MANGLED)), \
787      $$(eval mangled_part_eval := $$(call DoubleDollar, $$(mangled_part))) \
788      $$(eval part := $$$$(subst ||||,$$$$(SPACE),$$$$(mangled_part_eval))) \
789      $$(eval $1_NO_MATCH := true) \
790      $$(foreach keyword, $$($1_KEYWORDS), \
791        $$(eval keyword_eval := $$(call DoubleDollar, $$(keyword))) \
792        $$(if $$(filter $$(keyword)=%, $$(part)), \
793          $$(eval $(strip $1)_$$$$(keyword_eval) := $$$$(strip $$$$(patsubst $$$$(keyword_eval)=%, %, $$$$(part)))) \
794          $$(eval $1_NO_MATCH := ) \
795        ) \
796      ) \
797      $$(foreach keyword, $$($1_STRING_KEYWORDS), \
798        $$(eval keyword_eval := $$(call DoubleDollar, $$(keyword))) \
799        $$(if $$(filter $$(keyword)=%, $$(part)), \
800          $$(eval $(strip $1)_$$$$(keyword_eval) := $$$$(strip $$$$(subst %20, , $$$$(patsubst $$$$(keyword_eval)=%, %, $$$$(part))))) \
801          $$(eval $1_NO_MATCH := ) \
802        ) \
803      ) \
804      $$(if $$($1_NO_MATCH), \
805        $$(if $$(filter $$(part), $$($1_KEYWORDS) $$($1_STRING_KEYWORDS)), \
806          $$(info Keyword $$(part) for $1 needs to be assigned a value.) \
807        , \
808          $$(info $$(part) is not a valid keyword for $1.) \
809          $$(info Valid keywords: $$($1_KEYWORDS) $$($1_STRING_KEYWORDS).) \
810        ) \
811        $$(error Cannot continue) \
812      ) \
813    )
814  endif
815endef
816
817################################################################################
818# ShellQuote
819#
820# Quotes a string with single quotes and replaces single quotes with '\'' so
821# that the contents survives being given to the shell.
822
823ShellQuote = \
824    $(SQUOTE)$(subst $(SQUOTE),$(SQUOTE)\$(SQUOTE)$(SQUOTE),$(strip $1))$(SQUOTE)
825
826################################################################################
827# FixPath
828#
829# On Windows, converts a path from cygwin/unix style (e.g. /bin/foo) into
830# "mixed mode" (e.g. c:/cygwin/bin/foo). On other platforms, return the path
831# unchanged.
832# This is normally not needed since we use the FIXPATH prefix for command lines,
833# but might be needed in certain circumstances.
834ifeq ($(OPENJDK_TARGET_OS), windows)
835  FixPath = \
836      $(shell $(CYGPATH) -m $1)
837else
838  FixPath = \
839      $1
840endif
841
842################################################################################
843# Write to and read from file
844
845# Param 1 - File to read
846ReadFile = \
847    $(shell $(CAT) $1)
848
849# Param 1 - Text to write
850# Param 2 - File to write to
851ifeq ($(HAS_FILE_FUNCTION), true)
852  WriteFile = \
853      $(file >$2,$(strip $1))
854else
855  # Use printf to get consistent behavior on all platforms.
856  WriteFile = \
857      $(shell $(PRINTF) "%s" $(call ShellQuote, $1) > $2)
858endif
859
860################################################################################
861# DependOnVariable
862#
863# This macro takes a variable name and puts the value in a file only if the
864# value has changed since last. The name of the file is returned. This can be
865# used to create rule dependencies on make variable values. The following
866# example would get rebuilt if the value of SOME_VAR was changed:
867#
868# path/to/some-file: $(call DependOnVariable, SOME_VAR)
869#         echo $(SOME_VAR) > $@
870#
871# Note that leading and trailing white space in the value is ignored.
872#
873
874# Defines the sub directory structure to store variable value file in
875DependOnVariableDirName = \
876    $(strip $(addsuffix $(if $(MODULE),/$(MODULE)), \
877        $(subst $(SRC_ROOT)/,, $(if $(filter /%, $(firstword $(MAKEFILE_LIST))), \
878          $(firstword $(MAKEFILE_LIST)), \
879          $(CURDIR)/$(firstword $(MAKEFILE_LIST))))))
880
881# Defines the name of the file to store variable value in. Generates a name
882# unless parameter 2 is given.
883# Param 1 - Name of variable
884# Param 2 - (optional) name of file to store value in
885DependOnVariableFileName = \
886    $(strip $(if $(strip $2), $2, \
887      $(MAKESUPPORT_OUTPUTDIR)/vardeps/$(DependOnVariableDirName)/$(strip $1).vardeps))
888
889# Does the actual work with parameters stripped.
890# If the file exists AND the contents is the same as the variable, do nothing
891# else print a new file.
892# Always returns the name of the file where the value was printed.
893# Param 1 - Name of variable
894# Param 2 - (optional) name of file to store value in
895DependOnVariableHelper = \
896    $(strip \
897        $(eval -include $(call DependOnVariableFileName, $1, $2)) \
898        $(if $(call equals, $(strip $($1)), $(strip $($1_old))),,\
899          $(call MakeDir, $(dir $(call DependOnVariableFileName, $1, $2))) \
900          $(if $(findstring $(LOG_LEVEL), trace), \
901              $(info NewVariable $1: >$(strip $($1))<) \
902              $(info OldVariable $1: >$(strip $($1_old))<)) \
903          $(call WriteFile, $1_old:=$(call DoubleDollar,$(call EscapeHash,$($1))), \
904              $(call DependOnVariableFileName, $1, $2))) \
905        $(call DependOnVariableFileName, $1, $2) \
906    )
907
908# Main macro
909# Param 1 - Name of variable
910# Param 2 - (optional) name of file to store value in
911DependOnVariable = \
912    $(call DependOnVariableHelper,$(strip $1),$(strip $2))
913
914# LogCmdlines is only intended to be used by ExecuteWithLog
915ifeq ($(LOG_CMDLINES), true)
916  LogCmdlines = $(info $(strip $1))
917else
918  LogCmdlines =
919endif
920
921################################################################################
922# ExecuteWithLog will run a command and log the output appropriately. This is
923# meant to be used by commands that do "real" work, like a compilation.
924# The output is stored in a specified log file, which is displayed at the end
925# of the build in case of failure. The  command line itself is stored in a file,
926# and also logged to stdout if the LOG=cmdlines option has been given.
927#
928# NOTE: If the command redirects stdout, the caller needs to wrap it in a
929# subshell (by adding parentheses around it), otherwise the redirect to the
930# subshell tee process will create a race condition where the target file may
931# not be fully written when the make recipe is done.
932#
933# Param 1 - The path to base the name of the log file / command line file on
934# Param 2 - The command to run
935ExecuteWithLog = \
936  $(call LogCmdlines, Exececuting: [$(strip $2)]) \
937  $(call WriteFile, $2, $(strip $1).cmdline) \
938  ( $(strip $2) > >($(TEE) $(strip $1).log) 2> >($(TEE) $(strip $1).log >&2) || \
939      ( exitcode=$(DOLLAR)? && \
940      $(CP) $(strip $1).log $(MAKESUPPORT_OUTPUTDIR)/failure-logs/$(subst /,_,$(patsubst $(BUILD_OUTPUT)/%,%,$(strip $1))).log && \
941      $(CP) $(strip $1).cmdline $(MAKESUPPORT_OUTPUTDIR)/failure-logs/$(subst /,_,$(patsubst $(BUILD_OUTPUT)/%,%,$(strip $1))).cmdline && \
942      exit $(DOLLAR)exitcode ) )
943
944################################################################################
945# Find lib dir for module
946# Param 1 - module name
947FindLibDirForModule = \
948    $(SUPPORT_OUTPUTDIR)/modules_libs/$(strip $1)
949
950################################################################################
951# Return a string suitable for use after a -classpath or --module-path option. It
952# will be correct and safe to use on all platforms. Arguments are given as space
953# separate classpath entries. Safe for multiple nested calls.
954# param 1 : A space separated list of classpath entries
955# The surrounding strip is needed to keep additional whitespace out
956PathList = \
957  "$(subst $(SPACE),$(PATH_SEP),$(strip $(subst $(DQUOTE),,$1)))"
958
959################################################################################
960# Check if a specified hotspot variant is being built, or at least one of a
961# list of variants. Will return 'true' or 'false'.
962# $1 - the variant to test for
963check-jvm-variant = \
964  $(strip \
965    $(if $(filter-out $(VALID_JVM_VARIANTS), $1), \
966      $(error Internal error: Invalid variant tested: $1)) \
967    $(if $(filter $1, $(JVM_VARIANTS)), true, false))
968
969################################################################################
970# Converts a space separated list to a comma separated list.
971#
972# Replacing double-comma with a single comma is to workaround the issue with
973# some version of make on windows that doesn't substitute spaces with one comma
974# properly.
975CommaList = \
976  $(strip \
977      $(subst $(COMMA)$(COMMA),$(COMMA),$(subst $(SPACE),$(COMMA),$(strip $1))) \
978  )
979
980################################################################################
981# Converts a space separated list to a colon separated list.
982#
983# Replacing double-colon with a single colon is to workaround the issue with
984# some version of make on windows that doesn't substitute spaces with one colon
985# properly.
986ColonList = \
987  $(strip \
988      $(subst ::,:,$(subst $(SPACE),:,$(strip $1))) \
989  )
990
991################################################################################
992
993# Hook to include the corresponding custom file, if present.
994$(eval $(call IncludeCustomExtension, , common/MakeBase.gmk))
995
996endif # _MAKEBASE_GMK
997