1412 lines
45 KiB
Factor
1412 lines
45 KiB
Factor
! Copyright (C) 2005, 2006 Eduardo Cavazos
|
|
! See http://factorcode.org/license.txt for BSD license.
|
|
!
|
|
! The most popular guides to programming the X Window System are
|
|
! the series from Oreilly. For programming with Xlib, there is
|
|
! the reference manual and the programmers guide. However, a
|
|
! lesser known manual is the free Xlib manual that comes with
|
|
! the MIT X distribution. The arrangement and order of these
|
|
! bindings follows the structure of the free Xlib manual. If you
|
|
! add to this library and are wondering what part of the file to
|
|
! modify, just find the function or data structure in the manual
|
|
! and note the section.
|
|
|
|
USING: kernel arrays alien alien.c-types alien.strings
|
|
alien.syntax math math.bitwise words sequences namespaces
|
|
continuations io io.encodings.ascii x11.syntax ;
|
|
IN: x11.xlib
|
|
|
|
LIBRARY: xlib
|
|
|
|
TYPEDEF: ulong XID
|
|
TYPEDEF: XID Window
|
|
TYPEDEF: XID Drawable
|
|
TYPEDEF: XID Font
|
|
TYPEDEF: XID Pixmap
|
|
TYPEDEF: XID Cursor
|
|
TYPEDEF: XID Colormap
|
|
TYPEDEF: XID GContext
|
|
TYPEDEF: XID KeySym
|
|
|
|
TYPEDEF: ulong Atom
|
|
|
|
TYPEDEF: char* XPointer
|
|
TYPEDEF: void* Screen*
|
|
TYPEDEF: void* GC
|
|
TYPEDEF: void* Visual*
|
|
TYPEDEF: void* XExtData*
|
|
TYPEDEF: void* XFontProp*
|
|
TYPEDEF: void* XComposeStatus*
|
|
TYPEDEF: void* XIM
|
|
TYPEDEF: void* XIC
|
|
|
|
TYPEDEF: int Status
|
|
|
|
TYPEDEF: int Bool
|
|
|
|
TYPEDEF: ulong VisualID
|
|
TYPEDEF: ulong Time
|
|
|
|
TYPEDEF: void* Window**
|
|
TYPEDEF: void* Atom**
|
|
|
|
ALIAS: <XID> <ulong>
|
|
ALIAS: <Window> <XID>
|
|
ALIAS: <Drawable> <XID>
|
|
ALIAS: <KeySym> <XID>
|
|
ALIAS: <Atom> <ulong>
|
|
|
|
ALIAS: *XID *ulong
|
|
ALIAS: *Window *XID
|
|
ALIAS: *Drawable *XID
|
|
ALIAS: *KeySym *XID
|
|
ALIAS: *Atom *ulong
|
|
!
|
|
! 2 - Display Functions
|
|
!
|
|
|
|
! This struct is incomplete
|
|
C-STRUCT: Display
|
|
{ "void*" "ext_data" }
|
|
{ "void*" "free_funcs" }
|
|
{ "int" "fd" } ;
|
|
|
|
X-FUNCTION: Display* XOpenDisplay ( void* display_name ) ;
|
|
|
|
! 2.2 Obtaining Information about the Display, Image Formats, or Screens
|
|
|
|
X-FUNCTION: ulong XBlackPixel ( Display* display, int screen_number ) ;
|
|
X-FUNCTION: ulong XWhitePixel ( Display* display, int screen_number ) ;
|
|
X-FUNCTION: Colormap XDefaultColormap ( Display* display, int screen_number ) ;
|
|
X-FUNCTION: int XDefaultDepth ( Display* display, int screen_number ) ;
|
|
X-FUNCTION: GC XDefaultGC ( Display* display, int screen_number ) ;
|
|
X-FUNCTION: int XDefaultScreen ( Display* display ) ;
|
|
X-FUNCTION: Window XRootWindow ( Display* display, int screen_number ) ;
|
|
X-FUNCTION: Window XDefaultRootWindow ( Display* display ) ;
|
|
X-FUNCTION: int XProtocolVersion ( Display* display ) ;
|
|
X-FUNCTION: int XProtocolRevision ( Display* display ) ;
|
|
X-FUNCTION: int XQLength ( Display* display ) ;
|
|
X-FUNCTION: int XScreenCount ( Display* display ) ;
|
|
X-FUNCTION: int XConnectionNumber ( Display* display ) ;
|
|
|
|
! 2.5 Closing the Display
|
|
X-FUNCTION: int XCloseDisplay ( Display* display ) ;
|
|
|
|
!
|
|
! 3 - Window Functions
|
|
!
|
|
|
|
! 3.2 - Window Attributes
|
|
|
|
: CWBackPixmap ( -- n ) 0 2^ ; inline
|
|
: CWBackPixel ( -- n ) 1 2^ ; inline
|
|
: CWBorderPixmap ( -- n ) 2 2^ ; inline
|
|
: CWBorderPixel ( -- n ) 3 2^ ; inline
|
|
: CWBitGravity ( -- n ) 4 2^ ; inline
|
|
: CWWinGravity ( -- n ) 5 2^ ; inline
|
|
: CWBackingStore ( -- n ) 6 2^ ; inline
|
|
: CWBackingPlanes ( -- n ) 7 2^ ; inline
|
|
: CWBackingPixel ( -- n ) 8 2^ ; inline
|
|
: CWOverrideRedirect ( -- n ) 9 2^ ; inline
|
|
: CWSaveUnder ( -- n ) 10 2^ ; inline
|
|
: CWEventMask ( -- n ) 11 2^ ; inline
|
|
: CWDontPropagate ( -- n ) 12 2^ ; inline
|
|
: CWColormap ( -- n ) 13 2^ ; inline
|
|
: CWCursor ( -- n ) 14 2^ ; inline
|
|
|
|
C-STRUCT: XSetWindowAttributes
|
|
{ "Pixmap" "background_pixmap" }
|
|
{ "ulong" "background_pixel" }
|
|
{ "Pixmap" "border_pixmap" }
|
|
{ "ulong" "border_pixel" }
|
|
{ "int" "bit_gravity" }
|
|
{ "int" "win_gravity" }
|
|
{ "int" "backing_store" }
|
|
{ "ulong" "backing_planes" }
|
|
{ "ulong" "backing_pixel" }
|
|
{ "Bool" "save_under" }
|
|
{ "long" "event_mask" }
|
|
{ "long" "do_not_propagate_mask" }
|
|
{ "Bool" "override_redirect" }
|
|
{ "Colormap" "colormap" }
|
|
{ "Cursor" "cursor" } ;
|
|
|
|
CONSTANT: UnmapGravity 0
|
|
|
|
CONSTANT: ForgetGravity 0
|
|
CONSTANT: NorthWestGravity 1
|
|
CONSTANT: NorthGravity 2
|
|
CONSTANT: NorthEastGravity 3
|
|
CONSTANT: WestGravity 4
|
|
CONSTANT: CenterGravity 5
|
|
CONSTANT: EastGravity 6
|
|
CONSTANT: SouthWestGravity 7
|
|
CONSTANT: SouthGravity 8
|
|
CONSTANT: SouthEastGravity 9
|
|
CONSTANT: StaticGravity 10
|
|
|
|
! 3.3 - Creating Windows
|
|
|
|
X-FUNCTION: Window XCreateWindow ( Display* display, Window parent, int x, int y, uint width, uint height, uint border_width, int depth, uint class, Visual* visual, ulong valuemask, XSetWindowAttributes* attributes ) ;
|
|
X-FUNCTION: Window XCreateSimpleWindow ( Display* display, Window parent, int x, int y, uint width, uint height, uint border_width, ulong border, ulong background ) ;
|
|
X-FUNCTION: Status XDestroyWindow ( Display* display, Window w ) ;
|
|
X-FUNCTION: Status XMapWindow ( Display* display, Window window ) ;
|
|
X-FUNCTION: Status XMapSubwindows ( Display* display, Window window ) ;
|
|
X-FUNCTION: Status XUnmapWindow ( Display* display, Window w ) ;
|
|
X-FUNCTION: Status XUnmapSubwindows ( Display* display, Window w ) ;
|
|
|
|
! 3.5 Mapping Windows
|
|
|
|
X-FUNCTION: int XMapRaised ( Display* display, Window w ) ;
|
|
|
|
! 3.7 - Configuring Windows
|
|
|
|
: CWX ( -- n ) 0 2^ ; inline
|
|
: CWY ( -- n ) 1 2^ ; inline
|
|
: CWWidth ( -- n ) 2 2^ ; inline
|
|
: CWHeight ( -- n ) 3 2^ ; inline
|
|
: CWBorderWidth ( -- n ) 4 2^ ; inline
|
|
: CWSibling ( -- n ) 5 2^ ; inline
|
|
: CWStackMode ( -- n ) 6 2^ ; inline
|
|
|
|
C-STRUCT: XWindowChanges
|
|
{ "int" "x" }
|
|
{ "int" "y" }
|
|
{ "int" "width" }
|
|
{ "int" "height" }
|
|
{ "int" "border_width" }
|
|
{ "Window" "sibling" }
|
|
{ "int" "stack_mode" } ;
|
|
|
|
X-FUNCTION: Status XConfigureWindow ( Display* display, Window w, uint value_mask, XWindowChanges* values ) ;
|
|
X-FUNCTION: Status XMoveWindow ( Display* display, Window w, int x, int y ) ;
|
|
X-FUNCTION: Status XResizeWindow ( Display* display, Window w, uint width, uint height ) ;
|
|
X-FUNCTION: Status XSetWindowBorderWidth ( Display* display, ulong w, uint width ) ;
|
|
|
|
|
|
! 3.8 Changing Window Stacking Order
|
|
|
|
X-FUNCTION: Status XRaiseWindow ( Display* display, Window w ) ;
|
|
X-FUNCTION: Status XLowerWindow ( Display* display, Window w ) ;
|
|
|
|
! 3.9 - Changing Window Attributes
|
|
|
|
X-FUNCTION: Status XChangeWindowAttributes (
|
|
Display* display, Window w, ulong valuemask, XSetWindowAttributes* attr ) ;
|
|
X-FUNCTION: Status XSetWindowBackground (
|
|
Display* display, Window w, ulong background_pixel ) ;
|
|
X-FUNCTION: Status XDefineCursor ( Display* display, Window w, Cursor cursor ) ;
|
|
X-FUNCTION: Status XUndefineCursor ( Display* display, Window w ) ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
! 4 - Window Information Functions
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
! 4.1 - Obtaining Window Information
|
|
|
|
X-FUNCTION: Status XQueryTree (
|
|
Display* display,
|
|
Window w,
|
|
Window* root_return,
|
|
Window* parent_return,
|
|
Window** children_return, uint* nchildren_return ) ;
|
|
|
|
C-STRUCT: XWindowAttributes
|
|
{ "int" "x" }
|
|
{ "int" "y" }
|
|
{ "int" "width" }
|
|
{ "int" " height" }
|
|
{ "int" "border_width" }
|
|
{ "int" "depth" }
|
|
{ "Visual*" "visual" }
|
|
{ "Window" "root" }
|
|
{ "int" "class" }
|
|
{ "int" "bit_gravity" }
|
|
{ "int" "win_gravity" }
|
|
{ "int" "backing_store" }
|
|
{ "ulong" "backing_planes" }
|
|
{ "ulong" "backing_pixel" }
|
|
{ "Bool" "save_under" }
|
|
{ "Colormap" "colormap" }
|
|
{ "Bool" "map_installed" }
|
|
{ "int" "map_state" }
|
|
{ "long" "all_event_masks" }
|
|
{ "long" "your_event_mask" }
|
|
{ "long" "do_not_propagate_mask" }
|
|
{ "Bool" "override_redirect" }
|
|
{ "Screen*" "screen" } ;
|
|
|
|
X-FUNCTION: Status XGetWindowAttributes ( Display* display, Window w, XWindowAttributes* attr ) ;
|
|
|
|
CONSTANT: IsUnmapped 0
|
|
CONSTANT: IsUnviewable 1
|
|
CONSTANT: IsViewable 2
|
|
|
|
X-FUNCTION: Status XGetGeometry (
|
|
Display* display,
|
|
Drawable d,
|
|
Window* root_return,
|
|
int* x_return,
|
|
int* y_return,
|
|
uint* width_return,
|
|
uint* height_return,
|
|
uint* border_width_return,
|
|
uint* depth_return ) ;
|
|
|
|
! 4.2 - Translating Screen Coordinates
|
|
|
|
X-FUNCTION: Bool XQueryPointer ( Display* display, Window w, Window* root_return, Window* child_return, int* root_x_return, int* root_y_return, int* win_x_return, int* win_y_return, uint* mask_return ) ;
|
|
|
|
! 4.3 - Properties and Atoms
|
|
|
|
X-FUNCTION: Atom XInternAtom ( Display* display, char* atom_name, Bool only_if_exists ) ;
|
|
|
|
X-FUNCTION: char* XGetAtomName ( Display* display, Atom atom ) ;
|
|
|
|
! 4.4 - Obtaining and Changing Window Properties
|
|
|
|
X-FUNCTION: int XGetWindowProperty ( Display* display, Window w, Atom property, long long_offset, long long_length, Bool delete, Atom req_type, Atom* actual_type_return, int* actual_format_return, ulong* nitems_return, ulong* bytes_after_return, char** prop_return ) ;
|
|
|
|
X-FUNCTION: int XChangeProperty ( Display* display, Window w, Atom property, Atom type, int format, int mode, void* data, int nelements ) ;
|
|
|
|
! 4.5 Selections
|
|
|
|
X-FUNCTION: int XSetSelectionOwner ( Display* display, Atom selection, Window owner, Time time ) ;
|
|
|
|
X-FUNCTION: Window XGetSelectionOwner ( Display* display, Atom selection ) ;
|
|
|
|
X-FUNCTION: int XConvertSelection ( Display* display, Atom selection, Atom target, Atom property, Window requestor, Time time ) ;
|
|
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
! 5 - Pixmap and Cursor Functions
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
! 5.1 - Creating and Freeing Pixmaps
|
|
|
|
X-FUNCTION: Pixmap XCreatePixmap ( Display* display, Drawable d, uint width, uint height, uint depth ) ;
|
|
X-FUNCTION: int XFreePixmap ( Display* display, Pixmap pixmap ) ;
|
|
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
! 6 - Color Management Functions
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XColor
|
|
{ "ulong" "pixel" }
|
|
{ "ushort" "red" }
|
|
{ "ushort" "green" }
|
|
{ "ushort" "blue" }
|
|
{ "char" "flags" }
|
|
{ "char" "pad" } ;
|
|
|
|
X-FUNCTION: Status XLookupColor ( Display* display, Colormap colormap, char* color_name, XColor* exact_def_return, XColor* screen_def_return ) ;
|
|
X-FUNCTION: Status XAllocColor ( Display* display, Colormap colormap, XColor* screen_in_out ) ;
|
|
X-FUNCTION: Status XQueryColor ( Display* display, Colormap colormap, XColor* def_in_out ) ;
|
|
|
|
! 6.4 Creating, Copying, and Destroying Colormaps
|
|
|
|
X-FUNCTION: Colormap XCreateColormap ( Display* display, Window w, Visual* visual, int alloc ) ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
! 7 - Graphics Context Functions
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
: GCFunction ( -- n ) 0 2^ ; inline
|
|
: GCPlaneMask ( -- n ) 1 2^ ; inline
|
|
: GCForeground ( -- n ) 2 2^ ; inline
|
|
: GCBackground ( -- n ) 3 2^ ; inline
|
|
: GCLineWidth ( -- n ) 4 2^ ; inline
|
|
: GCLineStyle ( -- n ) 5 2^ ; inline
|
|
: GCCapStyle ( -- n ) 6 2^ ; inline
|
|
: GCJoinStyle ( -- n ) 7 2^ ; inline
|
|
: GCFillStyle ( -- n ) 8 2^ ; inline
|
|
: GCFillRule ( -- n ) 9 2^ ; inline
|
|
: GCTile ( -- n ) 10 2^ ; inline
|
|
: GCStipple ( -- n ) 11 2^ ; inline
|
|
: GCTileStipXOrigin ( -- n ) 12 2^ ; inline
|
|
: GCTileStipYOrigin ( -- n ) 13 2^ ; inline
|
|
: GCFont ( -- n ) 14 2^ ; inline
|
|
: GCSubwindowMode ( -- n ) 15 2^ ; inline
|
|
: GCGraphicsExposures ( -- n ) 16 2^ ; inline
|
|
: GCClipXOrigin ( -- n ) 17 2^ ; inline
|
|
: GCClipYOrigin ( -- n ) 18 2^ ; inline
|
|
: GCClipMask ( -- n ) 19 2^ ; inline
|
|
: GCDashOffset ( -- n ) 20 2^ ; inline
|
|
: GCDashList ( -- n ) 21 2^ ; inline
|
|
: GCArcMode ( -- n ) 22 2^ ; inline
|
|
|
|
CONSTANT: GXclear HEX: 0
|
|
CONSTANT: GXand HEX: 1
|
|
CONSTANT: GXandReverse HEX: 2
|
|
CONSTANT: GXcopy HEX: 3
|
|
CONSTANT: GXandInverted HEX: 4
|
|
CONSTANT: GXnoop HEX: 5
|
|
CONSTANT: GXxor HEX: 6
|
|
CONSTANT: GXor HEX: 7
|
|
CONSTANT: GXnor HEX: 8
|
|
CONSTANT: GXequiv HEX: 9
|
|
CONSTANT: GXinvert HEX: a
|
|
CONSTANT: GXorReverse HEX: b
|
|
CONSTANT: GXcopyInverted HEX: c
|
|
CONSTANT: GXorInverted HEX: d
|
|
CONSTANT: GXnand HEX: e
|
|
CONSTANT: GXset HEX: f
|
|
|
|
C-STRUCT: XGCValues
|
|
{ "int" "function" }
|
|
{ "ulong" "plane_mask" }
|
|
{ "ulong" "foreground" }
|
|
{ "ulong" "background" }
|
|
{ "int" "line_width" }
|
|
{ "int" "line_style" }
|
|
{ "int" "cap_style" }
|
|
{ "int" "join_style" }
|
|
{ "int" "fill_style" }
|
|
{ "int" "fill_rule" }
|
|
{ "int" "arc_mode" }
|
|
{ "Pixmap" "tile" }
|
|
{ "Pixmap" "stipple" }
|
|
{ "int" "ts_x_origin" }
|
|
{ "int" "ts_y_origin" }
|
|
{ "Font" "font" }
|
|
{ "int" "subwindow_mode" }
|
|
{ "Bool" "graphics_exposures" }
|
|
{ "int" "clip_x_origin" }
|
|
{ "int" "clip_y_origin" }
|
|
{ "Pixmap" "clip_mask" }
|
|
{ "int" "dash_offset" }
|
|
{ "char" "dashes" } ;
|
|
|
|
X-FUNCTION: GC XCreateGC ( Display* display, Window d, ulong valuemask, XGCValues* values ) ;
|
|
X-FUNCTION: int XChangeGC ( Display* display, GC gc, ulong valuemask, XGCValues* values ) ;
|
|
X-FUNCTION: Status XGetGCValues ( Display* display, GC gc, ulong valuemask, XGCValues* values_return ) ;
|
|
X-FUNCTION: Status XSetForeground ( Display* display, GC gc, ulong foreground ) ;
|
|
X-FUNCTION: Status XSetBackground ( Display* display, GC gc, ulong background ) ;
|
|
X-FUNCTION: Status XSetFunction ( Display* display, GC gc, int function ) ;
|
|
X-FUNCTION: Status XSetSubwindowMode ( Display* display, GC gc, int subwindow_mode ) ;
|
|
|
|
X-FUNCTION: GContext XGContextFromGC ( GC gc ) ;
|
|
|
|
X-FUNCTION: Status XSetFont ( Display* display, GC gc, Font font ) ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
! 8 - Graphics Functions
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
X-FUNCTION: Status XClearWindow ( Display* display, Window w ) ;
|
|
X-FUNCTION: Status XDrawPoint ( Display* display, Drawable d, GC gc, int x, int y ) ;
|
|
X-FUNCTION: Status XDrawLine ( Display* display, Drawable d, GC gc, int x1, int y1, int x2, int y2 ) ;
|
|
X-FUNCTION: Status XDrawArc ( Display* display, Drawable d, GC gc, int x, int y, uint width, uint height, int angle1, int angle2 ) ;
|
|
X-FUNCTION: Status XFillArc ( Display* display, Drawable d, GC gc, int x, int y, uint width, uint height, int angle1, int angle2 ) ;
|
|
|
|
! 8.5 - Font Metrics
|
|
|
|
C-STRUCT: XCharStruct
|
|
{ "short" "lbearing" }
|
|
{ "short" "rbearing" }
|
|
{ "short" "width" }
|
|
{ "short" "ascent" }
|
|
{ "short" "descent" }
|
|
{ "ushort" "attributes" } ;
|
|
|
|
X-FUNCTION: Font XLoadFont ( Display* display, char* name ) ;
|
|
X-FUNCTION: XFontStruct* XQueryFont ( Display* display, XID font_ID ) ;
|
|
X-FUNCTION: XFontStruct* XLoadQueryFont ( Display* display, char* name ) ;
|
|
|
|
C-STRUCT: XFontStruct
|
|
{ "XExtData*" "ext_data" }
|
|
{ "Font" "fid" }
|
|
{ "uint" "direction" }
|
|
{ "uint" "min_char_or_byte2" }
|
|
{ "uint" "max_char_or_byte2" }
|
|
{ "uint" "min_byte1" }
|
|
{ "uint" "max_byte1" }
|
|
{ "Bool" "all_chars_exist" }
|
|
{ "uint" "default_char" }
|
|
{ "int" "n_properties" }
|
|
{ "XFontProp*" "properties" }
|
|
{ "XCharStruct" "min_bounds" }
|
|
{ "XCharStruct" "max_bounds" }
|
|
{ "XCharStruct*" "per_char" }
|
|
{ "int" "ascent" }
|
|
{ "int" "descent" } ;
|
|
|
|
X-FUNCTION: int XTextWidth ( XFontStruct* font_struct, char* string, int count ) ;
|
|
|
|
! 8.6 - Drawing Text
|
|
|
|
X-FUNCTION: Status XDrawString (
|
|
Display* display,
|
|
Drawable d,
|
|
GC gc,
|
|
int x,
|
|
int y,
|
|
char* string,
|
|
int length ) ;
|
|
|
|
! 8.7 - Transferring Images between Client and Server
|
|
|
|
CONSTANT: AllPlanes -1
|
|
|
|
C-STRUCT: XImage-funcs
|
|
{ "void*" "create_image" }
|
|
{ "void*" "destroy_image" }
|
|
{ "void*" "get_pixel" }
|
|
{ "void*" "put_pixel" }
|
|
{ "void*" "sub_image" }
|
|
{ "void*" "add_pixel" } ;
|
|
|
|
C-STRUCT: XImage
|
|
{ "int" "width" }
|
|
{ "int" "height" }
|
|
{ "int" "xoffset" }
|
|
{ "int" "format" }
|
|
{ "char*" "data" }
|
|
{ "int" "byte_order" }
|
|
{ "int" "bitmap_unit" }
|
|
{ "int" "bitmap_bit_order" }
|
|
{ "int" "bitmap_pad" }
|
|
{ "int" "depth" }
|
|
{ "int" "bytes_per_line" }
|
|
{ "int" "bits_per_pixel" }
|
|
{ "ulong" "red_mask" }
|
|
{ "ulong" "green_mask" }
|
|
{ "ulong" "blue_mask" }
|
|
{ "XPointer" "obdata" }
|
|
{ "XImage-funcs" "f" } ;
|
|
|
|
X-FUNCTION: XImage* XGetImage ( Display* display, Drawable d, int x, int y, uint width, uint height, ulong plane_mask, int format ) ;
|
|
X-FUNCTION: int XDestroyImage ( XImage* ximage ) ;
|
|
|
|
: XImage-size ( ximage -- size )
|
|
[ XImage-height ] [ XImage-bytes_per_line ] bi * ;
|
|
|
|
: XImage-pixels ( ximage -- byte-array )
|
|
[ XImage-data ] [ XImage-size ] bi memory>byte-array ;
|
|
|
|
!
|
|
! 9 - Window and Session Manager Functions
|
|
!
|
|
|
|
X-FUNCTION: Status XReparentWindow ( Display* display, Window w, Window parent, int x, int y ) ;
|
|
X-FUNCTION: Status XAddToSaveSet ( Display* display, Window w ) ;
|
|
X-FUNCTION: Status XRemoveFromSaveSet ( Display* display, Window w ) ;
|
|
X-FUNCTION: Status XGrabServer ( Display* display ) ;
|
|
X-FUNCTION: Status XUngrabServer ( Display* display ) ;
|
|
X-FUNCTION: Status XKillClient ( Display* display, XID resource ) ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
! 10 - Events
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
! 10.3 - Event Masks
|
|
|
|
: NoEventMask ( -- n ) 0 ; inline
|
|
: KeyPressMask ( -- n ) 0 2^ ; inline
|
|
: KeyReleaseMask ( -- n ) 1 2^ ; inline
|
|
: ButtonPressMask ( -- n ) 2 2^ ; inline
|
|
: ButtonReleaseMask ( -- n ) 3 2^ ; inline
|
|
: EnterWindowMask ( -- n ) 4 2^ ; inline
|
|
: LeaveWindowMask ( -- n ) 5 2^ ; inline
|
|
: PointerMotionMask ( -- n ) 6 2^ ; inline
|
|
: PointerMotionHintMask ( -- n ) 7 2^ ; inline
|
|
: Button1MotionMask ( -- n ) 8 2^ ; inline
|
|
: Button2MotionMask ( -- n ) 9 2^ ; inline
|
|
: Button3MotionMask ( -- n ) 10 2^ ; inline
|
|
: Button4MotionMask ( -- n ) 11 2^ ; inline
|
|
: Button5MotionMask ( -- n ) 12 2^ ; inline
|
|
: ButtonMotionMask ( -- n ) 13 2^ ; inline
|
|
: KeymapStateMask ( -- n ) 14 2^ ; inline
|
|
: ExposureMask ( -- n ) 15 2^ ; inline
|
|
: VisibilityChangeMask ( -- n ) 16 2^ ; inline
|
|
: StructureNotifyMask ( -- n ) 17 2^ ; inline
|
|
: ResizeRedirectMask ( -- n ) 18 2^ ; inline
|
|
: SubstructureNotifyMask ( -- n ) 19 2^ ; inline
|
|
: SubstructureRedirectMask ( -- n ) 20 2^ ; inline
|
|
: FocusChangeMask ( -- n ) 21 2^ ; inline
|
|
: PropertyChangeMask ( -- n ) 22 2^ ; inline
|
|
: ColormapChangeMask ( -- n ) 23 2^ ; inline
|
|
: OwnerGrabButtonMask ( -- n ) 24 2^ ; inline
|
|
|
|
CONSTANT: KeyPress 2
|
|
CONSTANT: KeyRelease 3
|
|
CONSTANT: ButtonPress 4
|
|
CONSTANT: ButtonRelease 5
|
|
CONSTANT: MotionNotify 6
|
|
CONSTANT: EnterNotify 7
|
|
CONSTANT: LeaveNotify 8
|
|
CONSTANT: FocusIn 9
|
|
CONSTANT: FocusOut 10
|
|
CONSTANT: KeymapNotify 11
|
|
CONSTANT: Expose 12
|
|
CONSTANT: GraphicsExpose 13
|
|
CONSTANT: NoExpose 14
|
|
CONSTANT: VisibilityNotify 15
|
|
CONSTANT: CreateNotify 16
|
|
CONSTANT: DestroyNotify 17
|
|
CONSTANT: UnmapNotify 18
|
|
CONSTANT: MapNotify 19
|
|
CONSTANT: MapRequest 20
|
|
CONSTANT: ReparentNotify 21
|
|
CONSTANT: ConfigureNotify 22
|
|
CONSTANT: ConfigureRequest 23
|
|
CONSTANT: GravityNotify 24
|
|
CONSTANT: ResizeRequest 25
|
|
CONSTANT: CirculateNotify 26
|
|
CONSTANT: CirculateRequest 27
|
|
CONSTANT: PropertyNotify 28
|
|
CONSTANT: SelectionClear 29
|
|
CONSTANT: SelectionRequest 30
|
|
CONSTANT: SelectionNotify 31
|
|
CONSTANT: ColormapNotify 32
|
|
CONSTANT: ClientMessage 33
|
|
CONSTANT: MappingNotify 34
|
|
CONSTANT: LASTEvent 35
|
|
|
|
C-STRUCT: XAnyEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
! 10.5 Keyboard and Pointer Events
|
|
|
|
CONSTANT: Button1 1
|
|
CONSTANT: Button2 2
|
|
CONSTANT: Button3 3
|
|
CONSTANT: Button4 4
|
|
CONSTANT: Button5 5
|
|
|
|
: Button1Mask ( -- n ) 1 8 shift ; inline
|
|
: Button2Mask ( -- n ) 1 9 shift ; inline
|
|
: Button3Mask ( -- n ) 1 10 shift ; inline
|
|
: Button4Mask ( -- n ) 1 11 shift ; inline
|
|
: Button5Mask ( -- n ) 1 12 shift ; inline
|
|
|
|
: ShiftMask ( -- n ) 1 0 shift ; inline
|
|
: LockMask ( -- n ) 1 1 shift ; inline
|
|
: ControlMask ( -- n ) 1 2 shift ; inline
|
|
: Mod1Mask ( -- n ) 1 3 shift ; inline
|
|
: Mod2Mask ( -- n ) 1 4 shift ; inline
|
|
: Mod3Mask ( -- n ) 1 5 shift ; inline
|
|
: Mod4Mask ( -- n ) 1 6 shift ; inline
|
|
: Mod5Mask ( -- n ) 1 7 shift ; inline
|
|
|
|
C-STRUCT: XButtonEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" }
|
|
{ "Window" "root" }
|
|
{ "Window" "subwindow" }
|
|
{ "Time" "time" }
|
|
{ "int" "x" }
|
|
{ "int" "y" }
|
|
{ "int" "x_root" }
|
|
{ "int" "y_root" }
|
|
{ "uint" "state" }
|
|
{ "uint" "button" }
|
|
{ "Bool" "same_screen" } ;
|
|
|
|
TYPEDEF: XButtonEvent XButtonPressedEvent
|
|
TYPEDEF: XButtonEvent XButtonReleasedEvent
|
|
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XKeyEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" }
|
|
{ "Window" "root" }
|
|
{ "Window" "subwindow" }
|
|
{ "Time" "time" }
|
|
{ "int" "x" }
|
|
{ "int" "y" }
|
|
{ "int" "x_root" }
|
|
{ "int" "y_root" }
|
|
{ "uint" "state" }
|
|
{ "uint" "keycode" }
|
|
{ "Bool" "same_screen" } ;
|
|
|
|
TYPEDEF: XKeyEvent XKeyPressedEvent
|
|
TYPEDEF: XKeyEvent XKeyReleasedEvent
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XMotionEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" }
|
|
{ "Window" "root" }
|
|
{ "Window" "subwindow" }
|
|
{ "Time" "time" }
|
|
{ "int" "x" }
|
|
{ "int" "y" }
|
|
{ "int" "x_root" }
|
|
{ "int" "y_root" }
|
|
{ "uint" "state" }
|
|
{ "char" "is_hint" }
|
|
{ "Bool" "same_screen" } ;
|
|
|
|
TYPEDEF: XMotionEvent XPointerMovedEvent
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XCrossingEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" }
|
|
{ "Window" "root" }
|
|
{ "Window" "subwindow" }
|
|
{ "Time" "time" }
|
|
{ "int" "x" }
|
|
{ "int" "y" }
|
|
{ "int" "x_root" }
|
|
{ "int" "y_root" }
|
|
{ "int" "mode" }
|
|
{ "int" "detail" }
|
|
{ "Bool" "same_screen" }
|
|
{ "Bool" "focus" }
|
|
{ "uint" "state" } ;
|
|
|
|
TYPEDEF: XCrossingEvent XEnterWindowEvent
|
|
TYPEDEF: XCrossingEvent XLeaveWindowEvent
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XFocusChangeEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" }
|
|
{ "int" "mode" }
|
|
{ "int" "detail" } ;
|
|
|
|
TYPEDEF: XFocusChangeEvent XFocusInEvent
|
|
TYPEDEF: XFocusChangeEvent XFocusOutEvent
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XExposeEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" }
|
|
{ "int" "x" }
|
|
{ "int" "y" }
|
|
{ "int" "width" }
|
|
{ "int" "height" }
|
|
{ "int" "count" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XGraphicsExposeEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Drawable" "drawable" }
|
|
{ "int" "x" }
|
|
{ "int" "y" }
|
|
{ "int" "width" }
|
|
{ "int" "height" }
|
|
{ "int" "count" }
|
|
{ "int" "major_code" }
|
|
{ "int" "minor_code" } ;
|
|
|
|
C-STRUCT: XNoExposeEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Drawable" "drawable" }
|
|
{ "int" "major_code" }
|
|
{ "int" "minor_code" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XVisibilityEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" }
|
|
{ "int" "state" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XCreateWindowEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "parent" }
|
|
{ "Window" "window" }
|
|
{ "int" "x" }
|
|
{ "int" "y" }
|
|
{ "int" "width" }
|
|
{ "int" "height" }
|
|
{ "int" "border_width" }
|
|
{ "Bool" "override_redirect" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XDestroyWindowEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "event" }
|
|
{ "Window" "window" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XUnmapEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "event" }
|
|
{ "Window" "window" }
|
|
{ "Bool" "from_configure" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XMapEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "event" }
|
|
{ "Window" "window" }
|
|
{ "Bool" "override_redirect" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XMapRequestEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "parent" }
|
|
{ "Window" "window" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XReparentEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "event" }
|
|
{ "Window" "window" }
|
|
{ "Window" "parent" }
|
|
{ "int" "x" }
|
|
{ "int" "y" }
|
|
{ "Bool" "override_redirect" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XConfigureEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "event" }
|
|
{ "Window" "window" }
|
|
{ "int" "x" }
|
|
{ "int" "y" }
|
|
{ "int" "width" }
|
|
{ "int" "height" }
|
|
{ "int" "border_width" }
|
|
{ "Window" "above" }
|
|
{ "Bool" "override_redirect" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XGravityEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "event" }
|
|
{ "Window" "window" }
|
|
{ "int" "x" }
|
|
{ "int" "y" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XResizeRequestEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" }
|
|
{ "int" "width" }
|
|
{ "int" "height" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XConfigureRequestEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "parent" }
|
|
{ "Window" "window" }
|
|
{ "int" "x" }
|
|
{ "int" "y" }
|
|
{ "int" "width" }
|
|
{ "int" "height" }
|
|
{ "int" "border_width" }
|
|
{ "Window" "above" }
|
|
{ "int" "detail" }
|
|
{ "ulong" "value_mask" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XCirculateEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "event" }
|
|
{ "Window" "window" }
|
|
{ "int" "place" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XCirculateRequestEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "parent" }
|
|
{ "Window" "window" }
|
|
{ "int" "place" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XPropertyEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" }
|
|
{ "Atom" "atom" }
|
|
{ "Time" "time" }
|
|
{ "int" "state" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XSelectionClearEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" }
|
|
{ "Atom" "selection" }
|
|
{ "Time" "time" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XSelectionRequestEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "owner" }
|
|
{ "Window" "requestor" }
|
|
{ "Atom" "selection" }
|
|
{ "Atom" "target" }
|
|
{ "Atom" "property" }
|
|
{ "Time" "time" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XSelectionEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "requestor" }
|
|
{ "Atom" "selection" }
|
|
{ "Atom" "target" }
|
|
{ "Atom" "property" }
|
|
{ "Time" "time" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XColormapEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" }
|
|
{ "Colormap" "colormap" }
|
|
{ "Bool" "new" }
|
|
{ "int" "state" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XClientMessageEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" }
|
|
{ "Atom" "message_type" }
|
|
{ "int" "format" }
|
|
{ "long" "data0" }
|
|
{ "long" "data1" }
|
|
{ "long" "data2" }
|
|
{ "long" "data3" }
|
|
{ "long" "data4" }
|
|
! union {
|
|
! char b[20];
|
|
! short s[10];
|
|
! long l[5];
|
|
! } data;
|
|
;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XMappingEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" }
|
|
{ "int" "request" }
|
|
{ "int" "first_keycode" }
|
|
{ "int" "count" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XErrorEvent
|
|
{ "int" "type" }
|
|
{ "Display*" "display" }
|
|
{ "XID" "resourceid" }
|
|
{ "ulong" "serial" }
|
|
{ "uchar" "error_code" }
|
|
{ "uchar" "request_code" }
|
|
{ "uchar" "minor_code" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
C-STRUCT: XKeymapEvent
|
|
{ "int" "type" }
|
|
{ "ulong" "serial" }
|
|
{ "Bool" "send_event" }
|
|
{ "Display*" "display" }
|
|
{ "Window" "window" }
|
|
! char key_vector[32];
|
|
{ "int" "pad" }
|
|
{ "int" "pad" }
|
|
{ "int" "pad" }
|
|
{ "int" "pad" }
|
|
{ "int" "pad" }
|
|
{ "int" "pad" }
|
|
{ "int" "pad" }
|
|
{ "int" "pad" } ;
|
|
|
|
C-UNION: XEvent
|
|
"int"
|
|
"XAnyEvent"
|
|
"XKeyEvent"
|
|
"XButtonEvent"
|
|
"XMotionEvent"
|
|
"XCrossingEvent"
|
|
"XFocusChangeEvent"
|
|
"XExposeEvent"
|
|
"XGraphicsExposeEvent"
|
|
"XNoExposeEvent"
|
|
"XVisibilityEvent"
|
|
"XCreateWindowEvent"
|
|
"XDestroyWindowEvent"
|
|
"XUnmapEvent"
|
|
"XMapEvent"
|
|
"XMapRequestEvent"
|
|
"XReparentEvent"
|
|
"XConfigureEvent"
|
|
"XGravityEvent"
|
|
"XResizeRequestEvent"
|
|
"XConfigureRequestEvent"
|
|
"XCirculateEvent"
|
|
"XCirculateRequestEvent"
|
|
"XPropertyEvent"
|
|
"XSelectionClearEvent"
|
|
"XSelectionRequestEvent"
|
|
"XSelectionEvent"
|
|
"XColormapEvent"
|
|
"XClientMessageEvent"
|
|
"XMappingEvent"
|
|
"XErrorEvent"
|
|
"XKeymapEvent"
|
|
{ "long" 24 } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
! 11 - Event Handling Functions
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
X-FUNCTION: Status XSelectInput ( Display* display, Window w, long event_mask ) ;
|
|
X-FUNCTION: Status XFlush ( Display* display ) ;
|
|
X-FUNCTION: Status XSync ( Display* display, int discard ) ;
|
|
X-FUNCTION: Status XNextEvent ( Display* display, XEvent* event ) ;
|
|
X-FUNCTION: Status XMaskEvent ( Display* display, long event_mask, XEvent* event_return ) ;
|
|
|
|
! 11.3 - Event Queue Management
|
|
|
|
CONSTANT: QueuedAlready 0
|
|
CONSTANT: QueuedAfterReading 1
|
|
CONSTANT: QueuedAfterFlush 2
|
|
|
|
X-FUNCTION: int XEventsQueued ( Display* display, int mode ) ;
|
|
X-FUNCTION: int XPending ( Display* display ) ;
|
|
|
|
! 11.6 - Sending Events to Other Applications
|
|
|
|
X-FUNCTION: Status XSendEvent ( Display* display, Window w, Bool propagate, long event_mask, XEvent* event_send ) ;
|
|
|
|
! 11.8 - Handling Protocol Errors
|
|
|
|
X-FUNCTION: int XSetErrorHandler ( void* handler ) ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
! 12 - Input Device Functions
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
CONSTANT: None 0
|
|
|
|
X-FUNCTION: int XGrabPointer (
|
|
Display* display,
|
|
Window grab_window,
|
|
Bool owner_events,
|
|
uint event_mask,
|
|
int pointer_mode,
|
|
int keyboard_mode,
|
|
Window confine_to,
|
|
Cursor cursor,
|
|
Time time ) ;
|
|
|
|
X-FUNCTION: Status XUngrabPointer ( Display* display, Time time ) ;
|
|
X-FUNCTION: Status XChangeActivePointerGrab ( Display* display, uint event_mask, Cursor cursor, Time time ) ;
|
|
X-FUNCTION: Status XGrabKey ( Display* display, int keycode, uint modifiers, Window grab_window, Bool owner_events, int pointer_mode, int keyboard_mode ) ;
|
|
X-FUNCTION: Status XSetInputFocus ( Display* display, Window focus, int revert_to, Time time ) ;
|
|
|
|
X-FUNCTION: Status XGetInputFocus ( Display* display,
|
|
Window* focus_return,
|
|
int* revert_to_return ) ;
|
|
|
|
X-FUNCTION: Status XWarpPointer ( Display* display, Window src_w, Window dest_w, int src_x, int src_y, uint src_width, uint src_height, int dest_x, int dest_y ) ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
! 14 - Inter-Client Communication Functions
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
! 14.1 Client to Window Manager Communication
|
|
|
|
X-FUNCTION: Status XFetchName ( Display* display, Window w, char** window_name_return ) ;
|
|
X-FUNCTION: Status XGetTransientForHint ( Display* display, Window w, Window* prop_window_return ) ;
|
|
|
|
! 14.1.1. Manipulating Top-Level Windows
|
|
|
|
X-FUNCTION: Status XIconifyWindow (
|
|
Display* display, Window w, int screen_number ) ;
|
|
|
|
X-FUNCTION: Status XWithdrawWindow (
|
|
Display* display, Window w, int screen_number ) ;
|
|
|
|
! 14.1.6 - Setting and Reading the WM_HINTS Property
|
|
|
|
! 17.1.7 - Setting and Reading the WM_NORMAL_HINTS Property
|
|
|
|
: USPosition ( -- n ) 0 2^ ; inline
|
|
: USSize ( -- n ) 1 2^ ; inline
|
|
: PPosition ( -- n ) 2 2^ ; inline
|
|
: PSize ( -- n ) 3 2^ ; inline
|
|
: PMinSize ( -- n ) 4 2^ ; inline
|
|
: PMaxSize ( -- n ) 5 2^ ; inline
|
|
: PResizeInc ( -- n ) 6 2^ ; inline
|
|
: PAspect ( -- n ) 7 2^ ; inline
|
|
: PBaseSize ( -- n ) 8 2^ ; inline
|
|
: PWinGravity ( -- n ) 9 2^ ; inline
|
|
: PAllHints ( -- n )
|
|
{ PPosition PSize PMinSize PMaxSize PResizeInc PAspect } flags ; foldable
|
|
|
|
C-STRUCT: XSizeHints
|
|
{ "long" "flags" }
|
|
{ "int" "x" }
|
|
{ "int" "y" }
|
|
{ "int" "width" }
|
|
{ "int" "height" }
|
|
{ "int" "min_width" }
|
|
{ "int" "min_height" }
|
|
{ "int" "max_width" }
|
|
{ "int" "max_height" }
|
|
{ "int" "width_inc" }
|
|
{ "int" "height_inc" }
|
|
{ "int" "min_aspect_x" }
|
|
{ "int" "min_aspect_y" }
|
|
{ "int" "max_aspect_x" }
|
|
{ "int" "max_aspect_y" }
|
|
{ "int" "base_width" }
|
|
{ "int" "base_height" }
|
|
{ "int" "win_gravity" } ;
|
|
|
|
! 14.1.10. Setting and Reading the WM_PROTOCOLS Property
|
|
|
|
X-FUNCTION: Status XSetWMProtocols (
|
|
Display* display, Window w, Atom* protocols, int count ) ;
|
|
|
|
X-FUNCTION: Status XGetWMProtocols (
|
|
Display* display,
|
|
Window w,
|
|
Atom** protocols_return,
|
|
int* count_return ) ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
! 16 - Application Utility Functions
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
! 16.1 Keyboard Utility Functions
|
|
|
|
X-FUNCTION: KeySym XLookupKeysym ( XKeyEvent* key_event, int index ) ;
|
|
|
|
X-FUNCTION: int XLookupString (
|
|
XKeyEvent* event_struct,
|
|
void* buffer_return,
|
|
int bytes_buffer,
|
|
KeySym* keysym_return,
|
|
XComposeStatus* status_in_out ) ;
|
|
|
|
! 16.7 Determining the Appropriate Visual Type
|
|
|
|
CONSTANT: VisualNoMask HEX: 0
|
|
CONSTANT: VisualIDMask HEX: 1
|
|
CONSTANT: VisualScreenMask HEX: 2
|
|
CONSTANT: VisualDepthMask HEX: 4
|
|
CONSTANT: VisualClassMask HEX: 8
|
|
CONSTANT: VisualRedMaskMask HEX: 10
|
|
CONSTANT: VisualGreenMaskMask HEX: 20
|
|
CONSTANT: VisualBlueMaskMask HEX: 40
|
|
CONSTANT: VisualColormapSizeMask HEX: 80
|
|
CONSTANT: VisualBitsPerRGBMask HEX: 100
|
|
CONSTANT: VisualAllMask HEX: 1FF
|
|
|
|
C-STRUCT: XVisualInfo
|
|
{ "Visual*" "visual" }
|
|
{ "VisualID" "visualid" }
|
|
{ "int" "screen" }
|
|
{ "uint" "depth" }
|
|
{ "int" "class" }
|
|
{ "ulong" "red_mask" }
|
|
{ "ulong" "green_mask" }
|
|
{ "ulong" "blue_mask" }
|
|
{ "int" "colormap_size" }
|
|
{ "int" "bits_per_rgb" } ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
! Appendix D - Compatibility Functions
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
X-FUNCTION: Status XSetStandardProperties (
|
|
Display* display,
|
|
Window w,
|
|
char* window_name,
|
|
char* icon_name,
|
|
Pixmap icon_pixmap,
|
|
char** argv,
|
|
int argc,
|
|
XSizeHints* hints ) ;
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
CONSTANT: XA_PRIMARY 1
|
|
CONSTANT: XA_SECONDARY 2
|
|
CONSTANT: XA_ARC 3
|
|
CONSTANT: XA_ATOM 4
|
|
CONSTANT: XA_BITMAP 5
|
|
CONSTANT: XA_CARDINAL 6
|
|
CONSTANT: XA_COLORMAP 7
|
|
CONSTANT: XA_CURSOR 8
|
|
CONSTANT: XA_CUT_BUFFER0 9
|
|
CONSTANT: XA_CUT_BUFFER1 10
|
|
CONSTANT: XA_CUT_BUFFER2 11
|
|
CONSTANT: XA_CUT_BUFFER3 12
|
|
CONSTANT: XA_CUT_BUFFER4 13
|
|
CONSTANT: XA_CUT_BUFFER5 14
|
|
CONSTANT: XA_CUT_BUFFER6 15
|
|
CONSTANT: XA_CUT_BUFFER7 16
|
|
CONSTANT: XA_DRAWABLE 17
|
|
CONSTANT: XA_FONT 18
|
|
CONSTANT: XA_INTEGER 19
|
|
CONSTANT: XA_PIXMAP 20
|
|
CONSTANT: XA_POINT 21
|
|
CONSTANT: XA_RECTANGLE 22
|
|
CONSTANT: XA_RESOURCE_MANAGER 23
|
|
CONSTANT: XA_RGB_COLOR_MAP 24
|
|
CONSTANT: XA_RGB_BEST_MAP 25
|
|
CONSTANT: XA_RGB_BLUE_MAP 26
|
|
CONSTANT: XA_RGB_DEFAULT_MAP 27
|
|
CONSTANT: XA_RGB_GRAY_MAP 28
|
|
CONSTANT: XA_RGB_GREEN_MAP 29
|
|
CONSTANT: XA_RGB_RED_MAP 30
|
|
CONSTANT: XA_STRING 31
|
|
CONSTANT: XA_VISUALID 32
|
|
CONSTANT: XA_WINDOW 33
|
|
CONSTANT: XA_WM_COMMAND 34
|
|
CONSTANT: XA_WM_HINTS 35
|
|
CONSTANT: XA_WM_CLIENT_MACHINE 36
|
|
CONSTANT: XA_WM_ICON_NAME 37
|
|
CONSTANT: XA_WM_ICON_SIZE 38
|
|
CONSTANT: XA_WM_NAME 39
|
|
CONSTANT: XA_WM_NORMAL_HINTS 40
|
|
CONSTANT: XA_WM_SIZE_HINTS 41
|
|
CONSTANT: XA_WM_ZOOM_HINTS 42
|
|
CONSTANT: XA_MIN_SPACE 43
|
|
CONSTANT: XA_NORM_SPACE 44
|
|
CONSTANT: XA_MAX_SPACE 45
|
|
CONSTANT: XA_END_SPACE 46
|
|
CONSTANT: XA_SUPERSCRIPT_X 47
|
|
CONSTANT: XA_SUPERSCRIPT_Y 48
|
|
CONSTANT: XA_SUBSCRIPT_X 49
|
|
CONSTANT: XA_SUBSCRIPT_Y 50
|
|
CONSTANT: XA_UNDERLINE_POSITION 51
|
|
CONSTANT: XA_UNDERLINE_THICKNESS 52
|
|
CONSTANT: XA_STRIKEOUT_ASCENT 53
|
|
CONSTANT: XA_STRIKEOUT_DESCENT 54
|
|
CONSTANT: XA_ITALIC_ANGLE 55
|
|
CONSTANT: XA_X_HEIGHT 56
|
|
CONSTANT: XA_QUAD_WIDTH 57
|
|
CONSTANT: XA_WEIGHT 58
|
|
CONSTANT: XA_POINT_SIZE 59
|
|
CONSTANT: XA_RESOLUTION 60
|
|
CONSTANT: XA_COPYRIGHT 61
|
|
CONSTANT: XA_NOTICE 62
|
|
CONSTANT: XA_FONT_NAME 63
|
|
CONSTANT: XA_FAMILY_NAME 64
|
|
CONSTANT: XA_FULL_NAME 65
|
|
CONSTANT: XA_CAP_HEIGHT 66
|
|
CONSTANT: XA_WM_CLASS 67
|
|
CONSTANT: XA_WM_TRANSIENT_FOR 68
|
|
|
|
CONSTANT: XA_LAST_PREDEFINED 68
|
|
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
! The rest of the stuff is not from the book.
|
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
X-FUNCTION: void XFree ( void* data ) ;
|
|
X-FUNCTION: int XStoreName ( Display* display, Window w, char* window_name ) ;
|
|
X-FUNCTION: void XSetWMNormalHints ( Display* display, Window w, XSizeHints* hints ) ;
|
|
X-FUNCTION: int XBell ( Display* display, int percent ) ;
|
|
|
|
! !!! INPUT METHODS
|
|
|
|
CONSTANT: XIMPreeditArea HEX: 0001
|
|
CONSTANT: XIMPreeditCallbacks HEX: 0002
|
|
CONSTANT: XIMPreeditPosition HEX: 0004
|
|
CONSTANT: XIMPreeditNothing HEX: 0008
|
|
CONSTANT: XIMPreeditNone HEX: 0010
|
|
CONSTANT: XIMStatusArea HEX: 0100
|
|
CONSTANT: XIMStatusCallbacks HEX: 0200
|
|
CONSTANT: XIMStatusNothing HEX: 0400
|
|
CONSTANT: XIMStatusNone HEX: 0800
|
|
|
|
CONSTANT: XNVaNestedList "XNVaNestedList"
|
|
CONSTANT: XNQueryInputStyle "queryInputStyle"
|
|
CONSTANT: XNClientWindow "clientWindow"
|
|
CONSTANT: XNInputStyle "inputStyle"
|
|
CONSTANT: XNFocusWindow "focusWindow"
|
|
CONSTANT: XNResourceName "resourceName"
|
|
CONSTANT: XNResourceClass "resourceClass"
|
|
CONSTANT: XNGeometryCallback "geometryCallback"
|
|
CONSTANT: XNDestroyCallback "destroyCallback"
|
|
CONSTANT: XNFilterEvents "filterEvents"
|
|
CONSTANT: XNPreeditStartCallback "preeditStartCallback"
|
|
CONSTANT: XNPreeditDoneCallback "preeditDoneCallback"
|
|
CONSTANT: XNPreeditDrawCallback "preeditDrawCallback"
|
|
CONSTANT: XNPreeditCaretCallback "preeditCaretCallback"
|
|
CONSTANT: XNPreeditStateNotifyCallback "preeditStateNotifyCallback"
|
|
CONSTANT: XNPreeditAttributes "preeditAttributes"
|
|
CONSTANT: XNStatusStartCallback "statusStartCallback"
|
|
CONSTANT: XNStatusDoneCallback "statusDoneCallback"
|
|
CONSTANT: XNStatusDrawCallback "statusDrawCallback"
|
|
CONSTANT: XNStatusAttributes "statusAttributes"
|
|
CONSTANT: XNArea "area"
|
|
CONSTANT: XNAreaNeeded "areaNeeded"
|
|
CONSTANT: XNSpotLocation "spotLocation"
|
|
CONSTANT: XNColormap "colorMap"
|
|
CONSTANT: XNStdColormap "stdColorMap"
|
|
CONSTANT: XNForeground "foreground"
|
|
CONSTANT: XNBackground "background"
|
|
CONSTANT: XNBackgroundPixmap "backgroundPixmap"
|
|
CONSTANT: XNFontSet "fontSet"
|
|
CONSTANT: XNLineSpace "lineSpace"
|
|
CONSTANT: XNCursor "cursor"
|
|
|
|
CONSTANT: XNQueryIMValuesList "queryIMValuesList"
|
|
CONSTANT: XNQueryICValuesList "queryICValuesList"
|
|
CONSTANT: XNVisiblePosition "visiblePosition"
|
|
CONSTANT: XNR6PreeditCallback "r6PreeditCallback"
|
|
CONSTANT: XNStringConversionCallback "stringConversionCallback"
|
|
CONSTANT: XNStringConversion "stringConversion"
|
|
CONSTANT: XNResetState "resetState"
|
|
CONSTANT: XNHotKey "hotKey"
|
|
CONSTANT: XNHotKeyState "hotKeyState"
|
|
CONSTANT: XNPreeditState "preeditState"
|
|
CONSTANT: XNSeparatorofNestedList "separatorofNestedList"
|
|
|
|
CONSTANT: XBufferOverflow -1
|
|
CONSTANT: XLookupNone 1
|
|
CONSTANT: XLookupChars 2
|
|
CONSTANT: XLookupKeySym 3
|
|
CONSTANT: XLookupBoth 4
|
|
|
|
X-FUNCTION: Bool XFilterEvent ( XEvent* event, Window w ) ;
|
|
|
|
X-FUNCTION: XIM XOpenIM ( Display* dpy, void* rdb, char* res_name, char* res_class ) ;
|
|
|
|
X-FUNCTION: Status XCloseIM ( XIM im ) ;
|
|
|
|
X-FUNCTION: XIC XCreateIC ( XIM im, char* key1, Window value1, char* key2, Window value2, char* key3, int value3, char* key4, char* value4, char* key5, char* value5, int key6 ) ;
|
|
|
|
X-FUNCTION: void XDestroyIC ( XIC ic ) ;
|
|
|
|
X-FUNCTION: void XSetICFocus ( XIC ic ) ;
|
|
|
|
X-FUNCTION: void XUnsetICFocus ( XIC ic ) ;
|
|
|
|
X-FUNCTION: int XwcLookupString ( XIC ic, XKeyPressedEvent* event, ulong* buffer_return, int bytes_buffer, KeySym* keysym_return, Status* status_return ) ;
|
|
|
|
X-FUNCTION: int Xutf8LookupString ( XIC ic, XKeyPressedEvent* event, char* buffer_return, int bytes_buffer, KeySym* keysym_return, Status* status_return ) ;
|
|
|
|
! !!! category of setlocale
|
|
CONSTANT: LC_ALL 0
|
|
CONSTANT: LC_COLLATE 1
|
|
CONSTANT: LC_CTYPE 2
|
|
CONSTANT: LC_MONETARY 3
|
|
CONSTANT: LC_NUMERIC 4
|
|
CONSTANT: LC_TIME 5
|
|
|
|
X-FUNCTION: char* setlocale ( int category, char* name ) ;
|
|
|
|
X-FUNCTION: Bool XSupportsLocale ( ) ;
|
|
|
|
X-FUNCTION: char* XSetLocaleModifiers ( char* modifier_list ) ;
|