Revision
83126
Author
dports@macports.org
Date
2011-08-25 20:17:35 -0700 (Thu, 25 Aug 2011)

Log Message

port_binary_distributable: add OpenSSLException, which conflicts with
everything except openssl/ssleay.

Intended to be used in conjunction with a GPL license, e.g. 
`license {GPL-2+ OpenSSLException}`

Modified Paths

Diff

Modified: trunk/base/portmgr/jobs/port_binary_distributable.tcl (83125 => 83126)


--- trunk/base/portmgr/jobs/port_binary_distributable.tcl	2011-08-26 03:00:31 UTC (rev 83125)
+++ trunk/base/portmgr/jobs/port_binary_distributable.tcl	2011-08-26 03:17:35 UTC (rev 83126)
@@ -42,9 +42,19 @@
 foreach lic $good_licenses {
     set license_good($lic) 1
 }
+
+proc all_licenses_except { args } {
+    global good_licenses
+    set remaining $good_licenses
+    foreach arg $args {
+        set remaining [lsearch -inline -all -not -exact $remaining $arg]
+    }
+    return [list $remaining]
+}
+
 # keep these values sorted
 array set license_conflicts \
-    {afl {cecill gpl}
+    "afl {cecill gpl}
     agpl {apache-1 apache-1.1 cecill gpl-1 gpl-2 gplconflict noncommercial restrictive/distributable}
     apache {cecill gpl-1 gpl-2}
     apache-1 {agpl gpl}
@@ -64,11 +74,12 @@
     lgpl-3+ {gpl-1 gpl-2}
     mpl {cecill gpl}
     openssl {cecill gpl}
+    opensslexception [all_licenses_except openssl ssleay]
     php {cecill gpl}
     qpl {cecill gpl}
     restrictive/distributable {agpl cecill gpl}
     ssleay {cecill gpl}
-    zpl-1 {cecill gpl}}
+    zpl-1 {cecill gpl}"
 
 proc printUsage {} {
     puts "Usage: $::argv0 \[-hvV\] \[-t macports-tcl-path\] port-name \[variants...\]"