Info.c revision a966c04f 
1/*
2 * Copyright (C) 1989-95 GROUPE BULL
3 *
4 * Permission is hereby granted, free of charge, to any person obtaining a copy
5 * of this software and associated documentation files (the "Software"), to
6 * deal in the Software without restriction, including without limitation the
7 * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
8 * sell copies of the Software, and to permit persons to whom the Software is
9 * furnished to do so, subject to the following conditions:
10 *
11 * The above copyright notice and this permission notice shall be included in
12 * all copies or substantial portions of the Software.
13 *
14 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
15 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
16 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
17 * GROUPE BULL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
18 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
19 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
20 *
21 * Except as contained in this notice, the name of GROUPE BULL shall not be
22 * used in advertising or otherwise to promote the sale, use or other dealings
23 * in this Software without prior written authorization from GROUPE BULL.
24 */
25
26/*****************************************************************************\
27*  Info.c:                                                                    *
28*                                                                             *
29*  XPM library                                                                *
30*  Functions related to the XpmInfo structure.                                *
31*                                                                             *
32*  Developed by Arnaud Le Hors                                                *
33\*****************************************************************************/
34
35#ifdef HAVE_CONFIG_H
36#include <config.h>
37#endif
38#include "XpmI.h"
39
40/*
41 * Init returned data to free safely later on
42 */
43void
44xpmInitXpmInfo(info)
45    XpmInfo *info;
46{
47    if (info) {
48	info->hints_cmt = NULL;
49	info->colors_cmt = NULL;
50	info->pixels_cmt = NULL;
51	info->extensions = NULL;
52	info->nextensions = 0;
53    }
54}
55
56/*
57 * Free the XpmInfo data which have been allocated
58 */
59void
60XpmFreeXpmInfo(info)
61    XpmInfo *info;
62{
63    if (info) {
64	if (info->valuemask & XpmComments) {
65	    if (info->hints_cmt) {
66		XpmFree(info->hints_cmt);
67		info->hints_cmt = NULL;
68	    }
69	    if (info->colors_cmt) {
70		XpmFree(info->colors_cmt);
71		info->colors_cmt = NULL;
72	    }
73	    if (info->pixels_cmt) {
74		XpmFree(info->pixels_cmt);
75		info->pixels_cmt = NULL;
76	    }
77	}
78	if (info->valuemask & XpmReturnExtensions && info->nextensions) {
79	    XpmFreeExtensions(info->extensions, info->nextensions);
80	    info->extensions = NULL;
81	    info->nextensions = 0;
82	}
83	info->valuemask = 0;
84    }
85}
86
87/*
88 * Set the XpmInfo valuemask to retrieve required info
89 */
90void
91xpmSetInfoMask(info, attributes)
92    XpmInfo *info;
93    XpmAttributes *attributes;
94{
95    info->valuemask = 0;
96    if (attributes->valuemask & XpmReturnInfos)
97	info->valuemask |= XpmReturnComments;
98    if (attributes->valuemask & XpmReturnExtensions)
99	info->valuemask |= XpmReturnExtensions;
100}
101
102/*
103 * Fill in the XpmInfo with the XpmAttributes
104 */
105void
106xpmSetInfo(info, attributes)
107    XpmInfo *info;
108    XpmAttributes *attributes;
109{
110    info->valuemask = 0;
111    if (attributes->valuemask & XpmInfos) {
112	info->valuemask |= XpmComments | XpmColorTable;
113	info->hints_cmt = attributes->hints_cmt;
114	info->colors_cmt = attributes->colors_cmt;
115	info->pixels_cmt = attributes->pixels_cmt;
116    }
117    if (attributes->valuemask & XpmExtensions) {
118	info->valuemask |= XpmExtensions;
119	info->extensions = attributes->extensions;
120	info->nextensions = attributes->nextensions;
121    }
122    if (attributes->valuemask & XpmHotspot) {
123	info->valuemask |= XpmHotspot;
124	info->x_hotspot = attributes->x_hotspot;
125	info->y_hotspot = attributes->y_hotspot;
126    }
127}
128