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 |
|
---|