2 * $Source: /cvs/cvsroot/d2x/arch/ogl/glx.c,v $
5 * $Date: 2001-11-04 08:49:57 $
7 * opengl platform specific functions for GLX - Added 9/15/99 Matthew Mueller
9 * $Log: not supported by cvs2svn $
10 * Revision 1.2 2001/10/31 07:35:47 bradleyb
13 * Revision 1.1 2001/10/25 08:25:34 bradleyb
14 * Finished moving stuff to arch/blah. I know, it's ugly, but It'll be easier to sync with d1x.
16 * Revision 1.3 2001/01/29 13:47:52 bradleyb
17 * Fixed build, some minor cleanups.
35 #include <X11/extensions/xf86dga.h>
36 #include <X11/extensions/xf86vmode.h>
40 #include <X11/Xatom.h>
45 #include <X11/Xm/MwmUtil.h>
49 /* bit definitions for MwmHints.flags */
50 #define MWM_HINTS_FUNCTIONS (1L << 0)
51 #define MWM_HINTS_DECORATIONS (1L << 1)
52 #define MWM_HINTS_INPUT_MODE (1L << 2)
53 #define MWM_HINTS_STATUS (1L << 3)
55 /* bit definitions for MwmHints.functions */
56 #define MWM_FUNC_ALL (1L << 0)
57 #define MWM_FUNC_RESIZE (1L << 1)
58 #define MWM_FUNC_MOVE (1L << 2)
59 #define MWM_FUNC_MINIMIZE (1L << 3)
60 #define MWM_FUNC_MAXIMIZE (1L << 4)
61 #define MWM_FUNC_CLOSE (1L << 5)
64 /* bit definitions for MwmHints.decorations */
65 #define MWM_DECOR_ALL (1L << 0)
66 #define MWM_DECOR_BORDER (1L << 1)
67 #define MWM_DECOR_RESIZEH (1L << 2)
68 #define MWM_DECOR_TITLE (1L << 3)
69 #define MWM_DECOR_MENU (1L << 4)
70 #define MWM_DECOR_MINIMIZE (1L << 5)
71 #define MWM_DECOR_MAXIMIZE (1L << 6)
76 unsigned long functions;
77 unsigned long decorations;
82 #define PROP_MOTIF_WM_HINTS_ELEMENTS 5
89 * Specify which Motif window manager border decorations to put on a * top-level window. For example, you can specify that
90 a window is not * resizabe, or omit the titlebar, or completely remove all decorations. * Input: dpy - the X display
92 * flags - bitwise-OR of the MWM_DECOR_xxx symbols in
94 * indicating what decoration elements to enable. Zero would
97 void set_mwm_border( Display *dpy, Window w, unsigned long dflags,unsigned long fflags ) {
98 PropMotifWmHints motif_hints;
101 /* setup the property */
102 motif_hints.flags = MWM_HINTS_DECORATIONS|MWM_HINTS_FUNCTIONS;
103 motif_hints.decorations = dflags;
104 motif_hints.functions = fflags;
106 /* get the atom for the property */
107 prop = XInternAtom( dpy, "_MOTIF_WM_HINTS", True ); if (!prop) {
108 mprintf((0,"set_mwm_border: prop==0\n"));
109 /* something went wrong! */
113 /* not sure this is correct, seems to work, XA_WM_HINTS didn't work */ proptype = prop;
115 XChangeProperty( dpy, w, /* display, window */ prop, proptype, /* property, type */
116 32, /* format: 32-bit datums */ PropModeReplace, /* mode */
117 (unsigned char *) &motif_hints, /* data */ PROP_MOTIF_WM_HINTS_ELEMENTS /* nelements */);
120 int glx_erbase,glx_evbase;
122 XSetWindowAttributes swa;
124 XVisualInfo *visinfo;
125 GLXContext glxcontext;
126 Pixmap blankpixmap=None;
127 Cursor blankcursor=None;
130 void set_wm_hints(int fullscreen){
131 XSizeHints *hints=NULL;
134 // return;//seems screwed.
135 if (!hints) hints=XAllocSizeHints();
136 hints->width=hints->min_width=hints->max_width=hints->base_width=grd_curscreen->sc_w;
137 hints->height=hints->min_height=hints->max_height=hints->base_height=grd_curscreen->sc_h;
138 hints->flags=PSize|PMinSize|PMaxSize|PBaseSize;
139 // hints->min_width=hints->max_width=grd_curscreen->sc_w;
140 // hints->min_height=hints->max_height=grd_curscreen->sc_h;
141 // hints->flags=PMinSize|PMaxSize;
142 XSetWMNormalHints(dpy,win,hints);
145 set_mwm_border(dpy,win,0,0);
147 set_mwm_border(dpy,win,MWM_DECOR_TITLE|MWM_DECOR_BORDER,MWM_FUNC_MOVE|MWM_FUNC_CLOSE);
151 static int attribs[]={GLX_RGBA,GLX_DOUBLEBUFFER,GLX_DEPTH_SIZE,0,GLX_STENCIL_SIZE,0,
152 GLX_ACCUM_RED_SIZE,0,GLX_ACCUM_GREEN_SIZE,0,GLX_ACCUM_BLUE_SIZE,0,GLX_ACCUM_ALPHA_SIZE,0,None};
154 void ogl_do_fullscreen_internal(void){
155 // ogl_smash_texture_list_internal();//not needed
158 XMoveWindow(dpy,win,0,0);
159 // XDefineCursor(dpy,win,blankcursor);
160 //XGrabPointer(dpy,win,0,swa.event_mask,GrabModeAsync,GrabModeAsync,win,blankcursor,CurrentTime);
161 XGrabPointer(dpy,win,1,ButtonPressMask | ButtonReleaseMask | PointerMotionMask,GrabModeAsync,GrabModeAsync,win,blankcursor,CurrentTime);
162 // XGrabKeyboard(dpy,win,1,GrabModeAsync,GrabModeAsync,CurrentTime);//grabbing keyboard doesn't seem to do much good anyway.
165 //make ogl_fullscreen
166 //can you even do this with DGA ? just resizing with ctrl-alt-(-/+) caused X to die a horrible death.
167 //might have to kill the window/context/whatever first? HRm.
171 // XUndefineCursor(dpy,win);
172 XUngrabPointer(dpy,CurrentTime);
173 // XUngrabKeyboard(dpy,CurrentTime);
180 inline void ogl_swap_buffers_internal(void){
181 glXSwapBuffers(dpy,win);
183 int ogl_init_window(int x, int y){
185 XResizeWindow(dpy,win,x,y);
186 set_wm_hints(ogl_fullscreen);
189 glxcontext=glXCreateContext(dpy,visinfo,0,GL_TRUE);
192 swa.colormap=XCreateColormap(dpy,RootWindow(dpy,visinfo->screen),visinfo->visual,AllocNone);
195 swa.event_mask=ExposureMask | StructureNotifyMask | KeyPressMask | KeyReleaseMask| ButtonPressMask | ButtonReleaseMask | PointerMotionMask;
196 //win = XCreateWindow(dpy,RootWindow(dpy,visinfo->screen),0,0,x,y,0,visinfo->depth,InputOutput,visinfo->visual,CWBorderPixel|CWColormap|CWEventMask,&swa);
197 win = XCreateWindow(dpy,RootWindow(dpy,visinfo->screen),0,0,x,y,0,visinfo->depth,InputOutput,visinfo->visual,CWColormap|CWEventMask,&swa);
199 XStoreName(dpy,win,DESCENT_VERSION);
200 // XStoreName(dpy,win,"agry");
204 glXMakeCurrent(dpy,win,glxcontext);
206 set_wm_hints(ogl_fullscreen);
212 unsigned char *blankdata;
214 XQueryBestCursor(dpy,win,1,1,&w,&h);
215 // mprintf((0,"bestcursor %ix%i\n",w,h));
216 blankdata=d_malloc(w*h/8);
217 memset(blankdata,0,w*h/8);
218 memset(&blankcolor,0,sizeof(XColor));
219 blankpixmap=XCreateBitmapFromData(dpy,win,blankdata,w,h);
220 blankcursor=XCreatePixmapCursor(dpy,blankpixmap,blankpixmap,&blankcolor,&blankcolor,w,h);
226 ogl_do_fullscreen_internal();
227 // gr_do_fullscreen(ogl_fullscreen);
230 init_gii_xwin(dpy,win);
234 void ogl_destroy_window(void){
236 glXDestroyContext(dpy,glxcontext);
237 XDestroyWindow(dpy,win);
238 XFreeColormap(dpy,swa.colormap);
246 Error("no display\n");
247 else if (glXQueryExtension(dpy,&glx_erbase,&glx_evbase)==False)
249 else if (!(visinfo = glXChooseVisual(dpy,DefaultScreen(dpy),attribs)))
250 Error("no visual\n");
252 void ogl_close(void){
255 ogl_do_fullscreen_internal();
257 ogl_destroy_window();
258 if (blankcursor!=None){
259 XFreeCursor(dpy,blankcursor);
260 XFreePixmap(dpy,blankpixmap);