This is cube.c in view mode; [Download] [Up]
/* cube.c -- Demo program for the Mesa widget
Copyright (C) 1995, 1996 Thorsten.Ohl @ Physik.TH-Darmstadt.de
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; see the file COPYING. If not, write to
the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
$Id: cube.c,v 1.20 1996/09/30 00:21:06 ohl Exp $
*/
#include <stdio.h>
#include <stdlib.h>
#include <stdarg.h>
#include <math.h>
#include <X11/X.h>
#include <X11/Intrinsic.h>
#include <X11/StringDefs.h>
#include <X11/Shell.h>
#ifndef __GLX_MOTIF
#include <X11/Xaw/Command.h>
#include <X11/Xaw/Form.h>
#include <GL/xmesa.h>
#include <GL/gl.h>
#include <GL/GLwDrawA.h>
#else /* __GLX_MOTIF */
#include <Xm/PushB.h>
#include <Xm/Form.h>
#include <GL/xmesa.h>
#include <GL/gl.h>
#include <GL/GLwMDrawA.h>
#endif /* __GLX_MOTIF */
static char *RCS_Id =
"@(#) $Id: cube.c,v 1.20 1996/09/30 00:21:06 ohl Exp $";
static GLint Black, Red, Green, Blue;
void quit_function (Widget, XtPointer, XtPointer);
void
quit_function (Widget w, XtPointer closure, XtPointer call_data)
{
exit (0);
}
static void
draw_cube (void)
{
/* X faces */
glIndexi (Red);
glColor3f (1.0, 0.0, 0.0);
glBegin (GL_POLYGON);
{
glVertex3f (1.0, 1.0, 1.0);
glVertex3f (1.0, -1.0, 1.0);
glVertex3f (1.0, -1.0, -1.0);
glVertex3f (1.0, 1.0, -1.0);
}
glEnd ();
glBegin (GL_POLYGON);
{
glVertex3f (-1.0, 1.0, 1.0);
glVertex3f (-1.0, 1.0, -1.0);
glVertex3f (-1.0, -1.0, -1.0);
glVertex3f (-1.0, -1.0, 1.0);
}
glEnd ();
/* Y faces */
glIndexi (Green);
glColor3f (0.0, 1.0, 0.0);
glBegin (GL_POLYGON);
{
glVertex3f (1.0, 1.0, 1.0);
glVertex3f (1.0, 1.0, -1.0);
glVertex3f (-1.0, 1.0, -1.0);
glVertex3f (-1.0, 1.0, 1.0);
}
glEnd ();
glBegin (GL_POLYGON);
{
glVertex3f (1.0, -1.0, 1.0);
glVertex3f (-1.0, -1.0, 1.0);
glVertex3f (-1.0, -1.0, -1.0);
glVertex3f (1.0, -1.0, -1.0);
}
glEnd ();
/* Z faces */
glIndexi (Blue);
glColor3f (0.0, 0.0, 1.0);
glBegin (GL_POLYGON);
{
glVertex3f (1.0, 1.0, 1.0);
glVertex3f (-1.0, 1.0, 1.0);
glVertex3f (-1.0, -1.0, 1.0);
glVertex3f (1.0, -1.0, 1.0);
}
glEnd ();
glBegin (GL_POLYGON);
{
glVertex3f (1.0, 1.0, -1.0);
glVertex3f (1.0, -1.0, -1.0);
glVertex3f (-1.0, -1.0, -1.0);
glVertex3f (-1.0, 1.0, -1.0);
}
glEnd ();
}
GLfloat xrot, yrot, zrot;
static void
init_display (Widget w)
{
xrot = yrot = zrot = 0.0;
glClearColor (0.0, 0.0, 0.0, 0.0);
glClearIndex (Black);
glClearDepth (10.0);
glMatrixMode (GL_PROJECTION);
glLoadIdentity ();
glFrustum (-1.0, 1.0, -1.0, 1.0, 1.0, 10.0);
glTranslatef (0.0, 0.0, -3.0);
glMatrixMode (GL_MODELVIEW);
glLoadIdentity ();
glCullFace (GL_BACK);
glEnable (GL_CULL_FACE);
glShadeModel (GL_FLAT);
}
static void
display (Widget w)
{
glClear (GL_COLOR_BUFFER_BIT);
glPushMatrix ();
{
glRotatef (xrot, 1.0, 0.0, 0.0);
glRotatef (yrot, 0.0, 1.0, 0.0);
glRotatef (zrot, 0.0, 0.0, 1.0);
draw_cube ();
}
glPopMatrix ();
glFinish ();
glXSwapBuffers (XtDisplay (w), XtWindow (w));
xrot += 1.0;
yrot += 0.7;
zrot -= 0.3;
}
static GLint
alloc_color (Widget w, Colormap cmap, int red, int green, int blue)
{
XColor xcolor;
xcolor.red = red;
xcolor.green = green;
xcolor.blue = blue;
xcolor.flags = DoRed | DoGreen | DoBlue;
if (!XAllocColor (XtDisplay (w), cmap, &xcolor))
{
printf ("Couldn't allocate color!\n");
exit (1);
}
return xcolor.pixel;
}
/* This is rather inefficient, but we don't mind for the moment,
because it works. */
static void
translate_pixels (Widget to, Widget from, ...)
{
va_list ap;
char *name;
Colormap from_cmap, to_cmap;
XColor xcolor;
XtVaGetValues (from, XtNcolormap, &from_cmap, NULL);
XtVaGetValues (to, XtNcolormap, &to_cmap, NULL);
va_start (ap, from);
for (name = va_arg (ap, char *); name != NULL; name = va_arg (ap, char *))
{
XtVaGetValues (from, name, &xcolor.pixel, NULL);
XQueryColor (XtDisplay (from), from_cmap, &xcolor);
if (!XAllocColor (XtDisplay (to), to_cmap, &xcolor))
XtAppWarning (XtWidgetToApplicationContext (to),
"Couldn't allocate color!\n");
else
XtVaSetValues (from, name, xcolor.pixel, NULL);
}
va_end (ap);
}
/* Just like the movies: do 24 frames per second. */
unsigned long delay = 1000/24;
static void first_frame (Widget);
static void next_frame (XtPointer, XtIntervalId *);
static void
first_frame (Widget w)
{
XtAppAddTimeOut (XtWidgetToApplicationContext (w),
delay, next_frame, (XtPointer) w);
}
static void
next_frame (XtPointer client_data, XtIntervalId *id)
{
Widget w = (Widget) client_data;
first_frame (w);
display (w);
}
static String fallback_resources[] =
{
#ifndef __GLX_MOTIF
"*GLwDrawingArea.width: 300",
"*GLwDrawingArea.height: 300",
"*GLwDrawingArea.rgba: true",
"*GLwDrawingArea.installColormap: true",
"*GLwDrawingArea.doublebuffer: true",
#else /* __GLX_MOTIF */
"*GLwMDrawingArea.width: 300",
"*GLwMDrawingArea.height: 300",
"*GLwMDrawingArea.rgba: true",
"*GLwMDrawingArea.installColormap: true",
"*GLwMDrawingArea.doublebuffer: true",
#endif /* __GLX_MOTIF */
NULL
};
int
main (int argc, char *argv[])
{
Widget top, frame, mesa, quit;
XtAppContext app_context;
XVisualInfo *vi;
Boolean rgba, doublebuffer, cmap_installed;
XtSetLanguageProc (NULL, NULL, NULL);
top = XtVaAppInitialize (&app_context, "Cube",
NULL, 0,
&argc, argv, fallback_resources,
NULL);
#ifndef __GLX_MOTIF
frame = XtVaCreateManagedWidget ("frame", formWidgetClass,
top,
NULL);
mesa = XtVaCreateManagedWidget ("mesa", glwDrawingAreaWidgetClass,
frame,
NULL);
quit = XtVaCreateManagedWidget ("quit", commandWidgetClass,
frame,
XtNfromHoriz, mesa, XtNhorizDistance, 10,
NULL);
XtAddCallback (quit, XtNcallback, quit_function, NULL);
#else /* __GLX_MOTIF */
frame = XtVaCreateManagedWidget ("frame", xmFormWidgetClass,
top,
NULL);
mesa = XtVaCreateManagedWidget ("mesa", glwMDrawingAreaWidgetClass,
frame,
XmNtopAttachment, XmATTACH_FORM,
XmNtopOffset, 10,
XmNleftAttachment, XmATTACH_FORM,
XmNleftOffset, 10,
XmNrightAttachment, XmATTACH_NONE,
XmNbottomAttachment, XmATTACH_FORM,
XmNbottomOffset, 10,
NULL);
quit = XtVaCreateManagedWidget ("quit", xmPushButtonWidgetClass,
frame,
XmNtopAttachment, XmATTACH_FORM,
XmNtopOffset, 10,
XmNleftAttachment, XmATTACH_WIDGET,
XmNleftOffset, 10,
XmNleftWidget, mesa,
XmNrightAttachment, XmATTACH_FORM,
XmNrightOffset, 10,
XmNbottomAttachment, XmATTACH_NONE,
NULL);
XtAddCallback (quit, XmNarmCallback, quit_function, NULL);
#endif /* __GLX_MOTIF */
XtRealizeWidget (top);
XtVaGetValues (mesa,
GLwNrgba, &rgba,
GLwNinstallColormap, &cmap_installed,
GLwNdoublebuffer, &doublebuffer,
GLwNvisualInfo, &vi,
NULL);
/* create a visual context */
GLwDrawingAreaMakeCurrent (mesa,
glXCreateContext (XtDisplay(mesa),
vi,
NULL,
GL_FALSE));
if (rgba)
{
Black = Red = Green = Blue = 0;
if (cmap_installed)
{
/* In RGBA mode, the Mesa widgets will have their own color map.
Adjust the colors of the other widgets so that--even if the rest
of the screen has wrong colors--all application widgets have the
right colors. */
translate_pixels (mesa, quit,
XtNbackground, XtNforeground, XtNborder, NULL);
translate_pixels (mesa, frame, XtNbackground, XtNborder, NULL);
/* Finally warp the pointer into the mesa widget, to make sure that
the user sees the right colors at the beginning. */
XWarpPointer (XtDisplay (mesa), None, XtWindow (mesa),
0, 0, 0, 0, 0, 0);
}
}
else
{
/* Allocate a few colors for use in color index mode. */
Colormap cmap;
cmap = DefaultColormap (XtDisplay (top), DefaultScreen (XtDisplay (top)));
Black = alloc_color (top, cmap, 0x0000, 0x0000, 0x0000);
Red = alloc_color (top, cmap, 0xffff, 0x0000, 0x0000);
Green = alloc_color (top, cmap, 0x0000, 0xffff, 0x0000);
Blue = alloc_color (top, cmap, 0x0000, 0x0000, 0xffff);
}
init_display (mesa);
first_frame (mesa);
XtAppMainLoop (app_context);
return (0);
}
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.