#!/bin/sh # Copyright (c) 1997 Wolfram Schneider , Berlin. # All rights reserved. # # pds.cgi - FreeBSD Ports download sources cgi script # print a list of source files for a port # file="$QUERY_STRING" file2="$file/Makefile" CVSROOT=/home/ncvs; export CVSROOT # set DISTDIR to a dummy directory. DISTDIR=/tmp/___pds.cgi___; export DISTDIR cat < Sources for $file

Sources for $file

EOF cvs -Q co -p $file2 | make -I /home/fenner/mk -f - bill-fetch | perl -ne 'print qq{$1
\n} if m%((http|ftp)://\S+)%' cat < EOF