- initial version,

Changed files:
    fetchsrc_request -> 1.1

diff --git a/fetchsrc_request b/fetchsrc_request
new file mode 100644 (file)
index 0000000..5f2de31
--- /dev/null
+++ b/fetchsrc_request
@@ -0,0 +1,43 @@
+#!/bin/sh
+# $Id$
+#
+# Sending via 
+#VIA="localhost"
+VIA="/usr/bin/sendmail"
+#
+# DISTFILES EMAIL
+DMAIL="distfiles@pld-ppc.org"
+#
+# CVS LOGIN or fill it by hand :)
+LOGIN=`cat CVS/Root | awk -F: '{ print $3; }' | perl -pi -e "s/@.+//"`
+#LOGIN="djrzulf"
+#
+# HOST
+HOST=`hostname -f`
+#
+# functions
+
+usage()
+{
+       echo "\
+Usage: fetchsrc_request file.spec [BRANCH]
+"
+}
+
+#------------------
+# main()
+if [ "$#" = 0 ]; then
+       usage;
+       exit 1
+fi
+if [ "$2" != 0 ]; then
+       BRANCH=`cat CVS/Entries | grep $1 | awk -F/ '{print $6;}' | cut -c 2-`
+else
+       BRANCH="HEAD"
+fi
+
+MAIL="To: $DMAIL\nFrom: $LOGIN <$LOGIN@$HOST>\nSubject: cvs to df notify\nX-CVS-Module: SPECS\nX-distfiles-request: yes\nX-Login: $LOGIN\nX-Spec: $1\nX-Branch: $BRANCH\nX-Flags: cvs-notify\n.\n
+"
+
+echo $MAIL
+