#!/bin/sh

# Checks the per repository statistics page, which stays off until max-stats
# turns it on and then counts each author's commits over the last four
# periods, busiest first. A second config sets a finer max-stats so that what
# it takes out of the period selector is covered as well.

test_description='Check the statistics page'
. ./setup.sh

# The shared test config sets no max-stats, so this is what an untouched
# install does.
test_expect_success 'stats are off by default' '
	cgit_url "foo/stats" >tmp &&
	grep "Status: 404" tmp &&
	cgit_url "foo" >tmp &&
	! grep ">stats</a>" tmp
'

# Makes the given number of empty commits by the named author.
author_commits() {
	i=0 &&
	while test $i -lt $2
	do
		GIT_AUTHOR_NAME="$1" git commit --allow-empty -m "$1 $i" &&
		i=$((i + 1)) || return 1
	done
}

# The authors table counts only recent periods, so beside the 2005 commits of
# mkrepo the fixture has commits stamped now. Each author makes a different
# number of them, in the reverse of the order of their names, so the table
# has to sort by count. One of Gil's commits comes in through a merge, which
# counts for nobody. The walk releases each commit as it goes, which a commit
# read from a commit graph has to survive, so the fixture writes one.
test_expect_success 'set up a stats config' '
	mkrepo repos/pulse 2 &&
	(
		cd repos/pulse &&
		unset GIT_AUTHOR_DATE GIT_COMMITTER_DATE &&
		git checkout -b side &&
		author_commits "Gil Seven" 1 &&
		git checkout - &&
		echo ada >ada.txt &&
		git add ada.txt &&
		GIT_AUTHOR_NAME="Ada One" git commit -m "add ada.txt" &&
		author_commits "Ben Two" 2 &&
		author_commits "Cy Three" 3 &&
		author_commits "Di Four" 4 &&
		author_commits "Ed Five" 5 &&
		author_commits "Flo Six" 6 &&
		author_commits "Gil Seven" 6 &&
		GIT_AUTHOR_NAME="Mo Merger" git merge --no-ff -m merge side &&
		git commit-graph write --reachable
	) &&
	cgitrc_repo statsrc stat max-stats=year "repo.path=$PWD/repos/pulse/.git" &&
	cgitrc_repo statmaxrc stat max-stats=month "repo.path=$PWD/repos/pulse/.git"
'

test_expect_success 'stats tab appears when enabled' '
	cgit_rc statsrc "url=stat/" >tmp &&
	grep ">stats</a>" tmp
'

test_expect_success 'stats page renders the authors table' '
	cgit_ok statsrc "url=stat/stats/" >tmp &&
	grep "<h2>Commits per author per week</h2>" tmp
'

# Only the sums are compared, since a run that crosses into a new week moves
# the commits from one column to the next.
test_expect_success 'each author is counted and the busiest comes first' '
	cgit_ok statsrc "url=stat/stats/" >tmp &&
	sed -n "s/^<tr><td class=.left.>\([^<]*\)<\/td>.*<td class=.sum.>\([0-9]*\)<\/td><\/tr>$/\1 \2/p" tmp >actual &&
	test_write_lines "Gil Seven 7" "Flo Six 6" "Ed Five 5" "Di Four 4" \
		"Cy Three 3" "Ben Two 2" "Ada One 1" >expect &&
	test_cmp expect actual &&
	grep "^<tr><td class=.left.>Ada One</td>\(<td>[0-9]*</td>\)\{4\}<td class=.sum.>1</td></tr>$" tmp &&
	grep "^<tr><td class=.total.>Total</td>\(<td class=.sum.>[0-9]*</td>\)\{4\}<td class=.sum.>28</td></tr>$" tmp
'

test_expect_success 'a merge counts for nobody' '
	cgit_ok statsrc "url=stat/stats/" >tmp &&
	grep "<td class=.left.>Gil Seven</td>.*<td class=.sum.>7</td>" tmp &&
	! grep ">Mo Merger<" tmp
'

test_expect_success 'the authors past the row count share one row' '
	cgit_ok statsrc "url=stat/stats/&ofs=1" >tmp &&
	sed -n "s/^<tr><td class=.left.>\([^<]*\)<\/td>.*<td class=.sum.>\([0-9]*\)<\/td><\/tr>$/\1 \2/p" tmp >actual &&
	test_write_lines "Gil Seven 7" "Others (6) 21" >expect &&
	test_cmp expect actual
'

# The table scrolls sideways on a narrow window with nothing in it a keyboard
# can reach, so the table itself takes focus.
test_expect_success 'the authors table can take keyboard focus' '
	grep "<table class=.stats. tabindex=.0. aria-label=.Commits per author.>" tmp
'

test_expect_success 'stat options sit above the content' '
	tr -d "\n" <tmp | sed "s/<h2>Commits per author.*//" | grep "cgit-panel"
'

test_expect_success 'stats below a path stay a normal page' '
	cgit_rc statsrc "url=stat/stats/file-1" >tmp &&
	grep "Status: 200" tmp &&
	grep "<h2>Commits per author" tmp
'

test_expect_success 'max-stats=year offers all four periods' '
	cgit_rc statsrc "url=stat/stats/" >tmp &&
	grep "<option value=.w." tmp &&
	grep "<option value=.m." tmp &&
	grep "<option value=.q." tmp &&
	grep "<option value=.y." tmp
'

test_expect_success 'max-stats bounds the selectable periods' '
	cgit_rc statmaxrc "url=stat/stats/&period=y" >tmp &&
	grep "Statistics type disabled" tmp &&
	cgit_rc statmaxrc "url=stat/stats/" >tmp &&
	! grep "<option value=.q." tmp
'

# Each period buckets commits and labels its columns its own way, so every one
# gets a page of its own here.
test_expect_success 'every period renders its own columns' '
	cgit_rc statsrc "url=stat/stats/&period=m" >tmp &&
	grep -E "<th[^>]*>[A-Z][a-z][a-z] [0-9]{4}</th>" tmp &&
	cgit_rc statsrc "url=stat/stats/&period=q" >tmp &&
	grep -E "<th[^>]*>Q[1-4] [0-9]{4}</th>" tmp &&
	cgit_rc statsrc "url=stat/stats/&period=y" >tmp &&
	grep -E "<th[^>]*>[0-9]{4}</th>" tmp
'

# The yearly window opens on the first of January three years back. cgit reads
# the real clock, so the two commits sit either side of midnight on that day.
test_expect_success 'the window opens at midnight on its first day' '
	first=$(($(date -u +%Y) - 3)) &&
	test_create_repo repos/edge &&
	(
		cd repos/edge &&
		GIT_AUTHOR_NAME="Too Early" \
		GIT_AUTHOR_DATE="$((first - 1))-12-31 23:59:59 +0000" \
		GIT_COMMITTER_DATE="$((first - 1))-12-31 23:59:59 +0000" \
			git commit --allow-empty -m before &&
		GIT_AUTHOR_NAME="Early Bird" \
		GIT_AUTHOR_DATE="$first-01-01 00:00:00 +0000" \
		GIT_COMMITTER_DATE="$first-01-01 00:00:00 +0000" \
			git commit --allow-empty -m first
	) &&
	cgitrc_repo edgerc edge max-stats=year &&
	cgit_rc edgerc "url=edge/stats/&period=y" >tmp &&
	grep ">Early Bird<" tmp &&
	! grep ">Too Early<" tmp
'

# A path starting with a colon would reach git as pathspec magic, which the
# log, the feed and the patch page refuse as well.
test_expect_success 'a path with pathspec magic is refused' '
	cgit_rc statsrc "url=stat/stats/%3A%28icase%29FILE-1" >tmp &&
	grep "^Status: 400" tmp &&
	cgit_rc statsrc "url=stat/stats/file-1" >tmp &&
	grep "^Status: 200" tmp
'

test_done