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   for(uint i=0;i<n;i++)
  45     symbols[i] = (uchar)am->unmap((uint)symbols[i]);
  46 }
  47
  48 static_sequence_wvtree::static_sequence_wvtree() {}
  49
  50 static_sequence_wvtree::~static_sequence_wvtree() {
  51         delete root;
  52         am->unuse();
  53   c->unuse();
  54 }
  55
  56 uint static_sequence_wvtree::rank(uint symbol, uint pos) {
  57         return root->rank(am->map(symbol), pos, 0, c);
  58 }
  59
  60 uint static_sequence_wvtree::count(uint s) {
  61   return root->rank(am->map(s), len-1, 0, c);
  62 }
  63
  64 uint static_sequence_wvtree::select(uint symbol, uint pos) {
  65         uint ret = root->select(am->map(symbol), pos, 0, c);
  66         if(ret==((uint)-1)) return (uint)-1;
  67         return ret-1;
  68 }
  69
  70 uint static_sequence_wvtree::access(uint pos) {
  71         return am->unmap(root->access(pos));
  72 }
  73
  74 uint static_sequence_wvtree::size() {
  75         /*cout << "WT: " << root->size() << endl;
  76         cout << "Coder: " << c->size() << endl;
  77         cout << "AM: " << am->size() << endl;*/
  78         return sizeof(static_sequence_wvtree)+sizeof(uint)+root->size()+am->size()+c->size();
  79 }
  80
  81 uint static_sequence_wvtree::save(FILE * fp) {
  82   uint wr = WVTREE_HDR;
  83   wr = fwrite(&wr,sizeof(uint),1,fp);
  84   if(wr!=1) return 1;
  85   wr = fwrite(&n,sizeof(uint),1,fp);
  86   if(wr!=1) return 1;
  87   if(c->save(fp)) return 1;
  88   if(am->save(fp)) return 1;
  89   if(root->save(fp)) return 1;
  90   return 0;
  91 }
  92
  93 static_sequence_wvtree * static_sequence_wvtree::load(FILE *fp) {
  94   uint rd;
  95   if(fread(&rd,sizeof(uint),1,fp)!=1) return NULL;
  96   if(rd!=WVTREE_HDR) return NULL;
  97   static_sequence_wvtree * ret = new static_sequence_wvtree();
  98   if(fread(&ret->n,sizeof(uint),1,fp)!=1) return NULL;
  99   ret->c = wt_coder::load(fp);
 100         ret->c->use();
 101   ret->am = alphabet_mapper::load(fp);
 102         ret->am->use();
 103   ret->root = wt_node::load(fp);
 104   return ret;
 105 }