screen.c 18.5 KB
Newer Older
rhp's avatar
...  
rhp committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
/* Metacity X screen handler */

/* 
 * Copyright (C) 2001 Havoc Pennington
 * 
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2 of the
 * License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
 * 02111-1307, USA.
 */
rhp's avatar
...  
rhp committed
21

22
#include <config.h>
rhp's avatar
...  
rhp committed
23 24
#include "screen.h"
#include "util.h"
rhp's avatar
...  
rhp committed
25
#include "errors.h"
rhp's avatar
...  
rhp committed
26
#include "window.h"
rhp's avatar
...  
rhp committed
27
#include "frame.h"
28
#include "prefs.h"
rhp's avatar
...  
rhp committed
29 30
#include "workspace.h"
#include "keybindings.h"
rhp's avatar
...  
rhp committed
31
#include "stack.h"
rhp's avatar
...  
rhp committed
32

rhp's avatar
...  
rhp committed
33
#include <X11/Xatom.h>
rhp's avatar
...  
rhp committed
34 35
#include <locale.h>
#include <string.h>
rhp's avatar
...  
rhp committed
36

rhp's avatar
...  
rhp committed
37 38 39
static char* get_screen_name (MetaDisplay *display,
                              int          number);

40
static void update_num_workspaces  (MetaScreen *screen);
41
static void update_focus_mode      (MetaScreen *screen);
42 43
static void prefs_changed_callback (MetaPreference pref,
                                    gpointer       data);
rhp's avatar
...  
rhp committed
44

rhp's avatar
...  
rhp committed
45 46 47 48 49
static int
set_wm_check_hint (MetaScreen *screen)
{
  unsigned long data[1];

rhp's avatar
...  
rhp committed
50 51
  g_return_val_if_fail (screen->display->leader_window != None, 0);
  
rhp's avatar
...  
rhp committed
52 53 54 55 56 57
  data[0] = screen->display->leader_window;

  XChangeProperty (screen->display->xdisplay, screen->xroot,
                   screen->display->atom_net_supporting_wm_check,
                   XA_WINDOW,
                   32, PropModeReplace, (guchar*) data, 1);
rhp's avatar
...  
rhp committed
58

59 60 61 62
  /* Legacy GNOME hint (uses cardinal, dunno why) */

  /* legacy hint window should have property containing self */
  XChangeProperty (screen->display->xdisplay, screen->display->leader_window,
rhp's avatar
...  
rhp committed
63
                   screen->display->atom_win_supporting_wm_check,
rhp's avatar
...  
rhp committed
64
                   XA_CARDINAL,
rhp's avatar
...  
rhp committed
65 66
                   32, PropModeReplace, (guchar*) data, 1);

67 68 69 70 71 72 73 74
  /* do this after setting up window fully, to avoid races
   * with clients listening to property notify on root.
   */
  XChangeProperty (screen->display->xdisplay, screen->xroot,
                   screen->display->atom_win_supporting_wm_check,
                   XA_CARDINAL,
                   32, PropModeReplace, (guchar*) data, 1);
  
rhp's avatar
...  
rhp committed
75 76 77 78 79 80
  return Success;
}

static int
set_supported_hint (MetaScreen *screen)
{
81
#define N_SUPPORTED 29
rhp's avatar
...  
rhp committed
82
#define N_WIN_SUPPORTED 1
rhp's avatar
...  
rhp committed
83
  Atom atoms[N_SUPPORTED];
rhp's avatar
...  
rhp committed
84
  
rhp's avatar
...  
rhp committed
85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101
  atoms[0] = screen->display->atom_net_wm_name;
  atoms[1] = screen->display->atom_net_close_window;
  atoms[2] = screen->display->atom_net_wm_state;
  atoms[3] = screen->display->atom_net_wm_state_shaded;
  atoms[4] = screen->display->atom_net_wm_state_maximized_vert;
  atoms[5] = screen->display->atom_net_wm_state_maximized_horz;
  atoms[6] = screen->display->atom_net_wm_desktop;
  atoms[7] = screen->display->atom_net_number_of_desktops;
  atoms[8] = screen->display->atom_net_current_desktop;
  atoms[9] = screen->display->atom_net_wm_window_type;
  atoms[10] = screen->display->atom_net_wm_window_type_desktop;
  atoms[11] = screen->display->atom_net_wm_window_type_dock;
  atoms[12] = screen->display->atom_net_wm_window_type_toolbar;
  atoms[13] = screen->display->atom_net_wm_window_type_menu;
  atoms[14] = screen->display->atom_net_wm_window_type_dialog;
  atoms[15] = screen->display->atom_net_wm_window_type_normal;
  atoms[16] = screen->display->atom_net_wm_state_modal;
rhp's avatar
...  
rhp committed
102 103
  atoms[17] = screen->display->atom_net_client_list;
  atoms[18] = screen->display->atom_net_client_list_stacking;
rhp's avatar
...  
rhp committed
104 105
  atoms[19] = screen->display->atom_net_wm_state_skip_taskbar;
  atoms[20] = screen->display->atom_net_wm_state_skip_pager;
Havoc Pennington's avatar
Havoc Pennington committed
106
  atoms[21] = screen->display->atom_net_wm_icon;
107
  atoms[22] = screen->display->atom_net_wm_moveresize;
108
  atoms[23] = screen->display->atom_net_wm_state_hidden;
109 110
  atoms[24] = screen->display->atom_net_wm_window_type_utility;
  atoms[25] = screen->display->atom_net_wm_window_type_splashscreen;
111
  atoms[26] = screen->display->atom_net_wm_state_fullscreen;
112
  atoms[27] = screen->display->atom_net_wm_ping;
113
  atoms[28] = screen->display->atom_net_active_window;
rhp's avatar
...  
rhp committed
114 115
  
  XChangeProperty (screen->display->xdisplay, screen->xroot,
116
                   screen->display->atom_net_supported,
rhp's avatar
...  
rhp committed
117 118 119
                   XA_ATOM,
                   32, PropModeReplace, (guchar*) atoms, N_SUPPORTED);

rhp's avatar
...  
rhp committed
120 121 122 123 124 125 126 127
  /* Set legacy GNOME hints */
  atoms[0] = screen->display->atom_win_layer;
  
  XChangeProperty (screen->display->xdisplay, screen->xroot,
                   screen->display->atom_win_protocols,
                   XA_ATOM,
                   32, PropModeReplace, (guchar*) atoms, N_WIN_SUPPORTED);
  
rhp's avatar
...  
rhp committed
128 129 130 131
  return Success;
#undef N_SUPPORTED
}

Havoc Pennington's avatar
Havoc Pennington committed
132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154
static int
set_wm_icon_size_hint (MetaScreen *screen)
{
#define N_VALS 6
  gulong vals[N_VALS];

  /* min width, min height, max w, max h, width inc, height inc */
  vals[0] = META_ICON_WIDTH;
  vals[1] = META_ICON_HEIGHT;
  vals[2] = META_ICON_WIDTH;
  vals[3] = META_ICON_HEIGHT;
  vals[4] = 0;
  vals[5] = 0;
  
  XChangeProperty (screen->display->xdisplay, screen->xroot,
                   screen->display->atom_wm_icon_size,
                   XA_CARDINAL,
                   32, PropModeReplace, (guchar*) vals, N_VALS);
  
  return Success;
#undef N_VALS
}

rhp's avatar
...  
rhp committed
155 156 157 158 159
MetaScreen*
meta_screen_new (MetaDisplay *display,
                 int          number)
{
  MetaScreen *screen;
rhp's avatar
...  
rhp committed
160 161
  Window xroot;
  Display *xdisplay;
rhp's avatar
...  
rhp committed
162
  
rhp's avatar
...  
rhp committed
163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191
  /* Only display->name, display->xdisplay, and display->error_traps
   * can really be used in this function, since normally screens are
   * created from the MetaDisplay constructor
   */
  
  xdisplay = display->xdisplay;
  
  meta_verbose ("Trying screen %d on display '%s'\n",
                number, display->name);

  xroot = RootWindow (xdisplay, number);

  /* FVWM checks for None here, I don't know if this
   * ever actually happens
   */
  if (xroot == None)
    {
      meta_warning (_("Screen %d on display '%s' is invalid\n"),
                    number, display->name);
      return NULL;
    }

  /* Select our root window events */
  meta_error_trap_push (display);
  XSelectInput (xdisplay,
                xroot,
                SubstructureRedirectMask | SubstructureNotifyMask |
                ColormapChangeMask | PropertyChangeMask |
                LeaveWindowMask | EnterWindowMask |
192 193
                ButtonPressMask | ButtonReleaseMask |
                FocusChangeMask);
rhp's avatar
...  
rhp committed
194 195 196 197 198 199
  if (meta_error_trap_pop (display) != Success)
    {
      meta_warning (_("Screen %d on display '%s' already has a window manager\n"),
                    number, display->name);
      return NULL;
    }
rhp's avatar
...  
rhp committed
200 201 202
  
  screen = g_new (MetaScreen, 1);

rhp's avatar
...  
rhp committed
203
  screen->display = display;
rhp's avatar
...  
rhp committed
204
  screen->number = number;
rhp's avatar
...  
rhp committed
205
  screen->screen_name = get_screen_name (display, number);
rhp's avatar
...  
rhp committed
206
  screen->xscreen = ScreenOfDisplay (xdisplay, number);
rhp's avatar
...  
rhp committed
207
  screen->xroot = xroot;
rhp's avatar
...  
rhp committed
208 209
  screen->width = WidthOfScreen (screen->xscreen);
  screen->height = HeightOfScreen (screen->xscreen);
rhp's avatar
...  
rhp committed
210
  screen->current_cursor = -1; /* invalid/unset */
Havoc Pennington's avatar
Havoc Pennington committed
211 212
  screen->default_xvisual = DefaultVisualOfScreen (screen->xscreen);
  screen->default_depth = DefaultDepthOfScreen (screen->xscreen);
rhp's avatar
...  
rhp committed
213 214
  
  meta_screen_set_cursor (screen, META_CURSOR_DEFAULT);
rhp's avatar
...  
rhp committed
215
  
rhp's avatar
...  
rhp committed
216 217 218 219
  if (display->leader_window == None)
    display->leader_window = XCreateSimpleWindow (display->xdisplay,
                                                  screen->xroot,
                                                  -100, -100, 1, 1, 0, 0, 0);
Havoc Pennington's avatar
Havoc Pennington committed
220

221 222 223 224 225 226 227 228 229 230
  if (display->no_focus_window == None)
    {
      display->no_focus_window = XCreateSimpleWindow (display->xdisplay,
                                                      screen->xroot,
                                                      -100, -100, 1, 1, 0, 0, 0);
      XSelectInput (display->xdisplay, display->no_focus_window,
                    FocusChangeMask);
      XMapWindow (display->xdisplay, display->no_focus_window);
    }
  
Havoc Pennington's avatar
Havoc Pennington committed
231
  set_wm_icon_size_hint (screen);
rhp's avatar
...  
rhp committed
232
  
rhp's avatar
...  
rhp committed
233 234 235 236
  set_supported_hint (screen);
  
  set_wm_check_hint (screen);
  
rhp's avatar
...  
rhp committed
237 238 239 240
  /* Screens must have at least one workspace at all times,
   * so create that required workspace.
   */
  screen->active_workspace = meta_workspace_new (screen);
241 242
  update_num_workspaces (screen);
  
rhp's avatar
...  
rhp committed
243
  meta_screen_grab_keys (screen);
rhp's avatar
...  
rhp committed
244

rhp's avatar
...  
rhp committed
245
  screen->ui = meta_ui_new (screen->display->xdisplay,
rhp's avatar
...  
rhp committed
246
                            screen->xscreen);
rhp's avatar
...  
rhp committed
247

248 249
  screen->tab_popup = NULL;
  
rhp's avatar
...  
rhp committed
250
  screen->stack = meta_stack_new (screen);
251 252

  meta_prefs_add_listener (prefs_changed_callback, screen);
rhp's avatar
...  
rhp committed
253
  
rhp's avatar
...  
rhp committed
254 255
  meta_verbose ("Added screen %d ('%s') root 0x%lx\n",
                screen->number, screen->screen_name, screen->xroot);  
rhp's avatar
...  
rhp committed
256 257 258 259 260 261
  
  return screen;
}

void
meta_screen_free (MetaScreen *screen)
262
{  
263 264
  meta_prefs_remove_listener (prefs_changed_callback, screen);
  
rhp's avatar
...  
rhp committed
265
  meta_screen_ungrab_keys (screen);
266

rhp's avatar
...  
rhp committed
267
  meta_ui_free (screen->ui);
rhp's avatar
...  
rhp committed
268

rhp's avatar
...  
rhp committed
269
  meta_stack_free (screen->stack);
270 271 272 273 274 275

  meta_error_trap_push (screen->display);
  XSelectInput (screen->display->xdisplay, screen->xroot, 0);
  if (meta_error_trap_pop (screen->display) != Success)
    meta_warning (_("Could not release screen %d on display '%s'\n"),
                  screen->number, screen->display->name);
rhp's avatar
...  
rhp committed
276
  
rhp's avatar
...  
rhp committed
277
  g_free (screen->screen_name);
rhp's avatar
...  
rhp committed
278 279 280
  g_free (screen);
}

rhp's avatar
...  
rhp committed
281 282 283 284 285
void
meta_screen_manage_all_windows (MetaScreen *screen)
{
  Window ignored1, ignored2;
  Window *children;
286
  int n_children;
rhp's avatar
...  
rhp committed
287 288 289 290 291 292 293 294 295 296
  int i;

  /* Must grab server to avoid obvious race condition */
  meta_display_grab (screen->display);

  meta_error_trap_push (screen->display);
  
  XQueryTree (screen->display->xdisplay,
              screen->xroot,
              &ignored1, &ignored2, &children, &n_children);
rhp's avatar
...  
rhp committed
297

rhp's avatar
...  
rhp committed
298 299 300 301 302
  if (meta_error_trap_pop (screen->display))
    {
      meta_display_ungrab (screen->display);
      return;
    }
rhp's avatar
...  
rhp committed
303 304

  meta_stack_freeze (screen->stack);
rhp's avatar
...  
rhp committed
305 306 307
  i = 0;
  while (i < n_children)
    {
rhp's avatar
...  
rhp committed
308
      meta_window_new (screen->display, children[i], TRUE);
rhp's avatar
...  
rhp committed
309 310 311

      ++i;
    }
rhp's avatar
...  
rhp committed
312
  meta_stack_thaw (screen->stack);
rhp's avatar
...  
rhp committed
313 314 315 316 317 318

  meta_display_ungrab (screen->display);
  
  if (children)
    XFree (children);
}
rhp's avatar
...  
rhp committed
319 320 321 322 323 324 325 326 327 328 329 330 331

MetaScreen*
meta_screen_for_x_screen (Screen *xscreen)
{
  MetaDisplay *display;
  
  display = meta_display_for_x_display (DisplayOfScreen (xscreen));

  if (display == NULL)
    return NULL;
  
  return meta_display_screen_for_x_screen (display, xscreen);
}
rhp's avatar
...  
rhp committed
332

333 334 335 336 337 338 339 340 341 342
static void
prefs_changed_callback (MetaPreference pref,
                        gpointer       data)
{
  MetaScreen *screen = data;
  
  if (pref == META_PREF_NUM_WORKSPACES)
    {
      update_num_workspaces (screen);
    }
343 344 345 346
  else if (pref == META_PREF_FOCUS_MODE)
    {
      update_focus_mode (screen);
    }
347 348 349
}


rhp's avatar
...  
rhp committed
350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378
static char*
get_screen_name (MetaDisplay *display,
                 int          number)
{
  char *p;
  char *dname;
  char *scr;
  
  /* DisplayString gives us a sort of canonical display,
   * vs. the user-entered name from XDisplayName()
   */
  dname = g_strdup (DisplayString (display->xdisplay));

  /* Change display name to specify this screen.
   */
  p = strrchr (dname, ':');
  if (p)
    {
      p = strchr (p, '.');
      if (p)
        *p = '\0';
    }
  
  scr = g_strdup_printf ("%s.%d", dname, number);

  g_free (dname);

  return scr;
}
rhp's avatar
...  
rhp committed
379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434

static gint
ptrcmp (gconstpointer a, gconstpointer b)
{
  if (a < b)
    return -1;
  else if (a > b)
    return 1;
  else
    return 0;
}

static void
listify_func (gpointer key, gpointer value, gpointer data)
{
  GSList **listp;
  
  listp = data;

  *listp = g_slist_prepend (*listp, value);
}

void
meta_screen_foreach_window (MetaScreen *screen,
                            MetaScreenWindowFunc func,
                            gpointer data)
{
  GSList *winlist;
  GSList *tmp;

  /* If we end up doing this often, just keeping a list
   * of windows might be sensible.
   */
  
  winlist = NULL;
  g_hash_table_foreach (screen->display->window_ids,
                        listify_func,
                        &winlist);
  
  winlist = g_slist_sort (winlist, ptrcmp);
  
  tmp = winlist;
  while (tmp != NULL)
    {
      /* If the next node doesn't contain this window
       * a second time, delete the window.
       */
      if (tmp->next == NULL ||
          (tmp->next && tmp->next->data != tmp->data))
        {
          MetaWindow *window = tmp->data;

          if (window->screen == screen)
            (* func) (screen, window, data);
        }
      
435
      tmp = tmp->next;
rhp's avatar
...  
rhp committed
436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451
    }
  g_slist_free (winlist);
}

static void
queue_draw (MetaScreen *screen, MetaWindow *window, gpointer data)
{
  if (window->frame)
    meta_frame_queue_draw (window->frame);
}

void
meta_screen_queue_frame_redraws (MetaScreen *screen)
{
  meta_screen_foreach_window (screen, queue_draw, NULL);
}
rhp's avatar
...  
rhp committed
452

rhp's avatar
...  
rhp committed
453 454 455 456 457 458 459 460 461 462 463
static void
queue_resize (MetaScreen *screen, MetaWindow *window, gpointer data)
{
  meta_window_queue_move_resize (window);
}

void
meta_screen_queue_window_resizes (MetaScreen *screen)
{
  meta_screen_foreach_window (screen, queue_resize, NULL);
}
rhp's avatar
...  
rhp committed
464

rhp's avatar
rhp committed
465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483
int
meta_screen_get_n_workspaces (MetaScreen *screen)
{
  GList *tmp;
  int i;

  i = 0;
  tmp = screen->display->workspaces;
  while (tmp != NULL)
    {
      MetaWorkspace *w = tmp->data;

      if (w->screen == screen)
        ++i;
      
      tmp = tmp->next;
    }

  return i;
484
}
rhp's avatar
rhp committed
485

486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568
static void
update_num_workspaces (MetaScreen *screen)
{
  int new_num;
  GList *tmp;
  int i;
  GList *extras;
  MetaWorkspace *last_remaining;
  gboolean need_change_space;
  
  new_num = meta_prefs_get_num_workspaces ();

  g_assert (new_num > 0);

  last_remaining = NULL;
  extras = NULL;
  i = 0;
  tmp = screen->display->workspaces;
  while (tmp != NULL)
    {
      MetaWorkspace *w = tmp->data;

      if (w->screen == screen)
        {          
          ++i;

          if (i > new_num)
            extras = g_list_prepend (extras, w);
          else
            last_remaining = w;
        }
      
      tmp = tmp->next;
    }

  g_assert (last_remaining);
  
  /* Get rid of the extra workspaces by moving all their windows
   * to last_remaining, then activating last_remaining if
   * one of the removed workspaces was active. This will be a bit
   * wacky if the config tool for changing number of workspaces
   * is on a removed workspace ;-)
   */
  need_change_space = FALSE;
  tmp = extras;
  while (tmp != NULL)
    {
      MetaWorkspace *w = tmp->data;

      meta_workspace_relocate_windows (w, last_remaining);      

      if (w == screen->active_workspace)
        need_change_space = TRUE;
      
      tmp = tmp->next;
    }

  if (need_change_space)
    meta_workspace_activate (last_remaining);

  /* Should now be safe to free the workspaces */
  tmp = extras;
  while (tmp != NULL)
    {
      MetaWorkspace *w = tmp->data;

      g_assert (w->windows == NULL);
      meta_workspace_free (w);
      
      tmp = tmp->next;
    }
  
  g_list_free (extras);
  
  /* Add missing workspaces. FIXME This will keep setting the
   * number-of-workspaces root window property on each workspace
   * creation, kind of a lame thing
   */
  while (i < new_num)
    {
      meta_workspace_new (screen);
      ++i;
    }
rhp's avatar
rhp committed
569
}
rhp's avatar
...  
rhp committed
570

571 572 573
static void
update_focus_mode (MetaScreen *screen)
{
574
  /* nothing to do anymore */ ;
575 576
}

rhp's avatar
...  
rhp committed
577 578 579 580 581 582 583 584 585 586 587 588 589 590 591
void
meta_screen_set_cursor (MetaScreen *screen,
                        MetaCursor  cursor)
{
  Cursor xcursor;

  if (cursor == screen->current_cursor)
    return;

  screen->current_cursor = cursor;
  
  xcursor = meta_display_create_x_cursor (screen->display, cursor);
  XDefineCursor (screen->display->xdisplay, screen->xroot, xcursor);
  XFreeCursor (screen->display->xdisplay, xcursor);
}
592 593

void
Havoc Pennington's avatar
Havoc Pennington committed
594 595
meta_screen_ensure_tab_popup (MetaScreen *screen,
                              MetaTabList type)
596 597 598 599 600 601 602 603 604 605
{
  MetaTabEntry *entries;
  GSList *tab_list;
  GSList *tmp;
  int len;
  int i;
  
  if (screen->tab_popup)
    return;

Havoc Pennington's avatar
Havoc Pennington committed
606
  tab_list = meta_display_get_tab_list (screen->display,
Havoc Pennington's avatar
Havoc Pennington committed
607
                                        type,
Havoc Pennington's avatar
Havoc Pennington committed
608 609 610
                                        screen,
                                        screen->active_workspace);
  
611 612 613 614 615 616 617 618 619 620 621 622
  len = g_slist_length (tab_list);

  entries = g_new (MetaTabEntry, len + 1);
  entries[len].xwindow = None;
  entries[len].title = NULL;
  entries[len].icon = NULL;
  
  i = 0;
  tmp = tab_list;
  while (i < len)
    {
      MetaWindow *window;
623 624
      MetaRectangle r;
      
625 626 627 628 629
      window = tmp->data;
      
      entries[i].xwindow = window->xwindow;
      entries[i].title = window->title;
      entries[i].icon = window->icon;
630 631 632 633 634
      meta_window_get_outer_rect (window, &r);
      entries[i].x = r.x;
      entries[i].y = r.y;
      entries[i].width = r.width;
      entries[i].height = r.height;
635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661

      /* Find inside of highlight rectangle to be used
       * when window is outlined for tabbing.
       * This should be the size of the east/west frame,
       * and the size of the south frame, on those sides.
       * on the top it should be the size of the south frame
       * edge.
       */
      if (window->frame)
        {
          int south = window->frame->rect.height - window->frame->child_y -
            window->rect.height;
          int east = window->frame->child_x;
          entries[i].inner_x = east;
          entries[i].inner_y = south;
          entries[i].inner_width = window->rect.width;
          entries[i].inner_height = window->frame->rect.height - south * 2;
        }
      else
        {
          /* Use an arbitrary border size */
#define OUTLINE_WIDTH 5
          entries[i].inner_x = OUTLINE_WIDTH;
          entries[i].inner_y = OUTLINE_WIDTH;
          entries[i].inner_width = window->rect.width - OUTLINE_WIDTH * 2;
          entries[i].inner_height = window->rect.height - OUTLINE_WIDTH * 2;
        }
662 663 664 665 666 667 668 669
      
      ++i;
      tmp = tmp->next;
    }
  
  screen->tab_popup = meta_ui_tab_popup_new (entries);
  g_free (entries);

670 671
  g_slist_free (tab_list);
  
672 673
  /* don't show tab popup, since proper window isn't selected yet */
}
674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702

/* Focus top window on active workspace */
void
meta_screen_focus_top_window (MetaScreen *screen,
                              MetaWindow *not_this_one)
{
  MetaWindow *window;

  if (not_this_one)
    meta_topic (META_DEBUG_FOCUS,
                "Focusing top window excluding %s\n", not_this_one->desc);
  
  window = meta_stack_get_default_focus_window (screen->stack,
                                                screen->active_workspace,
                                                not_this_one);

  /* FIXME I'm a loser on the CurrentTime front */
  if (window)
    {
      meta_topic (META_DEBUG_FOCUS,
                  "Focusing top window %s\n", window->desc);

      meta_window_focus (window, meta_display_get_current_time (screen->display));
    }
  else
    {
      meta_topic (META_DEBUG_FOCUS, "No top window to focus found\n");
    }
}