]> git.plutz.net Git - busy/blob - Subversion.page
honor login status when directing to news script
[busy] / Subversion.page
1 #!/bin/zsh
2 url="$(egrep -o '(^|&)(i=).+(&|$)' <<<"${QUERY_STRING}" |sed -r 's:^&?i=::;s:&.*::;s:\+: :g;s:%:\\x:g')"
3 url="$(echo -e "${url}" |sed 's:\t: :g;s:\r::g;s:\\:\\\\:g' |head -n1)"
4 rev="$(egrep -o '(^|&)(r=)[0-9]+(&|$)' <<<"${QUERY_STRING}" |tr -d 'r=&')"
5
6 baseuri=$(egrep '^repo=.*$' project.meta |cut -d= -f2-)
7 lastrev=$(svn info "$baseuri" |egrep '^Revision:' |cut -d\  -f2)
8 [ -z "$rev" ] && rev="$lastrev"
9
10 cat <<SVNEND
11   <div id="LEFT">
12     <h1>Path:</h1>
13     <a href='?p=Subversion&amp;i=/&amp;r=$rev'>[root]</a> 
14 SVNEND
15 tmp=$url
16 until [ -z "$tmp" -o "$tmp" = // ]; do
17   echo "<a href='?p=Subversion&amp;i=$tmp&amp;r=$rev'>/$(basename "$tmp")</a> "
18   tmp=$(dirname "$tmp")/
19 done |tac
20 echo '<hr><h1>Revisions:</h1>'
21 for i in {1.."$lastrev"}; do
22   echo "<a href='?p=Subversion&amp;i=$url&amp;r=$i'>$i</a>"
23 done
24
25 cat <<SVNEND
26   </div>
27
28   <div id="RIGHT"></div>
29
30   <div id="MAIN">
31   <div class='wikitext'><h1>$(basename "$url"), Revision "$rev":</h1>
32 SVNEND
33 if (egrep -q '^(.*/|)$' <<<"$url"); then
34   svn ls -r "$rev" "${baseuri}/${url}" |sed -r "s:^.*$:<a href='?p=Subversion\&amp;i=$url/&\&amp;r=$rev'>&</a><br>:g"
35   echo '</div>'
36 else
37   lang=$(source-highlight --lang-list |cut -d\  -f1 |grep -x "$(sed 's:.*\.::g' <<<"$url")" || echo sh)
38   grep -q '\.' <<<"$url" || lang=txt
39   svn cat -r "$rev" "${baseuri}/${url}" |source-highlight -s "$lang" #|sed 's:<:\&lt;:g;s:>:\&gt;:g;'
40 fi
41 cat <<SVNEND
42   </div></div>
43 SVNEND