[subversion-commit] SVN tetex-base commit + diffs: r1349 - tetex-base/trunk/debian

[Frank Küster]

Author: frank
Date: 2006-05-12 11:15:25 +0000 (Fri, 12 May 2006)
New Revision: 1349

Added:
   tetex-base/trunk/debian/searchbase35
Log:
add script to search for (font) files on CTAN

Added: tetex-base/trunk/debian/searchbase35
===================================================================
--- tetex-base/trunk/debian/searchbase35	2006-05-11 18:30:02 UTC (rev 1348)
+++ tetex-base/trunk/debian/searchbase35	2006-05-12 11:15:25 UTC (rev 1349)
@@ -0,0 +1,47 @@
+#!/bin/bash
+
+package=$1
+otherlocation=$2
+outfile=$3
+
+CTANmirror="ftp://cam.ctan.org/tex-archive/"
+
+filelist=../../CTAN.FILES.byname
+
+if [ ! -f $filelist ]; then
+  wget -O $filelist ${CTANmirror}FILES.byname
+fi
+
+files=`grep '^[[:space:]]*texmf' debian/tpm/courier.tpm`
+
+wgetFile="./wgetFile" # insecure, but who cares?
+
+exec > $outfile
+
+for longfile in $files; do
+  file=`basename $longfile`
+#   queryURL="http://www.tex.ac.uk/cgi-bin/ctan-index?$file"
+#   wget -O $wgetFile $queryURL
+  queryResult=`grep $file $filelist | sed -e "s at .*| @@"` 
+  resultLines=`echo $queryResult | wc -w`
+
+  if [ "$resultLines" -eq 1 ]; then
+    echo "$file: $queryResult" 
+  elif [ "$resultLines" -eq 0 ]; then
+    if [ -f $otherlocation/${longfile#texmf*/} ]; then
+      echo "$file: found in $otherlocation"
+    else
+      echo "$longfile: No hits"
+    fi
+  else
+    echo "File: $file multiple hits:"
+    echo "$queryResult"
+  fi
+done
+
+grep "found in" $outfile > $outfile.packed
+grep "No hits" $outfile > $outfile.nohits
+sed -e "s/.*multiple hits.*//" $outfile | grep -v ":" > $outfile.multiple
+grep ":" $outfile | egrep -v "hits|found in" > $outfile.single
+
+


Property changes on: tetex-base/trunk/debian/searchbase35
___________________________________________________________________
Name: svn:executable
   + *