]>
git.saurik.com Git - wxWidgets.git/blob - src/tiff/test/check_tag.c
   4  * Copyright (c) 2004, Andrey Kiselev  <dron@ak4719.spb.edu> 
   6  * Permission to use, copy, modify, distribute, and sell this software and  
   7  * its documentation for any purpose is hereby granted without fee, provided 
   8  * that (i) the above copyright notices and this permission notice appear in 
   9  * all copies of the software and related documentation, and (ii) the names of 
  10  * Sam Leffler and Silicon Graphics may not be used in any advertising or 
  11  * publicity relating to the software without the specific, prior written 
  12  * permission of Sam Leffler and Silicon Graphics. 
  14  * THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND,  
  15  * EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY  
  16  * WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.   
  18  * IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR 
  19  * ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND, 
  20  * OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, 
  21  * WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF  
  22  * LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE  
  29  * Module to test LONG tags read/write functions. 
  35 CheckShortField(TIFF 
*tif
, ttag_t field
, uint16 value
) 
  39         if (!TIFFGetField(tif
, field
, &tmp
)) { 
  40                 fprintf (stderr
, "Problem fetching tag %lu.\n", 
  41                          (unsigned long) field
); 
  45                 fprintf (stderr
, "Wrong SHORT value fetched for tag %lu.\n", 
  46                          (unsigned long) field
); 
  54 CheckLongField(TIFF 
*tif
, ttag_t field
, uint32 value
) 
  58         if (!TIFFGetField(tif
, field
, &tmp
)) { 
  59                 fprintf (stderr
, "Problem fetching tag %lu.\n", 
  60                          (unsigned long) field
); 
  64                 fprintf (stderr
, "Wrong LONG value fetched for tag %lu.\n", 
  65                          (unsigned long) field
);