ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/xpm.C
Revision: 1.22
Committed: Wed Feb 16 20:32:05 2005 UTC (19 years, 3 months ago) by root
Content type: text/plain
Branch: MAIN
Changes since 1.21: +2 -1 lines
Log Message:
*** empty log message ***

File Contents

# User Rev Content
1 pcg 1.1 /*--------------------------------*-C-*---------------------------------*
2 pcg 1.12 * File: xpm.C
3 pcg 1.1 *----------------------------------------------------------------------*
4     *
5     * All portions of code are copyright by their respective author/s.
6     * Copyright (c) 1997 Carsten Haitzler <raster@zip.com.au>
7     * Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de>
8     * Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com>
9     *
10     * This program is free software; you can redistribute it and/or modify
11     * it under the terms of the GNU General Public License as published by
12     * the Free Software Foundation; either version 2 of the License, or
13     * (at your option) any later version.
14     *
15     * This program is distributed in the hope that it will be useful,
16     * but WITHOUT ANY WARRANTY; without even the implied warranty of
17     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18     * GNU General Public License for more details.
19     *
20     * You should have received a copy of the GNU General Public License
21     * along with this program; if not, write to the Free Software
22     * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23     *---------------------------------------------------------------------*/
24    
25     #include "../config.h" /* NECESSARY */
26     #include "rxvt.h" /* NECESSARY */
27    
28     #ifdef XPM_BACKGROUND
29    
30 root 1.22 static void rxvt_pixmap_incr (unsigned int *wh, unsigned int *xy, float *incr, float *p, unsigned int widthheight, unsigned int xpmwidthheight);
31    
32 pcg 1.1 /*
33     * These GEOM strings indicate absolute size/position:
34     * @ `WxH+X+Y'
35     * @ `WxH+X' -> Y = X
36     * @ `WxH' -> Y = X = 50
37     * @ `W+X+Y' -> H = W
38     * @ `W+X' -> H = W, Y = X
39     * @ `W' -> H = W, X = Y = 50
40     * @ `0xH' -> H *= H/100, X = Y = 50 (W unchanged)
41     * @ `Wx0' -> W *= W/100, X = Y = 50 (H unchanged)
42     * @ `=+X+Y' -> (H, W unchanged)
43     * @ `=+X' -> Y = X (H, W unchanged)
44     *
45     * These GEOM strings adjust position relative to current position:
46     * @ `+X+Y'
47     * @ `+X' -> Y = X
48     *
49     * And this GEOM string is for querying current scale/position:
50     * @ `?'
51     */
52     int
53 pcg 1.5 rxvt_term::scale_pixmap (const char *geom)
54 pcg 1.1 {
55 pcg 1.7 int flags, changed = 0;
56     int x = 0, y = 0;
57     unsigned int w = 0, h = 0;
58     unsigned int n;
59     char *p, *str;
60 pcg 1.9 bgPixmap_t *bgpixmap = & (bgPixmap);
61 pcg 1.1
62     #define MAXLEN_GEOM sizeof("[1000x1000+1000+1000]")
63    
64 pcg 1.7 if (geom == NULL)
65     return 0;
66     str = (char *)rxvt_malloc (MAXLEN_GEOM + 1);
67 root 1.17 if (!strcmp (geom, "?"))
68 pcg 1.7 {
69 pcg 1.9 sprintf (str, "[%dx%d+%d+%d]", /* can't presume snprintf () ! */
70     min (bgpixmap->w, 9999), min (bgpixmap->h, 9999),
71     min (bgpixmap->x, 9999), min (bgpixmap->y, 9999));
72 pcg 1.11 process_xterm_seq (XTerm_title, str, CHAR_ST);
73 pcg 1.9 free (str);
74 pcg 1.7 return 0;
75 pcg 1.1 }
76    
77 root 1.17 if ((p = strchr (geom, ';')) == NULL)
78     p = strchr (geom, '\0');
79 pcg 1.7 n = (p - geom);
80     if (n <= MAXLEN_GEOM)
81     {
82 root 1.17 strncpy (str, geom, n);
83 pcg 1.7 str[n] = '\0';
84    
85 pcg 1.9 flags = XParseGeometry (str, &x, &y, &w, &h);
86 pcg 1.7 if (!flags)
87     {
88     flags |= WidthValue;
89     w = 0;
90     } /* default is tile */
91     if (flags & WidthValue)
92     {
93 pcg 1.9 if (! (flags & XValue))
94 pcg 1.7 x = 50;
95 pcg 1.9 if (! (flags & HeightValue))
96 pcg 1.7 h = w;
97     if (w && !h)
98     {
99     w = (bgpixmap->w * w) / 100;
100     h = bgpixmap->h;
101     }
102     else if (h && !w)
103     {
104     w = bgpixmap->w;
105     h = (bgpixmap->h * h) / 100;
106     }
107     if (w > 1000)
108     w = 1000;
109     if (h > 1000)
110     h = 1000;
111     if (bgpixmap->w != (short)w)
112     {
113     bgpixmap->w = (short)w;
114     changed++;
115     }
116     if (bgpixmap->h != (short)h)
117     {
118     bgpixmap->h = (short)h;
119     changed++;
120     }
121     }
122 pcg 1.9 if (! (flags & YValue))
123 pcg 1.7 {
124     if (flags & XNegative)
125     flags |= YNegative;
126     y = x;
127     }
128    
129 pcg 1.9 if (! (flags & WidthValue) && geom[0] != '=')
130 pcg 1.7 {
131     x += bgpixmap->x;
132     y += bgpixmap->y;
133     }
134     else
135     {
136     if (flags & XNegative)
137     x += 100;
138     if (flags & YNegative)
139     y += 100;
140     }
141 pcg 1.9 MIN_IT (x, 100);
142     MIN_IT (y, 100);
143     MAX_IT (x, 0);
144     MAX_IT (y, 0);
145 pcg 1.7 if (bgpixmap->x != x)
146     {
147     bgpixmap->x = x;
148     changed++;
149     }
150     if (bgpixmap->y != y)
151     {
152     bgpixmap->y = y;
153     changed++;
154     }
155 pcg 1.1 }
156 pcg 1.9 free (str);
157 pcg 1.7 return changed;
158 pcg 1.1 }
159    
160     void
161 pcg 1.5 rxvt_term::resize_pixmap ()
162 pcg 1.1 {
163 pcg 1.7 XGCValues gcvalue;
164     GC gc;
165 pcg 1.9 unsigned int width = TermWin_TotalWidth ();
166     unsigned int height = TermWin_TotalHeight ();
167 root 1.21 dDisp;
168 pcg 1.7
169     if (TermWin.pixmap != None)
170 root 1.21 XFreePixmap (disp, TermWin.pixmap);
171 pcg 1.7
172     if (bgPixmap.pixmap == None)
173     { /* So be it: I'm not using pixmaps */
174     TermWin.pixmap = None;
175 root 1.20
176     if (!(options & Opt_transparent) || !am_transparent)
177 root 1.21 XSetWindowBackground (disp, TermWin.vt,
178 root 1.20 pix_colors[Color_bg]);
179    
180 pcg 1.7 return;
181 pcg 1.1 }
182    
183 root 1.17 gcvalue.foreground = pix_colors[Color_bg];
184 root 1.21 gc = XCreateGC (disp, TermWin.vt, GCForeground, &gcvalue);
185 pcg 1.1
186 pcg 1.7 if (bgPixmap.pixmap != None)
187     { /* we have a specified pixmap */
188     unsigned int w = bgPixmap.w, h = bgPixmap.h,
189 root 1.20 x = bgPixmap.x, y = bgPixmap.y;
190 pcg 1.7 unsigned int xpmh = xpmAttr.height,
191 root 1.20 xpmw = xpmAttr.width;
192 pcg 1.7
193     /*
194     * don't zoom pixmap too much nor expand really small pixmaps
195     */
196     if (w > 1000 || h > 1000)
197     w = 1;
198     else if (width > (10 * xpmw)
199     || height > (10 * xpmh))
200     w = 0; /* tile */
201    
202     if (w == 0)
203     {
204     /* basic X tiling - let the X server do it */
205 root 1.21 TermWin.pixmap = XCreatePixmap (disp, TermWin.vt,
206 pcg 1.7 xpmw, xpmh,
207 root 1.14 (unsigned int)display->depth);
208 root 1.21 XCopyArea (disp, bgPixmap.pixmap, TermWin.pixmap, gc,
209 pcg 1.7 0, 0, xpmw, xpmh, 0, 0);
210     }
211     else
212     {
213     float incr, p;
214     Pixmap tmp;
215    
216 root 1.21 TermWin.pixmap = XCreatePixmap (disp, TermWin.vt,
217 pcg 1.7 width, height,
218 root 1.14 (unsigned int)display->depth);
219 pcg 1.7 /*
220     * horizontal scaling
221     */
222 pcg 1.9 rxvt_pixmap_incr (&w, &x, &incr, &p, width, xpmw);
223 pcg 1.7
224 root 1.21 tmp = XCreatePixmap (disp, TermWin.vt,
225 root 1.14 width, xpmh, (unsigned int)display->depth);
226 root 1.21 XFillRectangle (disp, tmp, gc, 0, 0, width,
227 pcg 1.7 xpmh);
228    
229     for ( /*nil */ ; x < w; x++, p += incr)
230     {
231     if (p >= xpmw)
232     p = 0;
233     /* copy one column from the original pixmap to the tmp pixmap */
234 root 1.21 XCopyArea (disp, bgPixmap.pixmap, tmp, gc,
235 pcg 1.7 (int)p, 0, 1, xpmh, (int)x, 0);
236     }
237    
238     /*
239     * vertical scaling
240     */
241 pcg 1.9 rxvt_pixmap_incr (&h, &y, &incr, &p, height, xpmh);
242 pcg 1.7
243     if (y > 0)
244 root 1.21 XFillRectangle (disp, TermWin.pixmap, gc, 0, 0, width, y);
245 root 1.20
246 pcg 1.7 if (h < height)
247 root 1.21 XFillRectangle (disp, TermWin.pixmap, gc, 0, (int)h, width, height - h + 1);
248 root 1.20
249 pcg 1.7 for ( /*nil */ ; y < h; y++, p += incr)
250     {
251     if (p >= xpmh)
252     p = 0;
253 root 1.20
254 pcg 1.7 /* copy one row from the tmp pixmap to the main pixmap */
255 root 1.21 XCopyArea (disp, tmp, TermWin.pixmap, gc,
256 pcg 1.7 0, (int)p, width, 1, 0, (int)y);
257     }
258 root 1.20
259 root 1.21 XFreePixmap (disp, tmp);
260 pcg 1.7 }
261 pcg 1.1 }
262 root 1.14
263 root 1.21 XSetWindowBackgroundPixmap (disp, TermWin.vt, TermWin.pixmap);
264     XFreeGC (disp, gc);
265 pcg 1.7 am_transparent = 0;
266 pcg 1.1 }
267    
268     /*
269     * Calculate tiling sizes and increments
270     * At start, p == 0, incr == xpmwidthheight
271     */
272 pcg 1.6 /* INTPROTO */
273     static void
274 pcg 1.9 rxvt_pixmap_incr (unsigned int *wh, unsigned int *xy, float *incr, float *p, unsigned int widthheight, unsigned int xpmwidthheight)
275 pcg 1.1 {
276 pcg 1.7 unsigned int cwh, cxy;
277     float cincr, cp;
278 pcg 1.1
279 pcg 1.7 cp = 0;
280     cincr = (float)xpmwidthheight;
281     cxy = *xy;
282     cwh = *wh;
283     if (cwh == 1)
284     { /* display one image, no horizontal/vertical scaling */
285     cincr = (float)widthheight;
286     if (xpmwidthheight <= widthheight)
287     {
288     cwh = xpmwidthheight;
289     cxy = (cxy * (widthheight - cwh)) / 100; /* beware! order */
290     cwh += cxy;
291     }
292     else
293     {
294     cxy = 0;
295     cwh = widthheight;
296     }
297 pcg 1.1 }
298 pcg 1.7 else if (cwh < 10)
299     { /* fit WH images across/down screen */
300     cincr *= cwh;
301     cxy = 0;
302     cwh = widthheight;
303     }
304     else
305     {
306     cincr *= 100.0 / cwh;
307     if (cwh < 100)
308     { /* contract */
309     float pos;
310    
311     cwh = (cwh * widthheight) / 100;
312     pos = (float)cxy / 100 * widthheight - (cwh / 2);
313    
314     cxy = (widthheight - cwh);
315     if (pos <= 0)
316     cxy = 0;
317     else if (pos < cxy)
318     cxy = (int) pos;
319     cwh += cxy;
320     }
321     else
322     { /* expand */
323     if (cxy > 0)
324     { /* position */
325     float pos;
326    
327     pos = (float)cxy / 100 * xpmwidthheight - (cincr / 2);
328     cp = xpmwidthheight - cincr;
329     if (pos <= 0)
330     cp = 0;
331     else if (pos < cp)
332     cp = pos;
333     }
334     cxy = 0;
335     cwh = widthheight;
336     }
337     }
338     cincr /= widthheight;
339     *wh = cwh;
340     *xy = cxy;
341     *incr = cincr;
342     *p = cp;
343 pcg 1.1 }
344    
345     Pixmap
346 pcg 1.5 rxvt_term::set_bgPixmap (const char *file)
347 pcg 1.1 {
348 root 1.21 char *f;
349 pcg 1.1
350 pcg 1.9 assert (file != NULL);
351 pcg 1.1
352 pcg 1.7 if (bgPixmap.pixmap != None)
353     {
354 pcg 1.9 XFreePixmap (display->display, bgPixmap.pixmap);
355 pcg 1.7 bgPixmap.pixmap = None;
356 pcg 1.1 }
357 root 1.19
358 root 1.17 XSetWindowBackground (display->display, TermWin.vt, pix_colors[Color_bg]);
359 pcg 1.1
360 pcg 1.7 if (*file != '\0')
361     {
362     /* XWindowAttributes attr; */
363    
364     /*
365     * we already have the required attributes
366     */
367 pcg 1.9 /* XGetWindowAttributes (display->display, TermWin.vt, &attr); */
368 pcg 1.7
369     xpmAttr.closeness = 30000;
370 root 1.14 xpmAttr.colormap = display->cmap;
371     xpmAttr.visual = display->visual;
372     xpmAttr.depth = display->depth;
373 pcg 1.7 xpmAttr.valuemask = (XpmCloseness | XpmColormap | XpmVisual |
374     XpmDepth | XpmSize | XpmReturnPixels);
375    
376     /* search environment variables here too */
377 pcg 1.9 f = (char *)rxvt_File_find (file, ".xpm", rs[Rs_path]);
378 pcg 1.7 if (f == NULL
379 pcg 1.9 || XpmReadFileToPixmap (display->display, display->root, f,
380 pcg 1.7 &bgPixmap.pixmap, NULL,
381     &xpmAttr))
382     {
383 pcg 1.10 char *p;
384 pcg 1.7
385     /* semi-colon delimited */
386 root 1.17 if ((p = strchr (file, ';')) == NULL)
387     p = strchr (file, '\0');
388 pcg 1.7
389 root 1.19 rxvt_warn ("couldn't load XPM file \"%.*s\", ignoring.\n", (p - file), file);
390 pcg 1.7 }
391 pcg 1.10
392 pcg 1.9 free (f);
393 pcg 1.1 }
394 pcg 1.10
395 pcg 1.7 resize_pixmap ();
396     return bgPixmap.pixmap;
397 pcg 1.1 }
398    
399     #endif /* XPM_BACKGROUND */