home *** CD-ROM | disk | FTP | other *** search
/ Aminet 10 / aminetcdnumber101996.iso / Aminet / gfx / x11 / Mesa_Amiwin.lha / Mesa-Amiwin / widgets / demos / mcube.c < prev    next >
C/C++ Source or Header  |  1995-06-08  |  8KB  |  331 lines
  1. /* mcube.c -- Demo program for the Mesa widget
  2.    Copyright (C) 1995 Thorsten.Ohl @ Physik.TH-Darmstadt.de
  3.  
  4.    This program is free software; you can redistribute it and/or modify
  5.    it under the terms of the GNU General Public License as published by
  6.    the Free Software Foundation; either version 2 of the License, or
  7.    (at your option) any later version.
  8.  
  9.    This program is distributed in the hope that it will be useful,
  10.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12.    GNU General Public License for more details.
  13.  
  14.    You should have received a copy of the GNU General Public License
  15.    along with this program; see the file COPYING.  If not, write to
  16.    the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  17.  
  18.    $Id: mcube.c,v 1.11 1995/05/19 20:30:58 ohl Exp $
  19.  */
  20.  
  21. #include <stdio.h>
  22. #include <stdlib.h>
  23. #include <stdarg.h>
  24. #include <math.h>
  25. #include <X11/X.h>
  26. #include <X11/Intrinsic.h>
  27. #include <X11/StringDefs.h>
  28. #include <X11/Shell.h>
  29. #include <X11/Xaw/Command.h>
  30. #include <X11/Xaw/Form.h>
  31. #include <GL/xmesa.h>
  32. #include <GL/gl.h>
  33. #include <GL/MesaDrawingArea.h>
  34.  
  35. static char *RCS_Id =
  36. "@(#) $Id: mcube.c,v 1.11 1995/05/19 20:30:58 ohl Exp $";
  37.  
  38. static GLint Black, Red, Green, Blue;
  39.  
  40. void quit_function (Widget, XtPointer, XtPointer);
  41.  
  42. void
  43. quit_function (Widget w, XtPointer closure, XtPointer call_data)
  44. {
  45.   exit (0);
  46. }
  47.  
  48. static void
  49. draw_cube (void)
  50. {
  51.   /* X faces */
  52.   glIndexi (Red);
  53.   glColor3f (1.0, 0.0, 0.0);
  54.   glBegin (GL_POLYGON);
  55.   {
  56.     glVertex3f (1.0, 1.0, 1.0);
  57.     glVertex3f (1.0, -1.0, 1.0);
  58.     glVertex3f (1.0, -1.0, -1.0);
  59.     glVertex3f (1.0, 1.0, -1.0);
  60.   }
  61.   glEnd ();
  62.  
  63.   glBegin (GL_POLYGON);
  64.   {
  65.     glVertex3f (-1.0, 1.0, 1.0);
  66.     glVertex3f (-1.0, 1.0, -1.0);
  67.     glVertex3f (-1.0, -1.0, -1.0);
  68.     glVertex3f (-1.0, -1.0, 1.0);
  69.   }
  70.   glEnd ();
  71.  
  72.   /* Y faces */
  73.   glIndexi (Green);
  74.   glColor3f (0.0, 1.0, 0.0);
  75.   glBegin (GL_POLYGON);
  76.   {
  77.     glVertex3f (1.0, 1.0, 1.0);
  78.     glVertex3f (1.0, 1.0, -1.0);
  79.     glVertex3f (-1.0, 1.0, -1.0);
  80.     glVertex3f (-1.0, 1.0, 1.0);
  81.   }
  82.   glEnd ();
  83.  
  84.   glBegin (GL_POLYGON);
  85.   {
  86.     glVertex3f (1.0, -1.0, 1.0);
  87.     glVertex3f (-1.0, -1.0, 1.0);
  88.     glVertex3f (-1.0, -1.0, -1.0);
  89.     glVertex3f (1.0, -1.0, -1.0);
  90.   }
  91.   glEnd ();
  92.  
  93.   /* Z faces */
  94.   glIndexi (Blue);
  95.   glColor3f (0.0, 0.0, 1.0);
  96.   glBegin (GL_POLYGON);
  97.   {
  98.     glVertex3f (1.0, 1.0, 1.0);
  99.     glVertex3f (-1.0, 1.0, 1.0);
  100.     glVertex3f (-1.0, -1.0, 1.0);
  101.     glVertex3f (1.0, -1.0, 1.0);
  102.   }
  103.   glEnd ();
  104.  
  105.   glBegin (GL_POLYGON);
  106.   {
  107.     glVertex3f (1.0, 1.0, -1.0);
  108.     glVertex3f (1.0, -1.0, -1.0);
  109.     glVertex3f (-1.0, -1.0, -1.0);
  110.     glVertex3f (-1.0, 1.0, -1.0);
  111.   }
  112.   glEnd ();
  113. }
  114.  
  115. GLfloat xrot, yrot, zrot;
  116.  
  117. static void
  118. init_display (Widget w)
  119. {
  120.   xrot = yrot = zrot = 0.0;
  121.  
  122.   GLwMakeCurrent (w);
  123.  
  124.   glClearColor (0.0, 0.0, 0.0, 0.0);
  125.   glClearIndex (Black);
  126.   glClearDepth (10.0);
  127.  
  128.   glMatrixMode (GL_PROJECTION);
  129.   glLoadIdentity ();
  130.   glFrustum (-1.0, 1.0, -1.0, 1.0, 1.0, 10.0);
  131.   glTranslatef (0.0, 0.0, -3.0);
  132.  
  133.   glMatrixMode (GL_MODELVIEW);
  134.   glLoadIdentity ();
  135.  
  136.   glCullFace (GL_BACK);
  137.   glEnable (GL_CULL_FACE);
  138.  
  139.   glShadeModel (GL_FLAT);
  140. }
  141.  
  142. static void
  143. display (Widget w)
  144. {
  145.   GLwMakeCurrent (w);
  146.   glClear (GL_COLOR_BUFFER_BIT);
  147.   glPushMatrix ();
  148.   {
  149.     glRotatef (xrot, 1.0, 0.0, 0.0);
  150.     glRotatef (yrot, 0.0, 1.0, 0.0);
  151.     glRotatef (zrot, 0.0, 0.0, 1.0);
  152.     draw_cube ();
  153.   }
  154.   glPopMatrix ();
  155.   glFinish ();
  156.   XMesaSwapBuffers ();
  157.       
  158.   xrot += 1.0;
  159.   yrot += 0.7;
  160.   zrot -= 0.3;
  161. }
  162.  
  163.  
  164. static GLint
  165. alloc_color (Widget w, Colormap cmap, int red, int green, int blue)
  166. { 
  167.   XColor xcolor;
  168.   xcolor.red = red;
  169.   xcolor.green = green;
  170.   xcolor.blue = blue;
  171.   xcolor.flags = DoRed | DoGreen | DoBlue;
  172.   if (!XAllocColor (XtDisplay (w), cmap, &xcolor))
  173.     {
  174.       printf ("Couldn't allocate black!\n");
  175.       exit (1);
  176.     }
  177.   return xcolor.pixel;
  178. }
  179.  
  180. /* This is rather inefficient, but we don't mind for the moment,
  181.    because it works.  */
  182.  
  183. static void
  184. translate_pixels (Widget to, Widget from, ...)
  185. {
  186.   va_list ap;
  187.   char *name;
  188.   Colormap from_cmap, to_cmap;
  189.   XColor xcolor;
  190.  
  191.   XtVaGetValues (from, XtNcolormap, &from_cmap, NULL);
  192.   XtVaGetValues (to, XtNcolormap, &to_cmap, NULL);
  193.  
  194.   va_start (ap, from);
  195.   for (name = va_arg (ap, char *); name != NULL; name = va_arg (ap, char *))
  196.     {
  197.       XtVaGetValues (from, name, &xcolor.pixel, NULL);
  198.       XQueryColor (XtDisplay (from), from_cmap, &xcolor);
  199.       if (!XAllocColor (XtDisplay (to), to_cmap, &xcolor))
  200.     XtAppWarning (XtWidgetToApplicationContext (to),
  201.               "Couldn't allocate color!\n");
  202.       else
  203.     XtVaSetValues (from, name, xcolor.pixel, NULL);
  204.     }
  205.   va_end (ap);
  206. }
  207.  
  208. /* Just like the movies: do 24 frames per second. */
  209. unsigned long delay = 1000/24;
  210.  
  211. static void first_frame (Widget);
  212. static void next_frame (XtPointer, XtIntervalId *);
  213.  
  214. static void
  215. first_frame (Widget w)
  216. {
  217.   XtAppAddTimeOut (XtWidgetToApplicationContext (w),
  218.            delay, next_frame, (XtPointer) w);
  219. }
  220.  
  221. static void
  222. next_frame (XtPointer client_data, XtIntervalId *id)
  223. {
  224.   Widget w = (Widget) client_data;
  225.   first_frame (w);
  226.   display (w);
  227. }
  228.  
  229. static XrmOptionDescRec options[] =
  230. {
  231.   { "-debug", "*debug", XrmoptionNoArg, "True" },
  232.   { "-rgba", "*rgba", XrmoptionNoArg, "True" },
  233.   { "-doublebuffer", "*doublebuffer", XrmoptionNoArg, "True" },
  234.   { "-ximage", "*ximage", XrmoptionNoArg, "True" },
  235. };
  236.  
  237. static String fallback_resources[] =
  238. {
  239.   "*MesaDrawingArea.width: 100",
  240.   "*MesaDrawingArea.height: 100",
  241.   "*MesaDrawingArea.debug: false",
  242.   "*MesaDrawingArea.rgba: false",
  243.   "*MesaDrawingArea.installColormap: true",
  244.   "*MesaDrawingArea.doublebuffer: true",
  245.   "*MesaDrawingArea.ximage: false",
  246.   "*mesa.width: 300",
  247.   "*mesa.height: 300",
  248.   NULL
  249. };
  250.  
  251. int
  252. main (int argc, char *argv[])
  253. {
  254.   Widget top, frame, mesa, mesa1, quit;
  255.   XtAppContext app_context;
  256.   Boolean rgba, cmap_installed;
  257.  
  258.   top = XtVaAppInitialize (&app_context, "Mcube",
  259.                options, XtNumber (options),
  260.                &argc, argv, fallback_resources,
  261.                NULL);
  262.  
  263.   frame = XtVaCreateManagedWidget ("frame", formWidgetClass,
  264.                    top,
  265.                    NULL);
  266.   mesa = XtVaCreateManagedWidget ("mesa", mesaDrawingAreaWidgetClass,
  267.                   frame,
  268.                   GLwNshareLists, True,
  269.                   NULL);
  270.   mesa1 = XtVaCreateManagedWidget ("mesa1", mesaDrawingAreaWidgetClass,
  271.                    frame,
  272.                    GLwNshareLists, True,
  273.                    XtNwidth, 100, XtNheight, 100,
  274.                    XtNfromHoriz, mesa, XtNhorizDistance, 10,
  275.                    NULL);
  276.   quit = XtVaCreateManagedWidget ("quit", commandWidgetClass,
  277.                   frame,
  278.                                   XtNfromVert, mesa1, XtNvertDistance, 50,
  279.                                   XtNfromHoriz, mesa, XtNhorizDistance, 10,
  280.                   NULL);
  281.   XtAddCallback (quit, XtNcallback, quit_function, NULL);
  282.  
  283.   XtRealizeWidget (top);
  284.  
  285.   XtVaGetValues (mesa,
  286.          GLwNrgba, &rgba,
  287.          GLwNinstallColormap, &cmap_installed,
  288.          NULL);
  289.   if (rgba)
  290.     {
  291.       Black = Red = Green = Blue = 0;
  292.  
  293.       if (cmap_installed)
  294.     {
  295.       /* In RGBA mode, the Mesa widgets will have their own color map.
  296.          Adjust the colors of the other widgets so that--even if the rest
  297.          of the screen has wrong colors--all application widgets have the
  298.          right colors.  */
  299.              
  300.       translate_pixels (mesa, quit,
  301.                 XtNbackground, XtNforeground, XtNborder, NULL);
  302.       translate_pixels (mesa, frame, XtNbackground, XtNborder, NULL);
  303.  
  304.       /* Finally warp the pointer into the mesa widget, to make sure that
  305.          the user sees the right colors at the beginning.  */
  306.  
  307.       XWarpPointer (XtDisplay (mesa), None, XtWindow (mesa), 0, 0, 0, 0, 0, 0);
  308.     }
  309.     }
  310.   else
  311.     {
  312.       /* Allocate a few colors for use in color index mode.  */
  313.  
  314.       Colormap cmap;
  315.       cmap = DefaultColormap (XtDisplay (top), DefaultScreen (XtDisplay (top)));
  316.       Black = alloc_color (top, cmap, 0x0000, 0x0000, 0x0000);
  317.       Red   = alloc_color (top, cmap, 0xffff, 0x0000, 0x0000);
  318.       Green = alloc_color (top, cmap, 0x0000, 0xffff, 0x0000);
  319.       Blue  = alloc_color (top, cmap, 0x0000, 0x0000, 0xffff);
  320.     }
  321.  
  322.   init_display (mesa);
  323.   init_display (mesa1);
  324.  
  325.   first_frame (mesa);
  326.   first_frame (mesa1);
  327.   
  328.   XtAppMainLoop (app_context);
  329.   return (0);
  330. }
  331.