/*--------------------------------------------------------------------
 * FICHERO:  TifLeBBN.c
 * OBJETIVO: Definir la funcin Tif_LeeBandaBN()
 * AUTOR:    Pedro Reina
 * FECHA:    V.14.7.1995
 *------------------------------------------------------------------*/

/*--------------------------------------------------------------------
 * Ficheros de cabecera
 *------------------------------------------------------------------*/

#include "Tiff.h"

/*--------------------------------------------------------------------
 * Definicin de funciones
 *------------------------------------------------------------------*/

/*--------------------------------------------------------------Olimpo
 * FUNCION:  Tif_LeeBandaBN()
 * OBJETIVO: Leer los datos que realmente expresan una banda de
 *           la imagen que se est manejando y est en blanco 
 *           y negro sin comprimir
 * ENTRADAS: Un tiff, el nmero de banda y la direccin de 
 *           memoria donde dejar los datos
 * SALIDAS:  Lgica, que indica que todo ha ido bien
 * EJEMPLO:  Tif_LeeBandaBN ( Imagen, 2, Aux )
 * NOTAS:    1. Se asume que la banda existe
 *           2. Las bandas se empiezan a numerar en 0
 *           3. Si la imagen slo tiene una banda, esta funcin
 *              lee la nica banda, aunque se pida otra
 *------------------------------------------------------------------*/
logico Tif_LeeBandaBN (Tiff, Banda, Dato)
tiff     Tiff;
contador Banda;
memoria  Dato;
  {
  logico Respuesta = NO;
  entero Tamano, Pos;

  if ( Tif_Compresion(Tiff) == TIF_SIN_COMPRESION )
    {
    if ( (Pos = Tif_Desplazamiento(Tiff,Banda))  &&
         (Tamano = Tif_TamanoBanda(Tiff, Banda)) &&
         Fch_Coloca (Tif_Fichero(Tiff), Pos)     &&
         Fch_LeeOcteto (Tif_Fichero(Tiff), Dato, Tamano) )
      { Respuesta = SI; }
    }
    
  return ( Respuesta );
  }
