wibox.c

   1 /*
   2  * wibox.c - wibox functions
   3  *
   4  * Copyright © 2008 Julien Danjou <julien@danjou.info>
   5  *
   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.
  10  *
  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.
  15  *
  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.
  19  *
  20  */
  21
  22 #include "screen.h"
  23 #include "wibox.h"
  24 #include "titlebar.h"
  25 #include "client.h"
  26 #include "ewmh.h"
  27
  28 extern awesome_t globalconf;
  29
  30 DO_LUA_NEW(extern, wibox_t, wibox, "wibox", wibox_ref)
  31 DO_LUA_GC(wibox_t, wibox, "wibox", wibox_unref)
  32 DO_LUA_EQ(wibox_t, wibox, "wibox")
  33
  34 static void
  35 wibox_move(wibox_t *wibox, int16_t x, int16_t y)
  36 {
  37     if(wibox->sw.window)
  38         simplewindow_move(&wibox->sw, x, y);
  39     else
  40     {
  41         wibox->sw.geometry.x = x;
  42         wibox->sw.geometry.y = y;
  43     }
  44 }
  45
  46 static void
  47 wibox_resize(wibox_t *wibox, uint16_t width, uint16_t height)
  48 {
  49     if(wibox->sw.window)
  50         simplewindow_resize(&wibox->sw, width, height);
  51     else
  52     {
  53         wibox->sw.geometry.width = width;
  54         wibox->sw.geometry.height = height;
  55     }
  56     wibox->need_update = true;
  57 }
  58
  59 static void
  60 wibox_setposition(wibox_t *wibox, position_t p)
  61 {
  62     if(p != wibox->position)
  63     {
  64         switch((wibox->position = p))
  65         {
  66           case Bottom:
  67           case Top:
  68           case Floating:
  69             simplewindow_orientation_set(&wibox->sw, East);
  70             break;
  71           case Left:
  72             simplewindow_orientation_set(&wibox->sw, North);
  73             break;
  74           case Right:
  75             simplewindow_orientation_set(&wibox->sw, South);
  76             break;
  77         }
  78         /* reset width/height to 0 */
  79         if(wibox->position != Floating)
  80             wibox->sw.geometry.width = wibox->sw.geometry.height = 0;
  81
  82         /* recompute position */
  83         wibox_position_update(wibox);
  84
  85         /* reset all wibox position */
  86         wibox_array_t *w = &globalconf.screens[wibox->screen].wiboxes;
  87         for(int i = 0; i < w->len; i++)
  88             wibox_position_update(w->tab[i]);
  89
  90         ewmh_update_workarea(screen_virttophys(wibox->screen));
  91
  92         wibox->need_update = true;
  93     }
  94 }
  95
  96 /** Kick out systray windows.
  97  * \param phys_screen Physical screen number.
  98  */
  99 static void
 100 wibox_systray_kickout(int phys_screen)
 101 {
 102     xcb_screen_t *s = xutil_screen_get(globalconf.connection, phys_screen);
 103
 104     /* Who! Check that we're not deleting a wibox with a systray, because it
 105      * may be its parent. If so, we reparent to root before, otherwise it will
 106      * hurt very much. */
 107     xcb_reparent_window(globalconf.connection,
 108                         globalconf.screens[phys_screen].systray.window,
 109                         s->root, -512, -512);
 110
 111     globalconf.screens[phys_screen].systray.parent = s->root;
 112 }
 113
 114 static void
 115 wibox_systray_refresh(wibox_t *wibox)
 116 {
 117     if(wibox->screen == SCREEN_UNDEF)
 118         return;
 119
 120     for(int i = 0; i < wibox->widgets.len; i++)
 121     {
 122         widget_node_t *systray = &wibox->widgets.tab[i];
 123         if(systray->widget->type == systray_new)
 124         {
 125             uint32_t config_back[] = { wibox->sw.ctx.bg.pixel };
 126             uint32_t config_win_vals[4];
 127             uint32_t config_win_vals_off[2] = { -512, -512 };
 128             xembed_window_t *em;
 129             position_t pos;
 130             int phys_screen = wibox->sw.ctx.phys_screen;
 131
 132             if(wibox->isvisible
 133                && systray->widget->isvisible
 134                && systray->geometry.width)
 135             {
 136                 pos = wibox->position;
 137
 138                 /* Set background of the systray window. */
 139                 xcb_change_window_attributes(globalconf.connection,
 140                                              globalconf.screens[phys_screen].systray.window,
 141                                              XCB_CW_BACK_PIXEL, config_back);
 142                 /* Map it. */
 143                 xcb_map_window(globalconf.connection, globalconf.screens[phys_screen].systray.window);
 144                 /* Move it. */
 145                 switch(wibox->position)
 146                 {
 147                   case Left:
 148                     config_win_vals[0] = systray->geometry.y;
 149                     config_win_vals[1] = wibox->sw.geometry.height - systray->geometry.x - systray->geometry.width;
 150                     config_win_vals[2] = systray->geometry.height;
 151                     config_win_vals[3] = systray->geometry.width;
 152                     break;
 153                   case Right:
 154                     config_win_vals[0] = systray->geometry.y;
 155                     config_win_vals[1] = systray->geometry.x;
 156                     config_win_vals[2] = systray->geometry.height;
 157                     config_win_vals[3] = systray->geometry.width;
 158                     break;
 159                   default:
 160                     config_win_vals[0] = systray->geometry.x;
 161                     config_win_vals[1] = systray->geometry.y;
 162                     config_win_vals[2] = systray->geometry.width;
 163                     config_win_vals[3] = systray->geometry.height;
 164                     break;
 165                 }
 166                 /* reparent */
 167                 if(globalconf.screens[phys_screen].systray.parent != wibox->sw.window)
 168                 {
 169                     xcb_reparent_window(globalconf.connection,
 170                                         globalconf.screens[phys_screen].systray.window,
 171                                         wibox->sw.window,
 172                                         config_win_vals[0], config_win_vals[1]);
 173                     globalconf.screens[phys_screen].systray.parent = wibox->sw.window;
 174                 }
 175                 xcb_configure_window(globalconf.connection,
 176                                      globalconf.screens[phys_screen].systray.window,
 177                                      XCB_CONFIG_WINDOW_X
 178                                      | XCB_CONFIG_WINDOW_Y
 179                                      | XCB_CONFIG_WINDOW_WIDTH
 180                                      | XCB_CONFIG_WINDOW_HEIGHT,
 181                                      config_win_vals);
 182                 /* width = height = systray height */
 183                 config_win_vals[2] = config_win_vals[3] = systray->geometry.height;
 184                 config_win_vals[0] = 0;
 185             }
 186             else
 187                 return wibox_systray_kickout(phys_screen);
 188
 189             switch(pos)
 190             {
 191               case Left:
 192                 config_win_vals[1] = systray->geometry.width - config_win_vals[3];
 193                 for(em = globalconf.embedded; em; em = em->next)
 194                     if(em->phys_screen == phys_screen)
 195                     {
 196                         if(config_win_vals[1] - config_win_vals[2] >= (uint32_t) wibox->sw.geometry.y)
 197                         {
 198                             xcb_map_window(globalconf.connection, em->win);
 199                             xcb_configure_window(globalconf.connection, em->win,
 200                                                  XCB_CONFIG_WINDOW_X
 201                                                  | XCB_CONFIG_WINDOW_Y
 202                                                  | XCB_CONFIG_WINDOW_WIDTH
 203                                                  | XCB_CONFIG_WINDOW_HEIGHT,
 204                                                  config_win_vals);
 205                             config_win_vals[1] -= config_win_vals[3];
 206                         }
 207                         else
 208                             xcb_configure_window(globalconf.connection, em->win,
 209                                                  XCB_CONFIG_WINDOW_X
 210                                                  | XCB_CONFIG_WINDOW_Y,
 211                                                  config_win_vals_off);
 212                     }
 213                 break;
 214               case Right:
 215                 config_win_vals[1] = 0;
 216                 for(em = globalconf.embedded; em; em = em->next)
 217                     if(em->phys_screen == phys_screen)
 218                     {
 219                         if(config_win_vals[1] + config_win_vals[3] <= (uint32_t) wibox->sw.geometry.y + wibox->sw.geometry.width)
 220                         {
 221                             xcb_map_window(globalconf.connection, em->win);
 222                             xcb_configure_window(globalconf.connection, em->win,
 223                                                  XCB_CONFIG_WINDOW_X
 224                                                  | XCB_CONFIG_WINDOW_Y
 225                                                  | XCB_CONFIG_WINDOW_WIDTH
 226                                                  | XCB_CONFIG_WINDOW_HEIGHT,
 227                                                  config_win_vals);
 228                             config_win_vals[1] += config_win_vals[3];
 229                         }
 230                         else
 231                             xcb_configure_window(globalconf.connection, em->win,
 232                                                  XCB_CONFIG_WINDOW_X
 233                                                  | XCB_CONFIG_WINDOW_Y,
 234                                                  config_win_vals_off);
 235                     }
 236                 break;
 237               case Floating:
 238               case Top:
 239               case Bottom:
 240                 config_win_vals[1] = 0;
 241                 for(em = globalconf.embedded; em; em = em->next)
 242                     if(em->phys_screen == phys_screen)
 243                     {
 244                         /* if(x + width < systray.x + systray.width) */
 245                         if(config_win_vals[0] + config_win_vals[2] <= (uint32_t) AREA_RIGHT(systray->geometry) + wibox->sw.geometry.x)
 246                         {
 247                             xcb_map_window(globalconf.connection, em->win);
 248                             xcb_configure_window(globalconf.connection, em->win,
 249                                                  XCB_CONFIG_WINDOW_X
 250                                                  | XCB_CONFIG_WINDOW_Y
 251                                                  | XCB_CONFIG_WINDOW_WIDTH
 252                                                  | XCB_CONFIG_WINDOW_HEIGHT,
 253                                                  config_win_vals);
 254                             config_win_vals[0] += config_win_vals[2];
 255                         }
 256                         else
 257                             xcb_configure_window(globalconf.connection, em->win,
 258                                                  XCB_CONFIG_WINDOW_X
 259                                                  | XCB_CONFIG_WINDOW_Y,
 260                                                  config_win_vals_off);
 261                     }
 262                 break;
 263             }
 264             break;
 265         }
 266     }
 267 }
 268
 269 /** Update the wibox position. It deletes every wibox resources and
 270  * create them back.
 271  * \param wibox The wibox.
 272  */
 273 void
 274 wibox_position_update(wibox_t *wibox)
 275 {
 276     area_t area, wingeom = wibox->sw.geometry;
 277     bool ignore = false;
 278
 279     globalconf.screens[wibox->screen].need_arrange = true;
 280
 281     area = screen_area_get(wibox->screen, NULL,
 282                            &globalconf.screens[wibox->screen].padding, true);
 283
 284     /* Top and Bottom wibox_t have prio */
 285     for(int i = 0; i < globalconf.screens[wibox->screen].wiboxes.len; i++)
 286     {
 287         wibox_t *w = globalconf.screens[wibox->screen].wiboxes.tab[i];
 288         /* Ignore every wibox after me that is in the same position */
 289         if(wibox == w)
 290         {
 291             ignore = true;
 292             continue;
 293         }
 294         else if((ignore && wibox->position == w->position) || !w->isvisible)
 295             continue;
 296         switch(w->position)
 297         {
 298           case Floating:
 299             break;
 300           case Left:
 301             switch(wibox->position)
 302             {
 303               case Left:
 304                 area.x += wibox->sw.geometry.height;
 305                 break;
 306               default:
 307                 break;
 308             }
 309             break;
 310           case Right:
 311             switch(wibox->position)
 312             {
 313               case Right:
 314                 area.x -= wibox->sw.geometry.height;
 315                 break;
 316               default:
 317                 break;
 318             }
 319             break;
 320           case Top:
 321             switch(wibox->position)
 322             {
 323               case Top:
 324                 area.y += w->sw.geometry.height;
 325                 break;
 326               case Left:
 327               case Right:
 328                 area.height -= w->sw.geometry.height;
 329                 area.y += w->sw.geometry.height;
 330                 break;
 331               default:
 332                 break;
 333             }
 334             break;
 335           case Bottom:
 336             switch(wibox->position)
 337             {
 338               case Bottom:
 339                 area.y -= w->sw.geometry.height;
 340                 break;
 341               case Left:
 342               case Right:
 343                 area.height -= w->sw.geometry.height;
 344                 break;
 345               default:
 346                 break;
 347             }
 348             break;
 349         }
 350     }
 351
 352     switch(wibox->position)
 353     {
 354       case Right:
 355         wingeom.height = wibox->sw.geometry.height > 0 ?
 356             wibox->sw.geometry.height : area.height - 2 * wibox->sw.border.width;
 357         wingeom.width = wibox->sw.geometry.width > 0 ? wibox->sw.geometry.width : 1.5 * globalconf.font->height;
 358         wingeom.x = area.x + area.width - wingeom.width - 2 * wibox->sw.border.width;
 359         switch(wibox->align)
 360         {
 361           default:
 362             wingeom.y = area.y;
 363             break;
 364           case AlignRight:
 365             wingeom.y = area.y + area.height - wingeom.height;
 366             break;
 367           case AlignCenter:
 368             wingeom.y = (area.y + area.height - wingeom.height) / 2;
 369             break;
 370         }
 371         break;
 372       case Left:
 373         wingeom.height = wibox->sw.geometry.height > 0 ?
 374             wibox->sw.geometry.height : area.height - 2 * wibox->sw.border.width;
 375         wingeom.width = wibox->sw.geometry.width > 0 ? wibox->sw.geometry.width : 1.5 * globalconf.font->height;
 376         wingeom.x = area.x;
 377         switch(wibox->align)
 378         {
 379           default:
 380             wingeom.y = (area.y + area.height) - wingeom.height - 2 * wibox->sw.border.width;
 381             break;
 382           case AlignRight:
 383             wingeom.y = area.y;
 384             break;
 385           case AlignCenter:
 386             wingeom.y = (area.y + area.height - wingeom.height) / 2;
 387         }
 388         break;
 389       case Bottom:
 390         wingeom.height = wibox->sw.geometry.height > 0 ? wibox->sw.geometry.height : 1.5 * globalconf.font->height;
 391         wingeom.width = wibox->sw.geometry.width > 0 ?
 392             wibox->sw.geometry.width : area.width - 2 * wibox->sw.border.width;
 393         wingeom.y = (area.y + area.height) - wingeom.height - 2 * wibox->sw.border.width;
 394         wingeom.x = area.x;
 395         switch(wibox->align)
 396         {
 397           default:
 398             break;
 399           case AlignRight:
 400             wingeom.x += area.width - wingeom.width;
 401             break;
 402           case AlignCenter:
 403             wingeom.x += (area.width - wingeom.width) / 2;
 404             break;
 405         }
 406         break;
 407       case Top:
 408         wingeom.height = wibox->sw.geometry.height > 0 ? wibox->sw.geometry.height : 1.5 * globalconf.font->height;
 409         wingeom.width = wibox->sw.geometry.width > 0 ?
 410             wibox->sw.geometry.width : area.width - 2 * wibox->sw.border.width;
 411         wingeom.x = area.x;
 412         wingeom.y = area.y;
 413         switch(wibox->align)
 414         {
 415           default:
 416             break;
 417           case AlignRight:
 418             wingeom.x += area.width - wingeom.width;
 419             break;
 420           case AlignCenter:
 421             wingeom.x += (area.width - wingeom.width) / 2;
 422             break;
 423         }
 424         break;
 425       case Floating:
 426         break;
 427     }
 428
 429     /* same window size and position ? */
 430     if(wingeom.width != wibox->sw.geometry.width
 431        || wingeom.height != wibox->sw.geometry.height)
 432         wibox_resize(wibox, wingeom.width, wingeom.height);
 433
 434     if(wingeom.x != wibox->sw.geometry.x
 435         || wingeom.y != wibox->sw.geometry.y)
 436         wibox_move(wibox, wingeom.x, wingeom.y);
 437 }
 438
 439 /** Delete a wibox.
 440  * \param wibox wibox to delete.
 441  */
 442 void
 443 wibox_delete(wibox_t **wibox)
 444 {
 445     simplewindow_wipe(&(*wibox)->sw);
 446     luaL_unref(globalconf.L, LUA_REGISTRYINDEX, (*wibox)->widgets_table);
 447     widget_node_array_wipe(&(*wibox)->widgets);
 448     p_delete(wibox);
 449 }
 450
 451 /** Get a wibox by its window.
 452  * \param w The window id.
 453  * \return A wibox if found, NULL otherwise.
 454  */
 455 wibox_t *
 456 wibox_getbywin(xcb_window_t w)
 457 {
 458     for(int screen = 0; screen < globalconf.nscreen; screen++)
 459         for(int i = 0; i < globalconf.screens[screen].wiboxes.len; i++)
 460         {
 461             wibox_t *s = globalconf.screens[screen].wiboxes.tab[i];
 462             if(s->sw.window == w)
 463                 return s;
 464         }
 465
 466     for(client_t *c = globalconf.clients; c; c = c->next)
 467         if(c->titlebar && c->titlebar->sw.window == w)
 468             return c->titlebar;
 469
 470     return NULL;
 471 }
 472
 473 /** Draw a wibox.
 474  * \param wibox The wibox to draw.
 475  */
 476 static void
 477 wibox_draw(wibox_t *wibox)
 478 {
 479     if(wibox->isvisible)
 480     {
 481         widget_render(&wibox->widgets, &wibox->sw.ctx, wibox->sw.gc,
 482                       wibox->sw.pixmap,
 483                       wibox->screen, wibox->sw.orientation,
 484                       wibox->sw.geometry.x, wibox->sw.geometry.y,
 485                       wibox);
 486         simplewindow_refresh_pixmap(&wibox->sw);
 487
 488         wibox->need_update = false;
 489     }
 490
 491     wibox_systray_refresh(wibox);
 492 }
 493
 494 /** Refresh all wiboxes.
 495  */
 496 void
 497 wibox_refresh(void)
 498 {
 499     for(int screen = 0; screen < globalconf.nscreen; screen++)
 500         for(int i = 0; i < globalconf.screens[screen].wiboxes.len; i++)
 501         {
 502             wibox_t *s = globalconf.screens[screen].wiboxes.tab[i];
 503             if(s->need_update)
 504                 wibox_draw(s);
 505         }
 506
 507     for(client_t *c = globalconf.clients; c; c = c->next)
 508         if(c->titlebar && c->titlebar->need_update)
 509             wibox_draw(c->titlebar);
 510 }
 511
 512 /** Set a wibox visible or not.
 513  * \param wibox The wibox.
 514  * \param v The visible value.
 515  */
 516 static void
 517 wibox_setvisible(wibox_t *wibox, bool v)
 518 {
 519     if(v != wibox->isvisible)
 520     {
 521         if((wibox->isvisible = v))
 522             xcb_map_window(globalconf.connection, wibox->sw.window);
 523         else
 524             xcb_unmap_window(globalconf.connection, wibox->sw.window);
 525         /* kick out systray if needed */
 526         wibox_systray_refresh(wibox);
 527
 528         /* All the other wibox and ourselves need to be repositioned */
 529         wibox_array_t *w = &globalconf.screens[wibox->screen].wiboxes;
 530         for(int i = 0; i < w->len; i++)
 531             wibox_position_update(w->tab[i]);
 532     }
 533 }
 534
 535 /** Remove a wibox from a screen.
 536  * \param wibox Wibox to detach from screen.
 537  */
 538 void
 539 wibox_detach(wibox_t *wibox)
 540 {
 541     if(wibox->screen != SCREEN_UNDEF)
 542     {
 543         bool v;
 544
 545         /* save visible state */
 546         v = wibox->isvisible;
 547         wibox->isvisible = false;
 548         wibox_position_update(wibox);
 549         /* restore position */
 550         wibox->isvisible = v;
 551
 552         simplewindow_wipe(&wibox->sw);
 553
 554         for(int i = 0; i < globalconf.screens[wibox->screen].wiboxes.len; i++)
 555             if(globalconf.screens[wibox->screen].wiboxes.tab[i] == wibox)
 556             {
 557                 wibox_array_take(&globalconf.screens[wibox->screen].wiboxes, i);
 558                 break;
 559             }
 560         globalconf.screens[wibox->screen].need_arrange = true;
 561         wibox->screen = SCREEN_UNDEF;
 562         wibox_unref(&wibox);
 563     }
 564 }
 565
 566 /** Attach a wibox.
 567  * \param wibox The wibox to attach.
 568  * \param s The screen to attach the wibox to.
 569  */
 570 void
 571 wibox_attach(wibox_t *wibox, screen_t *s)
 572 {
 573     int phys_screen = screen_virttophys(s->index);
 574
 575     wibox_detach(wibox);
 576
 577     wibox->screen = s->index;
 578
 579     wibox_array_append(&s->wiboxes, wibox_ref(&wibox));
 580
 581     /* compute x/y/width/height if not set */
 582     wibox_position_update(wibox);
 583
 584     simplewindow_init(&wibox->sw, phys_screen,
 585                       wibox->sw.geometry,
 586                       wibox->sw.border.width,
 587                       wibox->sw.orientation,
 588                       &wibox->sw.ctx.fg, &wibox->sw.ctx.bg);
 589
 590     simplewindow_border_color_set(&wibox->sw, &wibox->sw.border.color);
 591
 592     /* All the other wibox and ourselves need to be repositioned */
 593     for(int i = 0; i < s->wiboxes.len; i++)
 594         wibox_position_update(s->wiboxes.tab[i]);
 595
 596     ewmh_update_workarea(screen_virttophys(s->index));
 597
 598     if(wibox->isvisible)
 599     {
 600         /* draw it right now once to avoid garbage shown */
 601         wibox_draw(wibox);
 602         xcb_map_window(globalconf.connection, wibox->sw.window);
 603     }
 604     else
 605         wibox->need_update = true;
 606 }
 607
 608 /** Create a new wibox.
 609  * \param L The Lua VM state.
 610  *
 611  * \luastack
 612  * \lparam A table with optionaly defined values:
 613  * position, align, fg, bg, border_width, border_color, width and height.
 614  * \lreturn A brand new wibox.
 615  */
 616 int
 617 luaA_wibox_new(lua_State *L)
 618 {
 619     wibox_t *w;
 620     const char *buf;
 621     size_t len;
 622     xcolor_init_request_t reqs[3];
 623     int8_t i, reqs_nbr = -1;
 624
 625     luaA_checktable(L, 2);
 626
 627     w = p_new(wibox_t, 1);
 628     w->widgets_table = LUA_REFNIL;
 629
 630     w->sw.ctx.fg = globalconf.colors.fg;
 631     if((buf = luaA_getopt_lstring(L, 2, "fg", NULL, &len)))
 632         reqs[++reqs_nbr] = xcolor_init_unchecked(&w->sw.ctx.fg, buf, len);
 633
 634     w->sw.ctx.bg = globalconf.colors.bg;
 635     if((buf = luaA_getopt_lstring(L, 2, "bg", NULL, &len)))
 636         reqs[++reqs_nbr] = xcolor_init_unchecked(&w->sw.ctx.bg, buf, len);
 637
 638     w->sw.border.color = globalconf.colors.bg;
 639     if((buf = luaA_getopt_lstring(L, 2, "border_color", NULL, &len)))
 640         reqs[++reqs_nbr] = xcolor_init_unchecked(&w->sw.border.color, buf, len);
 641
 642     buf = luaA_getopt_lstring(L, 2, "align", "left", &len);
 643     w->align = draw_align_fromstr(buf, len);
 644
 645     w->sw.border.width = luaA_getopt_number(L, 2, "border_width", 0);
 646
 647     buf = luaA_getopt_lstring(L, 2, "position", "top", &len);
 648
 649     switch((w->position = position_fromstr(buf, len)))
 650     {
 651       case Bottom:
 652       case Top:
 653       case Floating:
 654         simplewindow_orientation_set(&w->sw, East);
 655         break;
 656       case Left:
 657         simplewindow_orientation_set(&w->sw, North);
 658         break;
 659       case Right:
 660         simplewindow_orientation_set(&w->sw, South);
 661         break;
 662     }
 663
 664     /* recompute position */
 665     wibox_position_update(w);
 666
 667     w->sw.geometry.width = luaA_getopt_number(L, 2, "width", 0);
 668     w->sw.geometry.height = luaA_getopt_number(L, 2, "height", 0);
 669
 670     w->screen = SCREEN_UNDEF;
 671     w->isvisible = true;
 672
 673     for(i = 0; i <= reqs_nbr; i++)
 674         xcolor_init_reply(reqs[i]);
 675
 676     return luaA_wibox_userdata_new(L, w);
 677 }
 678
 679 /** Rebuild wibox widgets list.
 680  * \param L The Lua VM state.
 681  * \param wibox The wibox.
 682  */
 683 static void
 684 wibox_widgets_table_build(lua_State *L, wibox_t *wibox)
 685 {
 686     widget_node_array_wipe(&wibox->widgets);
 687     widget_node_array_init(&wibox->widgets);
 688     luaA_table2widgets(L, &wibox->widgets);
 689     wibox->mouse_over = NULL;
 690     wibox->need_update = true;
 691 }
 692
 693 /** Check if a wibox widget table has an item.
 694  * \param L The Lua VM state.
 695  * \param wibox The wibox.
 696  * \param item The item to look for.
 697  */
 698 static bool
 699 luaA_wibox_hasitem(lua_State *L, wibox_t *wibox, const void *item)
 700 {
 701     bool ret = false;
 702     if(wibox->widgets_table != LUA_REFNIL)
 703     {
 704         lua_rawgeti(globalconf.L, LUA_REGISTRYINDEX, wibox->widgets_table);
 705         if(lua_topointer(L, -1) == item || luaA_hasitem(L, item))
 706             ret = true;
 707     }
 708     return ret;
 709 }
 710
 711 /** Invalidate a wibox by a Lua object (table, etc).
 712  * \param L The Lua VM state.
 713  * \param item The object identifier.
 714  */
 715 void
 716 luaA_wibox_invalidate_byitem(lua_State *L, const void *item)
 717 {
 718     for(int screen = 0; screen < globalconf.nscreen; screen++)
 719         for(int i = 0; i < globalconf.screens[screen].wiboxes.len; i++)
 720         {
 721             wibox_t *wibox = globalconf.screens[screen].wiboxes.tab[i];
 722             if(luaA_wibox_hasitem(L, wibox, item))
 723             {
 724                 /* recompute widget node list */
 725                 wibox_widgets_table_build(L, wibox);
 726                 lua_pop(L, 1); /* remove widgets table */
 727             }
 728
 729         }
 730
 731     for(client_t *c = globalconf.clients; c; c = c->next)
 732         if(c->titlebar && luaA_wibox_hasitem(L, c->titlebar, item))
 733         {
 734             /* recompute widget node list */
 735             wibox_widgets_table_build(L, c->titlebar);
 736             lua_pop(L, 1); /* remove widgets table */
 737         }
 738 }
 739
 740
 741 /** Wibox object.
 742  * \param L The Lua VM state.
 743  * \return The number of elements pushed on stack.
 744  * \luastack
 745  * \lfield screen Screen number.
 746  * \lfield client The client attached to this titlebar.
 747  * \lfield border_width Border width.
 748  * \lfield border_color Border color.
 749  * \lfield align The alignment.
 750  * \lfield fg Foreground color.
 751  * \lfield bg Background color.
 752  * \lfield position The position.
 753  * \lfield ontop On top of other windows.
 754  */
 755 static int
 756 luaA_wibox_index(lua_State *L)
 757 {
 758     size_t len;
 759     wibox_t **wibox = luaA_checkudata(L, 1, "wibox");
 760     const char *attr = luaL_checklstring(L, 2, &len);
 761
 762     if(luaA_usemetatable(L, 1, 2))
 763         return 1;
 764
 765     switch(a_tokenize(attr, len))
 766     {
 767         client_t *c;
 768
 769       case A_TK_VISIBLE:
 770         lua_pushboolean(L, (*wibox)->isvisible);
 771         break;
 772       case A_TK_CLIENT:
 773         if((c = client_getbytitlebar(*wibox)))
 774             return luaA_client_userdata_new(L, c);
 775         else
 776             return 0;
 777       case A_TK_SCREEN:
 778         if((*wibox)->screen == SCREEN_UNDEF)
 779             return 0;
 780         lua_pushnumber(L, (*wibox)->screen + 1);
 781         break;
 782       case A_TK_BORDER_WIDTH:
 783         lua_pushnumber(L, (*wibox)->sw.border.width);
 784         break;
 785       case A_TK_BORDER_COLOR:
 786         luaA_pushcolor(L, &(*wibox)->sw.border.color);
 787         break;
 788       case A_TK_ALIGN:
 789         lua_pushstring(L, draw_align_tostr((*wibox)->align));
 790         break;
 791       case A_TK_FG:
 792         luaA_pushcolor(L, &(*wibox)->sw.ctx.fg);
 793         break;
 794       case A_TK_BG:
 795         luaA_pushcolor(L, &(*wibox)->sw.ctx.bg);
 796         break;
 797       case A_TK_POSITION:
 798         lua_pushstring(L, position_tostr((*wibox)->position));
 799         break;
 800       case A_TK_ONTOP:
 801         lua_pushboolean(L, (*wibox)->ontop);
 802         break;
 803       case A_TK_ORIENTATION:
 804         lua_pushstring(L, orientation_tostr((*wibox)->sw.orientation));
 805         break;
 806       case A_TK_WIDGETS:
 807         if((*wibox)->widgets_table != LUA_REFNIL)
 808             lua_rawgeti(L, LUA_REGISTRYINDEX, (*wibox)->widgets_table);
 809         else
 810             lua_pushnil(L);
 811         break;
 812       default:
 813         return 0;
 814     }
 815
 816     return 1;
 817 }
 818
 819 /* Set or get the wibox geometry.
 820  * \param L The Lua VM state.
 821  * \return The number of elements pushed on stack.
 822  * \luastack
 823  * \lparam An optional table with wibox geometry.
 824  * \lreturn The wibox geometry.
 825  */
 826 static int
 827 luaA_wibox_geometry(lua_State *L)
 828 {
 829     wibox_t **wibox = luaA_checkudata(L, 1, "wibox");
 830
 831     if(lua_gettop(L) == 2)
 832     {
 833         area_t wingeom;
 834
 835         luaA_checktable(L, 2);
 836         wingeom.x = luaA_getopt_number(L, 2, "x", (*wibox)->sw.geometry.x);
 837         wingeom.y = luaA_getopt_number(L, 2, "y", (*wibox)->sw.geometry.y);
 838         wingeom.width = luaA_getopt_number(L, 2, "width", (*wibox)->sw.geometry.width);
 839         wingeom.height = luaA_getopt_number(L, 2, "height", (*wibox)->sw.geometry.height);
 840
 841         switch((*wibox)->type)
 842         {
 843           case WIBOX_TYPE_TITLEBAR:
 844             wibox_resize(*wibox, wingeom.width, wingeom.height);
 845             break;
 846           case WIBOX_TYPE_NORMAL:
 847             if((*wibox)->position == Floating)
 848                 wibox_moveresize(*wibox, wingeom);
 849             else if(wingeom.width != (*wibox)->sw.geometry.width
 850                     || wingeom.height != (*wibox)->sw.geometry.height)
 851             {
 852                 wibox_resize(*wibox, wingeom.width, wingeom.height);
 853                 globalconf.screens[(*wibox)->screen].need_arrange = true;
 854             }
 855             break;
 856         }
 857     }
 858
 859     return luaA_pusharea(L, (*wibox)->sw.geometry);
 860 }
 861
 862 /** Wibox newindex.
 863  * \param L The Lua VM state.
 864  * \return The number of elements pushed on stack.
 865  */
 866 static int
 867 luaA_wibox_newindex(lua_State *L)
 868 {
 869     size_t len;
 870     wibox_t **wibox = luaA_checkudata(L, 1, "wibox");
 871     const char *buf, *attr = luaL_checklstring(L, 2, &len);
 872     awesome_token_t tok;
 873
 874     switch((tok = a_tokenize(attr, len)))
 875     {
 876         bool b;
 877
 878       case A_TK_FG:
 879         if((buf = luaL_checklstring(L, 3, &len)))
 880             if(xcolor_init_reply(xcolor_init_unchecked(&(*wibox)->sw.ctx.fg, buf, len)))
 881                 (*wibox)->need_update = true;
 882         break;
 883       case A_TK_BG:
 884         if((buf = luaL_checklstring(L, 3, &len)))
 885             if(xcolor_init_reply(xcolor_init_unchecked(&(*wibox)->sw.ctx.bg, buf, len)))
 886                 (*wibox)->need_update = true;
 887         break;
 888       case A_TK_ALIGN:
 889         buf = luaL_checklstring(L, 3, &len);
 890         (*wibox)->align = draw_align_fromstr(buf, len);
 891         switch((*wibox)->type)
 892         {
 893           case WIBOX_TYPE_NORMAL:
 894             wibox_position_update(*wibox);
 895             break;
 896           case WIBOX_TYPE_TITLEBAR:
 897             titlebar_update_geometry_floating(client_getbytitlebar(*wibox));
 898             break;
 899         }
 900         break;
 901       case A_TK_POSITION:
 902         switch((*wibox)->type)
 903         {
 904           case WIBOX_TYPE_TITLEBAR:
 905             return luaA_titlebar_newindex(L, *wibox, tok);
 906           case WIBOX_TYPE_NORMAL:
 907             if((buf = luaL_checklstring(L, 3, &len)))
 908                 wibox_setposition(*wibox, position_fromstr(buf, len));
 909             break;
 910         }
 911         break;
 912       case A_TK_CLIENT:
 913         /* first detach */
 914         if(lua_isnil(L, 3))
 915             titlebar_client_detach(client_getbytitlebar(*wibox));
 916         else
 917         {
 918             client_t **c = luaA_checkudata(L, 3, "client");
 919             titlebar_client_attach(*c, *wibox);
 920         }
 921         break;
 922       case A_TK_SCREEN:
 923         if(lua_isnil(L, 3))
 924         {
 925             wibox_detach(*wibox);
 926             titlebar_client_detach(client_getbytitlebar(*wibox));
 927         }
 928         else
 929         {
 930             int screen = luaL_checknumber(L, 3) - 1;
 931             luaA_checkscreen(screen);
 932             if(screen != (*wibox)->screen)
 933             {
 934                 titlebar_client_detach(client_getbytitlebar(*wibox));
 935                 wibox_attach(*wibox, &globalconf.screens[screen]);
 936             }
 937         }
 938         break;
 939       case A_TK_ONTOP:
 940         b = luaA_checkboolean(L, 3);
 941         if(b != (*wibox)->ontop)
 942         {
 943             (*wibox)->ontop = b;
 944             client_stack();
 945         }
 946         break;
 947       case A_TK_ORIENTATION:
 948         if((buf = luaL_checklstring(L, 3, &len)))
 949         {
 950             simplewindow_orientation_set(&(*wibox)->sw, orientation_fromstr(buf, len));
 951             (*wibox)->need_update = true;
 952         }
 953         break;
 954       case A_TK_BORDER_COLOR:
 955         if((buf = luaL_checklstring(L, 3, &len)))
 956             if(xcolor_init_reply(xcolor_init_unchecked(&(*wibox)->sw.border.color, buf, len)))
 957                 if((*wibox)->sw.window)
 958                     simplewindow_border_color_set(&(*wibox)->sw, &(*wibox)->sw.border.color);
 959         break;
 960       case A_TK_VISIBLE:
 961         b = luaA_checkboolean(L, 3);
 962         if(b != (*wibox)->isvisible)
 963             switch((*wibox)->type)
 964             {
 965               case WIBOX_TYPE_NORMAL:
 966                 wibox_setvisible(*wibox, b);
 967                 break;
 968               case WIBOX_TYPE_TITLEBAR:
 969                 (*wibox)->isvisible = b;
 970                 globalconf.screens[(*wibox)->screen].need_arrange = true;
 971                 break;
 972             }
 973         break;
 974       case A_TK_WIDGETS:
 975         luaA_register(L, 3, &(*wibox)->widgets_table);
 976         /* recompute widget node list */
 977         wibox_widgets_table_build(L, *wibox);
 978         luaA_table2wtable(L);
 979         break;
 980       default:
 981         switch((*wibox)->type)
 982         {
 983           case WIBOX_TYPE_TITLEBAR:
 984             return luaA_titlebar_newindex(L, *wibox, tok);
 985           case WIBOX_TYPE_NORMAL:
 986             break;
 987         }
 988     }
 989
 990     return 0;
 991 }
 992
 993 const struct luaL_reg awesome_wibox_methods[] =
 994 {
 995     { "__call", luaA_wibox_new },
 996     { NULL, NULL }
 997 };
 998 const struct luaL_reg awesome_wibox_meta[] =
 999 {
1000     { "geometry", luaA_wibox_geometry },
1001     { "__index", luaA_wibox_index },
1002     { "__newindex", luaA_wibox_newindex },
1003     { "__gc", luaA_wibox_gc },
1004     { "__eq", luaA_wibox_eq },
1005     { "__tostring", luaA_wibox_tostring },
1006     { NULL, NULL },
1007 };
1008
1009 // vim: filetype=c:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:encoding=utf-8:textwidth=80