. /sys/lib/shithub/config.rc nl=' ' fn htcat { sed ' s/&/\&/g; s//\>/g; s/"/\"/g; s/''/\'/g ' $* } fn resolveref { if(~ $refname HEAD) echo $refname if not if(test -d $gitfs/branch/heads/$refname/tree) echo branch/heads/$refname if not if(test -d $gitfs/object/$refname/tree) echo object/$refname if not status='bad ref' } fn repons { mntgen mntgen /mnt/mnt dir=/mnt/r.$repo repodir=$dir/.git gitfs=/mnt/$dir/.git/fs ramfs -m /mnt/tmp bind /bin /mnt/bin bind /rc /mnt/rc bind /sys /mnt/sys bind -c /env /mnt/env bind /dev /mnt/dev bind $1/$2 $dir bind /mnt / cd $dir git/fs mntgen /mnt/scratch rfork m } fn formatcommit { puser=$1 prepo=$2 phash=$3 message=`{htcat $gitfs/object/$phash/msg | sed 1q} date=`{date -f 'YYYY/MM/DD hh:mm' `{mtime $gitfs/object/$phash/msg | awk '{print $1}'}} author=`"{htcat $gitfs/object/$phash/author} shorthash=`{echo $phash | awk '{print substr($0, 0, 8)}'} if (test -f $gitfs/object/$phash/committer) committer=`"{htcat $gitfs/object/$phash/committer} echo '
'$shorthash' – '$author' authored' if (! ~ $#committer 0 && ! ~ $committer $author) echo ' and '^$committer^' committed' echo ' on '$"date' 
'$"message'
' } fn shortlog { puser=$1 prepo=$2 pref=$3 pcount=$4 d=`{pwd} commithash=`{cat $gitfs/$pref/hash | sed 1q} count=() git/log -sc $commithash | while(commithash=`{read} && ! ~ $#count $pcount){ count=($count 1) formatcommit $puser $prepo $commithash(1) echo '
' } if(! ~ $#commithash 0) echo 'Next' cd $d } fn difftohtml { awk ' function printpre(id, text) { printf "
%s
", id, text } BEGIN { started = 0; diff = 0; } /^---$/ { diff = 1; next } /^diff .*$/ && diff && !started { started = 1; next } /^\+\+\+ .*$/ && started { printpre("files", $0); next } /^--- .*$/ && started { printpre("files", $0); next } /^@@ .*$/ && started { printpre("sep", $0); next } /^\+.*$/ && started { printpre("add", $0); next } /^-.*$/ && started { printpre("del", $0); next } started { printpre("ctx", $0); next } ' } fn prelude { puser=$1 prepo=$2 echo ' ' if(! ~ $puser '') echo '' echo ' '$title': '$"prepo' ' } fn user_prelude { puser=$1 prepo=$2 phash=$3 prelude $puser $prepo echo '

'$title': '$prepo'

' }