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