ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/rxvtcolor.C
Revision: 1.6
Committed: Wed Feb 11 08:13:45 2004 UTC (20 years, 3 months ago) by pcg
Content type: text/plain
Branch: MAIN
Changes since 1.5: +140 -39 lines
Log Message:
*** empty log message ***

File Contents

# Content
1 #include "../config.h"
2 #include <rxvt.h>
3 #include <rxvtcolor.h>
4
5 #include <unistd.h>
6 #include <fcntl.h>
7
8 refcounted::refcounted (const char *id)
9 {
10 this->id = STRDUP (id);
11 }
12
13 refcounted::~refcounted ()
14 {
15 free (id);
16 }
17
18 template<class T>
19 T *refcache<T>::get (const char *id)
20 {
21 for (T **i = begin (); i < end (); ++i)
22 {
23 if (!strcmp (id, (*i)->id))
24 {
25 (*i)->referenced++;
26 return *i;
27 }
28 }
29
30 T *obj = new T (id);
31
32 obj->referenced = 1;
33
34 if (obj && obj->init ())
35 {
36 push_back (obj);
37 return obj;
38 }
39 else
40 {
41 delete obj;
42 return 0;
43 }
44 }
45
46 template<class T>
47 void refcache<T>::put (T *obj)
48 {
49 if (!obj)
50 return;
51
52 if (!--obj->referenced)
53 {
54 erase (find (begin (), end (), obj));
55 delete obj;
56 }
57 }
58
59 template<class T>
60 refcache<T>::~refcache ()
61 {
62 while (size ())
63 put (*begin ());
64 }
65
66 /////////////////////////////////////////////////////////////////////////////
67
68 static void
69 im_destroy_cb (XIM unused1, XPointer client_data, XPointer unused3)
70 {
71 rxvt_xim *xim = (rxvt_xim *)client_data;
72 rxvt_display *display = xim->display;
73
74 display->xims.erase (find (display->xims.begin (), display->xims.end (), xim));
75
76 display->im_change_cb ();
77 }
78
79 bool rxvt_xim::init ()
80 {
81 display = GET_R->display; //HACK: TODO
82
83 xim = XOpenIM (display->display, NULL, NULL, NULL);
84
85 if (!xim)
86 return false;
87
88 XIMCallback ximcallback;
89 ximcallback.client_data = (XPointer)this;
90 ximcallback.callback = im_destroy_cb;
91
92 XSetIMValues (xim, XNDestroyCallback, &ximcallback, NULL);
93
94 return true;
95 }
96
97 rxvt_xim::~rxvt_xim ()
98 {
99 if (xim)
100 XCloseIM (xim);
101 }
102
103 /////////////////////////////////////////////////////////////////////////////
104
105 rxvt_display::rxvt_display (const char *id)
106 : refcounted (id)
107 , x_watcher (this, &rxvt_display::x_event)
108 , selection_owner (0)
109 {
110 }
111
112 bool rxvt_display::init ()
113 {
114 display = XOpenDisplay (id);
115
116 screen = DefaultScreen (display);
117 root = DefaultRootWindow (display);
118 visual = DefaultVisual (display, screen);
119 cmap = DefaultColormap (display, screen);
120 depth = DefaultDepth (display, screen);
121
122 #ifdef PREFER_24BIT
123 /*
124 * If depth is not 24, look for a 24bit visual.
125 */
126 if (depth != 24)
127 {
128 XVisualInfo vinfo;
129
130 if (XMatchVisualInfo (display, screen, 24, TrueColor, &vinfo))
131 {
132 depth = 24;
133 visual = vinfo.visual;
134 cmap = XCreateColormap (display,
135 RootWindow (display, screen),
136 visual, AllocNone);
137 }
138 }
139 #endif
140
141 int fd = XConnectionNumber (display);
142 x_watcher.start (fd, EVENT_READ);
143 fcntl (fd, F_SETFL, FD_CLOEXEC);
144
145 XSelectInput (display, root, PropertyChangeMask);
146 xa_xim_servers = XInternAtom (display, "XIM_SERVERS", 0);
147
148 return true;
149 }
150
151 rxvt_display::~rxvt_display ()
152 {
153 x_watcher.stop ();
154
155 XCloseDisplay (display);
156 }
157
158 void rxvt_display::im_change_cb ()
159 {
160 for (im_watcher **i = imw.begin (); i != imw.end (); ++i)
161 (*i)->call ();
162 }
163
164 void rxvt_display::x_event (io_watcher &w, short revents)
165 {
166 do
167 {
168 XEvent xev;
169 XNextEvent (display, &xev);
170
171 //printf ("T %d w %lx\n", xev.type, xev.xany.window);//D
172
173 if (xev.type == PropertyNotify
174 && xev.xany.window == root
175 && xev.xproperty.atom == xa_xim_servers)
176 im_change_cb ();
177
178 for (int i = xw.size (); i--; )
179 {
180 if (!xw[i])
181 xw.erase_unordered (i);
182 else if (xw[i]->window == xev.xany.window)
183 xw[i]->call (xev);
184 }
185 }
186 while (XPending (display));
187 }
188
189 void rxvt_display::reg (xevent_watcher *w)
190 {
191 xw.push_back (w);
192 w->active = xw.size ();
193 }
194
195 void rxvt_display::unreg (xevent_watcher *w)
196 {
197 if (w->active)
198 xw[w->active - 1] = 0;
199 }
200
201 void rxvt_display::reg (im_watcher *w)
202 {
203 imw.push_back (w);
204 }
205
206 void rxvt_display::unreg (im_watcher *w)
207 {
208 imw.erase (find (imw.begin (), imw.end (), w));
209 }
210
211 void rxvt_display::set_selection_owner (rxvt_term *owner)
212 {
213 if (selection_owner && selection_owner != owner)
214 selection_owner->selection_clear ();
215
216 selection_owner = owner;
217 }
218
219 rxvt_xim *rxvt_display::get_xim (const char *locale, const char *modifiers)
220 {
221 // asprintf is a GNU and *BSD extension.. sorry...
222 char *id;
223
224 if (asprintf (&id, "%s\n%s", locale, modifiers) < 0)
225 return 0;
226
227 rxvt_xim *xim = xims.get (id);
228
229 free (id);
230
231 return xim;
232 }
233
234 void rxvt_display::put_xim (rxvt_xim *xim)
235 {
236 xims.put (xim);
237 }
238
239 /////////////////////////////////////////////////////////////////////////////
240
241 template refcache<rxvt_display>;
242 refcache<rxvt_display> displays;
243
244 /////////////////////////////////////////////////////////////////////////////
245
246 bool
247 rxvt_color::set (rxvt_display *display, Pixel p)
248 {
249 #if XFT
250 XColor xc;
251
252 xc.pixel = p;
253 if (!XQueryColor (display->display, display->cmap, &xc))
254 return false;
255
256 XRenderColor d;
257
258 d.red = xc.red;
259 d.green = xc.green;
260 d.blue = xc.blue;
261 d.alpha = 0xffff;
262
263 return
264 XftColorAllocValue (display->display,
265 display->visual,
266 display->cmap,
267 &d, &c);
268 #else
269 this->p = p;
270 #endif
271
272 return true;
273 }
274
275 bool
276 rxvt_color::set (rxvt_display *display, const char *name)
277 {
278 XColor xc;
279
280 if (XParseColor (display->display, display->cmap, name, &xc))
281 return set (display, xc.red, xc.green, xc.blue);
282
283 return false;
284 }
285
286 bool
287 rxvt_color::set (rxvt_display *display, unsigned short cr, unsigned short cg, unsigned short cb)
288 {
289 XColor xc;
290
291 xc.red = cr;
292 xc.green = cg;
293 xc.blue = cb;
294 xc.flags = DoRed | DoGreen | DoBlue;
295
296 if (XAllocColor (display->display, display->cmap, &xc))
297 return set (display, xc.pixel);
298
299 return false;
300 }
301
302 void
303 rxvt_color::get (rxvt_display *display, unsigned short &cr, unsigned short &cg, unsigned short &cb)
304 {
305 #if XFT
306 cr = c.color.red;
307 cg = c.color.green;
308 cb = c.color.blue;
309 #else
310 XColor c;
311
312 c.pixel = p;
313 XQueryColor (display->display, display->cmap, &c);
314
315 cr = c.red;
316 cg = c.green;
317 cb = c.blue;
318 #endif
319 }
320
321 void
322 rxvt_color::free (rxvt_display *display)
323 {
324 #if XFT
325 XftColorFree (display->display, display->visual, display->cmap, &c);
326 #else
327 XFreeColors (display->display, display->cmap, &c, 1, AllPlanes);
328 #endif
329 }
330