]> git.saurik.com Git - wxWidgets.git/blame - src/tiff/libtiff/tif_close.c
Add missing WXK constants for the control keys
[wxWidgets.git] / src / tiff / libtiff / tif_close.c
CommitLineData
8414a40c
VZ
1/* $Id$ */
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
45void
46TIFFCleanup(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
110void
111TIFFClose(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