| [95] | 1 | /* $Id: tif_close.c,v 1.9 2005/11/23 22:20:56 dron Exp $ */
|
|---|
| 2 |
|
|---|
| 3 | /*
|
|---|
| 4 | * Copyright (c) 1988-1997 Sam Leffler
|
|---|
| 5 | * Copyright (c) 1991-1997 Silicon Graphics, Inc.
|
|---|
| 6 | *
|
|---|
| 7 | * Permission to use, copy, modify, distribute, and sell this software and
|
|---|
| 8 | * its documentation for any purpose is hereby granted without fee, provided
|
|---|
| 9 | * that (i) the above copyright notices and this permission notice appear in
|
|---|
| 10 | * all copies of the software and related documentation, and (ii) the names of
|
|---|
| 11 | * Sam Leffler and Silicon Graphics may not be used in any advertising or
|
|---|
| 12 | * publicity relating to the software without the specific, prior written
|
|---|
| 13 | * permission of Sam Leffler and Silicon Graphics.
|
|---|
| 14 | *
|
|---|
| 15 | * THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND,
|
|---|
| 16 | * EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY
|
|---|
| 17 | * WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.
|
|---|
| 18 | *
|
|---|
| 19 | * IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR
|
|---|
| 20 | * ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND,
|
|---|
| 21 | * OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
|
|---|
| 22 | * WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF
|
|---|
| 23 | * LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE
|
|---|
| 24 | * OF THIS SOFTWARE.
|
|---|
| 25 | */
|
|---|
| 26 |
|
|---|
| 27 | /*
|
|---|
| 28 | * TIFF Library.
|
|---|
| 29 | */
|
|---|
| 30 | #include "tiffiop.h"
|
|---|
| 31 |
|
|---|
| 32 | /************************************************************************/
|
|---|
| 33 | /* TIFFCleanup() */
|
|---|
| 34 | /************************************************************************/
|
|---|
| 35 |
|
|---|
| 36 | /**
|
|---|
| 37 | * Auxiliary function to free the TIFF structure. Given structure will be
|
|---|
| 38 | * completetly freed, so you should save opened file handle and pointer
|
|---|
| 39 | * to the close procedure in external variables before calling
|
|---|
| 40 | * _TIFFCleanup(), if you will need these ones to close the file.
|
|---|
| 41 | *
|
|---|
| 42 | * @param tif A TIFF pointer.
|
|---|
| 43 | */
|
|---|
| 44 |
|
|---|
| 45 | void
|
|---|
| 46 | TIFFCleanup(TIFF* tif)
|
|---|
| 47 | {
|
|---|
| 48 | if (tif->tif_mode != O_RDONLY)
|
|---|
| 49 | /*
|
|---|
| 50 | * Flush buffered data and directory (if dirty).
|
|---|
| 51 | */
|
|---|
| 52 | TIFFFlush(tif);
|
|---|
| 53 | (*tif->tif_cleanup)(tif);
|
|---|
| 54 | TIFFFreeDirectory(tif);
|
|---|
| 55 |
|
|---|
| 56 | if (tif->tif_dirlist)
|
|---|
| 57 | _TIFFfree(tif->tif_dirlist);
|
|---|
| 58 |
|
|---|
| 59 | /* Clean up client info links */
|
|---|
| 60 | while( tif->tif_clientinfo )
|
|---|
| 61 | {
|
|---|
| 62 | TIFFClientInfoLink *link = tif->tif_clientinfo;
|
|---|
| 63 |
|
|---|
| 64 | tif->tif_clientinfo = link->next;
|
|---|
| 65 | _TIFFfree( link->name );
|
|---|
| 66 | _TIFFfree( link );
|
|---|
| 67 | }
|
|---|
| 68 |
|
|---|
| 69 | if (tif->tif_rawdata && (tif->tif_flags&TIFF_MYBUFFER))
|
|---|
| 70 | _TIFFfree(tif->tif_rawdata);
|
|---|
| 71 | if (isMapped(tif))
|
|---|
| 72 | TIFFUnmapFileContents(tif, tif->tif_base, tif->tif_size);
|
|---|
| 73 |
|
|---|
| 74 | /* Clean up custom fields */
|
|---|
| 75 | if (tif->tif_nfields > 0)
|
|---|
| 76 | {
|
|---|
| 77 | size_t i;
|
|---|
| 78 |
|
|---|
| 79 | for (i = 0; i < tif->tif_nfields; i++)
|
|---|
| 80 | {
|
|---|
| 81 | TIFFFieldInfo *fld = tif->tif_fieldinfo[i];
|
|---|
| 82 | if (fld->field_bit == FIELD_CUSTOM &&
|
|---|
| 83 | strncmp("Tag ", fld->field_name, 4) == 0)
|
|---|
| 84 | {
|
|---|
| 85 | _TIFFfree(fld->field_name);
|
|---|
| 86 | _TIFFfree(fld);
|
|---|
| 87 | }
|
|---|
| 88 | }
|
|---|
| 89 |
|
|---|
| 90 | _TIFFfree(tif->tif_fieldinfo);
|
|---|
| 91 | }
|
|---|
| 92 |
|
|---|
| 93 | _TIFFfree(tif);
|
|---|
| 94 | }
|
|---|
| 95 |
|
|---|
| 96 | /************************************************************************/
|
|---|
| 97 | /* TIFFClose() */
|
|---|
| 98 | /************************************************************************/
|
|---|
| 99 |
|
|---|
| 100 | /**
|
|---|
| 101 | * Close a previously opened TIFF file.
|
|---|
| 102 | *
|
|---|
| 103 | * TIFFClose closes a file that was previously opened with TIFFOpen().
|
|---|
| 104 | * Any buffered data are flushed to the file, including the contents of
|
|---|
| 105 | * the current directory (if modified); and all resources are reclaimed.
|
|---|
| 106 | *
|
|---|
| 107 | * @param tif A TIFF pointer.
|
|---|
| 108 | */
|
|---|
| 109 |
|
|---|
| 110 | void
|
|---|
| 111 | TIFFClose(TIFF* tif)
|
|---|
| 112 | {
|
|---|
| 113 | TIFFCloseProc closeproc = tif->tif_closeproc;
|
|---|
| 114 | thandle_t fd = tif->tif_clientdata;
|
|---|
| 115 |
|
|---|
| 116 | TIFFCleanup(tif);
|
|---|
| 117 | (void) (*closeproc)(fd);
|
|---|
| 118 | }
|
|---|
| 119 |
|
|---|
