Item9750: rewrite regex conversion to mongodb queries to take advant…

…age of the new mongodb OR and simplify

horrid hack to get the MongoDBPlugin started for unit tests. Hopefully Crawford and I can figure out a real way to implement this

implement in mongodb sorting, and in the process, de-array the FIELD, TOPICINFO, TOPICPARENT and FILEATTACHMENT meta data, as mongodb can't (as yet) sort_by array elements

rewrite the serialisation into mongodb

git-svn-id: http://svn.foswiki.org/trunk@9567 0b4bb1d4-4e5a-0410-9cc4-b2b747904278

UnitTestContrib/test/unit/Fn_SEARCH.pm

@@ -113,7 +113,23 @@ SUB
 
 sub loadExtraConfig {
     my $this = shift; # the Test::Unit::TestCase object
+
+    #turn on the MongoDBPlugin so that the saved data goes into mongoDB
+    #This is temoprary until Crawford and I cna find a way to push dependencies into unit tests
+    if (($Foswiki::cfg{Store}{SearchAlgorithm} =~ /MongDB/) or 
+        ($Foswiki::cfg{Store}{QueryAlgorithm} =~ /MongDB/)) {
+        $Foswiki::cfg{Plugins}{MongoDBPlugin}{Module} = 'Foswiki::Plugins::MongoDBPlugin'; 
+        $Foswiki::cfg{Plugins}{MongoDBPlugin}{Enabled} = 1; 
+        $Foswiki::cfg{Plugins}{MongoDBPlugin}{EnableOnSaveUpdates} = 1; 
+    }
+
     $this->SUPER::loadExtraConfig();
+
+    if (($Foswiki::cfg{Store}{SearchAlgorithm} =~ /MongDB/) or 
+        ($Foswiki::cfg{Store}{QueryAlgorithm} =~ /MongDB/)) {
+        require Foswiki::Plugins::MongoDBPlugin;
+        Foswiki::Plugins::MongoDBPlugin::getMongoDB()->remove('current', {'_web' => $this->{test_web}});
+    }
 }
 
 

UnitTestContrib/test/unit/QueryTests.pm

@@ -138,6 +138,28 @@ SUB
     return \@groups;
 }
 
+
+sub loadExtraConfig {
+    my $this = shift; # the Test::Unit::TestCase object
+
+    #turn on the MongoDBPlugin so that the saved data goes into mongoDB
+    #This is temoprary until Crawford and I cna find a way to push dependencies into unit tests
+    if (($Foswiki::cfg{Store}{SearchAlgorithm} =~ /MongDB/) or 
+        ($Foswiki::cfg{Store}{QueryAlgorithm} =~ /MongDB/)) {
+        $Foswiki::cfg{Plugins}{MongoDBPlugin}{Module} = 'Foswiki::Plugins::MongoDBPlugin'; 
+        $Foswiki::cfg{Plugins}{MongoDBPlugin}{Enabled} = 1; 
+        $Foswiki::cfg{Plugins}{MongoDBPlugin}{EnableOnSaveUpdates} = 1; 
+    }
+
+    $this->SUPER::loadExtraConfig();
+
+    if (($Foswiki::cfg{Store}{SearchAlgorithm} =~ /MongDB/) or 
+        ($Foswiki::cfg{Store}{QueryAlgorithm} =~ /MongDB/)) {
+        require Foswiki::Plugins::MongoDBPlugin;
+        Foswiki::Plugins::MongoDBPlugin::getMongoDB()->remove('current', {'_web' => $this->{test_web}});
+    }
+}
+
 sub check {
     my ( $this, $s, %opts ) = @_;