Author: baggins                      Date: Tue Apr 25 13:47:36 2006 GMT
Module: SPECS                         Tag: HEAD
---- Log message:
- add -sd (--source-distfiles) and -sdp (--source-distfiles-paths) options
  to list sources/patches available from distfiles

---- Files affected:
SPECS:
   builder (1.414 -> 1.415) 

---- Diffs:

================================================================
Index: SPECS/builder
diff -u SPECS/builder:1.414 SPECS/builder:1.415
--- SPECS/builder:1.414 Tue Apr 25 01:26:51 2006
+++ SPECS/builder       Tue Apr 25 15:47:31 2006
@@ -257,6 +257,13 @@
 -FRB, --force-remove-build-requires
                     - remove all you fetched with -R or --fetch-build-requires
                       remember, this option works without confirmation,
+-sd, --source-distfiles - list sources available from distfiles (intended for 
offline
+                      operations; does not work when Icon field is present
+                      but icon file is absent),
+-sdp, --source-distfiles-paths - list sources available from distfiles -
+                      paths relative to distfiles directory (intended for 
offline
+                      operations; does not work when Icon field is present
+                      but icon file is absent),
 -sf, --source-files - list sources - bare filenames (intended for offline
                       operations; does not work when Icon field is present
                       but icon file is absent),
@@ -645,14 +652,19 @@
        fi
 }
 
+distfiles_path ()
+{
+       echo "by-md5/$(src_md5 "$1" | sed -e 
's|^\(.\)\(.\)|\1/\2/&|')/$(basename "$1")"
+}
+
 distfiles_url ()
 {
-       echo "$PROTOCOL$DISTFILES_SERVER/distfiles/by-md5/$(src_md5 "$1" | sed 
-e 's|^\(.\)\(.\)|\1/\2/&|')/$(basename "$1")"
+       echo "$PROTOCOL$DISTFILES_SERVER/distfiles/$(distfiles_path "$1")"
 }
 
 distfiles_attic_url ()
 {
-       echo "$PROTOCOL$ATTICDISTFILES_SERVER/distfiles/Attic/by-md5/$(src_md5 
"$1" | sed -e 's|^\(.\)\(.\)|\1/\2/&|')/$(basename "$1")"
+       echo "$PROTOCOL$ATTICDISTFILES_SERVER/distfiles/Attic/$(distfiles_path 
"$1")"
 }
 
 good_md5 ()
@@ -1732,6 +1744,12 @@
                -FRB | --force-remove-build-requires)
                        REMOVE_BUILD_REQUIRES="force"
                        shift ;;
+               -sd | --sources-distfiles)
+                       COMMAND="list-sources-distfiles"
+                       shift ;;
+               -sdp | --sources-distfiles-paths)
+                       COMMAND="list-sources-distfiles-paths"
+                       shift ;;
                -sf | --sources-files)
                        COMMAND="list-sources-files"
                        shift ;;
@@ -1981,6 +1999,32 @@
                SAPS="$SOURCES $PATCHES"
                for SAP in $SAPS ; do
                         echo $SOURCE_DIR/$(echo $SAP | awk '{gsub(/.*\//,"") ; 
print }')
+               done
+               ;;
+       "list-sources-distfiles-paths" )
+               init_builder
+               NOCVSSPEC="yes"
+               DONT_PRINT_REVISION="yes"
+               get_spec
+               parse_spec
+               SAPS="$SOURCES $PATCHES"
+               for SAP in $SAPS ; do
+                       if [ -n "$(src_md5 "$SAP")" ]; then
+                               distfiles_path "$SAP"
+                       fi
+               done
+               ;;
+       "list-sources-distfiles" )
+               init_builder
+               NOCVSSPEC="yes"
+               DONT_PRINT_REVISION="yes"
+               get_spec
+               parse_spec
+               SAPS="$SOURCES $PATCHES"
+               for SAP in $SAPS ; do
+                       if [ -n "$(src_md5 "$SAP")" ]; then
+                               distfiles_url "$SAP"
+                       fi
                done
                ;;
        "init_rpm_dir")
================================================================

---- CVS-web:
    http://cvs.pld-linux.org/SPECS/builder?r1=1.414&r2=1.415&f=u

_______________________________________________
pld-cvs-commit mailing list
[email protected]
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit

Reply via email to