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
)
316 luaA_checktable(L
, 2);
318 tb
= p_new(titlebar_t
, 1);
320 buf
= luaA_getopt_lstring(L
, 2, "align", "left", &len
);
321 tb
->align
= draw_align_fromstr(buf
, len
);
323 tb
->width
= luaA_getopt_number(L
, 2, "width", 0);
324 tb
->height
= luaA_getopt_number(L
, 2, "height", 0);
326 /* 1.5 as default factor, it fits nice but no one knows why */
327 tb
->height
= 1.5 * globalconf
.font
->height
;
329 buf
= luaA_getopt_lstring(L
, 2, "position", "top", &len
);
330 tb
->position
= position_fromstr(buf
, len
);
332 tb
->colors
.fg
= globalconf
.colors
.fg
;
333 if((buf
= luaA_getopt_lstring(L
, 2, "fg", NULL
, &len
)))
334 xcolor_init(&tb
->colors
.fg
, globalconf
.connection
,
335 globalconf
.default_screen
, buf
, len
);
337 tb
->colors
.bg
= globalconf
.colors
.bg
;
338 if((buf
= luaA_getopt_lstring(L
, 2, "bg", NULL
, &len
)))
339 xcolor_init(&tb
->colors
.bg
, globalconf
.connection
,
340 globalconf
.default_screen
, buf
, len
);
342 tb
->border
.color
= globalconf
.colors
.fg
;
343 if((buf
= luaA_getopt_lstring(L
, 2, "border_color", NULL
, &len
)))
344 xcolor_init(&tb
->border
.color
, globalconf
.connection
,
345 globalconf
.default_screen
, buf
, len
);
347 tb
->border
.width
= luaA_getopt_number(L
, 2, "border_width", 0);
349 return luaA_titlebar_userdata_new(globalconf
.L
, tb
);
352 /** Titlebar newindex.
353 * \param L The Lua VM state.
354 * \return The number of elements pushed on stack.
357 luaA_titlebar_newindex(lua_State
*L
)
360 titlebar_t
**titlebar
= luaA_checkudata(L
, 1, "titlebar");
361 const char *buf
, *attr
= luaL_checklstring(L
, 2, &len
);
362 client_t
*c
= NULL
, **newc
;
364 widget_node_t
*witer
;
367 switch(a_tokenize(attr
, len
))
371 newc
= luaA_checkudata(L
, 3, "client");
377 if((*newc
)->titlebar
)
379 simplewindow_delete(&(*newc
)->titlebar
->sw
);
380 titlebar_unref(&(*newc
)->titlebar
);
381 globalconf
.screens
[(*newc
)->screen
].need_arrange
= true;
383 /* Attach titlebar to client */
384 (*newc
)->titlebar
= *titlebar
;
385 titlebar_ref(titlebar
);
386 titlebar_init(*newc
);
391 if((c
= client_getbytitlebar(*titlebar
)))
393 simplewindow_delete(&(*titlebar
)->sw
);
394 /* unref and NULL the ref */
395 titlebar_unref(&c
->titlebar
);
396 globalconf
.screens
[c
->screen
].need_arrange
= true;
401 if((buf
= luaL_checklstring(L
, 3, &len
)))
402 (*titlebar
)->align
= draw_align_fromstr(buf
, len
);
406 case A_TK_BORDER_WIDTH
:
407 if((i
= luaL_checknumber(L
, 3)) >= 0)
408 (*titlebar
)->border
.width
= i
;
412 case A_TK_BORDER_COLOR
:
413 if((buf
= luaL_checklstring(L
, 3, &len
)))
414 if(xcolor_init(&(*titlebar
)->border
.color
, globalconf
.connection
,
415 globalconf
.default_screen
, buf
, len
))
417 xcb_change_window_attributes(globalconf
.connection
, (*titlebar
)->sw
->window
,
418 XCB_CW_BORDER_PIXEL
, &(*titlebar
)->border
.color
.pixel
);
421 if((buf
= luaL_checklstring(L
, 3, &len
)))
422 if(xcolor_init(&(*titlebar
)->colors
.fg
, globalconf
.connection
,
423 globalconf
.default_screen
, buf
, len
))
424 (*titlebar
)->need_update
= true;
427 if((buf
= luaL_checklstring(L
, 3, &len
)))
428 if(xcolor_init(&(*titlebar
)->colors
.bg
, globalconf
.connection
,
429 globalconf
.default_screen
, buf
, len
))
430 (*titlebar
)->need_update
= true;
433 luaA_checktable(L
, 3);
435 /* remove all widgets */
436 for(witer
= (*titlebar
)->widgets
; witer
; witer
= (*titlebar
)->widgets
)
438 if(witer
->widget
->detach
)
439 witer
->widget
->detach(witer
->widget
, *titlebar
);
440 widget_unref(&witer
->widget
);
441 widget_node_list_detach(&(*titlebar
)->widgets
, witer
);
445 (*titlebar
)->need_update
= true;
447 /* now read all widgets and add them */
449 while(lua_next(L
, 3))
451 widget_t
**widget
= luaA_checkudata(L
, -1, "widget");
452 widget_node_t
*w
= p_new(widget_node_t
, 1);
454 widget_node_list_append(&(*titlebar
)->widgets
, w
);
460 buf
= luaL_checklstring(L
, 3, &len
);
461 position
= position_fromstr(buf
, len
);
462 if(position
!= (*titlebar
)->position
)
464 (*titlebar
)->position
= position
;
465 c
= client_getbytitlebar(*titlebar
);
466 simplewindow_delete(&c
->titlebar
->sw
);
474 if((c
|| (c
= client_getbytitlebar(*titlebar
)))
475 && client_isvisible(c
, c
->screen
))
476 globalconf
.screens
[c
->screen
].need_arrange
= true;
482 * \param L The Lua VM state.
483 * \return The number of elements pushed on stack.
485 * \lfield client The client attached to this titlebar.
486 * \lfield align Alignment relative to the client.
487 * \lfield border_width Border width.
488 * \lfield border_color Border color.
489 * \lfield fg Foreground color.
490 * \lfield bg Background color.
491 * \lfield position Position.
494 luaA_titlebar_index(lua_State
*L
)
497 titlebar_t
**titlebar
= luaA_checkudata(L
, 1, "titlebar");
498 const char *attr
= luaL_checklstring(L
, 2, &len
);
500 widget_node_t
*witer
;
503 if(luaA_usemetatable(L
, 1, 2))
506 switch(a_tokenize(attr
, len
))
509 if((c
= client_getbytitlebar(*titlebar
)))
510 return luaA_client_userdata_new(L
, c
);
514 lua_pushstring(L
, draw_align_tostr((*titlebar
)->align
));
516 case A_TK_BORDER_WIDTH
:
517 lua_pushnumber(L
, (*titlebar
)->border
.width
);
519 case A_TK_BORDER_COLOR
:
520 luaA_pushcolor(L
, &(*titlebar
)->border
.color
);
523 luaA_pushcolor(L
, &(*titlebar
)->colors
.fg
);
526 luaA_pushcolor(L
, &(*titlebar
)->colors
.bg
);
530 for(witer
= (*titlebar
)->widgets
; witer
; witer
= witer
->next
)
532 luaA_widget_userdata_new(L
, witer
->widget
);
533 lua_rawseti(L
, -2, ++i
);
537 lua_pushstring(L
, position_tostr((*titlebar
)->position
));
546 /** Convert a titlebar to a printable string.
547 * \param L The Lua VM state.
548 * \return The number of value pushed.
551 * \lvalue A titlebar.
555 luaA_titlebar_tostring(lua_State
*L
)
557 titlebar_t
**p
= luaA_checkudata(L
, 1, "titlebar");
558 lua_pushfstring(L
, "[titlebar udata(%p)]", *p
);
562 const struct luaL_reg awesome_titlebar_methods
[] =
564 { "__call", luaA_titlebar_new
},
567 const struct luaL_reg awesome_titlebar_meta
[] =
569 { "__index", luaA_titlebar_index
},
570 { "__newindex", luaA_titlebar_newindex
},
571 { "__eq", luaA_titlebar_eq
},
572 { "__gc", luaA_titlebar_gc
},
573 { "__tostring", luaA_titlebar_tostring
},
577 // vim: filetype=c:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:encoding=utf-8:textwidth=80