0023533: Unitialized variables used, IntTools_TopolTool.cxx
[occt.git] / src / Xw / Xw_open_image.cxx
1 // Copyright (c) 1999-2012 OPEN CASCADE SAS
2 //
3 // The content of this file is subject to the Open CASCADE Technology Public
4 // License Version 6.5 (the "License"). You may not use the content of this file
5 // except in compliance with the License. Please obtain a copy of the License
6 // at http://www.opencascade.org and read it completely before using this file.
7 //
8 // The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
9 // main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
10 //
11 // The Original Code and all software distributed under the License is
12 // distributed on an "AS IS" basis, without warranty of any kind, and the
13 // Initial Developer hereby disclaims all such warranties, including without
14 // limitation, any warranties of merchantability, fitness for a particular
15 // purpose or non-infringement. Please see the License for the specific terms
16 // and conditions governing the rights and limitations under the License.
17
18
19 #include <Xw_Extension.h>
20
21 /* ifdef then trace on */
22 #ifdef TRACE
23 #define TRACE_OPEN_IMAGE
24 #endif
25
26 /*
27    XW_EXT_IMAGEDATA Xw_open_image (awindow,aimageinfo,width,height):
28    XW_EXT_WINDOW *awindow ;
29    XW_USERDATA *aimageinfo ;            Image identifier
30    int width,height             Image size in pixels
31
32         Open an Image in the same Window visual as defined
33         NOTE than this image can be filled with Xw_put_pixel 
34
35         Returns The image extension address if Successful      
36         returns  NULL if BadAllocation
37
38    XW_STATUS Xw_close_image (aimage):
39    XW_EXT_IMAGEDATA *aimage     Extended Image address
40
41         Close an Image
42
43         returns  SUCCESS always
44
45    XW_EXT_IMAGEDATA* Xw_get_image_handle (awindow,aimageinfo):
46    XW_EXT_WINDOW *awindow ;
47    XW_USERDATA  aimageinfo     Image identifier
48
49         returns the Image handle associated to the image ID
50                 or NULL if no image exist.
51
52 */
53
54 #ifdef XW_PROTOTYPE
55 void* Xw_open_image (void *awindow,void *aimageinfo,int width,int height)
56 #else
57 void* Xw_open_image (awindow,aimageinfo,width,height)
58 void *awindow ;
59 void *aimageinfo ;
60 int width,height ;
61 #endif /*XW_PROTOTYPE*/
62 {
63 XW_EXT_WINDOW *pwindow = (XW_EXT_WINDOW*)awindow;
64 XW_EXT_IMAGEDATA *pimage ;
65 XW_EXT_COLORMAP *pcolormap ;
66 //int i,pad ;
67 int pad = 0;
68 char *cdata = NULL;
69
70     if( !Xw_isdefine_window(pwindow) ) {
71         /*ERROR*Bad EXT_WINDOW Address*/
72         Xw_set_error(24,"Xw_open_image",pwindow) ;
73         return (NULL) ;
74     }
75
76     switch (_DEPTH) {
77         case 8 :
78             pad = 1 ;
79             break ;
80         case 12 :
81         case 16 :
82             pad = 2 ;
83             break ;
84         case 24 :
85             pad = 4 ;
86             break ;
87         case 48 :
88         case 64 :
89             pad = 8 ;
90             break ;
91         default :
92             /*ERROR*Unimplemented Image Visual depth*/
93             Xw_set_error(64,"Xw_open_image",&_DEPTH) ;
94             return (NULL) ;
95     }
96
97     if( !(cdata = (char*) Xw_calloc(width*height,pad)) ) {
98         /*ERROR*XImage Allocation failed*/
99         Xw_set_error(60,"Xw_open_image",0) ;
100         return (NULL) ;
101     }
102
103     if( !(pimage = Xw_add_imagedata_structure(sizeof(XW_EXT_IMAGEDATA))) ) {
104         Xw_free(cdata);
105         return (NULL) ;
106     }
107
108     pimage->pimageinfo = aimageinfo ;
109     pimage->pcolormap = pcolormap = _COLORMAP ;
110     _IIMAGE = XCreateImage(_CDISPLAY,_CVISUAL,_DEPTH,
111                         ZPixmap,0,cdata,width,height,pad*8,width*pad) ;
112     if( !_IIMAGE ) {
113         /*ERROR*XImage Creation failed*/
114         Xw_set_error(62,"Xw_open_image",0) ;
115         Xw_del_imagedata_structure(pimage) ;
116     }
117
118 #ifdef  TRACE_OPEN_IMAGE
119 if( Xw_get_trace() ) {
120     printf (" %lx = Xw_open_image(%lx,%lx,%d,%d)\n",(long ) pimage,(long ) pwindow,(long ) aimageinfo,
121                                                         width,height);
122 }
123 #endif
124
125     return (pimage);
126 }
127
128 static XW_EXT_IMAGEDATA *PimageList =NULL ;
129
130 #ifdef XW_PROTOTYPE
131 XW_EXT_IMAGEDATA* Xw_add_imagedata_structure(int size)
132 #else
133 XW_EXT_IMAGEDATA* Xw_add_imagedata_structure(size)
134 int size ;
135 #endif /*XW_PROTOTYPE*/
136 /*
137         Create and Insert one Extended image structure in the
138         EXtended image List
139
140         returns Extended image address if successful
141                 or NULL if Bad Allocation
142 */
143 {
144 XW_EXT_IMAGEDATA *pimage ;
145 //int i ;
146
147         pimage = (XW_EXT_IMAGEDATA*) Xw_malloc(size) ;
148
149         if( pimage ) {
150             pimage->type = IMAGE_TYPE ;
151             pimage->link = PimageList ;
152             PimageList = pimage ;
153             pimage->pcolormap = NULL ;
154             pimage->zoom = 1.;
155             pimage->pximage = NULL ;
156             pimage->zximage = NULL ;
157             pimage->maxwindow = 0 ;
158         } else {
159             /*ERROR*EXT_IMAGE allocation failed*/
160             Xw_set_error(27,"Xw_open_image",0) ;
161         }
162
163         return (pimage) ;
164 }
165
166 #ifdef XW_PROTOTYPE
167 XW_STATUS Xw_close_image (void* aimage)
168 #else
169 XW_STATUS Xw_close_image (aimage)
170 void *aimage;
171 #endif /*XW_PROTOTYPE*/
172 {
173 XW_EXT_IMAGEDATA *pimage = (XW_EXT_IMAGEDATA*) aimage ;
174
175         Xw_del_imagedata_structure(pimage) ;
176
177 #ifdef  TRACE_CLOSE_IMAGE
178 if( Xw_get_trace() ) {
179         printf (" Xw_close_image(%x)\n",pimage);
180 }
181 #endif
182
183         return (XW_SUCCESS);
184 }
185
186 #ifdef XW_PROTOTYPE
187 void* Xw_get_image_handle (void* awindow,void *aimageinfo)
188 #else
189 void* Xw_get_image_handle (awindow,aimageinfo)
190 void *awindow ;
191 void *aimageinfo ;
192 #endif /*XW_PROTOTYPE*/
193 {
194 #ifdef  TRACE_OPEN_IMAGE
195 XW_EXT_WINDOW *pwindow = (XW_EXT_WINDOW*)awindow ;
196 #endif
197 XW_EXT_IMAGEDATA *pimage ;
198
199         for( pimage = PimageList ; pimage ; 
200                         pimage = (XW_EXT_IMAGEDATA*) pimage->link ) {
201             if( pimage->pimageinfo == aimageinfo ) break ; 
202         }
203
204 #ifdef  TRACE_OPEN_IMAGE
205 if( Xw_get_trace() ) {
206     printf (" %lx = Xw_get_image_handle(%lx,%lx)\n",(long ) pimage,(long ) pwindow,(long ) aimageinfo);
207 }
208 #endif
209
210         return (pimage) ;
211 }
212
213 #ifdef XW_PROTOTYPE
214 XW_STATUS Xw_del_imagedata_structure(XW_EXT_IMAGEDATA *aimage)
215 #else
216 XW_STATUS Xw_del_imagedata_structure(aimage)
217 XW_EXT_IMAGEDATA *aimage;
218 #endif /*XW_PROTOTYPE*/
219 /*
220         Remove the Extended image address from the Extended List and
221         Free the Extended Image
222
223         returns ERROR if the image address is not Found in the list
224         returns XW_SUCCESS if successful
225 */
226 {
227 XW_EXT_IMAGEDATA *pimage = aimage ;
228 //int i ;
229
230     if( !pimage ) return (XW_ERROR) ;
231
232     if( pimage->maxwindow ) --pimage->maxwindow ;
233
234     if( pimage->maxwindow ) {
235         return (XW_ERROR) ;
236     } else {
237         if( _IIMAGE ) XDestroyImage(_IIMAGE) ;
238         if( _ZIMAGE ) XDestroyImage(_ZIMAGE) ;
239         if( pimage == PimageList ) {
240             PimageList = (XW_EXT_IMAGEDATA*) pimage->link ;
241         } else {
242             for( pimage = PimageList ; pimage ; 
243                         pimage = (XW_EXT_IMAGEDATA*) pimage->link ) {
244                 if( pimage->link == aimage ) {
245                     pimage->link = aimage->link ;
246                     break ;
247                 }
248             }
249         }
250         Xw_free(aimage) ;
251     }
252     return (XW_SUCCESS) ;
253 }