Dogcows Code - chaz/openbox/blob - openbox/client.h

   1 /* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
   2
   3    client.h for the Openbox window manager
   4    Copyright (c) 2006        Mikael Magnusson
   5    Copyright (c) 2003        Ben Jansens
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 2 of the License, or
  10    (at your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    See the COPYING file for a copy of the GNU General Public License.
  18 */
  19
  20 #ifndef __client_h
  21 #define __client_h
  22
  23 #include "misc.h"
  24 #include "mwm.h"
  25 #include "geom.h"
  26 #include "stacking.h"
  27 #include "render/color.h"
  28
  29 #include <glib.h>
  30 #include <X11/Xlib.h>
  31
  32 struct _ObFrame;
  33 struct _ObGroup;
  34 struct _ObSessionState;
  35
  36 typedef struct _ObClient      ObClient;
  37 typedef struct _ObClientIcon  ObClientIcon;
  38 typedef struct _ObAppSettings ObAppSettings;
  39
  40 /* The value in client.transient_for indicating it is a transient for its
  41    group instead of for a single window */
  42 #define OB_TRAN_GROUP ((void*)~0l)
  43
  44 /*! Holds an icon in ARGB format */
  45 struct _ObClientIcon
  46 {
  47     gint width;
  48     gint height;
  49     RrPixel32 *data;
  50 };
  51
  52 /*! Possible window types */
  53 typedef enum
  54 {
  55     OB_CLIENT_TYPE_DESKTOP, /*!< A desktop (bottom-most window) */
  56     OB_CLIENT_TYPE_DOCK,    /*!< A dock bar/panel window */
  57     OB_CLIENT_TYPE_TOOLBAR, /*!< A toolbar window, pulled off an app */
  58     OB_CLIENT_TYPE_MENU,    /*!< An unpinned menu from an app */
  59     OB_CLIENT_TYPE_UTILITY, /*!< A small utility window such as a palette */
  60     OB_CLIENT_TYPE_SPLASH,  /*!< A splash screen window */
  61     OB_CLIENT_TYPE_DIALOG,  /*!< A dialog window */
  62     OB_CLIENT_TYPE_NORMAL   /*!< A normal application window */
  63 } ObClientType;
  64
  65 /*! The things the user can do to the client window */
  66 typedef enum
  67 {
  68     OB_CLIENT_FUNC_RESIZE     = 1 << 0, /*!< Allow user resizing */
  69     OB_CLIENT_FUNC_MOVE       = 1 << 1, /*!< Allow user moving */
  70     OB_CLIENT_FUNC_ICONIFY    = 1 << 2, /*!< Allow to be iconified */
  71     OB_CLIENT_FUNC_MAXIMIZE   = 1 << 3, /*!< Allow to be maximized */
  72     OB_CLIENT_FUNC_SHADE      = 1 << 4, /*!< Allow to be shaded */
  73     OB_CLIENT_FUNC_FULLSCREEN = 1 << 5, /*!< Allow to be made fullscreen */
  74     OB_CLIENT_FUNC_CLOSE      = 1 << 6  /*!< Allow to be closed */
  75 } ObFunctions;
  76
  77 struct _ObClient
  78 {
  79     ObWindow obwin;
  80
  81     Window  window;
  82
  83     /*! The window's decorations. NULL while the window is being managed! */
  84     struct _ObFrame *frame;
  85
  86     /*! The number of unmap events to ignore on the window */
  87     gint ignore_unmaps;
  88
  89     /*! The id of the group the window belongs to */
  90     struct _ObGroup *group;
  91
  92     /*! Saved session data to apply to this client */
  93     struct _ObSessionState *session;
  94
  95     /*! Whether or not the client is a transient window. This is guaranteed to
  96       be TRUE if transient_for != NULL, but not guaranteed to be FALSE if
  97       transient_for == NULL. */
  98     gboolean transient;
  99     /*! The client which this client is a transient (child) for.
 100       A value of TRAN_GROUP signifies that the window is a transient for all
 101       members of its ObGroup, and is not a valid pointer to be followed in this
 102       case.
 103      */
 104     ObClient *transient_for;
 105     /*! The clients which are transients (children) of this client */
 106     GSList *transients;
 107     /*! The desktop on which the window resides (0xffffffff for all
 108       desktops) */
 109     guint desktop;
 110
 111     /*! The startup id for the startup-notification protocol. This will be
 112       NULL if a startup id is not set. */
 113     gchar *startup_id;
 114
 115     /*! Normal window title */
 116     gchar *title;
 117     /*! The count for the title. When another window with the same title
 118       exists, a count will be appended to it. */
 119     guint title_count;
 120     /*! Window title when iconified */
 121     gchar *icon_title;
 122
 123     /*! The application that created the window */
 124     gchar *name;
 125     /*! The class of the window, can used for grouping */
 126     gchar *class;
 127     /*! The specified role of the window, used for identification */
 128     gchar *role;
 129     /*! The session client id for the window. *This can be NULL!* */
 130     gchar *sm_client_id;
 131
 132     /*! The type of window (what its function is) */
 133     ObClientType type;
 134
 135     /*! Position and size of the window
 136       This will not always be the actual position of the window on screen, it
 137       is, rather, the position requested by the client, to which the window's
 138       gravity is applied.
 139     */
 140     Rect area;
 141
 142     /*! Position and size of the window prior to being maximized */
 143     Rect pre_max_area;
 144     /*! Position and size of the window prior to being fullscreened */
 145     Rect pre_fullscreen_area;
 146
 147     /*! The window's strut
 148       The strut defines areas of the screen that are marked off-bounds for
 149       window placement. In theory, where this window exists.
 150     */
 151     StrutPartial strut;
 152
 153     /*! The logical size of the window
 154       The "logical" size of the window is refers to the user's perception of
 155       the size of the window, and is the value that should be displayed to the
 156       user. For example, with xterms, this value it the number of characters
 157       being displayed in the terminal, instead of the number of pixels.
 158     */
 159     Size logical_size;
 160
 161     /*! Width of the border on the window.
 162       The window manager will set this to 0 while the window is being managed,
 163       but needs to restore it afterwards, so it is saved here.
 164     */
 165     guint border_width;
 166
 167     /*! The minimum aspect ratio the client window can be sized to.
 168       A value of 0 means this is ignored.
 169     */
 170     gfloat min_ratio;
 171     /*! The maximum aspect ratio the client window can be sized to.
 172       A value of 0 means this is ignored.
 173     */
 174     gfloat max_ratio;
 175
 176     /*! The minimum size of the client window
 177       If the min is > the max, then the window is not resizable
 178     */
 179     Size min_size;
 180     /*! The maximum size of the client window
 181       If the min is > the max, then the window is not resizable
 182     */
 183     Size max_size;
 184     /*! The size of increments to resize the client window by */
 185     Size size_inc;
 186     /*! The base size of the client window
 187       This value should be subtracted from the window's actual size when
 188       displaying its size to the user, or working with its min/max size
 189     */
 190     Size base_size;
 191
 192     /*! Window decoration and functionality hints */
 193     ObMwmHints mwmhints;
 194
 195     /*! Where to place the decorated window in relation to the undecorated
 196       window */
 197     gint gravity;
 198
 199     /*! The state of the window, one of WithdrawnState, IconicState, or
 200       NormalState */
 201     glong wmstate;
 202
 203     /*! True if the client supports the delete_window protocol */
 204     gboolean delete_window;
 205
 206     /*! Was the window's position requested by the application or the user?
 207       if by the application, we force it completely onscreen, if by the user
 208       we only force it if it tries to go completely offscreen, if neither, we
 209       should place the window ourselves when it first appears */
 210     guint positioned;
 211
 212     /*! Can the window receive input focus? */
 213     gboolean can_focus;
 214     /*! Notify the window when it receives focus? */
 215     gboolean focus_notify;
 216
 217     /*! The window uses shape extension to be non-rectangular? */
 218     gboolean shaped;
 219
 220     /*! The window is modal, so it must be processed before any windows it is
 221       related to can be focused */
 222     gboolean modal;
 223     /*! Only the window's titlebar is displayed */
 224     gboolean shaded;
 225     /*! The window is iconified */
 226     gboolean iconic;
 227     /*! The window is maximized to fill the screen vertically */
 228     gboolean max_vert;
 229     /*! The window is maximized to fill the screen horizontally */
 230     gboolean max_horz;
 231     /*! The window should not be displayed by pagers */
 232     gboolean skip_pager;
 233     /*! The window should not be displayed by taskbars */
 234     gboolean skip_taskbar;
 235     /*! The window is a 'fullscreen' window, and should be on top of all
 236       others */
 237     gboolean fullscreen;
 238     /*! The window should be on top of other windows of the same type.
 239       above takes priority over below. */
 240     gboolean above;
 241     /*! The window should be underneath other windows of the same type.
 242       above takes priority over below. */
 243     gboolean below;
 244     /*! Demands attention flag */
 245     gboolean demands_attention;
 246
 247     /*! The layer in which the window will be stacked, windows in lower layers
 248       are always below windows in higher layers. */
 249     ObStackingLayer layer;
 250
 251     /*! A bitmask of values in the ObFrameDecorations enum
 252       The values in the variable are the decorations that the client wants to
 253       be displayed around it.
 254     */
 255     guint decorations;
 256
 257     /*! A user option. When this is set to TRUE the client will not ever
 258       be decorated.
 259     */
 260     gboolean undecorated;
 261
 262     /*! A bitmask of values in the ObFunctions enum
 263       The values in the variable specify the ways in which the user is allowed
 264       to modify this window.
 265     */
 266     guint functions;
 267
 268     /*! Icons for the client as specified on the client window */
 269     ObClientIcon *icons;
 270     /*! The number of icons in icons */
 271     guint nicons;
 272
 273     guint32 user_time;
 274 };
 275
 276 struct _ObAppSettings
 277 {
 278     gchar *class;
 279     gchar *name;
 280     gchar *role;
 281
 282     Point position;
 283     gboolean center_x;
 284     gboolean center_y;
 285     gboolean pos_given;
 286
 287     guint desktop;
 288     gint shade;
 289     gint decor;
 290     gint focus;
 291     gint head;
 292     gint iconic;
 293     gint skip_pager;
 294     gint skip_taskbar;
 295     gint max_horz;
 296     gint max_vert;
 297     gint fullscreen;
 298
 299     gint layer;
 300 };
 301
 302 extern GList *client_list;
 303
 304 void client_startup(gboolean reconfig);
 305 void client_shutdown(gboolean reconfig);
 306
 307 typedef void (*ObClientDestructor)(ObClient *client, gpointer data);
 308
 309 void client_add_destructor(ObClientDestructor func, gpointer data);
 310 void client_remove_destructor(ObClientDestructor func);
 311
 312 /*! Manages all existing windows */
 313 void client_manage_all();
 314 /*! Manages a given window */
 315 void client_manage(Window win);
 316 /*! Unmanages all managed windows */
 317 void client_unmanage_all();
 318 /*! Unmanages a given client */
 319 void client_unmanage(ObClient *client);
 320
 321 /*! Sets the client list on the root window from the client_list */
 322 void client_set_list();
 323
 324 /*! Determines if the client should be shown or hidden currently.
 325   @return TRUE if it should be visible; otherwise, FALSE.
 326 */
 327 gboolean client_should_show(ObClient *self);
 328
 329 /*! Returns if the window should be treated as a normal window.
 330   Some windows (desktops, docks, splash screens) have special rules applied
 331   to them in a number of places regarding focus or user interaction. */
 332 gboolean client_normal(ObClient *self);
 333
 334 /* Returns if the window is focused */
 335 gboolean client_focused(ObClient *self);
 336
 337 #define client_move(self, x, y) \
 338   client_configure(self, OB_CORNER_TOPLEFT, x, y, \
 339                    self->area.width, self->area.height, \
 340                    TRUE, TRUE)
 341 #define client_resize(self, w, h) \
 342   client_configure(self, OB_CORNER_TOPLEFT, self->area.x, self->area.y, \
 343                    w, h, TRUE, TRUE)
 344 #define client_move_resize(self, x, y, w, h) \
 345   client_configure(self, OB_CORNER_TOPLEFT, x, y, w, h, TRUE, TRUE)
 346
 347 #define client_configure(self, anchor, x, y, w, h, user, final) \
 348   client_configure_full(self, anchor, x, y, w, h, user, final, FALSE)
 349
 350 /*! Figure out where a window will end up and what size it will be if you
 351   told it to move/resize to these coordinates.
 352
 353   These values are what client_configure_full will give the window.
 354
 355   @param anchor The corner to keep in the same position when resizing.
 356   @param x The x coordiante of the new position for the client.
 357   @param y The y coordiante of the new position for the client.
 358   @param w The width component of the new size for the client.
 359   @param h The height component of the new size for the client.
 360   @param logicalw Returns the width component of the new logical width.
 361                   This value is only returned when the new w or h calculated
 362                   differ from the ones passed in.
 363   @param logicalh Returns the height component of the new logical height.
 364                   This value is only returned when the new w or h calculated
 365                   differ from the ones passed in.
 366   @param user Specifies whether this is a user-requested change or a
 367               program requested change. For program requested changes, the
 368               constraints are not checked.
 369 */
 370 void client_try_configure(ObClient *self, ObCorner anchor,
 371                           gint *x, gint *y, gint *w, gint *h,
 372                           gint *logicalw, gint *logicalh,
 373                           gboolean user);
 374
 375 /*! Move and/or resize the window.
 376   This also maintains things like the client's minsize, and size increments.
 377   @param anchor The corner to keep in the same position when resizing.
 378   @param x The x coordiante of the new position for the client.
 379   @param y The y coordiante of the new position for the client.
 380   @param w The width component of the new size for the client.
 381   @param h The height component of the new size for the client.
 382   @param user Specifies whether this is a user-requested change or a
 383               program requested change. For program requested changes, the
 384               constraints are not checked.
 385   @param final If user is true, then this should specify if this is a final
 386                configuration. e.g. Final should be FALSE if doing an
 387                interactive move/resize, and then be TRUE for the last call
 388                only.
 389   @param force_reply Send a ConfigureNotify to the client regardless of if
 390                      the position changed.
 391 */
 392 void client_configure_full(ObClient *self, ObCorner anchor,
 393                            gint x, gint y, gint w, gint h,
 394                            gboolean user, gboolean final,
 395                            gboolean force_reply);
 396
 397 void client_reconfigure(ObClient *self);
 398
 399 /*! Finds coordinates to keep a client on the screen.
 400   @param self The client
 401   @param x The x coord of the client, may be changed.
 402   @param y The y coord of the client, may be changed.
 403   @param w The width of the client.
 404   @param w The height of the client.
 405   @param rude Be rude about it. If false, it is only moved if it is entirely
 406               not visible. If true, then make sure the window is inside the
 407               struts if possible.
 408   @return true if the client was moved to be on-screen; false if not.
 409 */
 410 gboolean client_find_onscreen(ObClient *self, gint *x, gint *y, gint w, gint h,
 411                               gboolean rude);
 412
 413 /*! Moves a client so that it is on screen if it is entirely out of the
 414   viewable screen.
 415   @param self The client to move
 416   @param rude Be rude about it. If false, it is only moved if it is entirely
 417               not visible. If true, then make sure the window is inside the
 418               struts if possible.
 419 */
 420 void client_move_onscreen(ObClient *self, gboolean rude);
 421
 422 /*! Fullscreen's or unfullscreen's the client window
 423   @param fs true if the window should be made fullscreen; false if it should
 424             be returned to normal state.
 425 */
 426 void client_fullscreen(ObClient *self, gboolean fs);
 427
 428 /*! Iconifies or uniconifies the client window
 429   @param iconic true if the window should be iconified; false if it should be
 430                 restored.
 431   @param curdesk If iconic is FALSE, then this determines if the window will
 432                  be uniconified to the current viewable desktop (true) or to
 433                  its previous desktop (false)
 434 */
 435 void client_iconify(ObClient *self, gboolean iconic, gboolean curdesk);
 436
 437 /*! Maximize or unmaximize the client window
 438   @param max true if the window should be maximized; false if it should be
 439              returned to normal size.
 440   @param dir 0 to set both horz and vert, 1 to set horz, 2 to set vert.
 441 */
 442 void client_maximize(ObClient *self, gboolean max, gint dir);
 443
 444 /*! Shades or unshades the client window
 445   @param shade true if the window should be shaded; false if it should be
 446                unshaded.
 447 */
 448 void client_shade(ObClient *self, gboolean shade);
 449
 450 /*! Hilite the window to make the user notice it */
 451 void client_hilite(ObClient *self, gboolean hilite);
 452
 453 /*! Request the client to close its window */
 454 void client_close(ObClient *self);
 455
 456 /*! Kill the client off violently */
 457 void client_kill(ObClient *self);
 458
 459 /*! Sends the window to the specified desktop
 460   @param donthide If TRUE, the window will not be shown/hidden after its
 461          desktop has been changed. Generally this should be FALSE. */
 462 void client_set_desktop(ObClient *self, guint target, gboolean donthide);
 463
 464 /*! Show the client if it should be shown, and hide it if it should be
 465   hidden. This is for example, when switching desktops.
 466 */
 467 void client_showhide(ObClient *self);
 468
 469 /*! Validate client, by making sure no Destroy or Unmap events exist in
 470   the event queue for the window.
 471   @return true if the client is valid; false if the client has already
 472           been unmapped/destroyed, and so is invalid.
 473 */
 474 gboolean client_validate(ObClient *self);
 475
 476 /*! Sets the wm_state to the specified value */
 477 void client_set_wm_state(ObClient *self, glong state);
 478
 479 /*! Adjusts the window's net_state
 480   This should not be called as part of the window mapping process! It is for
 481   use when updating the state post-mapping.<br>
 482   client_apply_startup_state is used to do the same things during the mapping
 483   process.
 484 */
 485 void client_set_state(ObClient *self, Atom action, glong data1, glong data2);
 486
 487 /* Given a ObClient, find the client that focus would actually be sent to if
 488    you wanted to give focus to the specified ObClient. Will return the same
 489    ObClient passed to it or another ObClient if appropriate. */
 490 ObClient *client_focus_target(ObClient *self);
 491
 492 /*! Returns what client_focus would return if passed the same client, but
 493   without focusing it or modifying the focus order lists. */
 494 gboolean client_can_focus(ObClient *self);
 495
 496 /*! Attempt to focus the client window
 497   NOTE: You should validate the client before calling this !! (client_validate)
 498 */
 499 gboolean client_focus(ObClient *self);
 500
 501 /*! Activates the client for use, focusing, uniconifying it, etc. To be used
 502   when the user deliberately selects a window for use.
 503   @param here If true, then the client is brought to the current desktop;
 504               otherwise, the desktop is changed to where the client lives.
 505   @param user If true, then a user action is what requested the activation;
 506               otherwise, it means an application requested it on its own
 507   @param timestamp The time at which the activate was requested.
 508 */
 509 void client_activate(ObClient *self, gboolean here, gboolean user, Time time);
 510
 511 /*! Calculates the stacking layer for the client window */
 512 void client_calc_layer(ObClient *self);
 513
 514 /*! Raises the client to the top of its stacking layer
 515   Normally actions call to the client_* functions to make stuff go, but this
 516   one is an exception. It just fires off an action, which will be queued.
 517   This is because stacking order rules can be changed by focus state, and so
 518   any time focus changes you have to wait for it to complete before you can
 519   properly restart windows. As such, this only queues an action for later
 520   execution, once the focus change has gone through.
 521 */
 522 void client_raise(ObClient *self);
 523
 524 /*! Lowers the client to the bottom of its stacking layer
 525   Normally actions call to the client_* functions to make stuff go, but this
 526   one is an exception. It just fires off an action, which will be queued.
 527   This is because stacking order rules can be changed by focus state, and so
 528   any time focus changes you have to wait for it to complete before you can
 529   properly restart windows. As such, this only queues an action for later
 530   execution, once the focus change has gone through.
 531 */
 532 void client_lower(ObClient *self);
 533
 534 /*! Updates the window's transient status, and any parents of it */
 535 void client_update_transient_for(ObClient *self);
 536 /*! Update the protocols that the window supports and adjusts things if they
 537   change */
 538 void client_update_protocols(ObClient *self);
 539 /*! Updates the WMNormalHints and adjusts things if they change */
 540 void client_update_normal_hints(ObClient *self);
 541
 542 /*! Updates the WMHints and adjusts things if they change
 543   @param initstate Whether to read the initial_state property from the
 544                    WMHints. This should only be used during the mapping
 545                    process.
 546 */
 547 void client_update_wmhints(ObClient *self);
 548 /*! Updates the window's title and icon title */
 549 void client_update_title(ObClient *self);
 550 /*! Updates the window's application name and class */
 551 void client_update_class(ObClient *self);
 552 /*! Updates the strut for the client */
 553 void client_update_strut(ObClient *self);
 554 /*! Updates the window's icons */
 555 void client_update_icons(ObClient *self);
 556 /*! Updates the window's user time */
 557 void client_update_user_time(ObClient *self, gboolean new_event);
 558
 559 /*! Set up what decor should be shown on the window and what functions should
 560   be allowed (ObClient::decorations and ObClient::functions).
 561   This also updates the NET_WM_ALLOWED_ACTIONS hint.
 562 */
 563 void client_setup_decor_and_functions(ObClient *self);
 564
 565 /*! Retrieves the window's type and sets ObClient->type */
 566 void client_get_type(ObClient *self);
 567
 568 const ObClientIcon *client_icon(ObClient *self, gint w, gint h);
 569
 570 /*! Searches a client's direct parents for a focused window. The function does
 571   not check for the passed client, only for *ONE LEVEL* of its parents.
 572   If no focused parentt is found, NULL is returned.
 573 */
 574 ObClient *client_search_focus_parent(ObClient *self);
 575
 576 /*! Searches a client's transients for a focused window. The function does not
 577   check for the passed client, only for its transients.
 578   If no focused transient is found, NULL is returned.
 579 */
 580 ObClient *client_search_focus_tree(ObClient *self);
 581
 582 /*! Searches a client's transient tree for a focused window. The function
 583   searches up the tree and down other branches as well as the passed client's.
 584   If no focused client is found, NULL is returned.
 585 */
 586 ObClient *client_search_focus_tree_full(ObClient *self);
 587
 588 /*! Return a modal child of the client window that can be focused.
 589     @return A modal child of the client window that can be focused, or 0 if
 590             none was found.
 591 */
 592 ObClient *client_search_modal_child(ObClient *self);
 593
 594 /*! Returns a list of top-level windows which this is a transient for.
 595   It will only contain more than 1 element if the client is transient for its
 596   group.
 597 */
 598 GSList *client_search_all_top_parents(ObClient *self);
 599
 600 /*! Returns a window's top level parent. This only counts direct parents,
 601   not groups if it is transient for its group.
 602 */
 603 ObClient *client_search_top_parent(ObClient *self);
 604
 605 /*! Is one client a direct child of another (i.e. not through the group.) */
 606 gboolean client_is_direct_child(ObClient *parent, ObClient *child);
 607
 608 /*! Search for a parent of a client. This only searches up *ONE LEVEL*, and
 609   returns the searched for parent if it is a parent, or NULL if not. */
 610 ObClient *client_search_parent(ObClient *self, ObClient *search);
 611
 612 /*! Search for a transient of a client. The transient is returned if it is one,
 613   NULL is returned if the given search is not a transient of the client. */
 614 ObClient *client_search_transient(ObClient *self, ObClient *search);
 615
 616 /*! Return the "closest" client in the given direction */
 617 ObClient *client_find_directional(ObClient *c, ObDirection dir);
 618
 619 /*! Return the closest edge in the given direction */
 620 gint client_directional_edge_search(ObClient *c, ObDirection dir, gboolean hang);
 621
 622 /*! Set a client window to be above/below other clients.
 623   @layer < 0 indicates the client should be placed below other clients.<br>
 624          = 0 indicates the client should be placed with other clients.<br>
 625          > 0 indicates the client should be placed above other clients.
 626 */
 627 void client_set_layer(ObClient *self, gint layer);
 628
 629 /*! Set a client window to have decorations or not */
 630 void client_set_undecorated(ObClient *self, gboolean undecorated);
 631
 632 guint client_monitor(ObClient *self);
 633
 634 void client_update_sm_client_id(ObClient *self);
 635
 636 ObClient* client_under_pointer();
 637
 638 gboolean client_has_group_siblings(ObClient *self);
 639
 640 #endif