hint on svn externals in subversion browser

[busy] / pages / Subversion.sh

diff --git a/pages/Subversion.sh b/pages/Subversion.sh
index fa86d8b17140fe7f923cb5fc6d7b359fd17b60e5..5692d5671ad6b48fdfe350fd6345978f703e355a 100755 (executable)
--- a/pages/Subversion.sh
+++ b/pages/Subversion.sh
@@ -24,6 +24,48 @@ baseuri=$(sed -rn 's:^svnRepo=(.*)$:\1:p' project.meta)
 lastrev=$(svn info "$baseuri" |sed -rn 's;^Revision: *([0-9]+);\1;p')
 [ -z "$rev" ] && rev="$lastrev"
 
+svn_path(){
+  tmp="$url" 
+  until [ -z "$tmp" -o "$tmp" = '//' -o "$tmp" = './' ]; do
+    echo "<a href='?p=Subversion&amp;i=$tmp&amp;r=$rev'>/$(basename "$tmp")</a> "
+    tmp="$(dirname "$tmp")/"
+  done \
+  | tac
+}
+
+svn_revisions(){
+  for i in {1.."$lastrev"}; do
+    echo "<a href='?p=Subversion&amp;i=$url&amp;r=$i'>$i</a>"
+  done
+}
+
+svn_changelog(){
+  svn log "${baseuri}/${url}" \
+  | sed -rn '2,${s:^-+$:</div>:g;
+                 s:^r([0-9]+) \| ([a-zA-Z0-9]+) \| ([0-9: -]+) .+$:<div class="changelog"><h2>Revision \1 by \2<br>at \3</h2>:g;p}'
+}
+
+svn_showurl(){
+  if (egrep -q '^(.*/|)$' <<<"$url"); then
+    # we are showing a directory
+    svn propget svn:externals -r "$rev" "${baseuri}/${url}" \
+    | sed -rn "s;^([^ ]+) (.+)$;<span class='extern'>\2/</span> [external include from <a href='\1'>\1</a>]<br>;p"
+
+    svn ls -r "$rev" "${baseuri}/${url}" \
+    | sed -r "s:^.*$:<a href='?p=Subversion\&amp;i=$url/&\&amp;r=$rev'>&</a><br>:g"
+  else
+    # we are showing a file
+    echo -E "$url" |egrep -vq '\.' && \
+       lang=txt \
+    || lang=$(
+         source-highlight --lang-list \
+         |  grep -o "^${url##*.} " || echo sh
+       )
+    svn cat -r "$rev" "${baseuri}/${url}" \
+    | source-highlight -s "$lang"
+  fi
+}
+
 case "$1" in
   title)
     echo "Code"