Mercurial > repo

comparison bin/pastelog @ 0:e037173e0012

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Initial import.
author HackBot
date Thu, 16 Feb 2012 19:42:32 +0000
parents
children 5c453217583b
comparison
equal deleted inserted replaced
-1:000000000000 0:e037173e0012
1 #!/bin/sh
2 cd /var/irclogs/_esoteric
3
4 pasterandom() {
5 if [ "$1" -gt 150 ]; then
6 echo "No."
7 exit
8 fi
9 for i in $(seq "$1"); do
10 file=$(shuf -en 1 ????-??-??.txt)
11 echo "$file:$(shuf -n 1 $file)"
12 done | paste
13 }
14
15 if [ "$1" ]; then
16 if expr "$1" + 0 >/dev/null 2>&1; then
17 pasterandom "$1"
18 else
19 lines=$(grep -P -i -- "$1" ????-??-??.txt | head -n 301)
20 {
21 echo "$lines" | head -n 300
22 [ $(echo "$lines" | wc -l) -eq 301 ] && echo "[too many lines; stopping]"
23 } | paste
24 fi
25 else
26 pasterandom 40
27 fi
28