Changeset 18745 for trunk/base

Timestamp:

Jul 26, 2006, 5:29:50 AM (18 years ago)

Author:

pguyot (Paul Guyot)

Message:

New livecheck check: sourceforge.
By default, the livecheck check is sourceforge if the project is obviously (looking at master_sites) hosted as a sourceforge project. Otherwise, it's freshmeat (which used to be the default but the information there isn't always very fresh).

Location:

trunk/base

Files:

• doc/portfile.7 (modified) (4 diffs)
• src/port1.0/portlivecheck.tcl (modified) (5 diffs)

trunk/base/doc/portfile.7

@@ -904 +904 @@
 .Em freshmeat
 (uses the date_updated tag of the freshmeat XML file),
+.Em sourceforge
+(uses the version of the latest file release of the project),
 .Em moddate
 (uses the modification date of some URL resource),
@@ -920 +922 @@
 .Sy Default:
 .Em freshmeat
+or
+.Em sourceforge
+if the master_sites is sourceforge.
 .br
 .Sy Values:
-.Em freshmeat moddate regex regexm md5 none
+.Em freshmeat sourceforge moddate regex regexm md5 none
 .It Ic livecheck.name
-Name of the project for live checks (used for freshmeat-based checks).
+Name of the project for live checks (used for freshmeat and sourceforge checks).
 .br
 .Sy Type:
@@ -931 +936 @@
 .Sy Default:
 .Em ${name}
+or the sourceforge project name if it can be guessed by looking at the master_sites.
 .It Ic livecheck.version
 Version of the project for live checks (used for regex-based checks).
@@ -949 +955 @@
 or
 .Em http://freshmeat.net/projects-xml/${livecheck.name}/${livecheck.name}.xml
+or
+.Em http://sourceforge.net/export/rss2_projfiles.php?project=${livecheck.name}
 .It Ic livecheck.regex
 Regular expression to parse the resource for regex checks.

trunk/base/src/port1.0/portlivecheck.tcl

@@ -2 +2 @@
 # portlivecheck.tcl
 #
-# $Id: portlivecheck.tcl,v 1.8 2006/07/25 08:05:26 pguyot Exp $
+# $Id: portlivecheck.tcl,v 1.9 2006/07/26 05:29:50 pguyot Exp $
 #
 # Copyright (c) 2005-2006 Paul Guyot <pguyot@kallisys.net>,
@@ -48 +48 @@
 # defaults
 default livecheck.url {$homepage}
-default livecheck.check freshmeat
+default livecheck.check default
 default livecheck.md5 ""
 default livecheck.regex ""
-default livecheck.name {$name}
+default livecheck.name default
 default livecheck.version {$version}
 
@@ -57 +57 @@
         global livecheck.url livecheck.check livecheck.md5 livecheck.regex livecheck.name livecheck.version
         global homepage portname portpath workpath
+        global master_sites name
         
         set updated 0
@@ -67 +68 @@
         ui_debug "Port (livecheck) version is ${livecheck.version}"
 
+        # Determine the default type depending on the mirror.
+        if {"${livecheck.check}" == "default"} {
+                set sourceforge_projectname ${name}
+                if {[regexp {sourceforge:(.+)} $master_sites tag]} {
+                        if {"${livecheck.name}" == "default"} {
+                                set livecheck.name $tag
+                        }
+                        set livecheck.check sourceforge
+                } elseif {"$master_sites" == "sourceforge"} {
+                        set livecheck.check sourceforge
+                } else {
+                        set livecheck.check freshmeat
+                }
+        }
+        if {"${livecheck.name}" == "default"} {
+                set livecheck.name $name
+        }
+
         # Perform the check depending on the type.
         if {"${livecheck.check}" == "freshmeat"} {
@@ -74 +93 @@
                 if {"${livecheck.regex}" == ""} {
                         set livecheck.regex "<latest_release_version>(.*)</latest_release_version>"
+                }
+                set livecheck.check "regex"
+        } elseif {"${livecheck.check}" == "sourceforge"} {
+                if {![info exists homepage] || [string equal "${livecheck.url}" "${homepage}"]} {
+                        set livecheck.url "http://sourceforge.net/export/rss2_projfiles.php?project=${livecheck.name}"
+                }
+                if {"${livecheck.regex}" == ""} {
+                        set livecheck.regex "<title>${livecheck.name} (.*) released.*</title>"
                 }
                 set livecheck.check "regex"