Fix for mem usage of Doc
[SXSI/TextCollection.git] / TCImplementation.cpp
index 290ca9c..8112b45 100644 (file)
@@ -38,7 +38,7 @@ namespace SXSI
 {
 
 // Save file version info
-const uchar TCImplementation::versionFlag = 3;
+const uchar TCImplementation::versionFlag = 4;
 
 /**
  * Constructor inits an empty dynamic FM-index.
@@ -46,20 +46,8 @@ const uchar TCImplementation::versionFlag = 3;
  */
 TCImplementation::TCImplementation(uchar * bwt, ulong length, unsigned samplerate_, unsigned numberOfTexts_, ulong maxTextLength_)
     : n(length), samplerate(samplerate_), alphabetrank(0), sampled(0), suffixes(0), 
-      suffixDocId(0), numberOfTexts(numberOfTexts_), numberOfAllTexts(numberOfTexts_), maxTextLength(maxTextLength_), endmarkerDocId(0),
-      emptyTextRank(0)
+      suffixDocId(0), numberOfTexts(numberOfTexts_), maxTextLength(maxTextLength_), Doc(0)
 {
-    
-    // Bitvector of empty texts, FIXME Remove?
-    {
-        //std::cout << std::endl << "texts: " << numberOfTexts << ", all texts " << numberOfAllTexts << ", size : " << emptyTextId.size() <<std::endl;
-        ulong *tempB = new ulong[numberOfTexts/W + 1];
-        for (ulong i = 0; i < numberOfTexts/W + 1; ++i)
-            tempB[i] = 0;
-//        for (std::set<unsigned>::const_iterator it = emptyTextId.begin(); it != emptyTextId.end(); ++it)
-//            Tools::SetField(tempB, 1, (*it), 1);
-        emptyTextRank = new BSGAP(tempB, numberOfTexts, true);
-   }
     makewavelet(bwt); // Deletes bwt!
     bwt = 0;
   
@@ -70,25 +58,12 @@ TCImplementation::TCImplementation(uchar * bwt, ulong length, unsigned samplerat
 bool TCImplementation::EmptyText(DocId k) const
 {
     assert(k < (DocId)numberOfTexts); 
-    if (emptyTextRank->IsBitSet(k))
-        return true;
-    return false;
+    return false; // Empty texts are not indexed
 }
 
 uchar* TCImplementation::GetText(DocId k) const
 {
     assert(k < (DocId)numberOfTexts);
-
-    ulong textRank = 0;
-    if (emptyTextRank->IsBitSet(k, &textRank))
-    {
-        uchar* result = new uchar[1];
-        result[0] = 0;
-        return result;
-    }
-    // Map to non-empty text
-    k -= textRank; //emptyTextRank->rank(k);
-    
     TextPosition i = k;
 
     string result;
@@ -121,15 +96,6 @@ uchar* TCImplementation::GetText(DocId k, TextPosition i, TextPosition j) const
     assert(i <= j);
 
     ulong textRank = 0;
-    if (emptyTextRank->IsBitSet(k, &textRank))
-    {
-        uchar* result = new uchar[1];
-        result[0] = 0;
-        return result;
-    }
-    
-    // Map to non-empty text
-    k -= textRank; // emptyTextRank->rank(k);
 
     // Start position of k'th text
     ulong start = (*textStartPos)[k];
@@ -191,11 +157,7 @@ bool TCImplementation::IsEqual(uchar const *pattern) const
 {
     TextPosition m = std::strlen((char *)pattern);
     if (m == 0)
-    {
-        if (numberOfAllTexts - numberOfTexts > 0u)
-            return true; // Empty texts exists
         return false; // No empty texts exists
-    }
 
     TextPosition sp = 0, ep = 0;
     // Match including end-marker
@@ -211,11 +173,7 @@ bool TCImplementation::IsEqual(uchar const *pattern, DocId begin, DocId end) con
 {
     TextPosition m = std::strlen((char *)pattern);
     if (m == 0)
-    {
-        if (numberOfAllTexts - numberOfTexts > 0u)
-            return true; // Empty texts exists
         return false; // No empty texts exists
-    }
 
     TextPosition sp = 0, ep = 0;
     // Match including end-marker
@@ -282,7 +240,7 @@ unsigned TCImplementation::CountPrefix(uchar const * pattern) const
 {
     TextPosition m = strlen((char *)pattern);
     if (m == 0)
-        return numberOfAllTexts;
+        return numberOfTexts;
 
     TextPosition sp = 0, ep = 0;
     Search(pattern, m, &sp, &ep);
@@ -295,7 +253,7 @@ unsigned TCImplementation::CountPrefix(uchar const * pattern, DocId begin, DocId
 {
     TextPosition m = strlen((char *)pattern);
     if (m == 0)
-        return numberOfAllTexts;
+        return numberOfTexts;
 
     TextPosition sp = 0, ep = 0;
     Search(pattern, m, &sp, &ep);
@@ -308,7 +266,7 @@ unsigned TCImplementation::CountSuffix(uchar const * pattern) const
 {
     TextPosition m = strlen((char *)pattern);
     if (m == 0)
-        return numberOfAllTexts;
+        return numberOfTexts;
 
     TextPosition sp = 0, ep = 0;
     // Search with end-marker
@@ -321,7 +279,7 @@ unsigned TCImplementation::CountSuffix(uchar const * pattern, DocId begin, DocId
 {
     TextPosition m = strlen((char *)pattern);
     if (m == 0)
-        return numberOfAllTexts;
+        return numberOfTexts;
 
     TextPosition sp = 0, ep = 0;
     // Search with end-marker
@@ -334,7 +292,7 @@ unsigned TCImplementation::CountEqual(uchar const *pattern) const
 {
     TextPosition m = strlen((char const *)pattern);
     if (m == 0)
-        return numberOfAllTexts - numberOfTexts; // Empty texts. 
+        return 0; // No empty texts. 
 
     TextPosition sp = 0, ep = 0;
     // Match including end-marker
@@ -348,7 +306,7 @@ unsigned TCImplementation::CountEqual(uchar const *pattern, DocId begin, DocId e
 {
     TextPosition m = strlen((char const *)pattern);
     if (m == 0)
-        return numberOfAllTexts - numberOfTexts; // Empty texts. 
+        return 0; // No empty texts. 
 
     TextPosition sp = 0, ep = 0;
     // Match including end-marker
@@ -362,7 +320,7 @@ unsigned TCImplementation::CountContains(uchar const * pattern) const
 {
     TextPosition m = strlen((char const *)pattern);
     if (m == 0)
-        return numberOfAllTexts; // Total number of texts. 
+        return numberOfTexts; // Total number of texts. 
 
     // Here counting is as slow as fetching the result set
     // because we have to filter out occ's that fall within same document.
@@ -374,7 +332,7 @@ unsigned TCImplementation::CountContains(uchar const * pattern, DocId begin, Doc
 {
     TextPosition m = strlen((char const *)pattern);
     if (m == 0)
-        return numberOfAllTexts; // Total number of texts. 
+        return numberOfTexts; // Total number of texts. 
 
     // Here counting is as slow as fetching the result set
     // because we have to filter out occ's that fall within same document.
@@ -387,7 +345,7 @@ unsigned TCImplementation::CountLessThan(uchar const * pattern) const
 {
     TextPosition m = strlen((char const *)pattern);
     if (m == 0)
-        return numberOfAllTexts - numberOfTexts; // Empty texts. 
+        return 0; // No empty texts. 
 
     TextPosition sp = 0, ep = 0;
     SearchLessThan(pattern, m, &sp, &ep);
@@ -400,7 +358,7 @@ unsigned TCImplementation::CountLessThan(uchar const * pattern, DocId begin, Doc
 {
     TextPosition m = strlen((char const *)pattern);
     if (m == 0)
-        return numberOfAllTexts - numberOfTexts; // Empty texts. 
+        return 0; // No empty texts. 
 
     TextPosition sp = 0, ep = 0;
     SearchLessThan(pattern, m, &sp, &ep);
@@ -420,33 +378,9 @@ TextCollection::document_result TCImplementation::Prefix(uchar const * pattern)
 
     TextPosition sp = 0, ep = 0;
     Search(pattern, m, &sp, &ep);
-
-    TextCollection::document_result result;
     
-    // Report end-markers in result interval
-    unsigned resultSize = CountEndmarkers(sp, ep);
-    if (resultSize == 0)
-        return result;
-
-    result.reserve(resultSize); // Try to avoid reallocation.
-
     // Iterate through end-markers in [sp,ep]:
-    unsigned i = 0;
-    if (sp > 0)
-        i = alphabetrank->rank(0, sp - 1);
-    while (resultSize)
-    {
-        // End-marker we found belongs to the "preceeding" doc in the collection
-        DocId docId = ((*endmarkerDocId)[i] + 1) % numberOfTexts;
-        // Map to doc ID:
-        docId = emptyTextRank->select0(docId+1);
-        result.push_back(docId);
-
-        -- resultSize;
-        ++ i;
-    }
-    
-    return result;
+    return EnumerateEndmarkers(sp, ep);
 }
 
 TextCollection::document_result TCImplementation::Prefix(uchar const * pattern, DocId begin, DocId end) const
@@ -458,33 +392,8 @@ TextCollection::document_result TCImplementation::Prefix(uchar const * pattern,
     TextPosition sp = 0, ep = 0;
     Search(pattern, m, &sp, &ep);
 
-    TextCollection::document_result result;
-    
-    // Report end-markers in result interval
-    unsigned resultSize = CountEndmarkers(sp, ep);
-    if (resultSize == 0)
-        return result;
-
-    result.reserve(resultSize); // Try to avoid reallocation.
-
-    // Iterate through end-markers in [sp,ep] and [begin, end]:
-    unsigned i = 0;
-    if (sp > 0)
-        i = alphabetrank->rank(0, sp - 1);
-    while (resultSize)
-    {
-        // End-marker we found belongs to the "preceeding" doc in the collection
-        DocId docId = ((*endmarkerDocId)[i] + 1) % numberOfTexts;
-        // Map to doc ID:
-        docId = emptyTextRank->select0(docId+1);
-        if (docId >= begin && docId <= end)
-            result.push_back(docId);
-
-        -- resultSize;
-        ++ i;
-    }
-    
-    return result;
+    // Return end-markers in [sp,ep] and [begin, end]:
+    return EnumerateEndmarkers(sp, ep, begin, end);
 }
 
 TextCollection::document_result TCImplementation::Suffix(uchar const * pattern) const
@@ -518,18 +427,11 @@ TextCollection::document_result TCImplementation::Suffix(uchar const * pattern)
         {
             // Rank among the end-markers in BWT
             unsigned endmarkerRank = alphabetrank->rank(0, i) - 1;
-
-            // End-marker that we found belongs to the "preceeding" doc in collection:
-            DocId docId = ((*endmarkerDocId)[endmarkerRank] + 1) % numberOfTexts;        
-            // Map to doc ID:
-            docId = emptyTextRank->select0(docId+1);
-            result.push_back(docId);
+            result.push_back(Doc->access(endmarkerRank));
         }
         else // Sampled position
         {
             DocId docId = (*suffixDocId)[sampled_rank_i-1]; //sampled->rank(i)-1];
-            // Map to doc ID:
-            docId = emptyTextRank->select0(docId+1);
             result.push_back(docId);
         }
     }
@@ -568,18 +470,11 @@ TextCollection::document_result TCImplementation::Suffix(uchar const * pattern,
         {
             // Rank among the end-markers in BWT
             unsigned endmarkerRank = alphabetrank->rank(0, i) - 1;
-
-            // End-marker that we found belongs to the "preceeding" doc in collection:
-            DocId docId = ((*endmarkerDocId)[endmarkerRank] + 1) % numberOfTexts;        
-            // Map to doc ID:
-            docId = emptyTextRank->select0(docId+1);
-            result.push_back(docId);
+            result.push_back(Doc->access(endmarkerRank));
         }
         else // Sampled position
         {
             DocId docId = (*suffixDocId)[sampled_rank_i-1]; //sampled->rank(i)-1];
-            // Map to doc ID:
-            docId = emptyTextRank->select0(docId+1);
             result.push_back(docId);
         }
     }
@@ -598,31 +493,8 @@ TextCollection::document_result TCImplementation::Equal(uchar const *pattern) co
     // Match including end-marker
     Search(pattern, m+1, &sp, &ep);
 
-    TextCollection::document_result result;
-
     // Report end-markers in result interval
-    unsigned resultSize = CountEndmarkers(sp, ep);
-    if (resultSize == 0)
-        return result;
-
-    result.reserve(resultSize); // Try to avoid reallocation.
-
-    unsigned i = 0;
-    if (sp > 0)
-        i = alphabetrank->rank(0, sp - 1);
-    while (resultSize)
-    {
-        // End-marker we found belongs to the "previous" doc in the collection
-        DocId docId = ((*endmarkerDocId)[i] + 1) % numberOfTexts;
-        // Map to doc ID:
-        docId = emptyTextRank->select0(docId+1);
-        result.push_back(docId);
-
-        -- resultSize;
-        ++ i;
-    }
-    
-    return result;
+    return EnumerateEndmarkers(sp, ep);
 }
 
 TextCollection::document_result TCImplementation::Equal(uchar const *pattern, DocId begin, DocId end) const
@@ -635,31 +507,8 @@ TextCollection::document_result TCImplementation::Equal(uchar const *pattern, Do
     // Match including end-marker
     Search(pattern, m+1, &sp, &ep, begin, end);
 
-    TextCollection::document_result result;
-
     // Report end-markers in result interval
-    unsigned resultSize = CountEndmarkers(sp, ep);
-    if (resultSize == 0)
-        return result;
-
-    result.reserve(resultSize); // Try to avoid reallocation.
-
-    unsigned i = 0;
-    if (sp > 0)
-        i = alphabetrank->rank(0, sp - 1);
-    while (resultSize)
-    {
-        // End-marker we found belongs to the "previous" doc in the collection
-        DocId docId = ((*endmarkerDocId)[i] + 1) % numberOfTexts;
-        // Map to doc ID:
-        docId = emptyTextRank->select0(docId+1);
-        result.push_back(docId); // already within [begin, end]
-
-        -- resultSize;
-        ++ i;
-    }
-    
-    return result;
+    return EnumerateEndmarkers(sp, ep, begin, end);
 }
 
 
@@ -691,10 +540,7 @@ TextCollection::document_result TCImplementation::Contains(uchar const * pattern
         {
             // Rank among the end-markers in BWT
             unsigned endmarkerRank = alphabetrank->rank(0, i) - 1;
-            
-            // End-marker that we found belongs to the "preceeding" doc in collection:
-            DocId docId = ((*endmarkerDocId)[endmarkerRank] + 1) % numberOfTexts;
-            resultSet.insert(docId);
+            resultSet.insert(Doc->access(endmarkerRank));
         }
         else
         {
@@ -706,9 +552,6 @@ TextCollection::document_result TCImplementation::Contains(uchar const * pattern
     
     // Convert std::set to std::vector
     TextCollection::document_result result(resultSet.begin(), resultSet.end());
-    // Map to doc ID's
-    for (document_result::iterator it = result.begin(); it != result.end(); ++it)
-        *it = emptyTextRank->select0(*it+1);
     return result;
 }
 
@@ -740,9 +583,7 @@ TextCollection::document_result TCImplementation::Contains(uchar const * pattern
         {
             // Rank among the end-markers in BWT
             unsigned endmarkerRank = alphabetrank->rank(0, i) - 1;
-            
-            // End-marker that we found belongs to the "preceeding" doc in collection:
-            DocId docId = ((*endmarkerDocId)[endmarkerRank] + 1) % numberOfTexts;
+            DocId docId = Doc->access(endmarkerRank);
             if (docId >= begin && docId <= end)
                 resultSet.insert(docId);
         }
@@ -757,9 +598,6 @@ TextCollection::document_result TCImplementation::Contains(uchar const * pattern
     
     // Convert std::set to std::vector
     TextCollection::document_result result(resultSet.begin(), resultSet.end());
-    // Map to doc ID's
-    for (document_result::iterator it = result.begin(); it != result.end(); ++it)
-        *it = emptyTextRank->select0(*it+1);
     return result;
 }
 
@@ -772,32 +610,8 @@ TextCollection::document_result TCImplementation::LessThan(uchar const * pattern
     TextPosition sp = 0, ep = 0;
     SearchLessThan(pattern, m, &sp, &ep);
 
-    TextCollection::document_result result;
-    
     // Report end-markers in result interval
-    unsigned resultSize = CountEndmarkers(sp, ep);
-    if (resultSize == 0)
-        return result;
-
-    result.reserve(resultSize); // Try to avoid reallocation.
-
-    // Iterate through end-markers in [sp,ep]:
-    unsigned i = 0;
-    if (sp > 0)
-        i = alphabetrank->rank(0, sp - 1);
-    while (resultSize)
-    {
-        // End-marker we found belongs to the "preceeding" doc in the collection
-        DocId docId = ((*endmarkerDocId)[i] + 1) % numberOfTexts;
-        // Map to doc ID:
-        docId = emptyTextRank->select0(docId+1);
-        result.push_back(docId);
-
-        -- resultSize;
-        ++ i;
-    }
-    
-    return result;
+    return EnumerateEndmarkers(sp, ep);
 }
 
 TextCollection::document_result TCImplementation::LessThan(uchar const * pattern, DocId begin, DocId end) const
@@ -809,33 +623,8 @@ TextCollection::document_result TCImplementation::LessThan(uchar const * pattern
     TextPosition sp = 0, ep = 0;
     SearchLessThan(pattern, m, &sp, &ep);
 
-    TextCollection::document_result result;
-    
-    // Report end-markers in result interval
-    unsigned resultSize = CountEndmarkers(sp, ep);
-    if (resultSize == 0)
-        return result;
-
-    result.reserve(resultSize); // Try to avoid reallocation.
-
     // Iterate through end-markers in [sp,ep] and [begin, end]:
-    unsigned i = 0;
-    if (sp > 0)
-        i = alphabetrank->rank(0, sp - 1);
-    while (resultSize)
-    {
-        // End-marker we found belongs to the "preceeding" doc in the collection
-        DocId docId = ((*endmarkerDocId)[i] + 1) % numberOfTexts;
-        // Map to doc ID:
-        docId = emptyTextRank->select0(docId+1);
-        if (docId >= begin && docId <= end)
-            result.push_back(docId);
-
-        -- resultSize;
-        ++ i;
-    }
-    
-    return result;
+    return EnumerateEndmarkers(sp, ep, begin, end);
 }
 
 /**
@@ -871,11 +660,7 @@ TextCollection::full_result TCImplementation::FullContains(uchar const * pattern
         {
             // Rank among the end-markers in BWT
             unsigned endmarkerRank = alphabetrank->rank(0, i) - 1;
-            
-            // End-marker that we found belongs to the "preceeding" doc in collection:
-            DocId docId = ((*endmarkerDocId)[endmarkerRank] + 1) % numberOfTexts;
-            // Map to doc ID:
-            docId = emptyTextRank->select0(docId+1);
+            DocId docId = Doc->access(endmarkerRank);
             result.push_back(make_pair(docId, dist)); 
         }
         else
@@ -884,8 +669,6 @@ TextCollection::full_result TCImplementation::FullContains(uchar const * pattern
             DocId docId = (*suffixDocId)[sampled_rank_i-1]; //sampled->rank(i)-1];
 //            textPos = textPos - (*textStartPos)[docId]; // Offset inside the text
 
-            // Map to doc ID:
-            docId = emptyTextRank->select0(docId+1);
             result.push_back(make_pair(docId, textPos));
         }
     }
@@ -925,9 +708,7 @@ TextCollection::full_result TCImplementation::FullContains(uchar const * pattern
             unsigned endmarkerRank = alphabetrank->rank(0, i) - 1;
             
             // End-marker that we found belongs to the "preceeding" doc in collection:
-            DocId docId = ((*endmarkerDocId)[endmarkerRank] + 1) % numberOfTexts;
-            // Map to doc ID:
-            docId = emptyTextRank->select0(docId+1);
+            DocId docId = Doc->access(endmarkerRank);
             if (docId >= begin && docId <= end)
                 result.push_back(make_pair(docId, dist)); 
         }
@@ -937,8 +718,6 @@ TextCollection::full_result TCImplementation::FullContains(uchar const * pattern
             DocId docId = (*suffixDocId)[sampled_rank_i-1]; //sampled->rank(i)-1];
 //            textPos = textPos - (*textStartPos)[docId]; // Offset inside the text
 
-            // Map to doc ID:
-            docId = emptyTextRank->select0(docId+1);
             if (docId >= begin && docId <= end)
                 result.push_back(make_pair(docId, textPos));
         }
@@ -964,10 +743,8 @@ TextCollection::full_result TCImplementation::FullContains(uchar const * pattern
     BlockArray *suffixes;
     BlockArray *suffixDocId;
     unsigned numberOfTexts;
-    unsigned numberOfAllTexts;
     ulong maxTextLength;
-    BlockArray *endmarkerDocId;
-    BSGAP *emptyTextRank;
+    static_sequence *docId;
  */
 void TCImplementation::Save(FILE *file) const
 {
@@ -994,13 +771,10 @@ void TCImplementation::Save(FILE *file) const
     
     if (std::fwrite(&(this->numberOfTexts), sizeof(unsigned), 1, file) != 1)
         throw std::runtime_error("TCImplementation::Save(): file write error (numberOfTexts).");
-    if (std::fwrite(&(this->numberOfAllTexts), sizeof(unsigned), 1, file) != 1)
-        throw std::runtime_error("TCImplementation::Save(): file write error (numberOfAllTexts).");
     if (std::fwrite(&(this->maxTextLength), sizeof(ulong), 1, file) != 1)
         throw std::runtime_error("TCImplementation::Save(): file write error (maxTextLength).");
 
-    endmarkerDocId->Save(file);
-    emptyTextRank->Save(file);
+    Doc->save(file);
     fflush(file);
 }
 
@@ -1013,8 +787,7 @@ void TCImplementation::Save(FILE *file) const
  */
 TCImplementation::TCImplementation(FILE *file, unsigned samplerate_)
     : n(0), samplerate(samplerate_), alphabetrank(0), sampled(0), suffixes(0), 
-      suffixDocId(0), numberOfTexts(0), numberOfAllTexts(0), maxTextLength(0), endmarkerDocId(0),
-      emptyTextRank(0)
+      suffixDocId(0), numberOfTexts(0), maxTextLength(0), Doc(0)
 {
     uchar verFlag = 0;
     if (std::fread(&verFlag, 1, 1, file) != 1)
@@ -1044,13 +817,10 @@ TCImplementation::TCImplementation(FILE *file, unsigned samplerate_)
 
     if (std::fread(&(this->numberOfTexts), sizeof(unsigned), 1, file) != 1)
         throw std::runtime_error("TCImplementation::Load(): file read error (numberOfTexts).");
-    if (std::fread(&(this->numberOfAllTexts), sizeof(unsigned), 1, file) != 1)
-        throw std::runtime_error("TCImplementation::Load(): file read error (numberOfAllTexts).");
     if (std::fread(&(this->maxTextLength), sizeof(ulong), 1, file) != 1)
         throw std::runtime_error("TCImplementation::Load(): file read error (maxTextLength).");
 
-    endmarkerDocId = new BlockArray(file);
-    emptyTextRank = new BSGAP(file);
+    Doc = static_sequence::load(file);
 
     // FIXME Construct data structures with new samplerate
     //maketables(); 
@@ -1063,38 +833,7 @@ TCImplementation::TCImplementation(FILE *file, unsigned samplerate_)
  */
 
 
-// FIXME Use 2D-search structure
-unsigned TCImplementation::CountEndmarkers(TextPosition sp, TextPosition ep, DocId begin, DocId end) const
-{
-    if (sp > ep)
-        return 0;
-    
-    ulong ranksp = 0;
-    if (sp != 0)
-        ranksp = alphabetrank->rank(0, sp - 1);
-    
-    unsigned resultSize = alphabetrank->rank(0, ep) - ranksp;
-    if (resultSize == 0)
-        return 0;
 
-    // Count end-markers in result interval and within [begin, end]
-    unsigned count = 0;
-    unsigned i = ranksp;
-    while (resultSize)
-    {
-        // End-marker we found belongs to the "previous" doc in the collection
-        DocId docId = ((*endmarkerDocId)[i] + 1) % numberOfTexts;
-        // Map to doc ID:
-        docId = emptyTextRank->select0(docId+1);
-        if (docId >= begin && docId <= end)
-            ++ count;
-
-        -- resultSize;
-        ++ i;
-    }
-    return count;
-}
 ulong TCImplementation::Search(uchar const * pattern, TextPosition m, TextPosition *spResult, TextPosition *epResult) const 
 {
     // use the FM-search replacing function Occ(c,1,i) with alphabetrank->rank(c,i)
@@ -1152,7 +891,7 @@ ulong TCImplementation::SearchLessThan(uchar const * pattern, TextPosition m, Te
     {
 //         printf("i = %lu, c = %c, sp = %lu, ep = %lu\n", i, pattern[i], sp, ep);
         c = (int)pattern[--i];
-        uint result = alphabetrank->rank(c,ep);
+        uint result = alphabetrank->rankLessThan(c,ep);
         if (result == ~0u)
             ep = 0;
         else
@@ -1168,16 +907,11 @@ ulong TCImplementation::SearchLessThan(uchar const * pattern, TextPosition m, Te
 
 
 TCImplementation::~TCImplementation() {
-#ifdef CSA_TEST_BWT
-    delete dynFMI;
-#endif
     delete alphabetrank;       
     delete sampled;
     delete suffixes;
     delete suffixDocId;
-
-    delete endmarkerDocId;
-    delete emptyTextRank;
+    delete Doc;
 }
 
 void TCImplementation::makewavelet(uchar *bwt)
@@ -1205,19 +939,18 @@ void TCImplementation::makewavelet(uchar *bwt)
 //    delete [] bwt;
     //alphabetrank = new RLWaveletTree(bwt, n); // Deletes bwt!
 //  std::cerr << "heap usage: " << HeapProfiler::GetHeapConsumption()/(1024*1024) << " Mbytes" << std::endl;
-//    std::cerr << "max heap usage before WT: " << HeapProfiler::GetMaxHeapConsumption()/(1024*1024) << " Mbytes" << std::endl;
 
+//    std::cerr << "max heap usage before WT: " << HeapProfiler::GetMaxHeapConsumption()/(1024*1024) << " Mbytes" << std::endl;
 //    HeapProfiler::ResetMaxHeapConsumption(); // FIXME remove
 
     alphabet_mapper * am = new alphabet_mapper_none();
     static_bitsequence_builder * bmb = new static_bitsequence_builder_rrr02(8); // FIXME samplerate?
-//    static_bitsequence_builder * bmb = new static_bitsequence_builder_brw32(16); // FIXME samplerate?
     wt_coder * wtc = new wt_coder_binary(bwt,n,am);
     alphabetrank = new static_sequence_wvtree(bwt,n,wtc,bmb,am);
     delete bmb;
     bwt = 0; // already deleted
    
-//    std::cerr << "heap usage: " << HeapProfiler::GetHeapConsumption()/(1024*1024) << " Mbytes" << std::endl;
+//    std::cerr << "heap usage after WT: " << HeapProfiler::GetHeapConsumption()/(1024*1024) << " Mbytes" << std::endl;
 //    std::cerr << "max heap usage after WT: " << HeapProfiler::GetMaxHeapConsumption()/(1024*1024) << " Mbytes" << std::endl;
 }
 
@@ -1239,9 +972,7 @@ void TCImplementation::maketables()
 
     // Build up arrays for text length and starting positions
     // FIXME Temp, remove
-    //BlockArray* textLength = new BlockArray(numberOfTexts, Tools::CeilLog2(maxTextLength));
     BlockArray* textStartPos = new BlockArray(numberOfTexts, Tools::CeilLog2(this->n));
-    //(*textLength)[0] = l;
     (*textStartPos)[0] = 0; 
 
     // Construct samples
@@ -1251,7 +982,7 @@ void TCImplementation::maketables()
     BlockArray* tmpSuffix = new BlockArray(sampleLength, ceilLog2n);
 
     // Mapping from end-markers to doc ID's:
-    endmarkerDocId = new BlockArray(numberOfTexts, Tools::CeilLog2(numberOfTexts));
+    BlockArray *endmarkerDocId = new BlockArray(numberOfTexts, Tools::CeilLog2(numberOfTexts));
   
     ulong *sampledpositions = new ulong[n/W+1];
     for (ulong i=0;i<n/W+1;i++)
@@ -1266,9 +997,8 @@ void TCImplementation::maketables()
     ulongmax--;
     uint alphabetrank_i_tmp =0;
 
-    //positions:
-    for (ulong i=n-1;i<ulongmax;i--) { // TODO bad solution with ulongmax?
-      // i substitutes SA->GetPos(i)
+    for (ulong i=n-1;i<ulongmax;i--) {
+        // i substitutes SA->GetPos(i)
         x=(i==n-1)?0:i+1;
 
         if (x % samplerate == 0 && posOfSuccEndmarker - x > samplerate) {
@@ -1290,7 +1020,6 @@ void TCImplementation::maketables()
             // Store text length and text start position:
             if (textId < (DocId)numberOfTexts - 1)
             {
-                //(*textLength)[textId + 1] = posOfSuccEndmarker - x;
                 (*textStartPos)[textId + 1] = x;  // x is the position of end-marker.
                 posOfSuccEndmarker = x;
             }
@@ -1298,7 +1027,7 @@ void TCImplementation::maketables()
             // LF-mapping from '\0' does not work with this (pseudo) BWT (see details from Wolfgang's thesis).
             p = textId; // Correct LF-mapping to the last char of the previous text.
         }
-        else
+        else // Now c != '\0', do LF-mapping:
             p = C[c]+alphabetrank_i_tmp-1;
     }
     assert(textId == 0);
@@ -1326,8 +1055,34 @@ void TCImplementation::maketables()
     // FIXME Temp, remove
     delete tmpSuffix;
     delete positions;
-//    delete textLength;
     delete textStartPos;
+
+    //  std::cerr << "heap usage before Doc: " << HeapProfiler::GetHeapConsumption()/(1024*1024) << " Mbytes" << std::endl;
+
+
+    uint *tmp = new uint[numberOfTexts]; // FIXME Silly...
+    for (unsigned i = 0; i < numberOfTexts; ++i)
+    {
+        tmp[i] = ((*endmarkerDocId)[i] + 1) % numberOfTexts;
+//        cout << tmp[i] << ",";
+    }
+    cout << endl;
+    delete endmarkerDocId;
+
+    alphabet_mapper * am = new alphabet_mapper_none();
+    static_bitsequence_builder * bmb = new static_bitsequence_builder_brw32(16); // FIXME samplerate?
+    Doc = new static_sequence_wvtree_noptrs(tmp, numberOfTexts, bmb, am);
+    delete bmb;
+    delete [] tmp;
+
+//    std::cerr << "heap usage after Doc: " << HeapProfiler::GetHeapConsumption()/(1024*1024) << " Mbytes" << std::endl;
+
+    /*document_result res = Doc->access(3, 3, 0, 3);
+    cout << "Access result: ";
+    for (document_result::iterator it = res.begin(); it != res.end(); ++it)
+        cout << *it << ", ";
+        cout << endl;
+        exit(0);*/
 }