lib/awful/ewmh.lua.in

   1 ---------------------------------------------------------------------------
   2 -- @author Julien Danjou &lt;julien@danjou.info&gt;
   3 -- @copyright 2009 Julien Danjou
   4 -- @release @AWESOME_VERSION@
   5 ---------------------------------------------------------------------------
   6
   7 local setmetatable = setmetatable
   8 local client = client
   9 local screen = screen
  10 local ipairs = ipairs
  11 local math = math
  12 local atag = require("awful.tag")
  13
  14 --- Implements EWMH requests handling.
  15 -- awful.ewmh
  16 local ewmh = {}
  17
  18 local data = setmetatable({}, { __mode = 'k' })
  19
  20 local function store_geometry(window, reqtype)
  21     if not data[window] then data[window] = {} end
  22     if not data[window][reqtype] then data[window][reqtype] = {} end
  23     data[window][reqtype] = window:geometry()
  24     data[window][reqtype].screen = window.screen
  25 end
  26
  27 -- Maximize a window horizontally.
  28 -- @param window The window.
  29 -- @param set Set or unset the maximized values.
  30 local function maximized_horizontal(window, set)
  31     if set then
  32         store_geometry(window, "maximized_horizontal")
  33         local g = screen[window.screen].workarea
  34         local bw = window.border_width or 0
  35         window:geometry { width = g.width - 2*bw, x = g.x }
  36     elseif data[window] and data[window].maximized_horizontal
  37         and data[window].maximized_horizontal.x
  38         and data[window].maximized_horizontal.width then
  39         local g = data[window].maximized_horizontal
  40         window:geometry { width = g.width, x = g.x }
  41     end
  42 end
  43
  44 -- Maximize a window vertically.
  45 -- @param window The window.
  46 -- @param set Set or unset the maximized values.
  47 local function maximized_vertical(window, set)
  48     if set then
  49         store_geometry(window, "maximized_vertical")
  50         local g = screen[window.screen].workarea
  51         local bw = window.border_width or 0
  52         window:geometry { height = g.height - 2*bw, y = g.y }
  53     elseif data[window] and data[window].maximized_vertical
  54         and data[window].maximized_vertical.y
  55         and data[window].maximized_vertical.height then
  56         local g = data[window].maximized_vertical
  57         window:geometry { height = g.height, y = g.y }
  58     end
  59 end
  60
  61 -- Fullscreen a window.
  62 -- @param window The window.
  63 -- @param set Set or unset the fullscreen values.
  64 local function fullscreen(window, set)
  65     if set then
  66         store_geometry(window, "fullscreen")
  67         data[window].fullscreen.border_width = window.border_width
  68         local g = screen[window.screen].geometry
  69         window:geometry(screen[window.screen].geometry)
  70         window.border_width = 0
  71     elseif data[window] and data[window].fullscreen then
  72         window:geometry(data[window].fullscreen)
  73         window.border_width = data[window].fullscreen.border_width
  74     end
  75 end
  76
  77 local function screen_change(window)
  78     if data[window] then
  79         for _, reqtype in ipairs({ "maximized_vertical", "maximized_horizontal", "fullscreen" }) do
  80             if data[window][reqtype] then
  81                 if data[window][reqtype].width then
  82                     data[window][reqtype].width = math.min(data[window][reqtype].width,
  83                                                            screen[window.screen].workarea.width)
  84                     if reqtype == "maximized_horizontal" then
  85                         local bw = window.border_width or 0
  86                         data[window][reqtype].width = data[window][reqtype].width - 2*bw
  87                     end
  88                 end
  89                 if data[window][reqtype].height then
  90                     data[window][reqtype].height = math.min(data[window][reqtype].height,
  91                                                              screen[window.screen].workarea.height)
  92                     if reqtype == "maximized_vertical" then
  93                         local bw = window.border_width or 0
  94                         data[window][reqtype].height = data[window][reqtype].height - 2*bw
  95                     end
  96                 end
  97                 if data[window][reqtype].screen then
  98                     local from = screen[data[window][reqtype].screen].workarea
  99                     local to = screen[window.screen].workarea
 100                     local new_x, new_y
 101                     if data[window][reqtype].x then
 102                         new_x = to.x + data[window][reqtype].x - from.x
 103                         if new_x > to.x + to.width then new_x = to.x end
 104                         data[window][reqtype].x = new_x
 105                     end
 106                     if data[window][reqtype].y then
 107                         new_y = to.y + data[window][reqtype].y - from.y
 108                         if new_y > to.y + to.width then new_y = to.y end
 109                         data[window][reqtype].y = new_y
 110                     end
 111                 end
 112             end
 113         end
 114     end
 115 end
 116
 117 -- Update a client's settings when its border width changes
 118 local function border_change(window)
 119     -- Fix up the geometry in case this window needs to cover the whole screen.
 120     local bw = window.border_width or 0
 121     local g = screen[window.screen].workarea
 122     if window.maximized_vertical then
 123         window:geometry { height = g.height - 2*bw, y = g.y }
 124     end
 125     if window.maximized_horizontal then
 126         window:geometry { width = g.width - 2*bw, x = g.x }
 127     end
 128     if window.fullscreen then
 129         -- This *will* cause an endless loop if some other property::border_width
 130         -- signal dares to change the border width, too, so don't do that!
 131         window.border_width = 0
 132         window:geometry(screen[window.screen].geometry)
 133     end
 134 end
 135
 136 -- Activate a window
 137 function ewmh.activate(c)
 138     if awesome.startup or c:isvisible() then
 139         client.focus = c
 140         c:raise()
 141     else
 142         c.urgent = true
 143     end
 144 end
 145
 146 -- Tag a window with its requested tag
 147 function ewmh.tag(c, t)
 148     if not t then
 149         c.sticky = true
 150     else
 151         c.screen = atag.getscreen(t)
 152         c:tags({ t })
 153     end
 154 end
 155
 156 client.connect_signal("request::activate", ewmh.activate)
 157 client.connect_signal("request::tag", ewmh.tag)
 158 client.connect_signal("request::maximized_horizontal", maximized_horizontal)
 159 client.connect_signal("request::maximized_vertical", maximized_vertical)
 160 client.connect_signal("request::fullscreen", fullscreen)
 161 client.connect_signal("property::screen", screen_change)
 162 client.connect_signal("property::border_width", border_change)
 163
 164 return ewmh
 165
 166 -- vim: filetype=lua:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:textwidth=80