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     if(wibox->position != Floating)
 286         for(int i = 0; i < globalconf.screens[wibox->screen].wiboxes.len; i++)
 287         {
 288             wibox_t *w = globalconf.screens[wibox->screen].wiboxes.tab[i];
 289             /* Ignore every wibox after me that is in the same position */
 290             if(wibox == w)
 291             {
 292                 ignore = true;
 293                 continue;
 294             }
 295             else if((ignore && wibox->position == w->position) || !w->isvisible)
 296                 continue;
 297             switch(w->position)
 298             {
 299               case Floating:
 300                 break;
 301               case Left:
 302                 switch(wibox->position)
 303                 {
 304                   case Left:
 305                     area.x += wibox->sw.geometry.height;
 306                     break;
 307                   default:
 308                     break;
 309                 }
 310                 break;
 311               case Right:
 312                 switch(wibox->position)
 313                 {
 314                   case Right:
 315                     area.x -= wibox->sw.geometry.height;
 316                     break;
 317                   default:
 318                     break;
 319                 }
 320                 break;
 321               case Top:
 322                 switch(wibox->position)
 323                 {
 324                   case Top:
 325                     area.y += w->sw.geometry.height;
 326                     break;
 327                   case Left:
 328                   case Right:
 329                     area.height -= w->sw.geometry.height;
 330                     area.y += w->sw.geometry.height;
 331                     break;
 332                   default:
 333                     break;
 334                 }
 335                 break;
 336               case Bottom:
 337                 switch(wibox->position)
 338                 {
 339                   case Bottom:
 340                     area.y -= w->sw.geometry.height;
 341                     break;
 342                   case Left:
 343                   case Right:
 344                     area.height -= w->sw.geometry.height;
 345                     break;
 346                   default:
 347                     break;
 348                 }
 349                 break;
 350             }
 351         }
 352
 353     switch(wibox->position)
 354     {
 355       case Right:
 356         wingeom.height = wibox->sw.geometry.height > 0 ?
 357             wibox->sw.geometry.height : area.height - 2 * wibox->sw.border.width;
 358         wingeom.width = wibox->sw.geometry.width > 0 ? wibox->sw.geometry.width : 1.5 * globalconf.font->height;
 359         wingeom.x = area.x + area.width - wingeom.width - 2 * wibox->sw.border.width;
 360         switch(wibox->align)
 361         {
 362           default:
 363             wingeom.y = area.y;
 364             break;
 365           case AlignRight:
 366             wingeom.y = area.y + area.height - wingeom.height;
 367             break;
 368           case AlignCenter:
 369             wingeom.y = (area.y + area.height - wingeom.height) / 2;
 370             break;
 371         }
 372         break;
 373       case Left:
 374         wingeom.height = wibox->sw.geometry.height > 0 ?
 375             wibox->sw.geometry.height : area.height - 2 * wibox->sw.border.width;
 376         wingeom.width = wibox->sw.geometry.width > 0 ? wibox->sw.geometry.width : 1.5 * globalconf.font->height;
 377         wingeom.x = area.x;
 378         switch(wibox->align)
 379         {
 380           default:
 381             wingeom.y = (area.y + area.height) - wingeom.height - 2 * wibox->sw.border.width;
 382             break;
 383           case AlignRight:
 384             wingeom.y = area.y;
 385             break;
 386           case AlignCenter:
 387             wingeom.y = (area.y + area.height - wingeom.height) / 2;
 388         }
 389         break;
 390       case Bottom:
 391         wingeom.height = wibox->sw.geometry.height > 0 ? wibox->sw.geometry.height : 1.5 * globalconf.font->height;
 392         wingeom.width = wibox->sw.geometry.width > 0 ?
 393             wibox->sw.geometry.width : area.width - 2 * wibox->sw.border.width;
 394         wingeom.y = (area.y + area.height) - wingeom.height - 2 * wibox->sw.border.width;
 395         wingeom.x = area.x;
 396         switch(wibox->align)
 397         {
 398           default:
 399             break;
 400           case AlignRight:
 401             wingeom.x += area.width - wingeom.width;
 402             break;
 403           case AlignCenter:
 404             wingeom.x += (area.width - wingeom.width) / 2;
 405             break;
 406         }
 407         break;
 408       case Top:
 409         wingeom.height = wibox->sw.geometry.height > 0 ? wibox->sw.geometry.height : 1.5 * globalconf.font->height;
 410         wingeom.width = wibox->sw.geometry.width > 0 ?
 411             wibox->sw.geometry.width : area.width - 2 * wibox->sw.border.width;
 412         wingeom.x = area.x;
 413         wingeom.y = area.y;
 414         switch(wibox->align)
 415         {
 416           default:
 417             break;
 418           case AlignRight:
 419             wingeom.x += area.width - wingeom.width;
 420             break;
 421           case AlignCenter:
 422             wingeom.x += (area.width - wingeom.width) / 2;
 423             break;
 424         }
 425         break;
 426       case Floating:
 427         wingeom.width = MAX(1, wibox->sw.geometry.width);
 428         wingeom.height = MAX(1, wibox->sw.geometry.height);
 429         break;
 430     }
 431
 432     /* same window size and position ? */
 433     if(wingeom.width != wibox->sw.geometry.width
 434        || wingeom.height != wibox->sw.geometry.height)
 435         wibox_resize(wibox, wingeom.width, wingeom.height);
 436
 437     if(wingeom.x != wibox->sw.geometry.x
 438         || wingeom.y != wibox->sw.geometry.y)
 439         wibox_move(wibox, wingeom.x, wingeom.y);
 440 }
 441
 442 /** Delete a wibox.
 443  * \param wibox wibox to delete.
 444  */
 445 void
 446 wibox_delete(wibox_t **wibox)
 447 {
 448     simplewindow_wipe(&(*wibox)->sw);
 449     luaL_unref(globalconf.L, LUA_REGISTRYINDEX, (*wibox)->widgets_table);
 450     widget_node_array_wipe(&(*wibox)->widgets);
 451     p_delete(wibox);
 452 }
 453
 454 /** Get a wibox by its window.
 455  * \param w The window id.
 456  * \return A wibox if found, NULL otherwise.
 457  */
 458 wibox_t *
 459 wibox_getbywin(xcb_window_t w)
 460 {
 461     for(int screen = 0; screen < globalconf.nscreen; screen++)
 462         for(int i = 0; i < globalconf.screens[screen].wiboxes.len; i++)
 463         {
 464             wibox_t *s = globalconf.screens[screen].wiboxes.tab[i];
 465             if(s->sw.window == w)
 466                 return s;
 467         }
 468
 469     for(client_t *c = globalconf.clients; c; c = c->next)
 470         if(c->titlebar && c->titlebar->sw.window == w)
 471             return c->titlebar;
 472
 473     return NULL;
 474 }
 475
 476 /** Draw a wibox.
 477  * \param wibox The wibox to draw.
 478  */
 479 static void
 480 wibox_draw(wibox_t *wibox)
 481 {
 482     if(wibox->isvisible)
 483     {
 484         widget_render(&wibox->widgets, &wibox->sw.ctx, wibox->sw.gc,
 485                       wibox->sw.pixmap,
 486                       wibox->screen, wibox->sw.orientation,
 487                       wibox->sw.geometry.x, wibox->sw.geometry.y,
 488                       wibox);
 489         simplewindow_refresh_pixmap(&wibox->sw);
 490
 491         wibox->need_update = false;
 492     }
 493
 494     wibox_systray_refresh(wibox);
 495 }
 496
 497 /** Refresh all wiboxes.
 498  */
 499 void
 500 wibox_refresh(void)
 501 {
 502     for(int screen = 0; screen < globalconf.nscreen; screen++)
 503         for(int i = 0; i < globalconf.screens[screen].wiboxes.len; i++)
 504         {
 505             wibox_t *s = globalconf.screens[screen].wiboxes.tab[i];
 506             if(s->need_update)
 507                 wibox_draw(s);
 508         }
 509
 510     for(client_t *c = globalconf.clients; c; c = c->next)
 511         if(c->titlebar && c->titlebar->need_update)
 512             wibox_draw(c->titlebar);
 513 }
 514
 515 /** Set a wibox visible or not.
 516  * \param wibox The wibox.
 517  * \param v The visible value.
 518  */
 519 static void
 520 wibox_setvisible(wibox_t *wibox, bool v)
 521 {
 522     if(v != wibox->isvisible)
 523     {
 524         if((wibox->isvisible = v))
 525         {
 526             xcb_map_window(globalconf.connection, wibox->sw.window);
 527             simplewindow_refresh_pixmap(&wibox->sw);
 528             /* stack correctly the wibox */
 529             client_stack();
 530         }
 531         else
 532             xcb_unmap_window(globalconf.connection, wibox->sw.window);
 533
 534         /* kick out systray if needed */
 535         wibox_systray_refresh(wibox);
 536
 537         /* All the other wibox and ourselves need to be repositioned */
 538         wibox_array_t *w = &globalconf.screens[wibox->screen].wiboxes;
 539         for(int i = 0; i < w->len; i++)
 540             wibox_position_update(w->tab[i]);
 541     }
 542 }
 543
 544 /** Remove a wibox from a screen.
 545  * \param wibox Wibox to detach from screen.
 546  */
 547 void
 548 wibox_detach(wibox_t *wibox)
 549 {
 550     if(wibox->screen != SCREEN_UNDEF)
 551     {
 552         bool v;
 553
 554         /* save visible state */
 555         v = wibox->isvisible;
 556         wibox->isvisible = false;
 557         wibox_position_update(wibox);
 558         /* restore position */
 559         wibox->isvisible = v;
 560
 561         simplewindow_wipe(&wibox->sw);
 562
 563         for(int i = 0; i < globalconf.screens[wibox->screen].wiboxes.len; i++)
 564             if(globalconf.screens[wibox->screen].wiboxes.tab[i] == wibox)
 565             {
 566                 wibox_array_take(&globalconf.screens[wibox->screen].wiboxes, i);
 567                 break;
 568             }
 569         globalconf.screens[wibox->screen].need_arrange = true;
 570         wibox->screen = SCREEN_UNDEF;
 571         wibox_unref(&wibox);
 572     }
 573 }
 574
 575 /** Attach a wibox.
 576  * \param wibox The wibox to attach.
 577  * \param s The screen to attach the wibox to.
 578  */
 579 void
 580 wibox_attach(wibox_t *wibox, screen_t *s)
 581 {
 582     int phys_screen = screen_virttophys(s->index);
 583
 584     wibox_detach(wibox);
 585
 586     wibox->screen = s->index;
 587
 588     wibox_array_append(&s->wiboxes, wibox_ref(&wibox));
 589
 590     /* compute x/y/width/height if not set */
 591     wibox_position_update(wibox);
 592
 593     simplewindow_init(&wibox->sw, phys_screen,
 594                       wibox->sw.geometry,
 595                       wibox->sw.border.width,
 596                       wibox->sw.orientation,
 597                       &wibox->sw.ctx.fg, &wibox->sw.ctx.bg);
 598
 599     simplewindow_border_color_set(&wibox->sw, &wibox->sw.border.color);
 600
 601     /* All the other wibox and ourselves need to be repositioned */
 602     for(int i = 0; i < s->wiboxes.len; i++)
 603         wibox_position_update(s->wiboxes.tab[i]);
 604
 605     ewmh_update_workarea(screen_virttophys(s->index));
 606
 607     if(wibox->isvisible)
 608     {
 609         /* draw it right now once to avoid garbage shown */
 610         wibox_draw(wibox);
 611         xcb_map_window(globalconf.connection, wibox->sw.window);
 612         simplewindow_refresh_pixmap(&wibox->sw);
 613         /* stack correctly the wibox */
 614         client_stack();
 615     }
 616     else
 617         wibox->need_update = true;
 618 }
 619
 620 /** Create a new wibox.
 621  * \param L The Lua VM state.
 622  *
 623  * \luastack
 624  * \lparam A table with optionaly defined values:
 625  * position, align, fg, bg, border_width, border_color, width and height.
 626  * \lreturn A brand new wibox.
 627  */
 628 int
 629 luaA_wibox_new(lua_State *L)
 630 {
 631     wibox_t *w;
 632     const char *buf;
 633     size_t len;
 634     xcolor_init_request_t reqs[3];
 635     int8_t i, reqs_nbr = -1;
 636
 637     luaA_checktable(L, 2);
 638
 639     w = p_new(wibox_t, 1);
 640     w->widgets_table = LUA_REFNIL;
 641
 642     w->sw.ctx.fg = globalconf.colors.fg;
 643     if((buf = luaA_getopt_lstring(L, 2, "fg", NULL, &len)))
 644         reqs[++reqs_nbr] = xcolor_init_unchecked(&w->sw.ctx.fg, buf, len);
 645
 646     w->sw.ctx.bg = globalconf.colors.bg;
 647     if((buf = luaA_getopt_lstring(L, 2, "bg", NULL, &len)))
 648         reqs[++reqs_nbr] = xcolor_init_unchecked(&w->sw.ctx.bg, buf, len);
 649
 650     w->sw.border.color = globalconf.colors.bg;
 651     if((buf = luaA_getopt_lstring(L, 2, "border_color", NULL, &len)))
 652         reqs[++reqs_nbr] = xcolor_init_unchecked(&w->sw.border.color, buf, len);
 653
 654     buf = luaA_getopt_lstring(L, 2, "align", "left", &len);
 655     w->align = draw_align_fromstr(buf, len);
 656
 657     w->sw.border.width = luaA_getopt_number(L, 2, "border_width", 0);
 658
 659     buf = luaA_getopt_lstring(L, 2, "position", "top", &len);
 660
 661     switch((w->position = position_fromstr(buf, len)))
 662     {
 663       case Bottom:
 664       case Top:
 665       case Floating:
 666         simplewindow_orientation_set(&w->sw, East);
 667         break;
 668       case Left:
 669         simplewindow_orientation_set(&w->sw, North);
 670         break;
 671       case Right:
 672         simplewindow_orientation_set(&w->sw, South);
 673         break;
 674     }
 675
 676     /* recompute position */
 677     wibox_position_update(w);
 678
 679     w->sw.geometry.width = luaA_getopt_number(L, 2, "width", 0);
 680     w->sw.geometry.height = luaA_getopt_number(L, 2, "height", 0);
 681
 682     w->screen = SCREEN_UNDEF;
 683     w->isvisible = true;
 684
 685     for(i = 0; i <= reqs_nbr; i++)
 686         xcolor_init_reply(reqs[i]);
 687
 688     return luaA_wibox_userdata_new(L, w);
 689 }
 690
 691 /** Rebuild wibox widgets list.
 692  * \param L The Lua VM state.
 693  * \param wibox The wibox.
 694  */
 695 static void
 696 wibox_widgets_table_build(lua_State *L, wibox_t *wibox)
 697 {
 698     widget_node_array_wipe(&wibox->widgets);
 699     widget_node_array_init(&wibox->widgets);
 700     luaA_table2widgets(L, &wibox->widgets);
 701     wibox->mouse_over = NULL;
 702     wibox->need_update = true;
 703 }
 704
 705 /** Check if a wibox widget table has an item.
 706  * \param L The Lua VM state.
 707  * \param wibox The wibox.
 708  * \param item The item to look for.
 709  */
 710 static bool
 711 luaA_wibox_hasitem(lua_State *L, wibox_t *wibox, const void *item)
 712 {
 713     bool ret = false;
 714     if(wibox->widgets_table != LUA_REFNIL)
 715     {
 716         lua_rawgeti(globalconf.L, LUA_REGISTRYINDEX, wibox->widgets_table);
 717         if(lua_topointer(L, -1) == item || luaA_hasitem(L, item))
 718             ret = true;
 719     }
 720     return ret;
 721 }
 722
 723 /** Invalidate a wibox by a Lua object (table, etc).
 724  * \param L The Lua VM state.
 725  * \param item The object identifier.
 726  */
 727 void
 728 luaA_wibox_invalidate_byitem(lua_State *L, const void *item)
 729 {
 730     for(int screen = 0; screen < globalconf.nscreen; screen++)
 731         for(int i = 0; i < globalconf.screens[screen].wiboxes.len; i++)
 732         {
 733             wibox_t *wibox = globalconf.screens[screen].wiboxes.tab[i];
 734             if(luaA_wibox_hasitem(L, wibox, item))
 735             {
 736                 /* recompute widget node list */
 737                 wibox_widgets_table_build(L, wibox);
 738                 lua_pop(L, 1); /* remove widgets table */
 739             }
 740
 741         }
 742
 743     for(client_t *c = globalconf.clients; c; c = c->next)
 744         if(c->titlebar && luaA_wibox_hasitem(L, c->titlebar, item))
 745         {
 746             /* recompute widget node list */
 747             wibox_widgets_table_build(L, c->titlebar);
 748             lua_pop(L, 1); /* remove widgets table */
 749         }
 750 }
 751
 752
 753 /** Wibox object.
 754  * \param L The Lua VM state.
 755  * \return The number of elements pushed on stack.
 756  * \luastack
 757  * \lfield screen Screen number.
 758  * \lfield client The client attached to this titlebar.
 759  * \lfield border_width Border width.
 760  * \lfield border_color Border color.
 761  * \lfield align The alignment.
 762  * \lfield fg Foreground color.
 763  * \lfield bg Background color.
 764  * \lfield position The position.
 765  * \lfield ontop On top of other windows.
 766  */
 767 static int
 768 luaA_wibox_index(lua_State *L)
 769 {
 770     size_t len;
 771     wibox_t **wibox = luaA_checkudata(L, 1, "wibox");
 772     const char *attr = luaL_checklstring(L, 2, &len);
 773
 774     if(luaA_usemetatable(L, 1, 2))
 775         return 1;
 776
 777     switch(a_tokenize(attr, len))
 778     {
 779         client_t *c;
 780
 781       case A_TK_VISIBLE:
 782         lua_pushboolean(L, (*wibox)->isvisible);
 783         break;
 784       case A_TK_CLIENT:
 785         if((c = client_getbytitlebar(*wibox)))
 786             return luaA_client_userdata_new(L, c);
 787         else
 788             return 0;
 789       case A_TK_SCREEN:
 790         if((*wibox)->screen == SCREEN_UNDEF)
 791             return 0;
 792         lua_pushnumber(L, (*wibox)->screen + 1);
 793         break;
 794       case A_TK_BORDER_WIDTH:
 795         lua_pushnumber(L, (*wibox)->sw.border.width);
 796         break;
 797       case A_TK_BORDER_COLOR:
 798         luaA_pushcolor(L, &(*wibox)->sw.border.color);
 799         break;
 800       case A_TK_ALIGN:
 801         lua_pushstring(L, draw_align_tostr((*wibox)->align));
 802         break;
 803       case A_TK_FG:
 804         luaA_pushcolor(L, &(*wibox)->sw.ctx.fg);
 805         break;
 806       case A_TK_BG:
 807         luaA_pushcolor(L, &(*wibox)->sw.ctx.bg);
 808         break;
 809       case A_TK_POSITION:
 810         lua_pushstring(L, position_tostr((*wibox)->position));
 811         break;
 812       case A_TK_ONTOP:
 813         lua_pushboolean(L, (*wibox)->ontop);
 814         break;
 815       case A_TK_ORIENTATION:
 816         lua_pushstring(L, orientation_tostr((*wibox)->sw.orientation));
 817         break;
 818       case A_TK_WIDGETS:
 819         if((*wibox)->widgets_table != LUA_REFNIL)
 820             lua_rawgeti(L, LUA_REGISTRYINDEX, (*wibox)->widgets_table);
 821         else
 822             lua_pushnil(L);
 823         break;
 824       default:
 825         return 0;
 826     }
 827
 828     return 1;
 829 }
 830
 831 /* Set or get the wibox geometry.
 832  * \param L The Lua VM state.
 833  * \return The number of elements pushed on stack.
 834  * \luastack
 835  * \lparam An optional table with wibox geometry.
 836  * \lreturn The wibox geometry.
 837  */
 838 static int
 839 luaA_wibox_geometry(lua_State *L)
 840 {
 841     wibox_t **wibox = luaA_checkudata(L, 1, "wibox");
 842
 843     if(lua_gettop(L) == 2)
 844     {
 845         area_t wingeom;
 846
 847         luaA_checktable(L, 2);
 848         wingeom.x = luaA_getopt_number(L, 2, "x", (*wibox)->sw.geometry.x);
 849         wingeom.y = luaA_getopt_number(L, 2, "y", (*wibox)->sw.geometry.y);
 850         wingeom.width = luaA_getopt_number(L, 2, "width", (*wibox)->sw.geometry.width);
 851         wingeom.height = luaA_getopt_number(L, 2, "height", (*wibox)->sw.geometry.height);
 852
 853         switch((*wibox)->type)
 854         {
 855           case WIBOX_TYPE_TITLEBAR:
 856             wibox_resize(*wibox, wingeom.width, wingeom.height);
 857             break;
 858           case WIBOX_TYPE_NORMAL:
 859             if((*wibox)->position == Floating)
 860                 wibox_moveresize(*wibox, wingeom);
 861             else if(wingeom.width != (*wibox)->sw.geometry.width
 862                     || wingeom.height != (*wibox)->sw.geometry.height)
 863             {
 864                 wibox_resize(*wibox, wingeom.width, wingeom.height);
 865                 globalconf.screens[(*wibox)->screen].need_arrange = true;
 866             }
 867             break;
 868         }
 869     }
 870
 871     return luaA_pusharea(L, (*wibox)->sw.geometry);
 872 }
 873
 874 /** Wibox newindex.
 875  * \param L The Lua VM state.
 876  * \return The number of elements pushed on stack.
 877  */
 878 static int
 879 luaA_wibox_newindex(lua_State *L)
 880 {
 881     size_t len;
 882     wibox_t **wibox = luaA_checkudata(L, 1, "wibox");
 883     const char *buf, *attr = luaL_checklstring(L, 2, &len);
 884     awesome_token_t tok;
 885
 886     switch((tok = a_tokenize(attr, len)))
 887     {
 888         bool b;
 889
 890       case A_TK_FG:
 891         if((buf = luaL_checklstring(L, 3, &len)))
 892             if(xcolor_init_reply(xcolor_init_unchecked(&(*wibox)->sw.ctx.fg, buf, len)))
 893                 (*wibox)->need_update = true;
 894         break;
 895       case A_TK_BG:
 896         if((buf = luaL_checklstring(L, 3, &len)))
 897             if(xcolor_init_reply(xcolor_init_unchecked(&(*wibox)->sw.ctx.bg, buf, len)))
 898                 (*wibox)->need_update = true;
 899         break;
 900       case A_TK_ALIGN:
 901         buf = luaL_checklstring(L, 3, &len);
 902         (*wibox)->align = draw_align_fromstr(buf, len);
 903         switch((*wibox)->type)
 904         {
 905           case WIBOX_TYPE_NORMAL:
 906             wibox_position_update(*wibox);
 907             break;
 908           case WIBOX_TYPE_TITLEBAR:
 909             titlebar_update_geometry_floating(client_getbytitlebar(*wibox));
 910             break;
 911         }
 912         break;
 913       case A_TK_POSITION:
 914         switch((*wibox)->type)
 915         {
 916           case WIBOX_TYPE_TITLEBAR:
 917             return luaA_titlebar_newindex(L, *wibox, tok);
 918           case WIBOX_TYPE_NORMAL:
 919             if((buf = luaL_checklstring(L, 3, &len)))
 920                 wibox_setposition(*wibox, position_fromstr(buf, len));
 921             break;
 922         }
 923         break;
 924       case A_TK_CLIENT:
 925         /* first detach */
 926         if(lua_isnil(L, 3))
 927             titlebar_client_detach(client_getbytitlebar(*wibox));
 928         else
 929         {
 930             client_t **c = luaA_checkudata(L, 3, "client");
 931             titlebar_client_attach(*c, *wibox);
 932         }
 933         break;
 934       case A_TK_SCREEN:
 935         if(lua_isnil(L, 3))
 936         {
 937             wibox_detach(*wibox);
 938             titlebar_client_detach(client_getbytitlebar(*wibox));
 939         }
 940         else
 941         {
 942             int screen = luaL_checknumber(L, 3) - 1;
 943             luaA_checkscreen(screen);
 944             if(screen != (*wibox)->screen)
 945             {
 946                 titlebar_client_detach(client_getbytitlebar(*wibox));
 947                 wibox_attach(*wibox, &globalconf.screens[screen]);
 948             }
 949         }
 950         break;
 951       case A_TK_ONTOP:
 952         b = luaA_checkboolean(L, 3);
 953         if(b != (*wibox)->ontop)
 954         {
 955             (*wibox)->ontop = b;
 956             client_stack();
 957         }
 958         break;
 959       case A_TK_ORIENTATION:
 960         if((buf = luaL_checklstring(L, 3, &len)))
 961         {
 962             simplewindow_orientation_set(&(*wibox)->sw, orientation_fromstr(buf, len));
 963             (*wibox)->need_update = true;
 964         }
 965         break;
 966       case A_TK_BORDER_COLOR:
 967         if((buf = luaL_checklstring(L, 3, &len)))
 968             if(xcolor_init_reply(xcolor_init_unchecked(&(*wibox)->sw.border.color, buf, len)))
 969                 if((*wibox)->sw.window)
 970                     simplewindow_border_color_set(&(*wibox)->sw, &(*wibox)->sw.border.color);
 971         break;
 972       case A_TK_VISIBLE:
 973         b = luaA_checkboolean(L, 3);
 974         if(b != (*wibox)->isvisible)
 975             switch((*wibox)->type)
 976             {
 977               case WIBOX_TYPE_NORMAL:
 978                 wibox_setvisible(*wibox, b);
 979                 break;
 980               case WIBOX_TYPE_TITLEBAR:
 981                 (*wibox)->isvisible = b;
 982                 globalconf.screens[(*wibox)->screen].need_arrange = true;
 983                 break;
 984             }
 985         break;
 986       case A_TK_WIDGETS:
 987         if(luaA_isloop(L, 3))
 988         {
 989             luaA_warn(L, "table is looping, cannot use this as widget table");
 990             return 0;
 991         }
 992         luaA_register(L, 3, &(*wibox)->widgets_table);
 993         /* recompute widget node list */
 994         wibox_widgets_table_build(L, *wibox);
 995         luaA_table2wtable(L);
 996         break;
 997       default:
 998         switch((*wibox)->type)
 999         {
1000           case WIBOX_TYPE_TITLEBAR:
1001             return luaA_titlebar_newindex(L, *wibox, tok);
1002           case WIBOX_TYPE_NORMAL:
1003             break;
1004         }
1005     }
1006
1007     return 0;
1008 }
1009
1010 const struct luaL_reg awesome_wibox_methods[] =
1011 {
1012     { "__call", luaA_wibox_new },
1013     { NULL, NULL }
1014 };
1015 const struct luaL_reg awesome_wibox_meta[] =
1016 {
1017     { "geometry", luaA_wibox_geometry },
1018     { "__index", luaA_wibox_index },
1019     { "__newindex", luaA_wibox_newindex },
1020     { "__gc", luaA_wibox_gc },
1021     { "__eq", luaA_wibox_eq },
1022     { "__tostring", luaA_wibox_tostring },
1023     { NULL, NULL },
1024 };
1025
1026 // vim: filetype=c:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:encoding=utf-8:textwidth=80