mirror of
https://git.FreeBSD.org/ports.git
synced 2024-11-29 01:13:08 +00:00
73 lines
2.8 KiB
Bash
Executable File
73 lines
2.8 KiB
Bash
Executable File
#!/bin/sh
|
|
|
|
of=extras.html.new
|
|
|
|
# delete .new file if it is more than a day old
|
|
find $of -mtime +1 -delete 2>/dev/null
|
|
|
|
if [ -f $of ]; then exit; fi
|
|
|
|
if [ -e .stamp -a $(echo $(find . -newer .stamp -type f -name '*.log' 2>/dev/null | wc -l)) = "0" ]; then exit; fi
|
|
|
|
echo "<html><head><title>List of files and directories that do not match their mtree description</title>" >$of
|
|
echo "<h1>List of files and directories that do not match their mtree description</h1>" >>$of
|
|
echo "</head><body>" >>$of
|
|
|
|
touch .stamp
|
|
|
|
#find . -name '*.log' | xargs grep -l '^list of extra files and directories' | xargs-exec sed -n -e '/^checking installed files/d' -e 's:^extra[:] :{} :p' -e 's:\(.*\) extra$:{} \1:p' '{}' ';' | sort | sed -e 's/^..//' -e 's/\.log//' | awk '{print $1 " " $2}' > .tmp
|
|
find . -name '*.log' | xargs grep -l '^list of extra files and directories' | sort | sed -e 's/^..//' > .tmp
|
|
if [ $(echo $(cat .tmp | wc -l)) = 0 ]; then
|
|
echo "No extra files (yet)" >> $of
|
|
else
|
|
set $(cat .tmp)
|
|
num=$#
|
|
if [ -s cvsdone ]; then
|
|
echo "(cvs update finished at: $(cat cvsdone))<br>" >> $of
|
|
fi
|
|
echo "(timestamp of newest log: $(ls -rtTl | grep 'log$' | tail -1 | awk '{printf("%s %s %s %s\n",$6,$7,$8,$9)}'))<br><br>" >> $of
|
|
echo "<table border=1>" >>$of
|
|
echo "<tr><th>Log</th><th>Aff.</th><th>Size</th><th>Repository</th><th>Maintainer</th><th>Pathname</th></tr>" >>$of
|
|
while [ $# -gt 0 ]; do
|
|
log=$(echo $1 | basename $1 .log)
|
|
echo -n "<tr><td valign=\"top\">" >>$of
|
|
echo -n "<a name=\"$log.log\"></a>" >> $of
|
|
echo -n "<a href=\"$log.log\">" >>$of
|
|
echo -n $log >>$of
|
|
echo -n "</a>" >>$of
|
|
echo -n "</td><td align=right valign=\"top\">" >>$of
|
|
affected=$(($(grep -cF $log < INDEX) - 1))
|
|
if [ $affected != 0 ]; then echo -n $affected >>$of; fi
|
|
echo -n "</td><td align=right valign=\"top\">" >>$of
|
|
size=$(/bin/ls -sk $log.log | awk '{print $1}')
|
|
echo -n "$size KB" >>$of
|
|
echo -n "</td><td valign=\"top\">" >>$of
|
|
dir=$(sed -n -e '3p' $log.log | awk '{print $4}' | sed -e 's,^/[^/]*/[^/]*/,,')
|
|
echo -n "<a href=\"http://www.FreeBSD.org/cgi/cvsweb.cgi/ports/$dir\">$dir</a>" >>$of
|
|
echo -n "</td><td valign=\"top\">" >>$of
|
|
maint=$(sed -n -e '4p' $log.log | awk '{print $3}')
|
|
maints="$maints $maint"
|
|
echo -n "<a href=\"mailto:$maint\">$maint</a>" >>$of
|
|
echo "</td><td valign=\"top\">" >>$of
|
|
for file in $(cat $log.log | sed -e '1,/^list of extra files and directories/d' -e '/^=======/,$d' -e '/^ /d' -e 's/^extra: //' -e 's/^missing: //' -e 's/://' | awk '{print $1}'); do
|
|
echo "$file<br>" >>$of
|
|
done
|
|
echo "</td></tr>" >>$of
|
|
shift
|
|
done
|
|
echo "</table><br>" >> $of
|
|
echo "$num errors<br>" >> $of
|
|
fi
|
|
|
|
rm .tmp
|
|
|
|
echo "<hr>" >> $of
|
|
echo "<a href=\"../\">back to top</a>" >> $of
|
|
|
|
echo "</body></html>" >>$of
|
|
|
|
mv -f $of extras.html
|
|
|
|
echo $maints | sed -e 's/ /\
|
|
/g' | sort -fu > maintainers
|