home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Programmierung / SOURCE.mdf / programm / msdos / c / xv221src / tiff / tif_aux.c < prev    next >
C/C++ Source or Header  |  1992-04-01  |  6KB  |  182 lines

  1. #ifndef lint
  2. static char rcsid[] = "$Header: /usr/people/sam/tiff/libtiff/RCS/tif_aux.c,v 1.8 92/03/27 14:53:02 sam Exp $";
  3. #endif
  4.  
  5. /*
  6.  * Copyright (c) 1991, 1992 Sam Leffler
  7.  * Copyright (c) 1991, 1992 Silicon Graphics, Inc.
  8.  *
  9.  * Permission to use, copy, modify, distribute, and sell this software and 
  10.  * its documentation for any purpose is hereby granted without fee, provided
  11.  * that (i) the above copyright notices and this permission notice appear in
  12.  * all copies of the software and related documentation, and (ii) the names of
  13.  * Sam Leffler and Silicon Graphics may not be used in any advertising or
  14.  * publicity relating to the software without the specific, prior written
  15.  * permission of Sam Leffler and Silicon Graphics.
  16.  * 
  17.  * THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND, 
  18.  * EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY 
  19.  * WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.  
  20.  * 
  21.  * IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR
  22.  * ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND,
  23.  * OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
  24.  * WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF 
  25.  * LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE 
  26.  * OF THIS SOFTWARE.
  27.  */
  28.  
  29. /*
  30.  * TIFF Library.
  31.  *
  32.  * Auxiliary Support Routines.
  33.  */
  34. #include "tiffioP.h"
  35. #include "prototypes.h"
  36.  
  37. /*
  38.  * Like TIFFGetField, but return any default
  39.  * value if the tag is not present in the directory.
  40.  *
  41.  * NB:    We use the value in the directory, rather than
  42.  *    explcit values so that defaults exist only one
  43.  *    place in the library -- in TIFFDefaultDirectory.
  44.  */
  45. TIFFVGetFieldDefaulted(tif, tag, ap)
  46.     TIFF *tif;
  47.     int tag;
  48.     va_list ap;
  49. {
  50.     TIFFDirectory *td = &tif->tif_dir;
  51.     int i;
  52.  
  53.     if (TIFFVGetField(tif, tag, ap))
  54.         return (1);
  55.     switch (tag) {
  56.     case TIFFTAG_SUBFILETYPE:
  57.         *va_arg(ap, u_short *) = td->td_subfiletype;
  58.         return (1);
  59.     case TIFFTAG_BITSPERSAMPLE:
  60.         *va_arg(ap, u_short *) = td->td_bitspersample;
  61.         return (1);
  62.     case TIFFTAG_THRESHHOLDING:
  63.         *va_arg(ap, u_short *) = td->td_threshholding;
  64.         return (1);
  65.     case TIFFTAG_FILLORDER:
  66.         *va_arg(ap, u_short *) = td->td_fillorder;
  67.         return (1);
  68.     case TIFFTAG_ORIENTATION:
  69.         *va_arg(ap, u_short *) = td->td_orientation;
  70.         return (1);
  71.     case TIFFTAG_SAMPLESPERPIXEL:
  72.         *va_arg(ap, u_short *) = td->td_samplesperpixel;
  73.         return (1);
  74.     case TIFFTAG_ROWSPERSTRIP:
  75.         *va_arg(ap, u_long *) = td->td_rowsperstrip;
  76.         return (1);
  77.     case TIFFTAG_MINSAMPLEVALUE:
  78.         *va_arg(ap, u_short *) = td->td_minsamplevalue;
  79.         return (1);
  80.     case TIFFTAG_MAXSAMPLEVALUE:
  81.         *va_arg(ap, u_short *) = td->td_maxsamplevalue;
  82.         return (1);
  83.     case TIFFTAG_PLANARCONFIG:
  84.         *va_arg(ap, u_short *) = td->td_planarconfig;
  85.         return (1);
  86.     case TIFFTAG_GROUP4OPTIONS:
  87.         *va_arg(ap, u_long *) = td->td_group4options;
  88.         return (1);
  89.     case TIFFTAG_RESOLUTIONUNIT:
  90.         *va_arg(ap, u_short *) = td->td_resolutionunit;
  91.         return (1);
  92.     case TIFFTAG_PREDICTOR:
  93.         *va_arg(ap, u_short *) = td->td_predictor;
  94.         return (1);
  95. #ifdef CMYK_SUPPORT
  96.     case TIFFTAG_DOTRANGE:
  97.         *va_arg(ap, u_short *) = 0;
  98.         *va_arg(ap, u_short *) = (1<<td->td_bitspersample)-1;
  99.         return (1);
  100.     case TIFFTAG_INKSET:
  101.         *va_arg(ap, u_short *) = td->td_inkset;
  102.         return (1);
  103. #endif
  104.     case TIFFTAG_TILEDEPTH:
  105.         *va_arg(ap, u_long *) = td->td_tiledepth;
  106.         return (1);
  107.     case TIFFTAG_DATATYPE:
  108.         *va_arg(ap, u_short *) = td->td_sampleformat-1;
  109.         return (1);
  110.     case TIFFTAG_IMAGEDEPTH:
  111.         *va_arg(ap, u_short *) = td->td_imagedepth;
  112.         return (1);
  113. #ifdef YCBCR_SUPPORT
  114.     case TIFFTAG_YCBCRCOEFFICIENTS:
  115.         if (!td->td_ycbcrcoeffs) {
  116.             td->td_ycbcrcoeffs = (float *)malloc(3*sizeof (float));
  117.             /* defaults are from CCIR Recommendation 601-1 */
  118.             td->td_ycbcrcoeffs[0] = .299;
  119.             td->td_ycbcrcoeffs[1] = .587;
  120.             td->td_ycbcrcoeffs[2] = .114;
  121.         }
  122.         *va_arg(ap, float **) = td->td_ycbcrcoeffs;
  123.         return (1);
  124.     case TIFFTAG_YCBCRSUBSAMPLING:
  125.         *va_arg(ap, u_short *) = td->td_ycbcrsubsampling[0];
  126.         *va_arg(ap, u_short *) = td->td_ycbcrsubsampling[1];
  127.         return (1);
  128.     case TIFFTAG_YCBCRPOSITIONING:
  129.         *va_arg(ap, u_short *) = td->td_ycbcrpositioning;
  130.         return (1);
  131. #endif
  132. #ifdef COLORIMETRY_SUPPORT
  133.     case TIFFTAG_TRANSFERFUNCTION:
  134.         if (!td->td_transferfunction[0]) {
  135.             u_short **tf = td->td_transferfunction;
  136.             int n = 1<<td->td_bitspersample;
  137.  
  138.             tf[0] = (u_short *)malloc(n * sizeof (u_short));
  139.             tf[0][0] = 0;
  140.             for (i = 1; i < n; i++)
  141.                 tf[0][i] = (u_short)
  142.                     floor(65535.*pow(i/(n-1.), 2.2) + .5);
  143.             for (i = 1; i < td->td_samplesperpixel; i++) {
  144.                 tf[i] = (u_short *)malloc(n * sizeof (u_short));
  145.                 bcopy(tf[0], tf[i], n * sizeof (u_short));
  146.             }
  147.         }
  148.         for (i = 0; i < td->td_samplesperpixel; i++)
  149.             *va_arg(ap, u_short **) = td->td_transferfunction[i];
  150.         return (1);
  151.     case TIFFTAG_REFERENCEBLACKWHITE:
  152.         if (!td->td_refblackwhite) {
  153.             td->td_refblackwhite = (float *)
  154.                 malloc(2*td->td_samplesperpixel * sizeof (float));
  155.             for (i = 0; i < td->td_samplesperpixel; i++) {
  156.                 td->td_refblackwhite[2*i+0] = 0;
  157.                 td->td_refblackwhite[2*i+1] = 1L<<td->td_bitspersample;
  158.             }
  159.         }
  160.         *va_arg(ap, float **) = td->td_refblackwhite;
  161.         return (1);
  162. #endif
  163.     }
  164.     return (0);
  165. }
  166.  
  167. /*
  168.  * Like TIFFGetField, but return any default
  169.  * value if the tag is not present in the directory.
  170.  */
  171. /*VARARGS2*/
  172. DECLARE2V(TIFFGetFieldDefaulted, TIFF*, tif, int, tag)
  173. {
  174.     int ok;
  175.     va_list ap;
  176.  
  177.     VA_START(ap, tag);
  178.     ok =  TIFFVGetFieldDefaulted(tif, tag, ap);
  179.     va_end(ap);
  180.     return (ok);
  181. }
  182.