2 * titlebar.c - titlebar management
4 * Copyright © 2008 Julien Danjou <julien@danjou.info>
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License along
17 * with this program; if not, write to the Free Software Foundation, Inc.,
18 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
23 #include <xcb/xcb_aux.h>
31 extern awesome_t globalconf
;
33 DO_LUA_NEW(extern, titlebar_t
, titlebar
, "titlebar", titlebar_ref
)
34 DO_LUA_GC(titlebar_t
, titlebar
, "titlebar", titlebar_unref
)
35 DO_LUA_EQ(titlebar_t
, titlebar
, "titlebar")
37 /** Get a client by its titlebar.
38 * \param titlebar The titlebar.
42 client_getbytitlebar(titlebar_t
*titlebar
)
46 for(c
= globalconf
.clients
; c
; c
= c
->next
)
47 if(c
->titlebar
== titlebar
)
53 /** Get a client by its titlebar window.
54 * \param win The window.
58 client_getbytitlebarwin(xcb_window_t win
)
62 for(c
= globalconf
.clients
; c
; c
= c
->next
)
63 if(c
->titlebar
&& c
->titlebar
->sw
&& c
->titlebar
->sw
->window
== win
)
69 /** Draw the titlebar content.
70 * \param c The client.
73 titlebar_draw(client_t
*c
)
75 xcb_drawable_t dw
= 0;
79 if(!c
|| !c
->titlebar
|| !c
->titlebar
->sw
|| !c
->titlebar
->position
)
82 s
= xutil_screen_get(globalconf
.connection
,
83 c
->titlebar
->sw
->phys_screen
);
85 switch(c
->titlebar
->position
)
91 dw
= xcb_generate_id(globalconf
.connection
);
92 xcb_create_pixmap(globalconf
.connection
, s
->root_depth
,
95 c
->titlebar
->sw
->geometry
.height
,
96 c
->titlebar
->sw
->geometry
.width
);
97 ctx
= draw_context_new(globalconf
.connection
, c
->titlebar
->sw
->phys_screen
,
98 c
->titlebar
->sw
->geometry
.height
,
99 c
->titlebar
->sw
->geometry
.width
,
101 &c
->titlebar
->colors
.fg
,
102 &c
->titlebar
->colors
.bg
);
105 ctx
= draw_context_new(globalconf
.connection
, c
->titlebar
->sw
->phys_screen
,
106 c
->titlebar
->sw
->geometry
.width
,
107 c
->titlebar
->sw
->geometry
.height
,
108 c
->titlebar
->sw
->pixmap
,
109 &c
->titlebar
->colors
.fg
,
110 &c
->titlebar
->colors
.bg
);
114 widget_render(c
->titlebar
->widgets
, ctx
, c
->titlebar
->sw
->gc
, c
->titlebar
->sw
->pixmap
,
115 c
->screen
, c
->titlebar
->position
,
116 c
->titlebar
->sw
->geometry
.x
, c
->titlebar
->sw
->geometry
.y
,
117 c
->titlebar
, AWESOME_TYPE_TITLEBAR
);
119 switch(c
->titlebar
->position
)
122 draw_rotate(ctx
, ctx
->pixmap
, c
->titlebar
->sw
->pixmap
,
123 ctx
->width
, ctx
->height
,
124 ctx
->height
, ctx
->width
,
125 - M_PI_2
, 0, c
->titlebar
->sw
->geometry
.height
);
126 xcb_free_pixmap(globalconf
.connection
, dw
);
129 draw_rotate(ctx
, ctx
->pixmap
, c
->titlebar
->sw
->pixmap
,
130 ctx
->width
, ctx
->height
,
131 ctx
->height
, ctx
->width
,
132 M_PI_2
, c
->titlebar
->sw
->geometry
.width
, 0);
133 xcb_free_pixmap(globalconf
.connection
, dw
);
138 simplewindow_refresh_pixmap(c
->titlebar
->sw
);
140 draw_context_delete(&ctx
);
142 c
->titlebar
->need_update
= false;
145 /** Titlebar refresh function.
148 titlebar_refresh(void)
152 for(c
= globalconf
.clients
; c
; c
= c
->next
)
153 if(c
->titlebar
&& c
->titlebar
->need_update
)
158 titlebar_geometry_compute(client_t
*c
, area_t geometry
, area_t
*res
)
160 int width
, x_offset
= 0, y_offset
= 0;
162 switch(c
->titlebar
->position
)
167 if(c
->titlebar
->width
)
168 width
= MAX(1, MIN(c
->titlebar
->width
, geometry
.width
- 2 * c
->titlebar
->border
.width
));
170 width
= MAX(1, geometry
.width
+ 2 * c
->border
- 2 * c
->titlebar
->border
.width
);
171 switch(c
->titlebar
->align
)
176 x_offset
= 2 * c
->border
+ geometry
.width
- width
- 2 * c
->titlebar
->border
.width
;
179 x_offset
= (geometry
.width
- width
) / 2;
182 res
->x
= geometry
.x
+ x_offset
;
183 res
->y
= geometry
.y
- c
->titlebar
->height
- 2 * c
->titlebar
->border
.width
+ c
->border
;
185 res
->height
= c
->titlebar
->height
;
188 if(c
->titlebar
->width
)
189 width
= MAX(1, MIN(c
->titlebar
->width
, geometry
.width
- 2 * c
->titlebar
->border
.width
));
191 width
= MAX(1, geometry
.width
+ 2 * c
->border
- 2 * c
->titlebar
->border
.width
);
192 switch(c
->titlebar
->align
)
197 x_offset
= 2 * c
->border
+ geometry
.width
- width
- 2 * c
->titlebar
->border
.width
;
200 x_offset
= (geometry
.width
- width
) / 2;
203 res
->x
= geometry
.x
+ x_offset
;
204 res
->y
= geometry
.y
+ geometry
.height
+ c
->border
;
206 res
->height
= c
->titlebar
->height
;
209 if(c
->titlebar
->width
)
210 width
= MAX(1, MIN(c
->titlebar
->width
, geometry
.height
- 2 * c
->titlebar
->border
.width
));
212 width
= MAX(1, geometry
.height
+ 2 * c
->border
- 2 * c
->titlebar
->border
.width
);
213 switch(c
->titlebar
->align
)
218 y_offset
= 2 * c
->border
+ geometry
.height
- width
- 2 * c
->titlebar
->border
.width
;
221 y_offset
= (geometry
.height
- width
) / 2;
224 res
->x
= geometry
.x
- c
->titlebar
->height
+ c
->border
;
225 res
->y
= geometry
.y
+ y_offset
;
226 res
->width
= c
->titlebar
->height
;
230 if(c
->titlebar
->width
)
231 width
= MAX(1, MIN(c
->titlebar
->width
, geometry
.height
- 2 * c
->titlebar
->border
.width
));
233 width
= MAX(1, geometry
.height
+ 2 * c
->border
- 2 * c
->titlebar
->border
.width
);
234 switch(c
->titlebar
->align
)
239 y_offset
= 2 * c
->border
+ geometry
.height
- width
- 2 * c
->titlebar
->border
.width
;
242 y_offset
= (geometry
.height
- width
) / 2;
245 res
->x
= geometry
.x
+ geometry
.width
+ c
->border
;
246 res
->y
= geometry
.y
+ y_offset
;
247 res
->width
= c
->titlebar
->height
;
253 /** Set client titlebar position.
254 * \param c The client.
257 titlebar_init(client_t
*c
)
259 int width
= 0, height
= 0;
262 switch(c
->titlebar
->position
)
265 c
->titlebar
->position
= Off
;
269 if(c
->titlebar
->width
)
270 width
= MIN(c
->titlebar
->width
, c
->geometry
.width
- 2 * c
->titlebar
->border
.width
);
272 width
= c
->geometry
.width
+ 2 * c
->border
- 2 * c
->titlebar
->border
.width
;
273 height
= c
->titlebar
->height
;
277 if(c
->titlebar
->width
)
278 height
= MIN(c
->titlebar
->width
, c
->geometry
.height
- 2 * c
->titlebar
->border
.width
);
280 height
= c
->geometry
.height
+ 2 * c
->border
- 2 * c
->titlebar
->border
.width
;
281 width
= c
->titlebar
->height
;
285 titlebar_geometry_compute(c
, c
->geometry
, &geom
);
287 c
->titlebar
->sw
= simplewindow_new(globalconf
.connection
, c
->phys_screen
, geom
.x
, geom
.y
,
288 geom
.width
, geom
.height
, c
->titlebar
->border
.width
);
290 if(c
->titlebar
->border
.width
)
291 xcb_change_window_attributes(globalconf
.connection
, c
->titlebar
->sw
->window
,
292 XCB_CW_BORDER_PIXEL
, &c
->titlebar
->border
.color
.pixel
);
294 if(client_isvisible(c
, c
->screen
))
295 globalconf
.screens
[c
->screen
].need_arrange
= true;
297 c
->titlebar
->need_update
= true;
300 /** Create a new titlebar.
301 * \param L The Lua VM state.
302 * \return The number of value pushed.
305 * \lparam A table with values: align, position, fg, bg, border_width,
306 * border_color, width and height.
307 * \lreturn A brand new titlebar.
310 luaA_titlebar_new(lua_State
*L
)
315 xcolor_init_request_t reqs
[3];
316 int8_t i
, reqs_nbr
= -1;
318 luaA_checktable(L
, 2);
320 tb
= p_new(titlebar_t
, 1);
322 buf
= luaA_getopt_lstring(L
, 2, "align", "left", &len
);
323 tb
->align
= draw_align_fromstr(buf
, len
);
325 tb
->width
= luaA_getopt_number(L
, 2, "width", 0);
326 tb
->height
= luaA_getopt_number(L
, 2, "height", 0);
328 /* 1.5 as default factor, it fits nice but no one knows why */
329 tb
->height
= 1.5 * globalconf
.font
->height
;
331 buf
= luaA_getopt_lstring(L
, 2, "position", "top", &len
);
332 tb
->position
= position_fromstr(buf
, len
);
334 tb
->colors
.fg
= globalconf
.colors
.fg
;
335 if((buf
= luaA_getopt_lstring(L
, 2, "fg", NULL
, &len
)))
336 reqs
[++reqs_nbr
] = xcolor_init_unchecked(globalconf
.connection
,
338 globalconf
.default_screen
,
341 tb
->colors
.bg
= globalconf
.colors
.bg
;
342 if((buf
= luaA_getopt_lstring(L
, 2, "bg", NULL
, &len
)))
343 reqs
[++reqs_nbr
] = xcolor_init_unchecked(globalconf
.connection
,
345 globalconf
.default_screen
,
348 tb
->border
.color
= globalconf
.colors
.fg
;
349 if((buf
= luaA_getopt_lstring(L
, 2, "border_color", NULL
, &len
)))
350 reqs
[++reqs_nbr
] = xcolor_init_unchecked(globalconf
.connection
,
352 globalconf
.default_screen
,
355 tb
->border
.width
= luaA_getopt_number(L
, 2, "border_width", 0);
357 for(i
= 0; i
<= reqs_nbr
; i
++)
358 xcolor_init_reply(globalconf
.connection
, reqs
[i
]);
360 return luaA_titlebar_userdata_new(globalconf
.L
, tb
);
363 /** Titlebar newindex.
364 * \param L The Lua VM state.
365 * \return The number of elements pushed on stack.
368 luaA_titlebar_newindex(lua_State
*L
)
371 titlebar_t
**titlebar
= luaA_checkudata(L
, 1, "titlebar");
372 const char *buf
, *attr
= luaL_checklstring(L
, 2, &len
);
373 client_t
*c
= NULL
, **newc
;
377 switch(a_tokenize(attr
, len
))
381 newc
= luaA_checkudata(L
, 3, "client");
387 if((*newc
)->titlebar
)
389 simplewindow_delete(&(*newc
)->titlebar
->sw
);
390 titlebar_unref(&(*newc
)->titlebar
);
391 (*newc
)->titlebar
= NULL
;
392 globalconf
.screens
[(*newc
)->screen
].need_arrange
= true;
394 /* Attach titlebar to client */
395 (*newc
)->titlebar
= *titlebar
;
396 titlebar_ref(titlebar
);
397 titlebar_init(*newc
);
402 if((c
= client_getbytitlebar(*titlebar
)))
404 simplewindow_delete(&(*titlebar
)->sw
);
405 /* unref and NULL the ref */
406 titlebar_unref(&c
->titlebar
);
408 globalconf
.screens
[c
->screen
].need_arrange
= true;
413 if((buf
= luaL_checklstring(L
, 3, &len
)))
414 (*titlebar
)->align
= draw_align_fromstr(buf
, len
);
418 case A_TK_BORDER_WIDTH
:
419 if((i
= luaL_checknumber(L
, 3)) >= 0)
420 (*titlebar
)->border
.width
= i
;
424 case A_TK_BORDER_COLOR
:
425 if((buf
= luaL_checklstring(L
, 3, &len
)))
426 if(xcolor_init_reply(globalconf
.connection
,
427 xcolor_init_unchecked(globalconf
.connection
,
428 &(*titlebar
)->border
.color
,
429 globalconf
.default_screen
, buf
, len
)))
431 xcb_change_window_attributes(globalconf
.connection
, (*titlebar
)->sw
->window
,
432 XCB_CW_BORDER_PIXEL
, &(*titlebar
)->border
.color
.pixel
);
435 if((buf
= luaL_checklstring(L
, 3, &len
)))
436 if(xcolor_init_reply(globalconf
.connection
,
437 xcolor_init_unchecked(globalconf
.connection
,
438 &(*titlebar
)->colors
.fg
,
439 globalconf
.default_screen
,
441 (*titlebar
)->need_update
= true;
444 if((buf
= luaL_checklstring(L
, 3, &len
)))
445 if(xcolor_init_reply(globalconf
.connection
,
446 xcolor_init_unchecked(globalconf
.connection
,
447 &(*titlebar
)->colors
.bg
,
448 globalconf
.default_screen
,
450 (*titlebar
)->need_update
= true;
453 buf
= luaL_checklstring(L
, 3, &len
);
454 position
= position_fromstr(buf
, len
);
455 if(position
!= (*titlebar
)->position
)
457 (*titlebar
)->position
= position
;
458 c
= client_getbytitlebar(*titlebar
);
459 simplewindow_delete(&c
->titlebar
->sw
);
467 if((c
|| (c
= client_getbytitlebar(*titlebar
)))
468 && client_isvisible(c
, c
->screen
))
469 globalconf
.screens
[c
->screen
].need_arrange
= true;
475 * \param L The Lua VM state.
476 * \return The number of elements pushed on stack.
478 * \lfield client The client attached to this titlebar.
479 * \lfield align Alignment relative to the client.
480 * \lfield border_width Border width.
481 * \lfield border_color Border color.
482 * \lfield fg Foreground color.
483 * \lfield bg Background color.
484 * \lfield position Position.
487 luaA_titlebar_index(lua_State
*L
)
490 titlebar_t
**titlebar
= luaA_checkudata(L
, 1, "titlebar");
491 const char *attr
= luaL_checklstring(L
, 2, &len
);
494 if(luaA_usemetatable(L
, 1, 2))
497 switch(a_tokenize(attr
, len
))
500 if((c
= client_getbytitlebar(*titlebar
)))
501 return luaA_client_userdata_new(L
, c
);
505 lua_pushstring(L
, draw_align_tostr((*titlebar
)->align
));
507 case A_TK_BORDER_WIDTH
:
508 lua_pushnumber(L
, (*titlebar
)->border
.width
);
510 case A_TK_BORDER_COLOR
:
511 luaA_pushcolor(L
, &(*titlebar
)->border
.color
);
514 luaA_pushcolor(L
, &(*titlebar
)->colors
.fg
);
517 luaA_pushcolor(L
, &(*titlebar
)->colors
.bg
);
520 lua_pushstring(L
, position_tostr((*titlebar
)->position
));
530 luaA_titlebar_widgets(lua_State
*L
)
532 titlebar_t
**titlebar
= luaA_checkudata(L
, 1, "titlebar");
534 if(lua_gettop(L
) == 2)
536 luaA_widget_set(L
, 2, *titlebar
, &(*titlebar
)->widgets
);
537 (*titlebar
)->need_update
= true;
540 return luaA_widget_get(L
, (*titlebar
)->widgets
);
543 /** Convert a titlebar to a printable string.
544 * \param L The Lua VM state.
545 * \return The number of value pushed.
548 * \lvalue A titlebar.
552 luaA_titlebar_tostring(lua_State
*L
)
554 titlebar_t
**p
= luaA_checkudata(L
, 1, "titlebar");
555 lua_pushfstring(L
, "[titlebar udata(%p)]", *p
);
559 const struct luaL_reg awesome_titlebar_methods
[] =
561 { "__call", luaA_titlebar_new
},
564 const struct luaL_reg awesome_titlebar_meta
[] =
566 { "widgets", luaA_titlebar_widgets
},
567 { "__index", luaA_titlebar_index
},
568 { "__newindex", luaA_titlebar_newindex
},
569 { "__eq", luaA_titlebar_eq
},
570 { "__gc", luaA_titlebar_gc
},
571 { "__tostring", luaA_titlebar_tostring
},
575 // vim: filetype=c:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:encoding=utf-8:textwidth=80