RepositoryMapcodeFile.h

#ifndef RepositoryMapcodeFile_H
#define RepositoryMapcodeFile_H


#include <stdio.h>
#include "xfile.h"
#include <string>
#include "TokenFinder.h"
#include "WordIter.h"
#include "TokenIter.h"

#include "IMapcodeRepository.h"
#include "Mapcode.h"
#include "defs.h"



class RepositoryMapcodeFile : public IMapcodeRepository {
public:
        void save( const Mapcode * mapcode, const string fileName  );

        Mapcode * load( string filenName );
};

void 
RepositoryMapcodeFile::save( const Mapcode * mapcode, const string fileName ) {
        long storage_type = 0;  
        string buffer;
        long lSize;
        int i,j;
        

        CxFile dataf( storage_type );
        dataf.Open(  fileName.c_str(), "w" ); 

        int d           = mapcode->getNumVar(); 
        int xDim        = mapcode->getDimensions(0);
        int yDim        = mapcode->getDimensions(1);
        int l           = mapcode->getLattice();
        int n           = mapcode->getNeighborType();
        int m           = mapcode->getMapSize();
        
        buffer = inttostr( d ) + "";
        buffer += " " + inttostr( xDim ) + " " + inttostr( yDim ) + " ";
        buffer += " " + inttolattice( l ) + " " + inttoneigh( n ) + "\n";
        

        for (i=1; i<= m; i++ ) {
                for (j=1; j<= d; j++ )                  
                        buffer += "  " + flttostr( mapcode->getCodebook()[i][j] ) + "  ";
                buffer += "\n";         
        }

        lSize = buffer.size();
        dataf.Write( buffer.c_str(), lSize, 1 );
        dataf.Close();

};

Mapcode *
RepositoryMapcodeFile::load( string fileName ) {
        long storage_type = 0;
        long lSize;
        char* buffer;
        typedef vector<float> VecInt;
        typedef vector< VecInt > MatrixInt;
        TvecLabel lvec;
        MatrixInt mat;
        VecInt vec;
        MatrixInt::iterator im;
        VecInt::iterator        iv;

        int dimension, xDim, yDim;
        string neighboor_str, lattice_str;

        int cont, contd;
        
  
        CxFile dataf( storage_type );
        dataf.Open(  fileName.c_str(), "rb" ); 
        
        lSize = dataf.Size();

        buffer = (char*) malloc (lSize);
                        
        if (buffer == NULL) exit (2);
                        
        dataf.Read( buffer, 1, lSize );
        string data( buffer );
        
        token::WordIter wi(data);

        cont = 0; contd = 1;
    while (wi != token::WordIter())
    {
                if ( isValid( *wi ) ) {
                        if (cont==0) 
                        {
                                dimension =  strtoint( *wi );                           
                        }
                        else
                        if ( cont == 1 )
                        {
                                xDim = strtoint( *wi );
                        }
                        else
                        if ( cont == 2 )
                        {
                                yDim = strtoint( *wi );
                        }
                        else
                        if ( cont == 3 )
                        {
                                lattice_str =  *wi ;
                        }
                        else
                        if ( cont == 4 )
                        {
                                neighboor_str =  *wi ;
                        }
                        else 
                        {
                                if ( contd == dimension ) 
                                {
                                        contd = 1;
                                        vec.push_back( strtofloat(*wi) );
                                        mat.push_back( vec );
                                        vec.clear();                            
                                }
                                else
                                        if ( isNumeric( *wi ) ) 
                                        {
                                                vec.push_back( strtofloat(*wi) );
                                                contd++;
                                        }
                                        else
                                                lvec.push_back( *wi );                                                  
                        }                                               
                        cont++;
                }               
        ++wi;           
    } 

        TMatrix mdata = create_matrix( 1, mat.size(), 1, dimension );
        int i, j; i = j = 1;
                        
        for (im=mat.begin(); im<mat.end(); im++) {
                j = 1;                          
                for (iv=(*im).begin(); iv < (*im).end(); iv++) 
                {
                        mdata[i][j] = *iv;                                                                      
                        j++;
                }
                i++;
        }

        Mapcode * mapcode_data = new Mapcode;

                
        mapcode_data->setNumVar( dimension );
        mapcode_data->setDimensions(0, xDim );
        mapcode_data->setDimensions(1, yDim );
        mapcode_data->setDimension( DTWO );
        mapcode_data->setCodebook( mdata );
        mapcode_data->setLattice( lattice_str );
        mapcode_data->setTopolParamsText( "Two" );
        mapcode_data->setNeighborType( neighboor_str );

                        
        free(buffer);
        dataf.Close();

        return mapcode_data;
};

#endif

---