1 /////////////////////////////////////////////////////////////////////////////
3 // Purpose: Various utilities
4 // Author: Julian Smart
8 // Copyright: (c) Julian Smart
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 // ============================================================================
14 // ============================================================================
16 // ----------------------------------------------------------------------------
18 // ----------------------------------------------------------------------------
23 #include "wx/msgdlg.h"
24 #include "wx/cursor.h"
25 #include "wx/window.h" // for wxTopLevelWindows
32 #include <sys/types.h>
40 #if (defined(__SUNCC__) || defined(__CLCC__))
45 #pragma message disable nosimpint
49 #pragma message enable nosimpint
52 #include "wx/unix/execute.h"
54 #include "wx/x11/private.h"
55 #include "X11/Xresource.h"
56 #include "X11/Xutil.h"
58 // ----------------------------------------------------------------------------
60 // ----------------------------------------------------------------------------
62 // Yuck this is really BOTH site and platform dependent
63 // so we should use some other strategy!
65 #define DEFAULT_XRESOURCE_DIR "/usr/openwin/lib/app-defaults"
67 #define DEFAULT_XRESOURCE_DIR "/usr/lib/X11/app-defaults"
70 static char *GetIniFile (char *dest
, const char *filename
);
72 // ============================================================================
74 // ============================================================================
76 // ----------------------------------------------------------------------------
77 // async event processing
78 // ----------------------------------------------------------------------------
80 // Consume all events until no more left
83 Display
*display
= (Display
*) wxGetDisplay();
85 XSync (display
, FALSE
);
91 // XtAppPending returns availability of events AND timers/inputs, which
92 // are processed via callbacks, so XtAppNextEvent will not return if
93 // there are no events. So added '& XtIMXEvent' - Sergey.
94 while (XtAppPending ((XtAppContext
) wxTheApp
->GetAppContext()) & XtIMXEvent
)
96 XFlush (XtDisplay ((Widget
) wxTheApp
->GetTopLevelWidget()));
97 // Jan Lessner: works better when events are non-X events
98 XtAppProcessEvent((XtAppContext
) wxTheApp
->GetAppContext(), XtIMXEvent
);
103 // Check whether this window wants to process messages, e.g. Stop button
104 // in long calculations.
105 bool wxCheckForInterrupt(wxWindow
*wnd
)
107 wxASSERT_MSG(FALSE
, "wxCheckForInterrupt not yet implemented.");
110 wxCHECK_MSG( wnd
, FALSE
, "NULL window in wxCheckForInterrupt" );
112 Display
*dpy
=(Display
*) wnd
->GetXDisplay();
113 Window win
=(Window
) wnd
->GetXWindow();
116 if (wnd
->GetMainWidget())
118 XmUpdateDisplay((Widget
)(wnd
->GetMainWidget()));
121 bool hadEvents
= FALSE
;
122 while( XCheckMaskEvent(dpy
,
123 ButtonPressMask
|ButtonReleaseMask
|ButtonMotionMask
|
124 PointerMotionMask
|KeyPressMask
|KeyReleaseMask
,
127 if ( event
.xany
.window
== win
)
131 XtDispatchEvent(&event
);
139 // ----------------------------------------------------------------------------
141 // ----------------------------------------------------------------------------
143 static void xt_notify_end_process(XtPointer data
, int *WXUNUSED(fid
),
146 wxEndProcessData
*proc_data
= (wxEndProcessData
*)data
;
148 wxHandleProcessTermination(proc_data
);
150 // VZ: I think they should be the same...
151 wxASSERT( (int)*id
== proc_data
->tag
);
157 int wxAddProcessCallback(wxEndProcessData
*proc_data
, int fd
)
160 XtInputId id
= XtAppAddInput((XtAppContext
) wxTheApp
->GetAppContext(),
162 (XtPointer
*) XtInputReadMask
,
163 (XtInputCallbackProc
) xt_notify_end_process
,
164 (XtPointer
) proc_data
);
170 // ----------------------------------------------------------------------------
172 // ----------------------------------------------------------------------------
177 // Use current setting for the bell
178 XBell ((Display
*) wxGetDisplay(), 0);
181 int wxGetOsVersion(int *majorVsn
, int *minorVsn
)
185 // This code is WRONG!! Does NOT return the
186 // Motif version of the libs but the X protocol
188 Display
*display
= XtDisplay ((Widget
) wxTheApp
->GetTopLevelWidget());
190 *majorVsn
= ProtocolVersion (display
);
192 *minorVsn
= ProtocolRevision (display
);
204 // ----------------------------------------------------------------------------
205 // Reading and writing resources (eg WIN.INI, .Xdefaults)
206 // ----------------------------------------------------------------------------
208 // Read $HOME for what it says is home, if not
209 // read $USER or $LOGNAME for user name else determine
210 // the Real User, then determine the Real home dir.
211 static char * GetIniFile (char *dest
, const char *filename
)
214 if (filename
&& wxIsAbsolutePath(filename
))
216 strcpy(dest
, filename
);
218 else if ((home
= wxGetUserHome("")) != NULL
)
221 if (dest
[strlen(dest
) - 1] != '/')
223 if (filename
== NULL
)
225 if ((filename
= getenv ("XENVIRONMENT")) == NULL
)
226 filename
= ".Xdefaults";
228 else if (*filename
!= '.')
230 strcat (dest
, filename
);
240 static char *GetResourcePath(char *buf
, const char *name
, bool create
= FALSE
)
242 if (create
&& wxFileExists (name
) ) {
244 return buf
; // Exists so ...
250 // Put in standard place for resource files if not absolute
251 strcpy (buf
, DEFAULT_XRESOURCE_DIR
);
253 strcat (buf
, (const char*) wxFileNameFromPath (name
));
257 // Touch the file to create it
258 FILE *fd
= fopen (buf
, "w");
265 * We have a cache for writing different resource files,
266 * which will only get flushed when we call wxFlushResources().
267 * Build up a list of resource databases waiting to be written.
271 wxList
wxResourceCache (wxKEY_STRING
);
274 wxFlushResources (void)
276 char nameBuffer
[512];
278 wxNode
*node
= wxResourceCache
.First ();
281 const char *file
= node
->GetKeyString();
282 // If file doesn't exist, create it first.
283 (void)GetResourcePath(nameBuffer
, file
, TRUE
);
285 XrmDatabase database
= (XrmDatabase
) node
->Data ();
286 XrmPutFileDatabase (database
, nameBuffer
);
287 XrmDestroyDatabase (database
);
288 wxNode
*next
= node
->Next ();
294 static XrmDatabase wxResourceDatabase
= 0;
296 void wxXMergeDatabases (wxApp
* theApp
, Display
* display
);
298 bool wxWriteResource(const wxString
& section
, const wxString
& entry
, const wxString
& value
, const wxString
& file
)
302 (void) GetIniFile (buffer
, file
);
304 XrmDatabase database
;
305 wxNode
*node
= wxResourceCache
.Find (buffer
);
307 database
= (XrmDatabase
) node
->Data ();
310 database
= XrmGetFileDatabase (buffer
);
311 wxResourceCache
.Append (buffer
, (wxObject
*) database
);
315 strcpy (resName
, (const char*) section
);
316 strcat (resName
, ".");
317 strcat (resName
, (const char*) entry
);
319 XrmPutStringResource (&database
, resName
, value
);
323 bool wxWriteResource(const wxString
& section
, const wxString
& entry
, float value
, const wxString
& file
)
326 sprintf(buf
, "%.4f", value
);
327 return wxWriteResource(section
, entry
, buf
, file
);
330 bool wxWriteResource(const wxString
& section
, const wxString
& entry
, long value
, const wxString
& file
)
333 sprintf(buf
, "%ld", value
);
334 return wxWriteResource(section
, entry
, buf
, file
);
337 bool wxWriteResource(const wxString
& section
, const wxString
& entry
, int value
, const wxString
& file
)
340 sprintf(buf
, "%d", value
);
341 return wxWriteResource(section
, entry
, buf
, file
);
344 bool wxGetResource(const wxString
& section
, const wxString
& entry
, char **value
, const wxString
& file
)
346 if (!wxResourceDatabase
)
348 Display
*display
= (Display
*) wxGetDisplay();
349 wxXMergeDatabases (wxTheApp
, display
);
352 XrmDatabase database
;
358 // Is this right? Trying to get it to look in the user's
359 // home directory instead of current directory -- JACS
360 (void) GetIniFile (buffer
, file
);
362 wxNode
*node
= wxResourceCache
.Find (buffer
);
364 database
= (XrmDatabase
) node
->Data ();
367 database
= XrmGetFileDatabase (buffer
);
368 wxResourceCache
.Append (buffer
, (wxObject
*) database
);
372 database
= wxResourceDatabase
;
377 strcpy (buf
, section
);
381 Bool success
= XrmGetResource (database
, buf
, "*", str_type
,
383 // Try different combinations of upper/lower case, just in case...
386 buf
[0] = (isupper (buf
[0]) ?
tolower (buf
[0]) : toupper (buf
[0]));
387 success
= XrmGetResource (database
, buf
, "*", str_type
,
395 *value
= new char[xvalue
.size
+ 1];
396 strncpy (*value
, xvalue
.addr
, (int) xvalue
.size
);
402 bool wxGetResource(const wxString
& section
, const wxString
& entry
, float *value
, const wxString
& file
)
405 bool succ
= wxGetResource(section
, entry
, (char **)&s
, file
);
408 *value
= (float)strtod(s
, NULL
);
415 bool wxGetResource(const wxString
& section
, const wxString
& entry
, long *value
, const wxString
& file
)
418 bool succ
= wxGetResource(section
, entry
, (char **)&s
, file
);
421 *value
= strtol(s
, NULL
, 10);
428 bool wxGetResource(const wxString
& section
, const wxString
& entry
, int *value
, const wxString
& file
)
431 bool succ
= wxGetResource(section
, entry
, (char **)&s
, file
);
434 // Handle True, False here
435 // True, Yes, Enables, Set or Activated
436 if (*s
== 'T' || *s
== 'Y' || *s
== 'E' || *s
== 'S' || *s
== 'A')
438 // False, No, Disabled, Reset, Cleared, Deactivated
439 else if (*s
== 'F' || *s
== 'N' || *s
== 'D' || *s
== 'R' || *s
== 'C')
443 *value
= (int) strtol (s
, NULL
, 10);
451 void wxXMergeDatabases (wxApp
* theApp
, Display
* display
)
453 XrmDatabase homeDB
, serverDB
, applicationDB
;
454 char filenamebuf
[1024];
456 char *filename
= &filenamebuf
[0];
458 wxString classname
= theApp
->GetClassName();
460 (void) strcpy (name
, "/usr/lib/X11/app-defaults/");
461 (void) strcat (name
, (const char*) classname
);
463 /* Get application defaults file, if any */
464 applicationDB
= XrmGetFileDatabase (name
);
465 (void) XrmMergeDatabases (applicationDB
, &wxResourceDatabase
);
467 /* Merge server defaults, created by xrdb, loaded as a property of the root
468 * window when the server initializes and loaded into the display
469 * structure on XOpenDisplay;
470 * if not defined, use .Xdefaults
473 if (XResourceManagerString (display
) != NULL
)
475 serverDB
= XrmGetStringDatabase (XResourceManagerString (display
));
479 (void) GetIniFile (filename
, NULL
);
480 serverDB
= XrmGetFileDatabase (filename
);
482 XrmMergeDatabases (serverDB
, &wxResourceDatabase
);
484 /* Open XENVIRONMENT file, or if not defined, the .Xdefaults,
485 * and merge into existing database
488 if ((environment
= getenv ("XENVIRONMENT")) == NULL
)
491 environment
= GetIniFile (filename
, NULL
);
492 len
= strlen (environment
);
493 wxString hostname
= wxGetHostName();
495 strncat(environment
, hostname
, 1024 - len
);
497 homeDB
= XrmGetFileDatabase (environment
);
498 XrmMergeDatabases (homeDB
, &wxResourceDatabase
);
504 * Not yet used but may be useful.
508 wxSetDefaultResources (const Widget w
, const char **resourceSpec
, const char *name
)
511 Display
*dpy
= XtDisplay (w
); // Retrieve the display pointer
513 XrmDatabase rdb
= NULL
; // A resource data base
515 // Create an empty resource database
516 rdb
= XrmGetStringDatabase ("");
518 // Add the Component resources, prepending the name of the component
521 while (resourceSpec
[i
] != NULL
)
525 sprintf (buf
, "*%s%s", name
, resourceSpec
[i
++]);
526 XrmPutLineResource (&rdb
, buf
);
529 // Merge them into the Xt database, with lowest precendence
533 #if (XlibSpecificationRelease>=5)
534 XrmDatabase db
= XtDatabase (dpy
);
535 XrmCombineDatabase (rdb
, &db
, FALSE
);
537 XrmMergeDatabases (dpy
->db
, &rdb
);
545 #endif // wxUSE_RESOURCES
547 // ----------------------------------------------------------------------------
549 // ----------------------------------------------------------------------------
551 static int wxBusyCursorCount
= 0;
555 wxXSetBusyCursor (wxWindow
* win
, wxCursor
* cursor
)
557 Display
*display
= (Display
*) win
->GetXDisplay();
559 Window xwin
= (Window
) win
->GetXWindow();
563 XSetWindowAttributes attrs
;
567 attrs
.cursor
= (Cursor
) cursor
->GetXCursor(display
);
571 // Restore old cursor
572 if (win
->GetCursor().Ok())
573 attrs
.cursor
= (Cursor
) win
->GetCursor().GetXCursor(display
);
578 XChangeWindowAttributes (display
, xwin
, CWCursor
, &attrs
);
582 for(wxNode
*node
= win
->GetChildren().First (); node
; node
= node
->Next())
584 wxWindow
*child
= (wxWindow
*) node
->Data ();
585 wxXSetBusyCursor (child
, cursor
);
589 // Set the cursor to the busy cursor for all windows
590 void wxBeginBusyCursor(wxCursor
*cursor
)
593 if (wxBusyCursorCount
== 1)
595 for(wxNode
*node
= wxTopLevelWindows
.First (); node
; node
= node
->Next())
597 wxWindow
*win
= (wxWindow
*) node
->Data ();
598 wxXSetBusyCursor (win
, cursor
);
603 // Restore cursor to normal
604 void wxEndBusyCursor()
606 if (wxBusyCursorCount
== 0)
610 if (wxBusyCursorCount
== 0)
612 for(wxNode
*node
= wxTopLevelWindows
.First (); node
; node
= node
->Next())
614 wxWindow
*win
= (wxWindow
*) node
->Data ();
615 wxXSetBusyCursor (win
, NULL
);
620 // TRUE if we're between the above two calls
623 return (wxBusyCursorCount
> 0);
626 // ----------------------------------------------------------------------------
628 // ----------------------------------------------------------------------------
630 void wxGetMousePosition( int* x
, int* y
)
634 XQueryPointer((Display
*) wxGetDisplay(),
635 DefaultRootWindow((Display
*) wxGetDisplay()),
637 &(xev
.x_root
), &(xev
.y_root
),
644 // Return TRUE if we have a colour display
645 bool wxColourDisplay()
647 return wxDisplayDepth() > 1;
650 // Returns depth of screen
653 Display
*dpy
= (Display
*) wxGetDisplay();
655 return DefaultDepth (dpy
, DefaultScreen (dpy
));
658 // Get size of display
659 void wxDisplaySize(int *width
, int *height
)
661 Display
*dpy
= (Display
*) wxGetDisplay();
664 *width
= DisplayWidth (dpy
, DefaultScreen (dpy
));
666 *height
= DisplayHeight (dpy
, DefaultScreen (dpy
));
669 void wxDisplaySizeMM(int *width
, int *height
)
671 Display
*dpy
= (Display
*) wxGetDisplay();
674 *width
= DisplayWidthMM(dpy
, DefaultScreen (dpy
));
676 *height
= DisplayHeightMM(dpy
, DefaultScreen (dpy
));
679 void wxClientDisplayRect(int *x
, int *y
, int *width
, int *height
)
681 // This is supposed to return desktop dimensions minus any window
682 // manager panels, menus, taskbars, etc. If there is a way to do that
683 // for this platform please fix this function, otherwise it defaults
684 // to the entire desktop.
687 wxDisplaySize(width
, height
);
691 // Configurable display in X11
692 static WXDisplay
*gs_currentDisplay
= NULL
;
693 static wxString gs_displayName
;
695 WXDisplay
*wxGetDisplay()
697 if (gs_currentDisplay
)
698 return gs_currentDisplay
;
700 return wxTheApp
->GetInitialDisplay();
702 return (WXDisplay
*) NULL
;
705 bool wxSetDisplay(const wxString
& display_name
)
707 gs_displayName
= display_name
;
709 if ( display_name
.IsEmpty() )
711 gs_currentDisplay
= NULL
;
717 Display
* display
= XOpenDisplay((const char*) display_name
);
721 gs_currentDisplay
= (WXDisplay
*) display
;
729 wxString
wxGetDisplayName()
731 return gs_displayName
;
734 wxWindow
* wxFindWindowAtPoint(const wxPoint
& pt
)
736 return wxGenericFindWindowAtPoint(pt
);
739 // ----------------------------------------------------------------------------
741 // ----------------------------------------------------------------------------
743 // Find the letter corresponding to the mnemonic, for Motif
744 char wxFindMnemonic (const char *s
)
747 int len
= strlen (s
);
749 for (i
= 0; i
< len
; i
++)
753 // Carefully handle &&
754 if ((i
+ 1) <= len
&& s
[i
+ 1] == '&')
766 char * wxFindAccelerator (const char *s
)
768 // VZ: this function returns incorrect keysym which completely breaks kbd
773 // The accelerator text is after the \t char.
774 while (*s
&& *s
!= '\t')
780 Now we need to format it as X standard:
785 Ctrl+N --> Ctrl<Key>N
787 Ctrl+Shift+A --> Ctrl Shift<Key>A
792 char *tmp
= copystring (s
);
798 while (*p
&& *p
!= '+')
804 strcat (wxBuffer
, " ");
805 if (strcmp (s
, "Alt"))
806 strcat (wxBuffer
, s
);
808 strcat (wxBuffer
, "Meta");
813 strcat (wxBuffer
, "<Key>");
814 strcat (wxBuffer
, s
);
823 // ----------------------------------------------------------------------------
824 // keycode translations
825 // ----------------------------------------------------------------------------
827 #include <X11/keysym.h>
829 // FIXME what about tables??
831 int wxCharCodeXToWX(KeySym keySym
)
838 id
= WXK_SHIFT
; break;
841 id
= WXK_CONTROL
; break;
843 id
= WXK_BACK
; break;
845 id
= WXK_DELETE
; break;
847 id
= WXK_CLEAR
; break;
853 id
= WXK_RETURN
; break;
855 id
= WXK_ESCAPE
; break;
858 id
= WXK_PAUSE
; break;
860 id
= WXK_NUMLOCK
; break;
862 id
= WXK_SCROLL
; break;
865 id
= WXK_HOME
; break;
869 id
= WXK_LEFT
; break;
871 id
= WXK_RIGHT
; break;
875 id
= WXK_DOWN
; break;
877 id
= WXK_NEXT
; break;
879 id
= WXK_PRIOR
; break;
881 id
= WXK_MENU
; break;
883 id
= WXK_SELECT
; break;
885 id
= WXK_CANCEL
; break;
887 id
= WXK_PRINT
; break;
889 id
= WXK_EXECUTE
; break;
891 id
= WXK_INSERT
; break;
893 id
= WXK_HELP
; break;
896 id
= WXK_MULTIPLY
; break;
900 id
= WXK_SUBTRACT
; break;
902 id
= WXK_DIVIDE
; break;
904 id
= WXK_DECIMAL
; break;
912 id
= WXK_RETURN
; break;
914 id
= WXK_NUMPAD0
; break;
916 id
= WXK_NUMPAD1
; break;
918 id
= WXK_NUMPAD2
; break;
920 id
= WXK_NUMPAD3
; break;
922 id
= WXK_NUMPAD4
; break;
924 id
= WXK_NUMPAD5
; break;
926 id
= WXK_NUMPAD6
; break;
928 id
= WXK_NUMPAD7
; break;
930 id
= WXK_NUMPAD8
; break;
932 id
= WXK_NUMPAD9
; break;
982 id
= (keySym
<= 255) ?
(int)keySym
: -1;
988 KeySym
wxCharCodeWXToX(int id
)
994 case WXK_CANCEL
: keySym
= XK_Cancel
; break;
995 case WXK_BACK
: keySym
= XK_BackSpace
; break;
996 case WXK_TAB
: keySym
= XK_Tab
; break;
997 case WXK_CLEAR
: keySym
= XK_Clear
; break;
998 case WXK_RETURN
: keySym
= XK_Return
; break;
999 case WXK_SHIFT
: keySym
= XK_Shift_L
; break;
1000 case WXK_CONTROL
: keySym
= XK_Control_L
; break;
1001 case WXK_MENU
: keySym
= XK_Menu
; break;
1002 case WXK_PAUSE
: keySym
= XK_Pause
; break;
1003 case WXK_ESCAPE
: keySym
= XK_Escape
; break;
1004 case WXK_SPACE
: keySym
= ' '; break;
1005 case WXK_PRIOR
: keySym
= XK_Prior
; break;
1006 case WXK_NEXT
: keySym
= XK_Next
; break;
1007 case WXK_END
: keySym
= XK_End
; break;
1008 case WXK_HOME
: keySym
= XK_Home
; break;
1009 case WXK_LEFT
: keySym
= XK_Left
; break;
1010 case WXK_UP
: keySym
= XK_Up
; break;
1011 case WXK_RIGHT
: keySym
= XK_Right
; break;
1012 case WXK_DOWN
: keySym
= XK_Down
; break;
1013 case WXK_SELECT
: keySym
= XK_Select
; break;
1014 case WXK_PRINT
: keySym
= XK_Print
; break;
1015 case WXK_EXECUTE
: keySym
= XK_Execute
; break;
1016 case WXK_INSERT
: keySym
= XK_Insert
; break;
1017 case WXK_DELETE
: keySym
= XK_Delete
; break;
1018 case WXK_HELP
: keySym
= XK_Help
; break;
1019 case WXK_NUMPAD0
: keySym
= XK_KP_0
; break;
1020 case WXK_NUMPAD1
: keySym
= XK_KP_1
; break;
1021 case WXK_NUMPAD2
: keySym
= XK_KP_2
; break;
1022 case WXK_NUMPAD3
: keySym
= XK_KP_3
; break;
1023 case WXK_NUMPAD4
: keySym
= XK_KP_4
; break;
1024 case WXK_NUMPAD5
: keySym
= XK_KP_5
; break;
1025 case WXK_NUMPAD6
: keySym
= XK_KP_6
; break;
1026 case WXK_NUMPAD7
: keySym
= XK_KP_7
; break;
1027 case WXK_NUMPAD8
: keySym
= XK_KP_8
; break;
1028 case WXK_NUMPAD9
: keySym
= XK_KP_9
; break;
1029 case WXK_MULTIPLY
: keySym
= XK_KP_Multiply
; break;
1030 case WXK_ADD
: keySym
= XK_KP_Add
; break;
1031 case WXK_SUBTRACT
: keySym
= XK_KP_Subtract
; break;
1032 case WXK_DECIMAL
: keySym
= XK_KP_Decimal
; break;
1033 case WXK_DIVIDE
: keySym
= XK_KP_Divide
; break;
1034 case WXK_F1
: keySym
= XK_F1
; break;
1035 case WXK_F2
: keySym
= XK_F2
; break;
1036 case WXK_F3
: keySym
= XK_F3
; break;
1037 case WXK_F4
: keySym
= XK_F4
; break;
1038 case WXK_F5
: keySym
= XK_F5
; break;
1039 case WXK_F6
: keySym
= XK_F6
; break;
1040 case WXK_F7
: keySym
= XK_F7
; break;
1041 case WXK_F8
: keySym
= XK_F8
; break;
1042 case WXK_F9
: keySym
= XK_F9
; break;
1043 case WXK_F10
: keySym
= XK_F10
; break;
1044 case WXK_F11
: keySym
= XK_F11
; break;
1045 case WXK_F12
: keySym
= XK_F12
; break;
1046 case WXK_F13
: keySym
= XK_F13
; break;
1047 case WXK_F14
: keySym
= XK_F14
; break;
1048 case WXK_F15
: keySym
= XK_F15
; break;
1049 case WXK_F16
: keySym
= XK_F16
; break;
1050 case WXK_F17
: keySym
= XK_F17
; break;
1051 case WXK_F18
: keySym
= XK_F18
; break;
1052 case WXK_F19
: keySym
= XK_F19
; break;
1053 case WXK_F20
: keySym
= XK_F20
; break;
1054 case WXK_F21
: keySym
= XK_F21
; break;
1055 case WXK_F22
: keySym
= XK_F22
; break;
1056 case WXK_F23
: keySym
= XK_F23
; break;
1057 case WXK_F24
: keySym
= XK_F24
; break;
1058 case WXK_NUMLOCK
: keySym
= XK_Num_Lock
; break;
1059 case WXK_SCROLL
: keySym
= XK_Scroll_Lock
; break;
1060 default: keySym
= id
<= 255 ?
(KeySym
)id
: 0;
1066 // ----------------------------------------------------------------------------
1067 // Some colour manipulation routines
1068 // ----------------------------------------------------------------------------
1070 void wxHSVToXColor(wxHSV
*hsv
,XColor
*rgb
)
1075 int r
= 0, g
= 0, b
= 0;
1078 s
= (s
* wxMAX_RGB
) / wxMAX_SV
;
1079 v
= (v
* wxMAX_RGB
) / wxMAX_SV
;
1080 if (h
== 360) h
= 0;
1081 if (s
== 0) { h
= 0; r
= g
= b
= v
; }
1084 p
= v
* (wxMAX_RGB
- s
) / wxMAX_RGB
;
1085 q
= v
* (wxMAX_RGB
- s
* f
/ 60) / wxMAX_RGB
;
1086 t
= v
* (wxMAX_RGB
- s
* (60 - f
) / 60) / wxMAX_RGB
;
1089 case 0: r
= v
, g
= t
, b
= p
; break;
1090 case 1: r
= q
, g
= v
, b
= p
; break;
1091 case 2: r
= p
, g
= v
, b
= t
; break;
1092 case 3: r
= p
, g
= q
, b
= v
; break;
1093 case 4: r
= t
, g
= p
, b
= v
; break;
1094 case 5: r
= v
, g
= p
, b
= q
; break;
1097 rgb
->green
= g
<< 8;
1101 void wxXColorToHSV(wxHSV
*hsv
,XColor
*rgb
)
1103 int r
= rgb
->red
>> 8;
1104 int g
= rgb
->green
>> 8;
1105 int b
= rgb
->blue
>> 8;
1106 int maxv
= wxMax3(r
, g
, b
);
1107 int minv
= wxMin3(r
, g
, b
);
1110 if (maxv
) s
= (maxv
- minv
) * wxMAX_RGB
/ maxv
;
1115 int rc
, gc
, bc
, hex
= 0;
1116 rc
= (maxv
- r
) * wxMAX_RGB
/ (maxv
- minv
);
1117 gc
= (maxv
- g
) * wxMAX_RGB
/ (maxv
- minv
);
1118 bc
= (maxv
- b
) * wxMAX_RGB
/ (maxv
- minv
);
1119 if (r
== maxv
) { h
= bc
- gc
, hex
= 0; }
1120 else if (g
== maxv
) { h
= rc
- bc
, hex
= 2; }
1121 else if (b
== maxv
) { h
= gc
- rc
, hex
= 4; }
1122 h
= hex
* 60 + (h
* 60 / wxMAX_RGB
);
1123 if (h
< 0) h
+= 360;
1126 hsv
->s
= (s
* wxMAX_SV
) / wxMAX_RGB
;
1127 hsv
->v
= (v
* wxMAX_SV
) / wxMAX_RGB
;
1130 void wxAllocNearestColor(Display
*d
,Colormap cmp
,XColor
*xc
)
1134 int screen
= DefaultScreen(d
);
1135 int num_colors
= DisplayCells(d
,screen
);
1137 XColor
*color_defs
= new XColor
[num_colors
];
1138 for(llp
= 0;llp
< num_colors
;llp
++) color_defs
[llp
].pixel
= llp
;
1139 XQueryColors(d
,cmp
,color_defs
,num_colors
);
1141 wxHSV hsv_defs
, hsv
;
1142 wxXColorToHSV(&hsv
,xc
);
1144 int diff
, min_diff
= 0, pixel
= 0;
1146 for(llp
= 0;llp
< num_colors
;llp
++)
1148 wxXColorToHSV(&hsv_defs
,&color_defs
[llp
]);
1149 diff
= wxSIGN(wxH_WEIGHT
* (hsv
.h
- hsv_defs
.h
)) +
1150 wxSIGN(wxS_WEIGHT
* (hsv
.s
- hsv_defs
.s
)) +
1151 wxSIGN(wxV_WEIGHT
* (hsv
.v
- hsv_defs
.v
));
1152 if (llp
== 0) min_diff
= diff
;
1153 if (min_diff
> diff
) { min_diff
= diff
; pixel
= llp
; }
1154 if (min_diff
== 0) break;
1157 xc
-> red
= color_defs
[pixel
].red
;
1158 xc
-> green
= color_defs
[pixel
].green
;
1159 xc
-> blue
= color_defs
[pixel
].blue
;
1160 xc
-> flags
= DoRed
| DoGreen
| DoBlue
;
1163 if (!XAllocColor(d,cmp,xc))
1164 cout << "wxAllocNearestColor : Warning : Cannot find nearest color !\n";
1167 delete[] color_defs
;
1170 void wxAllocColor(Display
*d
,Colormap cmp
,XColor
*xc
)
1172 if (!XAllocColor(d
,cmp
,xc
))
1174 // cout << "wxAllocColor : Warning : Can not allocate color, attempt find nearest !\n";
1175 wxAllocNearestColor(d
,cmp
,xc
);