about summary refs log tree commit diff
path: root/third_party/git/t/t0211/scrub_perf.perl
diff options
context:
space:
mode:
authorVincent Ambo <mail@tazj.in>2021-09-21T10·03+0300
committerVincent Ambo <mail@tazj.in>2021-09-21T11·29+0300
commit43b1791ec601732ac31195df96781a848360a9ac (patch)
treedaae8d638343295d2f1f7da955e556ef4c958864 /third_party/git/t/t0211/scrub_perf.perl
parent2d8e7dc9d9c38127ec4ebd13aee8e8f586a43318 (diff)
chore(3p/git): Unvendor git and track patches instead r/2903
This was vendored a long time ago under the expectation that keeping
it in sync with cgit would be easier this way, but it has proven not
to be a big issue.

On the other hand, a vendored copy of git is an annoying maintenance
burden. It is much easier to rebase the single (dottime) patch that we
have.

This removes the vendored copy of git and instead passes the git
source code to cgit via `pkgs.srcOnly`, which includes the applied
patch so that cgit can continue rendering dottime.

Change-Id: If31f62dea7ce688fd1b9050204e9378019775f2b
Diffstat (limited to 'third_party/git/t/t0211/scrub_perf.perl')
-rw-r--r--third_party/git/t/t0211/scrub_perf.perl76
1 files changed, 0 insertions, 76 deletions
diff --git a/third_party/git/t/t0211/scrub_perf.perl b/third_party/git/t/t0211/scrub_perf.perl
deleted file mode 100644
index 351af7844ed9..000000000000
--- a/third_party/git/t/t0211/scrub_perf.perl
+++ /dev/null
@@ -1,76 +0,0 @@
-#!/usr/bin/perl
-#
-# Scrub the variable fields from the perf trace2 output to
-# make testing easier.
-
-use strict;
-use warnings;
-
-my $qpath = '\'[^\']*\'|[^ ]*';
-
-my $col_depth=0;
-my $col_thread=1;
-my $col_event=2;
-my $col_repo=3;
-my $col_t_abs=4;
-my $col_t_rel=5;
-my $col_category=6;
-my $col_rest=7;
-
-# This code assumes that the trace2 data was written with bare
-# turned on (which omits the "<clock> <file>:<line> | <parents>"
-# prefix.
-
-while (<>) {
-    my @tokens = split /\|/;
-
-    foreach my $col (@tokens) { $col =~ s/^\s+|\s+$//g; }
-
-    if ($tokens[$col_event] =~ m/^start/) {
-	# The 'start' message lists the contents of argv in $col_rest.
-	# On some platforms (Windows), argv[0] is *sometimes* a canonical
-	# absolute path to the EXE rather than the value passed in the
-	# shell script.  Replace it with a placeholder to simplify our
-	# HEREDOC in the test script.
-	my $argv0;
-	my $argvRest;
-	$tokens[$col_rest] =~ s/^($qpath)\W*(.*)/_EXE_ $2/;
-    }
-    elsif ($tokens[$col_event] =~ m/cmd_path/) {
-	# Likewise, the 'cmd_path' message breaks out argv[0].
-	#
-	# This line is only emitted when RUNTIME_PREFIX is defined,
-	# so just omit it for testing purposes.
-	# $tokens[$col_rest] = "_EXE_";
-	goto SKIP_LINE;
-    }
-    elsif ($tokens[$col_event] =~ m/child_exit/) {
-	$tokens[$col_rest] =~ s/ pid:\d* / pid:_PID_ /;
-    }
-    elsif ($tokens[$col_event] =~ m/data/) {
-	if ($tokens[$col_category] =~ m/process/) {
-	    # 'data' and 'data_json' events containing 'process'
-	    # category data are assumed to be platform-specific
-	    # and highly variable.  Just omit them.
-	    goto SKIP_LINE;
-	}
-    }
-
-    # t_abs and t_rel are either blank or a float.  Replace the float
-    # with a constant for matching the HEREDOC in the test script.
-    if ($tokens[$col_t_abs] =~ m/\d/) {
-	$tokens[$col_t_abs] = "_T_ABS_";
-    }
-    if ($tokens[$col_t_rel] =~ m/\d/) {
-	$tokens[$col_t_rel] = "_T_REL_";
-    }
-
-    my $out;
-
-    $out = join('|', @tokens);
-    print "$out\n";
-
-  SKIP_LINE:
-}
-
-