1 /* 2 * 3 Copyright 1989, 1998 The Open Group 4 Copyright 2003-2004 Roland Mainz <roland.mainz (at) nrubsig.org> 5 6 Permission to use, copy, modify, distribute, and sell this software and its 7 documentation for any purpose is hereby granted without fee, provided that 8 the above copyright notice appear in all copies and that both that 9 copyright notice and this permission notice appear in supporting 10 documentation. 11 12 The above copyright notice and this permission notice shall be included in 13 all copies or substantial portions of the Software. 14 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE 18 OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN 19 AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN 20 CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. 21 22 Except as contained in this notice, the name of The Open Group shall not be 23 used in advertising or otherwise to promote the sale, use or other dealings 24 in this Software without prior written authorization from The Open Group. 25 * 26 * 27 * XawInitializeWidgetSet 28 * 29 * This routine forces a reference to vendor shell so that the one in this 30 * widget is installed. Any other cross-widget set initialization should be 31 * done here as well. All Athena widgets should include "XawInit.h" and 32 * call this routine from their ClassInitialize procs (this routine may be 33 * used as the class init proc). 34 */ 35 #ifdef HAVE_CONFIG_H 36 #include <config.h> 37 #endif 38 #include <X11/Intrinsic.h> 39 #include <X11/Vendor.h> 40 #include <X11/Xaw/XawInit.h> 41 #include <X11/IntrinsicP.h> 42 #include <X11/StringDefs.h> 43 #include "Private.h" 44 45 void 46 XawInitializeWidgetSet(void) 47 { 48 static Boolean firsttime = True; 49 50 if (firsttime) { 51 firsttime = False; 52 #ifndef OLDXAW 53 XawPixmapsInitialize(); 54 XawInitializeDefaultConverters(); 55 #endif 56 XtInitializeWidgetClass(vendorShellWidgetClass); 57 } 58 } 59 60 /* XawOpenApplication() - mainly identical to XtOpenApplication() but 61 * takes a |Display *| and |Screen *| as arguments, too... */ 62 Widget XawOpenApplication(XtAppContext *app_context_return, 63 Display *dpy, 64 Screen *screen, 65 String application_name, 66 String application_class, 67 WidgetClass widget_class, 68 int *argc, 69 _XtString *argv) 70 { 71 Widget toplevel; 72 Cardinal n; 73 Arg args[2]; 74 75 XtToolkitInitialize(); 76 *app_context_return = XtCreateApplicationContext(); 77 if( *app_context_return == NULL ) 78 return NULL; 79 80 XtDisplayInitialize(*app_context_return, dpy, 81 application_name, application_class, 82 NULL, 0, 83 argc, argv); 84 85 n = 0; 86 if (screen) { 87 XtSetArg(args[n], XtNscreen, screen); n++; 88 } 89 toplevel = XtAppCreateShell(application_name, 90 application_class, 91 widget_class, 92 dpy, 93 args, n); 94 95 return toplevel; 96 } 97 98