2 * screen.c - screen management
4 * Copyright © 2007-2009 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.
25 #include <xcb/xinerama.h>
33 #include "common/xutil.h"
36 screen_xsitoarea(xcb_xinerama_screen_info_t si
)
48 static xcb_visualtype_t
*
49 screen_default_visual(xcb_screen_t
*s
)
51 xcb_depth_iterator_t depth_iter
= xcb_screen_allowed_depths_iterator(s
);
54 for(; depth_iter
.rem
; xcb_depth_next (&depth_iter
))
55 for(xcb_visualtype_iterator_t visual_iter
= xcb_depth_visuals_iterator(depth_iter
.data
);
56 visual_iter
.rem
; xcb_visualtype_next (&visual_iter
))
57 if(s
->root_visual
== visual_iter
.data
->visual_id
)
58 return visual_iter
.data
;
63 /** Get screens informations and fill global configuration.
68 /* Check for extension before checking for Xinerama */
69 if(xcb_get_extension_data(globalconf
.connection
, &xcb_xinerama_id
)->present
)
71 xcb_xinerama_is_active_reply_t
*xia
;
72 xia
= xcb_xinerama_is_active_reply(globalconf
.connection
, xcb_xinerama_is_active(globalconf
.connection
), NULL
);
73 globalconf
.xinerama_is_active
= xia
->state
;
77 if(globalconf
.xinerama_is_active
)
79 xcb_xinerama_query_screens_reply_t
*xsq
;
80 xcb_xinerama_screen_info_t
*xsi
;
81 int xinerama_screen_number
;
83 xsq
= xcb_xinerama_query_screens_reply(globalconf
.connection
,
84 xcb_xinerama_query_screens_unchecked(globalconf
.connection
),
87 xsi
= xcb_xinerama_query_screens_screen_info(xsq
);
88 xinerama_screen_number
= xcb_xinerama_query_screens_screen_info_length(xsq
);
90 /* now check if screens overlaps (same x,y): if so, we take only the biggest one */
91 for(int screen
= 0; screen
< xinerama_screen_number
; screen
++)
94 foreach(screen_to_test
, globalconf
.screens
)
95 if(xsi
[screen
].x_org
== screen_to_test
->geometry
.x
96 && xsi
[screen
].y_org
== screen_to_test
->geometry
.y
)
98 /* we already have a screen for this area, just check if
99 * it's not bigger and drop it */
101 int i
= screen_array_indexof(&globalconf
.screens
, screen_to_test
);
102 screen_to_test
->geometry
.width
=
103 MAX(xsi
[screen
].width
, xsi
[i
].width
);
104 screen_to_test
->geometry
.height
=
105 MAX(xsi
[screen
].height
, xsi
[i
].height
);
111 s
.geometry
= screen_xsitoarea(xsi
[screen
]);
112 screen_array_append(&globalconf
.screens
, s
);
118 xcb_screen_t
*s
= xutil_screen_get(globalconf
.connection
, globalconf
.default_screen
);
119 globalconf
.screens
.tab
[0].visual
= screen_default_visual(s
);
122 /* One screen only / Zaphod mode */
124 screen
< xcb_setup_roots_length(xcb_get_setup(globalconf
.connection
));
127 xcb_screen_t
*xcb_screen
= xutil_screen_get(globalconf
.connection
, screen
);
132 s
.geometry
.width
= xcb_screen
->width_in_pixels
;
133 s
.geometry
.height
= xcb_screen
->height_in_pixels
;
134 s
.visual
= screen_default_visual(xcb_screen
);
135 screen_array_append(&globalconf
.screens
, s
);
138 globalconf
.screen_focus
= globalconf
.screens
.tab
;
141 /** Return the Xinerama screen number where the coordinates belongs to.
142 * \param screen The logical screen number.
143 * \param x X coordinate
144 * \param y Y coordinate
145 * \return Screen pointer or screen param if no match or no multi-head.
148 screen_getbycoord(screen_t
*screen
, int x
, int y
)
150 /* don't waste our time */
151 if(!globalconf
.xinerama_is_active
)
154 foreach(s
, globalconf
.screens
)
155 if((x
< 0 || (x
>= s
->geometry
.x
&& x
< s
->geometry
.x
+ s
->geometry
.width
))
156 && (y
< 0 || (y
>= s
->geometry
.y
&& y
< s
->geometry
.y
+ s
->geometry
.height
)))
162 /** Get screens info.
163 * \param screen Screen.
164 * \param strut Honor windows strut.
165 * \return The screen area.
168 screen_area_get(screen_t
*screen
, bool strut
)
170 area_t area
= screen
->geometry
;
171 uint16_t top
= 0, bottom
= 0, left
= 0, right
= 0;
174 foreach(_c
, globalconf
.clients
)
177 if(client_isvisible(c
, screen
))
179 if(c
->strut
.top_start_x
|| c
->strut
.top_end_x
)
182 top
= MAX(top
, c
->strut
.top
);
184 top
= MAX(top
, (c
->geometry
.y
- area
.y
) + c
->geometry
.height
);
186 if(c
->strut
.bottom_start_x
|| c
->strut
.bottom_end_x
)
189 bottom
= MAX(bottom
, c
->strut
.bottom
);
191 bottom
= MAX(bottom
, (area
.y
+ area
.height
) - c
->geometry
.y
);
193 if(c
->strut
.left_start_y
|| c
->strut
.left_end_y
)
196 left
= MAX(left
, c
->strut
.left
);
198 left
= MAX(left
, (c
->geometry
.x
- area
.x
) + c
->geometry
.width
);
200 if(c
->strut
.right_start_y
|| c
->strut
.right_end_y
)
203 right
= MAX(right
, c
->strut
.right
);
205 right
= MAX(right
, (area
.x
+ area
.width
) - c
->geometry
.x
);
212 area
.width
-= left
+ right
;
213 area
.height
-= top
+ bottom
;
218 /** Get display info.
219 * \param phys_screen Physical screen number.
220 * \return The display area.
223 display_area_get(int phys_screen
)
225 xcb_screen_t
*s
= xutil_screen_get(globalconf
.connection
, phys_screen
);
226 area_t area
= { .x
= 0,
228 .width
= s
->width_in_pixels
,
229 .height
= s
->height_in_pixels
};
233 /** This returns the real X screen number for a logical
234 * screen if Xinerama is active.
235 * \param screen The logical screen.
236 * \return The X screen.
239 screen_virttophys(int screen
)
241 if(globalconf
.xinerama_is_active
)
242 return globalconf
.default_screen
;
246 /** Move a client to a virtual screen.
247 * \param c The client to move.
248 * \param new_screen The destinatiuon screen.
249 * \param dotag Set to true if we also change tags.
250 * \param doresize Set to true if we also move the client to the new x and
251 * y of the new screen.
254 screen_client_moveto(client_t
*c
, screen_t
*new_screen
, bool dotag
, bool doresize
)
257 screen_t
*old_screen
= c
->screen
;
258 tag_array_t
*old_tags
= &old_screen
->tags
,
259 *new_tags
= &new_screen
->tags
;
262 if(new_screen
== c
->screen
)
265 c
->screen
= new_screen
;
268 c
->titlebar
->screen
= new_screen
;
270 if(dotag
&& !c
->issticky
)
272 /* remove old tags */
273 for(i
= 0; i
< old_tags
->len
; i
++)
274 untag_client(c
, old_tags
->tab
[i
]);
277 foreach(new_tag
, *new_tags
)
278 if((*new_tag
)->selected
)
280 tag_push(globalconf
.L
, *new_tag
);
287 hook_property(client
, c
, "screen");
291 from
= screen_area_get(old_screen
, false);
292 to
= screen_area_get(c
->screen
, false);
294 area_t new_geometry
= c
->geometry
;
299 area_t new_f_geometry
= c
->geometries
.fullscreen
;
301 new_f_geometry
.x
= to
.x
+ new_f_geometry
.x
- from
.x
;
302 new_f_geometry
.y
= to
.y
+ new_f_geometry
.y
- from
.x
;
304 /* resize the client's original geometry if it doesn't fit the screen */
305 if(new_f_geometry
.width
> to
.width
)
306 new_f_geometry
.width
= to
.width
;
307 if(new_f_geometry
.height
> to
.height
)
308 new_f_geometry
.height
= to
.height
;
310 /* make sure the client is still on the screen */
311 if(new_f_geometry
.x
+ new_f_geometry
.width
> to
.x
+ to
.width
)
312 new_f_geometry
.x
= to
.x
+ to
.width
- new_f_geometry
.width
;
313 if(new_f_geometry
.y
+ new_f_geometry
.height
> to
.y
+ to
.height
)
314 new_f_geometry
.y
= to
.y
+ to
.height
- new_f_geometry
.height
;
316 c
->geometries
.fullscreen
= new_f_geometry
;
320 new_geometry
.x
= to
.x
+ new_geometry
.x
- from
.x
;
321 new_geometry
.y
= to
.y
+ new_geometry
.y
- from
.y
;
323 /* resize the client if it doesn't fit the new screen */
324 if(new_geometry
.width
> to
.width
)
325 new_geometry
.width
= to
.width
;
326 if(new_geometry
.height
> to
.height
)
327 new_geometry
.height
= to
.height
;
329 /* make sure the client is still on the screen */
330 if(new_geometry
.x
+ new_geometry
.width
> to
.x
+ to
.width
)
331 new_geometry
.x
= to
.x
+ to
.width
- new_geometry
.width
;
332 if(new_geometry
.y
+ new_geometry
.height
> to
.y
+ to
.height
)
333 new_geometry
.y
= to
.y
+ to
.height
- new_geometry
.height
;
335 /* move / resize the client */
336 client_resize(c
, new_geometry
, false);
337 hook_property(client
, c
, "screen");
340 /** Push a screen onto the stack.
341 * \param L The Lua VM state.
342 * \param s The scren to push.
343 * \return The number of elements pushed on stack.
346 luaA_pushscreen(lua_State
*L
, screen_t
*s
)
348 lua_pushlightuserdata(L
, s
);
349 luaL_getmetatable(L
, "screen");
350 lua_setmetatable(L
, -2);
355 * \param L The Lua VM state.
356 * \return The number of elements pushed on stack.
358 * \lfield number The screen number, to get a screen.
361 luaA_screen_module_index(lua_State
*L
)
363 int screen
= luaL_checknumber(L
, 2) - 1;
364 luaA_checkscreen(screen
);
365 return luaA_pushscreen(L
, &globalconf
.screens
.tab
[screen
]);
368 /** Get or set screen tags.
369 * \param L The Lua VM state.
370 * \return The number of elements pushed on stack.
372 * \lparam None or a table of tags to set to the screen.
373 * The table must contains at least one tag.
374 * \return A table with all screen tags.
377 luaA_screen_tags(lua_State
*L
)
380 screen_t
*s
= luaL_checkudata(L
, 1, "screen");
382 if(lua_gettop(L
) == 2)
384 luaA_checktable(L
, 2);
386 /* remove current tags */
387 for(i
= 0; i
< s
->tags
.len
; i
++)
388 s
->tags
.tab
[i
]->screen
= NULL
;
390 tag_array_wipe(&s
->tags
);
391 tag_array_init(&s
->tags
);
393 s
->need_reban
= true;
397 while(lua_next(L
, 2))
398 tag_append_to_screen(s
);
402 lua_createtable(L
, s
->tags
.len
, 0);
403 for(i
= 0; i
< s
->tags
.len
; i
++)
405 tag_push(L
, s
->tags
.tab
[i
]);
406 lua_rawseti(L
, -2, i
+ 1);
414 * \param L The Lua VM state.
415 * \return The number of elements pushed on stack.
417 * \lfield coords The screen coordinates. Immutable.
418 * \lfield workarea The screen workarea.
421 luaA_screen_index(lua_State
*L
)
427 if(luaA_usemetatable(L
, 1, 2))
430 buf
= luaL_checklstring(L
, 2, &len
);
431 s
= lua_touserdata(L
, 1);
433 switch(a_tokenize(buf
, len
))
436 luaA_pusharea(L
, s
->geometry
);
439 luaA_pusharea(L
, screen_area_get(s
, true));
448 /** Get the screen count.
449 * \param L The Lua VM state.
450 * \return The number of elements pushed on stack.
453 * \lreturn The screen count, at least 1.
456 luaA_screen_count(lua_State
*L
)
458 lua_pushnumber(L
, globalconf
.screens
.len
);
462 const struct luaL_reg awesome_screen_methods
[] =
464 { "count", luaA_screen_count
},
465 { "__index", luaA_screen_module_index
},
469 const struct luaL_reg awesome_screen_meta
[] =
471 { "tags", luaA_screen_tags
},
472 { "__index", luaA_screen_index
},
476 // vim: filetype=c:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:encoding=utf-8:textwidth=80