summaryrefslogtreecommitdiffstats
path: root/raslib/miter.icc
blob: f4578d2f1900d65e2ee3525867acc8f9000e455d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
/*
* This file is part of rasdaman community.
*
* Rasdaman community is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* Rasdaman community is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with rasdaman community.  If not, see <http://www.gnu.org/licenses/>.
*
* Copyright 2003, 2004, 2005, 2006, 2007, 2008, 2009 Peter Baumann /
rasdaman GmbH.
*
* For more information please see <http://www.rasdaman.org>
* or contact Peter Baumann via <baumann@rasdaman.com>.
/
/**
 * SOURCE: miter.cc
 *
 * MODULE: raslib
 * CLASS:  r_Miter
 *
*/

#include "raslib/miter.hh"
#include "raslib/minterval.hh"
#include "raslib/rmdebug.hh"

inline
r_Miter::r_Miter( const r_Minterval* newAreaIter, 
		  const r_Minterval* newAreaTile, 
		  r_Bytes newCellSize, const char* newFirstCell ) 
  : areaIter(newAreaIter), areaTile(newAreaTile), cellSize(newCellSize),
    firstCell(newFirstCell), done(false)
{
  RMDBGENTER(1, RMDebug::module_raslib, "r_Miter", "r_Miter()");
  // the following initializes incArrIter and calculates the first offset
  int tIncIter = 1;     // total increment for current dimension
  int prevTIncIter = 1; // total increment for previous dimension
  r_Bytes incIter = cellSize; // current increment
  r_Dimension i;
  int firstOff = 0;

  RMDBGMIDDLE(2, RMDebug::module_raslib, "r_Miter", "area for iteration: " << *newAreaIter);
  RMDBGMIDDLE(2, RMDebug::module_raslib, "r_Miter", "whole area: " << *newAreaTile);

  // dimensionality of both areaIter and areaTile
  r_Dimension dim = areaIter->dimension();
  // stores the increments
  incArrIter = new incArrElem[dim];

  for( i=0; i<dim; i++ ) {
    // in RasDaMan the order of dimensions is the other way round!
    int r = dim - i - 1;
    // used for counting in iteration, initialize with 0
    incArrIter[i].curr = 0;
    // how often is the increment added?
    incArrIter[i].repeat = (*areaIter)[r].high() - (*areaIter)[r].low() + 1;
    RMDBGMIDDLE(4, RMDebug::module_raslib, "r_Miter", "repeat dim " << i << ": " << incArrIter[i].repeat );
    // the increment for the result tile (higher dimensions calculated 
    // further down)
    incArrIter[i].inc = incIter;
    RMDBGMIDDLE(4, RMDebug::module_raslib, "r_Miter", "incIter dim " << i << ": " << incIter );

    // calculate starting offset and increments for higher dimensions
    // firstOff is the offset in chars of the first cell
    firstOff += ((*areaIter)[r].low()-(*areaTile)[r].low()) * prevTIncIter * cellSize;
    // tInc is the increment if the dimension would be skipped
    tIncIter = ((*areaTile)[r].high()-(*areaTile)[r].low()+1) * prevTIncIter;
    // inc is the real increment, after some cells in the dimensions
    // have been iterated through.
    incIter = (tIncIter - incArrIter[i].repeat*prevTIncIter) * cellSize;
    // remember total increment of last dimension
    prevTIncIter = tIncIter;
  }
  firstCell += firstOff;
  reset();
  RMDBGEXIT(1, RMDebug::module_raslib, "r_Miter", "r_Miter()");
}

inline
r_Miter::~r_Miter() 
{
  delete [] incArrIter;
}

inline void
r_Miter::reset()
{
  currCell = (char*)firstCell;
  done = false;
  lowCount = 0;
  for( r_Dimension i=0; i<areaIter->dimension(); i++ ) {
    incArrIter[i].curr = 0;
  }
}

inline char* 
r_Miter::nextCell()
{
  // return the current cell
  char* retVal = currCell;
  r_Dimension i = 0;

  if(done)
    return retVal;
  
  // increment adresses
  currCell += incArrIter[0].inc;
  lowCount++;
  if(lowCount == incArrIter[0].repeat) {
    lowCount = 0;
    // increment other dimensions
    for(i=1; i < areaIter->dimension(); i++) {
      incArrIter[i].curr++;
      currCell += incArrIter[i].inc;
      if(incArrIter[i].curr < incArrIter[i].repeat) {
	// no overflow in this dimension
	break;
      } else {
	// overflow in this dimension
	incArrIter[i].curr = 0;
      }
    }
    if( i == areaIter->dimension() ) {
      // overflow in last dimension
      done = true;
      currCell = retVal;
    }
  }
  return retVal;
}

bool
r_Miter::isDone()
{
  return done;
}