sadwt.c

QccPack implementation in C

      for (row = 0; row < baseband_num_rows; row++)
        {
          for (col = 0; col < baseband_num_cols; col++)
            {
              input_data_vector[col] = output_data[row][col];
              input_mask_vector[col] = output_mask[row][col];
            }
          
          if (QccWAVWaveletShapeAdaptiveSynthesis1D(input_data_vector,
                                                    output_data_vector,
                                                    subsequence,
                                                    input_mask_vector,
                                                    output_mask_vector,
                                                    baseband_num_cols,
                                                    wavelet))
            {
              QccErrorAddMessage("(QccWAVWaveletInverseShapeAdaptiveDWT2D): Error calling QccWAVWaveletShapeAdaptiveSynthesis1D()");
              goto Error;
            }
          
          for (col = 0; col < baseband_num_cols; col++)
            {
              output_data[row][col] = output_data_vector[col];
              output_mask[row][col] = output_mask_vector[col];
            }
        }
    }
  
  return_value = 0;
  goto Return;
 Error:
  return_value = 1;
 Return:
  QccVectorFree(input_data_vector);
  QccVectorFree(output_data_vector);
  QccVectorFree(subsequence);
  QccVectorFree(input_mask_vector);
  QccVectorFree(output_mask_vector);
  return(return_value);
}


int QccWAVWaveletShapeAdaptiveDyadicDWT3D(const QccVolume input_data,
                                          const QccVolume input_mask,
                                          QccVolume output_data,
                                          QccVolume output_mask,
                                          int num_frames,
                                          int num_rows,
                                          int num_cols,
                                          int spatial_num_scales,
                                          const QccWAVWavelet *wavelet)
{
  int return_value;
  QccVector input_data_vector = NULL;
  QccVector output_data_vector = NULL;
  QccVector subsequence = NULL;
  QccVector input_mask_vector = NULL;
  QccVector output_mask_vector = NULL;
  int scale;
  int frame, row, col;
  int baseband_num_frames;
  int baseband_num_rows;
  int baseband_num_cols;
  int temp_length;

  temp_length = QccMathMax(num_frames, QccMathMax(num_rows, num_cols));

  /* Allocate temporary working arrays */
  if ((input_data_vector =
       QccVectorAlloc(temp_length)) == NULL)
    {
      QccErrorAddMessage("(QccWaveletShapeAdaptiveDyadicDWT3D): Error calling VectorAlloc()");
      goto Error;
    }
  if ((output_data_vector =
       QccVectorAlloc(temp_length)) == NULL)
    {
      QccErrorAddMessage("(QccWaveletShapeAdaptiveDyadicDWT3D): Error calling VectorAlloc()");
      goto Error;
    }
  if ((subsequence =
       QccVectorAlloc(temp_length)) == NULL)
    {
      QccErrorAddMessage("(QccWaveletShapeAdaptiveDyadicDWT3D): Error calling VectorAlloc()");
      goto Error;
    }
  if ((input_mask_vector =
       QccVectorAlloc(temp_length)) == NULL)
    {
      QccErrorAddMessage("(QccWaveletShapeAdaptiveDyadicDWT3D): Error calling VectorAlloc()");
      goto Error;
    }
  if ((output_mask_vector =
       QccVectorAlloc(temp_length)) == NULL)
    {
      QccErrorAddMessage("(QccWaveletShapeAdaptiveDyadicDWT3D): Error calling VectorAlloc()");
      goto Error;
    }
  
  if (QccVolumeCopy(output_data, input_data, num_frames, num_rows, num_cols))
    {
      QccErrorAddMessage("(QccWaveletShapeAdaptiveDyadicDWT3D): Error calling QccVolumeCopy()");
      goto Error;
    }
  if (QccVolumeCopy(output_mask, input_mask, num_frames, num_rows, num_cols))
    {
      QccErrorAddMessage("(QccWaveletShapeAdaptiveDyadicDWT3D): Error calling QccVolumeCopy()");
      goto Error;
    }
  
  for (scale = 0; scale < spatial_num_scales; scale++)
    {
      baseband_num_frames =
        QccWAVWaveletDWTSubbandLength(num_frames, scale, 0, 0, 0);
      baseband_num_rows =
        QccWAVWaveletDWTSubbandLength(num_rows, scale, 0, 0, 0);
      baseband_num_cols =
        QccWAVWaveletDWTSubbandLength(num_cols, scale, 0, 0, 0);
      
      for (frame = 0; frame < baseband_num_frames; frame++)
        for (row = 0; row < baseband_num_rows; row++)
          {
            for (col = 0; col < baseband_num_cols; col++)
              {
                input_data_vector[col] = output_data[frame][row][col];
                input_mask_vector[col] = output_mask[frame][row][col];
              }
            
            if (QccWAVWaveletShapeAdaptiveAnalysis1D(input_data_vector,
                                                     output_data_vector,
                                                     subsequence,
                                                     input_mask_vector,
                                                     output_mask_vector,
                                                     baseband_num_cols,
                                                     wavelet))
              {
                QccErrorAddMessage("(QccWAVWaveletShapeAdaptiveDyadicDWT3D): Error calling QccWAVWaveletShapeAdaptiveAnalysis1D()");
                goto Error;
              }
            
            for (col = 0; col < baseband_num_cols; col++)
              {
                output_data[frame][row][col] = output_data_vector[col];
                output_mask[frame][row][col] = output_mask_vector[col];
              }
          }
      
      for (frame = 0; frame < baseband_num_frames; frame++)
        for (col = 0; col < baseband_num_cols; col++)
          {
            for (row = 0; row < baseband_num_rows; row++)
              {
                input_data_vector[row] = output_data[frame][row][col];
                input_mask_vector[row] = output_mask[frame][row][col];
              }
            
            if (QccWAVWaveletShapeAdaptiveAnalysis1D(input_data_vector,
                                                     output_data_vector,
                                                     subsequence,
                                                     input_mask_vector,
                                                     output_mask_vector,
                                                     baseband_num_rows,
                                                     wavelet))
              {
                QccErrorAddMessage("(QccWAVWaveletShapeAdaptiveDyadicDWT3D): Error calling QccWAVWaveletShapeAdaptiveAnalysis1D()");
                goto Error;
              }
            
            for (row = 0; row < baseband_num_rows; row++)
              {
                output_data[frame][row][col] = output_data_vector[row];
                output_mask[frame][row][col] = output_mask_vector[row];
              }
          }
      
      for (row = 0; row < baseband_num_rows; row++)
        for (col = 0; col < baseband_num_cols; col++)
          {
            for (frame = 0; frame < baseband_num_frames; frame++)
              {
                input_data_vector[frame] = output_data[frame][row][col];
                input_mask_vector[frame] = output_mask[frame][row][col];
              }
            
            if (QccWAVWaveletShapeAdaptiveAnalysis1D(input_data_vector,
                                                     output_data_vector,
                                                     subsequence,
                                                     input_mask_vector,
                                                     output_mask_vector,
                                                     baseband_num_frames,
                                                     wavelet))
              {
                QccErrorAddMessage("(QccWAVWaveletShapeAdaptiveDyadicDWT3D): Error calling QccWAVWaveletShapeAdaptiveAnalysis1D()");
                goto Error;
              }
            
            for (frame = 0; frame < baseband_num_frames; frame++)
              {
                output_data[frame][row][col] = output_data_vector[frame];
                output_mask[frame][row][col] = output_mask_vector[frame];
              }
          }
    }
      
  return_value = 0;
  goto Return;
 Error:
  return_value = 1;
 Return:
  QccVectorFree(input_data_vector);
  QccVectorFree(output_data_vector);
  QccVectorFree(subsequence);
  QccVectorFree(input_mask_vector);
  QccVectorFree(output_mask_vector);
  return(return_value);
}


int QccWAVWaveletInverseShapeAdaptiveDyadicDWT3D(const QccVolume input_data,
                                                 const QccVolume input_mask,
                                                 QccVolume output_data,
                                                 QccVolume output_mask,
                                                 int num_frames,
                                                 int num_rows,
                                                 int num_cols,
                                                 int spatial_num_scales,
                                                 const QccWAVWavelet *wavelet)
{
  int return_value;
  QccVector input_data_vector = NULL;
  QccVector output_data_vector = NULL;
  QccVector subsequence = NULL;
  QccVector input_mask_vector = NULL;
  QccVector output_mask_vector = NULL;
  int scale;
  int frame, row, col;
  int baseband_num_frames;
  int baseband_num_rows;
  int baseband_num_cols;
  int temp_length;

  temp_length = QccMathMax(num_frames, QccMathMax(num_rows, num_cols));

  /* Allocate temporary working arrays */
  if ((input_data_vector =
       QccVectorAlloc(temp_length)) == NULL)
    {
      QccErrorAddMessage("(QccWAVWaveletInverseShapeAdaptiveDyadicDWT3D): Error calling QccVectorAlloc()");
      goto Error;
    }
  if ((output_data_vector =
       QccVectorAlloc(temp_length)) == NULL)
    {
      QccErrorAddMessage("(QccWAVWaveletInverseShapeAdaptiveDyadicDWT3D): Error calling QccVectorAlloc()");
      goto Error;
    }
  if ((subsequence =
       QccVectorAlloc(temp_length)) == NULL)
    {
      QccErrorAddMessage("(QccWAVWaveletInverseShapeAdaptiveDyadicDWT3D): Error calling QccVectorAlloc()");
      goto Error;
    }
  if ((input_mask_vector =
       QccVectorAlloc(temp_length)) == NULL)
    {
      QccErrorAddMessage("(QccWAVWaveletInverseShapeAdaptiveDyadicDWT3D): Error calling QccVectorAlloc()");
      goto Error;
    }
  if ((output_mask_vector =
       QccVectorAlloc(temp_length)) == NULL)
    {
      QccErrorAddMessage("(QccWAVWaveletInverseShapeAdaptiveDyadicDWT3D): Error calling QccVectorAlloc()");
      goto Error;
    }
  
  if (QccVolumeCopy(output_data, input_data, num_frames, num_rows, num_cols))
    {
      QccErrorAddMessage("(QccWaveletInverseShapeAdaptiveDyadicDWT3D): Error calling QccVolumeCopy()");
      goto Error;
    }
  if (QccVolumeCopy(output_mask, input_mask, num_frames, num_rows, num_cols))
    {
      QccErrorAddMessage("(QccWaveletInverseShapeAdaptiveDyadicDWT3D): Error calling QccVolumeCopy()");
      goto Error;
    }
  
  for (scale = spatial_num_scales - 1; scale >= 0; scale--)
    {
      baseband_num_frames =
        QccWAVWaveletDWTSubbandLength(num_frames, scale, 0, 0, 0);
      baseband_num_rows =
        QccWAVWaveletDWTSubbandLength(num_rows, scale, 0, 0, 0);
      baseband_num_cols =
        QccWAVWaveletDWTSubbandLength(num_cols, scale, 0, 0, 0);
      
      for (row = 0; row < baseband_num_rows; row++)
        for (col = 0; col < baseband_num_cols; col++)
          {
            for (frame = 0; frame < baseband_num_frames; frame++)
              {
                input_data_vector[frame] = output_data[frame][row][col];
                input_mask_vector[frame] = output_mask[frame][row][col];
              }
            
            if (QccWAVWaveletShapeAdaptiveSynthesis1D(input_data_vector,
                                                      output_data_vector,
                                                      subsequence,
                                                      input_mask_vector,
                                                      output_mask_vector,
                                                      baseband_num_frames,
                                                      wavelet))
              {
                QccErrorAddMessage("(QccWAVWaveletInverseShapeAdaptiveDyadicDWT3D): Error calling QccWAVWaveletShapeAdaptiveSynthesis1D()");
                goto Error;
              }
            
            for (frame = 0; frame < baseband_num_frames; frame++)
              {
                output_data[frame][row][col] = output_data_vector[frame];
                output_mask[frame][row][col] = output_mask_vector[frame];
              }
          }
      
      for (frame = 0; frame < baseband_num_frames; frame++)
        for (col = 0; col < baseband_num_cols; col++)
          {
            for (row = 0; row < baseband_num_rows; row++)
              {
                input_data_vector[row] = output_data[frame][row][col];
                input_mask_vector[row] = output_mask[frame][row][col];
              }
            
            if (QccWAVWaveletShapeAdaptiveSynthesis1D(input_data_vector,