dep-selector-libgecode 1.0.0.alpha.0

data/ext/libgecode3/vendor/gecode-3.7.3/misc/genchangelog.perl

@@ -0,0 +1,249 @@
+#!/usr/bin/perl
+#
+#  Main authors:
+#     Christian Schulte <schulte@gecode.org>
+#
+#  Contributing authors:
+#     Mikael Lagerkvist <lagerkvist@gecode.org>
+#
+#  Copyright:
+#     Christian Schulte, 2005
+#     Mikael Lagerkvist, 2008
+#
+#  Last modified:
+#     $Date: 2009-09-30 21:49:28 +1000 (Wed, 30 Sep 2009) $ by $Author: tack $
+#     $Revision: 9782 $
+#
+#  This file is part of Gecode, the generic constraint
+#  development environment:
+#     http://www.gecode.org
+#
+#  Permission is hereby granted, free of charge, to any person obtaining
+#  a copy of this software and associated documentation files (the
+#  "Software"), to deal in the Software without restriction, including
+#  without limitation the rights to use, copy, modify, merge, publish,
+#  distribute, sublicense, and/or sell copies of the Software, and to
+#  permit persons to whom the Software is furnished to do so, subject to
+#  the following conditions:
+#
+#  The above copyright notice and this permission notice shall be
+#  included in all copies or substantial portions of the Software.
+#
+#  THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+#  EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+#  MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+#  NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+#  LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+#  OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+#  WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#
+#
+
+#
+# Compile changelog
+#
+
+$first   = 1;
+$version = "";
+$moreinfocnt = 1;
+$info    = "";
+
+$modclear{"kernel"} = "Kernel";
+$modclear{"search"} = "Search engines";
+$modclear{"int"} = "Finite domain integers";
+$modclear{"set"} = "Finite integer sets";
+$modclear{"cpltset"} = "Finite integer sets with complete representation";
+$modclear{"minimodel"} = "Minimal modeling support";
+$modclear{"graph"} = "\%Graph constraints";
+$modclear{"scheduling"} = "Scheduling constraints";
+$modclear{"driver"} = "Script commandline driver";
+$modclear{"iter"} = "Range and value iterators";
+$modclear{"support"} = "Support algorithms and datastructures";
+$modclear{"example"} = "\%Example scripts";
+$modclear{"test"} = "Systematic tests";
+$modclear{"gist"} = "Gist";
+$modclear{"flatzinc"} = "Gecode/FlatZinc";
+$modclear{"other"} = "General";
+
+$whatclear{"bug"} = "Bug fixes";
+$whatclear{"performance"} = "Performance improvements";
+$whatclear{"documentation"} = "Documentation fixes";
+$whatclear{"new"} = "Additions";
+$whatclear{"removed"} = "Removals";
+$whatclear{"change"} = "Other changes";
+
+$rankclear{"minor"} = "minor";
+$rankclear{"major"} = "major";
+
+@modorder = ("kernel","search","int","set","cpltset","scheduling",
+	     "graph","minimodel","driver",
+	     "iter","support","example","test","gist","flatzinc","other");
+
+@whatorder = ("new","removed","change","bug","performance","documentation");
+
+foreach $mod (@modorder) {
+  $hastext{$mod} = 0;
+  foreach $what (@whatorder) {
+    $text{"$mod-$what"} = "";
+  }
+}
+
+$versions = "";
+$body = "";
+
+while ($l = <>) {
+ LINE:
+  next if ($l =~ /^\#/);
+  if ($l =~ /^\[RELEASE\]/) {
+    # Print previous
+    if (!$first) {
+      $sid = "SectionChanges_$version";
+      $sid =~ s|\.|_|g;
+      $versions = $versions . "\n - \\ref $sid \"Gecode $version ($date)\"";
+      $body = $body."\\section $sid Changes in Version $version ($date)\n\n";
+
+      $body = $body."$info\n\n";
+
+      foreach $mod (@modorder) {
+	if ($hastext{$mod}) {
+	  $body = $body." - " . $modclear{$mod} . "\n";
+	  $hastext{$mod} = 0;
+	  foreach $what (@whatorder) {
+	    if (!($text{"$mod-$what"} eq "")) {
+	      $body = $body."   - " . $whatclear{$what} . "\n";
+	      $body = $body.$text{"$mod-$what"};
+	      $text{"$mod-$what"} = "";
+	      $body = $body."      .\n";
+	    }
+	  }
+	  $body = $body."   .\n";
+	}
+      }
+      $body = $body."\n\n";
+    }
+    $first   = 0;
+    $version = "";
+    $info    = "";
+    $date    = "";
+    while (($l = <>) && !($l =~ /\[DESCRIPTION\]/)) {
+      if ($l =~ /Version:[\t ]*(.*)$/) {
+	$version = $1;
+      } elsif ($l =~ /Date:[\t ]*(.*)$/) {
+	$date    = $1;
+      }
+    }
+    while (($l = <>) && !($l =~ /\[ENTRY\]/)) {
+      $info = $info . $l;
+    }
+    goto LINE;
+  }
+  if ($l =~ /^\[ENTRY\]/) {
+    my $mod, $what, $rank, $bug, $desc, $more, $thanks, $author;
+    $desc = "";
+    $more = "";
+    $bug = "";
+    $rank = "";
+    $what = "";
+    $mod = "";
+    $thanks = "";
+    $author = "";
+    while (($l = <>) && !($l =~ /\[DESCRIPTION\]/)) {
+      if ($l =~ /Module:[\t ]*(.*)$/) {
+	$mod  = $1;
+      } elsif ($l =~ /What:[\t ]*(.*)$/) {
+	$what = $1;
+      } elsif ($l =~ /Rank:[\t ]*(.*)$/) {
+	$rank = $1;
+      } elsif ($l =~ /Bug:[\t ]*(.*)$/) {
+	$bug  = $1;
+      } elsif ($l =~ /Thanks:[\t ]*(.*)$/) {
+	$thanks  = $1;
+      } elsif ($l =~ /Author:[\t ]*(.*)$/) {
+	$author  = $1;
+      }
+    }
+    
+    while (($l = <>) && 
+	   !(($l =~ /\[ENTRY\]/) || ($l =~ /\[RELEASE\]/) || ($l =~ /\[MORE\]/))) {
+	$desc = $desc . "        " . $l;
+    }
+    $desc =~ s/^        //;
+    $desc =~ s/[ \t\n\r]*$//;
+    $desc =~ s/</\\</g;
+    $desc =~ s/>/\\>/g;
+    $desc =~ s/&/\\&/g;
+    $desc =~ s/\n([ \t]*)\n/\n\1<br>\n/g;
+    if ($l =~ /^\[MORE\]/) {
+	while (($l = <>) && 
+	       !(($l =~ /\[ENTRY\]/) || ($l =~ /\[RELEASE\]/))) {
+	    $more = $more . "        " . $l;
+	}
+    }
+    $more =~ s/[ \t\n\r]*$//;
+    $more =~ s/</\\</g;
+    $more =~ s/>/\\>/g;
+    $more =~ s/</\\</g;
+    $more =~ s/&/\\&/g;
+    $more =~ s/\n([ \t]*)\n/\n\1<br>\n/g;
+    $hastext{$mod} = 1;
+    $rb = $rankclear{$rank};
+    if (!($thanks eq "")) {
+      $rb = $rb . ", thanks to $thanks";
+    }
+    if (!($author eq "")) {
+      $rb = $rb . " , contributed by $author";
+    }
+    if (!($more eq "")) {
+	$more =~ s/^        //;
+	$more =~ s/[ \t\n\r]*$//;
+	$more = 
+	    "        <span id=lesslink" . $moreinfocnt . " style=\"display: inline\">\n" .
+	    "        <a href=\"javascript:showInfo(" . $moreinfocnt . ", true)\">Details</a></span>\n" . 
+	    "        <span id=morelink" . $moreinfocnt . " style=\"display: none\">\n" .
+	    "        <a href=\"javascript:showInfo(" . $moreinfocnt . ", false)\">Hide details</a></span>\n" . 
+	    "        <div id=moreinfo" . $moreinfocnt . " style=\"display: none\">\n" .
+	    "        ". $more . "\n</div>\n";
+	$moreinfocnt = $moreinfocnt + 1;
+    }
+    
+    $text{"$mod-$what"} = 
+      ($text{"$mod-$what"} . "      - $desc (" . $rb . ")\n"
+       . $more);
+    goto LINE;
+  }
+}
+
+print <<EOF
+/**
+
+\\page PageChange Changelog
+
+\\section SectionChangeList Changes in Gecode Versions
+
+$versions
+ - \\ref SectionChanges_1_0_0 "Gecode 1.0.0 (2005-12-06)"
+
+\\section SectionChangeWhat Gecode Version Numbers
+
+%Gecode version numbers <em>x</em>.<em>y</em>.<em>z</em> change
+according to the following rules (of thumb):
+
+ - when \\e z changes, the programming interfaces for 
+   \\ref TaskModel, and \\ref TaskSearch remain
+   stable and only minor additions or improvements are included.
+ - when \\e y changes, the above mentioned interfaces might have changed
+   and medium to major additions or improvements are included.
+ - the change of \\e x is reserved for radical changes to %Gecode.
+
+EOF
+;
+
+print $body;
+print <<EOF
+\\section SectionChanges_1_0_0 Changes in Version 1.0.0 (2005-12-06, initial release)
+
+No changes, of course.
+
+EOF
+;
+print "\n\n*/\n";

data/ext/libgecode3/vendor/gecode-3.7.3/misc/gencurrentchangelog.perl

@@ -0,0 +1,191 @@
+#!/usr/bin/perl
+#
+#  Main authors:
+#     Christian Schulte <schulte@gecode.org>
+#     Guido Tack <tack@gecode.org>
+#
+#  Copyright:
+#     Christian Schulte, 2005
+#     Guido Tack, 2006
+#
+#  Last modified:
+#     $Date: 2011-01-18 22:14:44 +1100 (Tue, 18 Jan 2011) $ by $Author: tack $
+#     $Revision: 11547 $
+#
+#  This file is part of Gecode, the generic constraint
+#  development environment:
+#     http://www.gecode.org
+#
+#  Permission is hereby granted, free of charge, to any person obtaining
+#  a copy of this software and associated documentation files (the
+#  "Software"), to deal in the Software without restriction, including
+#  without limitation the rights to use, copy, modify, merge, publish,
+#  distribute, sublicense, and/or sell copies of the Software, and to
+#  permit persons to whom the Software is furnished to do so, subject to
+#  the following conditions:
+#
+#  The above copyright notice and this permission notice shall be
+#  included in all copies or substantial portions of the Software.
+#
+#  THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+#  EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+#  MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+#  NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+#  LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+#  OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+#  WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#
+#
+
+# 
+# Compile changelog
+#
+
+$first   = 1;
+$version = "";
+$info    = "";
+
+$modclear{"kernel"} = "Kernel";
+$modclear{"search"} = "Search engines";
+$modclear{"int"} = "Finite domain integers";
+$modclear{"set"} = "Finite integer sets";
+$modclear{"cpltset"} = "Finite integer sets with complete representation";
+$modclear{"minimodel"} = "Minimal modeling support";
+$modclear{"graph"} = "Graph constraints";
+$modclear{"scheduling"} = "Scheduling constraints";
+$modclear{"driver"} = "Script commandline driver";
+$modclear{"iter"} = "Range and value iterators";
+$modclear{"support"} = "Support algorithms and datastructures";
+$modclear{"example"} = "Example scripts";
+$modclear{"test"} = "Systematic tests";
+$modclear{"gist"} = "Gist";
+$modclear{"flatzinc"} = "Gecode/FlatZinc";
+$modclear{"other"} = "General";
+
+$whatclear{"bug"} = "Bug fixes";
+$whatclear{"performance"} = "Performance improvements";
+$whatclear{"documentation"} = "Documentation fixes";
+$whatclear{"new"} = "Additions";
+$whatclear{"removed"} = "Removals";
+$whatclear{"change"} = "Other changes";
+
+$rankclear{"minor"} = "minor";
+$rankclear{"major"} = "major";
+
+@modorder = ("kernel","search","int","set","cpltset","scheduling",
+	     "graph","minimodel","driver",
+	     "iter","support","example","test","gist","flatzinc","other");
+
+@whatorder = ("new","removed","change","bug","performance","documentation");
+
+foreach $mod (@modorder) {
+  $hastext{$mod} = 0;
+  foreach $what (@whatorder) {
+    $text{"$mod-$what"} = "";
+  }
+}
+
+while ($l = <STDIN>) {
+ LINE:
+  next if ($l =~ /^\#/);
+  $l =~ s/%Gecode/Gecode/g;
+  if ($l =~ /^\[RELEASE\]/) {
+    # Print previous
+    if (!$first) {
+      print "<ul>\n";
+      foreach $mod (@modorder) {
+        if ($hastext{$mod}) {
+          print "<li>" . $modclear{$mod} . "\n<ul>\n";
+          $hastext{$mod} = 0;
+          foreach $what (@whatorder) {
+            if (!($text{"$mod-$what"} eq "")) {
+              print "<li>" . $whatclear{$what} . "\n<ul>";
+              print $text{"$mod-$what"};
+              print "</ul></li>\n";
+              $text{"$mod-$what"} = "";
+            }
+          }
+          print "</ul></li>\n";
+        }
+      }
+      print "</ul>\n";
+      exit(0);
+    }
+    $first   = 0;
+    $version = "";
+    $info    = "";
+    $date    = "";
+    while (($l = <STDIN>) && !($l =~ /\[DESCRIPTION\]/)) {
+      $l =~ s/%Gecode/Gecode/g;
+      if ($l =~ /Version:[\t ]*(.*)$/) {
+    $version = $1;
+      } elsif ($l =~ /Date:[\t ]*(.*)$/) {
+    $date    = $1;
+      }
+    }
+    while (($l = <STDIN>) && !($l =~ /\[ENTRY\]/)) {
+      $l =~ s/%Gecode/Gecode/g;
+#      chop $l;
+      $info = $info . " " . $l;
+    }
+    goto LINE;
+  }
+  if ($l =~ /^\[ENTRY\]/) {
+    my $mod, $what, $rank, $bug, $desc, $thanks;
+    $desc = "";
+    $bug = "";
+    $rank = "";
+    $what = "";
+    $mod = "";
+    $thanks = "";
+    while (($l = <STDIN>) && !($l =~ /\[DESCRIPTION\]/)) {
+      $l =~ s/%Gecode/Gecode/g;
+      if ($l =~ /Module:[\t ]*(.*)$/) {
+    $mod  = $1;
+      } elsif ($l =~ /What:[\t ]*(.*)$/) {
+    $what = $1;
+      } elsif ($l =~ /Rank:[\t ]*(.*)$/) {
+    $rank = $1;
+      } elsif ($l =~ /Bug:[\t ]*(.*)$/) {
+    $bug  = $1;
+      } elsif ($l =~ /Thanks:[\t ]*(.*)$/) {
+    $thanks  = $1;
+      }
+    }
+    
+    while (($l = <STDIN>) && 
+       !(($l =~ /\[ENTRY\]/) || ($l =~ /\[RELEASE\]/))) {
+       $l =~ s/%Gecode/Gecode/g;
+#      chop $l;
+       if (!($l =~ /\[MORE\]/)) {
+       if ($desc eq "") {
+           $desc = $l;
+       } else {
+           $desc = $desc . "      " . $l;
+       }
+       }
+    }
+    chop $desc;
+    $hastext{$mod} = 1;
+    $rb = $rankclear{$rank};
+    if (!($bug eq "")) {
+    $rb = $rb . ", bugzilla entry $bug";
+#      $rb = $rb . ", <a href=\"http://www.gecode.org/bugzilla/show_bug.cgi?id="
+#    . $bug . "\">bugzilla entry</a>";
+    }
+    if (!($thanks eq "")) {
+      $rb = $rb . ", thanks to $thanks";
+    }
+    $text{"$mod-$what"} = 
+      ($text{"$mod-$what"} . "    <li> $desc(" . $rb . ")</li>\n");
+    goto LINE;
+  }
+}
+
+print <<EOF
+Initial release (2005-12-06)
+
+ No changes, of course.
+
+EOF
+;

data/ext/libgecode3/vendor/gecode-3.7.3/misc/genlcovmakefile.perl

@@ -0,0 +1,148 @@
+#!/usr/bin/perl
+#
+#  Main authors:
+#     Guido Tack <tack@gecode.org>
+#
+#  Copyright:
+#     Guido Tack, 2008
+#
+#  Last modified:
+#     $Date: 2008-02-26 00:01:43 +1100 (Tue, 26 Feb 2008) $ by $Author: tack $
+#     $Revision: 6301 $
+#
+#  This file is part of Gecode, the generic constraint
+#  development environment:
+#     http://www.gecode.org
+#
+#  Permission is hereby granted, free of charge, to any person obtaining
+#  a copy of this software and associated documentation files (the
+#  "Software"), to deal in the Software without restriction, including
+#  without limitation the rights to use, copy, modify, merge, publish,
+#  distribute, sublicense, and/or sell copies of the Software, and to
+#  permit persons to whom the Software is furnished to do so, subject to
+#  the following conditions:
+#
+#  The above copyright notice and this permission notice shall be
+#  included in all copies or substantial portions of the Software.
+#
+#  THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+#  EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+#  MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+#  NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+#  LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+#  OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+#  WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#
+#
+
+use File::Basename;
+
+open (TESTS, "./test/test -list |");
+
+my %tests;
+
+my $blockSize = 40;
+
+while ($l = <TESTS>) {
+  chomp($l);
+  $tests{$l} = "";
+}
+close (TESTS);
+
+$size = 0;
+foreach my $k (keys %tests) {
+  $size++;
+}
+
+my $targets = $size / $blockSize;
+
+open (EXAMPLES, "find ./examples -maxdepth 1 -type f ! -name '*.*' |");
+
+my @examples;
+while (my $x = <EXAMPLES>) {
+  chomp($x);
+  my ($filename, $dummydir, $suffix) = fileparse($x);
+
+  open (HELP, "$x -help 2>&1 |");
+  my @prop;
+  my @model;
+  while (my $l = <HELP>) {
+    if ($l =~ /-propagation \((.*)\)/) {
+      $l1 = $1;
+      $l1 =~ s/ //g;
+      @prop = split(/,/, $l1);
+    } elsif ($l =~ /-model \((.*)\)/) {
+      $l1 = $1;
+      $l1 =~ s/ //g;
+      @model = split(/,/, $l1);
+    }
+  }
+  if (scalar(@prop) == 0) {
+    if (scalar(@model) == 0) {
+      push(@examples, $filename);
+    } else {
+      foreach $m (@model) {
+        push(@examples, "$filename -model $m");
+      }
+    }
+  } else {
+    foreach $p (@prop) {
+      if (scalar(@model) == 0) {
+        push(@examples, "$filename -propagation $p");
+      } else {
+        foreach $m (@model) {
+          push(@examples, "$filename -propagation $p -model $m");
+        }
+      }
+    }
+  }
+  close (HELP);
+}
+close (EXAMPLES);
+
+print "LCOVOUTDIR = /srv/gecode/httpd/html/Internal/gcov-trunk\n\n";
+print "all: tests examples\n";
+print "\tlcov --directory \$(PWD) --base-directory \$(PWD) --capture \\\n";
+print "\t     --output-file testsandexamples.info\n";
+print "\tgenhtml -t \"Gecode tests and examples\" testsandexamples.info -o \$(LCOVOUTDIR) -p \$(PWD)\n\n";
+
+print "tests: \\\n";
+for (my $tcount = 0; $tcount <= $targets; $tcount++) {
+  print "\ttest$tcount \\\n";
+}
+print "\tdone\n\n";
+print "examples: \\\n";
+foreach $e (@examples) {
+  $etarget = $e;
+  $etarget =~ s/[ -]/_/g;
+  print "\t$etarget \\\n";
+}
+print "\tdone\n\n";
+
+$tcount = 1;
+$count = 0;
+print "test0:\n";
+print "\t./test/test \\\n";
+foreach my $k (keys %tests) {
+  if ($count == $blockSize) {
+    print "\t\t\$(TESTOPTIONS)\n\n";
+    print "test$tcount:\n";
+    print "\t./test/test \\\n";
+    $count = 0;
+    $tcount++;
+  }
+  print "\t\t-test ".$k." \\\n";
+  $count++;
+}
+if ($count < $blockSize) {
+  print "\t\t\$(TESTOPTIONS)\n\n";
+}
+
+foreach $e (@examples) {
+  $etarget = $e;
+  $etarget =~ s/[ -]/_/g;
+  print "$etarget:\n";
+  print "\t./examples/$e -time 240000\n\n";
+}
+
+print "done:\n";