common/bin/shell-profiler.sh
author dfazunen
Fri, 12 May 2017 15:21:56 +0000
changeset 46217 191008ef907f
parent 44465 26fabd8abee9
permissions -rw-r--r--
Merge
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
14111
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
     1
#!/bin/bash
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
     2
#
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
     3
# Copyright (c) 2012, Oracle and/or its affiliates. All rights reserved.
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
     4
# DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
     5
#
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
     6
# This code is free software; you can redistribute it and/or modify it
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
     7
# under the terms of the GNU General Public License version 2 only, as
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
     8
# published by the Free Software Foundation.
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
     9
#
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    10
# This code is distributed in the hope that it will be useful, but WITHOUT
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    11
# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    12
# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    13
# version 2 for more details (a copy is included in the LICENSE file that
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    14
# accompanied this code).
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    15
#
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    16
# You should have received a copy of the GNU General Public License version
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    17
# 2 along with this work; if not, write to the Free Software Foundation,
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    18
# Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    19
#
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    20
# Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    21
# or visit www.oracle.com if you need additional information or have any
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    22
# questions.
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    23
#
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    24
44465
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    25
# Usage: sh shell-tracer.sh <TIME_CMD_TYPE> <TIME_CMD> <OUTPUT_FILE> <shell command line>
14111
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    26
#
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    27
# This shell script is supposed to be set as a replacement for SHELL in make,
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    28
# causing it to be called whenever make wants to execute shell commands.
27595
cff167b3bfa2 8065914: Various improvements and cleanup of build system
ihse
parents: 14111
diff changeset
    29
# The <shell command line> is suitable for passing on to the old shell,
14111
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    30
# typically beginning with -c.
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    31
#
44465
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    32
# This script will run the shell command line and it will also store a simple
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    33
# log of the the time it takes to execute the command in the OUTPUT_FILE, using
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    34
# utility for time measure specified with TIME_CMD option.
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    35
#
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    36
# Type of time measure utility is specified with TIME_CMD_TYPE option.
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    37
# Recognized options values of TIME_CMD_TYPE option: "gnutime", "flock".
14111
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    38
44465
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    39
TIME_CMD_TYPE="$1"
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    40
TIME_CMD="$2"
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    41
OUTPUT_FILE="$3"
14111
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    42
shift
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    43
shift
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    44
shift
44465
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    45
if [ "$TIME_CMD_TYPE" = "gnutime" ]; then
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    46
  # Escape backslashes (\) and percent chars (%). See man for GNU 'time'.
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    47
  msg=${@//\\/\\\\}
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    48
  msg=${msg//%/%%}
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    49
  "$TIME_CMD" -f "[TIME:%E] $msg" -a -o "$OUTPUT_FILE" "$@"
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    50
elif [ "$TIME_CMD_TYPE" = "flock" ]; then
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    51
  # Emulated GNU 'time' with 'flock' and 'date'.
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    52
  ts=`date +%s%3N`
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    53
  "$@"
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    54
  status=$?
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    55
  ts2=`date +%s%3N`
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    56
  millis=$((ts2 - ts))
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    57
  ms=$(($millis % 1000))
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    58
  seconds=$((millis / 1000))
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    59
  ss=$(($seconds % 60))
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    60
  minutes=$(($seconds / 60))
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    61
  mm=$(($minutes % 60))
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    62
  hh=$(($minutes / 60)):
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    63
  [ $hh != "0:" ] || hh=
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    64
  # Synchronize on this script.
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    65
  flock -w 10 "$0" printf "[TIME:${hh}${mm}:${ss}.%.2s] %s\n" $ms "$*" >> "$OUTPUT_FILE" || true
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    66
  exit $status
14111
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    67
else
44465
26fabd8abee9 8177770: Need more precise control on build system logging
asemenyuk
parents: 27595
diff changeset
    68
  "$@"
14111
2a82ecb35fc7 8000992: Update new build-infra makefiles
ohair
parents:
diff changeset
    69
fi