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
;
375 widget_node_t
*witer
;
378 switch(a_tokenize(attr
, len
))
382 newc
= luaA_checkudata(L
, 3, "client");
388 if((*newc
)->titlebar
)
390 simplewindow_delete(&(*newc
)->titlebar
->sw
);
391 titlebar_unref(&(*newc
)->titlebar
);
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
);
407 globalconf
.screens
[c
->screen
].need_arrange
= true;
412 if((buf
= luaL_checklstring(L
, 3, &len
)))
413 (*titlebar
)->align
= draw_align_fromstr(buf
, len
);
417 case A_TK_BORDER_WIDTH
:
418 if((i
= luaL_checknumber(L
, 3)) >= 0)
419 (*titlebar
)->border
.width
= i
;
423 case A_TK_BORDER_COLOR
:
424 if((buf
= luaL_checklstring(L
, 3, &len
)))
425 if(xcolor_init_reply(globalconf
.connection
,
426 xcolor_init_unchecked(globalconf
.connection
,
427 &(*titlebar
)->border
.color
,
428 globalconf
.default_screen
, buf
, len
)))
430 xcb_change_window_attributes(globalconf
.connection
, (*titlebar
)->sw
->window
,
431 XCB_CW_BORDER_PIXEL
, &(*titlebar
)->border
.color
.pixel
);
434 if((buf
= luaL_checklstring(L
, 3, &len
)))
435 if(xcolor_init_reply(globalconf
.connection
,
436 xcolor_init_unchecked(globalconf
.connection
,
437 &(*titlebar
)->colors
.fg
,
438 globalconf
.default_screen
,
440 (*titlebar
)->need_update
= true;
443 if((buf
= luaL_checklstring(L
, 3, &len
)))
444 if(xcolor_init_reply(globalconf
.connection
,
445 xcolor_init_unchecked(globalconf
.connection
,
446 &(*titlebar
)->colors
.bg
,
447 globalconf
.default_screen
,
449 (*titlebar
)->need_update
= true;
452 luaA_checktable(L
, 3);
454 /* remove all widgets */
455 for(witer
= (*titlebar
)->widgets
; witer
; witer
= (*titlebar
)->widgets
)
457 if(witer
->widget
->detach
)
458 witer
->widget
->detach(witer
->widget
, *titlebar
);
459 widget_unref(&witer
->widget
);
460 widget_node_list_detach(&(*titlebar
)->widgets
, witer
);
464 (*titlebar
)->need_update
= true;
466 /* now read all widgets and add them */
468 while(lua_next(L
, 3))
470 widget_t
**widget
= luaA_checkudata(L
, -1, "widget");
471 widget_node_t
*w
= p_new(widget_node_t
, 1);
473 widget_node_list_append(&(*titlebar
)->widgets
, w
);
479 buf
= luaL_checklstring(L
, 3, &len
);
480 position
= position_fromstr(buf
, len
);
481 if(position
!= (*titlebar
)->position
)
483 (*titlebar
)->position
= position
;
484 c
= client_getbytitlebar(*titlebar
);
485 simplewindow_delete(&c
->titlebar
->sw
);
493 if((c
|| (c
= client_getbytitlebar(*titlebar
)))
494 && client_isvisible(c
, c
->screen
))
495 globalconf
.screens
[c
->screen
].need_arrange
= true;
501 * \param L The Lua VM state.
502 * \return The number of elements pushed on stack.
504 * \lfield client The client attached to this titlebar.
505 * \lfield align Alignment relative to the client.
506 * \lfield border_width Border width.
507 * \lfield border_color Border color.
508 * \lfield fg Foreground color.
509 * \lfield bg Background color.
510 * \lfield position Position.
513 luaA_titlebar_index(lua_State
*L
)
516 titlebar_t
**titlebar
= luaA_checkudata(L
, 1, "titlebar");
517 const char *attr
= luaL_checklstring(L
, 2, &len
);
519 widget_node_t
*witer
;
522 if(luaA_usemetatable(L
, 1, 2))
525 switch(a_tokenize(attr
, len
))
528 if((c
= client_getbytitlebar(*titlebar
)))
529 return luaA_client_userdata_new(L
, c
);
533 lua_pushstring(L
, draw_align_tostr((*titlebar
)->align
));
535 case A_TK_BORDER_WIDTH
:
536 lua_pushnumber(L
, (*titlebar
)->border
.width
);
538 case A_TK_BORDER_COLOR
:
539 luaA_pushcolor(L
, &(*titlebar
)->border
.color
);
542 luaA_pushcolor(L
, &(*titlebar
)->colors
.fg
);
545 luaA_pushcolor(L
, &(*titlebar
)->colors
.bg
);
549 for(witer
= (*titlebar
)->widgets
; witer
; witer
= witer
->next
)
551 luaA_widget_userdata_new(L
, witer
->widget
);
552 lua_rawseti(L
, -2, ++i
);
556 lua_pushstring(L
, position_tostr((*titlebar
)->position
));
565 /** Convert a titlebar to a printable string.
566 * \param L The Lua VM state.
567 * \return The number of value pushed.
570 * \lvalue A titlebar.
574 luaA_titlebar_tostring(lua_State
*L
)
576 titlebar_t
**p
= luaA_checkudata(L
, 1, "titlebar");
577 lua_pushfstring(L
, "[titlebar udata(%p)]", *p
);
581 const struct luaL_reg awesome_titlebar_methods
[] =
583 { "__call", luaA_titlebar_new
},
586 const struct luaL_reg awesome_titlebar_meta
[] =
588 { "__index", luaA_titlebar_index
},
589 { "__newindex", luaA_titlebar_newindex
},
590 { "__eq", luaA_titlebar_eq
},
591 { "__gc", luaA_titlebar_gc
},
592 { "__tostring", luaA_titlebar_tostring
},
596 // vim: filetype=c:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:encoding=utf-8:textwidth=80