libcds/src/static_sequence/static_sequence_wvtree.cpp

   1 /* static_sequence_wvtree.cpp
   2  * Copyright (C) 2008, Francisco Claude, all rights reserved.
   3  *
   4  * static_sequence_wvtree definition
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  19  *
  20  */
  21
  22 #include <static_sequence_wvtree.h>
  23
  24 static_sequence_wvtree::static_sequence_wvtree(uint * symbols, uint n, wt_coder * c, static_bitsequence_builder * bmb, alphabet_mapper * am) {
  25   for(uint i=0;i<n;i++)
  26     symbols[i] = am->map(symbols[i]);
  27   this->am = am;
  28         am->use();
  29   this->c=c;
  30         c->use();
  31         root = new wt_node_internal(symbols, n, 0, c, bmb);
  32   for(uint i=0;i<n;i++)
  33     symbols[i] = am->unmap(symbols[i]);
  34 }
  35
  36 static_sequence_wvtree::static_sequence_wvtree(uchar * symbols, uint n, wt_coder * c, static_bitsequence_builder * bmb, alphabet_mapper * am) {
  37   for(uint i=0;i<n;i++)
  38     symbols[i] = (uchar)am->map((uint)symbols[i]);
  39   this->am = am;
  40         am->use();
  41   this->c=c;
  42         c->use();
  43         root = new wt_node_internal(symbols, n, 0, c, bmb);
  44         symbols = 0; // Already deleted!
  45 //  for(uint i=0;i<n;i++)
  46 //    symbols[i] = (uchar)am->unmap((uint)symbols[i]);
  47 }
  48
  49 static_sequence_wvtree::static_sequence_wvtree() {}
  50
  51 static_sequence_wvtree::~static_sequence_wvtree() {
  52         delete root;
  53         am->unuse();
  54   c->unuse();
  55 }
  56
  57 uint static_sequence_wvtree::rank(uint symbol, uint pos) {
  58         return root->rank(am->map(symbol), pos, 0, c);
  59 }
  60
  61 uint static_sequence_wvtree::count(uint s) {
  62   return root->rank(am->map(s), len-1, 0, c);
  63 }
  64
  65 uint static_sequence_wvtree::select(uint symbol, uint pos) {
  66         uint ret = root->select(am->map(symbol), pos, 0, c);
  67         if(ret==((uint)-1)) return (uint)-1;
  68         return ret-1;
  69 }
  70
  71 uint static_sequence_wvtree::access(uint pos) {
  72         return am->unmap(root->access(pos));
  73 }
  74
  75 uint static_sequence_wvtree::size() {
  76         /*cout << "WT: " << root->size() << endl;
  77         cout << "Coder: " << c->size() << endl;
  78         cout << "AM: " << am->size() << endl;*/
  79         return sizeof(static_sequence_wvtree)+sizeof(uint)+root->size()+am->size()+c->size();
  80 }
  81
  82 uint static_sequence_wvtree::save(FILE * fp) {
  83   uint wr = WVTREE_HDR;
  84   wr = fwrite(&wr,sizeof(uint),1,fp);
  85   if(wr!=1) return 1;
  86   wr = fwrite(&n,sizeof(uint),1,fp);
  87   if(wr!=1) return 1;
  88   if(c->save(fp)) return 1;
  89   if(am->save(fp)) return 1;
  90   if(root->save(fp)) return 1;
  91   return 0;
  92 }
  93
  94 static_sequence_wvtree * static_sequence_wvtree::load(FILE *fp) {
  95   uint rd;
  96   if(fread(&rd,sizeof(uint),1,fp)!=1) return NULL;
  97   if(rd!=WVTREE_HDR) return NULL;
  98   static_sequence_wvtree * ret = new static_sequence_wvtree();
  99   if(fread(&ret->n,sizeof(uint),1,fp)!=1) return NULL;
 100   ret->c = wt_coder::load(fp);
 101         ret->c->use();
 102   ret->am = alphabet_mapper::load(fp);
 103         ret->am->use();
 104   ret->root = wt_node::load(fp);
 105   return ret;
 106 }